Home » Archimedes archive » Archimedes World » AW-1996-04-Disc2.adf » !ManiaDemo_MathMania » !ManiaDemo/!RunImage

!ManiaDemo/!RunImage

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Archimedes archive » Archimedes World » AW-1996-04-Disc2.adf » !ManiaDemo_MathMania
Filename: !ManiaDemo/!RunImage
Read OK:
File size: 704A bytes
Load address: 0000
Exec address: 0000
File contents
   10REM>ManiaDemo
   20ONERRORREPORT:PRINT" at line ";ERL:END
   30SYS&406c0:PROCOy:PROCt:ONERRORPROCI(ERR,REPORT$):PROCD
   40RJ%=FNK(V$):PROCv:PROCEy:PROCry:PROCn:PROCxy:PROC_y:SYS&406c1:ONERRORPROCI(ERR,REPORT$)
   50PROCUy:PROCD
   60DEFPROCOy:LOCALH_%:H_%=2560:DIMF%H_%:DIMM%H_%:DIMBJ%256:DIM`_%2048:Uy%=`_%:Fy%=`_%+2048:DIMzy%1280:DIMZJ%80:DIMU 8:DIMG 4:DIMC$(30),A%(60),P%(6,25,25),M$(6,4),S$(5,100):DIMJ$(5,100),F%(5,100),F$(3),K%(8),Y%(8),X%(8),C%(5,100):DIMq%(3,7),M%(12),_%(3),D%(2),E%(25,25),P$(9)
   70DIMZ%(9,3),A$(40),Z$(40):DIMV%(5),O%(5),B$(5),W$(5),L%(4),T%(10,2):DIMN%(4),H%(4),U%(8),a%(8),E(8),G%(8):DIMI%(5,5),R%(25),Q%(25,1):DIME$(5,5):MJ%=4096:DIMu%MJ%:i%=35:FORpy%=u%TOu%+100:$py%=CHR$(0):NEXT:$u%="NO RESULTS DATA CURRENTLY RECORDED"+CHR$(10):ENDPROC
   80DEFPROCt:m$="!maniademo":V$="Mathmania Demo":n$="Maths Puzzles":g$="�1994 Martin Goldberg":j$="Version 1.00, 28th Dec 1994":T$=FNG("Obey$Dir"):O$=T$+".choices":k$=T$+".highs":s_%=0:H%=0:GJ%=-2:Yy%=4:xy%=1:j_%=64:u_%=16:EJ%=2:b_%=0:G_%=0:W_%=FALSE
   90V=TRUE:O=FALSE:C%()=0:D%=0:C%=1:J%=1:m_%=0:i_%=0:X=FALSE:T=RND(-TIME):T%=1:B=FALSE:k%=0:w$="NO":b%=0:g%=0:U%=3:Q%=3:U!0=149:U!4=-1:I=FALSE:L=FALSE:My%=0:g=FALSE:M$(1,1)="01020405100010":M$(1,2)="0203040506070809100020":M$(1,3)="0304050607080910111215203040500100"
  100M$(1,4)="0304050607080910111215203040501314161718190500":FORE%=188TO208:v$=v$+CHR$(E%):NEXTE%:Cy$="191817161529142713384912473558233479455678":o%=0:c%=52:Z%()=0:_y%=0:jy%=0:ry%=0:y%=FALSE:S$()="":J$()="":F%()=0:K=OPENUP(T$+".QuesBase"):FORZ%=1TO1:INPUT#K,F%(Z%,0):E%=1:REPEAT
  110INPUT#K,S$(Z%,E%),J$(Z%,E%),F%(Z%,E%):E%+=1:UNTILS$(Z%,E%-1)="ZZZ":NEXTZ%:CLOSE#K:w=OPENUP(T$+".mazes"):FORJ%=1TO1:FORE%=1TO22:INPUT#w,C$(E%):NEXT:FORZ%=1TO22:FORE%=1TO22:Z$=MID$(C$(Z%),E%,1):IFZ$>"@"THEN
  120P%(J%,E%,Z%)=ASC(Z$)-55
  130ELSE:P%(J%,E%,Z%)=VAL(MID$(C$(Z%),E%,1))
  140ENDIF:NEXT:NEXT:NEXT:CLOSE#w:R=OPENUP(T$+".highs"):Cy%=0:FORZ%=0TO3:FORE%=1TO10:x$="":Q$="":REPEAT:Cy%=BGET#R:x$+=CHR$(Cy%-10):UNTILCy%=54:REPEAT:Cy%=BGET#R:Q$+=CHR$(Cy%-10):UNTILCy%=54:A$(Z%*10+E%)=LEFT$(x$):Z$(Z%*10+E%)=LEFT$(Q$):NEXTE%:NEXTZ%:CLOSE#R:y_%=0:U_%=1:Gy%=2:YJ%=TRUE:HJ%=1024:ENDPROC
  150DEFPROCv:OJ%=FNI(m$,"RIGHT"):ENDPROC
  160DEFPROCEy:PROCXy:ENDPROC
  170DEFPROCry:AJ%=FNS("<Temp$Dir>","info%",Uy%,Fy%):dy%=FNS("<Temp$Dir>","highs%",Uy%,Fy%):s%=FNS("<Temp$Dir>","saveit%",Uy%,Fy%):I%=FNS("<Temp$Dir>","choice%",Uy%,Fy%):q%=FNS("<Temp$Dir>","result%",Uy%,Fy%):m%=FNS("<Temp$Dir>","welcome%",Uy%,Fy%):ENDPROC
  180DEFPROCsy:LOCALI$,xJ%,E%,a$:I$="":T=FNH(O$,zy%,256):FORE%=0TO11:I$+=CHR$(zy%?E%):NEXTE%:FORE%=2TO5:PROCS(I%,E%,0):IFMID$(I$,E%-1,1)="1"THENPROCS(I%,E%,1)
  190NEXTE%:FORE%=7TO10:IFMID$(I$,E%-2,1)="1"THENPROCS(I%,E%,1)
  200NEXTE%:IFVAL(MID$(I$,9,1))=1THENPROCS(I%,18,1)
  210IFVAL(MID$(I$,10,1))=1THENPROCS(I%,21,1)
  220IFVAL(MID$(I$,11,1))=1THENPROCS(I%,25,1)
  230a$=RIGHT$(I$,1):PROCA(I%,13,a$):IFFNE(I%,25)THENy%=TRUE
  240ENDPROC
  250DEFPROCn:PROCsy:ENDPROC
  260DEFPROCxy:PROCAy(AJ%,V$,n$,g$,j$):ENDPROC
  270DEFPROC_y:PROCNy(T$+".menus"):ENDPROC
  280DEFPROCUy:REPEAT:SYS&400e1,b_%,F%,G_%TOSJ%:CASESJ%OF
  290WHEN0:PROCr
  300WHEN2:PROCh
  310WHEN3:Ly%=!F%:PROCP(Ly%)
  320WHEN6:PROCVy
  330WHEN7:PROCi
  340WHEN8:PROCgy
  350WHEN9:PROCfy
  360WHEN17:PROCH
  370WHEN18:PROCH
  380WHEN19:PROCu
  390ENDCASE:UNTILW_%:*RMKILL SFX-1
  400*RMKILL SFX-2
  410*RMKILL SFX-3
  420*RMKILL SFX-4
  430*RMKILL SFX-5
  440OSCLI("*RMKILL SFX-6��"):PROCT:PROCD:ENDPROC
  450DEFPROCr:SYS66TOG_%:G_%+=100:ENDPROC
  460DEFPROCh:SYS&400c5,,F%:ENDPROC
  470DEFPROCP(Ly%):!F%=Ly%:SYS&400c6,,F%:ENDPROC
  480DEFPROCVy:n_%=F%!0:IJ%=F%!4:sy%=F%!8:X%=F%!12:V%=F%!16:CASEX%OF
  490WHENGJ%:PROCy
  500WHENI%:PROCty
  510WHENq%:PROCJy
  520WHENs%:PROCp
  530WHENdy%:PROCo
  540ENDCASE:ENDPROC
  550DEFPROCi:LOCALLy%,by%,W%,B%,q$,Ty%,wy%,t_%:SYS&400cf,,F%:W%=F%!0:B%=F%!4:Ly%=F%!12:by%=F%!16:CASEe_%OF
  560WHENs%:IFi%>0THEN
  570q$=FNW(FNZ(s%,U_%)):PROCG:Ty%=u%:wy%=i%:t_%=FNP(s%,Gy%):PROCTy(Ly%,by%,W%,B%,q$,Ty%,wy%,t_%)
  580ENDIF
  590ENDCASE:ENDPROC
  600DEFPROCgy:LOCALX%,V%,ay%,D$,Wy$:X%=F%!0:V%=F%!4:ay%=F%!24:CASEX%OF
  610WHENs%:PROCWy(ay%,V%)
  620WHENm%:PROCPy(ay%)
  630OTHERWISE:SYS&400dc,ay%
  640ENDCASE:ENDPROC
  650DEFPROCfy:LOCALl$,u$:l$=FN_(gy%,F%):u$=FNW(l$):CASEgy%OF
  660WHENS%(1):PROCDy(u$)
  670ENDCASE:SYS&400cf,,F%:IFF%!8=1SYS&400d4,,gy%,z_%,a_%
  680ENDPROC
  690DEFPROCH:LOCALFJ%:FJ%=F%!16:CASEFJ%OF
  700WHEN0:W_%=TRUE
  710WHEN2:PROCyy
  720WHEN6:PROCKy
  730WHEN4:PROCJ
  740ENDCASE:ENDPROC
  750DEFPROCu:CJ%=F%!16:CASECJ%OF
  760WHEN6:IFNJ%THEN
  770IFXJ%THEN
  780PROCC("Data transfer to another task failed!",V$)
  790ELSE:PROCYy
  800ENDIF
  810ENDIF
  820WHEN7:PROCC("Data transfer failed!",V$)
  830ENDCASE:ENDPROC
  840DEFPROCo:CASEsy%OF
  850WHENYy%,xy%:CASEV%OF
  860WHEN32,33,34,35:PROCY
  870WHEN36:PROCT
  880WHEN37:PROCP(X%)
  890ENDCASE
  900ENDCASE:ENDPROC
  910DEFPROCY:LOCALT%:FORE%=1TO4:IFFNE(dy%,E%+31)THENT%=E%-1
  920NEXTE%:FORE%=0TO9:PROCA(dy%,2+E%*3,A$(10*T%+E%+1)):PROCA(dy%,3+E%*3,Z$(10*T%+E%+1)):NEXTE%:ENDPROC
  930DEFPROCJy:CASEsy%OF
  940WHENYy%,xy%:CASEV%OF
  950WHEN51:PROCP(X%)
  960ENDCASE
  970ENDCASE:ENDPROC
  980DEFPROCty:LOCALM_%,E%:M_%=0:FORE%=1TO4:IFFNE(I%,E%+6)THENM_%+=1
  990NEXTE%:CASEsy%OF
 1000WHENYy%,xy%:CASEV%OF
 1010WHEN1:IFM_%=1ANDNOTFNE(I%,V%)THEN
 1020VDU7
 1030ENDIF
 1040WHEN7,8,9,10:IFNOTFNE(I%,V%)ANDM_%=0THEN
 1050VDU7:PROCS(I%,V%,1)
 1060ENDIF
 1070WHEN12:PROCP(X%)
 1080WHEN25:y%=FALSE:IFFNE(I%,25)THENy%=TRUE
 1090ENDCASE
 1100ENDCASE:ENDPROC
 1110DEFPROCy:CASEsy%OF
 1120WHENEJ%:My$="icon_bar":gy%=S%(1):z_%=n_%-64:a_%=FNR(S%(1))+96:SYS&400d4,,gy%,z_%,a_%
 1130WHENYy%,xy%:IFVTHEN
 1140PROCQ(m%):IFFNM(1)<>"Player's Name"THEN
 1150PROCA(m%,3,FNM(1)):PROCz(m%,3,LEN(FNM(1)))
 1160ELSE:PROCA(m%,3,""):PROCz(m%,3,0)
 1170ENDIF
 1180ELSE:PROCL
 1190ENDIF
 1200ENDCASE:ENDPROC
 1210DEFPROCp:CASEsy%OF
 1220WHENYy%,xy%:IFV%=y_%THEN
 1230D$=FNZ(s%,U_%):Jy%=FNP(s%,Gy%):IFINSTR(D$,".")THEN
 1240PROCG:PROCW(D$,Jy%,u%,i%):PROCJ
 1250ELSE:PROCC("Drag the file to a directory display.",V$)
 1260ENDIF
 1270ENDIF
 1280WHENj_%,u_%:IFV%=Gy%THEN
 1290DJ%=Gy%:e_%=s%:PROCc(s%,Gy%)
 1300ENDIF
 1310ENDCASE:ENDPROC
 1320DEFPROCDy(B$):p$=FNQ(F%):CASEp$OF
 1330WHEN"1":PROCQ(I%)
 1340WHEN"2.0":PROCQ(q%)
 1350WHEN"3":PROCY:PROCQ(dy%)
 1360WHEN"5":W_%=TRUE
 1370ENDCASE:ENDPROC
 1380DEFPROCPy(ay%):CASEay%OF
 1390WHEN13:K$=FNZ(m%,3):IFK$=""THEN
 1400PROCC("A name must be given to play!",V$)
 1410ELSE:PROCk(1,K$):PROCP(m%):PROCL
 1420ENDIF
 1430ENDCASE:ENDPROC
 1440DEFPROCWy(ay%,V%):LOCALD$,Jy%:CASEay%OF
 1450WHEN13:D$=FNZ(s%,U_%):Jy%=FNP(s%,Gy%):IFINSTR(D$,".")THEN
 1460PROCG:PROCW(D$,Jy%,u%,i%):PROCJ
 1470ELSE:PROCC("Drag the file to a directory display.",V$)
 1480ENDIF
 1490ENDCASE:ENDPROC
 1500DEFPROCG:v%=0:G$=CHR$(10):E$="           Performance Indicator From Mathmania"+G$+G$:E$+="Player: "+FNM(1)+"      Achieved at an average level of: "+FNZ(q%,49)+G$+G$:E$+="OPERATORS          RIGHT  WRONG  PERCENT"+G$+G$:i%=LEN(E$):$u%=E$:v%+=LEN(E$):E$=FNA(2,4)
 1510E$+=FNA(3,4):E$+=FNA(4,4):E$+=FNA(5,4)+G$:i%+=LEN(E$):$(u%+v%)=E$:v%+=LEN(E$):E$="SUBJECTS           RIGHT  WRONG  PERCENT"+G$+G$:E$+=FNA(23,5):E$+=FNA(24,5):E$+=FNA(25,5):E$+=FNA(26,5):E$+=FNA(27,5):i%+=LEN(E$):$(u%+v%)=E$:v%+=LEN(E$):ENDPROC
 1520DEFFNA(l_%,ey%):LOCALY$:S$="":S$=FNZ(q%,l_%):WHILELEN(S$)<>17:S$+=".":ENDWHILE:FORE%=1TO3:Y$="":S$+="  ":Y$=FNZ(q%,l_%+E%*ey%):WHILELEN(Y$)<5:Y$=" "+Y$:ENDWHILE:S$+=Y$:NEXTE%:S$+=G$:=S$
 1530DEFPROCyy:LOCALD$,Jy%:D$=FNJ(F%+44,255):IFF%!36=-1THENx_%=FALSEELSEx_%=TRUE
 1540Jy%=F%!40:CASEe_%OF
 1550WHENs%:PROCG:PROCW(D$,Jy%,u%,i%):PROCZy:IFx_%PROCA(s%,1,D$)
 1560ENDCASE:PROCJ:ENDPROC
 1570DEFPROCI(!BJ%,W$):s_%+=1:IFs_%>5:ERROREXT0,"Too Many Errors!"
 1580IFERR<200W$+=" at line "+STR$(ERL)
 1590IFERR=200W$="*** Error in menu file! *** "+W$
 1600IFERR=201W$="***     Menu error      *** "+W$
 1610IFERR=202W$="***     Icon error      *** "+W$
 1620IFERR=203W$="***     File error      *** "+W$
 1630IFERR=204W$="***    Window error     *** "+W$
 1640SYS&2000d,0,H%:SYS&600da:$(BJ%+4)=W$:SYS&400df,BJ%,1,V$:ENDPROC
 1650DEFPROCD:SYS&400dd:END:ENDPROC
 1660DEFPROCT:WHILEO:v%=0:FORZ%=0TO3:FORE%=1TO10:F$=A$(10*Z%+E%):IFINSTR(F$,CHR$(160))<>0THEN
 1670F$=RIGHT$(LEFT$(F$),LEN(F$)-2)
 1680ENDIF:F$+=",":F$+=Z$(10*Z%+E%):F$+=",":$(zy%+v%)=F$:v%+=LEN(F$):NEXTE%:NEXTZ%:FORZ%=zy%TOzy%+v%:?Z%=?Z%+10:NEXTZ%:PROCW(k$,4093,zy%,v%):O=FALSE:ENDWHILE:ENDPROC
 1690DEFPROCL:r_%=135:uy%=0:v_%=0:SYS6,r_%TOr_%,uy%,v_%:SYS&400e5,,ZJ%:MODE15:MODE13:SYS54:*fx200,3
 1700Z=FALSE:IFVTHEN
 1710PROCGy:PROCdy:PROCm:V=FALSE
 1720ENDIF:VDU19,1,24,214,144,78:W%=196:B%=838:E=1:A=1:IFK$<>FNM(1)THEN
 1730K$=FNM(1):o%=0:_y%=0:jy%=0:ry%=0:Z%()=0:g=TRUE:FORE%=1TO40:IFINSTR(A$(E%),CHR$(160))<>0THEN
 1740A$(E%)=RIGHT$(LEFT$(A$(E%)),LEN(A$(E%))-2)
 1750ENDIF:NEXTE%
 1760ENDIF:PROCx:PROCj:IFNOTy%THEN
 1770PROCB:WHILENOTZ:PROCZ(W%,B%,E,A):PROCby:ENDWHILE
 1780ENDIF:IFy%THEN
 1790WHILENOTZ:PROCB:ENDWHILE
 1800ENDIF:PROCIy:ENDPROC
 1810DEFPROCIy:SYS&400e3,v_%:SYS&400e4,,ZJ%:FORE%=2TO5:PROCS(I%,E%,0):NEXTE%:PROCS(I%,T%+1,1):OSCLI("*alphabet latin1"):PROCA(q%,52,FNM(1)):FORE%=6TO9:PROCA(q%,E%,STR$(Z%(E%-5,1))):PROCA(q%,E%+4,STR$(Z%(E%-5,2))):NEXTE%:FORE%=14TO17:IFZ%(E%-13,1)+Z%(E%-13,2)>0THEN
 1820_=(Z%(E%-13,1)/(Z%(E%-13,1)+Z%(E%-13,2)))*100:PROCA(q%,E%,STR$(INT(_)))
 1830ELSE:PROCA(q%,E%,"0")
 1840ENDIF:NEXTE%:FORE%=28TO32:PROCA(q%,E%,STR$(Z%(E%-23,1))):PROCA(q%,E%+5,STR$(Z%(E%-23,2))):NEXTE%:FORE%=38TO42:IFZ%(E%-33,1)+Z%(E%-33,2)>0THEN
 1850_=(Z%(E%-33,1)/(Z%(E%-33,1)+Z%(E%-33,2)))*100:PROCA(q%,E%,STR$(INT(_)))
 1860ELSE:PROCA(q%,E%,"0")
 1870ENDIF:NEXTE%:_$="???":IF(_y%+jy%)>0THEN
 1880b=ry%/(_y%+jy%):_$=LEFT$(STR$(b),3)
 1890ENDIF:PROCA(q%,49,_$):`%=VAL(_$):IFRIGHT$(_$,1)>="5"THEN`%+=1
 1900IFo%>VAL(Z$((`%-1)*10+10))THEN
 1910Oy%=0:REPEAT:Oy%+=1:UNTILINSTR(A$((`%-1)*10+Oy%),CHR$(160))<>0OROy%=10:Z$((`%-1)*10+Oy%)=STR$(o%):A$((`%-1)*10+Oy%)=CHR$(160)+K$+CHR$(160):E%=1:REPEAT:s=TRUE:FORZ%=(`%-1)*10+1TO(`%-1)*10+10-E%:IFVAL(Z$(Z%))<VAL(Z$(Z%+1))THEN
 1920SWAPZ$(Z%),Z$(Z%+1):SWAPA$(Z%),A$(Z%+1):s=FALSE
 1930ENDIF:NEXTZ%:E%+=1:UNTILs:O=TRUE
 1940ENDIF:*fx 15,0
 1950VOICE1,"WaveSynth-Beep":ENDPROC
 1960DEFPROCN:FORE%=1TO2:SYS6,112,E%:SYS46,290,S%,"title",140,840,8:NEXTE%:ENDPROC
 1970DEFPROCby
 1980IFZTHENENDPROC
 1990REPEAT:C%=0:a%=0:F=0:_%=0:C=0
 2000IFINKEY-42ANDC%=0ANDA<18_%=16:C=.125:C%=1
 2010IFINKEY-58ANDC%=0ANDA>1_%=-16:C=-.125:C%=2
 2020IFINKEY-26ANDC%=0ANDE>1a%=+16:F=-.125:C%=3
 2030IFINKEY-122ANDC%=0ANDE<18a%=-16:F=.125:C%=4
 2040IFINKEY-67PROCB:C%=0:IFZTHENC%=1
 2050IF(C%=4ORC%=3)ANDNOTFNOTHENC%=0
 2060IF(C%=2ORC%=1)ANDNOTFNqTHENC%=0
 2070IFC%<>0B%+=_%:W%+=a%:E+=F:A+=C
 2080UNTILC%<>0:ENDPROC
 2090DEFPROCHy:z%=0:FORE%=1TO25:FORZ%=1TO25:CASEE%(Z%,E%)OF
 2100WHEN1,42,43,44,45,46:E%(Z%,E%)=30:z%=1
 2110WHEN30:IFz%=0E%(Z%,E%)=1
 2120ENDCASE:NEXT:NEXT:C%=1:PROCZ(W%,B%,E,A):ENDPROC
 2130DEFFNO:LOCALW%,cy%:cy%=0:W%=688:IFC%=3W%=592
 2140FORE%=476TO544STEP4:IFPOINT(W%,E%)=63IFTINT(W%,E%)=64cy%+=1
 2150NEXTE%:IFcy%<1=TRUEELSE=FALSE
 2160=FALSE
 2170DEFFNq:LOCALB%,cy%:cy%=0:B%=468:IFC%=2B%=556
 2180FORE%=604TO672STEP4:IFPOINT(E%,B%)=63IFTINT(E%,B%)=64cy%+=1
 2190NEXTE%:IFcy%<1=TRUEELSE=FALSE
 2200=FALSE
 2210DEFPROCZ(RETURNW%,RETURNB%,RETURNE,RETURNA):LOCALQJ%:QJ%=C%+My%*4:v=INT(A):f=INT(E):J%=3-J%:SYS6,112,J%:VDU24,324;198;960;834;:FORZ%=vTOv+5:FORE%=fTOf+5:L_%=E%(E%,Z%):SYS46,546,S%,A%(L_%),W%+128*E%,B%-Z%*128,0:NEXTE%:NEXTZ%:SYS46,546,S%,M%(QJ%),576,448,8:IFNOTXSYS6,113,J%
 2220U%=INT(E+.5)+2:Q%=INT(A+.5)+2:VDU26:PROCe:ENDPROC
 2230DEFPROCcy:IFZTHENENDPROC
 2240PROCN:WAIT:SYS6,113,1:J%=2:Qy%=16:SYS6,112,J%:FORZ%=1TO5:FORE%=1TO5:L_%=E%(E%,Z%):SYS46,546,S%,A%(L_%),W%+128*E%,B%-Z%*128,0:NEXTE%:NEXTZ%:MOVE320,192:MOVE960,832:SYS46,256+14,S%,"box":VDU24,320;192;960;832;:FORa%=2TO7:FOR_%=1TO6:SYS46,546,S%,A%(c%),a%*128,_%*128,0:NEXT:NEXT:VDU26:GCOL2,0:TINT2,0
 2250REPEAT:SYS6,112,J%:SYS46,290,S%,"box",320,192,3:RECTANGLEFILL640-Qy%,512-Qy%,Qy%*2,Qy%*2:SYS46,290,S%,"box",320,192,3:SYS6,113,J%:WAIT:Qy%+=16:J%=3-J%:UNTILQy%=320:SYS6,112,J%:SYS46,290,S%,"box",320,192,0:SYS46,546,S%,M%(1+My%*4),576,448,8:SYS6,113,J%:PROCF:ENDPROC
 2260DEFPROCe:IFE%(U%,Q%)=0ANDNOTBTHENENDPROC
 2270IFE%(U%,Q%)=7AND(C%=1ORC%=2)THEN
 2280VOICE1,"SFX-1":SOUND1,-15,4000,1:PROCa:IFVAL(e$)=VAL(E$)THEN
 2290VOICE1,"SFX-6��":SOUND1,-15,4000,1:B=TRUE:M=INKEY(5):E%(U%,Q%)=9:PROCZ(W%,B%,E,A):E%(U%,Q%)=8:M=INKEY(5):PROCZ(W%,B%,E,A):b%+=1:PROCF:C%=0
 2300ELSE:g%+=1:PROCF:C%=0
 2310ENDIF
 2320ENDIF:IFE%(U%,Q%)=13AND(C%=3ORC%=4)THEN
 2330VOICE1,"SFX-1":SOUND1,-15,4000,1:PROCa:IFVAL(e$)=VAL(E$)THEN
 2340VOICE1,"SFX-6��":SOUND1,-15,4000,1:B=TRUE:M=INKEY(5):E%(U%,Q%)=12:PROCZ(W%,B%,E,A):E%(U%,Q%)=11:M=INKEY(5):PROCZ(W%,B%,E,A):b%+=1:PROCF:C%=0
 2350ELSE:g%+=1:PROCF:C%=0
 2360ENDIF
 2370ENDIF:IFC%=1ANDE%(U%,Q%-1)=8THEN
 2380VOICE1,"SFX-2":SOUND1,-15,4000,1:B=FALSE:M=INKEY(5):E%(U%,Q%-1)=9:PROCZ(W%,B%,E,A):E%(U%,Q%-1)=7:M=INKEY(5):PROCZ(W%,B%,E,A)
 2390ENDIF:IFC%=2ANDE%(U%,Q%+1)=8THEN
 2400VOICE1,"SFX-2":SOUND1,-15,4000,1:B=FALSE:M=INKEY(5):E%(U%,Q%+1)=9:PROCZ(W%,B%,E,A):E%(U%,Q%+1)=7:M=INKEY(5):PROCZ(W%,B%,E,A)
 2410ENDIF:IFC%=4ANDE%(U%-1,Q%)=11THEN
 2420VOICE1,"SFX-2":SOUND1,-15,4000,1:B=FALSE:M=INKEY(5):E%(U%-1,Q%)=12:PROCZ(W%,B%,E,A):E%(U%-1,Q%)=13:M=INKEY(5):PROCZ(W%,B%,E,A)
 2430ENDIF:IFC%=3ANDE%(U%+1,Q%)=11THEN
 2440VOICE1,"SFX-2":SOUND1,-15,4000,1:B=FALSE:M=INKEY(5):E%(U%+1,Q%)=12:PROCZ(W%,B%,E,A):E%(U%+1,Q%)=13:M=INKEY(5):PROCZ(W%,B%,E,A)
 2450ENDIF:IFE%(U%,Q%)=6THEN
 2460SOUND2,-15,101,4:k%+=1:E%(U%,Q%)=0:PROCZ(W%,B%,E,A):PROCF
 2470ENDIF:IFE%(U%,Q%)=29THEN
 2480SOUND2,-15,101,4:w$="YES":E%(U%,Q%)=0:PROCZ(W%,B%,E,A):PROCF
 2490ENDIF:IFE%(U%,Q%)=10ANDw$="YES"ANDE=INT(E)ANDA=INT(A)AND(k%+b%-g%)>=10+2*(D%+T%)THEN
 2500VOICE1,"SFX-3":SOUND1,-15,4000,1:PROCU
 2510ENDIF:ENDPROC
 2520DEFPROCa:LOCALe%:f%=40:Hy%=2:ry%+=T%:*FX15,0
 2530n%=RND(2):IFNOTITHENn%=2
 2540SYS46,290,S%,"askb",20,20,0:WAIT:SYS6,112,3-J%:SYS46,290,S%,"askb",20,20,0:WAIT:SYS6,112,J%:IFn%=1THEN
 2550PROCg:e$=STR$D_%:E$=STR$oy%:jy%+=1
 2560ELSE:IFn%=2THEN
 2570PROCBy(Z$,E$):PROCw(Z$,E$,f%):PROCzy(e$):_y%+=1
 2580ENDIF
 2590ENDIF:ENDPROC
 2600DEFPROCg:P$="":PROCCy:PROCuy:GCOL0,0TINT0:IFD_%=oy%THENPROCX
 2610MOUSEOFF:ENDPROC
 2620DEFPROCuy:*fx4,1
 2630GCOL3,3TINT192:x%=76:G%=260:RECTANGLEFILL60,x%,380,-32:REPEAT:C$=INKEY$(5):IFC$=CHR$(136)ANDG%>260THEN
 2640RECTANGLEFILLG%-200,x%,380,-32:G%=G%-400:RECTANGLEFILLG%-200,x%,380,-32
 2650ENDIF:IFC$=CHR$(137)ANDG%<1060THEN
 2660RECTANGLEFILLG%-200,x%,380,-32:G%=G%+400:RECTANGLEFILLG%-200,x%,380,-32
 2670ENDIF:UNTILINKEY-74:D_%=G%:FORE%=1TO10:RECTANGLEFILLG%-200,x%,380,-32:T=INKEY(6):NEXTE%:SYS46,290,S%,"askb",20,20,0:IFoy%=D_%THEN
 2680SYS46,290,S%,"correct",408,40,0:Z%(r%+4,1)+=1:J=TIME:REPEATUNTILTIME-J>200
 2690ELSE:SYS46,290,S%,"wrong",454,40,0:Z%(r%+4,2)+=1:J=TIME:REPEATUNTILTIME-J>200:PROCV:SYS6,112,3-J%:SYS46,290,S%,"askb",20,20,0
 2700ENDIF:*fx4,0
 2710ENDPROC
 2720DEFPROCCy:GCOL0,63TINT192:r%=D%:IFr%=6THENr%=RND(5)
 2730x%=148:G%=40:F_%=0:REPEAT:REPEAT:n%=RND(F%(r%,0)):X$=S$(r%,n%):UNTILINSTR((STR$(F%(r%,n%))),STR$(T%))>0:F_%+=1:IFF_%>200THEN
 2740FORE%=1TO100:C%(r%,E%)=0:NEXTE%:F_%=0
 2750ENDIF:UNTILC%(r%,n%)=0:C%(r%,n%)=1:WHILELEN(X$)>0:P$="":REPEAT:P$=P$+LEFT$(X$,1):X$=RIGHT$(X$,LEN(X$)-1):UNTILRIGHT$(P$,1)=" "ORLEN(X$)=0:vy%=LEN(P$):G%+=vy%*32:IFG%>40+37*32THEN
 2760X$=P$+X$:x%-=36:G%=40:P$=""
 2770ENDIF:G%-=vy%*32:IFG%=40ANDLEFT$(P$,1)=" "THENP$=RIGHT$(P$,vy%-1)
 2780MOVEG%,x%:PRINTP$:G%+=vy%*32:ENDWHILE:G%=60:x%=76:Z$=J$(r%,n%):C$="":FORE%=1TO3:GCOL0,27TINT192:MOVEG%,x%:PRINTCHR$(96+E%)+")":WHILELEFT$(Z$,1)<>","ANDZ$<>"":C$+=LEFT$(Z$,1):Z$=RIGHT$(Z$,LEN(Z$)-1):ENDWHILE:IFLEN(Z$)>0THENZ$=RIGHT$(Z$,LEN(Z$)-1)
 2790F$(E%)=C$:G%+=400:C$="":NEXTE%:E%=1:G%=32:GCOL0,12TINT192:REPEAT:iy%=RND(3):IFF$(iy%)<>""THEN
 2800MOVEG%+96,x%:PRINTF$(iy%):IFiy%=1THENoy%=G%+200+28
 2810E%+=1:G%+=400:F$(iy%)=""
 2820ENDIF:UNTILE%=4:ENDPROC
 2830DEFPROCw(Z$,E$,_J%):e%=360-((LEN(Z$)+LEN(E$))/2)*52:IFHy%=0THENe%=640-((LEN(Z$)+LEN(E$))/2)*52
 2840FORE%=1TOLEN(Z$):z%=ASC(MID$(Z$,E%,1)):CASEz%OF
 2850WHEN43:z%=65
 2860WHEN45:z%=66
 2870WHEN42:z%=67
 2880WHEN47:z%=68
 2890WHEN61:z%=69
 2900ENDCASE:SYS46,546,S%,A%(z%-34),e%,_J%,0:e%+=52:NEXTE%:ENDPROC
 2910DEFPROCzy(RETURNJ$):*fx15,0
 2920J$="":C$="":REPEAT:SYS46,546,S%,A%(38),e%,f%,0:REPEAT:C$=INKEY$(5):IFC$<>""ANDC$>="0"ANDC$<="9"ANDLEN(J$)<4THEN
 2930z%=ASC(C$):SYS46,546,S%,A%(z%-34),e%,f%,0:J$=J$+C$:e%+=52:SYS46,546,S%,A%(38),e%,f%,0
 2940ENDIF:IFINKEY(-90)ANDLEN(J$)>0THEN
 2950SYS46,546,S%,A%(38),e%,f%,3:e%-=52:SYS46,546,S%,A%(38),e%,f%,0:J$=LEFT$(J$):*fx15,0
 2960ENDIF:UNTILC$=CHR$(13)ANDJ$<>"":IFVAL(J$)=VAL(E$)THEN
 2970SYS46,290,S%,"correct",728,f%,8:IFL$="+"THENZ%(1,1)+=1
 2980ELSE:IFHy%>1THEN
 2990Hy%-=1:e%-=52*LEN(J$):GCOL0,0TINT0:RECTANGLEFILLe%,f%,52*(LEN(J$)+1),108:J$="":SYS46,290,S%,"again",660,f%,8
 3000ELSE:SYS46,290,S%,"wrong",774,f%,8:IFL$="+"THENZ%(1,2)+=1
 3010Hy%=0
 3020ENDIF
 3030ENDIF:M=INKEY(100):IFVAL(J$)<>VAL(E$)THEN
 3040GCOL0,0TINT0:RECTANGLEFILL680,36,560,120
 3050ENDIF:UNTILHy%=0ORVAL(J$)=VAL(E$):GCOL0,0TINT0:IFVAL(J$)=VAL(E$)THENPROCX
 3060IFHy%=0THEN
 3070SYS46,290,S%,"askb",20,20,0:PROCw(LEFT$(Z$+E$),"",40):M=INKEY(200):PROCX:PROCV:SYS6,112,3-J%
 3080ENDIF:ENDPROC
 3090DEFPROCX:FORE%=96TO36STEP-2:RECTANGLEFILL40,E%,1200,(96-E%)*2:J=TIME:REPEATUNTILTIME-J>1:NEXTE%:ENDPROC
 3100DEFPROCV:X=TRUE:REPEAT:ny%=RND(17):P_%=RND(17):UNTILE%(ny%+2,P_%+2)=0:W%=196-(ny%-1)*128:B%=838+(P_%-1)*128:E=ny%:A=P_%:C%=1:PROCZ(W%,B%,E,A):VOICE1,"SFX-5":SOUND1,-15,2000,1:CALLN:X=FALSE:PROCZ(W%,B%,E,A):ENDPROC
 3110DEFPROCBy(RETURNX$,RETURNE$):LOCALy$,h$,Py$:O$=M$(1,T%):ky%=LEN(O$)/2-2:L$="+":IFL$="+"THEN
 3120y$=STR$(RND(VAL(RIGHT$(O$,4)))):h$=STR$(RND(VAL(RIGHT$(O$,4))))
 3130ENDIF:IFL$="+"THENX$=y$+L$+h$+"="
 3140E$=STR$(EVAL(LEFT$(X$)))+" ":ENDPROC
 3150DEFPROCF:IFZTHENENDPROC
 3160VDU5:PROCZ(W%,B%,E,A):Q$=STR$(o%+k%+b%-g%):b$="SCORE":IFVAL(Q$)<0THENQ$="B"+RIGHT$(Q$,LEN(Q$)-1)
 3170FORE%=1TO2:WAIT:SYS6,112,3-J%:WAIT:SYS46,290,S%,"askb",20,20,0:FORA_%=1TOLEN(Q$):JJ%=ASC(MID$(Q$,A_%,1))-34:SYS46,546,S%,A%(JJ%),640-(LEN(Q$)/2)*52+(A_%-1)*48,44,0:NEXTA_%:GCOL0,6TINT192:FORZ%=1TO5:MOVE300+Z%*36,108:PRINTMID$(b$,Z%,1):GCOL0,11TINT(Z%-1)*64:NEXTZ%:VDU24,1112;200;1276;800;:FOR_%=1TO7
 3180SYS46,546,S%,A%(c%),1152,_%*128,0:NEXT_%:PROCE(STR$(k%),1200,745,3,3):PROCE(w$,1200,625,3,3):PROCE(STR$(b%),1200,505,3,3):PROCE(STR$(g%),1200,385,3,3):PROCE(STR$(k%+b%-g%),1200,265,15,3):IFE%=1WAIT:SYS6,113,3-J%
 3190J%=3-J%:VDU26:NEXTE%:J%=3-J%:ENDPROC
 3200DEFPROCm:VOICES2:VOICE2,"WaveSynth-Beep":SOUNDON
 3210FORE%=1TO9:READP$(E%):NEXTE%:PROCx:FORE%=0TO46:PROCM(STR$E%,A%(E%)):NEXT:PROCM("back0",A%(52)):PROCM("back1",A%(53)):PROCM("back2",A%(54)):PROCM("back3",A%(55)):FORE%=0TO2:PROCM("down"+STR$(E%),M%(E%*4+1)):PROCM("up"+STR$(E%),M%(E%*4+2)):PROCM("left"+STR$(E%),M%(E%*4+3)):PROCM("right"+STR$(E%),M%(E%*4+4)):NEXTE%
 3220CALLP:!a=!H:SYS49,U,G:e=G!0:CALLP:!z=!H:SYS49,U,G:i=G!0:ENDPROC
 3230DEFPROCj:VDU23,185,4,12,228,4,14,0,0,0:VDU23,194,64,192,64,72,72,10,15,2:VDU23,199,64,192,64,78,66,14,8,14:VDU23,204,224,32,224,40,232,10,15,2:VDU23,203,224,32,224,135,225,7,1,7:VDU23,201,224,32,224,39,228,7,1,7:VDU23,206,128,128,160,247,36,7,1,7
 3240VDU23,195,224,32,224,135,225,1,2,4:VDU23,196,64,192,64,78,66,14,2,14:VDU23,200,128,128,160,247,33,1,2,4:VDU23,205,112,16,32,71,69,7,1,6:VDU23,198,128,128,160,247,37,7,1,6:VDU23,207,224,128,224,39,228,7,5,7:VDU23,188,64,192,64,78,74,14,2,12
 3250VDU23,197,224,32,224,39,229,7,5,7:VDU23,202,224,128,224,39,229,7,5,7:VDU23,208,224,32,32,71,133,7,5,7:VDU23,193,224,32,224,135,229,7,1,6:VDU23,190,64,192,64,78,66,2,4,8:VDU23,189,64,192,64,78,74,14,10,14:VDU23,192,64,192,64,78,72,14,2,14
 3260VDU23,191,64,192,64,78,72,14,10,14:VDU23,209,32,32,32,32,32,32,80,0:VDU23,210,2,2,2,98,130,130,101,0:VDU23,211,2,2,2,250,170,138,141,0:VDU23,212,0,0,3,126,54,54,54,0:ENDPROC
 3270DEFPROCFy:IFZTHENENDPROC
 3280FORE%=1TO2:CALLP:FORa%=0TO9:FOR_%=0TO7:SYS46,546,S%,A%(c%),a%*128,_%*128,0:NEXT:NEXT:SYS46,546,S%,A%(36),1000,672,8:SYS46,546,S%,A%(37),1000,550,8:SYS46,546,S%,A%(39),1050,475,8:SYS46,546,S%,A%(40),1050,350,8:SYS46,546,S%,A%(41),1000,245,8:PROCE("Level "+STR$(T%),160,750,3,3)
 3290PROCE("Maze "+STR$(D%),160,670,3,3):PROCE("TO EXIT",160,590,15,3):PROCE("YOU NEED",160,540,15,3):PROCE(STR$(10+2*(D%+T%)),160,490,15,3):SYS46,290,S%,"askb",20,20,0:NEXTE%:ENDPROC
 3300DEFPROCU:WAIT:VDU26:MOUSERECTANGLE0,0,1279,1023:c%=55:IFD%=1ORD%=4THENc%=53
 3310IFD%=2ORD%=6THENc%=54
 3320CALLP:FORa%=0TO9:FOR_%=0TO7:SYS46,546,S%,A%(c%),a%*128,_%*128,0:NEXT:NEXT:CALLN:FORa%=0TO9:FOR_%=0TO7:SYS46,546,S%,A%(c%),a%*128,_%*128,0:NEXT:NEXT:CALLP:MOVE1000,260:MOVE1200,310:SYS46,256+14,S%,"rubbox":o%+=k%+b%-g%:k%=0:b%=0:g%=0:J%=1:IFD%=6THEND%=RND(5)
 3330IFNOTy%THENry%+=T%:_y%+=1
 3340CASED%OF
 3350WHEN1:PROC`:PROCB
 3360ENDCASE:ENDPROC
 3370DEFPROCB:c%=52:MOUSEOFF:WAIT:CALLP:FORa%=0TO9:FOR_%=0TO7:SYS46,546,S%,A%(c%),a%*128,_%*128,0:NEXT:NEXT:CALLN:FORa%=0TO9:FOR_%=0TO7:SYS46,546,S%,A%(c%),a%*128,_%*128,0:NEXT:NEXT:WAIT:CALLP:IFNOTy%THENPROChyELSEPROCvy
 3380ENDPROC
 3390DEFPROChy:C%=1:J%=1:m_%=0:i_%=0:X=FALSE:W%=196:B%=838:E=1:A=1:B=FALSE:k%=0:w$="NO":b%=0:g%=0:U%=3:Q%=3:PROCf:PROCs:PROCFy:PROCcy:PROCF:ENDPROC
 3400DEFPROCx:FORE%=2TO5:IFFNE(I%,E%)THENT%=E%-1
 3410NEXTE%:`$="":IFFNE(I%,7)THEN`$+="+"
 3420a$="":a$=FNZ(I%,13):LJ%=VAL(a$)*60:I=FALSE:L=FALSE:IFFNE(I%,21)THENI=TRUE
 3430IFFNE(I%,18)THENL=TRUE
 3440ENDPROC
 3450DEFPROCvy:VDU26:MOUSERECTANGLE0,0,1279,1023:PROCN:WAIT:CALLP:SYS46,290,S%,"block",256,600:PROCE("Block Slide",320,570,12,3):SYS46,290,S%,"magic",256,200:PROCE("Magic Square",320,170,12,3):SYS46,290,S%,"fillit",576,360,8:PROCE("Fill It",640,332,12,3):SYS46,290,S%,"coins",892,600,8
 3460PROCE("Coins",960,570,12,3):SYS46,290,S%,"hanoi",892,200,8:PROCE("Towers of",960,208,12,3):PROCE("Hanoi",960,160,12,3):SYS46,546,S%,A%(30),576,20:MOVE720,140:MOVE780,220:SYS46,256+14,S%,"box":PROCE("LEVEL "+STR$(T%),640,800,37,3):PROCE("DESKTOP",640,200,20,3):CALLN:PROCK:PROCwy
 3470IFD%<>6THENPROCU
 3480GCOL0,0TINT0:FORZ%=0TO28STEP4:FORE%=Z%TO1024STEP32:LINE0,E%,1280,E%:NEXT:J=TIME:REPEATUNTILTIME-J>5:NEXT:WAIT:PROC_:CLS:*fx200,0
 3490Z=TRUE:ENDPROC
 3500DEFPROCf:VDU26:MOUSERECTANGLE0,0,1279,1023:PROCN:WAIT:CALLP:SYS46,546,S%,A%(1),256,650:SYS46,546,S%,A%(42),256,400:SYS46,546,S%,A%(43),256,150:SYS46,546,S%,A%(44),892,650:SYS46,546,S%,A%(45),892,400:SYS46,546,S%,A%(46),892,150:SYS46,546,S%,A%(30),576,20:SYS46,546,S%,M%(1),416,640,8
 3510SYS46,546,S%,M%(5),576,640,8:SYS46,546,S%,M%(9),736,640,8:GCOL3,0:RECTANGLE416+My%*160,640,128,128:Sy%=12:PROCE("NUMBER",320,620,Sy%,3):PROCE("TIME",320,370,Sy%,3):PROCE("MEASUREMENT",320,120,Sy%,3):PROCE("ANGLES",960,620,Sy%,3):PROCE("SHAPE & SPACE",960,370,Sy%,3)
 3520PROCE("LUCKY DIP",960,120,Sy%,3):PROCE("CHOOSE",640,600,3,3):PROCE("A",640,550,3,3):PROCE("MAZE",640,500,3,3):MOVE720,140:MOVE780,220:SYS46,256+14,S%,"box":PROCE("LEVEL "+STR$(T%),640,800,37,3):PROCE("DESKTOP",640,200,20,3):CALLN:PROCK:PROCSy:PROCs:GCOL0,0TINT0:FORZ%=0TO28STEP4:FORE%=Z%TO1024STEP32
 3530LINE0,E%,1280,E%:NEXTE%:J=TIME:REPEATUNTILTIME-J>5:NEXTZ%:WAIT:PROC_:CLS:ENDPROC
 3540DEFPROCK:SYS49,U,G:q=G!0:IFq=eTHENSYS6,112,1ELSESYS6,112,2
 3550ENDPROC
 3560DEFPROC_:SYS49,U,G:q=G!0:IFq=eTHENSYS6,112,2ELSESYS6,112,1
 3570ENDPROC
 3580DEFPROCwy:IFZTHENENDPROC
 3590LOCALK%,O%,S:Y_%=0:D%=0:MOUSEON1
 3600WHILED%=0:REPEATMOUSEK%,O%,S:UNTILS=0:REPEAT:MOUSEK%,O%,S:IFINKEY-117SOUNDON
 3610IFINKEY-118SOUNDOFF
 3620IFINKEY-2ANDINKEY-113THEN
 3630*fx200,0
 3640D%=6:Z=TRUE
 3650ENDIF:IFZTHENS=1
 3660UNTILS<>0:IF(K%>576ANDK%<704)AND(O%>20ANDO%<148)THEN
 3670*fx200,0
 3680Z=TRUE:D%=6
 3690ENDIF:IF(K%>256ANDK%<384)AND(O%>600ANDO%<728)D%=1
 3700ENDWHILE:ENDPROC
 3710DEFPROCSy:IFZTHENENDPROC
 3720LOCALK%,O%,S:D%=0:Y_%=0:MOUSEON1
 3730WHILED%=0:REPEATMOUSEK%,O%,S:UNTILS=0:REPEAT:MOUSEK%,O%,S:IFINKEY-6ANDINKEY-114Y_%=1
 3740IFINKEY-117SOUNDON
 3750IFINKEY-118SOUNDOFF
 3760IFINKEY-2ANDINKEY-113THEN
 3770*fx200,0
 3780Z=TRUE
 3790ENDIF:IFZTHENS=1
 3800UNTILS<>0:IF(K%>256ANDK%<384)THEN
 3810IFO%>650ANDO%<778D%=1
 3820ENDIF:IF(K%>416ANDK%<892)AND(O%>640ANDO%<768)THEN
 3830GCOL3,0:RECTANGLE416+My%*160,640,128,128:My%=(K%-416)DIV160:GCOL3,0:RECTANGLE416+My%*160,640,128,128
 3840ENDIF:IF(K%>576ANDK%<704)AND(O%>20ANDO%<148)THEN
 3850*fx200,0
 3860Z=TRUE
 3870ENDIF:IFZTHEND%=1
 3880ENDWHILE:MOUSEOFF:ENDPROC
 3890DEFPROCs:E%()=0:FORE%=1TO25:FORZ%=1TO25:E%(E%,Z%)=P%(D%,E%,Z%):NEXT:NEXT:E%=1:REPEAT:uy%=RND(18)+2:f_%=RND(18)+2:IFE%(uy%,f_%)=0THEN
 3900E%(uy%,f_%)=6:E%+=1
 3910ENDIF:UNTILE%=11:ENDPROC
 3920DEFPROC`:h%=4:j%=4:J%=1:l%=0:R%=4:p%=250:ty%=384:R_%=896:C_%=256:S_%=768:ly%=TRUE:W%=256:B%=768:E$()="1000":H$="":D=FALSE:IFT%=2ORT%=1THEN
 3930R%=3:h%=3:j%=3:ty%+=64:C_%+=64:R_%-=64:S_%-=64:W%+=64:B%-=64:p%=100
 3940ENDIF:IFNOTLTHENp%=99999
 3950PROCny:SYS6,113,J%:SYS6,112,3-J%:FORZ%=1TO2:SYS6,112,Z%:FORE%=(R%-1)TO0STEP-1:GCOL0,3TINTE%*64:RECTANGLEFILLty%-E%*8,C_%-E%*8,128*R%+E%*16,128*R%+E%*16:NEXTE%:NEXTZ%:PROCq:PROCN:CALLN:PROCq:SYS6,112,1:SYS6,113,1:REPEAT:PROCqy:PROCMy:PROCRy:UNTILD:SYS46,256+25,S%,"box":IFly%THEN
 3960J=TIME:REPEATUNTILTIME-J>400
 3970ENDIF:ENDPROC
 3980DEFPROCny:qy%=0:IFT%=2qy%=-15
 3990IFT%=1ORT%=2THEN
 4000FORE%=1TOR%:FORZ%=1TOR%:W=qy%+RND(6):IFW=0THENW=1
 4010E$(Z%,E%)=STR$W:IF((E%ANDZ%)<>R%)H$=H$+STR$W
 4020qy%=W:NEXTZ%:NEXTE%
 4030ENDIF:IFT%=3THEN
 4040M=0:FORE%=1TOR%:FORZ%=1TOR%:W=M+(RND(3)/10)+0.1:E$(Z%,E%)=LEFT$(STR$W,3):IF((E%ANDZ%)<>R%)H$=H$+E$(Z%,E%)
 4050M=W:NEXTZ%:NEXTE%
 4060ENDIF:IFT%=4THEN
 4070T_%=0:J_%=1:FORE%=1TOR%:FORZ%=1TOR%:IFRND(1)<.3ANDT_%<5THEN
 4080T_%+=1:J_%+=1
 4090ENDIF:E$(Z%,E%)=MID$(v$,J_%,1):IF((E%ANDZ%)<>R%)H$=H$+E$(Z%,E%)
 4100J_%+=1:NEXTZ%:NEXTE%
 4110ENDIF:H$+="0":E$(R%,R%)="0":FORE%=1TO100:Ny%=0:Xy%=0:REPEAT:ey%=0:Ny%=0:Xy%=0:IFRND(1)<.5ey%=1ELSEey%=-1
 4120IFRND(1)<.5Ny%=ey%ELSEXy%=ey%
 4130UNTILVAL(E$(h%+Ny%,j%+Xy%))<1000:E$(h%,j%)=E$(h%+Ny%,j%+Xy%):E$(h%+Ny%,j%+Xy%)="0":h%+=Ny%:j%+=Xy%:NEXTE%:ENDPROC
 4140DEFPROCqy:LOCALK%,O%,S:MOUSEON1
 4150REPEAT:x=FALSE:C%=0:F=0:C=0:REPEAT:REPEATMOUSEK%,O%,S:UNTILS=0:REPEAT:MOUSEK%,O%,S:IFINKEY-67THEND=TRUE:ly%=FALSE:ENDPROC
 4160UNTILS<>0:IFK%>ty%IFK%<R_%IFO%>C_%IFO%<S_%THENx=TRUE
 4170UNTILx:By%=((K%-ty%)DIV128)+1:Dy%=((S_%-O%)DIV128)+1:IFE$(By%,Dy%+1)="0"ANDDy%<R%ANDC%=0C=.125:C%=1
 4180IFE$(By%,Dy%-1)="0"ANDDy%>1ANDC%=0C=-.125:C%=2
 4190IFE$(By%-1,Dy%)="0"ANDBy%>1ANDC%=0F=-.125:C%=3
 4200IFE$(By%+1,Dy%)="0"ANDBy%<R%ANDC%=0F=.125:C%=4
 4210UNTILC%<>0:ENDPROC
 4220DEFPROCMy:J%=3-J%:SYS6,112,J%:GCOL0,3TINT0:`y%=h%-(8*F):Z_%=j%-(8*C):E$(h%,j%)=E$(`y%,Z_%):E$(`y%,Z_%)="0":Ry%=W%+128*`y%:Wy%=B%-Z_%*128:MOVERy%,Wy%:MOVERy%+124,Wy%+124:SYS46,256+14,S%,"box":WAIT:FORQ=1TO8:SYS6,112,3-J%:RECTANGLEFILLRy%,Wy%,124,124
 4230SYS46,256+34,S%,"box",Ry%+(128*Q*F),Wy%-(128*Q*C),0:WAIT:SYS6,113,3-J%:J%=3-J%:T=INKEY(3):NEXTQ:J%=3-J%:WAIT:SYS6,113,3-J%:SYS6,112,J%:SYS46,256+34,S%,"box",Ry%+(1024*F),Wy%-(1024*C),0:RECTANGLEFILLRy%,Wy%,124,124:WAIT:SYS6,113,J%:h%-=8*F:j%-=8*C:C%=0:F=0:C=0:l%+=1
 4240SYS6,112,3-J%:SYS46,290,S%,"rubbox",1000,260:PROCE(STR$(l%),1088,300,15,3):WAIT:SYS6,113,3-J%:WAIT:SYS6,112,J%:SYS46,290,S%,"rubbox",1000,260:IFly%VOICE1,"Percussion-Soft":SOUND1,-12,100,1
 4250PROCE(STR$(l%),1088,300,15,3):ENDPROC
 4260DEFPROCRy:z$="":FORE%=1TOR%:FORZ%=1TOR%:z$=z$+E$(Z%,E%):NEXTZ%:NEXTE%:IFz$=H$THEN
 4270SYS6,112,3-J%:PROCE("WELL DONE!",640,180,7,3):IFp%>250THENl%=p%
 4280IFNOTy%THEN
 4290o%+=(p%-l%)DIV10:PROCE("SKILL BONUS: "+STR$((p%-l%)DIV10),640,130,10,3):PROCE("TOTAL SCORE: "+STR$o%,640,80,15,3)
 4300ENDIF:SYS6,113,3-J%:D=TRUE
 4310ENDIF:IFl%=p%ANDz$<>H$THEN
 4320SYS6,112,3-J%:PROCE("You've run out of moves!",640,130,7,3):PROCE("Better luck next time",640,80,10,3):SYS6,113,3-J%:D=TRUE
 4330ENDIF:ENDPROC
 4340DEFPROCq:GCOL0,63TINT192:FORZ%=1TOR%:FORE%=1TOR%:IFE$(E%,Z%)<>"0"THEN
 4350SYS46,290,S%,"blox",W%+128*E%,B%-Z%*128,0:p_%=W%+128*E%+64:k_%=B%-Z%*128+80:PROCE(E$(E%,Z%),p_%,k_%,63,3)
 4360ENDIF:NEXTE%:NEXTZ%:s$=STR$(p%):IFs$="99999"THENs$="NONE"
 4370PROCE("MOVES",1088,400,3,3):PROCE("TAKEN",1088,350,3,3):PROCE(STR$(l%),1088,300,15,3):PROCE("MAXIMUM",1088,750,3,3):PROCE("MOVES",1088,700,3,3):PROCE(s$,1088,650,15,3):IFNOTy%THEN
 4380PROCE("SCORE",1088,550,20,3):PROCE(STR$o%,1088,500,30,3)
 4390ENDIF:PROCE("Level "+STR$T%,192,750,48,3):PROCE("Puzzle "+STR$(D%),192,670,48,3):ENDPROC
 4400DEFPROCE(Z$,ny%,o_%,z%,qy%):q_%=ny%-(LENZ$*16):VDU5:GCOL0TINT0:IFqy%=2THENGCOL63TINT192
 4410FORd_%=-4TO4STEP4:FORO_%=-4TO4STEP4:MOVEq_%+d_%,o_%+O_%:PRINTZ$:NEXTO_%:NEXTd_%:GCOLz%TINTqy%*64:MOVEq_%,o_%:PRINTZ$:OFF:ENDPROC
 4420DEFPROCM(L$,RETURNA%):SYS46,256+24,S%,L$TO,,A%:ENDPROC
 4430DEFPROCXy:L$=T$+".Grafix":w_%=OPENIN(L$):L%=EXT#w_%+64:CLOSE#w_%:DIMS%L%+80000:S%!0=L%+200*200:SYS46,256+9,S%:SYS46,256+10,S%,L$:ENDPROC
 4440DATA "Great Move!","You've played this before","Ouch! Good Stuff"
 4450DATA "Nice one...","Not bad for a HUMAN!","Sweet move Dude!"
 4460DATA "Got me thinking..","Tricky move","Looks good for you!"
 4470DEFPROCGy:ky%=1024*8:d=64:DIMm ky%:FORY=8TO10STEP2:P%=m:L%=m+ky%:[OPTY:.N STMFD13!,{14}:ADR4,t:MOV5,#d:.n MOV2,#63:.u MOV3,#79:.j ADD6,2,3,LSL#6:LDRB7,[4,6]:CMP7,5:BNE h:ADR8,r:LDR0,a:LDR1,z:ADD7,3,2,LSL#6:ADD7,7,2,LSL#8:ADD0,0,7:ADD1,1,7:]:FORk=1TO4:[OPTY
 4480LDMIA8!,{9-12}:LDRB7,[0,9]:LDRB14,[1,9]:STRB7,[1,9]:STRB14,[0,9]:LDRB7,[0,10]:LDRB14,[1,10]:STRB7,[1,10]:STRB14,[0,10]:LDRB7,[0,11]:LDRB14,[1,11]:STRB7,[1,11]:STRB14,[0,11]:LDRB7,[0,12]:LDRB14,[1,12]:STRB7,[1,12]:STRB14,[0,12]:]:NEXT:[OPTY
 4490.h SUBS3,3,#1:BPL j:SUBS2,2,#1:BPL u:SUBS5,5,#1:BNE n:LDMFD13!,{pc}:.a DCD0:.z DCD0:.rFNB(64):.tFNB(64*80+4):.P STMFD13!,{14}:LDR4,c:RSB4,4,#3:STR4,c:MOV0,#112:MOV1,4:SWI 6:MOV0,#113:RSB1,4,#3:SWI 6:ADR0,y:ADR1,H:SWI 49:LDMFD13!,{pc}:.c DCD1:.y DCD148
 4500DCD-1:.H DCD0:]:NEXT:FORE%=0TO3:FORZ%=0TO3:r!(4*E%+16*Z%)=80*E%+320*64*Z%:NEXT:NEXT:ENDPROC
 4510DEFFNB(aJ%):P%+=aJ%:=0
 4520DEFPROCdy:FORQ=0TO64*80:t?Q=RND(d):NEXT:ENDPROC
 4530DEFFNN(q$):LOCALwy%,Q_%:SYS8,17,q$TOQ_%,,,,wy%:IFQ_%<>1THENERROR203,"File '"+FNW(q$)+"' not found!"
 4540=wy%
 4550DEFPROCTy(Ly%,by%,W%,B%,q$,Ty%,wy%,t_%):UJ%=Ty%:PJ%=wy%:N_%=Ty%:F%!0=256:F%!12=0:F%!16=1:F%!20=Ly%:F%!24=by%:F%!28=W%:F%!32=B%:F%!36=wy%:F%!40=t_%:$(F%+44)=q$+CHR$0:SYS&400e7,17,F%,Ly%,by%TOVJ%:ENDPROC
 4560DEFFNH(i$,Ty%,qJ%):LOCAL__%:__%=FNN(i$):IF__%>qJ%THEN
 4570PROCC("File to load is too large!","Data loading error"):=0
 4580ENDIF:SYS8,16,i$,Ty%:=__%
 4590DEFPROCYy:NJ%=FALSE:IFFNG("Wimp$Scrap")<>""THEN
 4600F%!36=-1:$(F%+44)="<Wimp$Scrap>"+CHR$0:F%!0=64:F%!12=F%!8:F%!16=2:SYS&400e7,17,F%,F%!4
 4610ELSE:PROCC("Wimp$Scrap not found. Run !System or !Scrap","Error")
 4620ENDIF:ENDPROC
 4630DEFPROCZy:F%!12=F%!8:F%!16=3:SYS&400e7,17,F%,F%!4:ENDPROC
 4640DEFPROCKy:LOCALX_%,my%:X_%=F%!24:SYS&400f1,g_%,N_%,F%!4,F%!20,X_%:my%=UJ%+PJ%-N_%:IFmy%>X_%THENmy%=X_%ELSEPROCJ
 4650N_%+=my%:F%!12=F%!8:F%!16=7:F%!24=my%:SYS&400e7,17,F%,F%!4:ENDPROC
 4660DEFPROCW(D$,Jy%,Ty%,d%):SYS8,10,D$,Jy%,,Ty%,Ty%+d%:ENDPROC
 4670DEFPROCc(X%,V%):LOCALW%,B%:M%!0=X%:SYS&400cb,,M%:W%=M%!4-M%!20:B%=M%!16-M%!24:M%!4=V%:SYS&400ce,,M%:IF(M%!24AND45056)=45056ENDPROC
 4680IF(M%!24AND&800000)=&800000ENDPROC
 4690M%!4=5:M%!8+=W%:M%!12+=B%:M%!16+=W%:M%!20+=B%:M%!24=-1:M%!28=-1:M%!32=&7fffffff:M%!36=&7fffffff:SYS&400d0,,M%:ENDPROC
 4700DEFFNZ(X%,V%):M%!0=X%:M%!4=V%:SYS&400ce,,M%:IF(M%!24AND257)<>257THEN
 4710ERROR202,"Icon "+STR$by%+" not indirected!":=""
 4720ENDIF:=$M%!28
 4730DEFFNE(X%,V%):M%!0=X%:M%!4=V%:SYS&400ce,,M%:IF(M%!24AND1<<21)THEN=TRUEELSE=FALSE
 4740=TRUE
 4750DEFPROCz(X%,V%,c_%):M%!0=X%:M%!4=V%:SYS&400ce,,M%:IF(M%!24AND57601)<>57601THEN
 4760ERROR202,"Icon "+STR$V%+" not writable and not indirected!":ENDPROC
 4770ENDIF:S$=$M%!28:IFc_%>LENS$c_%=LENS$
 4780SYS&400d2,X%,V%,0,0,-1,c_%:ENDPROC
 4790DEFPROCA(X%,V%,S$):M%!0=X%:M%!4=V%:SYS&400ce,,M%:IF(M%!24AND257)<>257THEN
 4800ERROR202,"Icon "+STR$V%+" not indirected!":ENDPROC
 4810ENDIF:S$=LEFT$(S$,M%!36-1):$M%!28=S$:M%!8=0:M%!12=0:SYS&400cd,,M%:ENDPROC
 4820DEFPROCS(X%,V%,sJ%):M%!0=X%:M%!4=V%:M%!12=1<<21:IFsJ%M%!8=1<<21ELSEM%!8=0
 4830SYS&400cd,,M%:ENDPROC
 4840DEFFNI(Sy$,Fy$):LOCALyy%:IFFy$="RIGHT"!M%=-1ELSE!M%=-2
 4850M%!4=0:M%!8=0:M%!12=68:M%!16=68:M%!20=&1700202a:$(M%+24)=Sy$:SYS&400c2,,M%TOyy%:=yy%
 4860DEFPROCAy(X%,x$,Ay$,Jy$,Ey$):PROCA(X%,1,x$):PROCA(X%,2,Ay$):PROCA(X%,3,Jy$):PROCA(X%,4,Ey$):ENDPROC
 4870DEFFNK(t$):LOCALV_%:V_%=200:SYS&400c0,V_%,&4b534154,t$TOV_%,g_%:=g_%
 4880DEFPROCLy(A$):LOCALIy%,Ky%,U$,B_%,N$,Ey%,Py%:Ky%=&7000021:B_%=-1:Ey%=FALSE:N$=FNT(A$):Py%=LENN$:REPEAT:U$=FNX(A$):CASELEFT$(U$,4)OF
 4890WHEN"tick":Iy%=Iy%OR1
 4900WHEN"line":Iy%=Iy%OR2
 4910WHEN"shad":Ky%=Ky%OR&400000
 4920WHEN"subm":B_%=FND(FNC(U$))
 4930WHEN"wind":B_%=FNU(FNC(U$))
 4940WHEN"icon":Ky%=FNL(FNC(U$))
 4950WHEN"writ":PROCey(FNC(U$))
 4960ENDCASE:UNTILU$="":N%!0=Iy%:N%!4=B_%:IFLEN(N$)>12OREy%THEN
 4970N%!8=Ky%OR256:PROCd(N%,Ey%,Py%)
 4980ELSE:N%!8=Ky%:$(N%+12)=LEFT$(N$+CHR$(0),12)
 4990ENDIF:N%+=24:ENDPROC
 5000DEFFNF(A$):IFLEFT$(A$,9)="beginmenu"=TRUE
 5010=FALSE
 5020DEFFN_(I_%,KJ%):LOCALo$:SYS&400d5,,I_%,KJ%,F%+256TO,,,o$:=o$
 5030DEFPROCay(Y%,Ay%,E_%,WJ%):DIMI_% (Y%*28)+(Ay%*24):DIMJ%(Y%):DIMS%(Y%):DIMW%(E_%):DIMB%(E_%):ENDPROC
 5040DEFFNM(w%):LOCALF$:IFw%<1ORw%>DIM(W%(),1)THEN
 5050ERROR201,"writable menu item "+STR$(w%)+" does not exist!"
 5060ENDIF:w%=W%(w%):F$="":WHILE?w%>31:F$+=CHR$?w%:w%+=1:ENDWHILE:=F$
 5070DEFPROCO:LOCALpy%,A$:PTR#H%=0:REPEAT:py%=PTR#H%:A$=GET$#H%:UNTILFNF(A$)OREOF#H%:IFEOF#H%ERROR200,"No 'beginmenu' found in menu file"
 5080PTR#H%=py%:ENDPROC
 5090DEFPROCd(t%,Ey%,d%):LOCALZy%:IFEy%THEN
 5100DIMZy%d%+1
 5110ELSE:DIMZy%1+LENN$
 5120ENDIF:t%!12=Zy%:$Zy%=N$+CHR$(0):IFEy%THEN
 5130W%(Ey%)=Zy%:B%(Ey%)=d%:Zy%+=d%+1:t%!20=d%+1
 5140ELSE:Zy%+=1+LENN$:t%!20=1+LENN$
 5150ENDIF:?Zy%=0:t%!16=Zy%:ENDPROC
 5160DEFPROCNy(r$):LOCALY%,fy%,A$,N%,I_%:PROCl(r$):H%=OPENINr$:PROCb:PROCO:Y%=0:fy%=FALSE:REPEAT:A$=GET$#H%:IFFNF(A$)THEN
 5170IFfy%ERROR200,"Bad menu file, no items in menu "+STR$(Y%)
 5180IFY%PROCR(N%)
 5190Y%+=1:A$=GET$#H%:PROCQy(N%,A$,J%(Y%)):fy%=TRUE
 5200ELSE:PROCLy(A$):fy%=FALSE
 5210ENDIF:UNTILEOF#H%:PROCR(N%):SYS&2000d,0,H%:H%=0:IFfy%ERROR200,"Bad menu file, no items in menu "+STR$(Y%)
 5220ENDPROC
 5230DEFPROCQy(RETURNN%,t$,hy%):$N%=LEFT$(t$,12)+CHR$(0):N%?12=7:N%?13=2:N%?14=7:N%?15=0:N%!16=hy%:N%!20=44:N%!24=0:N%+=28:ENDPROC
 5240DEFPROCR(N%):!(N%-24)=!(N%-24)OR128:ENDPROC
 5250DEFPROCJ:SYS&400d4,,-1:ENDPROC
 5260DEFFNR(t%):LOCALAy%,K_%,h_%:Ay%=1:h_%=t%!20+t%!24:t%+=28:WHILE(!t%AND128)=0:Ay%+=1:IF(!t%AND2)K_%+=1
 5270t%+=24:ENDWHILE:IF(!t%AND2)K_%+=1
 5280=Ay%*h_%+K_%*24
 5290DEFFNL(M$):IFM$=""ERROR200,"Menu icon flag value missing!"
 5300=EVAL(M$)
 5310DEFFNX(RETURNB$):LOCALU$:IFINSTR(B$,",")THEN
 5320B$=MID$(B$,INSTR(B$,",")+1):U$=LEFT$(B$,INSTR(B$,",")-1)
 5330ELSE:U$=""
 5340ENDIF:=U$
 5350DEFFNT(B$):IFINSTR(B$,",")B$=LEFT$(B$,INSTR(B$,",")-1)
 5360=B$
 5370DEFFNQ(Vy%):LOCALR$:R$=STR$(!Vy%):Vy%+=4:WHILE!Vy%<>-1:R$+="."+STR$(!Vy%):Vy%+=4:ENDWHILE:=R$
 5380DEFFND(M$):IFVAL(M$)<1ORVAL(M$)>DIM(S%(),1)THEN
 5390ERROR200,"Can't find menu "+M$+", as referred to in:- "+U$
 5400ENDIF:IFVAL(M$)=Y%THEN
 5410ERROR200,"An item in menu "+M$+" cannot have menu "+M$+" as a submenu!"
 5420ENDIF:=S%(VAL(M$))
 5430DEFFNC(M$):M$=MID$(M$,INSTR(M$,"(")+1):M$=LEFT$(M$,INSTR(M$,")")-1):=M$
 5440DEFFNU(M$):LOCALyy%:LOCALERROR:ONERRORERROREXT0,"Menu file error. Window variable "+M$+" not found."
 5450yy%=EVAL(M$):IFyy%<1THEN
 5460SYS&2000d,0,H%:ERROR
 5470ENDIF:=yy%
 5480DEFPROCey(M$):Py%=0:IFINSTR(M$,":")THEN
 5490Py%=VAL(MID$(M$,INSTR(M$,":")+1)):IFLEN(N$)>Py%Py%=LENN$
 5500ELSE:Py%=LENN$
 5510ENDIF:Iy%=Iy%OR4:Ey%=VAL(M$):ENDPROC
 5520DEFPROCk(w%,S$):IFw%<1ORw%>DIM(W%(),1)THEN
 5530ERROR201,"writable menu item "+STR$(w%)+" does not exist!"
 5540ENDIF:IFLENS$>B%(w%)THEN
 5550IFLENS$>100S$=LEFT$(S$,100)+"......"
 5560ERROR201,"Text '"+S$+"' too long for writable item "+STR$w%+"!"
 5570ENDIF:$W%(w%)=S$:ENDPROC
 5580DEFPROCb:LOCALAy%,A$,hy%:Y%=0:N%=I_%:PROCO:REPEAT:A$=GET$#H%:IFFNF(A$)THEN
 5590S%(Y%+1)=I_%+(Y%*28)+(Ay%*24):A$=GET$#H%:Y%+=1:A$=LEFT$(A$,12):J%(Y%)=12+16*LENA$
 5600ELSE:Ay%+=1:IFINSTR(A$,",")THEN
 5610hy%=12+16*LEN(LEFT$(A$,INSTR(A$,",")-1))
 5620ELSE:hy%=12+16*LENA$
 5630ENDIF:IFhy%>J%(Y%)J%(Y%)=hy%
 5640ENDIF:UNTILEOF#H%:ENDPROC
 5650DEFPROCl(r$):LOCALY%,Ay%,E_%,WJ%,A$:H%=OPENINr$:REPEAT:A$=GET$#H%:IFFNF(A$)THEN
 5660Y%+=1:A$=GET$#H%
 5670ELSE:IFINSTR(A$,",writ")E_%+=1
 5680IFINSTR(A$,",wind")WJ%+=1
 5690Ay%+=1
 5700ENDIF:UNTILEOF#H%:SYS&2000d,0,H%:H%=0:PROCay(Y%,Ay%,E_%,WJ%):ENDPROC
 5710DEFFNJ(N%,d%):LOCALF$:IFd%=0d%=255
 5720FORN%=N%TON%+d%-1:IF?N%<32THEN
 5730=F$
 5740ELSE:F$+=CHR$(?N%)
 5750ENDIF:NEXT:=F$
 5760DEFFNW(R$):WHILEINSTR(R$,"."):R$=MID$(R$,INSTR(R$,".")+1):ENDWHILE:=R$
 5770DEFPROCC(c$,t$):c$=CHR$0+CHR$0+CHR$0+CHR$0+c$+CHR$0:SYS&400df,c$,18,t$:ENDPROC
 5780DEFFNG(d$):LOCALd%:SYS&20023,d$+CHR$(0),M%,-1TO,,d%:IFd%=0ERROREXT0,"System variable '"+d$+"' not found!"
 5790SYS&20023,d$+CHR$(0),M%,255,,3TO,,d%:?(M%+d%)=13:=$M%
 5800DEFFNY(X%,V%):LOCALF$:M%!0=X%:M%!4=V%:SYS&400ce,,M%:CASE(M%!24AND259)OF
 5810WHEN2,3:=FNJ(M%!28,256)
 5820WHEN258:IFM%!36>0THEN
 5830=FNJ(M%!28,M%!36)
 5840ELSE:ERROR202,"No sprite name in icon "+STR$V%:=""
 5850ENDIF
 5860WHEN259:=MID$(FNJ(M%!32,M%!36),2)
 5870OTHERWISE:ERROR202,"No sprite name in icon "+STR$V%:=""
 5880ENDCASE:=F$
 5890DEFFNP(X%,V%):=EVAL("&"+RIGHT$(FNY(X%,V%),3))
 5900DEFFNS(Zy$,f$,RETURNzJ%,wJ%):LOCALX%:SYS&400d9,,Zy$:X%=FNV(f$,zJ%,wJ%):SYS&400da:=X%
 5910DEFFNV(f$,RETURNVy%,TJ%):LOCALQ_%,X%:SYS&400db,,F%,Vy%,TJ%,-1,f$,0TO,,Vy%,,,,Q_%:IFQ_%THEN
 5920SYS&400c1,,F%TOX%
 5930ELSE:ERROREXT0,"Window "+f$+" not found in template file!":X%=0
 5940ENDIF:=X%
 5950DEFPROCQ(X%):!M%=X%:SYS&400cb,,M%:SYS&400c5,,M%:ENDPROC

�>ManiaDemo
�:�" at line ";�:�
!ș&406c0:�Oy:�t:��I(�,�$):�D
(8RJ%=�K(V$):�v:�Ey:�ry:�n:�xy:�_y:ș&406c1:��I(�,�$)
2
�Uy:�D
<���Oy:�H_%:H_%=2560:�F%H_%:�M%H_%:�BJ%256:�`_%2048:Uy%=`_%:Fy%=`_%+2048:�zy%1280:�ZJ%80:�U 8:�G 4:�C$(30),A%(60),P%(6,25,25),M$(6,4),S$(5,100):�J$(5,100),F%(5,100),F$(3),K%(8),Y%(8),X%(8),C%(5,100):�q%(3,7),M%(12),_%(3),D%(2),E%(25,25),P$(9)
F��Z%(9,3),A$(40),Z$(40):�V%(5),O%(5),B$(5),W$(5),L%(4),T%(10,2):�N%(4),H%(4),U%(8),a%(8),E(8),G%(8):�I%(5,5),R%(25),Q%(25,1):�E$(5,5):MJ%=4096:�u%MJ%:i%=35:�py%=u%�u%+100:$py%=�(0):�:$u%="NO RESULTS DATA CURRENTLY RECORDED"+�(10):�
P���t:m$="!maniademo":V$="Mathmania Demo":n$="Maths Puzzles":g$="�1994 Martin Goldberg":j$="Version 1.00, 28th Dec 1994":T$=�G("Obey$Dir"):O$=T$+".choices":k$=T$+".highs":s_%=0:H%=0:GJ%=-2:Yy%=4:xy%=1:j_%=64:u_%=16:EJ%=2:b_%=0:G_%=0:W_%=�
Z�V=�:O=�:C%()=0:D%=0:C%=1:J%=1:m_%=0:i_%=0:X=�:T=�(-�):T%=1:B=�:k%=0:w$="NO":b%=0:g%=0:U%=3:Q%=3:U!0=149:U!4=-1:I=�:L=�:My%=0:g=�:M$(1,1)="01020405100010":M$(1,2)="0203040506070809100020":M$(1,3)="0304050607080910111215203040500100"
d�M$(1,4)="0304050607080910111215203040501314161718190500":�E%=188�208:v$=v$+�(E%):�E%:Cy$="191817161529142713384912473558233479455678":o%=0:c%=52:Z%()=0:_y%=0:jy%=0:ry%=0:y%=�:S$()="":J$()="":F%()=0:K=�(T$+".QuesBase"):�Z%=1�1:�#K,F%(Z%,0):E%=1:�
n��#K,S$(Z%,E%),J$(Z%,E%),F%(Z%,E%):E%+=1:�S$(Z%,E%-1)="ZZZ":�Z%:�#K:w=�(T$+".mazes"):�J%=1�1:�E%=1�22:�#w,C$(E%):�:�Z%=1�22:�E%=1�22:Z$=�C$(Z%),E%,1):�Z$>"@"�
xP%(J%,E%,Z%)=�(Z$)-55
�#�:P%(J%,E%,Z%)=�(�C$(Z%),E%,1))
���:�:�:�:�#w:R=�(T$+".highs"):Cy%=0:�Z%=0�3:�E%=1�10:x$="":Q$="":�:Cy%=�#R:x$+=�(Cy%-10):�Cy%=54:�:Cy%=�#R:Q$+=�(Cy%-10):�Cy%=54:A$(Z%*10+E%)=�x$):Z$(Z%*10+E%)=�Q$):�E%:�Z%:�#R:y_%=0:U_%=1:Gy%=2:YJ%=�:HJ%=1024:�
���v:OJ%=�I(m$,"RIGHT"):�
���Ey:�Xy:�
����ry:AJ%=�S("<Temp$Dir>","info%",Uy%,Fy%):dy%=�S("<Temp$Dir>","highs%",Uy%,Fy%):s%=�S("<Temp$Dir>","saveit%",Uy%,Fy%):I%=�S("<Temp$Dir>","choice%",Uy%,Fy%):q%=�S("<Temp$Dir>","result%",Uy%,Fy%):m%=�S("<Temp$Dir>","welcome%",Uy%,Fy%):�
�y��sy:�I$,xJ%,E%,a$:I$="":T=�H(O$,zy%,256):�E%=0�11:I$+=�(zy%?E%):�E%:�E%=2�5:�S(I%,E%,0):�I$,E%-1,1)="1"��S(I%,E%,1)
�-�E%:�E%=7�10:�I$,E%-2,1)="1"��S(I%,E%,1)
�"�E%:�(�I$,9,1))=1��S(I%,18,1)
��(�I$,10,1))=1��S(I%,21,1)
��(�I$,11,1))=1��S(I%,25,1)
�*a$=�I$,1):�A(I%,13,a$):�E(I%,25)�y%=�
��
�
��n:�sy:�
��xy:�Ay(AJ%,V$,n$,g$,j$):�
��_y:�Ny(T$+".menus"):�
)��Uy:�:ș&400e1,b_%,F%,G_%�SJ%:ȎSJ%�
"	�0:�r
,	�2:�h
6�3:Ly%=!F%:�P(Ly%)
@
�6:�Vy
J	�7:�i
T
�8:�gy
^
�9:�fy
h
�17:�H
r
�18:�H
|
�19:�u
��:�W_%:*RMKILL SFX-1
�*RMKILL SFX-2
�*RMKILL SFX-3
�*RMKILL SFX-4
�*RMKILL SFX-5
� �("*RMKILL SFX-6��"):�T:�D:�
���r:ș66�G_%:G_%+=100:�
���h:ș&400c5,,F%:�
�#��P(Ly%):!F%=Ly%:ș&400c6,,F%:�
�;��Vy:n_%=F%!0:IJ%=F%!4:sy%=F%!8:X%=F%!12:V%=F%!16:ȎX%�
��GJ%:�y
��I%:�ty
��q%:�Jy

�s%:�p
�dy%:�o
�:�
&]��i:�Ly%,by%,W%,B%,q$,Ty%,wy%,t_%:ș&400cf,,F%:W%=F%!0:B%=F%!4:Ly%=F%!12:by%=F%!16:Ȏe_%�
0�s%:�i%>0�
:Wq$=�W(�Z(s%,U_%)):�G:Ty%=u%:wy%=i%:t_%=�P(s%,Gy%):�Ty(Ly%,by%,W%,B%,q$,Ty%,wy%,t_%)
D�
N�:�
X:��gy:�X%,V%,ay%,D$,Wy$:X%=F%!0:V%=F%!4:ay%=F%!24:ȎX%�
b�s%:�Wy(ay%,V%)
l�m%:�Py(ay%)
v:ș&400dc,ay%
��:�
�.��fy:�l$,u$:l$=�_(gy%,F%):u$=�W(l$):Ȏgy%�
��S%(1):�Dy(u$)
�/�:ș&400cf,,F%:�F%!8=1ș&400d4,,gy%,z_%,a_%
��
���H:�FJ%:FJ%=F%!16:ȎFJ%�
��0:W_%=�
�
�2:�yy
�
�6:�Ky
�	�4:�J
��:�
���u:CJ%=F%!16:ȎCJ%�
��6:�NJ%�
	�XJ%�
2�C("Data transfer to another task failed!",V$)
	�:�Yy
 �
*�
4%�7:�C("Data transfer failed!",V$)
>�:�
H��o:Ȏsy%�
R�Yy%,xy%:ȎV%�
\�32,33,34,35:�Y
f
�36:�T
p�37:�P(X%)
z�
��:�
�*��Y:�T%:�E%=1�4:�E(dy%,E%+31)�T%=E%-1
�Q�E%:�E%=0�9:�A(dy%,2+E%*3,A$(10*T%+E%+1)):�A(dy%,3+E%*3,Z$(10*T%+E%+1)):�E%:�
���Jy:Ȏsy%�
��Yy%,xy%:ȎV%�
��51:�P(X%)
��
��:�
�2��ty:�M_%,E%:M_%=0:�E%=1�4:�E(I%,E%+6)�M_%+=1
��E%:Ȏsy%�
��Yy%,xy%:ȎV%�
��1:�M_%=1���E(I%,V%)�
��7
�
 �7,8,9,10:笤E(I%,V%)�M_%=0�
�7:�S(I%,V%,1)
$�
.�12:�P(X%)
8�25:y%=�:�E(I%,25)�y%=�
B�
L�:�
V��y:Ȏsy%�
`S�EJ%:My$="icon_bar":gy%=S%(1):z_%=n_%-64:a_%=�R(S%(1))+96:ș&400d4,,gy%,z_%,a_%
j�Yy%,xy%:�V�
t#�Q(m%):�M(1)<>"Player's Name"�
~$�A(m%,3,�M(1)):�z(m%,3,�(�M(1)))
��:�A(m%,3,""):�z(m%,3,0)
��
��:�L
��
��:�
���p:Ȏsy%�
��Yy%,xy%:�V%=y_%�
�+D$=�Z(s%,U_%):Jy%=�P(s%,Gy%):�D$,".")�
��G:�W(D$,Jy%,u%,i%):�J
�4�:�C("Drag the file to a directory display.",V$)
��
��
�j_%,u_%:�V%=Gy%�

DJ%=Gy%:e_%=s%:�c(s%,Gy%)
�
�:�
(��Dy(B$):p$=�Q(F%):Ȏp$�
2�"1":�Q(I%)
<�"2.0":�Q(q%)
F�"3":�Y:�Q(dy%)
P�"5":W_%=�
Z�:�
d��Py(ay%):Ȏay%�
n�13:K$=�Z(m%,3):�K$=""�
x*�C("A name must be given to play!",V$)
��:�k(1,K$):�P(m%):�L
��
��:�
���Wy(ay%,V%):�D$,Jy%:Ȏay%�
�/�13:D$=�Z(s%,U_%):Jy%=�P(s%,Gy%):�D$,".")�
��G:�W(D$,Jy%,u%,i%):�J
�4�:�C("Drag the file to a directory display.",V$)
��
��:�
���G:v%=0:G$=�(10):E$="           Performance Indicator From Mathmania"+G$+G$:E$+="Player: "+�M(1)+"      Achieved at an average level of: "+�Z(q%,49)+G$+G$:E$+="OPERATORS          RIGHT  WRONG  PERCENT"+G$+G$:i%=�(E$):$u%=E$:v%+=�(E$):E$=�A(2,4)
��E$+=�A(3,4):E$+=�A(4,4):E$+=�A(5,4)+G$:i%+=�(E$):$(u%+v%)=E$:v%+=�(E$):E$="SUBJECTS           RIGHT  WRONG  PERCENT"+G$+G$:E$+=�A(23,5):E$+=�A(24,5):E$+=�A(25,5):E$+=�A(26,5):E$+=�A(27,5):i%+=�(E$):$(u%+v%)=E$:v%+=�(E$):�
�ݤA(l_%,ey%):�Y$:S$="":S$=�Z(q%,l_%):ȕ�(S$)<>17:S$+=".":�:�E%=1�3:Y$="":S$+="  ":Y$=�Z(q%,l_%+E%*ey%):ȕ�(Y$)<5:Y$=" "+Y$:�:S$+=Y$:�E%:S$+=G$:=S$
�7��yy:�D$,Jy%:D$=�J(F%+44,255):�F%!36=-1�x_%=��x_%=�
Jy%=F%!40:Ȏe_%�
/�s%:�G:�W(D$,Jy%,u%,i%):�Zy:�x_%�A(s%,1,D$)

�:�J:�
"5��I(!BJ%,W$):s_%+=1:�s_%>5:��0,"Too Many Errors!"
,�<200W$+=" at line "+�(�)
6.�=200W$="*** Error in menu file! *** "+W$
@.�=201W$="***     Menu error      *** "+W$
J.�=202W$="***     Icon error      *** "+W$
T.�=203W$="***     File error      *** "+W$
^.�=204W$="***    Window error     *** "+W$
h:ș&2000d,0,H%:ș&600da:$(BJ%+4)=W$:ș&400df,BJ%,1,V$:�
r��D:ș&400dd:�:�
|B��T:ȕO:v%=0:�Z%=0�3:�E%=1�10:F$=A$(10*Z%+E%):�F$,�(160))<>0�
�F$=�F$),�(F$)-2)
�~�:F$+=",":F$+=Z$(10*Z%+E%):F$+=",":$(zy%+v%)=F$:v%+=�(F$):�E%:�Z%:�Z%=zy%�zy%+v%:?Z%=?Z%+10:�Z%:�W(k$,4093,zy%,v%):O=�:�:�
�S��L:r_%=135:uy%=0:v_%=0:ș6,r_%�r_%,uy%,v_%:ș&400e5,,ZJ%:�15:�13:ș54:*fx200,3
�Z=�:�V�
��Gy:�dy:�m:V=�
�;�:�19,1,24,214,144,78:W%=196:B%=838:E=1:A=1:�K$<>�M(1)�
�LK$=�M(1):o%=0:_y%=0:jy%=0:ry%=0:Z%()=0:g=�:�E%=1�40:�A$(E%),�(160))<>0�
�!A$(E%)=�A$(E%)),�(A$(E%))-2)
�	�:�E%
��:�x:�j:�y%�
��B:ȕ�Z:�Z(W%,B%,E,A):�by:�
�
�:�y%�
�
ȕ�Z:�B:�
�:�Iy:�
���Iy:ș&400e3,v_%:ș&400e4,,ZJ%:�E%=2�5:�S(I%,E%,0):�E%:�S(I%,T%+1,1):�("*alphabet latin1"):�A(q%,52,�M(1)):�E%=6�9:�A(q%,E%,�(Z%(E%-5,1))):�A(q%,E%+4,�(Z%(E%-5,2))):�E%:�E%=14�17:�Z%(E%-13,1)+Z%(E%-13,2)>0�
C_=(Z%(E%-13,1)/(Z%(E%-13,1)+Z%(E%-13,2)))*100:�A(q%,E%,�(�(_)))
&�:�A(q%,E%,"0")
0q�:�E%:�E%=28�32:�A(q%,E%,�(Z%(E%-23,1))):�A(q%,E%+5,�(Z%(E%-23,2))):�E%:�E%=38�42:�Z%(E%-33,1)+Z%(E%-33,2)>0�
:C_=(Z%(E%-33,1)/(Z%(E%-33,1)+Z%(E%-33,2)))*100:�A(q%,E%,�(�(_)))
D�:�A(q%,E%,"0")
N �:�E%:_$="???":�(_y%+jy%)>0�
Xb=ry%/(_y%+jy%):_$=��(b),3)
b.�:�A(q%,49,_$):`%=�(_$):��_$,1)>="5"�`%+=1
l�o%>�(Z$((`%-1)*10+10))�
v�Oy%=0:�:Oy%+=1:��A$((`%-1)*10+Oy%),�(160))<>0�Oy%=10:Z$((`%-1)*10+Oy%)=�(o%):A$((`%-1)*10+Oy%)=�(160)+K$+�(160):E%=1:�:s=�:�Z%=(`%-1)*10+1�(`%-1)*10+10-E%:�(Z$(Z%))<�(Z$(Z%+1))�
�+ȔZ$(Z%),Z$(Z%+1):ȔA$(Z%),A$(Z%+1):s=�
��:�Z%:E%+=1:�s:O=�
��:*fx 15,0
�ȡ1,"WaveSynth-Beep":�
�>��N:�E%=1�2:ș6,112,E%:ș46,290,S%,"title",140,840,8:�E%:�
���by
��Z��
��:C%=0:a%=0:F=0:_%=0:C=0
�$�-42�C%=0�A<18_%=16:C=.125:C%=1
�%�-58�C%=0�A>1_%=-16:C=-.125:C%=2
�%�-26�C%=0�E>1a%=+16:F=-.125:C%=3
�&�-122�C%=0�E<18a%=-16:F=.125:C%=4
��-67�B:C%=0:�Z�C%=1
�(C%=4�C%=3)���O�C%=0
�(C%=2�C%=1)���q�C%=0
!�C%<>0B%+=_%:W%+=a%:E+=F:A+=C
 �C%<>0:�
*,��Hy:z%=0:�E%=1�25:�Z%=1�25:ȎE%(Z%,E%)�
4'�1,42,43,44,45,46:E%(Z%,E%)=30:z%=1
>�30:�z%=0E%(Z%,E%)=1
H�:�:�:C%=1:�Z(W%,B%,E,A):�
R(ݤO:�W%,cy%:cy%=0:W%=688:�C%=3W%=592
\0�E%=476�544�4:�W%,E%)=63�Ȝ(W%,E%)=64cy%+=1
f�E%:�cy%<1=��=�
p=�
z(ݤq:�B%,cy%:cy%=0:B%=468:�C%=2B%=556
�0�E%=604�672�4:�E%,B%)=63�Ȝ(E%,B%)=64cy%+=1
��E%:�cy%<1=��=�
�=�
����Z(�W%,�B%,�E,�A):�QJ%:QJ%=C%+My%*4:v=�(A):f=�(E):J%=3-J%:ș6,112,J%:�24,324;198;960;834;:�Z%=v�v+5:�E%=f�f+5:L_%=E%(E%,Z%):ș46,546,S%,A%(L_%),W%+128*E%,B%-Z%*128,0:�E%:�Z%:ș46,546,S%,M%(QJ%),576,448,8:�Xș6,113,J%
�&U%=�(E+.5)+2:Q%=�(A+.5)+2:�26:�e:�
�
��cy:�Z��
���N:Ȗ:ș6,113,1:J%=2:Qy%=16:ș6,112,J%:�Z%=1�5:�E%=1�5:L_%=E%(E%,Z%):ș46,546,S%,A%(L_%),W%+128*E%,B%-Z%*128,0:�E%:�Z%:�320,192:�960,832:ș46,256+14,S%,"box":�24,320;192;960;832;:�a%=2�7:�_%=1�6:ș46,546,S%,A%(c%),a%*128,_%*128,0:�:�:�26:�2,0:Ȝ2,0
��:ș6,112,J%:ș46,290,S%,"box",320,192,3:ȓȐ640-Qy%,512-Qy%,Qy%*2,Qy%*2:ș46,290,S%,"box",320,192,3:ș6,113,J%:Ȗ:Qy%+=16:J%=3-J%:�Qy%=320:ș6,112,J%:ș46,290,S%,"box",320,192,0:ș46,546,S%,M%(1+My%*4),576,448,8:ș6,113,J%:�F:�
���e:�E%(U%,Q%)=0��B��
��E%(U%,Q%)=7�(C%=1�C%=2)�
�.ȡ1,"SFX-1":�1,-15,4000,1:�a:�(e$)=�(E$)�
�sȡ1,"SFX-6��":�1,-15,4000,1:B=�:M=�(5):E%(U%,Q%)=9:�Z(W%,B%,E,A):E%(U%,Q%)=8:M=�(5):�Z(W%,B%,E,A):b%+=1:�F:C%=0
��:g%+=1:�F:C%=0
	�
	 �:�E%(U%,Q%)=13�(C%=3�C%=4)�
	.ȡ1,"SFX-1":�1,-15,4000,1:�a:�(e$)=�(E$)�
	$uȡ1,"SFX-6��":�1,-15,4000,1:B=�:M=�(5):E%(U%,Q%)=12:�Z(W%,B%,E,A):E%(U%,Q%)=11:M=�(5):�Z(W%,B%,E,A):b%+=1:�F:C%=0
	.�:g%+=1:�F:C%=0
	8�
	B�:�C%=1�E%(U%,Q%-1)=8�
	Lgȡ1,"SFX-2":�1,-15,4000,1:B=�:M=�(5):E%(U%,Q%-1)=9:�Z(W%,B%,E,A):E%(U%,Q%-1)=7:M=�(5):�Z(W%,B%,E,A)
	V�:�C%=2�E%(U%,Q%+1)=8�
	`gȡ1,"SFX-2":�1,-15,4000,1:B=�:M=�(5):E%(U%,Q%+1)=9:�Z(W%,B%,E,A):E%(U%,Q%+1)=7:M=�(5):�Z(W%,B%,E,A)
	j�:�C%=4�E%(U%-1,Q%)=11�
	tiȡ1,"SFX-2":�1,-15,4000,1:B=�:M=�(5):E%(U%-1,Q%)=12:�Z(W%,B%,E,A):E%(U%-1,Q%)=13:M=�(5):�Z(W%,B%,E,A)
	~�:�C%=3�E%(U%+1,Q%)=11�
	�iȡ1,"SFX-2":�1,-15,4000,1:B=�:M=�(5):E%(U%+1,Q%)=12:�Z(W%,B%,E,A):E%(U%+1,Q%)=13:M=�(5):�Z(W%,B%,E,A)
	��:�E%(U%,Q%)=6�
	�3�2,-15,101,4:k%+=1:E%(U%,Q%)=0:�Z(W%,B%,E,A):�F
	��:�E%(U%,Q%)=29�
	�6�2,-15,101,4:w$="YES":E%(U%,Q%)=0:�Z(W%,B%,E,A):�F
	�D�:�E%(U%,Q%)=10�w$="YES"�E=�(E)�A=�(A)�(k%+b%-g%)>=10+2*(D%+T%)�
	� ȡ1,"SFX-3":�1,-15,4000,1:�U
	��:�
	�'��a:�e%:f%=40:Hy%=2:ry%+=T%:*FX15,0
	�n%=�(2):�I�n%=2
	�^ș46,290,S%,"askb",20,20,0:Ȗ:ș6,112,3-J%:ș46,290,S%,"askb",20,20,0:Ȗ:ș6,112,J%:�n%=1�
	��g:e$=�D_%:E$=�oy%:jy%+=1
�:�n%=2�

*�By(Z$,E$):�w(Z$,E$,f%):�zy(e$):_y%+=1
�
�:�
()��g:P$="":�Cy:�uy:�0,0Ȝ0:�D_%=oy%��X
2	ȗ�:�
<��uy:*fx4,1
FI�3,3Ȝ192:x%=76:G%=260:ȓȐ60,x%,380,-32:�:C$=�(5):�C$=�(136)�G%>260�
P9ȓȐG%-200,x%,380,-32:G%=G%-400:ȓȐG%-200,x%,380,-32
Z�:�C$=�(137)�G%<1060�
d9ȓȐG%-200,x%,380,-32:G%=G%+400:ȓȐG%-200,x%,380,-32
na�:��-74:D_%=G%:�E%=1�10:ȓȐG%-200,x%,380,-32:T=�(6):�E%:ș46,290,S%,"askb",20,20,0:�oy%=D_%�
x>ș46,290,S%,"correct",408,40,0:Z%(r%+4,1)+=1:J=�:���-J>200
�i�:ș46,290,S%,"wrong",454,40,0:Z%(r%+4,2)+=1:J=�:���-J>200:�V:ș6,112,3-J%:ș46,290,S%,"askb",20,20,0
��:*fx4,0
��
�'��Cy:�0,63Ȝ192:r%=D%:�r%=6�r%=�(5)
�ax%=148:G%=40:F_%=0:�:�:n%=�(F%(r%,0)):X$=S$(r%,n%):��(�(F%(r%,n%))),�(T%))>0:F_%+=1:�F_%>200�
�#�E%=1�100:C%(r%,E%)=0:�E%:F_%=0
���:�C%(r%,n%)=0:C%(r%,n%)=1:ȕ�(X$)>0:P$="":�:P$=P$+�X$,1):X$=�X$,�(X$)-1):��P$,1)=" "��(X$)=0:vy%=�(P$):G%+=vy%*32:�G%>40+37*32�
�X$=P$+X$:x%-=36:G%=40:P$=""
�0�:G%-=vy%*32:�G%=40��P$,1)=" "�P$=�P$,vy%-1)
ܭ�G%,x%:�P$:G%+=vy%*32:�:G%=60:x%=76:Z$=J$(r%,n%):C$="":�E%=1�3:�0,27Ȝ192:�G%,x%:�(96+E%)+")":ȕ�Z$,1)<>","�Z$<>"":C$+=�Z$,1):Z$=�Z$,�(Z$)-1):�:�(Z$)>0�Z$=�Z$,�(Z$)-1)
�NF$(E%)=C$:G%+=400:C$="":�E%:E%=1:G%=32:�0,12Ȝ192:�:iy%=�(3):�F$(iy%)<>""�
�+�G%+96,x%:�F$(iy%):�iy%=1�oy%=G%+200+28
�E%+=1:G%+=400:F$(iy%)=""

�:�E%=4:�
Q��w(Z$,E$,_J%):e%=360-((�(Z$)+�(E$))/2)*52:�Hy%=0�e%=640-((�(Z$)+�(E$))/2)*52
%�E%=1��(Z$):z%=�(�Z$,E%,1)):Ȏz%�
"
�43:z%=65
,
�45:z%=66
6
�42:z%=67
@
�47:z%=68
J
�61:z%=69
T1�:ș46,546,S%,A%(z%-34),e%,_J%,0:e%+=52:�E%:�
^��zy(�J$):*fx15,0
hWJ$="":C$="":�:ș46,546,S%,A%(38),e%,f%,0:�:C$=�(5):�C$<>""�C$>="0"�C$<="9"��(J$)<4�
rUz%=�(C$):ș46,546,S%,A%(z%-34),e%,f%,0:J$=J$+C$:e%+=52:ș46,546,S%,A%(38),e%,f%,0
|�:�(-90)��(J$)>0�
�Pș46,546,S%,A%(38),e%,f%,3:e%-=52:ș46,546,S%,A%(38),e%,f%,0:J$=�J$):*fx15,0
�$�:�C$=�(13)�J$<>"":�(J$)=�(E$)�
�5ș46,290,S%,"correct",728,f%,8:�L$="+"�Z%(1,1)+=1
�
�:�Hy%>1�
�]Hy%-=1:e%-=52*�(J$):�0,0Ȝ0:ȓȐe%,f%,52*(�(J$)+1),108:J$="":ș46,290,S%,"again",660,f%,8
�5�:ș46,290,S%,"wrong",774,f%,8:�L$="+"�Z%(1,2)+=1
�	Hy%=0
��
��:M=�(100):�(J$)<>�(E$)�
��0,0Ȝ0:ȓȐ680,36,560,120
�0�:�Hy%=0��(J$)=�(E$):�0,0Ȝ0:�(J$)=�(E$)��X
��Hy%=0�
�Lș46,290,S%,"askb",20,20,0:�w(�Z$+E$),"",40):M=�(200):�X:�V:ș6,112,3-J%
�:�
?��X:�E%=96�36�-2:ȓȐ40,E%,1200,(96-E%)*2:J=�:���-J>1:�E%:�
���V:X=�:�:ny%=�(17):P_%=�(17):�E%(ny%+2,P_%+2)=0:W%=196-(ny%-1)*128:B%=838+(P_%-1)*128:E=ny%:A=P_%:C%=1:�Z(W%,B%,E,A):ȡ1,"SFX-5":�1,-15,2000,1:�N:X=�:�Z(W%,B%,E,A):�
&F��By(�X$,�E$):�y$,h$,Py$:O$=M$(1,T%):ky%=�(O$)/2-2:L$="+":�L$="+"�
0)y$=�(�(�(�O$,4)))):h$=�(�(�(�O$,4))))
:�:�L$="+"�X$=y$+L$+h$+"="
DE$=�(�(�X$)))+" ":�
N��F:�Z��
XN�5:�Z(W%,B%,E,A):Q$=�(o%+k%+b%-g%):b$="SCORE":�(Q$)<0�Q$="B"+�Q$,�(Q$)-1)
b��E%=1�2:Ȗ:ș6,112,3-J%:Ȗ:ș46,290,S%,"askb",20,20,0:�A_%=1��(Q$):JJ%=�(�Q$,A_%,1))-34:ș46,546,S%,A%(JJ%),640-(�(Q$)/2)*52+(A_%-1)*48,44,0:�A_%:�0,6Ȝ192:�Z%=1�5:�300+Z%*36,108:�b$,Z%,1):�0,11Ȝ(Z%-1)*64:�Z%:�24,1112;200;1276;800;:�_%=1�7
l�ș46,546,S%,A%(c%),1152,_%*128,0:�_%:�E(�(k%),1200,745,3,3):�E(w$,1200,625,3,3):�E(�(b%),1200,505,3,3):�E(�(g%),1200,385,3,3):�E(�(k%+b%-g%),1200,265,15,3):�E%=1Ȗ:ș6,113,3-J%
vJ%=3-J%:�26:�E%:J%=3-J%:�
�#��m:Ƞ2:ȡ2,"WaveSynth-Beep":��
���E%=1�9:�P$(E%):�E%:�x:�E%=0�46:�M(�E%,A%(E%)):�:�M("back0",A%(52)):�M("back1",A%(53)):�M("back2",A%(54)):�M("back3",A%(55)):�E%=0�2:�M("down"+�(E%),M%(E%*4+1)):�M("up"+�(E%),M%(E%*4+2)):�M("left"+�(E%),M%(E%*4+3)):�M("right"+�(E%),M%(E%*4+4)):�E%
�5�P:!a=!H:ș49,U,G:e=G!0:�P:!z=!H:ș49,U,G:i=G!0:�
����j:�23,185,4,12,228,4,14,0,0,0:�23,194,64,192,64,72,72,10,15,2:�23,199,64,192,64,78,66,14,8,14:�23,204,224,32,224,40,232,10,15,2:�23,203,224,32,224,135,225,7,1,7:�23,201,224,32,224,39,228,7,1,7:�23,206,128,128,160,247,36,7,1,7
���23,195,224,32,224,135,225,1,2,4:�23,196,64,192,64,78,66,14,2,14:�23,200,128,128,160,247,33,1,2,4:�23,205,112,16,32,71,69,7,1,6:�23,198,128,128,160,247,37,7,1,6:�23,207,224,128,224,39,228,7,5,7:�23,188,64,192,64,78,74,14,2,12
���23,197,224,32,224,39,229,7,5,7:�23,202,224,128,224,39,229,7,5,7:�23,208,224,32,32,71,133,7,5,7:�23,193,224,32,224,135,229,7,1,6:�23,190,64,192,64,78,66,2,4,8:�23,189,64,192,64,78,74,14,10,14:�23,192,64,192,64,78,72,14,2,14
���23,191,64,192,64,78,72,14,10,14:�23,209,32,32,32,32,32,32,80,0:�23,210,2,2,2,98,130,130,101,0:�23,211,2,2,2,250,170,138,141,0:�23,212,0,0,3,126,54,54,54,0:�
�
��Fy:�Z��
��E%=1�2:�P:�a%=0�9:�_%=0�7:ș46,546,S%,A%(c%),a%*128,_%*128,0:�:�:ș46,546,S%,A%(36),1000,672,8:ș46,546,S%,A%(37),1000,550,8:ș46,546,S%,A%(39),1050,475,8:ș46,546,S%,A%(40),1050,350,8:ș46,546,S%,A%(41),1000,245,8:�E("Level "+�(T%),160,750,3,3)
ښ�E("Maze "+�(D%),160,670,3,3):�E("TO EXIT",160,590,15,3):�E("YOU NEED",160,540,15,3):�E(�(10+2*(D%+T%)),160,490,15,3):ș46,290,S%,"askb",20,20,0:�E%:�
�7��U:Ȗ:�26:ȗȓ0,0,1279,1023:c%=55:�D%=1�D%=4�c%=53
��D%=2�D%=6�c%=54
���P:�a%=0�9:�_%=0�7:ș46,546,S%,A%(c%),a%*128,_%*128,0:�:�:�N:�a%=0�9:�_%=0�7:ș46,546,S%,A%(c%),a%*128,_%*128,0:�:�:�P:�1000,260:�1200,310:ș46,256+14,S%,"rubbox":o%+=k%+b%-g%:k%=0:b%=0:g%=0:J%=1:�D%=6�D%=�(5)

�y%�ry%+=T%:_y%+=1

	ȎD%�

�1:�`:�B

 �:�

*���B:c%=52:ȗ�:Ȗ:�P:�a%=0�9:�_%=0�7:ș46,546,S%,A%(c%),a%*128,_%*128,0:�:�:�N:�a%=0�9:�_%=0�7:ș46,546,S%,A%(c%),a%*128,_%*128,0:�:�:Ȗ:�P:�y%��hy��vy

4�

>p��hy:C%=1:J%=1:m_%=0:i_%=0:X=�:W%=196:B%=838:E=1:A=1:B=�:k%=0:w$="NO":b%=0:g%=0:U%=3:Q%=3:�f:�s:�Fy:�cy:�F:�

H"��x:�E%=2�5:�E(I%,E%)�T%=E%-1

R�E%:`$="":�E(I%,7)�`$+="+"

\:a$="":a$=�Z(I%,13):LJ%=�(a$)*60:I=�:L=�:�E(I%,21)�I=�

f�E(I%,18)�L=�

p�

z���vy:�26:ȗȓ0,0,1279,1023:�N:Ȗ:�P:ș46,290,S%,"block",256,600:�E("Block Slide",320,570,12,3):ș46,290,S%,"magic",256,200:�E("Magic Square",320,170,12,3):ș46,290,S%,"fillit",576,360,8:�E("Fill It",640,332,12,3):ș46,290,S%,"coins",892,600,8

���E("Coins",960,570,12,3):ș46,290,S%,"hanoi",892,200,8:�E("Towers of",960,208,12,3):�E("Hanoi",960,160,12,3):ș46,546,S%,A%(30),576,20:�720,140:�780,220:ș46,256+14,S%,"box":�E("LEVEL "+�(T%),640,800,37,3):�E("DESKTOP",640,200,20,3):�N:�K:�wy

�
�D%<>6��U

�T�0,0Ȝ0:�Z%=0�28�4:�E%=Z%�1024�32:�0,E%,1280,E%:�:J=�:���-J>5:�:Ȗ:�_:�:*fx200,0

�	Z=�:�

����f:�26:ȗȓ0,0,1279,1023:�N:Ȗ:�P:ș46,546,S%,A%(1),256,650:ș46,546,S%,A%(42),256,400:ș46,546,S%,A%(43),256,150:ș46,546,S%,A%(44),892,650:ș46,546,S%,A%(45),892,400:ș46,546,S%,A%(46),892,150:ș46,546,S%,A%(30),576,20:ș46,546,S%,M%(1),416,640,8

��ș46,546,S%,M%(5),576,640,8:ș46,546,S%,M%(9),736,640,8:�3,0:ȓ416+My%*160,640,128,128:Sy%=12:�E("NUMBER",320,620,Sy%,3):�E("TIME",320,370,Sy%,3):�E("MEASUREMENT",320,120,Sy%,3):�E("ANGLES",960,620,Sy%,3):�E("SHAPE & SPACE",960,370,Sy%,3)

���E("LUCKY DIP",960,120,Sy%,3):�E("CHOOSE",640,600,3,3):�E("A",640,550,3,3):�E("MAZE",640,500,3,3):�720,140:�780,220:ș46,256+14,S%,"box":�E("LEVEL "+�(T%),640,800,37,3):�E("DESKTOP",640,200,20,3):�N:�K:�Sy:�s:�0,0Ȝ0:�Z%=0�28�4:�E%=Z%�1024�32

�/�0,E%,1280,E%:�E%:J=�:���-J>5:�Z%:Ȗ:�_:�:�

�/��K:ș49,U,G:q=G!0:�q=e�ș6,112,1�ș6,112,2

��

�/��_:ș49,U,G:q=G!0:�q=e�ș6,112,2�ș6,112,1

��

�
��wy:�Z��
�K%,O%,S:Y_%=0:D%=0:ȗ�1
/ȕD%=0:�ȗK%,O%,S:�S=0:�:ȗK%,O%,S:�-117��
�-118ԇ
$�-2��-113�
.*fx200,0
8D%=6:Z=�
B�:�Z�S=1
L*�S<>0:�(K%>576�K%<704)�(O%>20�O%<148)�
V*fx200,0
`Z=�:D%=6
j*�:�(K%>256�K%<384)�(O%>600�O%<728)D%=1
t�:�
~
��Sy:�Z��
��K%,O%,S:D%=0:Y_%=0:ȗ�1
�6ȕD%=0:�ȗK%,O%,S:�S=0:�:ȗK%,O%,S:�-6��-114Y_%=1
��-117��
��-118ԇ
��-2��-113�
�*fx200,0
�Z=�
��:�Z�S=1
��S<>0:�(K%>256�K%<384)�
��O%>650�O%<778D%=1
�'�:�(K%>416�K%<892)�(O%>640�O%<768)�
�R�3,0:ȓ416+My%*160,640,128,128:My%=(K%-416)�160:�3,0:ȓ416+My%*160,640,128,128
&�:�(K%>576�K%<704)�(O%>20�O%<148)�

*fx200,0
Z=�

�:�Z�D%=1
(�:ȗ�:�
2j��s:E%()=0:�E%=1�25:�Z%=1�25:E%(E%,Z%)=P%(D%,E%,Z%):�:�:E%=1:�:uy%=�(18)+2:f_%=�(18)+2:�E%(uy%,f_%)=0�
<E%(uy%,f_%)=6:E%+=1
F�:�E%=11:�
P}��`:h%=4:j%=4:J%=1:l%=0:R%=4:p%=250:ty%=384:R_%=896:C_%=256:S_%=768:ly%=�:W%=256:B%=768:E$()="1000":H$="":D=�:�T%=2�T%=1�
ZGR%=3:h%=3:j%=3:ty%+=64:C_%+=64:R_%-=64:S_%-=64:W%+=64:B%-=64:p%=100
d�:�L�p%=99999
n��ny:ș6,113,J%:ș6,112,3-J%:�Z%=1�2:ș6,112,Z%:�E%=(R%-1)�0�-1:�0,3ȜE%*64:ȓȐty%-E%*8,C_%-E%*8,128*R%+E%*16,128*R%+E%*16:�E%:�Z%:�q:�N:�N:�q:ș6,112,1:ș6,113,1:�:�qy:�My:�Ry:�D:ș46,256+25,S%,"box":�ly%�
xJ=�:���-J>400
��:�
���ny:qy%=0:�T%=2qy%=-15
��T%=1�T%=2�
�)�E%=1�R%:�Z%=1�R%:W=qy%+�(6):�W=0�W=1
�'E$(Z%,E%)=�W:�((E%�Z%)<>R%)H$=H$+�W
�qy%=W:�Z%:�E%
��:�T%=3�
�ZM=0:�E%=1�R%:�Z%=1�R%:W=M+(�(3)/10)+0.1:E$(Z%,E%)=��W,3):�((E%�Z%)<>R%)H$=H$+E$(Z%,E%)
�M=W:�Z%:�E%
��:�T%=4�
�1T_%=0:J_%=1:�E%=1�R%:�Z%=1�R%:�(1)<.3�T_%<5�
�T_%+=1:J_%+=1
�8�:E$(Z%,E%)=�v$,J_%,1):�((E%�Z%)<>R%)H$=H$+E$(Z%,E%)
J_%+=1:�Z%:�E%
Z�:H$+="0":E$(R%,R%)="0":�E%=1�100:Ny%=0:Xy%=0:�:ey%=0:Ny%=0:Xy%=0:�(1)<.5ey%=1�ey%=-1
�(1)<.5Ny%=ey%�Xy%=ey%
"f��(E$(h%+Ny%,j%+Xy%))<1000:E$(h%,j%)=E$(h%+Ny%,j%+Xy%):E$(h%+Ny%,j%+Xy%)="0":h%+=Ny%:j%+=Xy%:�E%:�
,��qy:�K%,O%,S:ȗ�1
6F�:x=�:C%=0:F=0:C=0:�:�ȗK%,O%,S:�S=0:�:ȗK%,O%,S:�-67�D=�:ly%=�:�
@*�S<>0:�K%>ty%�K%<R_%�O%>C_%�O%<S_%�x=�
JZ�x:By%=((K%-ty%)�128)+1:Dy%=((S_%-O%)�128)+1:�E$(By%,Dy%+1)="0"�Dy%<R%�C%=0C=.125:C%=1
T-�E$(By%,Dy%-1)="0"�Dy%>1�C%=0C=-.125:C%=2
^-�E$(By%-1,Dy%)="0"�By%>1�C%=0F=-.125:C%=3
h-�E$(By%+1,Dy%)="0"�By%<R%�C%=0F=.125:C%=4
r�C%<>0:�
|���My:J%=3-J%:ș6,112,J%:�0,3Ȝ0:`y%=h%-(8*F):Z_%=j%-(8*C):E$(h%,j%)=E$(`y%,Z_%):E$(`y%,Z_%)="0":Ry%=W%+128*`y%:Wy%=B%-Z_%*128:�Ry%,Wy%:�Ry%+124,Wy%+124:ș46,256+14,S%,"box":Ȗ:�Q=1�8:ș6,112,3-J%:ȓȐRy%,Wy%,124,124
��ș46,256+34,S%,"box",Ry%+(128*Q*F),Wy%-(128*Q*C),0:Ȗ:ș6,113,3-J%:J%=3-J%:T=�(3):�Q:J%=3-J%:Ȗ:ș6,113,3-J%:ș6,112,J%:ș46,256+34,S%,"box",Ry%+(1024*F),Wy%-(1024*C),0:ȓȐRy%,Wy%,124,124:Ȗ:ș6,113,J%:h%-=8*F:j%-=8*C:C%=0:F=0:C=0:l%+=1
��ș6,112,3-J%:ș46,290,S%,"rubbox",1000,260:�E(�(l%),1088,300,15,3):Ȗ:ș6,113,3-J%:Ȗ:ș6,112,J%:ș46,290,S%,"rubbox",1000,260:�ly%ȡ1,"Percussion-Soft":�1,-12,100,1
��E(�(l%),1088,300,15,3):�
�@��Ry:z$="":�E%=1�R%:�Z%=1�R%:z$=z$+E$(Z%,E%):�Z%:�E%:�z$=H$�
�;ș6,112,3-J%:�E("WELL DONE!",640,180,7,3):�p%>250�l%=p%
�	�y%�
�eo%+=(p%-l%)�10:�E("SKILL BONUS: "+�((p%-l%)�10),640,130,10,3):�E("TOTAL SCORE: "+�o%,640,80,15,3)
��:ș6,113,3-J%:D=�
��:�l%=p%�z$<>H$�
�tș6,112,3-J%:�E("You've run out of moves!",640,130,7,3):�E("Better luck next time",640,80,10,3):ș6,113,3-J%:D=�
��:�
�5��q:�0,63Ȝ192:�Z%=1�R%:�E%=1�R%:�E$(E%,Z%)<>"0"�
�iș46,290,S%,"blox",W%+128*E%,B%-Z%*128,0:p_%=W%+128*E%+64:k_%=B%-Z%*128+80:�E(E$(E%,Z%),p_%,k_%,63,3)
,�:�E%:�Z%:s$=�(p%):�s$="99999"�s$="NONE"
��E("MOVES",1088,400,3,3):�E("TAKEN",1088,350,3,3):�E(�(l%),1088,300,15,3):�E("MAXIMUM",1088,750,3,3):�E("MOVES",1088,700,3,3):�E(s$,1088,650,15,3):�y%�
3�E("SCORE",1088,550,20,3):�E(�o%,1088,500,30,3)
&F�:�E("Level "+�T%,192,750,48,3):�E("Puzzle "+�(D%),192,670,48,3):�
0D��E(Z$,ny%,o_%,z%,qy%):q_%=ny%-(�Z$*16):�5:�0Ȝ0:�qy%=2��63Ȝ192
:W�d_%=-4�4�4:�O_%=-4�4�4:�q_%+d_%,o_%+O_%:�Z$:�O_%:�d_%:�z%Ȝqy%*64:�q_%,o_%:�Z$:�:�
D(��M(L$,�A%):ș46,256+24,S%,L$�,,A%:�
Nr��Xy:L$=T$+".Grafix":w_%=�(L$):L%=�#w_%+64:�#w_%:�S%L%+80000:S%!0=L%+200*200:ș46,256+9,S%:ș46,256+10,S%,L$:�
XB� "Great Move!","You've played this before","Ouch! Good Stuff"
b=� "Nice one...","Not bad for a HUMAN!","Sweet move Dude!"
l=� "Got me thinking..","Tricky move","Looks good for you!"
v���Gy:ky%=1024*8:d=64:�m ky%:�Y=8�10�2:P%=m:L%=m+ky%:[OPTY:.N STMFD13!,{14}:ADR4,t:MOV5,#d:.n MOV2,#63:.u MOV3,#79:.j ADD6,2,3,LSL#6:LDRB7,[4,6]:CMP7,5:BNE h:ADR8,r:LDR0,a:LDR1,z:ADD7,3,2,LSL#6:ADD7,7,2,LSL#8:ADD0,0,7:ADD1,1,7:]:�k=1�4:[OPTY
��LDMIA8!,{9-12}:LDRB7,[0,9]:LDRB14,[1,9]:STRB7,[1,9]:STRB14,[0,9]:LDRB7,[0,10]:LDRB14,[1,10]:STRB7,[1,10]:STRB14,[0,10]:LDRB7,[0,11]:LDRB14,[1,11]:STRB7,[1,11]:STRB14,[0,11]:LDRB7,[0,12]:LDRB14,[1,12]:STRB7,[1,12]:STRB14,[0,12]:]:�:[OPTY
��.h SUBS3,3,#1:BPL j:SUBS2,2,#1:BPL u:SUBS5,5,#1:BNE n:LDMFD13!,{pc}:.a DCD0:.z DCD0:.r�B(64):.t�B(64*80+4):.P STMFD13!,{14}:LDR4,c:RSB4,4,#3:STR4,c:MOV0,#112:MOV1,4:SWI 6:MOV0,#113:RSB1,4,#3:SWI 6:ADR0,y:ADR1,H:SWI 49:LDMFD13!,{pc}:.c DCD1:.y DCD148
�JDCD-1:.H DCD0:]:�:�E%=0�3:�Z%=0�3:r!(4*E%+16*Z%)=80*E%+320*64*Z%:�:�:�
�ݤB(aJ%):P%+=aJ%:=0
� ��dy:�Q=0�64*80:t?Q=�(d):�:�
�UݤN(q$):�wy%,Q_%:ș8,17,q$�Q_%,,,,wy%:�Q_%<>1��203,"File '"+�W(q$)+"' not found!"
�=wy%
ƽ��Ty(Ly%,by%,W%,B%,q$,Ty%,wy%,t_%):UJ%=Ty%:PJ%=wy%:N_%=Ty%:F%!0=256:F%!12=0:F%!16=1:F%!20=Ly%:F%!24=by%:F%!28=W%:F%!32=B%:F%!36=wy%:F%!40=t_%:$(F%+44)=q$+�0:ș&400e7,17,F%,Ly%,by%�VJ%:�
�-ݤH(i$,Ty%,qJ%):�__%:__%=�N(i$):�__%>qJ%�
�<�C("File to load is too large!","Data loading error"):=0
��:ș8,16,i$,Ty%:=__%
�%��Yy:NJ%=�:�G("Wimp$Scrap")<>""�
�VF%!36=-1:$(F%+44)="<Wimp$Scrap>"+�0:F%!0=64:F%!12=F%!8:F%!16=2:ș&400e7,17,F%,F%!4
?�:�C("Wimp$Scrap not found. Run !System or !Scrap","Error")
�:�
1��Zy:F%!12=F%!8:F%!16=3:ș&400e7,17,F%,F%!4:�
 _��Ky:�X_%,my%:X_%=F%!24:ș&400f1,g_%,N_%,F%!4,F%!20,X_%:my%=UJ%+PJ%-N_%:�my%>X_%�my%=X_%��J
*?N_%+=my%:F%!12=F%!8:F%!16=7:F%!24=my%:ș&400e7,17,F%,F%!4:�
42��W(D$,Jy%,Ty%,d%):ș8,10,D$,Jy%,,Ty%,Ty%+d%:�
>r��c(X%,V%):�W%,B%:M%!0=X%:ș&400cb,,M%:W%=M%!4-M%!20:B%=M%!16-M%!24:M%!4=V%:ș&400ce,,M%:�(M%!24�45056)=45056�
H�(M%!24�&800000)=&800000�
RrM%!4=5:M%!8+=W%:M%!12+=B%:M%!16+=W%:M%!20+=B%:M%!24=-1:M%!28=-1:M%!32=&7fffffff:M%!36=&7fffffff:ș&400d0,,M%:�
\>ݤZ(X%,V%):M%!0=X%:M%!4=V%:ș&400ce,,M%:�(M%!24�257)<>257�
f,�202,"Icon "+�by%+" not indirected!":=""
p
�:=$M%!28
z@ݤE(X%,V%):M%!0=X%:M%!4=V%:ș&400ce,,M%:�(M%!24�1<<21)�=��=�
�=�
�F��z(X%,V%,c_%):M%!0=X%:M%!4=V%:ș&400ce,,M%:�(M%!24�57601)<>57601�
�:�202,"Icon "+�V%+" not writable and not indirected!":�
��:S$=$M%!28:�c_%>�S$c_%=�S$
�ș&400d2,X%,V%,0,0,-1,c_%:�
�A��A(X%,V%,S$):M%!0=X%:M%!4=V%:ș&400ce,,M%:�(M%!24�257)<>257�
�)�202,"Icon "+�V%+" not indirected!":�
�=�:S$=�S$,M%!36-1):$M%!28=S$:M%!8=0:M%!12=0:ș&400cd,,M%:�
�D��S(X%,V%,sJ%):M%!0=X%:M%!4=V%:M%!12=1<<21:�sJ%M%!8=1<<21�M%!8=0
�ș&400cd,,M%:�
�/ݤI(Sy$,Fy$):�yy%:�Fy$="RIGHT"!M%=-1�!M%=-2
�VM%!4=0:M%!8=0:M%!12=68:M%!16=68:M%!20=&1700202a:$(M%+24)=Sy$:ș&400c2,,M%�yy%:=yy%
�P��Ay(X%,x$,Ay$,Jy$,Ey$):�A(X%,1,x$):�A(X%,2,Ay$):�A(X%,3,Jy$):�A(X%,4,Ey$):�
?ݤK(t$):�V_%:V_%=200:ș&400c0,V_%,&4b534154,t$�V_%,g_%:=g_%
i��Ly(A$):�Iy%,Ky%,U$,B_%,N$,Ey%,Py%:Ky%=&7000021:B_%=-1:Ey%=�:N$=�T(A$):Py%=�N$:�:U$=�X(A$):Ȏ�U$,4)�
�"tick":Iy%=Iy%�1
$�"line":Iy%=Iy%�2
.�"shad":Ky%=Ky%�&400000
8�"subm":B_%=�D(�C(U$))
B�"wind":B_%=�U(�C(U$))
L�"icon":Ky%=�L(�C(U$))
V�"writ":�ey(�C(U$))
`-�:�U$="":N%!0=Iy%:N%!4=B_%:�(N$)>12�Ey%�
jN%!8=Ky%�256:�d(N%,Ey%,Py%)
t$�:N%!8=Ky%:$(N%+12)=�N$+�(0),12)
~�:N%+=24:�
�!ݤF(A$):�A$,9)="beginmenu"=�
�=�
�7ݤ_(I_%,KJ%):�o$:ș&400d5,,I_%,KJ%,F%+256�,,,o$:=o$
�R��ay(Y%,Ay%,E_%,WJ%):�I_% (Y%*28)+(Ay%*24):�J%(Y%):�S%(Y%):�W%(E_%):�B%(E_%):�
�#ݤM(w%):�F$:�w%<1�w%>�(W%(),1)�
�7�201,"writable menu item "+�(w%)+" does not exist!"
�3�:w%=W%(w%):F$="":ȕ?w%>31:F$+=�?w%:w%+=1:�:=F$
�d��O:�py%,A$:�#H%=0:�:py%=�#H%:A$=�#H%:��F(A$)��#H%:��#H%�200,"No 'beginmenu' found in menu file"
��#H%=py%:�
���d(t%,Ey%,d%):�Zy%:�Ey%�
��Zy%d%+1
��:�Zy%1+�N$
"�:t%!12=Zy%:$Zy%=N$+�(0):�Ey%�

/W%(Ey%)=Zy%:B%(Ey%)=d%:Zy%+=d%+1:t%!20=d%+1
�:Zy%+=1+�N$:t%!20=1+�N$
�:?Zy%=0:t%!16=Zy%:�
(P��Ny(r$):�Y%,fy%,A$,N%,I_%:�l(r$):H%=�r$:�b:�O:Y%=0:fy%=�:�:A$=�#H%:�F(A$)�
25�fy%�200,"Bad menu file, no items in menu "+�(Y%)
<
�Y%�R(N%)
F)Y%+=1:A$=�#H%:�Qy(N%,A$,J%(Y%)):fy%=�
P�:�Ly(A$):fy%=�
ZW�:��#H%:�R(N%):ș&2000d,0,H%:H%=0:�fy%�200,"Bad menu file, no items in menu "+�(Y%)
d�
ni��Qy(�N%,t$,hy%):$N%=�t$,12)+�(0):N%?12=7:N%?13=2:N%?14=7:N%?15=0:N%!16=hy%:N%!20=44:N%!24=0:N%+=28:�
x#��R(N%):!(N%-24)=!(N%-24)�128:�
���J:ș&400d4,,-1:�
�YݤR(t%):�Ay%,K_%,h_%:Ay%=1:h_%=t%!20+t%!24:t%+=28:ȕ(!t%�128)=0:Ay%+=1:�(!t%�2)K_%+=1
�t%+=24:�:�(!t%�2)K_%+=1
�=Ay%*h_%+K_%*24
�6ݤL(M$):�M$=""�200,"Menu icon flag value missing!"
�
=�(M$)
�ݤX(�B$):�U$:�B$,",")�
�)B$=�B$,�B$,",")+1):U$=�B$,�B$,",")-1)
��:U$=""
�	�:=U$
�'ݤT(B$):�B$,",")B$=�B$,�B$,",")-1)
�=B$
�JݤQ(Vy%):�R$:R$=�(!Vy%):Vy%+=4:ȕ!Vy%<>-1:R$+="."+�(!Vy%):Vy%+=4:�:=R$
%ݤD(M$):�(M$)<1��(M$)>�(S%(),1)�
:�200,"Can't find menu "+M$+", as referred to in:- "+U$
�:�(M$)=Y%�
"G�200,"An item in menu "+M$+" cannot have menu "+M$+" as a submenu!"
,�:=S%(�(M$))
65ݤC(M$):M$=�M$,�M$,"(")+1):M$=�M$,�M$,")")-1):=M$
@NݤU(M$):�yy%:�:�0,"Menu file error. Window variable "+M$+" not found."
Jyy%=�(M$):�yy%<1�
Tș&2000d,0,H%:�
^
�:=yy%
h��ey(M$):Py%=0:�M$,":")�
r,Py%=�(�M$,�M$,":")+1)):�(N$)>Py%Py%=�N$
|
�:Py%=�N$
��:Iy%=Iy%�4:Ey%=�(M$):�
�"��k(w%,S$):�w%<1�w%>�(W%(),1)�
�7�201,"writable menu item "+�(w%)+" does not exist!"
��:�S$>B%(w%)�
� �S$>100S$=�S$,100)+"......"
�<�201,"Text '"+S$+"' too long for writable item "+�w%+"!"
��:$W%(w%)=S$:�
�5��b:�Ay%,A$,hy%:Y%=0:N%=I_%:�O:�:A$=�#H%:�F(A$)�
�KS%(Y%+1)=I_%+(Y%*28)+(Ay%*24):A$=�#H%:Y%+=1:A$=�A$,12):J%(Y%)=12+16*�A$
��:Ay%+=1:�A$,",")�
� hy%=12+16*�(�A$,�A$,",")-1))
��:hy%=12+16*�A$
��:�hy%>J%(Y%)J%(Y%)=hy%

�:��#H%:�
8��l(r$):�Y%,Ay%,E_%,WJ%,A$:H%=�r$:�:A$=�#H%:�F(A$)�
Y%+=1:A$=�#H%
&�:�A$,",writ")E_%+=1
0�A$,",wind")WJ%+=1
:
Ay%+=1
D4�:��#H%:ș&2000d,0,H%:H%=0:�ay(Y%,Ay%,E_%,WJ%):�
NݤJ(N%,d%):�F$:�d%=0d%=255
X�N%=N%�N%+d%-1:�?N%<32�
b=F$
l�:F$+=�(?N%)
v�:�:=F$
�/ݤW(R$):ȕ�R$,"."):R$=�R$,�R$,".")+1):�:=R$
�7��C(c$,t$):c$=�0+�0+�0+�0+c$+�0:ș&400df,c$,18,t$:�
�ZݤG(d$):�d%:ș&20023,d$+�(0),M%,-1�,,d%:�d%=0��0,"System variable '"+d$+"' not found!"
�4ș&20023,d$+�(0),M%,255,,3�,,d%:?(M%+d%)=13:=$M%
�>ݤY(X%,V%):�F$:M%!0=X%:M%!4=V%:ș&400ce,,M%:Ȏ(M%!24�259)�
��2,3:=�J(M%!28,256)
��258:�M%!36>0�
�=�J(M%!28,M%!36)
�,�:�202,"No sprite name in icon "+�V%:=""
��
��259:=��J(M%!32,M%!36),2)
�,:�202,"No sprite name in icon "+�V%:=""
�	�:=F$
$ݤP(X%,V%):=�("&"+¤Y(X%,V%),3))
IݤS(Zy$,f$,�zJ%,wJ%):�X%:ș&400d9,,Zy$:X%=�V(f$,zJ%,wJ%):ș&400da:=X%
LݤV(f$,�Vy%,TJ%):�Q_%,X%:ș&400db,,F%,Vy%,TJ%,-1,f$,0�,,Vy%,,,,Q_%:�Q_%�
 ș&400c1,,F%�X%
*:�:��0,"Window "+f$+" not found in template file!":X%=0
4	�:=X%
>.��Q(X%):!M%=X%:ș&400cb,,M%:ș&400c5,,M%:�
�
00000000  0d 00 0a 0f f4 3e 4d 61  6e 69 61 44 65 6d 6f 0d  |.....>ManiaDemo.|
00000010  00 14 18 ee 85 f6 3a f1  22 20 61 74 20 6c 69 6e  |......:." at lin|
00000020  65 20 22 3b 9e 3a e0 0d  00 1e 21 c8 99 26 34 30  |e ";.:....!..&40|
00000030  36 63 30 3a f2 4f 79 3a  f2 74 3a ee 85 f2 49 28  |6c0:.Oy:.t:...I(|
00000040  9f 2c f6 24 29 3a f2 44  0d 00 28 38 52 4a 25 3d  |.,.$):.D..(8RJ%=|
00000050  a4 4b 28 56 24 29 3a f2  76 3a f2 45 79 3a f2 72  |.K(V$):.v:.Ey:.r|
00000060  79 3a f2 6e 3a f2 78 79  3a f2 5f 79 3a c8 99 26  |y:.n:.xy:._y:..&|
00000070  34 30 36 63 31 3a ee 85  f2 49 28 9f 2c f6 24 29  |406c1:...I(.,.$)|
00000080  0d 00 32 0a f2 55 79 3a  f2 44 0d 00 3c f4 dd f2  |..2..Uy:.D..<...|
00000090  4f 79 3a ea 48 5f 25 3a  48 5f 25 3d 32 35 36 30  |Oy:.H_%:H_%=2560|
000000a0  3a de 46 25 48 5f 25 3a  de 4d 25 48 5f 25 3a de  |:.F%H_%:.M%H_%:.|
000000b0  42 4a 25 32 35 36 3a de  60 5f 25 32 30 34 38 3a  |BJ%256:.`_%2048:|
000000c0  55 79 25 3d 60 5f 25 3a  46 79 25 3d 60 5f 25 2b  |Uy%=`_%:Fy%=`_%+|
000000d0  32 30 34 38 3a de 7a 79  25 31 32 38 30 3a de 5a  |2048:.zy%1280:.Z|
000000e0  4a 25 38 30 3a de 55 20  38 3a de 47 20 34 3a de  |J%80:.U 8:.G 4:.|
000000f0  43 24 28 33 30 29 2c 41  25 28 36 30 29 2c 50 25  |C$(30),A%(60),P%|
00000100  28 36 2c 32 35 2c 32 35  29 2c 4d 24 28 36 2c 34  |(6,25,25),M$(6,4|
00000110  29 2c 53 24 28 35 2c 31  30 30 29 3a de 4a 24 28  |),S$(5,100):.J$(|
00000120  35 2c 31 30 30 29 2c 46  25 28 35 2c 31 30 30 29  |5,100),F%(5,100)|
00000130  2c 46 24 28 33 29 2c 4b  25 28 38 29 2c 59 25 28  |,F$(3),K%(8),Y%(|
00000140  38 29 2c 58 25 28 38 29  2c 43 25 28 35 2c 31 30  |8),X%(8),C%(5,10|
00000150  30 29 3a de 71 25 28 33  2c 37 29 2c 4d 25 28 31  |0):.q%(3,7),M%(1|
00000160  32 29 2c 5f 25 28 33 29  2c 44 25 28 32 29 2c 45  |2),_%(3),D%(2),E|
00000170  25 28 32 35 2c 32 35 29  2c 50 24 28 39 29 0d 00  |%(25,25),P$(9)..|
00000180  46 ea de 5a 25 28 39 2c  33 29 2c 41 24 28 34 30  |F..Z%(9,3),A$(40|
00000190  29 2c 5a 24 28 34 30 29  3a de 56 25 28 35 29 2c  |),Z$(40):.V%(5),|
000001a0  4f 25 28 35 29 2c 42 24  28 35 29 2c 57 24 28 35  |O%(5),B$(5),W$(5|
000001b0  29 2c 4c 25 28 34 29 2c  54 25 28 31 30 2c 32 29  |),L%(4),T%(10,2)|
000001c0  3a de 4e 25 28 34 29 2c  48 25 28 34 29 2c 55 25  |:.N%(4),H%(4),U%|
000001d0  28 38 29 2c 61 25 28 38  29 2c 45 28 38 29 2c 47  |(8),a%(8),E(8),G|
000001e0  25 28 38 29 3a de 49 25  28 35 2c 35 29 2c 52 25  |%(8):.I%(5,5),R%|
000001f0  28 32 35 29 2c 51 25 28  32 35 2c 31 29 3a de 45  |(25),Q%(25,1):.E|
00000200  24 28 35 2c 35 29 3a 4d  4a 25 3d 34 30 39 36 3a  |$(5,5):MJ%=4096:|
00000210  de 75 25 4d 4a 25 3a 69  25 3d 33 35 3a e3 70 79  |.u%MJ%:i%=35:.py|
00000220  25 3d 75 25 b8 75 25 2b  31 30 30 3a 24 70 79 25  |%=u%.u%+100:$py%|
00000230  3d bd 28 30 29 3a ed 3a  24 75 25 3d 22 4e 4f 20  |=.(0):.:$u%="NO |
00000240  52 45 53 55 4c 54 53 20  44 41 54 41 20 43 55 52  |RESULTS DATA CUR|
00000250  52 45 4e 54 4c 59 20 52  45 43 4f 52 44 45 44 22  |RENTLY RECORDED"|
00000260  2b bd 28 31 30 29 3a e1  0d 00 50 f0 dd f2 74 3a  |+.(10):...P...t:|
00000270  6d 24 3d 22 21 6d 61 6e  69 61 64 65 6d 6f 22 3a  |m$="!maniademo":|
00000280  56 24 3d 22 4d 61 74 68  6d 61 6e 69 61 20 44 65  |V$="Mathmania De|
00000290  6d 6f 22 3a 6e 24 3d 22  4d 61 74 68 73 20 50 75  |mo":n$="Maths Pu|
000002a0  7a 7a 6c 65 73 22 3a 67  24 3d 22 a9 31 39 39 34  |zzles":g$=".1994|
000002b0  20 4d 61 72 74 69 6e 20  47 6f 6c 64 62 65 72 67  | Martin Goldberg|
000002c0  22 3a 6a 24 3d 22 56 65  72 73 69 6f 6e 20 31 2e  |":j$="Version 1.|
000002d0  30 30 2c 20 32 38 74 68  20 44 65 63 20 31 39 39  |00, 28th Dec 199|
000002e0  34 22 3a 54 24 3d a4 47  28 22 4f 62 65 79 24 44  |4":T$=.G("Obey$D|
000002f0  69 72 22 29 3a 4f 24 3d  54 24 2b 22 2e 63 68 6f  |ir"):O$=T$+".cho|
00000300  69 63 65 73 22 3a 6b 24  3d 54 24 2b 22 2e 68 69  |ices":k$=T$+".hi|
00000310  67 68 73 22 3a 73 5f 25  3d 30 3a 48 25 3d 30 3a  |ghs":s_%=0:H%=0:|
00000320  47 4a 25 3d 2d 32 3a 59  79 25 3d 34 3a 78 79 25  |GJ%=-2:Yy%=4:xy%|
00000330  3d 31 3a 6a 5f 25 3d 36  34 3a 75 5f 25 3d 31 36  |=1:j_%=64:u_%=16|
00000340  3a 45 4a 25 3d 32 3a 62  5f 25 3d 30 3a 47 5f 25  |:EJ%=2:b_%=0:G_%|
00000350  3d 30 3a 57 5f 25 3d a3  0d 00 5a eb 56 3d b9 3a  |=0:W_%=...Z.V=.:|
00000360  4f 3d a3 3a 43 25 28 29  3d 30 3a 44 25 3d 30 3a  |O=.:C%()=0:D%=0:|
00000370  43 25 3d 31 3a 4a 25 3d  31 3a 6d 5f 25 3d 30 3a  |C%=1:J%=1:m_%=0:|
00000380  69 5f 25 3d 30 3a 58 3d  a3 3a 54 3d b3 28 2d 91  |i_%=0:X=.:T=.(-.|
00000390  29 3a 54 25 3d 31 3a 42  3d a3 3a 6b 25 3d 30 3a  |):T%=1:B=.:k%=0:|
000003a0  77 24 3d 22 4e 4f 22 3a  62 25 3d 30 3a 67 25 3d  |w$="NO":b%=0:g%=|
000003b0  30 3a 55 25 3d 33 3a 51  25 3d 33 3a 55 21 30 3d  |0:U%=3:Q%=3:U!0=|
000003c0  31 34 39 3a 55 21 34 3d  2d 31 3a 49 3d a3 3a 4c  |149:U!4=-1:I=.:L|
000003d0  3d a3 3a 4d 79 25 3d 30  3a 67 3d a3 3a 4d 24 28  |=.:My%=0:g=.:M$(|
000003e0  31 2c 31 29 3d 22 30 31  30 32 30 34 30 35 31 30  |1,1)="0102040510|
000003f0  30 30 31 30 22 3a 4d 24  28 31 2c 32 29 3d 22 30  |0010":M$(1,2)="0|
00000400  32 30 33 30 34 30 35 30  36 30 37 30 38 30 39 31  |2030405060708091|
00000410  30 30 30 32 30 22 3a 4d  24 28 31 2c 33 29 3d 22  |00020":M$(1,3)="|
00000420  30 33 30 34 30 35 30 36  30 37 30 38 30 39 31 30  |0304050607080910|
00000430  31 31 31 32 31 35 32 30  33 30 34 30 35 30 30 31  |1112152030405001|
00000440  30 30 22 0d 00 64 f9 4d  24 28 31 2c 34 29 3d 22  |00"..d.M$(1,4)="|
00000450  30 33 30 34 30 35 30 36  30 37 30 38 30 39 31 30  |0304050607080910|
00000460  31 31 31 32 31 35 32 30  33 30 34 30 35 30 31 33  |1112152030405013|
00000470  31 34 31 36 31 37 31 38  31 39 30 35 30 30 22 3a  |14161718190500":|
00000480  e3 45 25 3d 31 38 38 b8  32 30 38 3a 76 24 3d 76  |.E%=188.208:v$=v|
00000490  24 2b bd 28 45 25 29 3a  ed 45 25 3a 43 79 24 3d  |$+.(E%):.E%:Cy$=|
000004a0  22 31 39 31 38 31 37 31  36 31 35 32 39 31 34 32  |"191817161529142|
000004b0  37 31 33 33 38 34 39 31  32 34 37 33 35 35 38 32  |7133849124735582|
000004c0  33 33 34 37 39 34 35 35  36 37 38 22 3a 6f 25 3d  |33479455678":o%=|
000004d0  30 3a 63 25 3d 35 32 3a  5a 25 28 29 3d 30 3a 5f  |0:c%=52:Z%()=0:_|
000004e0  79 25 3d 30 3a 6a 79 25  3d 30 3a 72 79 25 3d 30  |y%=0:jy%=0:ry%=0|
000004f0  3a 79 25 3d a3 3a 53 24  28 29 3d 22 22 3a 4a 24  |:y%=.:S$()="":J$|
00000500  28 29 3d 22 22 3a 46 25  28 29 3d 30 3a 4b 3d ad  |()="":F%()=0:K=.|
00000510  28 54 24 2b 22 2e 51 75  65 73 42 61 73 65 22 29  |(T$+".QuesBase")|
00000520  3a e3 5a 25 3d 31 b8 31  3a e8 23 4b 2c 46 25 28  |:.Z%=1.1:.#K,F%(|
00000530  5a 25 2c 30 29 3a 45 25  3d 31 3a f5 0d 00 6e a1  |Z%,0):E%=1:...n.|
00000540  e8 23 4b 2c 53 24 28 5a  25 2c 45 25 29 2c 4a 24  |.#K,S$(Z%,E%),J$|
00000550  28 5a 25 2c 45 25 29 2c  46 25 28 5a 25 2c 45 25  |(Z%,E%),F%(Z%,E%|
00000560  29 3a 45 25 2b 3d 31 3a  fd 53 24 28 5a 25 2c 45  |):E%+=1:.S$(Z%,E|
00000570  25 2d 31 29 3d 22 5a 5a  5a 22 3a ed 5a 25 3a d9  |%-1)="ZZZ":.Z%:.|
00000580  23 4b 3a 77 3d ad 28 54  24 2b 22 2e 6d 61 7a 65  |#K:w=.(T$+".maze|
00000590  73 22 29 3a e3 4a 25 3d  31 b8 31 3a e3 45 25 3d  |s"):.J%=1.1:.E%=|
000005a0  31 b8 32 32 3a e8 23 77  2c 43 24 28 45 25 29 3a  |1.22:.#w,C$(E%):|
000005b0  ed 3a e3 5a 25 3d 31 b8  32 32 3a e3 45 25 3d 31  |.:.Z%=1.22:.E%=1|
000005c0  b8 32 32 3a 5a 24 3d c1  43 24 28 5a 25 29 2c 45  |.22:Z$=.C$(Z%),E|
000005d0  25 2c 31 29 3a e7 5a 24  3e 22 40 22 8c 0d 00 78  |%,1):.Z$>"@"...x|
000005e0  19 50 25 28 4a 25 2c 45  25 2c 5a 25 29 3d 97 28  |.P%(J%,E%,Z%)=.(|
000005f0  5a 24 29 2d 35 35 0d 00  82 23 cc 3a 50 25 28 4a  |Z$)-55...#.:P%(J|
00000600  25 2c 45 25 2c 5a 25 29  3d bb 28 c1 43 24 28 5a  |%,E%,Z%)=.(.C$(Z|
00000610  25 29 2c 45 25 2c 31 29  29 0d 00 8c d6 cd 3a ed  |%),E%,1)).....:.|
00000620  3a ed 3a ed 3a d9 23 77  3a 52 3d ad 28 54 24 2b  |:.:.:.#w:R=.(T$+|
00000630  22 2e 68 69 67 68 73 22  29 3a 43 79 25 3d 30 3a  |".highs"):Cy%=0:|
00000640  e3 5a 25 3d 30 b8 33 3a  e3 45 25 3d 31 b8 31 30  |.Z%=0.3:.E%=1.10|
00000650  3a 78 24 3d 22 22 3a 51  24 3d 22 22 3a f5 3a 43  |:x$="":Q$="":.:C|
00000660  79 25 3d 9a 23 52 3a 78  24 2b 3d bd 28 43 79 25  |y%=.#R:x$+=.(Cy%|
00000670  2d 31 30 29 3a fd 43 79  25 3d 35 34 3a f5 3a 43  |-10):.Cy%=54:.:C|
00000680  79 25 3d 9a 23 52 3a 51  24 2b 3d bd 28 43 79 25  |y%=.#R:Q$+=.(Cy%|
00000690  2d 31 30 29 3a fd 43 79  25 3d 35 34 3a 41 24 28  |-10):.Cy%=54:A$(|
000006a0  5a 25 2a 31 30 2b 45 25  29 3d c0 78 24 29 3a 5a  |Z%*10+E%)=.x$):Z|
000006b0  24 28 5a 25 2a 31 30 2b  45 25 29 3d c0 51 24 29  |$(Z%*10+E%)=.Q$)|
000006c0  3a ed 45 25 3a ed 5a 25  3a d9 23 52 3a 79 5f 25  |:.E%:.Z%:.#R:y_%|
000006d0  3d 30 3a 55 5f 25 3d 31  3a 47 79 25 3d 32 3a 59  |=0:U_%=1:Gy%=2:Y|
000006e0  4a 25 3d b9 3a 48 4a 25  3d 31 30 32 34 3a e1 0d  |J%=.:HJ%=1024:..|
000006f0  00 96 1c dd f2 76 3a 4f  4a 25 3d a4 49 28 6d 24  |.....v:OJ%=.I(m$|
00000700  2c 22 52 49 47 48 54 22  29 3a e1 0d 00 a0 0e dd  |,"RIGHT"):......|
00000710  f2 45 79 3a f2 58 79 3a  e1 0d 00 aa ee dd f2 72  |.Ey:.Xy:.......r|
00000720  79 3a 41 4a 25 3d a4 53  28 22 3c 54 65 6d 70 24  |y:AJ%=.S("<Temp$|
00000730  44 69 72 3e 22 2c 22 69  6e 66 6f 25 22 2c 55 79  |Dir>","info%",Uy|
00000740  25 2c 46 79 25 29 3a 64  79 25 3d a4 53 28 22 3c  |%,Fy%):dy%=.S("<|
00000750  54 65 6d 70 24 44 69 72  3e 22 2c 22 68 69 67 68  |Temp$Dir>","high|
00000760  73 25 22 2c 55 79 25 2c  46 79 25 29 3a 73 25 3d  |s%",Uy%,Fy%):s%=|
00000770  a4 53 28 22 3c 54 65 6d  70 24 44 69 72 3e 22 2c  |.S("<Temp$Dir>",|
00000780  22 73 61 76 65 69 74 25  22 2c 55 79 25 2c 46 79  |"saveit%",Uy%,Fy|
00000790  25 29 3a 49 25 3d a4 53  28 22 3c 54 65 6d 70 24  |%):I%=.S("<Temp$|
000007a0  44 69 72 3e 22 2c 22 63  68 6f 69 63 65 25 22 2c  |Dir>","choice%",|
000007b0  55 79 25 2c 46 79 25 29  3a 71 25 3d a4 53 28 22  |Uy%,Fy%):q%=.S("|
000007c0  3c 54 65 6d 70 24 44 69  72 3e 22 2c 22 72 65 73  |<Temp$Dir>","res|
000007d0  75 6c 74 25 22 2c 55 79  25 2c 46 79 25 29 3a 6d  |ult%",Uy%,Fy%):m|
000007e0  25 3d a4 53 28 22 3c 54  65 6d 70 24 44 69 72 3e  |%=.S("<Temp$Dir>|
000007f0  22 2c 22 77 65 6c 63 6f  6d 65 25 22 2c 55 79 25  |","welcome%",Uy%|
00000800  2c 46 79 25 29 3a e1 0d  00 b4 79 dd f2 73 79 3a  |,Fy%):....y..sy:|
00000810  ea 49 24 2c 78 4a 25 2c  45 25 2c 61 24 3a 49 24  |.I$,xJ%,E%,a$:I$|
00000820  3d 22 22 3a 54 3d a4 48  28 4f 24 2c 7a 79 25 2c  |="":T=.H(O$,zy%,|
00000830  32 35 36 29 3a e3 45 25  3d 30 b8 31 31 3a 49 24  |256):.E%=0.11:I$|
00000840  2b 3d bd 28 7a 79 25 3f  45 25 29 3a ed 45 25 3a  |+=.(zy%?E%):.E%:|
00000850  e3 45 25 3d 32 b8 35 3a  f2 53 28 49 25 2c 45 25  |.E%=2.5:.S(I%,E%|
00000860  2c 30 29 3a e7 c1 49 24  2c 45 25 2d 31 2c 31 29  |,0):..I$,E%-1,1)|
00000870  3d 22 31 22 8c f2 53 28  49 25 2c 45 25 2c 31 29  |="1"..S(I%,E%,1)|
00000880  0d 00 be 2d ed 45 25 3a  e3 45 25 3d 37 b8 31 30  |...-.E%:.E%=7.10|
00000890  3a e7 c1 49 24 2c 45 25  2d 32 2c 31 29 3d 22 31  |:..I$,E%-2,1)="1|
000008a0  22 8c f2 53 28 49 25 2c  45 25 2c 31 29 0d 00 c8  |"..S(I%,E%,1)...|
000008b0  22 ed 45 25 3a e7 bb 28  c1 49 24 2c 39 2c 31 29  |".E%:..(.I$,9,1)|
000008c0  29 3d 31 8c f2 53 28 49  25 2c 31 38 2c 31 29 0d  |)=1..S(I%,18,1).|
000008d0  00 d2 1f e7 bb 28 c1 49  24 2c 31 30 2c 31 29 29  |.....(.I$,10,1))|
000008e0  3d 31 8c f2 53 28 49 25  2c 32 31 2c 31 29 0d 00  |=1..S(I%,21,1)..|
000008f0  dc 1f e7 bb 28 c1 49 24  2c 31 31 2c 31 29 29 3d  |....(.I$,11,1))=|
00000900  31 8c f2 53 28 49 25 2c  32 35 2c 31 29 0d 00 e6  |1..S(I%,25,1)...|
00000910  2a 61 24 3d c2 49 24 2c  31 29 3a f2 41 28 49 25  |*a$=.I$,1):.A(I%|
00000920  2c 31 33 2c 61 24 29 3a  e7 a4 45 28 49 25 2c 32  |,13,a$):..E(I%,2|
00000930  35 29 8c 79 25 3d b9 0d  00 f0 05 e1 0d 00 fa 0d  |5).y%=..........|
00000940  dd f2 6e 3a f2 73 79 3a  e1 0d 01 04 1f dd f2 78  |..n:.sy:.......x|
00000950  79 3a f2 41 79 28 41 4a  25 2c 56 24 2c 6e 24 2c  |y:.Ay(AJ%,V$,n$,|
00000960  67 24 2c 6a 24 29 3a e1  0d 01 0e 1b dd f2 5f 79  |g$,j$):......._y|
00000970  3a f2 4e 79 28 54 24 2b  22 2e 6d 65 6e 75 73 22  |:.Ny(T$+".menus"|
00000980  29 3a e1 0d 01 18 29 dd  f2 55 79 3a f5 3a c8 99  |):....)..Uy:.:..|
00000990  26 34 30 30 65 31 2c 62  5f 25 2c 46 25 2c 47 5f  |&400e1,b_%,F%,G_|
000009a0  25 b8 53 4a 25 3a c8 8e  53 4a 25 ca 0d 01 22 09  |%.SJ%:..SJ%...".|
000009b0  c9 30 3a f2 72 0d 01 2c  09 c9 32 3a f2 68 0d 01  |.0:.r..,..2:.h..|
000009c0  36 16 c9 33 3a 4c 79 25  3d 21 46 25 3a f2 50 28  |6..3:Ly%=!F%:.P(|
000009d0  4c 79 25 29 0d 01 40 0a  c9 36 3a f2 56 79 0d 01  |Ly%)..@..6:.Vy..|
000009e0  4a 09 c9 37 3a f2 69 0d  01 54 0a c9 38 3a f2 67  |J..7:.i..T..8:.g|
000009f0  79 0d 01 5e 0a c9 39 3a  f2 66 79 0d 01 68 0a c9  |y..^..9:.fy..h..|
00000a00  31 37 3a f2 48 0d 01 72  0a c9 31 38 3a f2 48 0d  |17:.H..r..18:.H.|
00000a10  01 7c 0a c9 31 39 3a f2  75 0d 01 86 18 cb 3a fd  |.|..19:.u.....:.|
00000a20  57 5f 25 3a 2a 52 4d 4b  49 4c 4c 20 53 46 58 2d  |W_%:*RMKILL SFX-|
00000a30  31 0d 01 90 11 2a 52 4d  4b 49 4c 4c 20 53 46 58  |1....*RMKILL SFX|
00000a40  2d 32 0d 01 9a 11 2a 52  4d 4b 49 4c 4c 20 53 46  |-2....*RMKILL SF|
00000a50  58 2d 33 0d 01 a4 11 2a  52 4d 4b 49 4c 4c 20 53  |X-3....*RMKILL S|
00000a60  46 58 2d 34 0d 01 ae 11  2a 52 4d 4b 49 4c 4c 20  |FX-4....*RMKILL |
00000a70  53 46 58 2d 35 0d 01 b8  20 ff 28 22 2a 52 4d 4b  |SFX-5... .("*RMK|
00000a80  49 4c 4c 20 53 46 58 2d  36 a0 a0 22 29 3a f2 54  |ILL SFX-6.."):.T|
00000a90  3a f2 44 3a e1 0d 01 c2  1b dd f2 72 3a c8 99 36  |:.D:.......r:..6|
00000aa0  36 b8 47 5f 25 3a 47 5f  25 2b 3d 31 30 30 3a e1  |6.G_%:G_%+=100:.|
00000ab0  0d 01 cc 16 dd f2 68 3a  c8 99 26 34 30 30 63 35  |......h:..&400c5|
00000ac0  2c 2c 46 25 3a e1 0d 01  d6 23 dd f2 50 28 4c 79  |,,F%:....#..P(Ly|
00000ad0  25 29 3a 21 46 25 3d 4c  79 25 3a c8 99 26 34 30  |%):!F%=Ly%:..&40|
00000ae0  30 63 36 2c 2c 46 25 3a  e1 0d 01 e0 3b dd f2 56  |0c6,,F%:....;..V|
00000af0  79 3a 6e 5f 25 3d 46 25  21 30 3a 49 4a 25 3d 46  |y:n_%=F%!0:IJ%=F|
00000b00  25 21 34 3a 73 79 25 3d  46 25 21 38 3a 58 25 3d  |%!4:sy%=F%!8:X%=|
00000b10  46 25 21 31 32 3a 56 25  3d 46 25 21 31 36 3a c8  |F%!12:V%=F%!16:.|
00000b20  8e 58 25 ca 0d 01 ea 0b  c9 47 4a 25 3a f2 79 0d  |.X%......GJ%:.y.|
00000b30  01 f4 0b c9 49 25 3a f2  74 79 0d 01 fe 0b c9 71  |....I%:.ty.....q|
00000b40  25 3a f2 4a 79 0d 02 08  0a c9 73 25 3a f2 70 0d  |%:.Jy.....s%:.p.|
00000b50  02 12 0b c9 64 79 25 3a  f2 6f 0d 02 1c 07 cb 3a  |....dy%:.o.....:|
00000b60  e1 0d 02 26 5d dd f2 69  3a ea 4c 79 25 2c 62 79  |...&]..i:.Ly%,by|
00000b70  25 2c 57 25 2c 42 25 2c  71 24 2c 54 79 25 2c 77  |%,W%,B%,q$,Ty%,w|
00000b80  79 25 2c 74 5f 25 3a c8  99 26 34 30 30 63 66 2c  |y%,t_%:..&400cf,|
00000b90  2c 46 25 3a 57 25 3d 46  25 21 30 3a 42 25 3d 46  |,F%:W%=F%!0:B%=F|
00000ba0  25 21 34 3a 4c 79 25 3d  46 25 21 31 32 3a 62 79  |%!4:Ly%=F%!12:by|
00000bb0  25 3d 46 25 21 31 36 3a  c8 8e 65 5f 25 ca 0d 02  |%=F%!16:..e_%...|
00000bc0  30 0e c9 73 25 3a e7 69  25 3e 30 8c 0d 02 3a 57  |0..s%:.i%>0...:W|
00000bd0  71 24 3d a4 57 28 a4 5a  28 73 25 2c 55 5f 25 29  |q$=.W(.Z(s%,U_%)|
00000be0  29 3a f2 47 3a 54 79 25  3d 75 25 3a 77 79 25 3d  |):.G:Ty%=u%:wy%=|
00000bf0  69 25 3a 74 5f 25 3d a4  50 28 73 25 2c 47 79 25  |i%:t_%=.P(s%,Gy%|
00000c00  29 3a f2 54 79 28 4c 79  25 2c 62 79 25 2c 57 25  |):.Ty(Ly%,by%,W%|
00000c10  2c 42 25 2c 71 24 2c 54  79 25 2c 77 79 25 2c 74  |,B%,q$,Ty%,wy%,t|
00000c20  5f 25 29 0d 02 44 05 cd  0d 02 4e 07 cb 3a e1 0d  |_%)..D....N..:..|
00000c30  02 58 3a dd f2 67 79 3a  ea 58 25 2c 56 25 2c 61  |.X:..gy:.X%,V%,a|
00000c40  79 25 2c 44 24 2c 57 79  24 3a 58 25 3d 46 25 21  |y%,D$,Wy$:X%=F%!|
00000c50  30 3a 56 25 3d 46 25 21  34 3a 61 79 25 3d 46 25  |0:V%=F%!4:ay%=F%|
00000c60  21 32 34 3a c8 8e 58 25  ca 0d 02 62 13 c9 73 25  |!24:..X%...b..s%|
00000c70  3a f2 57 79 28 61 79 25  2c 56 25 29 0d 02 6c 10  |:.Wy(ay%,V%)..l.|
00000c80  c9 6d 25 3a f2 50 79 28  61 79 25 29 0d 02 76 12  |.m%:.Py(ay%)..v.|
00000c90  7f 3a c8 99 26 34 30 30  64 63 2c 61 79 25 0d 02  |.:..&400dc,ay%..|
00000ca0  80 07 cb 3a e1 0d 02 8a  2e dd f2 66 79 3a ea 6c  |...:.......fy:.l|
00000cb0  24 2c 75 24 3a 6c 24 3d  a4 5f 28 67 79 25 2c 46  |$,u$:l$=._(gy%,F|
00000cc0  25 29 3a 75 24 3d a4 57  28 6c 24 29 3a c8 8e 67  |%):u$=.W(l$):..g|
00000cd0  79 25 ca 0d 02 94 12 c9  53 25 28 31 29 3a f2 44  |y%......S%(1):.D|
00000ce0  79 28 75 24 29 0d 02 9e  2f cb 3a c8 99 26 34 30  |y(u$).../.:..&40|
00000cf0  30 63 66 2c 2c 46 25 3a  e7 46 25 21 38 3d 31 c8  |0cf,,F%:.F%!8=1.|
00000d00  99 26 34 30 30 64 34 2c  2c 67 79 25 2c 7a 5f 25  |.&400d4,,gy%,z_%|
00000d10  2c 61 5f 25 0d 02 a8 05  e1 0d 02 b2 1d dd f2 48  |,a_%...........H|
00000d20  3a ea 46 4a 25 3a 46 4a  25 3d 46 25 21 31 36 3a  |:.FJ%:FJ%=F%!16:|
00000d30  c8 8e 46 4a 25 ca 0d 02  bc 0c c9 30 3a 57 5f 25  |..FJ%......0:W_%|
00000d40  3d b9 0d 02 c6 0a c9 32  3a f2 79 79 0d 02 d0 0a  |=......2:.yy....|
00000d50  c9 36 3a f2 4b 79 0d 02  da 09 c9 34 3a f2 4a 0d  |.6:.Ky.....4:.J.|
00000d60  02 e4 07 cb 3a e1 0d 02  ee 18 dd f2 75 3a 43 4a  |....:.......u:CJ|
00000d70  25 3d 46 25 21 31 36 3a  c8 8e 43 4a 25 ca 0d 02  |%=F%!16:..CJ%...|
00000d80  f8 0c c9 36 3a e7 4e 4a  25 8c 0d 03 02 09 e7 58  |...6:.NJ%......X|
00000d90  4a 25 8c 0d 03 0c 32 f2  43 28 22 44 61 74 61 20  |J%....2.C("Data |
00000da0  74 72 61 6e 73 66 65 72  20 74 6f 20 61 6e 6f 74  |transfer to anot|
00000db0  68 65 72 20 74 61 73 6b  20 66 61 69 6c 65 64 21  |her task failed!|
00000dc0  22 2c 56 24 29 0d 03 16  09 cc 3a f2 59 79 0d 03  |",V$).....:.Yy..|
00000dd0  20 05 cd 0d 03 2a 05 cd  0d 03 34 25 c9 37 3a f2  | ....*....4%.7:.|
00000de0  43 28 22 44 61 74 61 20  74 72 61 6e 73 66 65 72  |C("Data transfer|
00000df0  20 66 61 69 6c 65 64 21  22 2c 56 24 29 0d 03 3e  | failed!",V$)..>|
00000e00  07 cb 3a e1 0d 03 48 0e  dd f2 6f 3a c8 8e 73 79  |..:...H...o:..sy|
00000e10  25 ca 0d 03 52 12 c9 59  79 25 2c 78 79 25 3a c8  |%...R..Yy%,xy%:.|
00000e20  8e 56 25 ca 0d 03 5c 13  c9 33 32 2c 33 33 2c 33  |.V%...\..32,33,3|
00000e30  34 2c 33 35 3a f2 59 0d  03 66 0a c9 33 36 3a f2  |4,35:.Y..f..36:.|
00000e40  54 0d 03 70 0e c9 33 37  3a f2 50 28 58 25 29 0d  |T..p..37:.P(X%).|
00000e50  03 7a 05 cb 0d 03 84 07  cb 3a e1 0d 03 8e 2a dd  |.z.......:....*.|
00000e60  f2 59 3a ea 54 25 3a e3  45 25 3d 31 b8 34 3a e7  |.Y:.T%:.E%=1.4:.|
00000e70  a4 45 28 64 79 25 2c 45  25 2b 33 31 29 8c 54 25  |.E(dy%,E%+31).T%|
00000e80  3d 45 25 2d 31 0d 03 98  51 ed 45 25 3a e3 45 25  |=E%-1...Q.E%:.E%|
00000e90  3d 30 b8 39 3a f2 41 28  64 79 25 2c 32 2b 45 25  |=0.9:.A(dy%,2+E%|
00000ea0  2a 33 2c 41 24 28 31 30  2a 54 25 2b 45 25 2b 31  |*3,A$(10*T%+E%+1|
00000eb0  29 29 3a f2 41 28 64 79  25 2c 33 2b 45 25 2a 33  |)):.A(dy%,3+E%*3|
00000ec0  2c 5a 24 28 31 30 2a 54  25 2b 45 25 2b 31 29 29  |,Z$(10*T%+E%+1))|
00000ed0  3a ed 45 25 3a e1 0d 03  a2 0f dd f2 4a 79 3a c8  |:.E%:.......Jy:.|
00000ee0  8e 73 79 25 ca 0d 03 ac  12 c9 59 79 25 2c 78 79  |.sy%......Yy%,xy|
00000ef0  25 3a c8 8e 56 25 ca 0d  03 b6 0e c9 35 31 3a f2  |%:..V%......51:.|
00000f00  50 28 58 25 29 0d 03 c0  05 cb 0d 03 ca 07 cb 3a  |P(X%)..........:|
00000f10  e1 0d 03 d4 32 dd f2 74  79 3a ea 4d 5f 25 2c 45  |....2..ty:.M_%,E|
00000f20  25 3a 4d 5f 25 3d 30 3a  e3 45 25 3d 31 b8 34 3a  |%:M_%=0:.E%=1.4:|
00000f30  e7 a4 45 28 49 25 2c 45  25 2b 36 29 8c 4d 5f 25  |..E(I%,E%+6).M_%|
00000f40  2b 3d 31 0d 03 de 0e ed  45 25 3a c8 8e 73 79 25  |+=1.....E%:..sy%|
00000f50  ca 0d 03 e8 12 c9 59 79  25 2c 78 79 25 3a c8 8e  |......Yy%,xy%:..|
00000f60  56 25 ca 0d 03 f2 19 c9  31 3a e7 4d 5f 25 3d 31  |V%......1:.M_%=1|
00000f70  80 ac a4 45 28 49 25 2c  56 25 29 8c 0d 03 fc 06  |...E(I%,V%).....|
00000f80  ef 37 0d 04 06 05 cd 0d  04 10 20 c9 37 2c 38 2c  |.7........ .7,8,|
00000f90  39 2c 31 30 3a e7 ac a4  45 28 49 25 2c 56 25 29  |9,10:...E(I%,V%)|
00000fa0  80 4d 5f 25 3d 30 8c 0d  04 1a 12 ef 37 3a f2 53  |.M_%=0......7:.S|
00000fb0  28 49 25 2c 56 25 2c 31  29 0d 04 24 05 cd 0d 04  |(I%,V%,1)..$....|
00000fc0  2e 0e c9 31 32 3a f2 50  28 58 25 29 0d 04 38 1c  |...12:.P(X%)..8.|
00000fd0  c9 32 35 3a 79 25 3d a3  3a e7 a4 45 28 49 25 2c  |.25:y%=.:..E(I%,|
00000fe0  32 35 29 8c 79 25 3d b9  0d 04 42 05 cb 0d 04 4c  |25).y%=...B....L|
00000ff0  07 cb 3a e1 0d 04 56 0e  dd f2 79 3a c8 8e 73 79  |..:...V...y:..sy|
00001000  25 ca 0d 04 60 53 c9 45  4a 25 3a 4d 79 24 3d 22  |%...`S.EJ%:My$="|
00001010  69 63 6f 6e 5f 62 61 72  22 3a 67 79 25 3d 53 25  |icon_bar":gy%=S%|
00001020  28 31 29 3a 7a 5f 25 3d  6e 5f 25 2d 36 34 3a 61  |(1):z_%=n_%-64:a|
00001030  5f 25 3d a4 52 28 53 25  28 31 29 29 2b 39 36 3a  |_%=.R(S%(1))+96:|
00001040  c8 99 26 34 30 30 64 34  2c 2c 67 79 25 2c 7a 5f  |..&400d4,,gy%,z_|
00001050  25 2c 61 5f 25 0d 04 6a  10 c9 59 79 25 2c 78 79  |%,a_%..j..Yy%,xy|
00001060  25 3a e7 56 8c 0d 04 74  23 f2 51 28 6d 25 29 3a  |%:.V...t#.Q(m%):|
00001070  e7 a4 4d 28 31 29 3c 3e  22 50 6c 61 79 65 72 27  |..M(1)<>"Player'|
00001080  73 20 4e 61 6d 65 22 8c  0d 04 7e 24 f2 41 28 6d  |s Name"...~$.A(m|
00001090  25 2c 33 2c a4 4d 28 31  29 29 3a f2 7a 28 6d 25  |%,3,.M(1)):.z(m%|
000010a0  2c 33 2c a9 28 a4 4d 28  31 29 29 29 0d 04 88 1c  |,3,.(.M(1)))....|
000010b0  cc 3a f2 41 28 6d 25 2c  33 2c 22 22 29 3a f2 7a  |.:.A(m%,3,""):.z|
000010c0  28 6d 25 2c 33 2c 30 29  0d 04 92 05 cd 0d 04 9c  |(m%,3,0)........|
000010d0  08 cc 3a f2 4c 0d 04 a6  05 cd 0d 04 b0 07 cb 3a  |..:.L..........:|
000010e0  e1 0d 04 ba 0e dd f2 70  3a c8 8e 73 79 25 ca 0d  |.......p:..sy%..|
000010f0  04 c4 15 c9 59 79 25 2c  78 79 25 3a e7 56 25 3d  |....Yy%,xy%:.V%=|
00001100  79 5f 25 8c 0d 04 ce 2b  44 24 3d a4 5a 28 73 25  |y_%....+D$=.Z(s%|
00001110  2c 55 5f 25 29 3a 4a 79  25 3d a4 50 28 73 25 2c  |,U_%):Jy%=.P(s%,|
00001120  47 79 25 29 3a e7 a7 44  24 2c 22 2e 22 29 8c 0d  |Gy%):..D$,".")..|
00001130  04 d8 1a f2 47 3a f2 57  28 44 24 2c 4a 79 25 2c  |....G:.W(D$,Jy%,|
00001140  75 25 2c 69 25 29 3a f2  4a 0d 04 e2 34 cc 3a f2  |u%,i%):.J...4.:.|
00001150  43 28 22 44 72 61 67 20  74 68 65 20 66 69 6c 65  |C("Drag the file|
00001160  20 74 6f 20 61 20 64 69  72 65 63 74 6f 72 79 20  | to a directory |
00001170  64 69 73 70 6c 61 79 2e  22 2c 56 24 29 0d 04 ec  |display.",V$)...|
00001180  05 cd 0d 04 f6 05 cd 0d  05 00 15 c9 6a 5f 25 2c  |............j_%,|
00001190  75 5f 25 3a e7 56 25 3d  47 79 25 8c 0d 05 0a 1d  |u_%:.V%=Gy%.....|
000011a0  44 4a 25 3d 47 79 25 3a  65 5f 25 3d 73 25 3a f2  |DJ%=Gy%:e_%=s%:.|
000011b0  63 28 73 25 2c 47 79 25  29 0d 05 14 05 cd 0d 05  |c(s%,Gy%).......|
000011c0  1e 07 cb 3a e1 0d 05 28  1c dd f2 44 79 28 42 24  |...:...(...Dy(B$|
000011d0  29 3a 70 24 3d a4 51 28  46 25 29 3a c8 8e 70 24  |):p$=.Q(F%):..p$|
000011e0  ca 0d 05 32 0f c9 22 31  22 3a f2 51 28 49 25 29  |...2.."1":.Q(I%)|
000011f0  0d 05 3c 11 c9 22 32 2e  30 22 3a f2 51 28 71 25  |..<.."2.0":.Q(q%|
00001200  29 0d 05 46 13 c9 22 33  22 3a f2 59 3a f2 51 28  |)..F.."3":.Y:.Q(|
00001210  64 79 25 29 0d 05 50 0e  c9 22 35 22 3a 57 5f 25  |dy%)..P.."5":W_%|
00001220  3d b9 0d 05 5a 07 cb 3a  e1 0d 05 64 14 dd f2 50  |=...Z..:...d...P|
00001230  79 28 61 79 25 29 3a c8  8e 61 79 25 ca 0d 05 6e  |y(ay%):..ay%...n|
00001240  1b c9 31 33 3a 4b 24 3d  a4 5a 28 6d 25 2c 33 29  |..13:K$=.Z(m%,3)|
00001250  3a e7 4b 24 3d 22 22 8c  0d 05 78 2a f2 43 28 22  |:.K$=""...x*.C("|
00001260  41 20 6e 61 6d 65 20 6d  75 73 74 20 62 65 20 67  |A name must be g|
00001270  69 76 65 6e 20 74 6f 20  70 6c 61 79 21 22 2c 56  |iven to play!",V|
00001280  24 29 0d 05 82 18 cc 3a  f2 6b 28 31 2c 4b 24 29  |$).....:.k(1,K$)|
00001290  3a f2 50 28 6d 25 29 3a  f2 4c 0d 05 8c 05 cd 0d  |:.P(m%):.L......|
000012a0  05 96 07 cb 3a e1 0d 05  a0 1f dd f2 57 79 28 61  |....:.......Wy(a|
000012b0  79 25 2c 56 25 29 3a ea  44 24 2c 4a 79 25 3a c8  |y%,V%):.D$,Jy%:.|
000012c0  8e 61 79 25 ca 0d 05 aa  2f c9 31 33 3a 44 24 3d  |.ay%..../.13:D$=|
000012d0  a4 5a 28 73 25 2c 55 5f  25 29 3a 4a 79 25 3d a4  |.Z(s%,U_%):Jy%=.|
000012e0  50 28 73 25 2c 47 79 25  29 3a e7 a7 44 24 2c 22  |P(s%,Gy%):..D$,"|
000012f0  2e 22 29 8c 0d 05 b4 1a  f2 47 3a f2 57 28 44 24  |.")......G:.W(D$|
00001300  2c 4a 79 25 2c 75 25 2c  69 25 29 3a f2 4a 0d 05  |,Jy%,u%,i%):.J..|
00001310  be 34 cc 3a f2 43 28 22  44 72 61 67 20 74 68 65  |.4.:.C("Drag the|
00001320  20 66 69 6c 65 20 74 6f  20 61 20 64 69 72 65 63  | file to a direc|
00001330  74 6f 72 79 20 64 69 73  70 6c 61 79 2e 22 2c 56  |tory display.",V|
00001340  24 29 0d 05 c8 05 cd 0d  05 d2 07 cb 3a e1 0d 05  |$)..........:...|
00001350  dc f9 dd f2 47 3a 76 25  3d 30 3a 47 24 3d bd 28  |....G:v%=0:G$=.(|
00001360  31 30 29 3a 45 24 3d 22  20 20 20 20 20 20 20 20  |10):E$="        |
00001370  20 20 20 50 65 72 66 6f  72 6d 61 6e 63 65 20 49  |   Performance I|
00001380  6e 64 69 63 61 74 6f 72  20 46 72 6f 6d 20 4d 61  |ndicator From Ma|
00001390  74 68 6d 61 6e 69 61 22  2b 47 24 2b 47 24 3a 45  |thmania"+G$+G$:E|
000013a0  24 2b 3d 22 50 6c 61 79  65 72 3a 20 22 2b a4 4d  |$+="Player: "+.M|
000013b0  28 31 29 2b 22 20 20 20  20 20 20 41 63 68 69 65  |(1)+"      Achie|
000013c0  76 65 64 20 61 74 20 61  6e 20 61 76 65 72 61 67  |ved at an averag|
000013d0  65 20 6c 65 76 65 6c 20  6f 66 3a 20 22 2b a4 5a  |e level of: "+.Z|
000013e0  28 71 25 2c 34 39 29 2b  47 24 2b 47 24 3a 45 24  |(q%,49)+G$+G$:E$|
000013f0  2b 3d 22 4f 50 45 52 41  54 4f 52 53 20 20 20 20  |+="OPERATORS    |
00001400  20 20 20 20 20 20 52 49  47 48 54 20 20 57 52 4f  |      RIGHT  WRO|
00001410  4e 47 20 20 50 45 52 43  45 4e 54 22 2b 47 24 2b  |NG  PERCENT"+G$+|
00001420  47 24 3a 69 25 3d a9 28  45 24 29 3a 24 75 25 3d  |G$:i%=.(E$):$u%=|
00001430  45 24 3a 76 25 2b 3d a9  28 45 24 29 3a 45 24 3d  |E$:v%+=.(E$):E$=|
00001440  a4 41 28 32 2c 34 29 0d  05 e6 e1 45 24 2b 3d a4  |.A(2,4)....E$+=.|
00001450  41 28 33 2c 34 29 3a 45  24 2b 3d a4 41 28 34 2c  |A(3,4):E$+=.A(4,|
00001460  34 29 3a 45 24 2b 3d a4  41 28 35 2c 34 29 2b 47  |4):E$+=.A(5,4)+G|
00001470  24 3a 69 25 2b 3d a9 28  45 24 29 3a 24 28 75 25  |$:i%+=.(E$):$(u%|
00001480  2b 76 25 29 3d 45 24 3a  76 25 2b 3d a9 28 45 24  |+v%)=E$:v%+=.(E$|
00001490  29 3a 45 24 3d 22 53 55  42 4a 45 43 54 53 20 20  |):E$="SUBJECTS  |
000014a0  20 20 20 20 20 20 20 20  20 52 49 47 48 54 20 20  |         RIGHT  |
000014b0  57 52 4f 4e 47 20 20 50  45 52 43 45 4e 54 22 2b  |WRONG  PERCENT"+|
000014c0  47 24 2b 47 24 3a 45 24  2b 3d a4 41 28 32 33 2c  |G$+G$:E$+=.A(23,|
000014d0  35 29 3a 45 24 2b 3d a4  41 28 32 34 2c 35 29 3a  |5):E$+=.A(24,5):|
000014e0  45 24 2b 3d a4 41 28 32  35 2c 35 29 3a 45 24 2b  |E$+=.A(25,5):E$+|
000014f0  3d a4 41 28 32 36 2c 35  29 3a 45 24 2b 3d a4 41  |=.A(26,5):E$+=.A|
00001500  28 32 37 2c 35 29 3a 69  25 2b 3d a9 28 45 24 29  |(27,5):i%+=.(E$)|
00001510  3a 24 28 75 25 2b 76 25  29 3d 45 24 3a 76 25 2b  |:$(u%+v%)=E$:v%+|
00001520  3d a9 28 45 24 29 3a e1  0d 05 f0 96 dd a4 41 28  |=.(E$):.......A(|
00001530  6c 5f 25 2c 65 79 25 29  3a ea 59 24 3a 53 24 3d  |l_%,ey%):.Y$:S$=|
00001540  22 22 3a 53 24 3d a4 5a  28 71 25 2c 6c 5f 25 29  |"":S$=.Z(q%,l_%)|
00001550  3a c8 95 a9 28 53 24 29  3c 3e 31 37 3a 53 24 2b  |:...(S$)<>17:S$+|
00001560  3d 22 2e 22 3a ce 3a e3  45 25 3d 31 b8 33 3a 59  |=".":.:.E%=1.3:Y|
00001570  24 3d 22 22 3a 53 24 2b  3d 22 20 20 22 3a 59 24  |$="":S$+="  ":Y$|
00001580  3d a4 5a 28 71 25 2c 6c  5f 25 2b 45 25 2a 65 79  |=.Z(q%,l_%+E%*ey|
00001590  25 29 3a c8 95 a9 28 59  24 29 3c 35 3a 59 24 3d  |%):...(Y$)<5:Y$=|
000015a0  22 20 22 2b 59 24 3a ce  3a 53 24 2b 3d 59 24 3a  |" "+Y$:.:S$+=Y$:|
000015b0  ed 45 25 3a 53 24 2b 3d  47 24 3a 3d 53 24 0d 05  |.E%:S$+=G$:=S$..|
000015c0  fa 37 dd f2 79 79 3a ea  44 24 2c 4a 79 25 3a 44  |.7..yy:.D$,Jy%:D|
000015d0  24 3d a4 4a 28 46 25 2b  34 34 2c 32 35 35 29 3a  |$=.J(F%+44,255):|
000015e0  e7 46 25 21 33 36 3d 2d  31 8c 78 5f 25 3d a3 8b  |.F%!36=-1.x_%=..|
000015f0  78 5f 25 3d b9 0d 06 04  14 4a 79 25 3d 46 25 21  |x_%=.....Jy%=F%!|
00001600  34 30 3a c8 8e 65 5f 25  ca 0d 06 0e 2f c9 73 25  |40:..e_%..../.s%|
00001610  3a f2 47 3a f2 57 28 44  24 2c 4a 79 25 2c 75 25  |:.G:.W(D$,Jy%,u%|
00001620  2c 69 25 29 3a f2 5a 79  3a e7 78 5f 25 f2 41 28  |,i%):.Zy:.x_%.A(|
00001630  73 25 2c 31 2c 44 24 29  0d 06 18 0a cb 3a f2 4a  |s%,1,D$).....:.J|
00001640  3a e1 0d 06 22 35 dd f2  49 28 21 42 4a 25 2c 57  |:..."5..I(!BJ%,W|
00001650  24 29 3a 73 5f 25 2b 3d  31 3a e7 73 5f 25 3e 35  |$):s_%+=1:.s_%>5|
00001660  3a 85 a2 30 2c 22 54 6f  6f 20 4d 61 6e 79 20 45  |:..0,"Too Many E|
00001670  72 72 6f 72 73 21 22 0d  06 2c 1e e7 9f 3c 32 30  |rrors!"..,...<20|
00001680  30 57 24 2b 3d 22 20 61  74 20 6c 69 6e 65 20 22  |0W$+=" at line "|
00001690  2b c3 28 9e 29 0d 06 36  2e e7 9f 3d 32 30 30 57  |+.(.)..6...=200W|
000016a0  24 3d 22 2a 2a 2a 20 45  72 72 6f 72 20 69 6e 20  |$="*** Error in |
000016b0  6d 65 6e 75 20 66 69 6c  65 21 20 2a 2a 2a 20 22  |menu file! *** "|
000016c0  2b 57 24 0d 06 40 2e e7  9f 3d 32 30 31 57 24 3d  |+W$..@...=201W$=|
000016d0  22 2a 2a 2a 20 20 20 20  20 4d 65 6e 75 20 65 72  |"***     Menu er|
000016e0  72 6f 72 20 20 20 20 20  20 2a 2a 2a 20 22 2b 57  |ror      *** "+W|
000016f0  24 0d 06 4a 2e e7 9f 3d  32 30 32 57 24 3d 22 2a  |$..J...=202W$="*|
00001700  2a 2a 20 20 20 20 20 49  63 6f 6e 20 65 72 72 6f  |**     Icon erro|
00001710  72 20 20 20 20 20 20 2a  2a 2a 20 22 2b 57 24 0d  |r      *** "+W$.|
00001720  06 54 2e e7 9f 3d 32 30  33 57 24 3d 22 2a 2a 2a  |.T...=203W$="***|
00001730  20 20 20 20 20 46 69 6c  65 20 65 72 72 6f 72 20  |     File error |
00001740  20 20 20 20 20 2a 2a 2a  20 22 2b 57 24 0d 06 5e  |     *** "+W$..^|
00001750  2e e7 9f 3d 32 30 34 57  24 3d 22 2a 2a 2a 20 20  |...=204W$="***  |
00001760  20 20 57 69 6e 64 6f 77  20 65 72 72 6f 72 20 20  |  Window error  |
00001770  20 20 20 2a 2a 2a 20 22  2b 57 24 0d 06 68 3a c8  |   *** "+W$..h:.|
00001780  99 26 32 30 30 30 64 2c  30 2c 48 25 3a c8 99 26  |.&2000d,0,H%:..&|
00001790  36 30 30 64 61 3a 24 28  42 4a 25 2b 34 29 3d 57  |600da:$(BJ%+4)=W|
000017a0  24 3a c8 99 26 34 30 30  64 66 2c 42 4a 25 2c 31  |$:..&400df,BJ%,1|
000017b0  2c 56 24 3a e1 0d 06 72  14 dd f2 44 3a c8 99 26  |,V$:...r...D:..&|
000017c0  34 30 30 64 64 3a e0 3a  e1 0d 06 7c 42 dd f2 54  |400dd:.:...|B..T|
000017d0  3a c8 95 4f 3a 76 25 3d  30 3a e3 5a 25 3d 30 b8  |:..O:v%=0:.Z%=0.|
000017e0  33 3a e3 45 25 3d 31 b8  31 30 3a 46 24 3d 41 24  |3:.E%=1.10:F$=A$|
000017f0  28 31 30 2a 5a 25 2b 45  25 29 3a e7 a7 46 24 2c  |(10*Z%+E%):..F$,|
00001800  bd 28 31 36 30 29 29 3c  3e 30 8c 0d 06 86 15 46  |.(160))<>0.....F|
00001810  24 3d c2 c0 46 24 29 2c  a9 28 46 24 29 2d 32 29  |$=..F$),.(F$)-2)|
00001820  0d 06 90 7e cd 3a 46 24  2b 3d 22 2c 22 3a 46 24  |...~.:F$+=",":F$|
00001830  2b 3d 5a 24 28 31 30 2a  5a 25 2b 45 25 29 3a 46  |+=Z$(10*Z%+E%):F|
00001840  24 2b 3d 22 2c 22 3a 24  28 7a 79 25 2b 76 25 29  |$+=",":$(zy%+v%)|
00001850  3d 46 24 3a 76 25 2b 3d  a9 28 46 24 29 3a ed 45  |=F$:v%+=.(F$):.E|
00001860  25 3a ed 5a 25 3a e3 5a  25 3d 7a 79 25 b8 7a 79  |%:.Z%:.Z%=zy%.zy|
00001870  25 2b 76 25 3a 3f 5a 25  3d 3f 5a 25 2b 31 30 3a  |%+v%:?Z%=?Z%+10:|
00001880  ed 5a 25 3a f2 57 28 6b  24 2c 34 30 39 33 2c 7a  |.Z%:.W(k$,4093,z|
00001890  79 25 2c 76 25 29 3a 4f  3d a3 3a ce 3a e1 0d 06  |y%,v%):O=.:.:...|
000018a0  9a 53 dd f2 4c 3a 72 5f  25 3d 31 33 35 3a 75 79  |.S..L:r_%=135:uy|
000018b0  25 3d 30 3a 76 5f 25 3d  30 3a c8 99 36 2c 72 5f  |%=0:v_%=0:..6,r_|
000018c0  25 b8 72 5f 25 2c 75 79  25 2c 76 5f 25 3a c8 99  |%.r_%,uy%,v_%:..|
000018d0  26 34 30 30 65 35 2c 2c  5a 4a 25 3a eb 31 35 3a  |&400e5,,ZJ%:.15:|
000018e0  eb 31 33 3a c8 99 35 34  3a 2a 66 78 32 30 30 2c  |.13:..54:*fx200,|
000018f0  33 0d 06 a4 0b 5a 3d a3  3a e7 56 8c 0d 06 ae 12  |3....Z=.:.V.....|
00001900  f2 47 79 3a f2 64 79 3a  f2 6d 3a 56 3d a3 0d 06  |.Gy:.dy:.m:V=...|
00001910  b8 3b cd 3a ef 31 39 2c  31 2c 32 34 2c 32 31 34  |.;.:.19,1,24,214|
00001920  2c 31 34 34 2c 37 38 3a  57 25 3d 31 39 36 3a 42  |,144,78:W%=196:B|
00001930  25 3d 38 33 38 3a 45 3d  31 3a 41 3d 31 3a e7 4b  |%=838:E=1:A=1:.K|
00001940  24 3c 3e a4 4d 28 31 29  8c 0d 06 c2 4c 4b 24 3d  |$<>.M(1)....LK$=|
00001950  a4 4d 28 31 29 3a 6f 25  3d 30 3a 5f 79 25 3d 30  |.M(1):o%=0:_y%=0|
00001960  3a 6a 79 25 3d 30 3a 72  79 25 3d 30 3a 5a 25 28  |:jy%=0:ry%=0:Z%(|
00001970  29 3d 30 3a 67 3d b9 3a  e3 45 25 3d 31 b8 34 30  |)=0:g=.:.E%=1.40|
00001980  3a e7 a7 41 24 28 45 25  29 2c bd 28 31 36 30 29  |:..A$(E%),.(160)|
00001990  29 3c 3e 30 8c 0d 06 cc  21 41 24 28 45 25 29 3d  |)<>0....!A$(E%)=|
000019a0  c2 c0 41 24 28 45 25 29  29 2c a9 28 41 24 28 45  |..A$(E%)),.(A$(E|
000019b0  25 29 29 2d 32 29 0d 06  d6 09 cd 3a ed 45 25 0d  |%))-2).....:.E%.|
000019c0  06 e0 11 cd 3a f2 78 3a  f2 6a 3a e7 ac 79 25 8c  |....:.x:.j:..y%.|
000019d0  0d 06 ea 1f f2 42 3a c8  95 ac 5a 3a f2 5a 28 57  |.....B:...Z:.Z(W|
000019e0  25 2c 42 25 2c 45 2c 41  29 3a f2 62 79 3a ce 0d  |%,B%,E,A):.by:..|
000019f0  06 f4 0a cd 3a e7 79 25  8c 0d 06 fe 0d c8 95 ac  |....:.y%........|
00001a00  5a 3a f2 42 3a ce 0d 07  08 0b cd 3a f2 49 79 3a  |Z:.B:......:.Iy:|
00001a10  e1 0d 07 12 d3 dd f2 49  79 3a c8 99 26 34 30 30  |.......Iy:..&400|
00001a20  65 33 2c 76 5f 25 3a c8  99 26 34 30 30 65 34 2c  |e3,v_%:..&400e4,|
00001a30  2c 5a 4a 25 3a e3 45 25  3d 32 b8 35 3a f2 53 28  |,ZJ%:.E%=2.5:.S(|
00001a40  49 25 2c 45 25 2c 30 29  3a ed 45 25 3a f2 53 28  |I%,E%,0):.E%:.S(|
00001a50  49 25 2c 54 25 2b 31 2c  31 29 3a ff 28 22 2a 61  |I%,T%+1,1):.("*a|
00001a60  6c 70 68 61 62 65 74 20  6c 61 74 69 6e 31 22 29  |lphabet latin1")|
00001a70  3a f2 41 28 71 25 2c 35  32 2c a4 4d 28 31 29 29  |:.A(q%,52,.M(1))|
00001a80  3a e3 45 25 3d 36 b8 39  3a f2 41 28 71 25 2c 45  |:.E%=6.9:.A(q%,E|
00001a90  25 2c c3 28 5a 25 28 45  25 2d 35 2c 31 29 29 29  |%,.(Z%(E%-5,1)))|
00001aa0  3a f2 41 28 71 25 2c 45  25 2b 34 2c c3 28 5a 25  |:.A(q%,E%+4,.(Z%|
00001ab0  28 45 25 2d 35 2c 32 29  29 29 3a ed 45 25 3a e3  |(E%-5,2))):.E%:.|
00001ac0  45 25 3d 31 34 b8 31 37  3a e7 5a 25 28 45 25 2d  |E%=14.17:.Z%(E%-|
00001ad0  31 33 2c 31 29 2b 5a 25  28 45 25 2d 31 33 2c 32  |13,1)+Z%(E%-13,2|
00001ae0  29 3e 30 8c 0d 07 1c 43  5f 3d 28 5a 25 28 45 25  |)>0....C_=(Z%(E%|
00001af0  2d 31 33 2c 31 29 2f 28  5a 25 28 45 25 2d 31 33  |-13,1)/(Z%(E%-13|
00001b00  2c 31 29 2b 5a 25 28 45  25 2d 31 33 2c 32 29 29  |,1)+Z%(E%-13,2))|
00001b10  29 2a 31 30 30 3a f2 41  28 71 25 2c 45 25 2c c3  |)*100:.A(q%,E%,.|
00001b20  28 a8 28 5f 29 29 29 0d  07 26 13 cc 3a f2 41 28  |(.(_)))..&..:.A(|
00001b30  71 25 2c 45 25 2c 22 30  22 29 0d 07 30 71 cd 3a  |q%,E%,"0")..0q.:|
00001b40  ed 45 25 3a e3 45 25 3d  32 38 b8 33 32 3a f2 41  |.E%:.E%=28.32:.A|
00001b50  28 71 25 2c 45 25 2c c3  28 5a 25 28 45 25 2d 32  |(q%,E%,.(Z%(E%-2|
00001b60  33 2c 31 29 29 29 3a f2  41 28 71 25 2c 45 25 2b  |3,1))):.A(q%,E%+|
00001b70  35 2c c3 28 5a 25 28 45  25 2d 32 33 2c 32 29 29  |5,.(Z%(E%-23,2))|
00001b80  29 3a ed 45 25 3a e3 45  25 3d 33 38 b8 34 32 3a  |):.E%:.E%=38.42:|
00001b90  e7 5a 25 28 45 25 2d 33  33 2c 31 29 2b 5a 25 28  |.Z%(E%-33,1)+Z%(|
00001ba0  45 25 2d 33 33 2c 32 29  3e 30 8c 0d 07 3a 43 5f  |E%-33,2)>0...:C_|
00001bb0  3d 28 5a 25 28 45 25 2d  33 33 2c 31 29 2f 28 5a  |=(Z%(E%-33,1)/(Z|
00001bc0  25 28 45 25 2d 33 33 2c  31 29 2b 5a 25 28 45 25  |%(E%-33,1)+Z%(E%|
00001bd0  2d 33 33 2c 32 29 29 29  2a 31 30 30 3a f2 41 28  |-33,2)))*100:.A(|
00001be0  71 25 2c 45 25 2c c3 28  a8 28 5f 29 29 29 0d 07  |q%,E%,.(.(_)))..|
00001bf0  44 13 cc 3a f2 41 28 71  25 2c 45 25 2c 22 30 22  |D..:.A(q%,E%,"0"|
00001c00  29 0d 07 4e 20 cd 3a ed  45 25 3a 5f 24 3d 22 3f  |)..N .:.E%:_$="?|
00001c10  3f 3f 22 3a e7 28 5f 79  25 2b 6a 79 25 29 3e 30  |??":.(_y%+jy%)>0|
00001c20  8c 0d 07 58 1f 62 3d 72  79 25 2f 28 5f 79 25 2b  |...X.b=ry%/(_y%+|
00001c30  6a 79 25 29 3a 5f 24 3d  c0 c3 28 62 29 2c 33 29  |jy%):_$=..(b),3)|
00001c40  0d 07 62 2e cd 3a f2 41  28 71 25 2c 34 39 2c 5f  |..b..:.A(q%,49,_|
00001c50  24 29 3a 60 25 3d bb 28  5f 24 29 3a e7 c2 5f 24  |$):`%=.(_$):.._$|
00001c60  2c 31 29 3e 3d 22 35 22  8c 60 25 2b 3d 31 0d 07  |,1)>="5".`%+=1..|
00001c70  6c 1c e7 6f 25 3e bb 28  5a 24 28 28 60 25 2d 31  |l..o%>.(Z$((`%-1|
00001c80  29 2a 31 30 2b 31 30 29  29 8c 0d 07 76 b6 4f 79  |)*10+10))...v.Oy|
00001c90  25 3d 30 3a f5 3a 4f 79  25 2b 3d 31 3a fd a7 41  |%=0:.:Oy%+=1:..A|
00001ca0  24 28 28 60 25 2d 31 29  2a 31 30 2b 4f 79 25 29  |$((`%-1)*10+Oy%)|
00001cb0  2c bd 28 31 36 30 29 29  3c 3e 30 84 4f 79 25 3d  |,.(160))<>0.Oy%=|
00001cc0  31 30 3a 5a 24 28 28 60  25 2d 31 29 2a 31 30 2b  |10:Z$((`%-1)*10+|
00001cd0  4f 79 25 29 3d c3 28 6f  25 29 3a 41 24 28 28 60  |Oy%)=.(o%):A$((`|
00001ce0  25 2d 31 29 2a 31 30 2b  4f 79 25 29 3d bd 28 31  |%-1)*10+Oy%)=.(1|
00001cf0  36 30 29 2b 4b 24 2b bd  28 31 36 30 29 3a 45 25  |60)+K$+.(160):E%|
00001d00  3d 31 3a f5 3a 73 3d b9  3a e3 5a 25 3d 28 60 25  |=1:.:s=.:.Z%=(`%|
00001d10  2d 31 29 2a 31 30 2b 31  b8 28 60 25 2d 31 29 2a  |-1)*10+1.(`%-1)*|
00001d20  31 30 2b 31 30 2d 45 25  3a e7 bb 28 5a 24 28 5a  |10+10-E%:..(Z$(Z|
00001d30  25 29 29 3c bb 28 5a 24  28 5a 25 2b 31 29 29 8c  |%))<.(Z$(Z%+1)).|
00001d40  0d 07 80 2b c8 94 5a 24  28 5a 25 29 2c 5a 24 28  |...+..Z$(Z%),Z$(|
00001d50  5a 25 2b 31 29 3a c8 94  41 24 28 5a 25 29 2c 41  |Z%+1):..A$(Z%),A|
00001d60  24 28 5a 25 2b 31 29 3a  73 3d a3 0d 07 8a 16 cd  |$(Z%+1):s=......|
00001d70  3a ed 5a 25 3a 45 25 2b  3d 31 3a fd 73 3a 4f 3d  |:.Z%:E%+=1:.s:O=|
00001d80  b9 0d 07 94 0e cd 3a 2a  66 78 20 31 35 2c 30 0d  |......:*fx 15,0.|
00001d90  07 9e 1a c8 a1 31 2c 22  57 61 76 65 53 79 6e 74  |.....1,"WaveSynt|
00001da0  68 2d 42 65 65 70 22 3a  e1 0d 07 a8 3e dd f2 4e  |h-Beep":....>..N|
00001db0  3a e3 45 25 3d 31 b8 32  3a c8 99 36 2c 31 31 32  |:.E%=1.2:..6,112|
00001dc0  2c 45 25 3a c8 99 34 36  2c 32 39 30 2c 53 25 2c  |,E%:..46,290,S%,|
00001dd0  22 74 69 74 6c 65 22 2c  31 34 30 2c 38 34 30 2c  |"title",140,840,|
00001de0  38 3a ed 45 25 3a e1 0d  07 b2 08 dd f2 62 79 0d  |8:.E%:.......by.|
00001df0  07 bc 08 e7 5a 8c e1 0d  07 c6 1c f5 3a 43 25 3d  |....Z.......:C%=|
00001e00  30 3a 61 25 3d 30 3a 46  3d 30 3a 5f 25 3d 30 3a  |0:a%=0:F=0:_%=0:|
00001e10  43 3d 30 0d 07 d0 24 e7  a6 2d 34 32 80 43 25 3d  |C=0...$..-42.C%=|
00001e20  30 80 41 3c 31 38 5f 25  3d 31 36 3a 43 3d 2e 31  |0.A<18_%=16:C=.1|
00001e30  32 35 3a 43 25 3d 31 0d  07 da 25 e7 a6 2d 35 38  |25:C%=1...%..-58|
00001e40  80 43 25 3d 30 80 41 3e  31 5f 25 3d 2d 31 36 3a  |.C%=0.A>1_%=-16:|
00001e50  43 3d 2d 2e 31 32 35 3a  43 25 3d 32 0d 07 e4 25  |C=-.125:C%=2...%|
00001e60  e7 a6 2d 32 36 80 43 25  3d 30 80 45 3e 31 61 25  |..-26.C%=0.E>1a%|
00001e70  3d 2b 31 36 3a 46 3d 2d  2e 31 32 35 3a 43 25 3d  |=+16:F=-.125:C%=|
00001e80  33 0d 07 ee 26 e7 a6 2d  31 32 32 80 43 25 3d 30  |3...&..-122.C%=0|
00001e90  80 45 3c 31 38 61 25 3d  2d 31 36 3a 46 3d 2e 31  |.E<18a%=-16:F=.1|
00001ea0  32 35 3a 43 25 3d 34 0d  07 f8 18 e7 a6 2d 36 37  |25:C%=4......-67|
00001eb0  f2 42 3a 43 25 3d 30 3a  e7 5a 8c 43 25 3d 31 0d  |.B:C%=0:.Z.C%=1.|
00001ec0  08 02 19 e7 28 43 25 3d  34 84 43 25 3d 33 29 80  |....(C%=4.C%=3).|
00001ed0  ac a4 4f 8c 43 25 3d 30  0d 08 0c 19 e7 28 43 25  |..O.C%=0.....(C%|
00001ee0  3d 32 84 43 25 3d 31 29  80 ac a4 71 8c 43 25 3d  |=2.C%=1)...q.C%=|
00001ef0  30 0d 08 16 21 e7 43 25  3c 3e 30 42 25 2b 3d 5f  |0...!.C%<>0B%+=_|
00001f00  25 3a 57 25 2b 3d 61 25  3a 45 2b 3d 46 3a 41 2b  |%:W%+=a%:E+=F:A+|
00001f10  3d 43 0d 08 20 0c fd 43  25 3c 3e 30 3a e1 0d 08  |=C.. ..C%<>0:...|
00001f20  2a 2c dd f2 48 79 3a 7a  25 3d 30 3a e3 45 25 3d  |*,..Hy:z%=0:.E%=|
00001f30  31 b8 32 35 3a e3 5a 25  3d 31 b8 32 35 3a c8 8e  |1.25:.Z%=1.25:..|
00001f40  45 25 28 5a 25 2c 45 25  29 ca 0d 08 34 27 c9 31  |E%(Z%,E%)...4'.1|
00001f50  2c 34 32 2c 34 33 2c 34  34 2c 34 35 2c 34 36 3a  |,42,43,44,45,46:|
00001f60  45 25 28 5a 25 2c 45 25  29 3d 33 30 3a 7a 25 3d  |E%(Z%,E%)=30:z%=|
00001f70  31 0d 08 3e 18 c9 33 30  3a e7 7a 25 3d 30 45 25  |1..>..30:.z%=0E%|
00001f80  28 5a 25 2c 45 25 29 3d  31 0d 08 48 1e cb 3a ed  |(Z%,E%)=1..H..:.|
00001f90  3a ed 3a 43 25 3d 31 3a  f2 5a 28 57 25 2c 42 25  |:.:C%=1:.Z(W%,B%|
00001fa0  2c 45 2c 41 29 3a e1 0d  08 52 28 dd a4 4f 3a ea  |,E,A):...R(..O:.|
00001fb0  57 25 2c 63 79 25 3a 63  79 25 3d 30 3a 57 25 3d  |W%,cy%:cy%=0:W%=|
00001fc0  36 38 38 3a e7 43 25 3d  33 57 25 3d 35 39 32 0d  |688:.C%=3W%=592.|
00001fd0  08 5c 30 e3 45 25 3d 34  37 36 b8 35 34 34 88 34  |.\0.E%=476.544.4|
00001fe0  3a e7 b0 57 25 2c 45 25  29 3d 36 33 e7 c8 9c 28  |:..W%,E%)=63...(|
00001ff0  57 25 2c 45 25 29 3d 36  34 63 79 25 2b 3d 31 0d  |W%,E%)=64cy%+=1.|
00002000  08 66 13 ed 45 25 3a e7  63 79 25 3c 31 3d b9 8b  |.f..E%:.cy%<1=..|
00002010  3d a3 0d 08 70 06 3d a3  0d 08 7a 28 dd a4 71 3a  |=...p.=...z(..q:|
00002020  ea 42 25 2c 63 79 25 3a  63 79 25 3d 30 3a 42 25  |.B%,cy%:cy%=0:B%|
00002030  3d 34 36 38 3a e7 43 25  3d 32 42 25 3d 35 35 36  |=468:.C%=2B%=556|
00002040  0d 08 84 30 e3 45 25 3d  36 30 34 b8 36 37 32 88  |...0.E%=604.672.|
00002050  34 3a e7 b0 45 25 2c 42  25 29 3d 36 33 e7 c8 9c  |4:..E%,B%)=63...|
00002060  28 45 25 2c 42 25 29 3d  36 34 63 79 25 2b 3d 31  |(E%,B%)=64cy%+=1|
00002070  0d 08 8e 13 ed 45 25 3a  e7 63 79 25 3c 31 3d b9  |.....E%:.cy%<1=.|
00002080  8b 3d a3 0d 08 98 06 3d  a3 0d 08 a2 de dd f2 5a  |.=.....=.......Z|
00002090  28 f8 57 25 2c f8 42 25  2c f8 45 2c f8 41 29 3a  |(.W%,.B%,.E,.A):|
000020a0  ea 51 4a 25 3a 51 4a 25  3d 43 25 2b 4d 79 25 2a  |.QJ%:QJ%=C%+My%*|
000020b0  34 3a 76 3d a8 28 41 29  3a 66 3d a8 28 45 29 3a  |4:v=.(A):f=.(E):|
000020c0  4a 25 3d 33 2d 4a 25 3a  c8 99 36 2c 31 31 32 2c  |J%=3-J%:..6,112,|
000020d0  4a 25 3a ef 32 34 2c 33  32 34 3b 31 39 38 3b 39  |J%:.24,324;198;9|
000020e0  36 30 3b 38 33 34 3b 3a  e3 5a 25 3d 76 b8 76 2b  |60;834;:.Z%=v.v+|
000020f0  35 3a e3 45 25 3d 66 b8  66 2b 35 3a 4c 5f 25 3d  |5:.E%=f.f+5:L_%=|
00002100  45 25 28 45 25 2c 5a 25  29 3a c8 99 34 36 2c 35  |E%(E%,Z%):..46,5|
00002110  34 36 2c 53 25 2c 41 25  28 4c 5f 25 29 2c 57 25  |46,S%,A%(L_%),W%|
00002120  2b 31 32 38 2a 45 25 2c  42 25 2d 5a 25 2a 31 32  |+128*E%,B%-Z%*12|
00002130  38 2c 30 3a ed 45 25 3a  ed 5a 25 3a c8 99 34 36  |8,0:.E%:.Z%:..46|
00002140  2c 35 34 36 2c 53 25 2c  4d 25 28 51 4a 25 29 2c  |,546,S%,M%(QJ%),|
00002150  35 37 36 2c 34 34 38 2c  38 3a e7 ac 58 c8 99 36  |576,448,8:..X..6|
00002160  2c 31 31 33 2c 4a 25 0d  08 ac 26 55 25 3d a8 28  |,113,J%...&U%=.(|
00002170  45 2b 2e 35 29 2b 32 3a  51 25 3d a8 28 41 2b 2e  |E+.5)+2:Q%=.(A+.|
00002180  35 29 2b 32 3a ef 32 36  3a f2 65 3a e1 0d 08 b6  |5)+2:.26:.e:....|
00002190  0d dd f2 63 79 3a e7 5a  8c e1 0d 08 c0 fc f2 4e  |...cy:.Z.......N|
000021a0  3a c8 96 3a c8 99 36 2c  31 31 33 2c 31 3a 4a 25  |:..:..6,113,1:J%|
000021b0  3d 32 3a 51 79 25 3d 31  36 3a c8 99 36 2c 31 31  |=2:Qy%=16:..6,11|
000021c0  32 2c 4a 25 3a e3 5a 25  3d 31 b8 35 3a e3 45 25  |2,J%:.Z%=1.5:.E%|
000021d0  3d 31 b8 35 3a 4c 5f 25  3d 45 25 28 45 25 2c 5a  |=1.5:L_%=E%(E%,Z|
000021e0  25 29 3a c8 99 34 36 2c  35 34 36 2c 53 25 2c 41  |%):..46,546,S%,A|
000021f0  25 28 4c 5f 25 29 2c 57  25 2b 31 32 38 2a 45 25  |%(L_%),W%+128*E%|
00002200  2c 42 25 2d 5a 25 2a 31  32 38 2c 30 3a ed 45 25  |,B%-Z%*128,0:.E%|
00002210  3a ed 5a 25 3a ec 33 32  30 2c 31 39 32 3a ec 39  |:.Z%:.320,192:.9|
00002220  36 30 2c 38 33 32 3a c8  99 34 36 2c 32 35 36 2b  |60,832:..46,256+|
00002230  31 34 2c 53 25 2c 22 62  6f 78 22 3a ef 32 34 2c  |14,S%,"box":.24,|
00002240  33 32 30 3b 31 39 32 3b  39 36 30 3b 38 33 32 3b  |320;192;960;832;|
00002250  3a e3 61 25 3d 32 b8 37  3a e3 5f 25 3d 31 b8 36  |:.a%=2.7:._%=1.6|
00002260  3a c8 99 34 36 2c 35 34  36 2c 53 25 2c 41 25 28  |:..46,546,S%,A%(|
00002270  63 25 29 2c 61 25 2a 31  32 38 2c 5f 25 2a 31 32  |c%),a%*128,_%*12|
00002280  38 2c 30 3a ed 3a ed 3a  ef 32 36 3a e6 32 2c 30  |8,0:.:.:.26:.2,0|
00002290  3a c8 9c 32 2c 30 0d 08  ca e8 f5 3a c8 99 36 2c  |:..2,0.....:..6,|
000022a0  31 31 32 2c 4a 25 3a c8  99 34 36 2c 32 39 30 2c  |112,J%:..46,290,|
000022b0  53 25 2c 22 62 6f 78 22  2c 33 32 30 2c 31 39 32  |S%,"box",320,192|
000022c0  2c 33 3a c8 93 c8 90 36  34 30 2d 51 79 25 2c 35  |,3:....640-Qy%,5|
000022d0  31 32 2d 51 79 25 2c 51  79 25 2a 32 2c 51 79 25  |12-Qy%,Qy%*2,Qy%|
000022e0  2a 32 3a c8 99 34 36 2c  32 39 30 2c 53 25 2c 22  |*2:..46,290,S%,"|
000022f0  62 6f 78 22 2c 33 32 30  2c 31 39 32 2c 33 3a c8  |box",320,192,3:.|
00002300  99 36 2c 31 31 33 2c 4a  25 3a c8 96 3a 51 79 25  |.6,113,J%:..:Qy%|
00002310  2b 3d 31 36 3a 4a 25 3d  33 2d 4a 25 3a fd 51 79  |+=16:J%=3-J%:.Qy|
00002320  25 3d 33 32 30 3a c8 99  36 2c 31 31 32 2c 4a 25  |%=320:..6,112,J%|
00002330  3a c8 99 34 36 2c 32 39  30 2c 53 25 2c 22 62 6f  |:..46,290,S%,"bo|
00002340  78 22 2c 33 32 30 2c 31  39 32 2c 30 3a c8 99 34  |x",320,192,0:..4|
00002350  36 2c 35 34 36 2c 53 25  2c 4d 25 28 31 2b 4d 79  |6,546,S%,M%(1+My|
00002360  25 2a 34 29 2c 35 37 36  2c 34 34 38 2c 38 3a c8  |%*4),576,448,8:.|
00002370  99 36 2c 31 31 33 2c 4a  25 3a f2 46 3a e1 0d 08  |.6,113,J%:.F:...|
00002380  d4 19 dd f2 65 3a e7 45  25 28 55 25 2c 51 25 29  |....e:.E%(U%,Q%)|
00002390  3d 30 80 ac 42 8c e1 0d  08 de 1d e7 45 25 28 55  |=0..B.......E%(U|
000023a0  25 2c 51 25 29 3d 37 80  28 43 25 3d 31 84 43 25  |%,Q%)=7.(C%=1.C%|
000023b0  3d 32 29 8c 0d 08 e8 2e  c8 a1 31 2c 22 53 46 58  |=2).......1,"SFX|
000023c0  2d 31 22 3a d4 31 2c 2d  31 35 2c 34 30 30 30 2c  |-1":.1,-15,4000,|
000023d0  31 3a f2 61 3a e7 bb 28  65 24 29 3d bb 28 45 24  |1:.a:..(e$)=.(E$|
000023e0  29 8c 0d 08 f2 73 c8 a1  31 2c 22 53 46 58 2d 36  |)....s..1,"SFX-6|
000023f0  a0 a0 22 3a d4 31 2c 2d  31 35 2c 34 30 30 30 2c  |..":.1,-15,4000,|
00002400  31 3a 42 3d b9 3a 4d 3d  a6 28 35 29 3a 45 25 28  |1:B=.:M=.(5):E%(|
00002410  55 25 2c 51 25 29 3d 39  3a f2 5a 28 57 25 2c 42  |U%,Q%)=9:.Z(W%,B|
00002420  25 2c 45 2c 41 29 3a 45  25 28 55 25 2c 51 25 29  |%,E,A):E%(U%,Q%)|
00002430  3d 38 3a 4d 3d a6 28 35  29 3a f2 5a 28 57 25 2c  |=8:M=.(5):.Z(W%,|
00002440  42 25 2c 45 2c 41 29 3a  62 25 2b 3d 31 3a f2 46  |B%,E,A):b%+=1:.F|
00002450  3a 43 25 3d 30 0d 08 fc  13 cc 3a 67 25 2b 3d 31  |:C%=0.....:g%+=1|
00002460  3a f2 46 3a 43 25 3d 30  0d 09 06 05 cd 0d 09 10  |:.F:C%=0........|
00002470  20 cd 3a e7 45 25 28 55  25 2c 51 25 29 3d 31 33  | .:.E%(U%,Q%)=13|
00002480  80 28 43 25 3d 33 84 43  25 3d 34 29 8c 0d 09 1a  |.(C%=3.C%=4)....|
00002490  2e c8 a1 31 2c 22 53 46  58 2d 31 22 3a d4 31 2c  |...1,"SFX-1":.1,|
000024a0  2d 31 35 2c 34 30 30 30  2c 31 3a f2 61 3a e7 bb  |-15,4000,1:.a:..|
000024b0  28 65 24 29 3d bb 28 45  24 29 8c 0d 09 24 75 c8  |(e$)=.(E$)...$u.|
000024c0  a1 31 2c 22 53 46 58 2d  36 a0 a0 22 3a d4 31 2c  |.1,"SFX-6..":.1,|
000024d0  2d 31 35 2c 34 30 30 30  2c 31 3a 42 3d b9 3a 4d  |-15,4000,1:B=.:M|
000024e0  3d a6 28 35 29 3a 45 25  28 55 25 2c 51 25 29 3d  |=.(5):E%(U%,Q%)=|
000024f0  31 32 3a f2 5a 28 57 25  2c 42 25 2c 45 2c 41 29  |12:.Z(W%,B%,E,A)|
00002500  3a 45 25 28 55 25 2c 51  25 29 3d 31 31 3a 4d 3d  |:E%(U%,Q%)=11:M=|
00002510  a6 28 35 29 3a f2 5a 28  57 25 2c 42 25 2c 45 2c  |.(5):.Z(W%,B%,E,|
00002520  41 29 3a 62 25 2b 3d 31  3a f2 46 3a 43 25 3d 30  |A):b%+=1:.F:C%=0|
00002530  0d 09 2e 13 cc 3a 67 25  2b 3d 31 3a f2 46 3a 43  |.....:g%+=1:.F:C|
00002540  25 3d 30 0d 09 38 05 cd  0d 09 42 1a cd 3a e7 43  |%=0..8....B..:.C|
00002550  25 3d 31 80 45 25 28 55  25 2c 51 25 2d 31 29 3d  |%=1.E%(U%,Q%-1)=|
00002560  38 8c 0d 09 4c 67 c8 a1  31 2c 22 53 46 58 2d 32  |8...Lg..1,"SFX-2|
00002570  22 3a d4 31 2c 2d 31 35  2c 34 30 30 30 2c 31 3a  |":.1,-15,4000,1:|
00002580  42 3d a3 3a 4d 3d a6 28  35 29 3a 45 25 28 55 25  |B=.:M=.(5):E%(U%|
00002590  2c 51 25 2d 31 29 3d 39  3a f2 5a 28 57 25 2c 42  |,Q%-1)=9:.Z(W%,B|
000025a0  25 2c 45 2c 41 29 3a 45  25 28 55 25 2c 51 25 2d  |%,E,A):E%(U%,Q%-|
000025b0  31 29 3d 37 3a 4d 3d a6  28 35 29 3a f2 5a 28 57  |1)=7:M=.(5):.Z(W|
000025c0  25 2c 42 25 2c 45 2c 41  29 0d 09 56 1a cd 3a e7  |%,B%,E,A)..V..:.|
000025d0  43 25 3d 32 80 45 25 28  55 25 2c 51 25 2b 31 29  |C%=2.E%(U%,Q%+1)|
000025e0  3d 38 8c 0d 09 60 67 c8  a1 31 2c 22 53 46 58 2d  |=8...`g..1,"SFX-|
000025f0  32 22 3a d4 31 2c 2d 31  35 2c 34 30 30 30 2c 31  |2":.1,-15,4000,1|
00002600  3a 42 3d a3 3a 4d 3d a6  28 35 29 3a 45 25 28 55  |:B=.:M=.(5):E%(U|
00002610  25 2c 51 25 2b 31 29 3d  39 3a f2 5a 28 57 25 2c  |%,Q%+1)=9:.Z(W%,|
00002620  42 25 2c 45 2c 41 29 3a  45 25 28 55 25 2c 51 25  |B%,E,A):E%(U%,Q%|
00002630  2b 31 29 3d 37 3a 4d 3d  a6 28 35 29 3a f2 5a 28  |+1)=7:M=.(5):.Z(|
00002640  57 25 2c 42 25 2c 45 2c  41 29 0d 09 6a 1b cd 3a  |W%,B%,E,A)..j..:|
00002650  e7 43 25 3d 34 80 45 25  28 55 25 2d 31 2c 51 25  |.C%=4.E%(U%-1,Q%|
00002660  29 3d 31 31 8c 0d 09 74  69 c8 a1 31 2c 22 53 46  |)=11...ti..1,"SF|
00002670  58 2d 32 22 3a d4 31 2c  2d 31 35 2c 34 30 30 30  |X-2":.1,-15,4000|
00002680  2c 31 3a 42 3d a3 3a 4d  3d a6 28 35 29 3a 45 25  |,1:B=.:M=.(5):E%|
00002690  28 55 25 2d 31 2c 51 25  29 3d 31 32 3a f2 5a 28  |(U%-1,Q%)=12:.Z(|
000026a0  57 25 2c 42 25 2c 45 2c  41 29 3a 45 25 28 55 25  |W%,B%,E,A):E%(U%|
000026b0  2d 31 2c 51 25 29 3d 31  33 3a 4d 3d a6 28 35 29  |-1,Q%)=13:M=.(5)|
000026c0  3a f2 5a 28 57 25 2c 42  25 2c 45 2c 41 29 0d 09  |:.Z(W%,B%,E,A)..|
000026d0  7e 1b cd 3a e7 43 25 3d  33 80 45 25 28 55 25 2b  |~..:.C%=3.E%(U%+|
000026e0  31 2c 51 25 29 3d 31 31  8c 0d 09 88 69 c8 a1 31  |1,Q%)=11....i..1|
000026f0  2c 22 53 46 58 2d 32 22  3a d4 31 2c 2d 31 35 2c  |,"SFX-2":.1,-15,|
00002700  34 30 30 30 2c 31 3a 42  3d a3 3a 4d 3d a6 28 35  |4000,1:B=.:M=.(5|
00002710  29 3a 45 25 28 55 25 2b  31 2c 51 25 29 3d 31 32  |):E%(U%+1,Q%)=12|
00002720  3a f2 5a 28 57 25 2c 42  25 2c 45 2c 41 29 3a 45  |:.Z(W%,B%,E,A):E|
00002730  25 28 55 25 2b 31 2c 51  25 29 3d 31 33 3a 4d 3d  |%(U%+1,Q%)=13:M=|
00002740  a6 28 35 29 3a f2 5a 28  57 25 2c 42 25 2c 45 2c  |.(5):.Z(W%,B%,E,|
00002750  41 29 0d 09 92 13 cd 3a  e7 45 25 28 55 25 2c 51  |A).....:.E%(U%,Q|
00002760  25 29 3d 36 8c 0d 09 9c  33 d4 32 2c 2d 31 35 2c  |%)=6....3.2,-15,|
00002770  31 30 31 2c 34 3a 6b 25  2b 3d 31 3a 45 25 28 55  |101,4:k%+=1:E%(U|
00002780  25 2c 51 25 29 3d 30 3a  f2 5a 28 57 25 2c 42 25  |%,Q%)=0:.Z(W%,B%|
00002790  2c 45 2c 41 29 3a f2 46  0d 09 a6 14 cd 3a e7 45  |,E,A):.F.....:.E|
000027a0  25 28 55 25 2c 51 25 29  3d 32 39 8c 0d 09 b0 36  |%(U%,Q%)=29....6|
000027b0  d4 32 2c 2d 31 35 2c 31  30 31 2c 34 3a 77 24 3d  |.2,-15,101,4:w$=|
000027c0  22 59 45 53 22 3a 45 25  28 55 25 2c 51 25 29 3d  |"YES":E%(U%,Q%)=|
000027d0  30 3a f2 5a 28 57 25 2c  42 25 2c 45 2c 41 29 3a  |0:.Z(W%,B%,E,A):|
000027e0  f2 46 0d 09 ba 44 cd 3a  e7 45 25 28 55 25 2c 51  |.F...D.:.E%(U%,Q|
000027f0  25 29 3d 31 30 80 77 24  3d 22 59 45 53 22 80 45  |%)=10.w$="YES".E|
00002800  3d a8 28 45 29 80 41 3d  a8 28 41 29 80 28 6b 25  |=.(E).A=.(A).(k%|
00002810  2b 62 25 2d 67 25 29 3e  3d 31 30 2b 32 2a 28 44  |+b%-g%)>=10+2*(D|
00002820  25 2b 54 25 29 8c 0d 09  c4 20 c8 a1 31 2c 22 53  |%+T%).... ..1,"S|
00002830  46 58 2d 33 22 3a d4 31  2c 2d 31 35 2c 34 30 30  |FX-3":.1,-15,400|
00002840  30 2c 31 3a f2 55 0d 09  ce 07 cd 3a e1 0d 09 d8  |0,1:.U.....:....|
00002850  27 dd f2 61 3a ea 65 25  3a 66 25 3d 34 30 3a 48  |'..a:.e%:f%=40:H|
00002860  79 25 3d 32 3a 72 79 25  2b 3d 54 25 3a 2a 46 58  |y%=2:ry%+=T%:*FX|
00002870  31 35 2c 30 0d 09 e2 14  6e 25 3d b3 28 32 29 3a  |15,0....n%=.(2):|
00002880  e7 ac 49 8c 6e 25 3d 32  0d 09 ec 5e c8 99 34 36  |..I.n%=2...^..46|
00002890  2c 32 39 30 2c 53 25 2c  22 61 73 6b 62 22 2c 32  |,290,S%,"askb",2|
000028a0  30 2c 32 30 2c 30 3a c8  96 3a c8 99 36 2c 31 31  |0,20,0:..:..6,11|
000028b0  32 2c 33 2d 4a 25 3a c8  99 34 36 2c 32 39 30 2c  |2,3-J%:..46,290,|
000028c0  53 25 2c 22 61 73 6b 62  22 2c 32 30 2c 32 30 2c  |S%,"askb",20,20,|
000028d0  30 3a c8 96 3a c8 99 36  2c 31 31 32 2c 4a 25 3a  |0:..:..6,112,J%:|
000028e0  e7 6e 25 3d 31 8c 0d 09  f6 1d f2 67 3a 65 24 3d  |.n%=1......g:e$=|
000028f0  c3 44 5f 25 3a 45 24 3d  c3 6f 79 25 3a 6a 79 25  |.D_%:E$=.oy%:jy%|
00002900  2b 3d 31 0d 0a 00 0c cc  3a e7 6e 25 3d 32 8c 0d  |+=1.....:.n%=2..|
00002910  0a 0a 2a f2 42 79 28 5a  24 2c 45 24 29 3a f2 77  |..*.By(Z$,E$):.w|
00002920  28 5a 24 2c 45 24 2c 66  25 29 3a f2 7a 79 28 65  |(Z$,E$,f%):.zy(e|
00002930  24 29 3a 5f 79 25 2b 3d  31 0d 0a 14 05 cd 0d 0a  |$):_y%+=1.......|
00002940  1e 07 cd 3a e1 0d 0a 28  29 dd f2 67 3a 50 24 3d  |...:...()..g:P$=|
00002950  22 22 3a f2 43 79 3a f2  75 79 3a e6 30 2c 30 c8  |"":.Cy:.uy:.0,0.|
00002960  9c 30 3a e7 44 5f 25 3d  6f 79 25 8c f2 58 0d 0a  |.0:.D_%=oy%..X..|
00002970  32 09 c8 97 87 3a e1 0d  0a 3c 0f dd f2 75 79 3a  |2....:...<...uy:|
00002980  2a 66 78 34 2c 31 0d 0a  46 49 e6 33 2c 33 c8 9c  |*fx4,1..FI.3,3..|
00002990  31 39 32 3a 78 25 3d 37  36 3a 47 25 3d 32 36 30  |192:x%=76:G%=260|
000029a0  3a c8 93 c8 90 36 30 2c  78 25 2c 33 38 30 2c 2d  |:....60,x%,380,-|
000029b0  33 32 3a f5 3a 43 24 3d  bf 28 35 29 3a e7 43 24  |32:.:C$=.(5):.C$|
000029c0  3d bd 28 31 33 36 29 80  47 25 3e 32 36 30 8c 0d  |=.(136).G%>260..|
000029d0  0a 50 39 c8 93 c8 90 47  25 2d 32 30 30 2c 78 25  |.P9....G%-200,x%|
000029e0  2c 33 38 30 2c 2d 33 32  3a 47 25 3d 47 25 2d 34  |,380,-32:G%=G%-4|
000029f0  30 30 3a c8 93 c8 90 47  25 2d 32 30 30 2c 78 25  |00:....G%-200,x%|
00002a00  2c 33 38 30 2c 2d 33 32  0d 0a 5a 19 cd 3a e7 43  |,380,-32..Z..:.C|
00002a10  24 3d bd 28 31 33 37 29  80 47 25 3c 31 30 36 30  |$=.(137).G%<1060|
00002a20  8c 0d 0a 64 39 c8 93 c8  90 47 25 2d 32 30 30 2c  |...d9....G%-200,|
00002a30  78 25 2c 33 38 30 2c 2d  33 32 3a 47 25 3d 47 25  |x%,380,-32:G%=G%|
00002a40  2b 34 30 30 3a c8 93 c8  90 47 25 2d 32 30 30 2c  |+400:....G%-200,|
00002a50  78 25 2c 33 38 30 2c 2d  33 32 0d 0a 6e 61 cd 3a  |x%,380,-32..na.:|
00002a60  fd a6 2d 37 34 3a 44 5f  25 3d 47 25 3a e3 45 25  |..-74:D_%=G%:.E%|
00002a70  3d 31 b8 31 30 3a c8 93  c8 90 47 25 2d 32 30 30  |=1.10:....G%-200|
00002a80  2c 78 25 2c 33 38 30 2c  2d 33 32 3a 54 3d a6 28  |,x%,380,-32:T=.(|
00002a90  36 29 3a ed 45 25 3a c8  99 34 36 2c 32 39 30 2c  |6):.E%:..46,290,|
00002aa0  53 25 2c 22 61 73 6b 62  22 2c 32 30 2c 32 30 2c  |S%,"askb",20,20,|
00002ab0  30 3a e7 6f 79 25 3d 44  5f 25 8c 0d 0a 78 3e c8  |0:.oy%=D_%...x>.|
00002ac0  99 34 36 2c 32 39 30 2c  53 25 2c 22 63 6f 72 72  |.46,290,S%,"corr|
00002ad0  65 63 74 22 2c 34 30 38  2c 34 30 2c 30 3a 5a 25  |ect",408,40,0:Z%|
00002ae0  28 72 25 2b 34 2c 31 29  2b 3d 31 3a 4a 3d 91 3a  |(r%+4,1)+=1:J=.:|
00002af0  f5 fd 91 2d 4a 3e 32 30  30 0d 0a 82 69 cc 3a c8  |...-J>200...i.:.|
00002b00  99 34 36 2c 32 39 30 2c  53 25 2c 22 77 72 6f 6e  |.46,290,S%,"wron|
00002b10  67 22 2c 34 35 34 2c 34  30 2c 30 3a 5a 25 28 72  |g",454,40,0:Z%(r|
00002b20  25 2b 34 2c 32 29 2b 3d  31 3a 4a 3d 91 3a f5 fd  |%+4,2)+=1:J=.:..|
00002b30  91 2d 4a 3e 32 30 30 3a  f2 56 3a c8 99 36 2c 31  |.-J>200:.V:..6,1|
00002b40  31 32 2c 33 2d 4a 25 3a  c8 99 34 36 2c 32 39 30  |12,3-J%:..46,290|
00002b50  2c 53 25 2c 22 61 73 6b  62 22 2c 32 30 2c 32 30  |,S%,"askb",20,20|
00002b60  2c 30 0d 0a 8c 0c cd 3a  2a 66 78 34 2c 30 0d 0a  |,0.....:*fx4,0..|
00002b70  96 05 e1 0d 0a a0 27 dd  f2 43 79 3a e6 30 2c 36  |......'..Cy:.0,6|
00002b80  33 c8 9c 31 39 32 3a 72  25 3d 44 25 3a e7 72 25  |3..192:r%=D%:.r%|
00002b90  3d 36 8c 72 25 3d b3 28  35 29 0d 0a aa 61 78 25  |=6.r%=.(5)...ax%|
00002ba0  3d 31 34 38 3a 47 25 3d  34 30 3a 46 5f 25 3d 30  |=148:G%=40:F_%=0|
00002bb0  3a f5 3a f5 3a 6e 25 3d  b3 28 46 25 28 72 25 2c  |:.:.:n%=.(F%(r%,|
00002bc0  30 29 29 3a 58 24 3d 53  24 28 72 25 2c 6e 25 29  |0)):X$=S$(r%,n%)|
00002bd0  3a fd a7 28 c3 28 46 25  28 72 25 2c 6e 25 29 29  |:..(.(F%(r%,n%))|
00002be0  29 2c c3 28 54 25 29 29  3e 30 3a 46 5f 25 2b 3d  |),.(T%))>0:F_%+=|
00002bf0  31 3a e7 46 5f 25 3e 32  30 30 8c 0d 0a b4 23 e3  |1:.F_%>200....#.|
00002c00  45 25 3d 31 b8 31 30 30  3a 43 25 28 72 25 2c 45  |E%=1.100:C%(r%,E|
00002c10  25 29 3d 30 3a ed 45 25  3a 46 5f 25 3d 30 0d 0a  |%)=0:.E%:F_%=0..|
00002c20  be 84 cd 3a fd 43 25 28  72 25 2c 6e 25 29 3d 30  |...:.C%(r%,n%)=0|
00002c30  3a 43 25 28 72 25 2c 6e  25 29 3d 31 3a c8 95 a9  |:C%(r%,n%)=1:...|
00002c40  28 58 24 29 3e 30 3a 50  24 3d 22 22 3a f5 3a 50  |(X$)>0:P$="":.:P|
00002c50  24 3d 50 24 2b c0 58 24  2c 31 29 3a 58 24 3d c2  |$=P$+.X$,1):X$=.|
00002c60  58 24 2c a9 28 58 24 29  2d 31 29 3a fd c2 50 24  |X$,.(X$)-1):..P$|
00002c70  2c 31 29 3d 22 20 22 84  a9 28 58 24 29 3d 30 3a  |,1)=" "..(X$)=0:|
00002c80  76 79 25 3d a9 28 50 24  29 3a 47 25 2b 3d 76 79  |vy%=.(P$):G%+=vy|
00002c90  25 2a 33 32 3a e7 47 25  3e 34 30 2b 33 37 2a 33  |%*32:.G%>40+37*3|
00002ca0  32 8c 0d 0a c8 1f 58 24  3d 50 24 2b 58 24 3a 78  |2.....X$=P$+X$:x|
00002cb0  25 2d 3d 33 36 3a 47 25  3d 34 30 3a 50 24 3d 22  |%-=36:G%=40:P$="|
00002cc0  22 0d 0a d2 30 cd 3a 47  25 2d 3d 76 79 25 2a 33  |"...0.:G%-=vy%*3|
00002cd0  32 3a e7 47 25 3d 34 30  80 c0 50 24 2c 31 29 3d  |2:.G%=40..P$,1)=|
00002ce0  22 20 22 8c 50 24 3d c2  50 24 2c 76 79 25 2d 31  |" ".P$=.P$,vy%-1|
00002cf0  29 0d 0a dc ad ec 47 25  2c 78 25 3a f1 50 24 3a  |).....G%,x%:.P$:|
00002d00  47 25 2b 3d 76 79 25 2a  33 32 3a ce 3a 47 25 3d  |G%+=vy%*32:.:G%=|
00002d10  36 30 3a 78 25 3d 37 36  3a 5a 24 3d 4a 24 28 72  |60:x%=76:Z$=J$(r|
00002d20  25 2c 6e 25 29 3a 43 24  3d 22 22 3a e3 45 25 3d  |%,n%):C$="":.E%=|
00002d30  31 b8 33 3a e6 30 2c 32  37 c8 9c 31 39 32 3a ec  |1.3:.0,27..192:.|
00002d40  47 25 2c 78 25 3a f1 bd  28 39 36 2b 45 25 29 2b  |G%,x%:..(96+E%)+|
00002d50  22 29 22 3a c8 95 c0 5a  24 2c 31 29 3c 3e 22 2c  |")":...Z$,1)<>",|
00002d60  22 80 5a 24 3c 3e 22 22  3a 43 24 2b 3d c0 5a 24  |".Z$<>"":C$+=.Z$|
00002d70  2c 31 29 3a 5a 24 3d c2  5a 24 2c a9 28 5a 24 29  |,1):Z$=.Z$,.(Z$)|
00002d80  2d 31 29 3a ce 3a e7 a9  28 5a 24 29 3e 30 8c 5a  |-1):.:..(Z$)>0.Z|
00002d90  24 3d c2 5a 24 2c a9 28  5a 24 29 2d 31 29 0d 0a  |$=.Z$,.(Z$)-1)..|
00002da0  e6 4e 46 24 28 45 25 29  3d 43 24 3a 47 25 2b 3d  |.NF$(E%)=C$:G%+=|
00002db0  34 30 30 3a 43 24 3d 22  22 3a ed 45 25 3a 45 25  |400:C$="":.E%:E%|
00002dc0  3d 31 3a 47 25 3d 33 32  3a e6 30 2c 31 32 c8 9c  |=1:G%=32:.0,12..|
00002dd0  31 39 32 3a f5 3a 69 79  25 3d b3 28 33 29 3a e7  |192:.:iy%=.(3):.|
00002de0  46 24 28 69 79 25 29 3c  3e 22 22 8c 0d 0a f0 2b  |F$(iy%)<>""....+|
00002df0  ec 47 25 2b 39 36 2c 78  25 3a f1 46 24 28 69 79  |.G%+96,x%:.F$(iy|
00002e00  25 29 3a e7 69 79 25 3d  31 8c 6f 79 25 3d 47 25  |%):.iy%=1.oy%=G%|
00002e10  2b 32 30 30 2b 32 38 0d  0a fa 1c 45 25 2b 3d 31  |+200+28....E%+=1|
00002e20  3a 47 25 2b 3d 34 30 30  3a 46 24 28 69 79 25 29  |:G%+=400:F$(iy%)|
00002e30  3d 22 22 0d 0b 04 0d cd  3a fd 45 25 3d 34 3a e1  |="".....:.E%=4:.|
00002e40  0d 0b 0e 51 dd f2 77 28  5a 24 2c 45 24 2c 5f 4a  |...Q..w(Z$,E$,_J|
00002e50  25 29 3a 65 25 3d 33 36  30 2d 28 28 a9 28 5a 24  |%):e%=360-((.(Z$|
00002e60  29 2b a9 28 45 24 29 29  2f 32 29 2a 35 32 3a e7  |)+.(E$))/2)*52:.|
00002e70  48 79 25 3d 30 8c 65 25  3d 36 34 30 2d 28 28 a9  |Hy%=0.e%=640-((.|
00002e80  28 5a 24 29 2b a9 28 45  24 29 29 2f 32 29 2a 35  |(Z$)+.(E$))/2)*5|
00002e90  32 0d 0b 18 25 e3 45 25  3d 31 b8 a9 28 5a 24 29  |2...%.E%=1..(Z$)|
00002ea0  3a 7a 25 3d 97 28 c1 5a  24 2c 45 25 2c 31 29 29  |:z%=.(.Z$,E%,1))|
00002eb0  3a c8 8e 7a 25 ca 0d 0b  22 0d c9 34 33 3a 7a 25  |:..z%..."..43:z%|
00002ec0  3d 36 35 0d 0b 2c 0d c9  34 35 3a 7a 25 3d 36 36  |=65..,..45:z%=66|
00002ed0  0d 0b 36 0d c9 34 32 3a  7a 25 3d 36 37 0d 0b 40  |..6..42:z%=67..@|
00002ee0  0d c9 34 37 3a 7a 25 3d  36 38 0d 0b 4a 0d c9 36  |..47:z%=68..J..6|
00002ef0  31 3a 7a 25 3d 36 39 0d  0b 54 31 cb 3a c8 99 34  |1:z%=69..T1.:..4|
00002f00  36 2c 35 34 36 2c 53 25  2c 41 25 28 7a 25 2d 33  |6,546,S%,A%(z%-3|
00002f10  34 29 2c 65 25 2c 5f 4a  25 2c 30 3a 65 25 2b 3d  |4),e%,_J%,0:e%+=|
00002f20  35 32 3a ed 45 25 3a e1  0d 0b 5e 15 dd f2 7a 79  |52:.E%:...^...zy|
00002f30  28 f8 4a 24 29 3a 2a 66  78 31 35 2c 30 0d 0b 68  |(.J$):*fx15,0..h|
00002f40  57 4a 24 3d 22 22 3a 43  24 3d 22 22 3a f5 3a c8  |WJ$="":C$="":.:.|
00002f50  99 34 36 2c 35 34 36 2c  53 25 2c 41 25 28 33 38  |.46,546,S%,A%(38|
00002f60  29 2c 65 25 2c 66 25 2c  30 3a f5 3a 43 24 3d bf  |),e%,f%,0:.:C$=.|
00002f70  28 35 29 3a e7 43 24 3c  3e 22 22 80 43 24 3e 3d  |(5):.C$<>"".C$>=|
00002f80  22 30 22 80 43 24 3c 3d  22 39 22 80 a9 28 4a 24  |"0".C$<="9"..(J$|
00002f90  29 3c 34 8c 0d 0b 72 55  7a 25 3d 97 28 43 24 29  |)<4...rUz%=.(C$)|
00002fa0  3a c8 99 34 36 2c 35 34  36 2c 53 25 2c 41 25 28  |:..46,546,S%,A%(|
00002fb0  7a 25 2d 33 34 29 2c 65  25 2c 66 25 2c 30 3a 4a  |z%-34),e%,f%,0:J|
00002fc0  24 3d 4a 24 2b 43 24 3a  65 25 2b 3d 35 32 3a c8  |$=J$+C$:e%+=52:.|
00002fd0  99 34 36 2c 35 34 36 2c  53 25 2c 41 25 28 33 38  |.46,546,S%,A%(38|
00002fe0  29 2c 65 25 2c 66 25 2c  30 0d 0b 7c 16 cd 3a e7  |),e%,f%,0..|..:.|
00002ff0  a6 28 2d 39 30 29 80 a9  28 4a 24 29 3e 30 8c 0d  |.(-90)..(J$)>0..|
00003000  0b 86 50 c8 99 34 36 2c  35 34 36 2c 53 25 2c 41  |..P..46,546,S%,A|
00003010  25 28 33 38 29 2c 65 25  2c 66 25 2c 33 3a 65 25  |%(38),e%,f%,3:e%|
00003020  2d 3d 35 32 3a c8 99 34  36 2c 35 34 36 2c 53 25  |-=52:..46,546,S%|
00003030  2c 41 25 28 33 38 29 2c  65 25 2c 66 25 2c 30 3a  |,A%(38),e%,f%,0:|
00003040  4a 24 3d c0 4a 24 29 3a  2a 66 78 31 35 2c 30 0d  |J$=.J$):*fx15,0.|
00003050  0b 90 24 cd 3a fd 43 24  3d bd 28 31 33 29 80 4a  |..$.:.C$=.(13).J|
00003060  24 3c 3e 22 22 3a e7 bb  28 4a 24 29 3d bb 28 45  |$<>"":..(J$)=.(E|
00003070  24 29 8c 0d 0b 9a 35 c8  99 34 36 2c 32 39 30 2c  |$)....5..46,290,|
00003080  53 25 2c 22 63 6f 72 72  65 63 74 22 2c 37 32 38  |S%,"correct",728|
00003090  2c 66 25 2c 38 3a e7 4c  24 3d 22 2b 22 8c 5a 25  |,f%,8:.L$="+".Z%|
000030a0  28 31 2c 31 29 2b 3d 31  0d 0b a4 0d cc 3a e7 48  |(1,1)+=1.....:.H|
000030b0  79 25 3e 31 8c 0d 0b ae  5d 48 79 25 2d 3d 31 3a  |y%>1....]Hy%-=1:|
000030c0  65 25 2d 3d 35 32 2a a9  28 4a 24 29 3a e6 30 2c  |e%-=52*.(J$):.0,|
000030d0  30 c8 9c 30 3a c8 93 c8  90 65 25 2c 66 25 2c 35  |0..0:....e%,f%,5|
000030e0  32 2a 28 a9 28 4a 24 29  2b 31 29 2c 31 30 38 3a  |2*(.(J$)+1),108:|
000030f0  4a 24 3d 22 22 3a c8 99  34 36 2c 32 39 30 2c 53  |J$="":..46,290,S|
00003100  25 2c 22 61 67 61 69 6e  22 2c 36 36 30 2c 66 25  |%,"again",660,f%|
00003110  2c 38 0d 0b b8 35 cc 3a  c8 99 34 36 2c 32 39 30  |,8...5.:..46,290|
00003120  2c 53 25 2c 22 77 72 6f  6e 67 22 2c 37 37 34 2c  |,S%,"wrong",774,|
00003130  66 25 2c 38 3a e7 4c 24  3d 22 2b 22 8c 5a 25 28  |f%,8:.L$="+".Z%(|
00003140  31 2c 32 29 2b 3d 31 0d  0b c2 09 48 79 25 3d 30  |1,2)+=1....Hy%=0|
00003150  0d 0b cc 05 cd 0d 0b d6  1d cd 3a 4d 3d a6 28 31  |..........:M=.(1|
00003160  30 30 29 3a e7 bb 28 4a  24 29 3c 3e bb 28 45 24  |00):..(J$)<>.(E$|
00003170  29 8c 0d 0b e0 1e e6 30  2c 30 c8 9c 30 3a c8 93  |)......0,0..0:..|
00003180  c8 90 36 38 30 2c 33 36  2c 35 36 30 2c 31 32 30  |..680,36,560,120|
00003190  0d 0b ea 30 cd 3a fd 48  79 25 3d 30 84 bb 28 4a  |...0.:.Hy%=0..(J|
000031a0  24 29 3d bb 28 45 24 29  3a e6 30 2c 30 c8 9c 30  |$)=.(E$):.0,0..0|
000031b0  3a e7 bb 28 4a 24 29 3d  bb 28 45 24 29 8c f2 58  |:..(J$)=.(E$)..X|
000031c0  0d 0b f4 0b e7 48 79 25  3d 30 8c 0d 0b fe 4c c8  |.....Hy%=0....L.|
000031d0  99 34 36 2c 32 39 30 2c  53 25 2c 22 61 73 6b 62  |.46,290,S%,"askb|
000031e0  22 2c 32 30 2c 32 30 2c  30 3a f2 77 28 c0 5a 24  |",20,20,0:.w(.Z$|
000031f0  2b 45 24 29 2c 22 22 2c  34 30 29 3a 4d 3d a6 28  |+E$),"",40):M=.(|
00003200  32 30 30 29 3a f2 58 3a  f2 56 3a c8 99 36 2c 31  |200):.X:.V:..6,1|
00003210  31 32 2c 33 2d 4a 25 0d  0c 08 07 cd 3a e1 0d 0c  |12,3-J%.....:...|
00003220  12 3f dd f2 58 3a e3 45  25 3d 39 36 b8 33 36 88  |.?..X:.E%=96.36.|
00003230  2d 32 3a c8 93 c8 90 34  30 2c 45 25 2c 31 32 30  |-2:....40,E%,120|
00003240  30 2c 28 39 36 2d 45 25  29 2a 32 3a 4a 3d 91 3a  |0,(96-E%)*2:J=.:|
00003250  f5 fd 91 2d 4a 3e 31 3a  ed 45 25 3a e1 0d 0c 1c  |...-J>1:.E%:....|
00003260  aa dd f2 56 3a 58 3d b9  3a f5 3a 6e 79 25 3d b3  |...V:X=.:.:ny%=.|
00003270  28 31 37 29 3a 50 5f 25  3d b3 28 31 37 29 3a fd  |(17):P_%=.(17):.|
00003280  45 25 28 6e 79 25 2b 32  2c 50 5f 25 2b 32 29 3d  |E%(ny%+2,P_%+2)=|
00003290  30 3a 57 25 3d 31 39 36  2d 28 6e 79 25 2d 31 29  |0:W%=196-(ny%-1)|
000032a0  2a 31 32 38 3a 42 25 3d  38 33 38 2b 28 50 5f 25  |*128:B%=838+(P_%|
000032b0  2d 31 29 2a 31 32 38 3a  45 3d 6e 79 25 3a 41 3d  |-1)*128:E=ny%:A=|
000032c0  50 5f 25 3a 43 25 3d 31  3a f2 5a 28 57 25 2c 42  |P_%:C%=1:.Z(W%,B|
000032d0  25 2c 45 2c 41 29 3a c8  a1 31 2c 22 53 46 58 2d  |%,E,A):..1,"SFX-|
000032e0  35 22 3a d4 31 2c 2d 31  35 2c 32 30 30 30 2c 31  |5":.1,-15,2000,1|
000032f0  3a d6 4e 3a 58 3d a3 3a  f2 5a 28 57 25 2c 42 25  |:.N:X=.:.Z(W%,B%|
00003300  2c 45 2c 41 29 3a e1 0d  0c 26 46 dd f2 42 79 28  |,E,A):...&F..By(|
00003310  f8 58 24 2c f8 45 24 29  3a ea 79 24 2c 68 24 2c  |.X$,.E$):.y$,h$,|
00003320  50 79 24 3a 4f 24 3d 4d  24 28 31 2c 54 25 29 3a  |Py$:O$=M$(1,T%):|
00003330  6b 79 25 3d a9 28 4f 24  29 2f 32 2d 32 3a 4c 24  |ky%=.(O$)/2-2:L$|
00003340  3d 22 2b 22 3a e7 4c 24  3d 22 2b 22 8c 0d 0c 30  |="+":.L$="+"...0|
00003350  29 79 24 3d c3 28 b3 28  bb 28 c2 4f 24 2c 34 29  |)y$=.(.(.(.O$,4)|
00003360  29 29 29 3a 68 24 3d c3  28 b3 28 bb 28 c2 4f 24  |))):h$=.(.(.(.O$|
00003370  2c 34 29 29 29 29 0d 0c  3a 1d cd 3a e7 4c 24 3d  |,4))))..:..:.L$=|
00003380  22 2b 22 8c 58 24 3d 79  24 2b 4c 24 2b 68 24 2b  |"+".X$=y$+L$+h$+|
00003390  22 3d 22 0d 0c 44 17 45  24 3d c3 28 a0 28 c0 58  |"="..D.E$=.(.(.X|
000033a0  24 29 29 29 2b 22 20 22  3a e1 0d 0c 4e 0c dd f2  |$)))+" ":...N...|
000033b0  46 3a e7 5a 8c e1 0d 0c  58 4e ef 35 3a f2 5a 28  |F:.Z....XN.5:.Z(|
000033c0  57 25 2c 42 25 2c 45 2c  41 29 3a 51 24 3d c3 28  |W%,B%,E,A):Q$=.(|
000033d0  6f 25 2b 6b 25 2b 62 25  2d 67 25 29 3a 62 24 3d  |o%+k%+b%-g%):b$=|
000033e0  22 53 43 4f 52 45 22 3a  e7 bb 28 51 24 29 3c 30  |"SCORE":..(Q$)<0|
000033f0  8c 51 24 3d 22 42 22 2b  c2 51 24 2c a9 28 51 24  |.Q$="B"+.Q$,.(Q$|
00003400  29 2d 31 29 0d 0c 62 f5  e3 45 25 3d 31 b8 32 3a  |)-1)..b..E%=1.2:|
00003410  c8 96 3a c8 99 36 2c 31  31 32 2c 33 2d 4a 25 3a  |..:..6,112,3-J%:|
00003420  c8 96 3a c8 99 34 36 2c  32 39 30 2c 53 25 2c 22  |..:..46,290,S%,"|
00003430  61 73 6b 62 22 2c 32 30  2c 32 30 2c 30 3a e3 41  |askb",20,20,0:.A|
00003440  5f 25 3d 31 b8 a9 28 51  24 29 3a 4a 4a 25 3d 97  |_%=1..(Q$):JJ%=.|
00003450  28 c1 51 24 2c 41 5f 25  2c 31 29 29 2d 33 34 3a  |(.Q$,A_%,1))-34:|
00003460  c8 99 34 36 2c 35 34 36  2c 53 25 2c 41 25 28 4a  |..46,546,S%,A%(J|
00003470  4a 25 29 2c 36 34 30 2d  28 a9 28 51 24 29 2f 32  |J%),640-(.(Q$)/2|
00003480  29 2a 35 32 2b 28 41 5f  25 2d 31 29 2a 34 38 2c  |)*52+(A_%-1)*48,|
00003490  34 34 2c 30 3a ed 41 5f  25 3a e6 30 2c 36 c8 9c  |44,0:.A_%:.0,6..|
000034a0  31 39 32 3a e3 5a 25 3d  31 b8 35 3a ec 33 30 30  |192:.Z%=1.5:.300|
000034b0  2b 5a 25 2a 33 36 2c 31  30 38 3a f1 c1 62 24 2c  |+Z%*36,108:..b$,|
000034c0  5a 25 2c 31 29 3a e6 30  2c 31 31 c8 9c 28 5a 25  |Z%,1):.0,11..(Z%|
000034d0  2d 31 29 2a 36 34 3a ed  5a 25 3a ef 32 34 2c 31  |-1)*64:.Z%:.24,1|
000034e0  31 31 32 3b 32 30 30 3b  31 32 37 36 3b 38 30 30  |112;200;1276;800|
000034f0  3b 3a e3 5f 25 3d 31 b8  37 0d 0c 6c b4 c8 99 34  |;:._%=1.7..l...4|
00003500  36 2c 35 34 36 2c 53 25  2c 41 25 28 63 25 29 2c  |6,546,S%,A%(c%),|
00003510  31 31 35 32 2c 5f 25 2a  31 32 38 2c 30 3a ed 5f  |1152,_%*128,0:._|
00003520  25 3a f2 45 28 c3 28 6b  25 29 2c 31 32 30 30 2c  |%:.E(.(k%),1200,|
00003530  37 34 35 2c 33 2c 33 29  3a f2 45 28 77 24 2c 31  |745,3,3):.E(w$,1|
00003540  32 30 30 2c 36 32 35 2c  33 2c 33 29 3a f2 45 28  |200,625,3,3):.E(|
00003550  c3 28 62 25 29 2c 31 32  30 30 2c 35 30 35 2c 33  |.(b%),1200,505,3|
00003560  2c 33 29 3a f2 45 28 c3  28 67 25 29 2c 31 32 30  |,3):.E(.(g%),120|
00003570  30 2c 33 38 35 2c 33 2c  33 29 3a f2 45 28 c3 28  |0,385,3,3):.E(.(|
00003580  6b 25 2b 62 25 2d 67 25  29 2c 31 32 30 30 2c 32  |k%+b%-g%),1200,2|
00003590  36 35 2c 31 35 2c 33 29  3a e7 45 25 3d 31 c8 96  |65,15,3):.E%=1..|
000035a0  3a c8 99 36 2c 31 31 33  2c 33 2d 4a 25 0d 0c 76  |:..6,113,3-J%..v|
000035b0  1d 4a 25 3d 33 2d 4a 25  3a ef 32 36 3a ed 45 25  |.J%=3-J%:.26:.E%|
000035c0  3a 4a 25 3d 33 2d 4a 25  3a e1 0d 0c 80 23 dd f2  |:J%=3-J%:....#..|
000035d0  6d 3a c8 a0 32 3a c8 a1  32 2c 22 57 61 76 65 53  |m:..2:..2,"WaveS|
000035e0  79 6e 74 68 2d 42 65 65  70 22 3a d4 ee 0d 0c 8a  |ynth-Beep":.....|
000035f0  fb e3 45 25 3d 31 b8 39  3a f3 50 24 28 45 25 29  |..E%=1.9:.P$(E%)|
00003600  3a ed 45 25 3a f2 78 3a  e3 45 25 3d 30 b8 34 36  |:.E%:.x:.E%=0.46|
00003610  3a f2 4d 28 c3 45 25 2c  41 25 28 45 25 29 29 3a  |:.M(.E%,A%(E%)):|
00003620  ed 3a f2 4d 28 22 62 61  63 6b 30 22 2c 41 25 28  |.:.M("back0",A%(|
00003630  35 32 29 29 3a f2 4d 28  22 62 61 63 6b 31 22 2c  |52)):.M("back1",|
00003640  41 25 28 35 33 29 29 3a  f2 4d 28 22 62 61 63 6b  |A%(53)):.M("back|
00003650  32 22 2c 41 25 28 35 34  29 29 3a f2 4d 28 22 62  |2",A%(54)):.M("b|
00003660  61 63 6b 33 22 2c 41 25  28 35 35 29 29 3a e3 45  |ack3",A%(55)):.E|
00003670  25 3d 30 b8 32 3a f2 4d  28 22 64 6f 77 6e 22 2b  |%=0.2:.M("down"+|
00003680  c3 28 45 25 29 2c 4d 25  28 45 25 2a 34 2b 31 29  |.(E%),M%(E%*4+1)|
00003690  29 3a f2 4d 28 22 75 70  22 2b c3 28 45 25 29 2c  |):.M("up"+.(E%),|
000036a0  4d 25 28 45 25 2a 34 2b  32 29 29 3a f2 4d 28 22  |M%(E%*4+2)):.M("|
000036b0  6c 65 66 74 22 2b c3 28  45 25 29 2c 4d 25 28 45  |left"+.(E%),M%(E|
000036c0  25 2a 34 2b 33 29 29 3a  f2 4d 28 22 72 69 67 68  |%*4+3)):.M("righ|
000036d0  74 22 2b c3 28 45 25 29  2c 4d 25 28 45 25 2a 34  |t"+.(E%),M%(E%*4|
000036e0  2b 34 29 29 3a ed 45 25  0d 0c 94 35 d6 50 3a 21  |+4)):.E%...5.P:!|
000036f0  61 3d 21 48 3a c8 99 34  39 2c 55 2c 47 3a 65 3d  |a=!H:..49,U,G:e=|
00003700  47 21 30 3a d6 50 3a 21  7a 3d 21 48 3a c8 99 34  |G!0:.P:!z=!H:..4|
00003710  39 2c 55 2c 47 3a 69 3d  47 21 30 3a e1 0d 0c 9e  |9,U,G:i=G!0:....|
00003720  e7 dd f2 6a 3a ef 32 33  2c 31 38 35 2c 34 2c 31  |...j:.23,185,4,1|
00003730  32 2c 32 32 38 2c 34 2c  31 34 2c 30 2c 30 2c 30  |2,228,4,14,0,0,0|
00003740  3a ef 32 33 2c 31 39 34  2c 36 34 2c 31 39 32 2c  |:.23,194,64,192,|
00003750  36 34 2c 37 32 2c 37 32  2c 31 30 2c 31 35 2c 32  |64,72,72,10,15,2|
00003760  3a ef 32 33 2c 31 39 39  2c 36 34 2c 31 39 32 2c  |:.23,199,64,192,|
00003770  36 34 2c 37 38 2c 36 36  2c 31 34 2c 38 2c 31 34  |64,78,66,14,8,14|
00003780  3a ef 32 33 2c 32 30 34  2c 32 32 34 2c 33 32 2c  |:.23,204,224,32,|
00003790  32 32 34 2c 34 30 2c 32  33 32 2c 31 30 2c 31 35  |224,40,232,10,15|
000037a0  2c 32 3a ef 32 33 2c 32  30 33 2c 32 32 34 2c 33  |,2:.23,203,224,3|
000037b0  32 2c 32 32 34 2c 31 33  35 2c 32 32 35 2c 37 2c  |2,224,135,225,7,|
000037c0  31 2c 37 3a ef 32 33 2c  32 30 31 2c 32 32 34 2c  |1,7:.23,201,224,|
000037d0  33 32 2c 32 32 34 2c 33  39 2c 32 32 38 2c 37 2c  |32,224,39,228,7,|
000037e0  31 2c 37 3a ef 32 33 2c  32 30 36 2c 31 32 38 2c  |1,7:.23,206,128,|
000037f0  31 32 38 2c 31 36 30 2c  32 34 37 2c 33 36 2c 37  |128,160,247,36,7|
00003800  2c 31 2c 37 0d 0c a8 e5  ef 32 33 2c 31 39 35 2c  |,1,7.....23,195,|
00003810  32 32 34 2c 33 32 2c 32  32 34 2c 31 33 35 2c 32  |224,32,224,135,2|
00003820  32 35 2c 31 2c 32 2c 34  3a ef 32 33 2c 31 39 36  |25,1,2,4:.23,196|
00003830  2c 36 34 2c 31 39 32 2c  36 34 2c 37 38 2c 36 36  |,64,192,64,78,66|
00003840  2c 31 34 2c 32 2c 31 34  3a ef 32 33 2c 32 30 30  |,14,2,14:.23,200|
00003850  2c 31 32 38 2c 31 32 38  2c 31 36 30 2c 32 34 37  |,128,128,160,247|
00003860  2c 33 33 2c 31 2c 32 2c  34 3a ef 32 33 2c 32 30  |,33,1,2,4:.23,20|
00003870  35 2c 31 31 32 2c 31 36  2c 33 32 2c 37 31 2c 36  |5,112,16,32,71,6|
00003880  39 2c 37 2c 31 2c 36 3a  ef 32 33 2c 31 39 38 2c  |9,7,1,6:.23,198,|
00003890  31 32 38 2c 31 32 38 2c  31 36 30 2c 32 34 37 2c  |128,128,160,247,|
000038a0  33 37 2c 37 2c 31 2c 36  3a ef 32 33 2c 32 30 37  |37,7,1,6:.23,207|
000038b0  2c 32 32 34 2c 31 32 38  2c 32 32 34 2c 33 39 2c  |,224,128,224,39,|
000038c0  32 32 38 2c 37 2c 35 2c  37 3a ef 32 33 2c 31 38  |228,7,5,7:.23,18|
000038d0  38 2c 36 34 2c 31 39 32  2c 36 34 2c 37 38 2c 37  |8,64,192,64,78,7|
000038e0  34 2c 31 34 2c 32 2c 31  32 0d 0c b2 e3 ef 32 33  |4,14,2,12.....23|
000038f0  2c 31 39 37 2c 32 32 34  2c 33 32 2c 32 32 34 2c  |,197,224,32,224,|
00003900  33 39 2c 32 32 39 2c 37  2c 35 2c 37 3a ef 32 33  |39,229,7,5,7:.23|
00003910  2c 32 30 32 2c 32 32 34  2c 31 32 38 2c 32 32 34  |,202,224,128,224|
00003920  2c 33 39 2c 32 32 39 2c  37 2c 35 2c 37 3a ef 32  |,39,229,7,5,7:.2|
00003930  33 2c 32 30 38 2c 32 32  34 2c 33 32 2c 33 32 2c  |3,208,224,32,32,|
00003940  37 31 2c 31 33 33 2c 37  2c 35 2c 37 3a ef 32 33  |71,133,7,5,7:.23|
00003950  2c 31 39 33 2c 32 32 34  2c 33 32 2c 32 32 34 2c  |,193,224,32,224,|
00003960  31 33 35 2c 32 32 39 2c  37 2c 31 2c 36 3a ef 32  |135,229,7,1,6:.2|
00003970  33 2c 31 39 30 2c 36 34  2c 31 39 32 2c 36 34 2c  |3,190,64,192,64,|
00003980  37 38 2c 36 36 2c 32 2c  34 2c 38 3a ef 32 33 2c  |78,66,2,4,8:.23,|
00003990  31 38 39 2c 36 34 2c 31  39 32 2c 36 34 2c 37 38  |189,64,192,64,78|
000039a0  2c 37 34 2c 31 34 2c 31  30 2c 31 34 3a ef 32 33  |,74,14,10,14:.23|
000039b0  2c 31 39 32 2c 36 34 2c  31 39 32 2c 36 34 2c 37  |,192,64,192,64,7|
000039c0  38 2c 37 32 2c 31 34 2c  32 2c 31 34 0d 0c bc a1  |8,72,14,2,14....|
000039d0  ef 32 33 2c 31 39 31 2c  36 34 2c 31 39 32 2c 36  |.23,191,64,192,6|
000039e0  34 2c 37 38 2c 37 32 2c  31 34 2c 31 30 2c 31 34  |4,78,72,14,10,14|
000039f0  3a ef 32 33 2c 32 30 39  2c 33 32 2c 33 32 2c 33  |:.23,209,32,32,3|
00003a00  32 2c 33 32 2c 33 32 2c  33 32 2c 38 30 2c 30 3a  |2,32,32,32,80,0:|
00003a10  ef 32 33 2c 32 31 30 2c  32 2c 32 2c 32 2c 39 38  |.23,210,2,2,2,98|
00003a20  2c 31 33 30 2c 31 33 30  2c 31 30 31 2c 30 3a ef  |,130,130,101,0:.|
00003a30  32 33 2c 32 31 31 2c 32  2c 32 2c 32 2c 32 35 30  |23,211,2,2,2,250|
00003a40  2c 31 37 30 2c 31 33 38  2c 31 34 31 2c 30 3a ef  |,170,138,141,0:.|
00003a50  32 33 2c 32 31 32 2c 30  2c 30 2c 33 2c 31 32 36  |23,212,0,0,3,126|
00003a60  2c 35 34 2c 35 34 2c 35  34 2c 30 3a e1 0d 0c c6  |,54,54,54,0:....|
00003a70  0d dd f2 46 79 3a e7 5a  8c e1 0d 0c d0 fa e3 45  |...Fy:.Z.......E|
00003a80  25 3d 31 b8 32 3a d6 50  3a e3 61 25 3d 30 b8 39  |%=1.2:.P:.a%=0.9|
00003a90  3a e3 5f 25 3d 30 b8 37  3a c8 99 34 36 2c 35 34  |:._%=0.7:..46,54|
00003aa0  36 2c 53 25 2c 41 25 28  63 25 29 2c 61 25 2a 31  |6,S%,A%(c%),a%*1|
00003ab0  32 38 2c 5f 25 2a 31 32  38 2c 30 3a ed 3a ed 3a  |28,_%*128,0:.:.:|
00003ac0  c8 99 34 36 2c 35 34 36  2c 53 25 2c 41 25 28 33  |..46,546,S%,A%(3|
00003ad0  36 29 2c 31 30 30 30 2c  36 37 32 2c 38 3a c8 99  |6),1000,672,8:..|
00003ae0  34 36 2c 35 34 36 2c 53  25 2c 41 25 28 33 37 29  |46,546,S%,A%(37)|
00003af0  2c 31 30 30 30 2c 35 35  30 2c 38 3a c8 99 34 36  |,1000,550,8:..46|
00003b00  2c 35 34 36 2c 53 25 2c  41 25 28 33 39 29 2c 31  |,546,S%,A%(39),1|
00003b10  30 35 30 2c 34 37 35 2c  38 3a c8 99 34 36 2c 35  |050,475,8:..46,5|
00003b20  34 36 2c 53 25 2c 41 25  28 34 30 29 2c 31 30 35  |46,S%,A%(40),105|
00003b30  30 2c 33 35 30 2c 38 3a  c8 99 34 36 2c 35 34 36  |0,350,8:..46,546|
00003b40  2c 53 25 2c 41 25 28 34  31 29 2c 31 30 30 30 2c  |,S%,A%(41),1000,|
00003b50  32 34 35 2c 38 3a f2 45  28 22 4c 65 76 65 6c 20  |245,8:.E("Level |
00003b60  22 2b c3 28 54 25 29 2c  31 36 30 2c 37 35 30 2c  |"+.(T%),160,750,|
00003b70  33 2c 33 29 0d 0c da 9a  f2 45 28 22 4d 61 7a 65  |3,3).....E("Maze|
00003b80  20 22 2b c3 28 44 25 29  2c 31 36 30 2c 36 37 30  | "+.(D%),160,670|
00003b90  2c 33 2c 33 29 3a f2 45  28 22 54 4f 20 45 58 49  |,3,3):.E("TO EXI|
00003ba0  54 22 2c 31 36 30 2c 35  39 30 2c 31 35 2c 33 29  |T",160,590,15,3)|
00003bb0  3a f2 45 28 22 59 4f 55  20 4e 45 45 44 22 2c 31  |:.E("YOU NEED",1|
00003bc0  36 30 2c 35 34 30 2c 31  35 2c 33 29 3a f2 45 28  |60,540,15,3):.E(|
00003bd0  c3 28 31 30 2b 32 2a 28  44 25 2b 54 25 29 29 2c  |.(10+2*(D%+T%)),|
00003be0  31 36 30 2c 34 39 30 2c  31 35 2c 33 29 3a c8 99  |160,490,15,3):..|
00003bf0  34 36 2c 32 39 30 2c 53  25 2c 22 61 73 6b 62 22  |46,290,S%,"askb"|
00003c00  2c 32 30 2c 32 30 2c 30  3a ed 45 25 3a e1 0d 0c  |,20,20,0:.E%:...|
00003c10  e4 37 dd f2 55 3a c8 96  3a ef 32 36 3a c8 97 c8  |.7..U:..:.26:...|
00003c20  93 30 2c 30 2c 31 32 37  39 2c 31 30 32 33 3a 63  |.0,0,1279,1023:c|
00003c30  25 3d 35 35 3a e7 44 25  3d 31 84 44 25 3d 34 8c  |%=55:.D%=1.D%=4.|
00003c40  63 25 3d 35 33 0d 0c ee  14 e7 44 25 3d 32 84 44  |c%=53.....D%=2.D|
00003c50  25 3d 36 8c 63 25 3d 35  34 0d 0c f8 d5 d6 50 3a  |%=6.c%=54.....P:|
00003c60  e3 61 25 3d 30 b8 39 3a  e3 5f 25 3d 30 b8 37 3a  |.a%=0.9:._%=0.7:|
00003c70  c8 99 34 36 2c 35 34 36  2c 53 25 2c 41 25 28 63  |..46,546,S%,A%(c|
00003c80  25 29 2c 61 25 2a 31 32  38 2c 5f 25 2a 31 32 38  |%),a%*128,_%*128|
00003c90  2c 30 3a ed 3a ed 3a d6  4e 3a e3 61 25 3d 30 b8  |,0:.:.:.N:.a%=0.|
00003ca0  39 3a e3 5f 25 3d 30 b8  37 3a c8 99 34 36 2c 35  |9:._%=0.7:..46,5|
00003cb0  34 36 2c 53 25 2c 41 25  28 63 25 29 2c 61 25 2a  |46,S%,A%(c%),a%*|
00003cc0  31 32 38 2c 5f 25 2a 31  32 38 2c 30 3a ed 3a ed  |128,_%*128,0:.:.|
00003cd0  3a d6 50 3a ec 31 30 30  30 2c 32 36 30 3a ec 31  |:.P:.1000,260:.1|
00003ce0  32 30 30 2c 33 31 30 3a  c8 99 34 36 2c 32 35 36  |200,310:..46,256|
00003cf0  2b 31 34 2c 53 25 2c 22  72 75 62 62 6f 78 22 3a  |+14,S%,"rubbox":|
00003d00  6f 25 2b 3d 6b 25 2b 62  25 2d 67 25 3a 6b 25 3d  |o%+=k%+b%-g%:k%=|
00003d10  30 3a 62 25 3d 30 3a 67  25 3d 30 3a 4a 25 3d 31  |0:b%=0:g%=0:J%=1|
00003d20  3a e7 44 25 3d 36 8c 44  25 3d b3 28 35 29 0d 0d  |:.D%=6.D%=.(5)..|
00003d30  02 17 e7 ac 79 25 8c 72  79 25 2b 3d 54 25 3a 5f  |....y%.ry%+=T%:_|
00003d40  79 25 2b 3d 31 0d 0d 0c  09 c8 8e 44 25 ca 0d 0d  |y%+=1......D%...|
00003d50  16 0c c9 31 3a f2 60 3a  f2 42 0d 0d 20 07 cb 3a  |...1:.`:.B.. ..:|
00003d60  e1 0d 0d 2a 9b dd f2 42  3a 63 25 3d 35 32 3a c8  |...*...B:c%=52:.|
00003d70  97 87 3a c8 96 3a d6 50  3a e3 61 25 3d 30 b8 39  |..:..:.P:.a%=0.9|
00003d80  3a e3 5f 25 3d 30 b8 37  3a c8 99 34 36 2c 35 34  |:._%=0.7:..46,54|
00003d90  36 2c 53 25 2c 41 25 28  63 25 29 2c 61 25 2a 31  |6,S%,A%(c%),a%*1|
00003da0  32 38 2c 5f 25 2a 31 32  38 2c 30 3a ed 3a ed 3a  |28,_%*128,0:.:.:|
00003db0  d6 4e 3a e3 61 25 3d 30  b8 39 3a e3 5f 25 3d 30  |.N:.a%=0.9:._%=0|
00003dc0  b8 37 3a c8 99 34 36 2c  35 34 36 2c 53 25 2c 41  |.7:..46,546,S%,A|
00003dd0  25 28 63 25 29 2c 61 25  2a 31 32 38 2c 5f 25 2a  |%(c%),a%*128,_%*|
00003de0  31 32 38 2c 30 3a ed 3a  ed 3a c8 96 3a d6 50 3a  |128,0:.:.:..:.P:|
00003df0  e7 ac 79 25 8c f2 68 79  8b f2 76 79 0d 0d 34 05  |..y%..hy..vy..4.|
00003e00  e1 0d 0d 3e 70 dd f2 68  79 3a 43 25 3d 31 3a 4a  |...>p..hy:C%=1:J|
00003e10  25 3d 31 3a 6d 5f 25 3d  30 3a 69 5f 25 3d 30 3a  |%=1:m_%=0:i_%=0:|
00003e20  58 3d a3 3a 57 25 3d 31  39 36 3a 42 25 3d 38 33  |X=.:W%=196:B%=83|
00003e30  38 3a 45 3d 31 3a 41 3d  31 3a 42 3d a3 3a 6b 25  |8:E=1:A=1:B=.:k%|
00003e40  3d 30 3a 77 24 3d 22 4e  4f 22 3a 62 25 3d 30 3a  |=0:w$="NO":b%=0:|
00003e50  67 25 3d 30 3a 55 25 3d  33 3a 51 25 3d 33 3a f2  |g%=0:U%=3:Q%=3:.|
00003e60  66 3a f2 73 3a f2 46 79  3a f2 63 79 3a f2 46 3a  |f:.s:.Fy:.cy:.F:|
00003e70  e1 0d 0d 48 22 dd f2 78  3a e3 45 25 3d 32 b8 35  |...H"..x:.E%=2.5|
00003e80  3a e7 a4 45 28 49 25 2c  45 25 29 8c 54 25 3d 45  |:..E(I%,E%).T%=E|
00003e90  25 2d 31 0d 0d 52 1f ed  45 25 3a 60 24 3d 22 22  |%-1..R..E%:`$=""|
00003ea0  3a e7 a4 45 28 49 25 2c  37 29 8c 60 24 2b 3d 22  |:..E(I%,7).`$+="|
00003eb0  2b 22 0d 0d 5c 3a 61 24  3d 22 22 3a 61 24 3d a4  |+"..\:a$="":a$=.|
00003ec0  5a 28 49 25 2c 31 33 29  3a 4c 4a 25 3d bb 28 61  |Z(I%,13):LJ%=.(a|
00003ed0  24 29 2a 36 30 3a 49 3d  a3 3a 4c 3d a3 3a e7 a4  |$)*60:I=.:L=.:..|
00003ee0  45 28 49 25 2c 32 31 29  8c 49 3d b9 0d 0d 66 12  |E(I%,21).I=...f.|
00003ef0  e7 a4 45 28 49 25 2c 31  38 29 8c 4c 3d b9 0d 0d  |..E(I%,18).L=...|
00003f00  70 05 e1 0d 0d 7a f6 dd  f2 76 79 3a ef 32 36 3a  |p....z...vy:.26:|
00003f10  c8 97 c8 93 30 2c 30 2c  31 32 37 39 2c 31 30 32  |....0,0,1279,102|
00003f20  33 3a f2 4e 3a c8 96 3a  d6 50 3a c8 99 34 36 2c  |3:.N:..:.P:..46,|
00003f30  32 39 30 2c 53 25 2c 22  62 6c 6f 63 6b 22 2c 32  |290,S%,"block",2|
00003f40  35 36 2c 36 30 30 3a f2  45 28 22 42 6c 6f 63 6b  |56,600:.E("Block|
00003f50  20 53 6c 69 64 65 22 2c  33 32 30 2c 35 37 30 2c  | Slide",320,570,|
00003f60  31 32 2c 33 29 3a c8 99  34 36 2c 32 39 30 2c 53  |12,3):..46,290,S|
00003f70  25 2c 22 6d 61 67 69 63  22 2c 32 35 36 2c 32 30  |%,"magic",256,20|
00003f80  30 3a f2 45 28 22 4d 61  67 69 63 20 53 71 75 61  |0:.E("Magic Squa|
00003f90  72 65 22 2c 33 32 30 2c  31 37 30 2c 31 32 2c 33  |re",320,170,12,3|
00003fa0  29 3a c8 99 34 36 2c 32  39 30 2c 53 25 2c 22 66  |):..46,290,S%,"f|
00003fb0  69 6c 6c 69 74 22 2c 35  37 36 2c 33 36 30 2c 38  |illit",576,360,8|
00003fc0  3a f2 45 28 22 46 69 6c  6c 20 49 74 22 2c 36 34  |:.E("Fill It",64|
00003fd0  30 2c 33 33 32 2c 31 32  2c 33 29 3a c8 99 34 36  |0,332,12,3):..46|
00003fe0  2c 32 39 30 2c 53 25 2c  22 63 6f 69 6e 73 22 2c  |,290,S%,"coins",|
00003ff0  38 39 32 2c 36 30 30 2c  38 0d 0d 84 f6 f2 45 28  |892,600,8.....E(|
00004000  22 43 6f 69 6e 73 22 2c  39 36 30 2c 35 37 30 2c  |"Coins",960,570,|
00004010  31 32 2c 33 29 3a c8 99  34 36 2c 32 39 30 2c 53  |12,3):..46,290,S|
00004020  25 2c 22 68 61 6e 6f 69  22 2c 38 39 32 2c 32 30  |%,"hanoi",892,20|
00004030  30 2c 38 3a f2 45 28 22  54 6f 77 65 72 73 20 6f  |0,8:.E("Towers o|
00004040  66 22 2c 39 36 30 2c 32  30 38 2c 31 32 2c 33 29  |f",960,208,12,3)|
00004050  3a f2 45 28 22 48 61 6e  6f 69 22 2c 39 36 30 2c  |:.E("Hanoi",960,|
00004060  31 36 30 2c 31 32 2c 33  29 3a c8 99 34 36 2c 35  |160,12,3):..46,5|
00004070  34 36 2c 53 25 2c 41 25  28 33 30 29 2c 35 37 36  |46,S%,A%(30),576|
00004080  2c 32 30 3a ec 37 32 30  2c 31 34 30 3a ec 37 38  |,20:.720,140:.78|
00004090  30 2c 32 32 30 3a c8 99  34 36 2c 32 35 36 2b 31  |0,220:..46,256+1|
000040a0  34 2c 53 25 2c 22 62 6f  78 22 3a f2 45 28 22 4c  |4,S%,"box":.E("L|
000040b0  45 56 45 4c 20 22 2b c3  28 54 25 29 2c 36 34 30  |EVEL "+.(T%),640|
000040c0  2c 38 30 30 2c 33 37 2c  33 29 3a f2 45 28 22 44  |,800,37,3):.E("D|
000040d0  45 53 4b 54 4f 50 22 2c  36 34 30 2c 32 30 30 2c  |ESKTOP",640,200,|
000040e0  32 30 2c 33 29 3a d6 4e  3a f2 4b 3a f2 77 79 0d  |20,3):.N:.K:.wy.|
000040f0  0d 8e 0d e7 44 25 3c 3e  36 8c f2 55 0d 0d 98 54  |....D%<>6..U...T|
00004100  e6 30 2c 30 c8 9c 30 3a  e3 5a 25 3d 30 b8 32 38  |.0,0..0:.Z%=0.28|
00004110  88 34 3a e3 45 25 3d 5a  25 b8 31 30 32 34 88 33  |.4:.E%=Z%.1024.3|
00004120  32 3a 86 30 2c 45 25 2c  31 32 38 30 2c 45 25 3a  |2:.0,E%,1280,E%:|
00004130  ed 3a 4a 3d 91 3a f5 fd  91 2d 4a 3e 35 3a ed 3a  |.:J=.:...-J>5:.:|
00004140  c8 96 3a f2 5f 3a db 3a  2a 66 78 32 30 30 2c 30  |..:._:.:*fx200,0|
00004150  0d 0d a2 09 5a 3d b9 3a  e1 0d 0d ac fd dd f2 66  |....Z=.:.......f|
00004160  3a ef 32 36 3a c8 97 c8  93 30 2c 30 2c 31 32 37  |:.26:....0,0,127|
00004170  39 2c 31 30 32 33 3a f2  4e 3a c8 96 3a d6 50 3a  |9,1023:.N:..:.P:|
00004180  c8 99 34 36 2c 35 34 36  2c 53 25 2c 41 25 28 31  |..46,546,S%,A%(1|
00004190  29 2c 32 35 36 2c 36 35  30 3a c8 99 34 36 2c 35  |),256,650:..46,5|
000041a0  34 36 2c 53 25 2c 41 25  28 34 32 29 2c 32 35 36  |46,S%,A%(42),256|
000041b0  2c 34 30 30 3a c8 99 34  36 2c 35 34 36 2c 53 25  |,400:..46,546,S%|
000041c0  2c 41 25 28 34 33 29 2c  32 35 36 2c 31 35 30 3a  |,A%(43),256,150:|
000041d0  c8 99 34 36 2c 35 34 36  2c 53 25 2c 41 25 28 34  |..46,546,S%,A%(4|
000041e0  34 29 2c 38 39 32 2c 36  35 30 3a c8 99 34 36 2c  |4),892,650:..46,|
000041f0  35 34 36 2c 53 25 2c 41  25 28 34 35 29 2c 38 39  |546,S%,A%(45),89|
00004200  32 2c 34 30 30 3a c8 99  34 36 2c 35 34 36 2c 53  |2,400:..46,546,S|
00004210  25 2c 41 25 28 34 36 29  2c 38 39 32 2c 31 35 30  |%,A%(46),892,150|
00004220  3a c8 99 34 36 2c 35 34  36 2c 53 25 2c 41 25 28  |:..46,546,S%,A%(|
00004230  33 30 29 2c 35 37 36 2c  32 30 3a c8 99 34 36 2c  |30),576,20:..46,|
00004240  35 34 36 2c 53 25 2c 4d  25 28 31 29 2c 34 31 36  |546,S%,M%(1),416|
00004250  2c 36 34 30 2c 38 0d 0d  b6 f2 c8 99 34 36 2c 35  |,640,8......46,5|
00004260  34 36 2c 53 25 2c 4d 25  28 35 29 2c 35 37 36 2c  |46,S%,M%(5),576,|
00004270  36 34 30 2c 38 3a c8 99  34 36 2c 35 34 36 2c 53  |640,8:..46,546,S|
00004280  25 2c 4d 25 28 39 29 2c  37 33 36 2c 36 34 30 2c  |%,M%(9),736,640,|
00004290  38 3a e6 33 2c 30 3a c8  93 34 31 36 2b 4d 79 25  |8:.3,0:..416+My%|
000042a0  2a 31 36 30 2c 36 34 30  2c 31 32 38 2c 31 32 38  |*160,640,128,128|
000042b0  3a 53 79 25 3d 31 32 3a  f2 45 28 22 4e 55 4d 42  |:Sy%=12:.E("NUMB|
000042c0  45 52 22 2c 33 32 30 2c  36 32 30 2c 53 79 25 2c  |ER",320,620,Sy%,|
000042d0  33 29 3a f2 45 28 22 54  49 4d 45 22 2c 33 32 30  |3):.E("TIME",320|
000042e0  2c 33 37 30 2c 53 79 25  2c 33 29 3a f2 45 28 22  |,370,Sy%,3):.E("|
000042f0  4d 45 41 53 55 52 45 4d  45 4e 54 22 2c 33 32 30  |MEASUREMENT",320|
00004300  2c 31 32 30 2c 53 79 25  2c 33 29 3a f2 45 28 22  |,120,Sy%,3):.E("|
00004310  41 4e 47 4c 45 53 22 2c  39 36 30 2c 36 32 30 2c  |ANGLES",960,620,|
00004320  53 79 25 2c 33 29 3a f2  45 28 22 53 48 41 50 45  |Sy%,3):.E("SHAPE|
00004330  20 26 20 53 50 41 43 45  22 2c 39 36 30 2c 33 37  | & SPACE",960,37|
00004340  30 2c 53 79 25 2c 33 29  0d 0d c0 f6 f2 45 28 22  |0,Sy%,3).....E("|
00004350  4c 55 43 4b 59 20 44 49  50 22 2c 39 36 30 2c 31  |LUCKY DIP",960,1|
00004360  32 30 2c 53 79 25 2c 33  29 3a f2 45 28 22 43 48  |20,Sy%,3):.E("CH|
00004370  4f 4f 53 45 22 2c 36 34  30 2c 36 30 30 2c 33 2c  |OOSE",640,600,3,|
00004380  33 29 3a f2 45 28 22 41  22 2c 36 34 30 2c 35 35  |3):.E("A",640,55|
00004390  30 2c 33 2c 33 29 3a f2  45 28 22 4d 41 5a 45 22  |0,3,3):.E("MAZE"|
000043a0  2c 36 34 30 2c 35 30 30  2c 33 2c 33 29 3a ec 37  |,640,500,3,3):.7|
000043b0  32 30 2c 31 34 30 3a ec  37 38 30 2c 32 32 30 3a  |20,140:.780,220:|
000043c0  c8 99 34 36 2c 32 35 36  2b 31 34 2c 53 25 2c 22  |..46,256+14,S%,"|
000043d0  62 6f 78 22 3a f2 45 28  22 4c 45 56 45 4c 20 22  |box":.E("LEVEL "|
000043e0  2b c3 28 54 25 29 2c 36  34 30 2c 38 30 30 2c 33  |+.(T%),640,800,3|
000043f0  37 2c 33 29 3a f2 45 28  22 44 45 53 4b 54 4f 50  |7,3):.E("DESKTOP|
00004400  22 2c 36 34 30 2c 32 30  30 2c 32 30 2c 33 29 3a  |",640,200,20,3):|
00004410  d6 4e 3a f2 4b 3a f2 53  79 3a f2 73 3a e6 30 2c  |.N:.K:.Sy:.s:.0,|
00004420  30 c8 9c 30 3a e3 5a 25  3d 30 b8 32 38 88 34 3a  |0..0:.Z%=0.28.4:|
00004430  e3 45 25 3d 5a 25 b8 31  30 32 34 88 33 32 0d 0d  |.E%=Z%.1024.32..|
00004440  ca 2f 86 30 2c 45 25 2c  31 32 38 30 2c 45 25 3a  |./.0,E%,1280,E%:|
00004450  ed 45 25 3a 4a 3d 91 3a  f5 fd 91 2d 4a 3e 35 3a  |.E%:J=.:...-J>5:|
00004460  ed 5a 25 3a c8 96 3a f2  5f 3a db 3a e1 0d 0d d4  |.Z%:..:._:.:....|
00004470  2f dd f2 4b 3a c8 99 34  39 2c 55 2c 47 3a 71 3d  |/..K:..49,U,G:q=|
00004480  47 21 30 3a e7 71 3d 65  8c c8 99 36 2c 31 31 32  |G!0:.q=e...6,112|
00004490  2c 31 8b c8 99 36 2c 31  31 32 2c 32 0d 0d de 05  |,1...6,112,2....|
000044a0  e1 0d 0d e8 2f dd f2 5f  3a c8 99 34 39 2c 55 2c  |..../.._:..49,U,|
000044b0  47 3a 71 3d 47 21 30 3a  e7 71 3d 65 8c c8 99 36  |G:q=G!0:.q=e...6|
000044c0  2c 31 31 32 2c 32 8b c8  99 36 2c 31 31 32 2c 31  |,112,2...6,112,1|
000044d0  0d 0d f2 05 e1 0d 0d fc  0d dd f2 77 79 3a e7 5a  |...........wy:.Z|
000044e0  8c e1 0d 0e 06 1c ea 4b  25 2c 4f 25 2c 53 3a 59  |.......K%,O%,S:Y|
000044f0  5f 25 3d 30 3a 44 25 3d  30 3a c8 97 ee 31 0d 0e  |_%=0:D%=0:...1..|
00004500  10 2f c8 95 44 25 3d 30  3a f5 c8 97 4b 25 2c 4f  |./..D%=0:...K%,O|
00004510  25 2c 53 3a fd 53 3d 30  3a f5 3a c8 97 4b 25 2c  |%,S:.S=0:.:..K%,|
00004520  4f 25 2c 53 3a e7 a6 2d  31 31 37 d4 ee 0d 0e 1a  |O%,S:..-117.....|
00004530  0c e7 a6 2d 31 31 38 d4  87 0d 0e 24 0f e7 a6 2d  |...-118....$...-|
00004540  32 80 a6 2d 31 31 33 8c  0d 0e 2e 0c 2a 66 78 32  |2..-113.....*fx2|
00004550  30 30 2c 30 0d 0e 38 0c  44 25 3d 36 3a 5a 3d b9  |00,0..8.D%=6:Z=.|
00004560  0d 0e 42 0c cd 3a e7 5a  8c 53 3d 31 0d 0e 4c 2a  |..B..:.Z.S=1..L*|
00004570  fd 53 3c 3e 30 3a e7 28  4b 25 3e 35 37 36 80 4b  |.S<>0:.(K%>576.K|
00004580  25 3c 37 30 34 29 80 28  4f 25 3e 32 30 80 4f 25  |%<704).(O%>20.O%|
00004590  3c 31 34 38 29 8c 0d 0e  56 0c 2a 66 78 32 30 30  |<148)...V.*fx200|
000045a0  2c 30 0d 0e 60 0c 5a 3d  b9 3a 44 25 3d 36 0d 0e  |,0..`.Z=.:D%=6..|
000045b0  6a 2a cd 3a e7 28 4b 25  3e 32 35 36 80 4b 25 3c  |j*.:.(K%>256.K%<|
000045c0  33 38 34 29 80 28 4f 25  3e 36 30 30 80 4f 25 3c  |384).(O%>600.O%<|
000045d0  37 32 38 29 44 25 3d 31  0d 0e 74 07 ce 3a e1 0d  |728)D%=1..t..:..|
000045e0  0e 7e 0d dd f2 53 79 3a  e7 5a 8c e1 0d 0e 88 1c  |.~...Sy:.Z......|
000045f0  ea 4b 25 2c 4f 25 2c 53  3a 44 25 3d 30 3a 59 5f  |.K%,O%,S:D%=0:Y_|
00004600  25 3d 30 3a c8 97 ee 31  0d 0e 92 36 c8 95 44 25  |%=0:...1...6..D%|
00004610  3d 30 3a f5 c8 97 4b 25  2c 4f 25 2c 53 3a fd 53  |=0:...K%,O%,S:.S|
00004620  3d 30 3a f5 3a c8 97 4b  25 2c 4f 25 2c 53 3a e7  |=0:.:..K%,O%,S:.|
00004630  a6 2d 36 80 a6 2d 31 31  34 59 5f 25 3d 31 0d 0e  |.-6..-114Y_%=1..|
00004640  9c 0c e7 a6 2d 31 31 37  d4 ee 0d 0e a6 0c e7 a6  |....-117........|
00004650  2d 31 31 38 d4 87 0d 0e  b0 0f e7 a6 2d 32 80 a6  |-118........-2..|
00004660  2d 31 31 33 8c 0d 0e ba  0c 2a 66 78 32 30 30 2c  |-113.....*fx200,|
00004670  30 0d 0e c4 07 5a 3d b9  0d 0e ce 0c cd 3a e7 5a  |0....Z=......:.Z|
00004680  8c 53 3d 31 0d 0e d8 1b  fd 53 3c 3e 30 3a e7 28  |.S=1.....S<>0:.(|
00004690  4b 25 3e 32 35 36 80 4b  25 3c 33 38 34 29 8c 0d  |K%>256.K%<384)..|
000046a0  0e e2 16 e7 4f 25 3e 36  35 30 80 4f 25 3c 37 37  |....O%>650.O%<77|
000046b0  38 44 25 3d 31 0d 0e ec  27 cd 3a e7 28 4b 25 3e  |8D%=1...'.:.(K%>|
000046c0  34 31 36 80 4b 25 3c 38  39 32 29 80 28 4f 25 3e  |416.K%<892).(O%>|
000046d0  36 34 30 80 4f 25 3c 37  36 38 29 8c 0d 0e f6 52  |640.O%<768)....R|
000046e0  e6 33 2c 30 3a c8 93 34  31 36 2b 4d 79 25 2a 31  |.3,0:..416+My%*1|
000046f0  36 30 2c 36 34 30 2c 31  32 38 2c 31 32 38 3a 4d  |60,640,128,128:M|
00004700  79 25 3d 28 4b 25 2d 34  31 36 29 81 31 36 30 3a  |y%=(K%-416).160:|
00004710  e6 33 2c 30 3a c8 93 34  31 36 2b 4d 79 25 2a 31  |.3,0:..416+My%*1|
00004720  36 30 2c 36 34 30 2c 31  32 38 2c 31 32 38 0d 0f  |60,640,128,128..|
00004730  00 26 cd 3a e7 28 4b 25  3e 35 37 36 80 4b 25 3c  |.&.:.(K%>576.K%<|
00004740  37 30 34 29 80 28 4f 25  3e 32 30 80 4f 25 3c 31  |704).(O%>20.O%<1|
00004750  34 38 29 8c 0d 0f 0a 0c  2a 66 78 32 30 30 2c 30  |48).....*fx200,0|
00004760  0d 0f 14 07 5a 3d b9 0d  0f 1e 0d cd 3a e7 5a 8c  |....Z=......:.Z.|
00004770  44 25 3d 31 0d 0f 28 0b  ce 3a c8 97 87 3a e1 0d  |D%=1..(..:...:..|
00004780  0f 32 6a dd f2 73 3a 45  25 28 29 3d 30 3a e3 45  |.2j..s:E%()=0:.E|
00004790  25 3d 31 b8 32 35 3a e3  5a 25 3d 31 b8 32 35 3a  |%=1.25:.Z%=1.25:|
000047a0  45 25 28 45 25 2c 5a 25  29 3d 50 25 28 44 25 2c  |E%(E%,Z%)=P%(D%,|
000047b0  45 25 2c 5a 25 29 3a ed  3a ed 3a 45 25 3d 31 3a  |E%,Z%):.:.:E%=1:|
000047c0  f5 3a 75 79 25 3d b3 28  31 38 29 2b 32 3a 66 5f  |.:uy%=.(18)+2:f_|
000047d0  25 3d b3 28 31 38 29 2b  32 3a e7 45 25 28 75 79  |%=.(18)+2:.E%(uy|
000047e0  25 2c 66 5f 25 29 3d 30  8c 0d 0f 3c 17 45 25 28  |%,f_%)=0...<.E%(|
000047f0  75 79 25 2c 66 5f 25 29  3d 36 3a 45 25 2b 3d 31  |uy%,f_%)=6:E%+=1|
00004800  0d 0f 46 0e cd 3a fd 45  25 3d 31 31 3a e1 0d 0f  |..F..:.E%=11:...|
00004810  50 7d dd f2 60 3a 68 25  3d 34 3a 6a 25 3d 34 3a  |P}..`:h%=4:j%=4:|
00004820  4a 25 3d 31 3a 6c 25 3d  30 3a 52 25 3d 34 3a 70  |J%=1:l%=0:R%=4:p|
00004830  25 3d 32 35 30 3a 74 79  25 3d 33 38 34 3a 52 5f  |%=250:ty%=384:R_|
00004840  25 3d 38 39 36 3a 43 5f  25 3d 32 35 36 3a 53 5f  |%=896:C_%=256:S_|
00004850  25 3d 37 36 38 3a 6c 79  25 3d b9 3a 57 25 3d 32  |%=768:ly%=.:W%=2|
00004860  35 36 3a 42 25 3d 37 36  38 3a 45 24 28 29 3d 22  |56:B%=768:E$()="|
00004870  31 30 30 30 22 3a 48 24  3d 22 22 3a 44 3d a3 3a  |1000":H$="":D=.:|
00004880  e7 54 25 3d 32 84 54 25  3d 31 8c 0d 0f 5a 47 52  |.T%=2.T%=1...ZGR|
00004890  25 3d 33 3a 68 25 3d 33  3a 6a 25 3d 33 3a 74 79  |%=3:h%=3:j%=3:ty|
000048a0  25 2b 3d 36 34 3a 43 5f  25 2b 3d 36 34 3a 52 5f  |%+=64:C_%+=64:R_|
000048b0  25 2d 3d 36 34 3a 53 5f  25 2d 3d 36 34 3a 57 25  |%-=64:S_%-=64:W%|
000048c0  2b 3d 36 34 3a 42 25 2d  3d 36 34 3a 70 25 3d 31  |+=64:B%-=64:p%=1|
000048d0  30 30 0d 0f 64 12 cd 3a  e7 ac 4c 8c 70 25 3d 39  |00..d..:..L.p%=9|
000048e0  39 39 39 39 0d 0f 6e d2  f2 6e 79 3a c8 99 36 2c  |9999..n..ny:..6,|
000048f0  31 31 33 2c 4a 25 3a c8  99 36 2c 31 31 32 2c 33  |113,J%:..6,112,3|
00004900  2d 4a 25 3a e3 5a 25 3d  31 b8 32 3a c8 99 36 2c  |-J%:.Z%=1.2:..6,|
00004910  31 31 32 2c 5a 25 3a e3  45 25 3d 28 52 25 2d 31  |112,Z%:.E%=(R%-1|
00004920  29 b8 30 88 2d 31 3a e6  30 2c 33 c8 9c 45 25 2a  |).0.-1:.0,3..E%*|
00004930  36 34 3a c8 93 c8 90 74  79 25 2d 45 25 2a 38 2c  |64:....ty%-E%*8,|
00004940  43 5f 25 2d 45 25 2a 38  2c 31 32 38 2a 52 25 2b  |C_%-E%*8,128*R%+|
00004950  45 25 2a 31 36 2c 31 32  38 2a 52 25 2b 45 25 2a  |E%*16,128*R%+E%*|
00004960  31 36 3a ed 45 25 3a ed  5a 25 3a f2 71 3a f2 4e  |16:.E%:.Z%:.q:.N|
00004970  3a d6 4e 3a f2 71 3a c8  99 36 2c 31 31 32 2c 31  |:.N:.q:..6,112,1|
00004980  3a c8 99 36 2c 31 31 33  2c 31 3a f5 3a f2 71 79  |:..6,113,1:.:.qy|
00004990  3a f2 4d 79 3a f2 52 79  3a fd 44 3a c8 99 34 36  |:.My:.Ry:.D:..46|
000049a0  2c 32 35 36 2b 32 35 2c  53 25 2c 22 62 6f 78 22  |,256+25,S%,"box"|
000049b0  3a e7 6c 79 25 8c 0d 0f  78 11 4a 3d 91 3a f5 fd  |:.ly%...x.J=.:..|
000049c0  91 2d 4a 3e 34 30 30 0d  0f 82 07 cd 3a e1 0d 0f  |.-J>400.....:...|
000049d0  8c 1b dd f2 6e 79 3a 71  79 25 3d 30 3a e7 54 25  |....ny:qy%=0:.T%|
000049e0  3d 32 71 79 25 3d 2d 31  35 0d 0f 96 0f e7 54 25  |=2qy%=-15.....T%|
000049f0  3d 31 84 54 25 3d 32 8c  0d 0f a0 29 e3 45 25 3d  |=1.T%=2....).E%=|
00004a00  31 b8 52 25 3a e3 5a 25  3d 31 b8 52 25 3a 57 3d  |1.R%:.Z%=1.R%:W=|
00004a10  71 79 25 2b b3 28 36 29  3a e7 57 3d 30 8c 57 3d  |qy%+.(6):.W=0.W=|
00004a20  31 0d 0f aa 27 45 24 28  5a 25 2c 45 25 29 3d c3  |1...'E$(Z%,E%)=.|
00004a30  57 3a e7 28 28 45 25 80  5a 25 29 3c 3e 52 25 29  |W:.((E%.Z%)<>R%)|
00004a40  48 24 3d 48 24 2b c3 57  0d 0f b4 11 71 79 25 3d  |H$=H$+.W....qy%=|
00004a50  57 3a ed 5a 25 3a ed 45  25 0d 0f be 0c cd 3a e7  |W:.Z%:.E%.....:.|
00004a60  54 25 3d 33 8c 0d 0f c8  5a 4d 3d 30 3a e3 45 25  |T%=3....ZM=0:.E%|
00004a70  3d 31 b8 52 25 3a e3 5a  25 3d 31 b8 52 25 3a 57  |=1.R%:.Z%=1.R%:W|
00004a80  3d 4d 2b 28 b3 28 33 29  2f 31 30 29 2b 30 2e 31  |=M+(.(3)/10)+0.1|
00004a90  3a 45 24 28 5a 25 2c 45  25 29 3d c0 c3 57 2c 33  |:E$(Z%,E%)=..W,3|
00004aa0  29 3a e7 28 28 45 25 80  5a 25 29 3c 3e 52 25 29  |):.((E%.Z%)<>R%)|
00004ab0  48 24 3d 48 24 2b 45 24  28 5a 25 2c 45 25 29 0d  |H$=H$+E$(Z%,E%).|
00004ac0  0f d2 0f 4d 3d 57 3a ed  5a 25 3a ed 45 25 0d 0f  |...M=W:.Z%:.E%..|
00004ad0  dc 0c cd 3a e7 54 25 3d  34 8c 0d 0f e6 31 54 5f  |...:.T%=4....1T_|
00004ae0  25 3d 30 3a 4a 5f 25 3d  31 3a e3 45 25 3d 31 b8  |%=0:J_%=1:.E%=1.|
00004af0  52 25 3a e3 5a 25 3d 31  b8 52 25 3a e7 b3 28 31  |R%:.Z%=1.R%:..(1|
00004b00  29 3c 2e 33 80 54 5f 25  3c 35 8c 0d 0f f0 11 54  |)<.3.T_%<5.....T|
00004b10  5f 25 2b 3d 31 3a 4a 5f  25 2b 3d 31 0d 0f fa 38  |_%+=1:J_%+=1...8|
00004b20  cd 3a 45 24 28 5a 25 2c  45 25 29 3d c1 76 24 2c  |.:E$(Z%,E%)=.v$,|
00004b30  4a 5f 25 2c 31 29 3a e7  28 28 45 25 80 5a 25 29  |J_%,1):.((E%.Z%)|
00004b40  3c 3e 52 25 29 48 24 3d  48 24 2b 45 24 28 5a 25  |<>R%)H$=H$+E$(Z%|
00004b50  2c 45 25 29 0d 10 04 12  4a 5f 25 2b 3d 31 3a ed  |,E%)....J_%+=1:.|
00004b60  5a 25 3a ed 45 25 0d 10  0e 5a cd 3a 48 24 2b 3d  |Z%:.E%...Z.:H$+=|
00004b70  22 30 22 3a 45 24 28 52  25 2c 52 25 29 3d 22 30  |"0":E$(R%,R%)="0|
00004b80  22 3a e3 45 25 3d 31 b8  31 30 30 3a 4e 79 25 3d  |":.E%=1.100:Ny%=|
00004b90  30 3a 58 79 25 3d 30 3a  f5 3a 65 79 25 3d 30 3a  |0:Xy%=0:.:ey%=0:|
00004ba0  4e 79 25 3d 30 3a 58 79  25 3d 30 3a e7 b3 28 31  |Ny%=0:Xy%=0:..(1|
00004bb0  29 3c 2e 35 65 79 25 3d  31 8b 65 79 25 3d 2d 31  |)<.5ey%=1.ey%=-1|
00004bc0  0d 10 18 1b e7 b3 28 31  29 3c 2e 35 4e 79 25 3d  |......(1)<.5Ny%=|
00004bd0  65 79 25 8b 58 79 25 3d  65 79 25 0d 10 22 66 fd  |ey%.Xy%=ey%.."f.|
00004be0  bb 28 45 24 28 68 25 2b  4e 79 25 2c 6a 25 2b 58  |.(E$(h%+Ny%,j%+X|
00004bf0  79 25 29 29 3c 31 30 30  30 3a 45 24 28 68 25 2c  |y%))<1000:E$(h%,|
00004c00  6a 25 29 3d 45 24 28 68  25 2b 4e 79 25 2c 6a 25  |j%)=E$(h%+Ny%,j%|
00004c10  2b 58 79 25 29 3a 45 24  28 68 25 2b 4e 79 25 2c  |+Xy%):E$(h%+Ny%,|
00004c20  6a 25 2b 58 79 25 29 3d  22 30 22 3a 68 25 2b 3d  |j%+Xy%)="0":h%+=|
00004c30  4e 79 25 3a 6a 25 2b 3d  58 79 25 3a ed 45 25 3a  |Ny%:j%+=Xy%:.E%:|
00004c40  e1 0d 10 2c 16 dd f2 71  79 3a ea 4b 25 2c 4f 25  |...,...qy:.K%,O%|
00004c50  2c 53 3a c8 97 ee 31 0d  10 36 46 f5 3a 78 3d a3  |,S:...1..6F.:x=.|
00004c60  3a 43 25 3d 30 3a 46 3d  30 3a 43 3d 30 3a f5 3a  |:C%=0:F=0:C=0:.:|
00004c70  f5 c8 97 4b 25 2c 4f 25  2c 53 3a fd 53 3d 30 3a  |...K%,O%,S:.S=0:|
00004c80  f5 3a c8 97 4b 25 2c 4f  25 2c 53 3a e7 a6 2d 36  |.:..K%,O%,S:..-6|
00004c90  37 8c 44 3d b9 3a 6c 79  25 3d a3 3a e1 0d 10 40  |7.D=.:ly%=.:...@|
00004ca0  2a fd 53 3c 3e 30 3a e7  4b 25 3e 74 79 25 e7 4b  |*.S<>0:.K%>ty%.K|
00004cb0  25 3c 52 5f 25 e7 4f 25  3e 43 5f 25 e7 4f 25 3c  |%<R_%.O%>C_%.O%<|
00004cc0  53 5f 25 8c 78 3d b9 0d  10 4a 5a fd 78 3a 42 79  |S_%.x=...JZ.x:By|
00004cd0  25 3d 28 28 4b 25 2d 74  79 25 29 81 31 32 38 29  |%=((K%-ty%).128)|
00004ce0  2b 31 3a 44 79 25 3d 28  28 53 5f 25 2d 4f 25 29  |+1:Dy%=((S_%-O%)|
00004cf0  81 31 32 38 29 2b 31 3a  e7 45 24 28 42 79 25 2c  |.128)+1:.E$(By%,|
00004d00  44 79 25 2b 31 29 3d 22  30 22 80 44 79 25 3c 52  |Dy%+1)="0".Dy%<R|
00004d10  25 80 43 25 3d 30 43 3d  2e 31 32 35 3a 43 25 3d  |%.C%=0C=.125:C%=|
00004d20  31 0d 10 54 2d e7 45 24  28 42 79 25 2c 44 79 25  |1..T-.E$(By%,Dy%|
00004d30  2d 31 29 3d 22 30 22 80  44 79 25 3e 31 80 43 25  |-1)="0".Dy%>1.C%|
00004d40  3d 30 43 3d 2d 2e 31 32  35 3a 43 25 3d 32 0d 10  |=0C=-.125:C%=2..|
00004d50  5e 2d e7 45 24 28 42 79  25 2d 31 2c 44 79 25 29  |^-.E$(By%-1,Dy%)|
00004d60  3d 22 30 22 80 42 79 25  3e 31 80 43 25 3d 30 46  |="0".By%>1.C%=0F|
00004d70  3d 2d 2e 31 32 35 3a 43  25 3d 33 0d 10 68 2d e7  |=-.125:C%=3..h-.|
00004d80  45 24 28 42 79 25 2b 31  2c 44 79 25 29 3d 22 30  |E$(By%+1,Dy%)="0|
00004d90  22 80 42 79 25 3c 52 25  80 43 25 3d 30 46 3d 2e  |".By%<R%.C%=0F=.|
00004da0  31 32 35 3a 43 25 3d 34  0d 10 72 0c fd 43 25 3c  |125:C%=4..r..C%<|
00004db0  3e 30 3a e1 0d 10 7c db  dd f2 4d 79 3a 4a 25 3d  |>0:...|...My:J%=|
00004dc0  33 2d 4a 25 3a c8 99 36  2c 31 31 32 2c 4a 25 3a  |3-J%:..6,112,J%:|
00004dd0  e6 30 2c 33 c8 9c 30 3a  60 79 25 3d 68 25 2d 28  |.0,3..0:`y%=h%-(|
00004de0  38 2a 46 29 3a 5a 5f 25  3d 6a 25 2d 28 38 2a 43  |8*F):Z_%=j%-(8*C|
00004df0  29 3a 45 24 28 68 25 2c  6a 25 29 3d 45 24 28 60  |):E$(h%,j%)=E$(`|
00004e00  79 25 2c 5a 5f 25 29 3a  45 24 28 60 79 25 2c 5a  |y%,Z_%):E$(`y%,Z|
00004e10  5f 25 29 3d 22 30 22 3a  52 79 25 3d 57 25 2b 31  |_%)="0":Ry%=W%+1|
00004e20  32 38 2a 60 79 25 3a 57  79 25 3d 42 25 2d 5a 5f  |28*`y%:Wy%=B%-Z_|
00004e30  25 2a 31 32 38 3a ec 52  79 25 2c 57 79 25 3a ec  |%*128:.Ry%,Wy%:.|
00004e40  52 79 25 2b 31 32 34 2c  57 79 25 2b 31 32 34 3a  |Ry%+124,Wy%+124:|
00004e50  c8 99 34 36 2c 32 35 36  2b 31 34 2c 53 25 2c 22  |..46,256+14,S%,"|
00004e60  62 6f 78 22 3a c8 96 3a  e3 51 3d 31 b8 38 3a c8  |box":..:.Q=1.8:.|
00004e70  99 36 2c 31 31 32 2c 33  2d 4a 25 3a c8 93 c8 90  |.6,112,3-J%:....|
00004e80  52 79 25 2c 57 79 25 2c  31 32 34 2c 31 32 34 0d  |Ry%,Wy%,124,124.|
00004e90  10 86 f1 c8 99 34 36 2c  32 35 36 2b 33 34 2c 53  |.....46,256+34,S|
00004ea0  25 2c 22 62 6f 78 22 2c  52 79 25 2b 28 31 32 38  |%,"box",Ry%+(128|
00004eb0  2a 51 2a 46 29 2c 57 79  25 2d 28 31 32 38 2a 51  |*Q*F),Wy%-(128*Q|
00004ec0  2a 43 29 2c 30 3a c8 96  3a c8 99 36 2c 31 31 33  |*C),0:..:..6,113|
00004ed0  2c 33 2d 4a 25 3a 4a 25  3d 33 2d 4a 25 3a 54 3d  |,3-J%:J%=3-J%:T=|
00004ee0  a6 28 33 29 3a ed 51 3a  4a 25 3d 33 2d 4a 25 3a  |.(3):.Q:J%=3-J%:|
00004ef0  c8 96 3a c8 99 36 2c 31  31 33 2c 33 2d 4a 25 3a  |..:..6,113,3-J%:|
00004f00  c8 99 36 2c 31 31 32 2c  4a 25 3a c8 99 34 36 2c  |..6,112,J%:..46,|
00004f10  32 35 36 2b 33 34 2c 53  25 2c 22 62 6f 78 22 2c  |256+34,S%,"box",|
00004f20  52 79 25 2b 28 31 30 32  34 2a 46 29 2c 57 79 25  |Ry%+(1024*F),Wy%|
00004f30  2d 28 31 30 32 34 2a 43  29 2c 30 3a c8 93 c8 90  |-(1024*C),0:....|
00004f40  52 79 25 2c 57 79 25 2c  31 32 34 2c 31 32 34 3a  |Ry%,Wy%,124,124:|
00004f50  c8 96 3a c8 99 36 2c 31  31 33 2c 4a 25 3a 68 25  |..:..6,113,J%:h%|
00004f60  2d 3d 38 2a 46 3a 6a 25  2d 3d 38 2a 43 3a 43 25  |-=8*F:j%-=8*C:C%|
00004f70  3d 30 3a 46 3d 30 3a 43  3d 30 3a 6c 25 2b 3d 31  |=0:F=0:C=0:l%+=1|
00004f80  0d 10 90 a9 c8 99 36 2c  31 31 32 2c 33 2d 4a 25  |......6,112,3-J%|
00004f90  3a c8 99 34 36 2c 32 39  30 2c 53 25 2c 22 72 75  |:..46,290,S%,"ru|
00004fa0  62 62 6f 78 22 2c 31 30  30 30 2c 32 36 30 3a f2  |bbox",1000,260:.|
00004fb0  45 28 c3 28 6c 25 29 2c  31 30 38 38 2c 33 30 30  |E(.(l%),1088,300|
00004fc0  2c 31 35 2c 33 29 3a c8  96 3a c8 99 36 2c 31 31  |,15,3):..:..6,11|
00004fd0  33 2c 33 2d 4a 25 3a c8  96 3a c8 99 36 2c 31 31  |3,3-J%:..:..6,11|
00004fe0  32 2c 4a 25 3a c8 99 34  36 2c 32 39 30 2c 53 25  |2,J%:..46,290,S%|
00004ff0  2c 22 72 75 62 62 6f 78  22 2c 31 30 30 30 2c 32  |,"rubbox",1000,2|
00005000  36 30 3a e7 6c 79 25 c8  a1 31 2c 22 50 65 72 63  |60:.ly%..1,"Perc|
00005010  75 73 73 69 6f 6e 2d 53  6f 66 74 22 3a d4 31 2c  |ussion-Soft":.1,|
00005020  2d 31 32 2c 31 30 30 2c  31 0d 10 9a 1d f2 45 28  |-12,100,1.....E(|
00005030  c3 28 6c 25 29 2c 31 30  38 38 2c 33 30 30 2c 31  |.(l%),1088,300,1|
00005040  35 2c 33 29 3a e1 0d 10  a4 40 dd f2 52 79 3a 7a  |5,3):....@..Ry:z|
00005050  24 3d 22 22 3a e3 45 25  3d 31 b8 52 25 3a e3 5a  |$="":.E%=1.R%:.Z|
00005060  25 3d 31 b8 52 25 3a 7a  24 3d 7a 24 2b 45 24 28  |%=1.R%:z$=z$+E$(|
00005070  5a 25 2c 45 25 29 3a ed  5a 25 3a ed 45 25 3a e7  |Z%,E%):.Z%:.E%:.|
00005080  7a 24 3d 48 24 8c 0d 10  ae 3b c8 99 36 2c 31 31  |z$=H$....;..6,11|
00005090  32 2c 33 2d 4a 25 3a f2  45 28 22 57 45 4c 4c 20  |2,3-J%:.E("WELL |
000050a0  44 4f 4e 45 21 22 2c 36  34 30 2c 31 38 30 2c 37  |DONE!",640,180,7|
000050b0  2c 33 29 3a e7 70 25 3e  32 35 30 8c 6c 25 3d 70  |,3):.p%>250.l%=p|
000050c0  25 0d 10 b8 09 e7 ac 79  25 8c 0d 10 c2 65 6f 25  |%......y%....eo%|
000050d0  2b 3d 28 70 25 2d 6c 25  29 81 31 30 3a f2 45 28  |+=(p%-l%).10:.E(|
000050e0  22 53 4b 49 4c 4c 20 42  4f 4e 55 53 3a 20 22 2b  |"SKILL BONUS: "+|
000050f0  c3 28 28 70 25 2d 6c 25  29 81 31 30 29 2c 36 34  |.((p%-l%).10),64|
00005100  30 2c 31 33 30 2c 31 30  2c 33 29 3a f2 45 28 22  |0,130,10,3):.E("|
00005110  54 4f 54 41 4c 20 53 43  4f 52 45 3a 20 22 2b c3  |TOTAL SCORE: "+.|
00005120  6f 25 2c 36 34 30 2c 38  30 2c 31 35 2c 33 29 0d  |o%,640,80,15,3).|
00005130  10 cc 16 cd 3a c8 99 36  2c 31 31 33 2c 33 2d 4a  |....:..6,113,3-J|
00005140  25 3a 44 3d b9 0d 10 d6  14 cd 3a e7 6c 25 3d 70  |%:D=......:.l%=p|
00005150  25 80 7a 24 3c 3e 48 24  8c 0d 10 e0 74 c8 99 36  |%.z$<>H$....t..6|
00005160  2c 31 31 32 2c 33 2d 4a  25 3a f2 45 28 22 59 6f  |,112,3-J%:.E("Yo|
00005170  75 27 76 65 20 72 75 6e  20 6f 75 74 20 6f 66 20  |u've run out of |
00005180  6d 6f 76 65 73 21 22 2c  36 34 30 2c 31 33 30 2c  |moves!",640,130,|
00005190  37 2c 33 29 3a f2 45 28  22 42 65 74 74 65 72 20  |7,3):.E("Better |
000051a0  6c 75 63 6b 20 6e 65 78  74 20 74 69 6d 65 22 2c  |luck next time",|
000051b0  36 34 30 2c 38 30 2c 31  30 2c 33 29 3a c8 99 36  |640,80,10,3):..6|
000051c0  2c 31 31 33 2c 33 2d 4a  25 3a 44 3d b9 0d 10 ea  |,113,3-J%:D=....|
000051d0  07 cd 3a e1 0d 10 f4 35  dd f2 71 3a e6 30 2c 36  |..:....5..q:.0,6|
000051e0  33 c8 9c 31 39 32 3a e3  5a 25 3d 31 b8 52 25 3a  |3..192:.Z%=1.R%:|
000051f0  e3 45 25 3d 31 b8 52 25  3a e7 45 24 28 45 25 2c  |.E%=1.R%:.E$(E%,|
00005200  5a 25 29 3c 3e 22 30 22  8c 0d 10 fe 69 c8 99 34  |Z%)<>"0"....i..4|
00005210  36 2c 32 39 30 2c 53 25  2c 22 62 6c 6f 78 22 2c  |6,290,S%,"blox",|
00005220  57 25 2b 31 32 38 2a 45  25 2c 42 25 2d 5a 25 2a  |W%+128*E%,B%-Z%*|
00005230  31 32 38 2c 30 3a 70 5f  25 3d 57 25 2b 31 32 38  |128,0:p_%=W%+128|
00005240  2a 45 25 2b 36 34 3a 6b  5f 25 3d 42 25 2d 5a 25  |*E%+64:k_%=B%-Z%|
00005250  2a 31 32 38 2b 38 30 3a  f2 45 28 45 24 28 45 25  |*128+80:.E(E$(E%|
00005260  2c 5a 25 29 2c 70 5f 25  2c 6b 5f 25 2c 36 33 2c  |,Z%),p_%,k_%,63,|
00005270  33 29 0d 11 08 2c cd 3a  ed 45 25 3a ed 5a 25 3a  |3)...,.:.E%:.Z%:|
00005280  73 24 3d c3 28 70 25 29  3a e7 73 24 3d 22 39 39  |s$=.(p%):.s$="99|
00005290  39 39 39 22 8c 73 24 3d  22 4e 4f 4e 45 22 0d 11  |999".s$="NONE"..|
000052a0  12 9c f2 45 28 22 4d 4f  56 45 53 22 2c 31 30 38  |...E("MOVES",108|
000052b0  38 2c 34 30 30 2c 33 2c  33 29 3a f2 45 28 22 54  |8,400,3,3):.E("T|
000052c0  41 4b 45 4e 22 2c 31 30  38 38 2c 33 35 30 2c 33  |AKEN",1088,350,3|
000052d0  2c 33 29 3a f2 45 28 c3  28 6c 25 29 2c 31 30 38  |,3):.E(.(l%),108|
000052e0  38 2c 33 30 30 2c 31 35  2c 33 29 3a f2 45 28 22  |8,300,15,3):.E("|
000052f0  4d 41 58 49 4d 55 4d 22  2c 31 30 38 38 2c 37 35  |MAXIMUM",1088,75|
00005300  30 2c 33 2c 33 29 3a f2  45 28 22 4d 4f 56 45 53  |0,3,3):.E("MOVES|
00005310  22 2c 31 30 38 38 2c 37  30 30 2c 33 2c 33 29 3a  |",1088,700,3,3):|
00005320  f2 45 28 73 24 2c 31 30  38 38 2c 36 35 30 2c 31  |.E(s$,1088,650,1|
00005330  35 2c 33 29 3a e7 ac 79  25 8c 0d 11 1c 33 f2 45  |5,3):..y%....3.E|
00005340  28 22 53 43 4f 52 45 22  2c 31 30 38 38 2c 35 35  |("SCORE",1088,55|
00005350  30 2c 32 30 2c 33 29 3a  f2 45 28 c3 6f 25 2c 31  |0,20,3):.E(.o%,1|
00005360  30 38 38 2c 35 30 30 2c  33 30 2c 33 29 0d 11 26  |088,500,30,3)..&|
00005370  46 cd 3a f2 45 28 22 4c  65 76 65 6c 20 22 2b c3  |F.:.E("Level "+.|
00005380  54 25 2c 31 39 32 2c 37  35 30 2c 34 38 2c 33 29  |T%,192,750,48,3)|
00005390  3a f2 45 28 22 50 75 7a  7a 6c 65 20 22 2b c3 28  |:.E("Puzzle "+.(|
000053a0  44 25 29 2c 31 39 32 2c  36 37 30 2c 34 38 2c 33  |D%),192,670,48,3|
000053b0  29 3a e1 0d 11 30 44 dd  f2 45 28 5a 24 2c 6e 79  |):...0D..E(Z$,ny|
000053c0  25 2c 6f 5f 25 2c 7a 25  2c 71 79 25 29 3a 71 5f  |%,o_%,z%,qy%):q_|
000053d0  25 3d 6e 79 25 2d 28 a9  5a 24 2a 31 36 29 3a ef  |%=ny%-(.Z$*16):.|
000053e0  35 3a e6 30 c8 9c 30 3a  e7 71 79 25 3d 32 8c e6  |5:.0..0:.qy%=2..|
000053f0  36 33 c8 9c 31 39 32 0d  11 3a 57 e3 64 5f 25 3d  |63..192..:W.d_%=|
00005400  2d 34 b8 34 88 34 3a e3  4f 5f 25 3d 2d 34 b8 34  |-4.4.4:.O_%=-4.4|
00005410  88 34 3a ec 71 5f 25 2b  64 5f 25 2c 6f 5f 25 2b  |.4:.q_%+d_%,o_%+|
00005420  4f 5f 25 3a f1 5a 24 3a  ed 4f 5f 25 3a ed 64 5f  |O_%:.Z$:.O_%:.d_|
00005430  25 3a e6 7a 25 c8 9c 71  79 25 2a 36 34 3a ec 71  |%:.z%..qy%*64:.q|
00005440  5f 25 2c 6f 5f 25 3a f1  5a 24 3a 87 3a e1 0d 11  |_%,o_%:.Z$:.:...|
00005450  44 28 dd f2 4d 28 4c 24  2c f8 41 25 29 3a c8 99  |D(..M(L$,.A%):..|
00005460  34 36 2c 32 35 36 2b 32  34 2c 53 25 2c 4c 24 b8  |46,256+24,S%,L$.|
00005470  2c 2c 41 25 3a e1 0d 11  4e 72 dd f2 58 79 3a 4c  |,,A%:...Nr..Xy:L|
00005480  24 3d 54 24 2b 22 2e 47  72 61 66 69 78 22 3a 77  |$=T$+".Grafix":w|
00005490  5f 25 3d 8e 28 4c 24 29  3a 4c 25 3d a2 23 77 5f  |_%=.(L$):L%=.#w_|
000054a0  25 2b 36 34 3a d9 23 77  5f 25 3a de 53 25 4c 25  |%+64:.#w_%:.S%L%|
000054b0  2b 38 30 30 30 30 3a 53  25 21 30 3d 4c 25 2b 32  |+80000:S%!0=L%+2|
000054c0  30 30 2a 32 30 30 3a c8  99 34 36 2c 32 35 36 2b  |00*200:..46,256+|
000054d0  39 2c 53 25 3a c8 99 34  36 2c 32 35 36 2b 31 30  |9,S%:..46,256+10|
000054e0  2c 53 25 2c 4c 24 3a e1  0d 11 58 42 dc 20 22 47  |,S%,L$:...XB. "G|
000054f0  72 65 61 74 20 4d 6f 76  65 21 22 2c 22 59 6f 75  |reat Move!","You|
00005500  27 76 65 20 70 6c 61 79  65 64 20 74 68 69 73 20  |'ve played this |
00005510  62 65 66 6f 72 65 22 2c  22 4f 75 63 68 21 20 47  |before","Ouch! G|
00005520  6f 6f 64 20 53 74 75 66  66 22 0d 11 62 3d dc 20  |ood Stuff"..b=. |
00005530  22 4e 69 63 65 20 6f 6e  65 2e 2e 2e 22 2c 22 4e  |"Nice one...","N|
00005540  6f 74 20 62 61 64 20 66  6f 72 20 61 20 48 55 4d  |ot bad for a HUM|
00005550  41 4e 21 22 2c 22 53 77  65 65 74 20 6d 6f 76 65  |AN!","Sweet move|
00005560  20 44 75 64 65 21 22 0d  11 6c 3d dc 20 22 47 6f  | Dude!"..l=. "Go|
00005570  74 20 6d 65 20 74 68 69  6e 6b 69 6e 67 2e 2e 22  |t me thinking.."|
00005580  2c 22 54 72 69 63 6b 79  20 6d 6f 76 65 22 2c 22  |,"Tricky move","|
00005590  4c 6f 6f 6b 73 20 67 6f  6f 64 20 66 6f 72 20 79  |Looks good for y|
000055a0  6f 75 21 22 0d 11 76 f4  dd f2 47 79 3a 6b 79 25  |ou!"..v...Gy:ky%|
000055b0  3d 31 30 32 34 2a 38 3a  64 3d 36 34 3a de 6d 20  |=1024*8:d=64:.m |
000055c0  6b 79 25 3a e3 59 3d 38  b8 31 30 88 32 3a 50 25  |ky%:.Y=8.10.2:P%|
000055d0  3d 6d 3a 4c 25 3d 6d 2b  6b 79 25 3a 5b 4f 50 54  |=m:L%=m+ky%:[OPT|
000055e0  59 3a 2e 4e 20 53 54 4d  46 44 31 33 21 2c 7b 31  |Y:.N STMFD13!,{1|
000055f0  34 7d 3a 41 44 52 34 2c  74 3a 4d 4f 56 35 2c 23  |4}:ADR4,t:MOV5,#|
00005600  64 3a 2e 6e 20 4d 4f 56  32 2c 23 36 33 3a 2e 75  |d:.n MOV2,#63:.u|
00005610  20 4d 4f 56 33 2c 23 37  39 3a 2e 6a 20 41 44 44  | MOV3,#79:.j ADD|
00005620  36 2c 32 2c 33 2c 4c 53  4c 23 36 3a 4c 44 52 42  |6,2,3,LSL#6:LDRB|
00005630  37 2c 5b 34 2c 36 5d 3a  43 4d 50 37 2c 35 3a 42  |7,[4,6]:CMP7,5:B|
00005640  4e 45 20 68 3a 41 44 52  38 2c 72 3a 4c 44 52 30  |NE h:ADR8,r:LDR0|
00005650  2c 61 3a 4c 44 52 31 2c  7a 3a 41 44 44 37 2c 33  |,a:LDR1,z:ADD7,3|
00005660  2c 32 2c 4c 53 4c 23 36  3a 41 44 44 37 2c 37 2c  |,2,LSL#6:ADD7,7,|
00005670  32 2c 4c 53 4c 23 38 3a  41 44 44 30 2c 30 2c 37  |2,LSL#8:ADD0,0,7|
00005680  3a 41 44 44 31 2c 31 2c  37 3a 5d 3a e3 6b 3d 31  |:ADD1,1,7:]:.k=1|
00005690  b8 34 3a 5b 4f 50 54 59  0d 11 80 f0 4c 44 4d 49  |.4:[OPTY....LDMI|
000056a0  41 38 21 2c 7b 39 2d 31  32 7d 3a 4c 44 52 42 37  |A8!,{9-12}:LDRB7|
000056b0  2c 5b 30 2c 39 5d 3a 4c  44 52 42 31 34 2c 5b 31  |,[0,9]:LDRB14,[1|
000056c0  2c 39 5d 3a 53 54 52 42  37 2c 5b 31 2c 39 5d 3a  |,9]:STRB7,[1,9]:|
000056d0  53 54 52 42 31 34 2c 5b  30 2c 39 5d 3a 4c 44 52  |STRB14,[0,9]:LDR|
000056e0  42 37 2c 5b 30 2c 31 30  5d 3a 4c 44 52 42 31 34  |B7,[0,10]:LDRB14|
000056f0  2c 5b 31 2c 31 30 5d 3a  53 54 52 42 37 2c 5b 31  |,[1,10]:STRB7,[1|
00005700  2c 31 30 5d 3a 53 54 52  42 31 34 2c 5b 30 2c 31  |,10]:STRB14,[0,1|
00005710  30 5d 3a 4c 44 52 42 37  2c 5b 30 2c 31 31 5d 3a  |0]:LDRB7,[0,11]:|
00005720  4c 44 52 42 31 34 2c 5b  31 2c 31 31 5d 3a 53 54  |LDRB14,[1,11]:ST|
00005730  52 42 37 2c 5b 31 2c 31  31 5d 3a 53 54 52 42 31  |RB7,[1,11]:STRB1|
00005740  34 2c 5b 30 2c 31 31 5d  3a 4c 44 52 42 37 2c 5b  |4,[0,11]:LDRB7,[|
00005750  30 2c 31 32 5d 3a 4c 44  52 42 31 34 2c 5b 31 2c  |0,12]:LDRB14,[1,|
00005760  31 32 5d 3a 53 54 52 42  37 2c 5b 31 2c 31 32 5d  |12]:STRB7,[1,12]|
00005770  3a 53 54 52 42 31 34 2c  5b 30 2c 31 32 5d 3a 5d  |:STRB14,[0,12]:]|
00005780  3a ed 3a 5b 4f 50 54 59  0d 11 8a fd 2e 68 20 53  |:.:[OPTY.....h S|
00005790  55 42 53 33 2c 33 2c 23  31 3a 42 50 4c 20 6a 3a  |UBS3,3,#1:BPL j:|
000057a0  53 55 42 53 32 2c 32 2c  23 31 3a 42 50 4c 20 75  |SUBS2,2,#1:BPL u|
000057b0  3a 53 55 42 53 35 2c 35  2c 23 31 3a 42 4e 45 20  |:SUBS5,5,#1:BNE |
000057c0  6e 3a 4c 44 4d 46 44 31  33 21 2c 7b 70 63 7d 3a  |n:LDMFD13!,{pc}:|
000057d0  2e 61 20 44 43 44 30 3a  2e 7a 20 44 43 44 30 3a  |.a DCD0:.z DCD0:|
000057e0  2e 72 a4 42 28 36 34 29  3a 2e 74 a4 42 28 36 34  |.r.B(64):.t.B(64|
000057f0  2a 38 30 2b 34 29 3a 2e  50 20 53 54 4d 46 44 31  |*80+4):.P STMFD1|
00005800  33 21 2c 7b 31 34 7d 3a  4c 44 52 34 2c 63 3a 52  |3!,{14}:LDR4,c:R|
00005810  53 42 34 2c 34 2c 23 33  3a 53 54 52 34 2c 63 3a  |SB4,4,#3:STR4,c:|
00005820  4d 4f 56 30 2c 23 31 31  32 3a 4d 4f 56 31 2c 34  |MOV0,#112:MOV1,4|
00005830  3a 53 57 49 20 36 3a 4d  4f 56 30 2c 23 31 31 33  |:SWI 6:MOV0,#113|
00005840  3a 52 53 42 31 2c 34 2c  23 33 3a 53 57 49 20 36  |:RSB1,4,#3:SWI 6|
00005850  3a 41 44 52 30 2c 79 3a  41 44 52 31 2c 48 3a 53  |:ADR0,y:ADR1,H:S|
00005860  57 49 20 34 39 3a 4c 44  4d 46 44 31 33 21 2c 7b  |WI 49:LDMFD13!,{|
00005870  70 63 7d 3a 2e 63 20 44  43 44 31 3a 2e 79 20 44  |pc}:.c DCD1:.y D|
00005880  43 44 31 34 38 0d 11 94  4a 44 43 44 2d 31 3a 2e  |CD148...JDCD-1:.|
00005890  48 20 44 43 44 30 3a 5d  3a ed 3a e3 45 25 3d 30  |H DCD0:]:.:.E%=0|
000058a0  b8 33 3a e3 5a 25 3d 30  b8 33 3a 72 21 28 34 2a  |.3:.Z%=0.3:r!(4*|
000058b0  45 25 2b 31 36 2a 5a 25  29 3d 38 30 2a 45 25 2b  |E%+16*Z%)=80*E%+|
000058c0  33 32 30 2a 36 34 2a 5a  25 3a ed 3a ed 3a e1 0d  |320*64*Z%:.:.:..|
000058d0  11 9e 17 dd a4 42 28 61  4a 25 29 3a 50 25 2b 3d  |.....B(aJ%):P%+=|
000058e0  61 4a 25 3a 3d 30 0d 11  a8 20 dd f2 64 79 3a e3  |aJ%:=0... ..dy:.|
000058f0  51 3d 30 b8 36 34 2a 38  30 3a 74 3f 51 3d b3 28  |Q=0.64*80:t?Q=.(|
00005900  64 29 3a ed 3a e1 0d 11  b2 55 dd a4 4e 28 71 24  |d):.:....U..N(q$|
00005910  29 3a ea 77 79 25 2c 51  5f 25 3a c8 99 38 2c 31  |):.wy%,Q_%:..8,1|
00005920  37 2c 71 24 b8 51 5f 25  2c 2c 2c 2c 77 79 25 3a  |7,q$.Q_%,,,,wy%:|
00005930  e7 51 5f 25 3c 3e 31 8c  85 32 30 33 2c 22 46 69  |.Q_%<>1..203,"Fi|
00005940  6c 65 20 27 22 2b a4 57  28 71 24 29 2b 22 27 20  |le '"+.W(q$)+"' |
00005950  6e 6f 74 20 66 6f 75 6e  64 21 22 0d 11 bc 08 3d  |not found!"....=|
00005960  77 79 25 0d 11 c6 bd dd  f2 54 79 28 4c 79 25 2c  |wy%......Ty(Ly%,|
00005970  62 79 25 2c 57 25 2c 42  25 2c 71 24 2c 54 79 25  |by%,W%,B%,q$,Ty%|
00005980  2c 77 79 25 2c 74 5f 25  29 3a 55 4a 25 3d 54 79  |,wy%,t_%):UJ%=Ty|
00005990  25 3a 50 4a 25 3d 77 79  25 3a 4e 5f 25 3d 54 79  |%:PJ%=wy%:N_%=Ty|
000059a0  25 3a 46 25 21 30 3d 32  35 36 3a 46 25 21 31 32  |%:F%!0=256:F%!12|
000059b0  3d 30 3a 46 25 21 31 36  3d 31 3a 46 25 21 32 30  |=0:F%!16=1:F%!20|
000059c0  3d 4c 79 25 3a 46 25 21  32 34 3d 62 79 25 3a 46  |=Ly%:F%!24=by%:F|
000059d0  25 21 32 38 3d 57 25 3a  46 25 21 33 32 3d 42 25  |%!28=W%:F%!32=B%|
000059e0  3a 46 25 21 33 36 3d 77  79 25 3a 46 25 21 34 30  |:F%!36=wy%:F%!40|
000059f0  3d 74 5f 25 3a 24 28 46  25 2b 34 34 29 3d 71 24  |=t_%:$(F%+44)=q$|
00005a00  2b bd 30 3a c8 99 26 34  30 30 65 37 2c 31 37 2c  |+.0:..&400e7,17,|
00005a10  46 25 2c 4c 79 25 2c 62  79 25 b8 56 4a 25 3a e1  |F%,Ly%,by%.VJ%:.|
00005a20  0d 11 d0 2d dd a4 48 28  69 24 2c 54 79 25 2c 71  |...-..H(i$,Ty%,q|
00005a30  4a 25 29 3a ea 5f 5f 25  3a 5f 5f 25 3d a4 4e 28  |J%):.__%:__%=.N(|
00005a40  69 24 29 3a e7 5f 5f 25  3e 71 4a 25 8c 0d 11 da  |i$):.__%>qJ%....|
00005a50  3c f2 43 28 22 46 69 6c  65 20 74 6f 20 6c 6f 61  |<.C("File to loa|
00005a60  64 20 69 73 20 74 6f 6f  20 6c 61 72 67 65 21 22  |d is too large!"|
00005a70  2c 22 44 61 74 61 20 6c  6f 61 64 69 6e 67 20 65  |,"Data loading e|
00005a80  72 72 6f 72 22 29 3a 3d  30 0d 11 e4 18 cd 3a c8  |rror"):=0.....:.|
00005a90  99 38 2c 31 36 2c 69 24  2c 54 79 25 3a 3d 5f 5f  |.8,16,i$,Ty%:=__|
00005aa0  25 0d 11 ee 25 dd f2 59  79 3a 4e 4a 25 3d a3 3a  |%...%..Yy:NJ%=.:|
00005ab0  e7 a4 47 28 22 57 69 6d  70 24 53 63 72 61 70 22  |..G("Wimp$Scrap"|
00005ac0  29 3c 3e 22 22 8c 0d 11  f8 56 46 25 21 33 36 3d  |)<>""....VF%!36=|
00005ad0  2d 31 3a 24 28 46 25 2b  34 34 29 3d 22 3c 57 69  |-1:$(F%+44)="<Wi|
00005ae0  6d 70 24 53 63 72 61 70  3e 22 2b bd 30 3a 46 25  |mp$Scrap>"+.0:F%|
00005af0  21 30 3d 36 34 3a 46 25  21 31 32 3d 46 25 21 38  |!0=64:F%!12=F%!8|
00005b00  3a 46 25 21 31 36 3d 32  3a c8 99 26 34 30 30 65  |:F%!16=2:..&400e|
00005b10  37 2c 31 37 2c 46 25 2c  46 25 21 34 0d 12 02 3f  |7,17,F%,F%!4...?|
00005b20  cc 3a f2 43 28 22 57 69  6d 70 24 53 63 72 61 70  |.:.C("Wimp$Scrap|
00005b30  20 6e 6f 74 20 66 6f 75  6e 64 2e 20 52 75 6e 20  | not found. Run |
00005b40  21 53 79 73 74 65 6d 20  6f 72 20 21 53 63 72 61  |!System or !Scra|
00005b50  70 22 2c 22 45 72 72 6f  72 22 29 0d 12 0c 07 cd  |p","Error").....|
00005b60  3a e1 0d 12 16 31 dd f2  5a 79 3a 46 25 21 31 32  |:....1..Zy:F%!12|
00005b70  3d 46 25 21 38 3a 46 25  21 31 36 3d 33 3a c8 99  |=F%!8:F%!16=3:..|
00005b80  26 34 30 30 65 37 2c 31  37 2c 46 25 2c 46 25 21  |&400e7,17,F%,F%!|
00005b90  34 3a e1 0d 12 20 5f dd  f2 4b 79 3a ea 58 5f 25  |4:... _..Ky:.X_%|
00005ba0  2c 6d 79 25 3a 58 5f 25  3d 46 25 21 32 34 3a c8  |,my%:X_%=F%!24:.|
00005bb0  99 26 34 30 30 66 31 2c  67 5f 25 2c 4e 5f 25 2c  |.&400f1,g_%,N_%,|
00005bc0  46 25 21 34 2c 46 25 21  32 30 2c 58 5f 25 3a 6d  |F%!4,F%!20,X_%:m|
00005bd0  79 25 3d 55 4a 25 2b 50  4a 25 2d 4e 5f 25 3a e7  |y%=UJ%+PJ%-N_%:.|
00005be0  6d 79 25 3e 58 5f 25 8c  6d 79 25 3d 58 5f 25 8b  |my%>X_%.my%=X_%.|
00005bf0  f2 4a 0d 12 2a 3f 4e 5f  25 2b 3d 6d 79 25 3a 46  |.J..*?N_%+=my%:F|
00005c00  25 21 31 32 3d 46 25 21  38 3a 46 25 21 31 36 3d  |%!12=F%!8:F%!16=|
00005c10  37 3a 46 25 21 32 34 3d  6d 79 25 3a c8 99 26 34  |7:F%!24=my%:..&4|
00005c20  30 30 65 37 2c 31 37 2c  46 25 2c 46 25 21 34 3a  |00e7,17,F%,F%!4:|
00005c30  e1 0d 12 34 32 dd f2 57  28 44 24 2c 4a 79 25 2c  |...42..W(D$,Jy%,|
00005c40  54 79 25 2c 64 25 29 3a  c8 99 38 2c 31 30 2c 44  |Ty%,d%):..8,10,D|
00005c50  24 2c 4a 79 25 2c 2c 54  79 25 2c 54 79 25 2b 64  |$,Jy%,,Ty%,Ty%+d|
00005c60  25 3a e1 0d 12 3e 72 dd  f2 63 28 58 25 2c 56 25  |%:...>r..c(X%,V%|
00005c70  29 3a ea 57 25 2c 42 25  3a 4d 25 21 30 3d 58 25  |):.W%,B%:M%!0=X%|
00005c80  3a c8 99 26 34 30 30 63  62 2c 2c 4d 25 3a 57 25  |:..&400cb,,M%:W%|
00005c90  3d 4d 25 21 34 2d 4d 25  21 32 30 3a 42 25 3d 4d  |=M%!4-M%!20:B%=M|
00005ca0  25 21 31 36 2d 4d 25 21  32 34 3a 4d 25 21 34 3d  |%!16-M%!24:M%!4=|
00005cb0  56 25 3a c8 99 26 34 30  30 63 65 2c 2c 4d 25 3a  |V%:..&400ce,,M%:|
00005cc0  e7 28 4d 25 21 32 34 80  34 35 30 35 36 29 3d 34  |.(M%!24.45056)=4|
00005cd0  35 30 35 36 e1 0d 12 48  1d e7 28 4d 25 21 32 34  |5056...H..(M%!24|
00005ce0  80 26 38 30 30 30 30 30  29 3d 26 38 30 30 30 30  |.&800000)=&80000|
00005cf0  30 e1 0d 12 52 72 4d 25  21 34 3d 35 3a 4d 25 21  |0...RrM%!4=5:M%!|
00005d00  38 2b 3d 57 25 3a 4d 25  21 31 32 2b 3d 42 25 3a  |8+=W%:M%!12+=B%:|
00005d10  4d 25 21 31 36 2b 3d 57  25 3a 4d 25 21 32 30 2b  |M%!16+=W%:M%!20+|
00005d20  3d 42 25 3a 4d 25 21 32  34 3d 2d 31 3a 4d 25 21  |=B%:M%!24=-1:M%!|
00005d30  32 38 3d 2d 31 3a 4d 25  21 33 32 3d 26 37 66 66  |28=-1:M%!32=&7ff|
00005d40  66 66 66 66 66 3a 4d 25  21 33 36 3d 26 37 66 66  |fffff:M%!36=&7ff|
00005d50  66 66 66 66 66 3a c8 99  26 34 30 30 64 30 2c 2c  |fffff:..&400d0,,|
00005d60  4d 25 3a e1 0d 12 5c 3e  dd a4 5a 28 58 25 2c 56  |M%:...\>..Z(X%,V|
00005d70  25 29 3a 4d 25 21 30 3d  58 25 3a 4d 25 21 34 3d  |%):M%!0=X%:M%!4=|
00005d80  56 25 3a c8 99 26 34 30  30 63 65 2c 2c 4d 25 3a  |V%:..&400ce,,M%:|
00005d90  e7 28 4d 25 21 32 34 80  32 35 37 29 3c 3e 32 35  |.(M%!24.257)<>25|
00005da0  37 8c 0d 12 66 2c 85 32  30 32 2c 22 49 63 6f 6e  |7...f,.202,"Icon|
00005db0  20 22 2b c3 62 79 25 2b  22 20 6e 6f 74 20 69 6e  | "+.by%+" not in|
00005dc0  64 69 72 65 63 74 65 64  21 22 3a 3d 22 22 0d 12  |directed!":=""..|
00005dd0  70 0d cd 3a 3d 24 4d 25  21 32 38 0d 12 7a 40 dd  |p..:=$M%!28..z@.|
00005de0  a4 45 28 58 25 2c 56 25  29 3a 4d 25 21 30 3d 58  |.E(X%,V%):M%!0=X|
00005df0  25 3a 4d 25 21 34 3d 56  25 3a c8 99 26 34 30 30  |%:M%!4=V%:..&400|
00005e00  63 65 2c 2c 4d 25 3a e7  28 4d 25 21 32 34 80 31  |ce,,M%:.(M%!24.1|
00005e10  3c 3c 32 31 29 8c 3d b9  8b 3d a3 0d 12 84 06 3d  |<<21).=..=.....=|
00005e20  b9 0d 12 8e 46 dd f2 7a  28 58 25 2c 56 25 2c 63  |....F..z(X%,V%,c|
00005e30  5f 25 29 3a 4d 25 21 30  3d 58 25 3a 4d 25 21 34  |_%):M%!0=X%:M%!4|
00005e40  3d 56 25 3a c8 99 26 34  30 30 63 65 2c 2c 4d 25  |=V%:..&400ce,,M%|
00005e50  3a e7 28 4d 25 21 32 34  80 35 37 36 30 31 29 3c  |:.(M%!24.57601)<|
00005e60  3e 35 37 36 30 31 8c 0d  12 98 3a 85 32 30 32 2c  |>57601....:.202,|
00005e70  22 49 63 6f 6e 20 22 2b  c3 56 25 2b 22 20 6e 6f  |"Icon "+.V%+" no|
00005e80  74 20 77 72 69 74 61 62  6c 65 20 61 6e 64 20 6e  |t writable and n|
00005e90  6f 74 20 69 6e 64 69 72  65 63 74 65 64 21 22 3a  |ot indirected!":|
00005ea0  e1 0d 12 a2 1f cd 3a 53  24 3d 24 4d 25 21 32 38  |......:S$=$M%!28|
00005eb0  3a e7 63 5f 25 3e a9 53  24 63 5f 25 3d a9 53 24  |:.c_%>.S$c_%=.S$|
00005ec0  0d 12 ac 1f c8 99 26 34  30 30 64 32 2c 58 25 2c  |......&400d2,X%,|
00005ed0  56 25 2c 30 2c 30 2c 2d  31 2c 63 5f 25 3a e1 0d  |V%,0,0,-1,c_%:..|
00005ee0  12 b6 41 dd f2 41 28 58  25 2c 56 25 2c 53 24 29  |..A..A(X%,V%,S$)|
00005ef0  3a 4d 25 21 30 3d 58 25  3a 4d 25 21 34 3d 56 25  |:M%!0=X%:M%!4=V%|
00005f00  3a c8 99 26 34 30 30 63  65 2c 2c 4d 25 3a e7 28  |:..&400ce,,M%:.(|
00005f10  4d 25 21 32 34 80 32 35  37 29 3c 3e 32 35 37 8c  |M%!24.257)<>257.|
00005f20  0d 12 c0 29 85 32 30 32  2c 22 49 63 6f 6e 20 22  |...).202,"Icon "|
00005f30  2b c3 56 25 2b 22 20 6e  6f 74 20 69 6e 64 69 72  |+.V%+" not indir|
00005f40  65 63 74 65 64 21 22 3a  e1 0d 12 ca 3d cd 3a 53  |ected!":....=.:S|
00005f50  24 3d c0 53 24 2c 4d 25  21 33 36 2d 31 29 3a 24  |$=.S$,M%!36-1):$|
00005f60  4d 25 21 32 38 3d 53 24  3a 4d 25 21 38 3d 30 3a  |M%!28=S$:M%!8=0:|
00005f70  4d 25 21 31 32 3d 30 3a  c8 99 26 34 30 30 63 64  |M%!12=0:..&400cd|
00005f80  2c 2c 4d 25 3a e1 0d 12  d4 44 dd f2 53 28 58 25  |,,M%:....D..S(X%|
00005f90  2c 56 25 2c 73 4a 25 29  3a 4d 25 21 30 3d 58 25  |,V%,sJ%):M%!0=X%|
00005fa0  3a 4d 25 21 34 3d 56 25  3a 4d 25 21 31 32 3d 31  |:M%!4=V%:M%!12=1|
00005fb0  3c 3c 32 31 3a e7 73 4a  25 4d 25 21 38 3d 31 3c  |<<21:.sJ%M%!8=1<|
00005fc0  3c 32 31 8b 4d 25 21 38  3d 30 0d 12 de 12 c8 99  |<21.M%!8=0......|
00005fd0  26 34 30 30 63 64 2c 2c  4d 25 3a e1 0d 12 e8 2f  |&400cd,,M%:..../|
00005fe0  dd a4 49 28 53 79 24 2c  46 79 24 29 3a ea 79 79  |..I(Sy$,Fy$):.yy|
00005ff0  25 3a e7 46 79 24 3d 22  52 49 47 48 54 22 21 4d  |%:.Fy$="RIGHT"!M|
00006000  25 3d 2d 31 8b 21 4d 25  3d 2d 32 0d 12 f2 56 4d  |%=-1.!M%=-2...VM|
00006010  25 21 34 3d 30 3a 4d 25  21 38 3d 30 3a 4d 25 21  |%!4=0:M%!8=0:M%!|
00006020  31 32 3d 36 38 3a 4d 25  21 31 36 3d 36 38 3a 4d  |12=68:M%!16=68:M|
00006030  25 21 32 30 3d 26 31 37  30 30 32 30 32 61 3a 24  |%!20=&1700202a:$|
00006040  28 4d 25 2b 32 34 29 3d  53 79 24 3a c8 99 26 34  |(M%+24)=Sy$:..&4|
00006050  30 30 63 32 2c 2c 4d 25  b8 79 79 25 3a 3d 79 79  |00c2,,M%.yy%:=yy|
00006060  25 0d 12 fc 50 dd f2 41  79 28 58 25 2c 78 24 2c  |%...P..Ay(X%,x$,|
00006070  41 79 24 2c 4a 79 24 2c  45 79 24 29 3a f2 41 28  |Ay$,Jy$,Ey$):.A(|
00006080  58 25 2c 31 2c 78 24 29  3a f2 41 28 58 25 2c 32  |X%,1,x$):.A(X%,2|
00006090  2c 41 79 24 29 3a f2 41  28 58 25 2c 33 2c 4a 79  |,Ay$):.A(X%,3,Jy|
000060a0  24 29 3a f2 41 28 58 25  2c 34 2c 45 79 24 29 3a  |$):.A(X%,4,Ey$):|
000060b0  e1 0d 13 06 3f dd a4 4b  28 74 24 29 3a ea 56 5f  |....?..K(t$):.V_|
000060c0  25 3a 56 5f 25 3d 32 30  30 3a c8 99 26 34 30 30  |%:V_%=200:..&400|
000060d0  63 30 2c 56 5f 25 2c 26  34 62 35 33 34 31 35 34  |c0,V_%,&4b534154|
000060e0  2c 74 24 b8 56 5f 25 2c  67 5f 25 3a 3d 67 5f 25  |,t$.V_%,g_%:=g_%|
000060f0  0d 13 10 69 dd f2 4c 79  28 41 24 29 3a ea 49 79  |...i..Ly(A$):.Iy|
00006100  25 2c 4b 79 25 2c 55 24  2c 42 5f 25 2c 4e 24 2c  |%,Ky%,U$,B_%,N$,|
00006110  45 79 25 2c 50 79 25 3a  4b 79 25 3d 26 37 30 30  |Ey%,Py%:Ky%=&700|
00006120  30 30 32 31 3a 42 5f 25  3d 2d 31 3a 45 79 25 3d  |0021:B_%=-1:Ey%=|
00006130  a3 3a 4e 24 3d a4 54 28  41 24 29 3a 50 79 25 3d  |.:N$=.T(A$):Py%=|
00006140  a9 4e 24 3a f5 3a 55 24  3d a4 58 28 41 24 29 3a  |.N$:.:U$=.X(A$):|
00006150  c8 8e c0 55 24 2c 34 29  ca 0d 13 1a 15 c9 22 74  |...U$,4)......"t|
00006160  69 63 6b 22 3a 49 79 25  3d 49 79 25 84 31 0d 13  |ick":Iy%=Iy%.1..|
00006170  24 15 c9 22 6c 69 6e 65  22 3a 49 79 25 3d 49 79  |$.."line":Iy%=Iy|
00006180  25 84 32 0d 13 2e 1b c9  22 73 68 61 64 22 3a 4b  |%.2....."shad":K|
00006190  79 25 3d 4b 79 25 84 26  34 30 30 30 30 30 0d 13  |y%=Ky%.&400000..|
000061a0  38 1a c9 22 73 75 62 6d  22 3a 42 5f 25 3d a4 44  |8.."subm":B_%=.D|
000061b0  28 a4 43 28 55 24 29 29  0d 13 42 1a c9 22 77 69  |(.C(U$))..B.."wi|
000061c0  6e 64 22 3a 42 5f 25 3d  a4 55 28 a4 43 28 55 24  |nd":B_%=.U(.C(U$|
000061d0  29 29 0d 13 4c 1a c9 22  69 63 6f 6e 22 3a 4b 79  |))..L.."icon":Ky|
000061e0  25 3d a4 4c 28 a4 43 28  55 24 29 29 0d 13 56 17  |%=.L(.C(U$))..V.|
000061f0  c9 22 77 72 69 74 22 3a  f2 65 79 28 a4 43 28 55  |."writ":.ey(.C(U|
00006200  24 29 29 0d 13 60 2d cb  3a fd 55 24 3d 22 22 3a  |$))..`-.:.U$="":|
00006210  4e 25 21 30 3d 49 79 25  3a 4e 25 21 34 3d 42 5f  |N%!0=Iy%:N%!4=B_|
00006220  25 3a e7 a9 28 4e 24 29  3e 31 32 84 45 79 25 8c  |%:..(N$)>12.Ey%.|
00006230  0d 13 6a 1f 4e 25 21 38  3d 4b 79 25 84 32 35 36  |..j.N%!8=Ky%.256|
00006240  3a f2 64 28 4e 25 2c 45  79 25 2c 50 79 25 29 0d  |:.d(N%,Ey%,Py%).|
00006250  13 74 24 cc 3a 4e 25 21  38 3d 4b 79 25 3a 24 28  |.t$.:N%!8=Ky%:$(|
00006260  4e 25 2b 31 32 29 3d c0  4e 24 2b bd 28 30 29 2c  |N%+12)=.N$+.(0),|
00006270  31 32 29 0d 13 7e 0e cd  3a 4e 25 2b 3d 32 34 3a  |12)..~..:N%+=24:|
00006280  e1 0d 13 88 21 dd a4 46  28 41 24 29 3a e7 c0 41  |....!..F(A$):..A|
00006290  24 2c 39 29 3d 22 62 65  67 69 6e 6d 65 6e 75 22  |$,9)="beginmenu"|
000062a0  3d b9 0d 13 92 06 3d a3  0d 13 9c 37 dd a4 5f 28  |=.....=....7.._(|
000062b0  49 5f 25 2c 4b 4a 25 29  3a ea 6f 24 3a c8 99 26  |I_%,KJ%):.o$:..&|
000062c0  34 30 30 64 35 2c 2c 49  5f 25 2c 4b 4a 25 2c 46  |400d5,,I_%,KJ%,F|
000062d0  25 2b 32 35 36 b8 2c 2c  2c 6f 24 3a 3d 6f 24 0d  |%+256.,,,o$:=o$.|
000062e0  13 a6 52 dd f2 61 79 28  59 25 2c 41 79 25 2c 45  |..R..ay(Y%,Ay%,E|
000062f0  5f 25 2c 57 4a 25 29 3a  de 49 5f 25 20 28 59 25  |_%,WJ%):.I_% (Y%|
00006300  2a 32 38 29 2b 28 41 79  25 2a 32 34 29 3a de 4a  |*28)+(Ay%*24):.J|
00006310  25 28 59 25 29 3a de 53  25 28 59 25 29 3a de 57  |%(Y%):.S%(Y%):.W|
00006320  25 28 45 5f 25 29 3a de  42 25 28 45 5f 25 29 3a  |%(E_%):.B%(E_%):|
00006330  e1 0d 13 b0 23 dd a4 4d  28 77 25 29 3a ea 46 24  |....#..M(w%):.F$|
00006340  3a e7 77 25 3c 31 84 77  25 3e de 28 57 25 28 29  |:.w%<1.w%>.(W%()|
00006350  2c 31 29 8c 0d 13 ba 37  85 32 30 31 2c 22 77 72  |,1)....7.201,"wr|
00006360  69 74 61 62 6c 65 20 6d  65 6e 75 20 69 74 65 6d  |itable menu item|
00006370  20 22 2b c3 28 77 25 29  2b 22 20 64 6f 65 73 20  | "+.(w%)+" does |
00006380  6e 6f 74 20 65 78 69 73  74 21 22 0d 13 c4 33 cd  |not exist!"...3.|
00006390  3a 77 25 3d 57 25 28 77  25 29 3a 46 24 3d 22 22  |:w%=W%(w%):F$=""|
000063a0  3a c8 95 3f 77 25 3e 33  31 3a 46 24 2b 3d bd 3f  |:..?w%>31:F$+=.?|
000063b0  77 25 3a 77 25 2b 3d 31  3a ce 3a 3d 46 24 0d 13  |w%:w%+=1:.:=F$..|
000063c0  ce 64 dd f2 4f 3a ea 70  79 25 2c 41 24 3a cf 23  |.d..O:.py%,A$:.#|
000063d0  48 25 3d 30 3a f5 3a 70  79 25 3d 8f 23 48 25 3a  |H%=0:.:py%=.#H%:|
000063e0  41 24 3d be 23 48 25 3a  fd a4 46 28 41 24 29 84  |A$=.#H%:..F(A$).|
000063f0  c5 23 48 25 3a e7 c5 23  48 25 85 32 30 30 2c 22  |.#H%:..#H%.200,"|
00006400  4e 6f 20 27 62 65 67 69  6e 6d 65 6e 75 27 20 66  |No 'beginmenu' f|
00006410  6f 75 6e 64 20 69 6e 20  6d 65 6e 75 20 66 69 6c  |ound in menu fil|
00006420  65 22 0d 13 d8 0e cf 23  48 25 3d 70 79 25 3a e1  |e".....#H%=py%:.|
00006430  0d 13 e2 1d dd f2 64 28  74 25 2c 45 79 25 2c 64  |......d(t%,Ey%,d|
00006440  25 29 3a ea 5a 79 25 3a  e7 45 79 25 8c 0d 13 ec  |%):.Zy%:.Ey%....|
00006450  0c de 5a 79 25 64 25 2b  31 0d 13 f6 0f cc 3a de  |..Zy%d%+1.....:.|
00006460  5a 79 25 31 2b a9 4e 24  0d 14 00 22 cd 3a 74 25  |Zy%1+.N$...".:t%|
00006470  21 31 32 3d 5a 79 25 3a  24 5a 79 25 3d 4e 24 2b  |!12=Zy%:$Zy%=N$+|
00006480  bd 28 30 29 3a e7 45 79  25 8c 0d 14 0a 2f 57 25  |.(0):.Ey%..../W%|
00006490  28 45 79 25 29 3d 5a 79  25 3a 42 25 28 45 79 25  |(Ey%)=Zy%:B%(Ey%|
000064a0  29 3d 64 25 3a 5a 79 25  2b 3d 64 25 2b 31 3a 74  |)=d%:Zy%+=d%+1:t|
000064b0  25 21 32 30 3d 64 25 2b  31 0d 14 14 1c cc 3a 5a  |%!20=d%+1.....:Z|
000064c0  79 25 2b 3d 31 2b a9 4e  24 3a 74 25 21 32 30 3d  |y%+=1+.N$:t%!20=|
000064d0  31 2b a9 4e 24 0d 14 1e  18 cd 3a 3f 5a 79 25 3d  |1+.N$.....:?Zy%=|
000064e0  30 3a 74 25 21 31 36 3d  5a 79 25 3a e1 0d 14 28  |0:t%!16=Zy%:...(|
000064f0  50 dd f2 4e 79 28 72 24  29 3a ea 59 25 2c 66 79  |P..Ny(r$):.Y%,fy|
00006500  25 2c 41 24 2c 4e 25 2c  49 5f 25 3a f2 6c 28 72  |%,A$,N%,I_%:.l(r|
00006510  24 29 3a 48 25 3d 8e 72  24 3a f2 62 3a f2 4f 3a  |$):H%=.r$:.b:.O:|
00006520  59 25 3d 30 3a 66 79 25  3d a3 3a f5 3a 41 24 3d  |Y%=0:fy%=.:.:A$=|
00006530  be 23 48 25 3a e7 a4 46  28 41 24 29 8c 0d 14 32  |.#H%:..F(A$)...2|
00006540  35 e7 66 79 25 85 32 30  30 2c 22 42 61 64 20 6d  |5.fy%.200,"Bad m|
00006550  65 6e 75 20 66 69 6c 65  2c 20 6e 6f 20 69 74 65  |enu file, no ite|
00006560  6d 73 20 69 6e 20 6d 65  6e 75 20 22 2b c3 28 59  |ms in menu "+.(Y|
00006570  25 29 0d 14 3c 0d e7 59  25 f2 52 28 4e 25 29 0d  |%)..<..Y%.R(N%).|
00006580  14 46 29 59 25 2b 3d 31  3a 41 24 3d be 23 48 25  |.F)Y%+=1:A$=.#H%|
00006590  3a f2 51 79 28 4e 25 2c  41 24 2c 4a 25 28 59 25  |:.Qy(N%,A$,J%(Y%|
000065a0  29 29 3a 66 79 25 3d b9  0d 14 50 13 cc 3a f2 4c  |)):fy%=...P..:.L|
000065b0  79 28 41 24 29 3a 66 79  25 3d a3 0d 14 5a 57 cd  |y(A$):fy%=...ZW.|
000065c0  3a fd c5 23 48 25 3a f2  52 28 4e 25 29 3a c8 99  |:..#H%:.R(N%):..|
000065d0  26 32 30 30 30 64 2c 30  2c 48 25 3a 48 25 3d 30  |&2000d,0,H%:H%=0|
000065e0  3a e7 66 79 25 85 32 30  30 2c 22 42 61 64 20 6d  |:.fy%.200,"Bad m|
000065f0  65 6e 75 20 66 69 6c 65  2c 20 6e 6f 20 69 74 65  |enu file, no ite|
00006600  6d 73 20 69 6e 20 6d 65  6e 75 20 22 2b c3 28 59  |ms in menu "+.(Y|
00006610  25 29 0d 14 64 05 e1 0d  14 6e 69 dd f2 51 79 28  |%)..d....ni..Qy(|
00006620  f8 4e 25 2c 74 24 2c 68  79 25 29 3a 24 4e 25 3d  |.N%,t$,hy%):$N%=|
00006630  c0 74 24 2c 31 32 29 2b  bd 28 30 29 3a 4e 25 3f  |.t$,12)+.(0):N%?|
00006640  31 32 3d 37 3a 4e 25 3f  31 33 3d 32 3a 4e 25 3f  |12=7:N%?13=2:N%?|
00006650  31 34 3d 37 3a 4e 25 3f  31 35 3d 30 3a 4e 25 21  |14=7:N%?15=0:N%!|
00006660  31 36 3d 68 79 25 3a 4e  25 21 32 30 3d 34 34 3a  |16=hy%:N%!20=44:|
00006670  4e 25 21 32 34 3d 30 3a  4e 25 2b 3d 32 38 3a e1  |N%!24=0:N%+=28:.|
00006680  0d 14 78 23 dd f2 52 28  4e 25 29 3a 21 28 4e 25  |..x#..R(N%):!(N%|
00006690  2d 32 34 29 3d 21 28 4e  25 2d 32 34 29 84 31 32  |-24)=!(N%-24).12|
000066a0  38 3a e1 0d 14 82 16 dd  f2 4a 3a c8 99 26 34 30  |8:.......J:..&40|
000066b0  30 64 34 2c 2c 2d 31 3a  e1 0d 14 8c 59 dd a4 52  |0d4,,-1:....Y..R|
000066c0  28 74 25 29 3a ea 41 79  25 2c 4b 5f 25 2c 68 5f  |(t%):.Ay%,K_%,h_|
000066d0  25 3a 41 79 25 3d 31 3a  68 5f 25 3d 74 25 21 32  |%:Ay%=1:h_%=t%!2|
000066e0  30 2b 74 25 21 32 34 3a  74 25 2b 3d 32 38 3a c8  |0+t%!24:t%+=28:.|
000066f0  95 28 21 74 25 80 31 32  38 29 3d 30 3a 41 79 25  |.(!t%.128)=0:Ay%|
00006700  2b 3d 31 3a e7 28 21 74  25 80 32 29 4b 5f 25 2b  |+=1:.(!t%.2)K_%+|
00006710  3d 31 0d 14 96 1b 74 25  2b 3d 32 34 3a ce 3a e7  |=1....t%+=24:.:.|
00006720  28 21 74 25 80 32 29 4b  5f 25 2b 3d 31 0d 14 a0  |(!t%.2)K_%+=1...|
00006730  13 3d 41 79 25 2a 68 5f  25 2b 4b 5f 25 2a 32 34  |.=Ay%*h_%+K_%*24|
00006740  0d 14 aa 36 dd a4 4c 28  4d 24 29 3a e7 4d 24 3d  |...6..L(M$):.M$=|
00006750  22 22 85 32 30 30 2c 22  4d 65 6e 75 20 69 63 6f  |"".200,"Menu ico|
00006760  6e 20 66 6c 61 67 20 76  61 6c 75 65 20 6d 69 73  |n flag value mis|
00006770  73 69 6e 67 21 22 0d 14  b4 0a 3d a0 28 4d 24 29  |sing!"....=.(M$)|
00006780  0d 14 be 1b dd a4 58 28  f8 42 24 29 3a ea 55 24  |......X(.B$):.U$|
00006790  3a e7 a7 42 24 2c 22 2c  22 29 8c 0d 14 c8 29 42  |:..B$,",")....)B|
000067a0  24 3d c1 42 24 2c a7 42  24 2c 22 2c 22 29 2b 31  |$=.B$,.B$,",")+1|
000067b0  29 3a 55 24 3d c0 42 24  2c a7 42 24 2c 22 2c 22  |):U$=.B$,.B$,","|
000067c0  29 2d 31 29 0d 14 d2 0b  cc 3a 55 24 3d 22 22 0d  |)-1).....:U$="".|
000067d0  14 dc 09 cd 3a 3d 55 24  0d 14 e6 27 dd a4 54 28  |....:=U$...'..T(|
000067e0  42 24 29 3a e7 a7 42 24  2c 22 2c 22 29 42 24 3d  |B$):..B$,",")B$=|
000067f0  c0 42 24 2c a7 42 24 2c  22 2c 22 29 2d 31 29 0d  |.B$,.B$,",")-1).|
00006800  14 f0 07 3d 42 24 0d 14  fa 4a dd a4 51 28 56 79  |...=B$...J..Q(Vy|
00006810  25 29 3a ea 52 24 3a 52  24 3d c3 28 21 56 79 25  |%):.R$:R$=.(!Vy%|
00006820  29 3a 56 79 25 2b 3d 34  3a c8 95 21 56 79 25 3c  |):Vy%+=4:..!Vy%<|
00006830  3e 2d 31 3a 52 24 2b 3d  22 2e 22 2b c3 28 21 56  |>-1:R$+="."+.(!V|
00006840  79 25 29 3a 56 79 25 2b  3d 34 3a ce 3a 3d 52 24  |y%):Vy%+=4:.:=R$|
00006850  0d 15 04 25 dd a4 44 28  4d 24 29 3a e7 bb 28 4d  |...%..D(M$):..(M|
00006860  24 29 3c 31 84 bb 28 4d  24 29 3e de 28 53 25 28  |$)<1..(M$)>.(S%(|
00006870  29 2c 31 29 8c 0d 15 0e  3a 85 32 30 30 2c 22 43  |),1)....:.200,"C|
00006880  61 6e 27 74 20 66 69 6e  64 20 6d 65 6e 75 20 22  |an't find menu "|
00006890  2b 4d 24 2b 22 2c 20 61  73 20 72 65 66 65 72 72  |+M$+", as referr|
000068a0  65 64 20 74 6f 20 69 6e  3a 2d 20 22 2b 55 24 0d  |ed to in:- "+U$.|
000068b0  15 18 10 cd 3a e7 bb 28  4d 24 29 3d 59 25 8c 0d  |....:..(M$)=Y%..|
000068c0  15 22 47 85 32 30 30 2c  22 41 6e 20 69 74 65 6d  |."G.200,"An item|
000068d0  20 69 6e 20 6d 65 6e 75  20 22 2b 4d 24 2b 22 20  | in menu "+M$+" |
000068e0  63 61 6e 6e 6f 74 20 68  61 76 65 20 6d 65 6e 75  |cannot have menu|
000068f0  20 22 2b 4d 24 2b 22 20  61 73 20 61 20 73 75 62  | "+M$+" as a sub|
00006900  6d 65 6e 75 21 22 0d 15  2c 10 cd 3a 3d 53 25 28  |menu!"..,..:=S%(|
00006910  bb 28 4d 24 29 29 0d 15  36 35 dd a4 43 28 4d 24  |.(M$))..65..C(M$|
00006920  29 3a 4d 24 3d c1 4d 24  2c a7 4d 24 2c 22 28 22  |):M$=.M$,.M$,"("|
00006930  29 2b 31 29 3a 4d 24 3d  c0 4d 24 2c a7 4d 24 2c  |)+1):M$=.M$,.M$,|
00006940  22 29 22 29 2d 31 29 3a  3d 4d 24 0d 15 40 4e dd  |")")-1):=M$..@N.|
00006950  a4 55 28 4d 24 29 3a ea  79 79 25 3a ea 85 3a ee  |.U(M$):.yy%:..:.|
00006960  85 85 a2 30 2c 22 4d 65  6e 75 20 66 69 6c 65 20  |...0,"Menu file |
00006970  65 72 72 6f 72 2e 20 57  69 6e 64 6f 77 20 76 61  |error. Window va|
00006980  72 69 61 62 6c 65 20 22  2b 4d 24 2b 22 20 6e 6f  |riable "+M$+" no|
00006990  74 20 66 6f 75 6e 64 2e  22 0d 15 4a 15 79 79 25  |t found."..J.yy%|
000069a0  3d a0 28 4d 24 29 3a e7  79 79 25 3c 31 8c 0d 15  |=.(M$):.yy%<1...|
000069b0  54 13 c8 99 26 32 30 30  30 64 2c 30 2c 48 25 3a  |T...&2000d,0,H%:|
000069c0  85 0d 15 5e 0a cd 3a 3d  79 79 25 0d 15 68 1d dd  |...^..:=yy%..h..|
000069d0  f2 65 79 28 4d 24 29 3a  50 79 25 3d 30 3a e7 a7  |.ey(M$):Py%=0:..|
000069e0  4d 24 2c 22 3a 22 29 8c  0d 15 72 2c 50 79 25 3d  |M$,":")...r,Py%=|
000069f0  bb 28 c1 4d 24 2c a7 4d  24 2c 22 3a 22 29 2b 31  |.(.M$,.M$,":")+1|
00006a00  29 29 3a e7 a9 28 4e 24  29 3e 50 79 25 50 79 25  |)):..(N$)>Py%Py%|
00006a10  3d a9 4e 24 0d 15 7c 0d  cc 3a 50 79 25 3d a9 4e  |=.N$..|..:Py%=.N|
00006a20  24 0d 15 86 1b cd 3a 49  79 25 3d 49 79 25 84 34  |$.....:Iy%=Iy%.4|
00006a30  3a 45 79 25 3d bb 28 4d  24 29 3a e1 0d 15 90 22  |:Ey%=.(M$):...."|
00006a40  dd f2 6b 28 77 25 2c 53  24 29 3a e7 77 25 3c 31  |..k(w%,S$):.w%<1|
00006a50  84 77 25 3e de 28 57 25  28 29 2c 31 29 8c 0d 15  |.w%>.(W%(),1)...|
00006a60  9a 37 85 32 30 31 2c 22  77 72 69 74 61 62 6c 65  |.7.201,"writable|
00006a70  20 6d 65 6e 75 20 69 74  65 6d 20 22 2b c3 28 77  | menu item "+.(w|
00006a80  25 29 2b 22 20 64 6f 65  73 20 6e 6f 74 20 65 78  |%)+" does not ex|
00006a90  69 73 74 21 22 0d 15 a4  12 cd 3a e7 a9 53 24 3e  |ist!".....:..S$>|
00006aa0  42 25 28 77 25 29 8c 0d  15 ae 20 e7 a9 53 24 3e  |B%(w%).... ..S$>|
00006ab0  31 30 30 53 24 3d c0 53  24 2c 31 30 30 29 2b 22  |100S$=.S$,100)+"|
00006ac0  2e 2e 2e 2e 2e 2e 22 0d  15 b8 3c 85 32 30 31 2c  |......"...<.201,|
00006ad0  22 54 65 78 74 20 27 22  2b 53 24 2b 22 27 20 74  |"Text '"+S$+"' t|
00006ae0  6f 6f 20 6c 6f 6e 67 20  66 6f 72 20 77 72 69 74  |oo long for writ|
00006af0  61 62 6c 65 20 69 74 65  6d 20 22 2b c3 77 25 2b  |able item "+.w%+|
00006b00  22 21 22 0d 15 c2 12 cd  3a 24 57 25 28 77 25 29  |"!".....:$W%(w%)|
00006b10  3d 53 24 3a e1 0d 15 cc  35 dd f2 62 3a ea 41 79  |=S$:....5..b:.Ay|
00006b20  25 2c 41 24 2c 68 79 25  3a 59 25 3d 30 3a 4e 25  |%,A$,hy%:Y%=0:N%|
00006b30  3d 49 5f 25 3a f2 4f 3a  f5 3a 41 24 3d be 23 48  |=I_%:.O:.:A$=.#H|
00006b40  25 3a e7 a4 46 28 41 24  29 8c 0d 15 d6 4b 53 25  |%:..F(A$)....KS%|
00006b50  28 59 25 2b 31 29 3d 49  5f 25 2b 28 59 25 2a 32  |(Y%+1)=I_%+(Y%*2|
00006b60  38 29 2b 28 41 79 25 2a  32 34 29 3a 41 24 3d be  |8)+(Ay%*24):A$=.|
00006b70  23 48 25 3a 59 25 2b 3d  31 3a 41 24 3d c0 41 24  |#H%:Y%+=1:A$=.A$|
00006b80  2c 31 32 29 3a 4a 25 28  59 25 29 3d 31 32 2b 31  |,12):J%(Y%)=12+1|
00006b90  36 2a a9 41 24 0d 15 e0  17 cc 3a 41 79 25 2b 3d  |6*.A$.....:Ay%+=|
00006ba0  31 3a e7 a7 41 24 2c 22  2c 22 29 8c 0d 15 ea 20  |1:..A$,",").... |
00006bb0  68 79 25 3d 31 32 2b 31  36 2a a9 28 c0 41 24 2c  |hy%=12+16*.(.A$,|
00006bc0  a7 41 24 2c 22 2c 22 29  2d 31 29 29 0d 15 f4 13  |.A$,",")-1))....|
00006bd0  cc 3a 68 79 25 3d 31 32  2b 31 36 2a a9 41 24 0d  |.:hy%=12+16*.A$.|
00006be0  15 fe 1b cd 3a e7 68 79  25 3e 4a 25 28 59 25 29  |....:.hy%>J%(Y%)|
00006bf0  4a 25 28 59 25 29 3d 68  79 25 0d 16 08 0d cd 3a  |J%(Y%)=hy%.....:|
00006c00  fd c5 23 48 25 3a e1 0d  16 12 38 dd f2 6c 28 72  |..#H%:....8..l(r|
00006c10  24 29 3a ea 59 25 2c 41  79 25 2c 45 5f 25 2c 57  |$):.Y%,Ay%,E_%,W|
00006c20  4a 25 2c 41 24 3a 48 25  3d 8e 72 24 3a f5 3a 41  |J%,A$:H%=.r$:.:A|
00006c30  24 3d be 23 48 25 3a e7  a4 46 28 41 24 29 8c 0d  |$=.#H%:..F(A$)..|
00006c40  16 1c 11 59 25 2b 3d 31  3a 41 24 3d be 23 48 25  |...Y%+=1:A$=.#H%|
00006c50  0d 16 26 19 cc 3a e7 a7  41 24 2c 22 2c 77 72 69  |..&..:..A$,",wri|
00006c60  74 22 29 45 5f 25 2b 3d  31 0d 16 30 17 e7 a7 41  |t")E_%+=1..0...A|
00006c70  24 2c 22 2c 77 69 6e 64  22 29 57 4a 25 2b 3d 31  |$,",wind")WJ%+=1|
00006c80  0d 16 3a 0a 41 79 25 2b  3d 31 0d 16 44 34 cd 3a  |..:.Ay%+=1..D4.:|
00006c90  fd c5 23 48 25 3a c8 99  26 32 30 30 30 64 2c 30  |..#H%:..&2000d,0|
00006ca0  2c 48 25 3a 48 25 3d 30  3a f2 61 79 28 59 25 2c  |,H%:H%=0:.ay(Y%,|
00006cb0  41 79 25 2c 45 5f 25 2c  57 4a 25 29 3a e1 0d 16  |Ay%,E_%,WJ%):...|
00006cc0  4e 1e dd a4 4a 28 4e 25  2c 64 25 29 3a ea 46 24  |N...J(N%,d%):.F$|
00006cd0  3a e7 64 25 3d 30 64 25  3d 32 35 35 0d 16 58 1b  |:.d%=0d%=255..X.|
00006ce0  e3 4e 25 3d 4e 25 b8 4e  25 2b 64 25 2d 31 3a e7  |.N%=N%.N%+d%-1:.|
00006cf0  3f 4e 25 3c 33 32 8c 0d  16 62 07 3d 46 24 0d 16  |?N%<32...b.=F$..|
00006d00  6c 10 cc 3a 46 24 2b 3d  bd 28 3f 4e 25 29 0d 16  |l..:F$+=.(?N%)..|
00006d10  76 0b cd 3a ed 3a 3d 46  24 0d 16 80 2f dd a4 57  |v..:.:=F$.../..W|
00006d20  28 52 24 29 3a c8 95 a7  52 24 2c 22 2e 22 29 3a  |(R$):...R$,"."):|
00006d30  52 24 3d c1 52 24 2c a7  52 24 2c 22 2e 22 29 2b  |R$=.R$,.R$,".")+|
00006d40  31 29 3a ce 3a 3d 52 24  0d 16 8a 37 dd f2 43 28  |1):.:=R$...7..C(|
00006d50  63 24 2c 74 24 29 3a 63  24 3d bd 30 2b bd 30 2b  |c$,t$):c$=.0+.0+|
00006d60  bd 30 2b bd 30 2b 63 24  2b bd 30 3a c8 99 26 34  |.0+.0+c$+.0:..&4|
00006d70  30 30 64 66 2c 63 24 2c  31 38 2c 74 24 3a e1 0d  |00df,c$,18,t$:..|
00006d80  16 94 5a dd a4 47 28 64  24 29 3a ea 64 25 3a c8  |..Z..G(d$):.d%:.|
00006d90  99 26 32 30 30 32 33 2c  64 24 2b bd 28 30 29 2c  |.&20023,d$+.(0),|
00006da0  4d 25 2c 2d 31 b8 2c 2c  64 25 3a e7 64 25 3d 30  |M%,-1.,,d%:.d%=0|
00006db0  85 a2 30 2c 22 53 79 73  74 65 6d 20 76 61 72 69  |..0,"System vari|
00006dc0  61 62 6c 65 20 27 22 2b  64 24 2b 22 27 20 6e 6f  |able '"+d$+"' no|
00006dd0  74 20 66 6f 75 6e 64 21  22 0d 16 9e 34 c8 99 26  |t found!"...4..&|
00006de0  32 30 30 32 33 2c 64 24  2b bd 28 30 29 2c 4d 25  |20023,d$+.(0),M%|
00006df0  2c 32 35 35 2c 2c 33 b8  2c 2c 64 25 3a 3f 28 4d  |,255,,3.,,d%:?(M|
00006e00  25 2b 64 25 29 3d 31 33  3a 3d 24 4d 25 0d 16 a8  |%+d%)=13:=$M%...|
00006e10  3e dd a4 59 28 58 25 2c  56 25 29 3a ea 46 24 3a  |>..Y(X%,V%):.F$:|
00006e20  4d 25 21 30 3d 58 25 3a  4d 25 21 34 3d 56 25 3a  |M%!0=X%:M%!4=V%:|
00006e30  c8 99 26 34 30 30 63 65  2c 2c 4d 25 3a c8 8e 28  |..&400ce,,M%:..(|
00006e40  4d 25 21 32 34 80 32 35  39 29 ca 0d 16 b2 17 c9  |M%!24.259)......|
00006e50  32 2c 33 3a 3d a4 4a 28  4d 25 21 32 38 2c 32 35  |2,3:=.J(M%!28,25|
00006e60  36 29 0d 16 bc 12 c9 32  35 38 3a e7 4d 25 21 33  |6).....258:.M%!3|
00006e70  36 3e 30 8c 0d 16 c6 14  3d a4 4a 28 4d 25 21 32  |6>0.....=.J(M%!2|
00006e80  38 2c 4d 25 21 33 36 29  0d 16 d0 2c cc 3a 85 32  |8,M%!36)...,.:.2|
00006e90  30 32 2c 22 4e 6f 20 73  70 72 69 74 65 20 6e 61  |02,"No sprite na|
00006ea0  6d 65 20 69 6e 20 69 63  6f 6e 20 22 2b c3 56 25  |me in icon "+.V%|
00006eb0  3a 3d 22 22 0d 16 da 05  cd 0d 16 e4 1d c9 32 35  |:=""..........25|
00006ec0  39 3a 3d c1 a4 4a 28 4d  25 21 33 32 2c 4d 25 21  |9:=..J(M%!32,M%!|
00006ed0  33 36 29 2c 32 29 0d 16  ee 2c 7f 3a 85 32 30 32  |36),2)...,.:.202|
00006ee0  2c 22 4e 6f 20 73 70 72  69 74 65 20 6e 61 6d 65  |,"No sprite name|
00006ef0  20 69 6e 20 69 63 6f 6e  20 22 2b c3 56 25 3a 3d  | in icon "+.V%:=|
00006f00  22 22 0d 16 f8 09 cb 3a  3d 46 24 0d 17 02 24 dd  |"".....:=F$...$.|
00006f10  a4 50 28 58 25 2c 56 25  29 3a 3d a0 28 22 26 22  |.P(X%,V%):=.("&"|
00006f20  2b c2 a4 59 28 58 25 2c  56 25 29 2c 33 29 29 0d  |+..Y(X%,V%),3)).|
00006f30  17 0c 49 dd a4 53 28 5a  79 24 2c 66 24 2c f8 7a  |..I..S(Zy$,f$,.z|
00006f40  4a 25 2c 77 4a 25 29 3a  ea 58 25 3a c8 99 26 34  |J%,wJ%):.X%:..&4|
00006f50  30 30 64 39 2c 2c 5a 79  24 3a 58 25 3d a4 56 28  |00d9,,Zy$:X%=.V(|
00006f60  66 24 2c 7a 4a 25 2c 77  4a 25 29 3a c8 99 26 34  |f$,zJ%,wJ%):..&4|
00006f70  30 30 64 61 3a 3d 58 25  0d 17 16 4c dd a4 56 28  |00da:=X%...L..V(|
00006f80  66 24 2c f8 56 79 25 2c  54 4a 25 29 3a ea 51 5f  |f$,.Vy%,TJ%):.Q_|
00006f90  25 2c 58 25 3a c8 99 26  34 30 30 64 62 2c 2c 46  |%,X%:..&400db,,F|
00006fa0  25 2c 56 79 25 2c 54 4a  25 2c 2d 31 2c 66 24 2c  |%,Vy%,TJ%,-1,f$,|
00006fb0  30 b8 2c 2c 56 79 25 2c  2c 2c 2c 51 5f 25 3a e7  |0.,,Vy%,,,,Q_%:.|
00006fc0  51 5f 25 8c 0d 17 20 13  c8 99 26 34 30 30 63 31  |Q_%... ...&400c1|
00006fd0  2c 2c 46 25 b8 58 25 0d  17 2a 3a cc 3a 85 a2 30  |,,F%.X%..*:.:..0|
00006fe0  2c 22 57 69 6e 64 6f 77  20 22 2b 66 24 2b 22 20  |,"Window "+f$+" |
00006ff0  6e 6f 74 20 66 6f 75 6e  64 20 69 6e 20 74 65 6d  |not found in tem|
00007000  70 6c 61 74 65 20 66 69  6c 65 21 22 3a 58 25 3d  |plate file!":X%=|
00007010  30 0d 17 34 09 cd 3a 3d  58 25 0d 17 3e 2e dd f2  |0..4..:=X%..>...|
00007020  51 28 58 25 29 3a 21 4d  25 3d 58 25 3a c8 99 26  |Q(X%):!M%=X%:..&|
00007030  34 30 30 63 62 2c 2c 4d  25 3a c8 99 26 34 30 30  |400cb,,M%:..&400|
00007040  63 35 2c 2c 4d 25 3a e1  0d ff                    |c5,,M%:...|
0000704a