cube !N~!! 3E3  2E3 6:6:1 I:.2~L,2:l=0:c=0:t$="BITTE WARTEN":9530:% /5,0;"Der Wuerfel wird aufgebaut" x(8,6) y(8,6)  a$(2) c$(1,6) (c$(1)="*" 2i=18 <j=16 F x(i,j)=j Pj Zi d 5E2 nH.1}L,8:20,0;"Naechste Drehung? (w,s,l+1 o. 2)" xa$ b$=a$(1) b$="h" rcf=(a$(2))-480 !b$"w"b$"s"B$"l"110n $rcf<1rcf>2110n 520,0;"Wieviel Drehungen? (1,2 oder 3)" n n<1n>3180 b$="w"260 b$="s"3106 b$="l"360h 1E3 110n ro=rcf  k=1n  12E2 "k , 6co=rcf @ k=1n J 14E2x Tk ^ hfa=rcf r k=1n | 1600@ k   sw=0 sw=sw+1 sw>2700 ro=(*2)+1 &n=(*3)+1 0 k=1n : 1200 Dk Nco=(*2)+1 Xn=(*3)+1 b k=1n l 1400x vk fa=(*2)+1 n=(*3)+1  k=1n  1600@ k  520  800   1000   S:.2~L,8:.2~L,2:4:.2~L,8:.2~L,2 !"t$="Spectrum's CUBE":9530:% "i=0524 $i,28+i &i (i=060< *524+i,80P ,i .i=0568 0112p-i,80P-i 2i 4i=060< 6568-i,24 8i :i=071G <0,24+i >i @i=067C B524,80P+i Di Fi=067C H112p,80P+i Ji Li=060< N524+i,148 Pi Ri=0524 Ti,96`+i Vi X4,0;"LINKS" Z19,0;"UNTEN" \2,8;"HINTEN" i=064@ 128+i,24 i i=067C 128,24+i i i=064@ 128+i,92\ i i=067C 192,24+i i i=0524 127+i,92\+i i i=0524 192+i,92\+I i i=0502 194+i,26+i i i=064@ 180+i,144 i i=067C 244,76L+i i 17,26;"RECHTS" 19,18;"VORNE" 2,24;"OBEN" i=120x1682  i,146 i i=68D116t2  i,24 i  210 ,1;c$(1,x(3,5)) 16,5;c$(1,x(7,5)) 214,1;c$(1,x(1,5)) 210 ,5;c$(1,x(5,5)) 15,8;c$(1,x(7,4)) 25,12 ;c$(1,x(8,4)) 19 ,8;c$(1,x(5,4))  29 ,12 ;c$(1,x(6,4)) 217,2;c$(1,x(1,6)) 213 ,6;c$(1,x(5,6)) 217,6;c$(1,x(2,6)) 313 ,10 ;c$(1,x(6,6)) $28,19;c$(1,x(3,1)) )24,23;c$(1,x(7,1)) .28,23;c$(1,x(4,1)) 324,27;c$(1,x(8,1)) 8312 ,18;c$(1,x(3,2)) =312 ,22;c$(1,x(4,2)) B316,18;c$(1,x(1,2)) G316,22;c$(1,x(2,2)) L310 ,25;c$(1,x(4,3)) Q26,29;c$(1,x(8,3)) V314,25;c$(1,x(2,3)) [310 ,29;c$(1,x(6,3)) ` i=18 j=16 y(i,j)=x(i,j) j i w=2*(ro-1) +x(2+w,3)=y(1+w,2) +x(6+w,3)=y(2+w,2) +x(6+w,4)=y(2+w,3)  +x(5+w,4)=y(6+w,3) +x(5+w,5)=y(6+w,4) +x(1+w,5)=y(5+w,4) (+x(1+w,2)=y(5+w,5) 2+x(2+w,2)=y(1+w,5) <ro=1su=6 Fro=2su=1 P!x(2+w,su)=y(1+w,su) Z!x(6+w,su)=y(2+w,su) d!x(5+w,su)=y(6+w,su) n!x(1+w,su)=y(5+w,su) s yI=18 J=16 Y(I,J)=X(I,J) J I W=CO-1 +X(3+W,1)=Y(1+W,2) +X(7+W,1)=Y(3+W,2) +X(7+W,4)=Y(3+W,1) +X(5+W,4)=Y(7+W,1) +X(5+W,6)=Y(7+W,4) +X(1+W,6)=Y(5+W,4) +X(1+W,2)=Y(5+W,6) +X(3+W,2)=Y(1+W,6) CO=1SU=5 CO=2SU=3 !X(3+W,SU)=Y(1+W,SU) "!X(7+W,SU)=Y(3+W,SU) ,!X(5+W,SU)=Y(7+W,SU) 6!X(1+W,SU)=Y(5+W,SU) ; AI=18 JJ=16 TY(I,J)=X(I,J) ^J hI rW=4*(FA-1) |+X(3+W,1)=Y(1+W,5) +X(4+W,1)=Y(3+W,5) +X(4+W,3)=Y(3+W,1) +X(2+W,3)=Y(4+W,1) +X(2+W,6)=Y(4+W,3) +X(1+W,6)=Y(2+W,3) +X(1+W,5)=Y(2+W,6) +X(3+W,5)=Y(1+W,6) FA=1SU=2 FA=2SU=4 !X(3+W,SU)=Y(1+W,SU) !X(4+W,SU)=Y(3+W,SU) !X(1+W,SU)=Y(2+W,SU) !X(2+W,SU)=Y(4+W,SU)   :"Anweisungen? (j/n)" f$= f$"j"f$"n"2010 f$="n"7 0:.2~L,2:7;"Spectrum's CUBE" C"Um den Wuerfel richtig zu ordnenmuessen Sie folgendes beachten:" :"Waagerechte Scheiben heissen >ws< Die vordere bzw. die hintere Lage wird mit >l< bezeichnet." :"Sie geben einfach den entsprech-enden Codebuchstaben zusammen mit der Zahl der jeweiligen Scheibe ein, also zum Beispiel: >w2< oder >s1<."  $"Dann noch die Zahl der Drehungen" "Welche Scheibe mit welcher Zahl bezeichnet wird, merken Sie schnellerwaehrend des Spiels, als es hier beschrieben werden koennte." "Viel Spass beim Tuefteln!" .21,0;"Druecken Sie eine Taste."  0:7 I=07:A "P"+I,A:I M170,85U,170,85U,170,85U,170,85U K=07:B "O"+K,B:K Q255,195,165,153,153,165,195,255 L=07:C "U"+L,C:L K24,36$,66B,129,129,66B,36$,24  %0 %:W=1:H=.5 %;$C+T$>32 T$=T$(32 -C) %D4X=C+16383?+32 *(L+568*(L/8)) %NECHARS=236066\+256*236077\:F=(L=7L=15) %X I=W̱T$ %]A=CHARS+8*T$(I) %bX=X+W %gJ=015 %l>X+256*J-(2016-1792*F)*(J>7),(A+J*H) %vJ:I: ya(>@b cFnwhx@har<fs1 *nTSpectrum's CUBEcBs