ZXTape! 0SOKO-BAN LINE (ZX-SOFT) SOKO-BAN  0:0::23693\,568::f=416:s$:f,5;1;1+(f>5);" ";s$;27;0;" "(f>4):f:#0;0,7;"CHOOSE 0-9 TO LOAD";#2;f,6;28:i$=:(i$<"0"i$>"9")*23620D\,10 :7::'1;" AFTER LOADING PRESS 'R' TO RUN ":"SB "+("SKBONUS"i$="0")+"AUTOG "+i$::"","ONE-LINER SOKO-BAN",""," Coding:"," Einar Saukas",""," Levels:"," SOKO-BONUS 0"," Einar Saukas",""," AUTO-GEN 1-9"," Yoshio Murase","" v SB SKBONUSEEn GAz$(x9)=22+(9.5-x/w)+(x-w*(x/w)):m(x9)=m$(x)/4-8:p$(x9)=z$(x)+16+¨m(x)+(m(x)/2+144):m$(99c):m$(25),g:w=-12 11 :n:"b"+w+4,n:w:z=-18535:p$(z+31):z:i=-480:d=w*((i=9 )-(i=8))+(i=7)-(i=6):a=m(z+d):b=m(z+d+d):g,18+4*(d*a*((a>2)+(b>2))=0)+(a>2):m$(z+d+d)="($"(1+b/7):z=z+d:m$(z)="<,"(.8L*a-5*(a=7)):n=n-(a=2)+(a<3)*(b=3):p$(z-d);p$(z+d):z$(z);"o":(i>0)/w,a:(n<4)*g,13 :"<<<< ,,, <$<<$<<<< <$<< <<$, <<",23620D\,0,-2,n,n,n,n,n,n,0,-2,n,198,n,n,-2,n,0,0,16,40(,68D,40(,16,0  SB AUTOG 1ttj vpz$(x)=22+(x/7+.5)+(x-7*(x/7)):m(x)=m$(x)/4-8:p$(x)=z$(x)+16+¨m(x)+(m(x)/2+144):m$(99c):z,m$(16),g:f=023:n:"a"+f,n:f:f=7557:p$(f):f:i=-480:d=7*((i=8)-(i=9 ))+(i=7)-(i=6):a=m(z+d):b=m(z+d+d):g,18+4*(d*a*((a>2)+(b>2))=0)+(a>2):m$(z+d+d)="($"(1+b/7):z=z+d:m$(z)="<,"(1+(a=2)+(a=3)):n=n-(a=2)+(a<3)*(b=3):p$(z-d);p$(z+d):z$(z);"o":.05|L*(d0),a:(n<2)*g,13 :45-,"<<,< <(< < <,$<< << $ <<<",23620D\,0,-2,n,n,n,n,n,n,0,-2,130,146,170,146,130,-2,0,0,16,40(,68D,40(,16,0  SB AUTOG 2tti vpz$(x)=22+(x/7+.5)+(x-7*(x/7)):m(x)=m$(x)/4-8:p$(x)=z$(x)+16+¨m(x)+(m(x)/2+144):m$(99c):z,m$(15),g:f=023:n:"a"+f,n:f:f=7557:p$(f):f:i=-480:d=7*((i=8)-(i=9 ))+(i=7)-(i=6):a=m(z+d):b=m(z+d+d):g,18+4*(d*a*((a>2)+(b>2))=0)+(a>2):m$(z+d+d)="($"(1+b/7):z=z+d:m$(z)="<,"(1+(a=2)+(a=3)):n=n-(a=2)+(a<3)*(b=3):p$(z-d);p$(z+d):z$(z);"o":.035|\(*(d0),a:(n<3)*g,13 :18,"<<,<< < , < <<<$< ,$$< <<",23620D\,0,-2,n,n,n,n,n,n,0,-2,130,146,170,146,130,-2,0,0,16,40(,68D,40(,16,0  SB AUTOG 3tth vpz$(x)=22+(x/7+.5)+(x-7*(x/7)):m(x)=m$(x)/4-8:p$(x)=z$(x)+16+¨m(x)+(m(x)/2+144):m$(99c):m$(18),g:z=-518:n:"a"+z+5,n:z:f=762>:p$(f):f:i=-480:d=7*((i=8)-(i=9 ))+(i=7)-(i=6):a=m(z+d):b=m(z+d+d):g,18+4*(d*a*((a>2)+(b>2))=0)+(a>2):m$(z+d+d)="($"(1+b/7):z=z+d:m$(z)="<,"(.8L*a-5*(a=7)):n=n-(a=2)+(a<3)*(b=3):p$(z-d);p$(z+d):z$(z);"o":(d0)/20,a:(n<2)*g,13 :"<< <<($< <<<<< <, $< <,",23620D\,0,-2,n,n,n,n,n,n,0,-2,130,146,170,146,130,-2,0,0,16,40(,68D,40(,16,0  SB AUTOG 4uuo wqz$(x)=22+(x/7+.5)+(x-7*(x/7)):m(x)=m$(x)/4-8:p$(x)=z$(x)+16+¨m(x)+(m(x)/2+144):m$(99c):m$(15),g:z=9 32 :n:"a"+z-9 ,n:z:f=762>:p$(f):f:i=-480:d=7*((i=8)-(i=9 ))+(i=7)-(i=6):a=m(z+d):b=m(z+d+d):g,18+4*(d*a*((a>2)+(b>2))=0)+(a>2):m$(z+d+d)="($"(1+b/7):z=z+d:m$(z)="<,"(.8L*a-5*(a=7)):n=n-(a=2)+(a<3)*(b=3):p$(z-d);p$(z+d):z$(z);"o":(i>0)/20,a:(n<3)*g,13 :", , < <<, <$$<< <<$<< << << <<",23620D\,0,-2,n,n,n,n,n,n,0,-2,130,146,170,146,130,-2,0,0,16,40(,68D,40(,16,0  SB AUTOG 5ccn e_z$(x)=22+(x/8+.5)+(x-8*(x/8)):m(x)=m$(x)/4-8:p$(x)=z$(x)+16+¨m(x)+(m(x)/2+144):m$(99c):m$(20),g:z=-320:n:"a"+z+3,n:z:f=871G:p$(f):f:i=-480:d=8*((i=8)-(i=9 ))+(i=7)-(i=6):a=m(z+d):b=m(z+d+d):g,18+4*(d*a*((a>2)+(b>2))=0)+(a>2):m$(z+d+d)="($"(1+b/7):z=z+d:m$(z)="<,"(.8L*a-5*(a=7)):n=n-(a=2)+(a<3)*(b=3):p$(z-d);p$(z+d):z$(z);"o":(i>0)/f,a:(n<3)*g,13 :"<< <<< ,< $$< <<<<< ,<<$ ,<<",23620D\,0,-2,n,n,n,n,n,n,0,-2,130,186,n,n,130,-2,0,0,16,40(,68D,40(,16,0  SB AUTOG 6ttm vpz$(x)=22+(x/8+.5)+(x-8*(x/8)):m(x)=m$(x)/4-8:p$(x)=z$(x)+16+¨m(x)+(m(x)/2+144):m$(99c):z,m$(17),g:f=023:n:"a"+f,n:f:f=8557:p$(f):f:i=-480:d=8*((i=8)-(i=9 ))+(i=7)-(i=6):a=m(z+d):b=m(z+d+d):g,18+4*(d*a*((a>2)+(b>2))=0)+(a>2):m$(z+d+d)="($"(1+b/7):z=z+d:m$(z)="<,"(1+(a=2)+(a=3)):n=n-(a=2)+(a<3)*(b=3):p$(z-d);p$(z+d):z$(z);"o":.035|\(*(d0),a:(n<3)*g,13 :42*,"<,, <$<<<< << $ < <<<,$<",23620D\,0,-2,n,n,n,n,n,n,0,-2,130,146,170,146,130,-2,0,0,16,40(,68D,40(,16,0  SB AUTOG 7uul wqz$(x)=22+(x/7+.5)+(x-7*(x/7)):m(x)=m$(x)/4-8:p$(x)=z$(x)+16+¨m(x)+(m(x)/2+144):m$(99c):m$(17),g:z=1538&:n:"a"+z-15,n:z:f=762>:p$(f):f:i=-480:d=7*((i=8)-(i=9 ))+(i=7)-(i=6):a=m(z+d):b=m(z+d+d):g,18+4*(d*a*((a>2)+(b>2))=0)+(a>2):m$(z+d+d)="($"(1+b/7):z=z+d:m$(z)="<,"(.8L*a-5*(a=7)):n=n-(a=2)+(a<3)*(b=3):p$(z-d);p$(z+d):z$(z);"o":(i>0)/9 ,a:(n<2)*g,13 :"<<, <$< < <($<< <, << <<<< <<<",23620D\,0,-2,n,n,n,n,n,n,0,-2,130,146,170,146,130,-2,0,0,16,40(,68D,40(,16,0  SB AUTOG 8uuc wqz$(x)=22+(9.5-x/8)+(x-8*(x/8)):m(x)=m$(x)/4-8:p$(x)=z$(x)+16+¨m(x)+(m(x)/2+144):m$(99c):m$(20),g:z=28513:n:"a"+z-28,n:z:f=9 64@:p$(f):f:i=-480:d=8*((i=9 )-(i=8))+(i=7)-(i=6):a=m(z+d):b=m(z+d+d):g,18+4*(d*a*((a>2)+(b>2))=0)+(a>2):m$(z+d+d)="($"(1+b/7):z=z+d:m$(z)="<,"(.8L*a-5*(a=7)):n=n-(a=2)+(a<3)*(b=3):p$(z-d);p$(z+d):z$(z);"o":(i>0)/20,a:(n<3)*g,13 :"<<< <<<$ < < <$,< <<$ < ,<<<,",23620D\,0,-2,n,n,n,n,n,n,0,-2,130,146,170,146,130,-2,0,0,16,40(,68D,40(,16,0  SB AUTOG 9ttb vpz$(x)=22+(x/7+.5)+(x-7*(x/7)):m(x)=m$(x)/4-8:p$(x)=z$(x)+16+¨m(x)+(m(x)/2+144):m$(99c):z,m$(15),g:f=023:n:"a"+f,n:f:f=7557:p$(f):f:i=-480:d=7*((i=8)-(i=9 ))+(i=7)-(i=6):a=m(z+d):b=m(z+d+d):g,18+4*(d*a*((a>2)+(b>2))=0)+(a>2):m$(z+d+d)="($"(1+b/7):z=z+d:m$(z)="<,"(.8L*a-5*(a=7)):n=n-(a=2)+(a<3)*(b=3):p$(z-d);p$(z+d):z$(z);"o":.05|L*(d0),a:(n<3)*g,13 :32 ,",<, , $$< <<<<< <$ << <<<",23620D\,0,-2,n,n,n,n,n,n,0,-2,130,146,170,146,130,-2,0,0,16,40(,68D,40(,16,0