Home » Recent acquisitions » Acorn ADFS disks » adfs_AcornComputing_199407.adf » 9407 » 10_10Frnch/!10_10Fren/25-01-1994/SixGames/TheCop
10_10Frnch/!10_10Fren/25-01-1994/SixGames/TheCop
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 » Recent acquisitions » Acorn ADFS disks » adfs_AcornComputing_199407.adf » 9407 |
Filename: | 10_10Frnch/!10_10Fren/25-01-1994/SixGames/TheCop |
Read OK: | ✔ |
File size: | 47BE bytes |
Load address: | 0000 |
Exec address: | 0000 |
File contents
10REM ><Disc1$Dir>.SixGames.TheCop 20ONERROR:IFERR=17 PROCtrap:GOTO60 ELSEPROCerror 30IFMODE<>12:MODE12:OFF 40PROCassemble 50PROCinitial 60PROCmenu 70REPEAT 80PROCmouseilluminate 90PROCsound 100PROCpractice 110PROCinstructions 120UNTIL FALSE 130DEFPROCinitial 140DIM lft%(7),lefy%(7),rgt%(7),rigy%(7),left$(7),rigt$(7),dis$(2),nme$(16),seq$(16),ing%(16),spt$(4),prt$(32) 150@% =0 160bit%=10 170blt%=1 180gme%=1 190e$ ="<Disc1$Dir>.Francais.TheCop" 200f$ ="<Disc1$Dir>.SixGames." 210LIBRARY f$+"Common" 220j% =FNinitialcompressed("Numbers") 230z% =FNinitialcompressed("Game1") 240PROCloaddetails 250PROCsortscores 260PROCloadwords 270PROClimit 280RESTORE 360 290PROCdata 300SYS"Hourglass_Smash" 310PROCpoint("Ten",1) 320PROCpoint("Hand1",2) 330PROCpoint("Hand2",3) 340PROCflush 350ENDPROC 360DATA fruit/veg,drinks and baker's,delicatessan,general 370DATA in grocer's,in grocer's,in delicatessan,general 380DATA food shopping,restaurant/cafe,clothes shopping,present shopping 390DATA "avoir, �tre present tense",regular 'er' verb aimer,vouloirs,regular 're' 'ir' verbs vendre and finir 400DATA food/dishes,shops and services,food items,restaurants 410DATA apologising and excuses,"complaints, problems and disapproval","likes, dislikes, voicing anger and exasperation","inviting, refusing and forbidding" 420DEFPROCmouse2 430MOUSE COLOUR 1,0,0,0 440MOUSE COLOUR 2,192,96,128 450MOUSE COLOUR 3,192,96,128 460MOUSE ON 2 470ENDPROC 480DEFPROCmouse3 490MOUSE COLOUR 1,0,0,0 500MOUSE COLOUR 2,192,96,128 510MOUSE COLOUR 3,192,96,128 520MOUSE ON 3 530ENDPROC 540DEFPROCmouseilluminate 550MOUSE mox%,moy%,but% 560box%=(moy%-164)>>6 570IFbox%>9:box%=9 580IFbox%<>sun%:WAIT:PROCsqr(sun%,11):PROCsqr(box%,15):PROCint(sun%):PROCint(box%):sun%=box% 590PROClongmenu 600IFbut%=0:ENDPROC 610VDU 7 620upd%=TRUE 630sun%=0 640CASE box% OF 650WHEN 0:PROCquit 660WHEN 1:PROCinformation 670WHEN 2:PROCvolume 680WHEN 3:PROCgrade 690WHEN 4 700bit%+=10 710IFbit%=60:bit%=10 720upd%=FALSE 730WHEN 5 740san%+=20 750IFsan%=220:san%=0 760upd%=FALSE 770WHEN 6 780blt%+=1 790IFblt%>4:blt%=1 800upd%=FALSE 810WHEN 7:PROCplayers 820WHEN 8:PROChighscore 830OTHERWISE 840PROCintro 850PROCnumbername 860PROCplaygame 870ENDCASE 880PROCmenuclean 890ENDPROC 900DEFPROCint(int%) 910VDU 5 920GCOL 0,0 930CASE int% OF 940WHEN 2:PROCinsert(11,STR$(M%>>4)) 950WHEN 3:IFsub%=0 PROCinsert(13,STR$(grd%)) ELSEPROCinsert(13,STR$(grd%)+"/"+CHR$(sub%+64)) 960WHEN 4:PROCinsert(15,STR$(bit%)) 970WHEN 5 980IFsan%=0 THEN 990IFfor% PROCinsert(17,"ETEINT") ELSEPROCinsert(17,"OFF") 1000tim%=FALSE 1010ELSE 1020PROCinsert(17,STR$(san%)) 1030tim%=TRUE 1040ENDIF 1050WHEN 6:PROCinsert(19,STR$(blt%)) 1060WHEN 7:PROCinsert(21,STR$(ply%)) 1070ENDCASE 1080VDU 4 1090OFF 1100ENDPROC 1110DEFPROCmenu 1120SYS"ABC_Blank",15 1130SYS"ABC_Colour",15 1140PROCforeign 1150IFfor% THEN 1160PROCcard("LE FLIC MENU",24,10,2,10) 1170RESTORE 1300 1180ELSE 1190PROCcard("THE COP MENU",24,10,2,10) 1200RESTORE 1280 1210ENDIF 1220PROCfillmenu 1230PROCsprites 1240MOUSE RECTANGLE 704,164,158,642 1250SYS"ABC_Palette" 1260PROCmouse1 1270ENDPROC 1280DATA Play The Cop,High score table,Number of players,Target speed 1290DATA Timer,Questions,,Volume,Information,Exit to Main Menu 1300DATA Jouer au Flic,"Grille des r�sultats �lev�s",Nombre de joueurs,Vitesse choisie 1310DATA Minuteur,Questions,,Volume,Information,Retour au menu principal 1320DEFPROCplaygame 1330PROCinitialgame 1340PROCgrabmouse 1350REPEAT 1360PROCdoword 1370REPEAT 1380REPEAT 1390PROCreveal(13,14,2) 1400PROCpause 1410PROCmouse 1420PROCsound 1430PROCtimer 1440PROCgener 1450PROCmovebelts 1460UNTIL but%>0 OR ovr% 1470IFNOTovr% THEN 1480PROCmouse3 1490PROCmatch 1500PROCscores 1510IFNOTsuc% AND ply%>1:PROCgrabmouse 1520ENDIF 1530UNTIL fin% OR ovr% 1540UNTIL ovr% 1550IFtim% THEN 1560IFsec%>0 THEN 1570PROCdelay(150) 1580PROCenterhighscores 1590PROCreport 1600ELSE 1610PROCexhaust 1620ENDIF 1630ELSE 1640PROCdelay(150) 1650PROCenterhighscores 1660PROCreport 1670ENDIF 1680ENDPROC 1690DEFPROCmouse 1700MOUSE mox%,moy%,but% 1710IFbut%=0:let%=TRUE:PROCmouse2:ENDPROC 1720IFlet%=TRUE:let%=FALSE:ENDPROC 1730but%=0 1740ENDPROC 1750DEFPROCinitialgame 1760SYS"ABC_Blank",4 1770SYS"ABC_Colour",4 1780PROCforeign 1790PROCscansub 1800PROCvariables 1810PROCwhich 1820PROCscores 1830PROCupdate 1840SYS"ABC_Palette" 1850MOUSE RECTANGLE 0,256,1280,768 1860ENDPROC 1870DEFPROCscansub 1880IFgrd%=1 OR sub%=0:ENDPROC 1890amt%=0 1900FORJ%=1TO1500 1910IFknd%(grd%,J%)=sub%:amt%+=1 1920NEXT 1930IFamt%<2:sub%=0 1940ENDPROC 1950DEFPROCvariables 1960ani%=0 1970bon%=10*grd% 1980gap%=1 1990hrt%=TRUE 2000let%=TRUE 2010mor%=3 2020ovr%=FALSE 2030pre%=TRUE 2040ryt%=0 2050ron%=0 2060sec%=san% 2070sht%=bit% 2080spd%=blt%*2 2090suc%=FALSE 2100try%=0 2110scr%()=0 2120lft%()=-2 2130lefy%()=0 2140rgt%()=-2 2150rigy%()=0 2160PROCrec(14,13,0,0,1278,256) 2170SYS"ABC_UnpackPlace","t4",z%,252,248 2180SYS"ABC_UnpackPlace","b1",z%,0,242 2190SYS"ABC_UnpackPlace","b2",z%,608,242 2200SYS"ABC_UnpackPlace","hint",z%,160,132 2210GCOL 0,5 2220RECTANGLEFILL 36,40,200,192 2230RECTANGLEFILL 248,40,278,192 2240GCOL 0,3 2250RECTANGLEFILL 28,32,200,192 2260RECTANGLEFILL 240,32,278,192 2270SYS"ABC_UnpackPlace","h1",j%,50,44 2280COLOUR 0 2290COLOUR 131 2300IFfor% PRINTTAB(2,29)"Temps:"; ELSEPRINTTAB(3,29)"Time : "; 2310IFtim% THEN 2320COLOUR 10 2330PRINTsec% 2340ELSE 2350COLOUR 9 2360IFfor% PRINT"Eteint" ELSEPRINT"Off" 2370ENDIF 2380VDU 5 2390FORX%=1TO ply% 2400GCOL 0,11 2410RECTANGLEFILL 444+X%*96,240-X%*52,324,40 2420GCOL 0,9 2430RECTANGLEFILL 440+X%*96,236-X%*52,320,36 2440GCOL 0,8 2450MOVE 456+X%*96,268-X%*52 2460PRINTname$(X%) 2470NEXT 2480IFfor% RESTORE 2610 ELSERESTORE 2600 2490GCOL 0,11 2500FORJ%=1TO4 2510READ a$ 2520MOVE 252,240-J%*40 2530IFJ%=2:a$=FNforeignlevel(TRUE) 2540PRINTa$ 2550NEXT 2560VDU 4 2570OFF 2580IFply%>1 cur%=RND(ply%) ELSEcur%=1 2590ENDPROC 2600DATA Hits,,Questions,Bonus 2610DATA "Coups r�ussis",,Questions,Bonus 2620DEFPROCwhich 2630GCOL 0,8 2640WAIT 2650RECTANGLEFILL 1180,20,32,216 2660GCOL 0,0 2670RECTANGLE 1180,20,32,216 2680GCOL 0,9 2690MOVE 1188,248-cur%*52 2700PLOT 0,16,-16 2710PLOT 81,0,32 2720ENDPROC 2730DEFPROCupdate 2740GCOL 0,3 2750VDU 5 2760WAIT 2770RECTANGLEFILL 468,32,44,192 2780GCOL 0,14 2790MOVE 468,200 2800PRINTryt% 2810MOVE 468,160 2820PRINTgrd%; 2830IFsub%>0:PRINT"/"CHR$(sub%+64) 2840MOVE 468,120 2850PRINTsht% 2860MOVE 468,80 2870PRINTbon% 2880VDU 4 2890OFF 2900ENDPROC 2910DEFPROCscores 2920VDU 5 2930FORX%=1TO ply% 2940GCOL 0,4 2950WAIT 2960RECTANGLEFILL 600+X%*96,236-X%*52,160,36 2970GCOL 0,7 2980MOVE 616+X%*96,268-X%*52 2990PRINTscr%(X%) 3000NEXT 3010VDU 4 3020OFF 3030ENDPROC 3040DEFPROCgener 3050gap%-=spd% 3060IFgap%>0:ENDPROC 3070gap%=40 3080S%=1 3090WHILE S%<7 AND lft%(S%)>-2 OR rgt%(S%)>-2 3100S%+=1 3110ENDWHILE 3120IFS%=7:ENDPROC 3130SYS"ABC_UnpackPlace","tar1",z%,32,130 3140SYS"ABC_UnpackPlace","tar2",z%,480,242 3150mor%-=1 3160IFmor%=0 THEN 3170act%=TRUE 3180mor%=RND(3)+1 3190ELSE 3200act%=FALSE 3210ENDIF 3220CASE grd% OF 3230WHEN 1:PROCgen1 3240WHEN 2:PROCgen2 3250WHEN 3:PROCgen3 3260WHEN 4:PROCgen4 3270WHEN 5:PROCgen5 3280OTHERWISE:PROCgen6 3290ENDCASE 3300lft%(S%)=0 3310rgt%(S%)=0 3320lefy%(S%)=130 3330rigy%(S%)=242 3340ENDPROC 3350DEFPROCgen1 3360IFact% THEN 3370J%=RND(8) 3380left$(S%)=seq$(1) 3390a$=nme$(1) 3400rigt$(S%)=seq$(J%) 3410b$=nme$(J%) 3420IFRND>0 THEN 3430SWAP left$(S%),rigt$(S%) 3440SWAP a$,b$ 3450ENDIF 3460ELSE 3470J%=RND(8) 3480left$(S%)=seq$(J%) 3490a$=nme$(J%) 3500J%=RND(8) 3510rigt$(S%)=seq$(J%) 3520b$=nme$(J%) 3530ENDIF 3540SYS"ABC_UnpackSprite",a$,z%,44,129 3550SYS"ABC_UnpackSprite",b$,z%,500,241 3560ENDPROC 3570DEFPROCgen2 3580IFact% THEN 3590left$(S%)=seq$(1) 3600rigt$(S%)=seq$(RND(16)) 3610IFRND>0:SWAP left$(S%),rigt$(S%) 3620ELSE 3630left$(S%)=seq$(RND(16)) 3640rigt$(S%)=seq$(RND(16)) 3650ENDIF 3660SYS"ABC_PryntString",left$(S%),90-LEN(left$(S%))*4,114,0,0 3670SYS"ABC_PryntString",rigt$(S%),550-LEN(rigt$(S%))*4,228,0,0 3680ENDPROC 3690DEFPROCgen3 3700IFact% THEN 3710left$(S%)=seq$(seq%) 3720rigt$(S%)=seq$(RND(16)) 3730IFRND>0:SWAP left$(S%),rigt$(S%) 3740ELSE 3750left$(S%)=seq$(RND(16)) 3760rigt$(S%)=seq$(RND(16)) 3770ENDIF 3780a$=left$(S%) 3790b$=rigt$(S%) 3800SYS"ABC_PryntString",a$,90-LEN(a$)*4,114,0,0 3810SYS"ABC_PryntString",b$,550-LEN(b$)*4,228,0,0 3820ENDPROC 3830DEFPROCgen4 3840IFact% THEN 3850left$(S%)=seq$(1) 3860rigt$(S%)=seq$(RND(16)) 3870IFRND>0:SWAP left$(S%),rigt$(S%) 3880ELSE 3890left$(S%)=seq$(RND(16)) 3900rigt$(S%)=seq$(RND(16)) 3910ENDIF 3920SYS"ABC_PryntString",left$(S%),90-LEN(left$(S%))*4,114,0,0 3930SYS"ABC_PryntString",rigt$(S%),550-LEN(rigt$(S%))*4,228,0,0 3940ENDPROC 3950DEFPROCgen5 3960IFact% OR try%>1 THEN 3970left$(S%)=seq$(1) 3980IFtry%>1 rigt$(S%)=seq$(1) ELSErigt$(S%)=seq$(RND(16)) 3990IFRND>0:SWAP left$(S%),rigt$(S%) 4000ELSE 4010left$(S%)=seq$(RND(16)) 4020rigt$(S%)=seq$(RND(16)) 4030ENDIF 4040PROCsplitup(left$(S%)) 4050FORJ%=1TO3 4060SYS"ABC_PryntString",spt$(J%),90-LEN(spt$(J%))*4,130-J%*8,0,0 4070NEXT 4080PROCsplitup(rigt$(S%)) 4090FORJ%=1TO3 4100SYS"ABC_PryntString",spt$(J%),550-LEN(spt$(J%))*4,244-J%*8,0,0 4110NEXT 4120ENDPROC 4130DEFPROCgen6 4140IFact% THEN 4150left$(S%)=seq$(1) 4160rigt$(S%)=seq$(RND(16)) 4170IFRND>0:SWAP left$(S%),rigt$(S%) 4180ELSE 4190left$(S%)=seq$(RND(16)) 4200rigt$(S%)=seq$(RND(16)) 4210ENDIF 4220a$=left$(S%) 4230b$=rigt$(S%) 4240SYS"ABC_PryntString",a$,90-LEN(a$)*4,114,0,0 4250SYS"ABC_PryntString",b$,550-LEN(b$)*4,228,0,0 4260ENDPROC 4270DEFPROCmovebelts 4280CALL SCROLL, spd% 4290FORS%=1TO6 4300IFlft%(S%)>-2 THEN 4310lefy%(S%)+=spd% 4320IFlefy%(S%)>294:lefy%(S%)=0:lft%(S%)=-2 4330ELSE 4340lefy%(S%)=0 4350ENDIF 4360IFrgt%(S%)>-2 THEN 4370rigy%(S%)-=spd% 4380IFrigy%(S%)<26:rigy%(S%)=0:rgt%(S%)=-2 4390ELSE 4400rigy%(S%)=0 4410ENDIF 4420NEXT 4430ENDPROC 4440DEFPROCmatch 4450mox%=mox%>>1 4460moy%=moy%>>2 4470suc%=FALSE 4480S%=1 4490WHILE S%<7 AND NOTsuc% 4500IFlft%(S%)>-2:PROCleft 4510IFrgt%(S%)>-2:PROCrigt 4520S%+=1 4530ENDWHILE 4540PROCflush 4550IFfin% AND suc% THEN 4560IFsht%>0 AND NOTser%:sht%-=1 4570IFsht%=0:ovr%=TRUE 4580ENDIF 4590IFsuc% THEN 4600try%=0 4610SYS"ABC_UnpackPlace","t2",z%,252,248 4620PROCnoise("Ping",2,&17F,&4800,&100) 4630PROCcongr 4640IFNOTser%:ryt%+=1 4650IFNOTser%:scr%(cur%)+=10*grd%+bon%+blt%*5 4660IFtim%:scr%(cur%)+=(200-san%)DIV8 4670bon%=10*grd% 4680IFfin%:SYS"ABC_UnpackPlace","t4",z%,252,248 4690ELSE 4700PROCnoise("Burp",2,&17F,&1100,&10) 4710SYS"ABC_UnpackPlace","t3",z%,252,248 4720ron%+=1 4730IFsht%>0 AND NOTser%:sht%-=1 4740IFsht%=0:ovr%=TRUE 4750try%+=1 4760IFtry%=2 AND NOTovr%:PROChint 4770IFfin% AND grd%=6:PROCdelay(100) 4780ENDIF 4790PROCupdate 4800TIME=0 4810ENDPROC 4820DEFPROCleft 4830IFNOTFNarea(144,lefy%(S%)-34,160,lefy%(S%)):ENDPROC 4840IFgrd%=3 PROCans3(left$(S%)) ELSEPROCans12456(left$(S%)) 4850IFNOTsuc%:ENDPROC 4860GCOL 0,4 4870RECTANGLEFILL 64,lefy%(S%)*4-152,254,152 4880lft%(S%)=-2 4890ENDPROC 4900DEFPROCrigt 4910IFNOTFNarea(480,rigy%(S%)-34,496,rigy%(S%)):ENDPROC 4920IFgrd%=3 PROCans3(rigt$(S%)) ELSEPROCans12456(rigt$(S%)) 4930IFNOTsuc%:ENDPROC 4940GCOL 0,4 4950IFrigy%(S%)*4-152>256 RECTANGLEFILL 960,rigy%(S%)*4-152,254,152 ELSERECTANGLEFILL 960,260,254,(rigy%(S%)-65)*4 4960rgt%(S%)=-2 4970ENDPROC 4980DEFPROChint 4990CASE grd% OF 5000WHEN 1:PROChint1 5010WHEN 2:PROChint2 5020WHEN 3:PROChint3 5030WHEN 5:PROChint5 5040WHEN 4:PROChint4 5050OTHERWISE:PROChint6 5060ENDCASE 5070ENDPROC 5080DEFPROChint1 5090SYS"ABC_UnpackPlace","hint",z%,160,132 5100SYS"ABC_UnpackSprite",nme$(1),z%,272,126 5110a$=FNalias(ing%(1)) 5120xsc%=320-LEN(a$)*8 5130SYS"ABC_PryntString",a$,xsc%,103,1,7 5140SYS"ABC_PryntString",a$,xsc%-2,104,1,0 5150ENDPROC 5160DEFPROChint2 5170SYS"ABC_UnpackPlace","hint",z%,160,132 5180a$=seq$(0) 5190xsc%=320-LEN(a$)*8 5200SYS"ABC_PryntString",a$,xsc%,123,1,7 5210SYS"ABC_PryntString",a$,xsc%-2,124,1,0 5220a$=seq$(1) 5230xsc%=320-LEN(a$)*8 5240SYS"ABC_PryntString",a$,xsc%,103,1,7 5250SYS"ABC_PryntString",a$,xsc%-2,104,1,0 5260ENDPROC 5270DEFPROChint3 5280IFtwo% THEN 5290IFINSTR(dis$(1),seq$(seq%),psa%)>0 THEN 5300a$=dis$(1) 5310xxx%=INSTR(a$,seq$(seq%),psa%) 5320a$=MID$(a$,xxx%,LEN(seq$(seq%))) 5330SYS"ABC_PryntString",a$,320-LEN(dis$(1))*4+xxx%*8-8,105,0,7 5340ELSE 5350a$=dis$(2) 5360xxx%=INSTR(a$,seq$(seq%),psb%) 5370a$=MID$(a$,xxx%,LEN(seq$(seq%))) 5380SYS"ABC_PryntString",a$,320-LEN(dis$(2))*4+xxx%*8-8,98,0,7 5390ENDIF 5400ELSE 5410a$=dis$(1) 5420xxx%=INSTR(a$,seq$(seq%),psa%) 5430a$=MID$(a$,xxx%,LEN(seq$(seq%))) 5440SYS"ABC_PryntString",a$,320-LEN(dis$(1))*4+xxx%*8-8,105,0,7 5450ENDIF 5460IFLEN(j$)>38 THEN 5470J%=38 5480WHILE MID$(j$,J%,1)<>" " 5490J%-=1 5500ENDWHILE 5510a$=LEFT$(j$,J%-1) 5520b$=MID$(j$,J%+1) 5530xsc%=320-LEN(a$)*4 5540SYS"ABC_PryntString",a$,xsc%,87,0,7 5550SYS"ABC_PryntString",a$,xsc%,88,0,11 5560xsc%=320-LEN(b$)*4 5570SYS"ABC_PryntString",b$,xsc%,79,0,7 5580SYS"ABC_PryntString",b$,xsc%,80,0,11 5590ELSE 5600xsc%=320-LEN(j$)*4 5610SYS"ABC_PryntString",j$,xsc%,87,0,7 5620SYS"ABC_PryntString",j$,xsc%,88,0,11 5630ENDIF 5640ENDPROC 5650DEFPROChint4 5660IFINSTR(dis$(1),"_")>0 THEN 5670xxx%=INSTR(dis$(1),"_") 5680a$=seq$(1) 5690xsc%=306-LEN(dis$(1))*4+xxx%*8 5700IFtwo% ysc%=123 ELSEysc%=115 5710SYS"ABC_PryntString",a$,xsc%,ysc%,0,7 5720SYS"ABC_PryntString",a$,xsc%-2,ysc%+1,0,10 5730ELSE 5740xxx%=INSTR(dis$(2),"_") 5750a$=seq$(1) 5760xsc%=306-LEN(dis$(2))*4+xxx%*8 5770SYS"ABC_PryntString",a$,xsc%,115,0,7 5780SYS"ABC_PryntString",a$,xsc%-2,116,0,10 5790ENDIF 5800IFLEN(j$)>38 THEN 5810J%=38 5820WHILE MID$(j$,J%,1)<>" " 5830J%-=1 5840ENDWHILE 5850a$=LEFT$(j$,J%-1) 5860b$=MID$(j$,J%+1) 5870xsc%=320-LEN(a$)*4 5880SYS"ABC_PryntString",a$,xsc%,95,0,7 5890SYS"ABC_PryntString",a$,xsc%,96,0,11 5900xsc%=320-LEN(b$)*4 5910SYS"ABC_PryntString",b$,xsc%,87,0,7 5920SYS"ABC_PryntString",b$,xsc%,88,0,11 5930ELSE 5940xsc%=320-LEN(j$)*4 5950SYS"ABC_PryntString",j$,xsc%,95,0,7 5960SYS"ABC_PryntString",j$,xsc%,96,0,11 5970ENDIF 5980ENDPROC 5990DEFPROChint5 6000PROCfract(j$) 6010FORJ%=1TO4 6020xsc%=320-LEN(spt$(J%))*4 6030SYS"ABC_PryntString",spt$(J%),xsc%,106-J%*8,0,7 6040SYS"ABC_PryntString",spt$(J%),xsc%-2,107-J%*8,0,10 6050NEXT 6060ENDPROC 6070DEFPROChint6 6080IFINSTR(dis$(1),"_")>0 THEN 6090xxx%=INSTR(dis$(1),"_") 6100a$=seq$(1) 6110xsc%=304-LEN(dis$(1))*4+xxx%*8+8 6120IFtwo% ysc%=123 ELSEysc%=115 6130SYS"ABC_PryntString",a$,xsc%,ysc%,0,7 6140SYS"ABC_PryntString",a$,xsc%-2,ysc%+1,0,10 6150ELSE 6160xxx%=INSTR(dis$(2),"_") 6170a$=seq$(1) 6180xsc%=304-LEN(dis$(2))*4+xxx%*8+8 6190SYS"ABC_PryntString",a$,xsc%,115,0,7 6200SYS"ABC_PryntString",a$,xsc%-2,116,0,10 6210ENDIF 6220IFLEN(j$)>38 THEN 6230J%=38 6240WHILE MID$(j$,J%,1)<>" " 6250J%-=1 6260ENDWHILE 6270a$=LEFT$(j$,J%-1) 6280b$=MID$(j$,J%+1) 6290xsc%=320-LEN(a$)*4 6300SYS"ABC_PryntString",a$,xsc%,95,0,7 6310SYS"ABC_PryntString",a$,xsc%,96,0,11 6320xsc%=320-LEN(b$)*4 6330SYS"ABC_PryntString",b$,xsc%,87,0,7 6340SYS"ABC_PryntString",b$,xsc%,88,0,11 6350ELSE 6360xsc%=320-LEN(j$)*4 6370SYS"ABC_PryntString",j$,xsc%,95,0,7 6380SYS"ABC_PryntString",j$,xsc%,96,0,11 6390ENDIF 6400ENDPROC 6410DEFPROCans12456(h$) 6420IFh$=seq$(1) THEN 6430suc%=TRUE 6440fin%=TRUE 6450ENDIF 6460ENDPROC 6470DEFPROCans3(h$) 6480IFseq$(seq%)<>h$:ENDPROC 6490suc%=TRUE 6500IFseq%=beg%:fin%=TRUE 6510a$=dis$(1) 6520IFtwo% THEN 6530IFINSTR(a$,seq$(seq%),psa%)>0 THEN 6540psa%=INSTR(a$,seq$(seq%),psa%)+LEN(seq$(seq%)) 6550a$=LEFT$(a$,psa%-1) 6560xsc%=320-LEN(dis$(1))*4 6570WAIT 6580SYS"ABC_PryntString",a$,xsc%,105,0,7 6590SYS"ABC_PryntString",a$,xsc%-2,106,0,9 6600ELSE 6610a$=dis$(2) 6620psb%=INSTR(a$,seq$(seq%),psb%)+LEN(seq$(seq%)) 6630a$=LEFT$(a$,psb%-1) 6640xsc%=320-LEN(dis$(2))*4 6650WAIT 6660SYS"ABC_PryntString",a$,xsc%,97,0,7 6670SYS"ABC_PryntString",a$,xsc%-2,98,0,9 6680ENDIF 6690ELSE 6700psa%=INSTR(a$,seq$(seq%),psa%)+LEN(seq$(seq%)) 6710a$=LEFT$(a$,psa%-1) 6720xsc%=320-LEN(dis$(1))*4 6730WAIT 6740SYS"ABC_PryntString",a$,xsc%,105,0,7 6750SYS"ABC_PryntString",a$,xsc%-2,106,0,9 6760ENDIF 6770seq%+=1 6780ENDPROC 6790DEFPROCdoword 6800fin%=FALSE 6810seq$()="" 6820SYS"ABC_UnpackPlace","hint",z%,160,132 6830CASE grd% OF 6840WHEN 1:PROCone 6850WHEN 2:PROCtwo 6860WHEN 3:PROCthree 6870WHEN 4:PROCfour 6880WHEN 5:PROCfive 6890OTHERWISE:PROCsix 6900ENDCASE 6910ENDPROC 6920DEFPROCone 6930REPEAT 6940IFsub%=0 THEN 6950FORJ%=1TO8 6960REPEAT 6970REPEAT 6980K%=RND(128)-1 6990UNTIL z%!(K%<<4)>0 7000UNTIL FNsubnum(K%)>0 7010seq$(J%)=FNalias(K%) 7020nme$(J%)=FNname(K%) 7030ing%(J%)=K% 7040NEXT 7050ELSE 7060FORJ%=1TO8 7070REPEAT 7080REPEAT 7090K%=RND(128)-1 7100UNTIL z%!(K%<<4)>0 7110UNTIL FNsubnum(K%)=sub% 7120seq$(J%)=FNalias(K%) 7130nme$(J%)=FNname(K%) 7140ing%(J%)=K% 7150NEXT 7160ENDIF 7170a$=FNalias(ing%(1)) 7180UNTILLEN(a$)<21 7190xsc%=320-LEN(a$)*8 7200WAIT 7210SYS"ABC_PryntString",a$,xsc%,115,1,7 7220SYS"ABC_PryntString",a$,xsc%-2,116,1,0 7230ENDPROC 7240DEFPROCsix 7250REPEAT 7260tru%=TRUE 7270seq$()="" 7280REPEAT 7290a$=FNchoose 7300cnt%=FNcount(a$,"/") 7310UNTIL cnt%>2 AND cnt%<17 AND FNcount(a$,"*")=1 7320j$=MID$(a$,INSTR(a$,"*")+1) 7330a$=LEFT$(a$,INSTR(a$,"*")-1) 7340FORpos%=0TO cnt% 7350seq$(pos%)=FNexcise(a$,"/") 7360IFpos%>0 AND seq$(pos%)<>LEFT$(seq$(pos%),12):tru%=FALSE 7370NEXT 7380IFFNcount(seq$(0),"_")=0:tru%=FALSE 7390UNTIL tru% 7400pre%=X% 7410amt%=pos%-2 7420WHILE pos%<17 7430seq$(pos%)=seq$(RND(amt%)+1) 7440pos%+=1 7450ENDWHILE 7460a$=seq$(0) 7470IFLEN(a$)>38 THEN 7480two%=TRUE 7490spl%=LEN(a$)DIV2 7500WHILE MID$(a$,spl%,1)<>" " AND spl%>0 7510spl%-=1 7520ENDWHILE 7530dis$(1)=LEFT$(a$,spl%-1) 7540dis$(2)=MID$(a$,spl%+1) 7550xsc%=320-LEN(dis$(1))*4 7560WAIT 7570SYS"ABC_PryntString",dis$(1),xsc%,123,0,7 7580SYS"ABC_PryntString",dis$(1),xsc%-2,124,0,0 7590xsc%=320-LEN(dis$(2))*4 7600WAIT 7610SYS"ABC_PryntString",dis$(2),xsc%,115,0,7 7620SYS"ABC_PryntString",dis$(2),xsc%-2,116,0,0 7630ELSE 7640two%=FALSE 7650dis$(1)=a$ 7660xsc%=320-LEN(dis$(1))*4 7670WAIT 7680SYS"ABC_PryntString",dis$(1),xsc%,115,0,7 7690SYS"ABC_PryntString",dis$(1),xsc%-2,116,0,0 7700ENDIF 7710IFLEN(seq$(0))>38 THEN 7720spl%=LEN(seq$(0))DIV2 7730WHILE MID$(seq$(0),spl%,1)<>" " AND spl%>0 7740spl%-=1 7750ENDWHILE 7760dis$(1)=LEFT$(seq$(0),spl%-1) 7770dis$(2)=MID$(seq$(0),spl%+1) 7780ELSE 7790dis$(1)=seq$(0) 7800dis$(2)="" 7810ENDIF 7820ENDPROC 7830DEFFNtidyup(a$) 7840WHILE INSTR(a$,"/")>0 7850MID$(a$,INSTR(a$,"/"),1)=" " 7860ENDWHILE 7870RESTORE 7950 7880FORtid%=1TO5 7890READ x$,y$ 7900WHILE INSTR(a$,x$)>0 7910a$=LEFT$(a$,INSTR(a$,x$)-1)+y$+MID$(a$,INSTR(a$,x$)+LEN(x$)) 7920ENDWHILE 7930NEXT 7940=a$ 7950DATA " - ",- 7960DATA " -",- 7970DATA "- ",- 7980DATA " ?",? 7990DATA " !",! 8000DEFPROCtimer 8010IFTIME<100:ENDPROC 8020IFNOTser%:bon%-=grd% 8030IFbon%<0:bon%=0 8040PROCupdate 8050ani%=ani% EOR&1 8060SYS"ABC_UnpackPlace","t"+STR$(ani%),z%,252,248 8070hrt%=NOThrt% 8080TIME=0 8090IFNOTtim%:ENDPROC 8100IFhrt% SYS"ABC_UnpackPlace","h1",j%,50,44 ELSESYS"ABC_UnpackSprite","h2",j%,50,44 8110PROCnoise("Timer",3,&17F,&1000,&100) 8120sec%-=1 8130COLOUR 131 8140IFsec%<10 COLOUR 11 ELSECOLOUR 10 8150PRINTTAB(10,29)sec%SPC(1) 8160TIME=0 8170IFsec%>0:ENDPROC 8180suc%=FALSE 8190IFply%=1 THEN 8200ovr%=TRUE 8210ELSE 8220sec%=san% 8230bon%=10*grd% 8240COLOUR 10 8250PRINTTAB(10,29)sec% 8260PROCupdate 8270PROCgrabmouse 8280ENDIF 8290ENDPROC 8300DEFPROCintro 8310MOUSE OFF 8320SYS"ABC_Blank",5 8330SYS"ABC_Colour",5 8340SYS"ABC_UnpackPlace","intro"+STR$(gme%),z%,252,198 8350IFfor% PROCtitle("LE FLIC",110,0) ELSEPROCtitle("THE COP",110,0) 8360TIME=0 8370SYS"ABC_Palette" 8380ser%=FALSE 8390REPEAT 8400IFgrd%>1 AND INKEY-99:PROCstart 8410UNTIL TIME>200 8420ENDPROC 8430DEFPROCenterhighscores 8440Q%=ryt%/(ryt%+ron%)*100 8450PROChighest 8460ENDPROC 8470DEFPROCanyprogress 8480IFply%>1 OR attend$="":ENDPROC 8490Q%=ryt%/(ryt%+ron%)*100 8500PROCupgrade 8510ENDPROC 8520DEFPROCcongr 8530IFNOTfin% OR NOTsuc%:ENDPROC 8540PROCupdate 8550MOUSE OFF 8560PROCdelay(50) 8570SYS"ABC_UnpackPlace","hint",z%,160,132 8580a$="Tr�s bien" 8590xsc%=320-LEN(a$)*8 8600SYS"ABC_PryntString",a$,xsc%,120,1,7 8610SYS"ABC_PryntString",a$,xsc%-2,121,1,0 8620FORJ%=1TO5 8630PROCnoise("Synsmajs",4,&17F,&1800,&100) 8640PROCdelay(5) 8650NEXT 8660PROCdelay(100) 8670PROCmouse2 8680ENDPROC 8690DEFPROCassemble 8700DIM gna% &A0 8710SYS"ABC_VideoAddress" TO vid% 8720link=14 8730pc =15 8740FORA%=0TO2STEP2 8750P%=gna% 8760[OPTA% 8770.SCROLL 8780LDR R12,[R9]:LDR R12,[R12]:MOV R11,#&4 8790.delay 8800MOV R0,#19:SWI "XOS_Byte":SUBS R11,R11,#&1:BNE delay 8810LDR R9,screen:ADD R0,R12,R12,LSL#2 8820ADD R12,R9,#&10:ADD R11,R12,R0,LSL#6 8830MOV R10,#164 8840.shift 8850LDMIA R11!,{R1-R8}:STMIA R12!,{R1-R8} 8860LDMIA R11!,{R1-R8}:STMIA R12!,{R1-R8} 8870ADD R11,R11,#&100:ADD R12,R12,#&100:SUBS R10,R10,#&1 8880BNE shift 8890ADD R12,R9,#&70 8900ADD R12,R12,#&E400 8910SUB R11,R12,R0,LSL#6 8920MOV R10,#172 8930.moves 8940CMP R11,R9 8950MOVLT pc,link 8960LDMIA R11!,{R1-R8}:STMIA R12!,{R1-R8} 8970LDMIA R11!,{R1-R8}:STMIA R12!,{R1-R8} 8980SUB R11,R11,#&180:SUB R12,R12,#&180 8990SUBS R10,R10,#&1:BNE moves:MOV pc,link 9000.screen 9010EQUD vid% 9020] 9030NEXT 9040ENDPROC 9050DEFPROCgrabmouse 9060cur%+=1 9070IFcur%>ply%:cur%=1 9080PROCflush 9090PROCwhich 9100PROCsame(name$(cur%)) 9110ENDPROC 9120DEFPROCsame(t$) 9130MOUSE OFF 9140VDU 7 9150SYS"ABC_Transfer",256,168,128,78 9160SYS"ABC_UnpackSprite","mouse",j%,256,168 9170xsc%=322-LEN(t$)*8 9180SYS"ABC_PryntString",t$,xsc%,120,1,7 9190SYS"ABC_PryntString",t$,xsc%-2,121,1,8 9200REPEAT 9210MOUSE mox%,moy%,but% 9220UNTIL but%>0 9230SYS"ABC_Restore" 9240PROCzeromouse 9250PROCmouse2 9260TIME=0 9270ENDPROC 9280DEFPROCexhaust 9290MOUSE OFF 9300SYS"ABC_Blank",221,0,0 9310SYS"ABC_Colour",11 9320IFfor% y$="Vous avez manqu� de temps" ELSEy$="You ran out of time" 9330xsc%=320-LEN(y$)*12 9340SYS"ABC_PryntString",y$,xsc%,168,2,7 9350SYS"ABC_PryntString",y$,xsc%-2,169,2,0 9360SYS"ABC_Palette" 9370PROCdelay(150) 9380ENDPROC 9390DEFPROCsprites 9400FORJ%=1TO3 9410SYS"ABC_UnpackSprite","z"+STR$(J%),z%,40,J%*64+18 9420SYS"ABC_UnpackSprite","z"+STR$(J%),z%,480,J%*64+18 9430NEXT 9440ENDPROC 9450DEFFNspace(a$,t$) 9460WHILE INSTR(a$,t$)>0 9470MID$(a$,INSTR(a$,t$))=" " 9480ENDWHILE 9490=a$ 9500DEFPROCfract(a$) 9510spt$()="" 9520J%=1 9530WHILE INSTR(a$," ")>0 9540prt$(J%)=" "+LEFT$(a$,INSTR(a$," ")-1) 9550a$=MID$(a$,INSTR(a$," ")+1) 9560J%+=1 9570ENDWHILE 9580prt$(J%)=" "+a$ 9590L%=1 9600FORK%=1TO J% 9610IFLEN(spt$(L%)+prt$(K%))<39 THEN 9620IFspt$(L%)="" spt$(L%)=prt$(K%) ELSEspt$(L%)+=prt$(K%) 9630ELSE 9640L%+=1 9650spt$(L%)=prt$(K%) 9660ENDIF 9670NEXT 9680FORJ%=1TO3 9690WHILE LEFT$(spt$(J%),1)=" " 9700spt$(J%)=MID$(spt$(J%),2) 9710ENDWHILE 9720NEXT 9730IFspt$(4)="" THEN 9740FORJ%=3TO0STEPTRUE 9750spt$(J%+1)=spt$(J%) 9760NEXT 9770ENDIF 9780ENDPROC 9790DEFFNchooseanother 9800REPEAT 9810X%=RND(1500) 9820UNTILwrd$(grd%,X%)>""AND X%<>pre% 9830=wrd$(grd%,X%)
"� ><Disc1$Dir>.SixGames.TheCop �:�=17 �trap:�T|@ ��error ��<>12:�12:� ( �assemble 2�initial < �menu F� P�mouseilluminate Z �sound d �practice n�instructions x� � � ��initial �m� lft%(7),lefy%(7),rgt%(7),rigy%(7),left$(7),rigt$(7),dis$(2),nme$(16),seq$(16),ing%(16),spt$(4),prt$(32) � @% =0 �bit%=10 � blt%=1 � gme%=1 �&e$ ="<Disc1$Dir>.Francais.TheCop" � f$ ="<Disc1$Dir>.SixGames." �ț f$+"Common" �&j% =�initialcompressed("Numbers") �$z% =�initialcompressed("Game1") ��loaddetails ��sortscores �loadwords �limit � �DhA " �data ,ș"Hourglass_Smash" 6�point("Ten",1) @�point("Hand1",2) J�point("Hand2",3) T �flush ^� h7� fruit/veg,drinks and baker's,delicatessan,general r5� in grocer's,in grocer's,in delicatessan,general |E� food shopping,restaurant/cafe,clothes shopping,present shopping �k� "avoir, �tre present tense",regular 'er' verb aimer,vouloirs,regular 're' 'ir' verbs vendre and finir �;� food/dishes,shops and services,food items,restaurants ��� apologising and excuses,"complaints, problems and disapproval","likes, dislikes, voicing anger and exasperation","inviting, refusing and forbidding" ���mouse2 �ȗ � 1,0,0,0 �ȗ � 2,192,96,128 �ȗ � 3,192,96,128 � ȗ � 2 �� ���mouse3 �ȗ � 1,0,0,0 �ȗ � 2,192,96,128 �ȗ � 3,192,96,128 ȗ � 3 � ��mouseilluminate &ȗ mox%,moy%,but% 0box%=(moy%-164)>>6 :�box%>9:box%=9 DN�box%<>sun%:Ȗ:�sqr(sun%,11):�sqr(box%,15):�int(sun%):�int(box%):sun%=box% N �longmenu X �but%=0:� b� 7 l upd%=� v sun%=0 � Ȏ box% � � � 0:�quit �� 1:�information �� 2:�volume �� 3:�grade �� 4 �bit%+=10 ��bit%=60:bit%=10 � upd%=� �� 5 �san%+=20 ��san%=220:san%=0 � upd%=� � 6 blt%+=1 �blt%>4:blt%=1 upd%=� *� 7:�players 4� 8:�highscore > H �intro R�numbername \ �playgame f� p�menuclean z� ���int(int%) �� 5 � � 0,0 � Ȏ int% � �� 2:�insert(11,�(M%>>4)) �G� 3:�sub%=0 �insert(13,�(grd%)) ��insert(13,�(grd%)+"/"+�(sub%+64)) �� 4:�insert(15,�(bit%)) �� 5 � �san%=0 � �1�for% �insert(17,"ETEINT") ��insert(17,"OFF") � tim%=� �� ��insert(17,�(san%)) tim%=� � � 6:�insert(19,�(blt%)) $� 7:�insert(21,�(ply%)) .� 8� 4 B� L� V ��menu `ș"ABC_Blank",15 jș"ABC_Colour",15 t�foreign ~�for% � �$�card("LE FLIC MENU",24,10,2,10) � � �TTE �� �$�card("THE COP MENU",24,10,2,10) � � �T@E �� � �fillmenu ��sprites �ȗ ȓ 704,164,158,642 �ș"ABC_Palette" ��mouse1 �� B� Play The Cop,High score table,Number of players,Target speed ;� Timer,Questions,,Volume,Information,Exit to Main Menu S� Jouer au Flic,"Grille des r�sultats �lev�s",Nombre de joueurs,Vitesse choisie E� Minuteur,Questions,,Volume,Information,Retour au menu principal (��playgame 2�initialgame <�grabmouse F� P�doword Z� d� n�reveal(13,14,2) x �pause � �mouse � �sound � �timer � �gener ��movebelts �� but%>0 � ovr% ��ovr% � ��mouse3 � �match ��scores ��suc% � ply%>1:�grabmouse �� �� fin% � ovr% � ovr% �tim% � �sec%>0 � "�delay(150) ,�enterhighscores 6�report @� J�exhaust T� ^� h�delay(150) r�enterhighscores |�report �� �� ���mouse �ȗ mox%,moy%,but% ��but%=0:let%=�:�mouse2:� ��let%=�:let%=�:� � but%=0 �� ���initialgame �ș"ABC_Blank",4 �ș"ABC_Colour",4 ��foreign ��scansub �variables �which �scores &�update 0ș"ABC_Palette" :ȗ ȓ 0,256,1280,768 D� N ��scansub X�grd%=1 � sub%=0:� b amt%=0 l�J%=1�1500 v�knd%(grd%,J%)=sub%:amt%+=1 �� ��amt%<2:sub%=0 �� ���variables � ani%=0 �bon%=10*grd% � gap%=1 � hrt%=� � let%=� � mor%=3 � ovr%=� � pre%=� � ryt%=0 ron%=0 sec%=san% sht%=bit% spd%=blt%*2 * suc%=� 4 try%=0 >scr%()=0 H lft%()=-2 R lefy%()=0 \ rgt%()=-2 f rigy%()=0 p�rec(14,13,0,0,1278,256) z'ș"ABC_UnpackPlace","t4",z%,252,248 �%ș"ABC_UnpackPlace","b1",z%,0,242 �'ș"ABC_UnpackPlace","b2",z%,608,242 �)ș"ABC_UnpackPlace","hint",z%,160,132 � � 0,5 �ȓȐ 36,40,200,192 �ȓȐ 248,40,278,192 � � 0,3 �ȓȐ 28,32,200,192 �ȓȐ 240,32,278,192 �%ș"ABC_UnpackPlace","h1",j%,50,44 �� 0 � � 131 �-�for% �2,29)"Temps:"; ��3,29)"Time : "; �tim% � � 10 �sec% $� .� 9 8�for% �"Eteint" ��"Off" B� L� 5 V�X%=1� ply% ` � 0,11 j#ȓȐ 444+X%*96,240-X%*52,324,40 t � 0,9 ~#ȓȐ 440+X%*96,236-X%*52,320,36 � � 0,8 �� 456+X%*96,268-X%*52 ��name$(X%) �� ��for% � �TrJ �� �ThJ � � 0,11 ��J%=1�4 �� a$ �� 252,240-J%*40 ��J%=2:a$=�foreignlevel(�) ��a$ �� � 4 � �ply%>1 cur%=�(ply%) �cur%=1 � (� Hits,,Questions,Bonus 2&� "Coups r�ussis",,Questions,Bonus <��which F � 0,8 PȖ ZȓȐ 1180,20,32,216 d � 0,0 nȓ 1180,20,32,216 x � 0,9 �� 1188,248-cur%*52 �� 0,16,-16 � � 81,0,32 �� ���update � � 0,3 �� 5 �Ȗ �ȓȐ 468,32,44,192 � � 0,14 � � 468,200 � �ryt% � � 468,160 �grd%; �sub%>0:�"/"�(sub%+64) � 468,120 " �sht% ,� 468,80 6 �bon% @� 4 J� T� ^��scores h� 5 r�X%=1� ply% | � 0,4 �Ȗ �#ȓȐ 600+X%*96,236-X%*52,160,36 � � 0,7 �� 616+X%*96,268-X%*52 � �scr%(X%) �� �� 4 �� �� ���gener �gap%-=spd% � �gap%>0:� �gap%=40 S%=1 'ȕ S%<7 � lft%(S%)>-2 � rgt%(S%)>-2 S%+=1 &� 0�S%=7:� :(ș"ABC_UnpackPlace","tar1",z%,32,130 D)ș"ABC_UnpackPlace","tar2",z%,480,242 Nmor%-=1 X �mor%=0 � b act%=� lmor%=�(3)+1 v� � act%=� �� � Ȏ grd% � � � 1:�gen1 � � 2:�gen2 � � 3:�gen3 � � 4:�gen4 � � 5:�gen5 �:�gen6 �� �lft%(S%)=0 �rgt%(S%)=0 �lefy%(S%)=130 rigy%(S%)=242 � ��gen1 �act% � *J%=�(8) 4left$(S%)=seq$(1) >a$=nme$(1) Hrigt$(S%)=seq$(J%) Rb$=nme$(J%) \ �>0 � fȔ left$(S%),rigt$(S%) pȔ a$,b$ z� �� �J%=�(8) �left$(S%)=seq$(J%) �a$=nme$(J%) �J%=�(8) �rigt$(S%)=seq$(J%) �b$=nme$(J%) �� �%ș"ABC_UnpackSprite",a$,z%,44,129 �&ș"ABC_UnpackSprite",b$,z%,500,241 �� � ��gen2 ��act% � left$(S%)=seq$(1) rigt$(S%)=seq$(�(16)) �>0:Ȕ left$(S%),rigt$(S%) $� .left$(S%)=seq$(�(16)) 8rigt$(S%)=seq$(�(16)) B� L;ș"ABC_PryntString",left$(S%),90-�(left$(S%))*4,114,0,0 V<ș"ABC_PryntString",rigt$(S%),550-�(rigt$(S%))*4,228,0,0 `� j ��gen3 t�act% � ~left$(S%)=seq$(seq%) �rigt$(S%)=seq$(�(16)) ��>0:Ȕ left$(S%),rigt$(S%) �� �left$(S%)=seq$(�(16)) �rigt$(S%)=seq$(�(16)) �� �a$=left$(S%) �b$=rigt$(S%) �-ș"ABC_PryntString",a$,90-�(a$)*4,114,0,0 �.ș"ABC_PryntString",b$,550-�(b$)*4,228,0,0 �� � ��gen4 �act% � left$(S%)=seq$(1) rigt$(S%)=seq$(�(16)) �>0:Ȕ left$(S%),rigt$(S%) (� 2left$(S%)=seq$(�(16)) <rigt$(S%)=seq$(�(16)) F� P;ș"ABC_PryntString",left$(S%),90-�(left$(S%))*4,114,0,0 Z<ș"ABC_PryntString",rigt$(S%),550-�(rigt$(S%))*4,228,0,0 d� n ��gen5 x�act% � try%>1 � �left$(S%)=seq$(1) �4�try%>1 rigt$(S%)=seq$(1) �rigt$(S%)=seq$(�(16)) ��>0:Ȕ left$(S%),rigt$(S%) �� �left$(S%)=seq$(�(16)) �rigt$(S%)=seq$(�(16)) �� ��splitup(left$(S%)) ��J%=1�3 �>ș"ABC_PryntString",spt$(J%),90-�(spt$(J%))*4,130-J%*8,0,0 �� ��splitup(rigt$(S%)) ��J%=1�3 ?ș"ABC_PryntString",spt$(J%),550-�(spt$(J%))*4,244-J%*8,0,0 � � " ��gen6 ,�act% � 6left$(S%)=seq$(1) @rigt$(S%)=seq$(�(16)) J�>0:Ȕ left$(S%),rigt$(S%) T� ^left$(S%)=seq$(�(16)) hrigt$(S%)=seq$(�(16)) r� |a$=left$(S%) �b$=rigt$(S%) �-ș"ABC_PryntString",a$,90-�(a$)*4,114,0,0 �.ș"ABC_PryntString",b$,550-�(b$)*4,228,0,0 �� ���movebelts �� SCROLL, spd% ��S%=1�6 ��lft%(S%)>-2 � �lefy%(S%)+=spd% �*�lefy%(S%)>294:lefy%(S%)=0:lft%(S%)=-2 �� �lefy%(S%)=0 �� �rgt%(S%)>-2 � rigy%(S%)-=spd% )�rigy%(S%)<26:rigy%(S%)=0:rgt%(S%)=-2 &� 0rigy%(S%)=0 :� D� N� X��match bmox%=mox%>>1 lmoy%=moy%>>2 v suc%=� �S%=1 �ȕ S%<7 � �suc% ��lft%(S%)>-2:�left ��rgt%(S%)>-2:�rigt � S%+=1 �� � �flush ��fin% � suc% � ��sht%>0 � �ser%:sht%-=1 ��sht%=0:ovr%=� �� ��suc% � � try%=0 'ș"ABC_UnpackPlace","t2",z%,252,248 $�noise("Ping",2,&17F,&4800,&100) �congr �ser%:ryt%+=1 **�ser%:scr%(cur%)+=10*grd%+bon%+blt%*5 4"�tim%:scr%(cur%)+=(200-san%)�8 >bon%=10*grd% H-�fin%:ș"ABC_UnpackPlace","t4",z%,252,248 R� \#�noise("Burp",2,&17F,&1100,&10) f'ș"ABC_UnpackPlace","t3",z%,252,248 pron%+=1 z�sht%>0 � �ser%:sht%-=1 ��sht%=0:ovr%=� �try%+=1 ��try%=2 � �ovr%:�hint ��fin% � grd%=6:�delay(100) �� ��update ��=0 �� � ��left �-笤area(144,lefy%(S%)-34,160,lefy%(S%)):� �2�grd%=3 �ans3(left$(S%)) ��ans12456(left$(S%)) ��suc%:� � � 0,4 #ȓȐ 64,lefy%(S%)*4-152,254,152 lft%(S%)=-2 � $ ��rigt .-笤area(480,rigy%(S%)-34,496,rigy%(S%)):� 82�grd%=3 �ans3(rigt$(S%)) ��ans12456(rigt$(S%)) B�suc%:� L � 0,4 V\�rigy%(S%)*4-152>256 ȓȐ 960,rigy%(S%)*4-152,254,152 �ȓȐ 960,260,254,(rigy%(S%)-65)*4 `rgt%(S%)=-2 j� t ��hint ~ Ȏ grd% � �� 1:�hint1 �� 2:�hint2 �� 3:�hint3 �� 5:�hint5 �� 4:�hint4 �:�hint6 �� �� ���hint1 �)ș"ABC_UnpackPlace","hint",z%,160,132 �+ș"ABC_UnpackSprite",nme$(1),z%,272,126 �a$=�alias(ing%(1)) xsc%=320-�(a$)*8 'ș"ABC_PryntString",a$,xsc%,103,1,7 )ș"ABC_PryntString",a$,xsc%-2,104,1,0 � (��hint2 2)ș"ABC_UnpackPlace","hint",z%,160,132 <a$=seq$(0) Fxsc%=320-�(a$)*8 P'ș"ABC_PryntString",a$,xsc%,123,1,7 Z)ș"ABC_PryntString",a$,xsc%-2,124,1,0 da$=seq$(1) nxsc%=320-�(a$)*8 x'ș"ABC_PryntString",a$,xsc%,103,1,7 �)ș"ABC_PryntString",a$,xsc%-2,104,1,0 �� ���hint3 ��two% � �"�dis$(1),seq$(seq%),psa%)>0 � �a$=dis$(1) �xxx%=�a$,seq$(seq%),psa%) �a$=�a$,xxx%,�(seq$(seq%))) �<ș"ABC_PryntString",a$,320-�(dis$(1))*4+xxx%*8-8,105,0,7 �� �a$=dis$(2) �xxx%=�a$,seq$(seq%),psb%) �a$=�a$,xxx%,�(seq$(seq%))) ;ș"ABC_PryntString",a$,320-�(dis$(2))*4+xxx%*8-8,98,0,7 � � "a$=dis$(1) ,xxx%=�a$,seq$(seq%),psa%) 6a$=�a$,xxx%,�(seq$(seq%))) @<ș"ABC_PryntString",a$,320-�(dis$(1))*4+xxx%*8-8,105,0,7 J� T�(j$)>38 � ^ J%=38 hȕ �j$,J%,1)<>" " r J%-=1 |� �a$=�j$,J%-1) �b$=�j$,J%+1) �xsc%=320-�(a$)*4 �&ș"ABC_PryntString",a$,xsc%,87,0,7 �'ș"ABC_PryntString",a$,xsc%,88,0,11 �xsc%=320-�(b$)*4 �&ș"ABC_PryntString",b$,xsc%,79,0,7 �'ș"ABC_PryntString",b$,xsc%,80,0,11 �� �xsc%=320-�(j$)*4 �&ș"ABC_PryntString",j$,xsc%,87,0,7 �'ș"ABC_PryntString",j$,xsc%,88,0,11 �� � ��hint4 �dis$(1),"_")>0 � &xxx%=�dis$(1),"_") 0a$=seq$(1) : xsc%=306-�(dis$(1))*4+xxx%*8 D�two% ysc%=123 �ysc%=115 N(ș"ABC_PryntString",a$,xsc%,ysc%,0,7 X-ș"ABC_PryntString",a$,xsc%-2,ysc%+1,0,10 b� lxxx%=�dis$(2),"_") va$=seq$(1) � xsc%=306-�(dis$(2))*4+xxx%*8 �'ș"ABC_PryntString",a$,xsc%,115,0,7 �*ș"ABC_PryntString",a$,xsc%-2,116,0,10 �� ��(j$)>38 � � J%=38 �ȕ �j$,J%,1)<>" " � J%-=1 �� �a$=�j$,J%-1) �b$=�j$,J%+1) �xsc%=320-�(a$)*4 �&ș"ABC_PryntString",a$,xsc%,95,0,7 'ș"ABC_PryntString",a$,xsc%,96,0,11 xsc%=320-�(b$)*4 &ș"ABC_PryntString",b$,xsc%,87,0,7 'ș"ABC_PryntString",b$,xsc%,88,0,11 *� 4xsc%=320-�(j$)*4 >&ș"ABC_PryntString",j$,xsc%,95,0,7 H'ș"ABC_PryntString",j$,xsc%,96,0,11 R� \� f��hint5 p�fract(j$) z�J%=1�4 �xsc%=320-�(spt$(J%))*4 �2ș"ABC_PryntString",spt$(J%),xsc%,106-J%*8,0,7 �5ș"ABC_PryntString",spt$(J%),xsc%-2,107-J%*8,0,10 �� �� ���hint6 ��dis$(1),"_")>0 � �xxx%=�dis$(1),"_") �a$=seq$(1) �"xsc%=304-�(dis$(1))*4+xxx%*8+8 ��two% ysc%=123 �ysc%=115 �(ș"ABC_PryntString",a$,xsc%,ysc%,0,7 �-ș"ABC_PryntString",a$,xsc%-2,ysc%+1,0,10 � xxx%=�dis$(2),"_") a$=seq$(1) $"xsc%=304-�(dis$(2))*4+xxx%*8+8 .'ș"ABC_PryntString",a$,xsc%,115,0,7 8*ș"ABC_PryntString",a$,xsc%-2,116,0,10 B� L�(j$)>38 � V J%=38 `ȕ �j$,J%,1)<>" " j J%-=1 t� ~a$=�j$,J%-1) �b$=�j$,J%+1) �xsc%=320-�(a$)*4 �&ș"ABC_PryntString",a$,xsc%,95,0,7 �'ș"ABC_PryntString",a$,xsc%,96,0,11 �xsc%=320-�(b$)*4 �&ș"ABC_PryntString",b$,xsc%,87,0,7 �'ș"ABC_PryntString",b$,xsc%,88,0,11 �� �xsc%=320-�(j$)*4 �&ș"ABC_PryntString",j$,xsc%,95,0,7 �'ș"ABC_PryntString",j$,xsc%,96,0,11 �� � ��ans12456(h$) �h$=seq$(1) � suc%=� ( fin%=� 2� <� F��ans3(h$) P�seq$(seq%)<>h$:� Z suc%=� d�seq%=beg%:fin%=� na$=dis$(1) x�two% � ��a$,seq$(seq%),psa%)>0 � �+psa%=�a$,seq$(seq%),psa%)+�(seq$(seq%)) �a$=�a$,psa%-1) �xsc%=320-�(dis$(1))*4 �Ȗ �'ș"ABC_PryntString",a$,xsc%,105,0,7 �)ș"ABC_PryntString",a$,xsc%-2,106,0,9 �� �a$=dis$(2) �+psb%=�a$,seq$(seq%),psb%)+�(seq$(seq%)) �a$=�a$,psb%-1) �xsc%=320-�(dis$(2))*4 �Ȗ &ș"ABC_PryntString",a$,xsc%,97,0,7 (ș"ABC_PryntString",a$,xsc%-2,98,0,9 � "� ,+psa%=�a$,seq$(seq%),psa%)+�(seq$(seq%)) 6a$=�a$,psa%-1) @xsc%=320-�(dis$(1))*4 JȖ T'ș"ABC_PryntString",a$,xsc%,105,0,7 ^)ș"ABC_PryntString",a$,xsc%-2,106,0,9 h� rseq%+=1 |� ���doword � fin%=� � seq$()="" �)ș"ABC_UnpackPlace","hint",z%,160,132 � Ȏ grd% � �� 1:�one �� 2:�two �� 3:�three � � 4:�four � � 5:�five � :�six �� �� ��one � �sub%=0 � &�J%=1�8 0� :� DK%=�(128)-1 N� z%!(K%<<4)>0 X� �subnum(K%)>0 bseq$(J%)=�alias(K%) lnme$(J%)=�name(K%) ving%(J%)=K% �� �� ��J%=1�8 �� �� �K%=�(128)-1 �� z%!(K%<<4)>0 �� �subnum(K%)=sub% �seq$(J%)=�alias(K%) �nme$(J%)=�name(K%) �ing%(J%)=K% �� �� a$=�alias(ing%(1)) ��(a$)<21 xsc%=320-�(a$)*8 Ȗ *'ș"ABC_PryntString",a$,xsc%,115,1,7 4)ș"ABC_PryntString",a$,xsc%-2,116,1,0 >� H ��six R� \ tru%=� f seq$()="" p� za$=�choose �cnt%=�count(a$,"/") �)� cnt%>2 � cnt%<17 � �count(a$,"*")=1 �j$=�a$,�a$,"*")+1) �a$=�a$,�a$,"*")-1) ��pos%=0� cnt% �seq$(pos%)=�excise(a$,"/") �0�pos%>0 � seq$(pos%)<>�seq$(pos%),12):tru%=� �� �!�count(seq$(0),"_")=0:tru%=� � � tru% �pre%=X% �amt%=pos%-2 �ȕ pos%<17 seq$(pos%)=seq$(�(amt%)+1) pos%+=1 � $a$=seq$(0) .�(a$)>38 � 8 two%=� Bspl%=�(a$)�2 L ȕ �a$,spl%,1)<>" " � spl%>0 Vspl%-=1 `� jdis$(1)=�a$,spl%-1) tdis$(2)=�a$,spl%+1) ~xsc%=320-�(dis$(1))*4 �Ȗ �,ș"ABC_PryntString",dis$(1),xsc%,123,0,7 �.ș"ABC_PryntString",dis$(1),xsc%-2,124,0,0 �xsc%=320-�(dis$(2))*4 �Ȗ �,ș"ABC_PryntString",dis$(2),xsc%,115,0,7 �.ș"ABC_PryntString",dis$(2),xsc%-2,116,0,0 �� � two%=� �dis$(1)=a$ �xsc%=320-�(dis$(1))*4 �Ȗ ,ș"ABC_PryntString",dis$(1),xsc%,115,0,7 .ș"ABC_PryntString",dis$(1),xsc%-2,116,0,0 � �(seq$(0))>38 � (spl%=�(seq$(0))�2 2%ȕ �seq$(0),spl%,1)<>" " � spl%>0 <spl%-=1 F� Pdis$(1)=�seq$(0),spl%-1) Zdis$(2)=�seq$(0),spl%+1) d� ndis$(1)=seq$(0) xdis$(2)="" �� �� �ݤtidyup(a$) �ȕ �a$,"/")>0 ��a$,�a$,"/"),1)=" " �� � � �TN_ � �tid%=1�5 �� x$,y$ �ȕ �a$,x$)>0 �+a$=�a$,�a$,x$)-1)+y$+�a$,�a$,x$)+�(x$)) �� �� =a$ � " - ",- � " -",- "� "- ",- ,� " ?",? 6� " !",! @��timer J�<100:� T�ser%:bon%-=grd% ^�bon%<0:bon%=0 h�update rani%=ani% �&1 |.ș"ABC_UnpackPlace","t"+�(ani%),z%,252,248 �hrt%=�hrt% ��=0 ��tim%:� �O�hrt% ș"ABC_UnpackPlace","h1",j%,50,44 �ș"ABC_UnpackSprite","h2",j%,50,44 �%�noise("Timer",3,&17F,&1000,&100) �sec%-=1 � � 131 ��sec%<10 � 11 �� 10 ��10,29)sec%�(1) ��=0 � �sec%>0:� � suc%=� � �ply%=1 � ovr%=� � sec%=san% &bon%=10*grd% 0� 10 :�10,29)sec% D�update N�grabmouse X� b� l��intro vȗ � �ș"ABC_Blank",5 �ș"ABC_Colour",5 �2ș"ABC_UnpackPlace","intro"+�(gme%),z%,252,198 �:�for% �title("LE FLIC",110,0) ��title("THE COP",110,0) ��=0 �ș"ABC_Palette" � ser%=� �� ��grd%>1 � �-99:�start �� �>200 �� ���enterhighscores �Q%=ryt%/(ryt%+ron%)*100 !�highest !� !��anyprogress ! �ply%>1 � attend$="":� !*Q%=ryt%/(ryt%+ron%)*100 !4�upgrade !>� !H��congr !R�fin% � �suc%:� !\�update !fȗ � !p�delay(50) !z)ș"ABC_UnpackPlace","hint",z%,160,132 !�a$="Tr�s bien" !�xsc%=320-�(a$)*8 !�'ș"ABC_PryntString",a$,xsc%,120,1,7 !�)ș"ABC_PryntString",a$,xsc%-2,121,1,0 !��J%=1�5 !�(�noise("Synsmajs",4,&17F,&1800,&100) !� �delay(5) !�� !��delay(100) !��mouse2 !�� !���assemble !�� gna% &A0 "ș"ABC_VideoAddress" � vid% "link=14 "pc =15 "$ �A%=0�2�2 ".P%=gna% "8 [OPTA% "B.SCROLL "L3LDR R12,[R9]:LDR R12,[R12]:MOV R11,#&4 "V .delay "`CMOV R0,#19:SWI "XOS_Byte":SUBS R11,R11,#&1:BNE delay "j,LDR R9,screen:ADD R0,R12,R12,LSL#2 "t.ADD R12,R9,#&10:ADD R11,R12,R0,LSL#6 "~MOV R10,#164 "� .shift "�+LDMIA R11!,{R1-R8}:STMIA R12!,{R1-R8} "�+LDMIA R11!,{R1-R8}:STMIA R12!,{R1-R8} "�@ADD R11,R11,#&100:ADD R12,R12,#&100:SUBS R10,R10,#&1 "�BNE shift "�ADD R12,R9,#&70 "�ADD R12,R12,#&E400 "�SUB R11,R12,R0,LSL#6 "�MOV R10,#172 "� .moves "�CMP R11,R9 "�MOVLT pc,link # +LDMIA R11!,{R1-R8}:STMIA R12!,{R1-R8} # +LDMIA R11!,{R1-R8}:STMIA R12!,{R1-R8} #-SUB R11,R11,#&180:SUB R12,R12,#&180 #2SUBS R10,R10,#&1:BNE moves:MOV pc,link #(.screen #2 EQUD vid% #<] #F� #P� #Z��grabmouse #dcur%+=1 #n�cur%>ply%:cur%=1 #x �flush #� �which #��same(name$(cur%)) #�� #���same(t$) #�ȗ � #�� 7 #�#ș"ABC_Transfer",256,168,128,78 #�+ș"ABC_UnpackSprite","mouse",j%,256,168 #�xsc%=322-�(t$)*8 #�'ș"ABC_PryntString",t$,xsc%,120,1,7 #�)ș"ABC_PryntString",t$,xsc%-2,121,1,8 #�� #�ȗ mox%,moy%,but% $� but%>0 $ș"ABC_Restore" $�zeromouse $"�mouse2 $,�=0 $6� $@ ��exhaust $Jȗ � $Tș"ABC_Blank",221,0,0 $^ș"ABC_Colour",11 $hB�for% y$="Vous avez manqu� de temps" �y$="You ran out of time" $rxsc%=320-�(y$)*12 $|'ș"ABC_PryntString",y$,xsc%,168,2,7 $�)ș"ABC_PryntString",y$,xsc%-2,169,2,0 $�ș"ABC_Palette" $��delay(150) $�� $� ��sprites $��J%=1�3 $�1ș"ABC_UnpackSprite","z"+�(J%),z%,40,J%*64+18 $�2ș"ABC_UnpackSprite","z"+�(J%),z%,480,J%*64+18 $�� $�� $�ݤspace(a$,t$) $�ȕ �a$,t$)>0 $��a$,�a$,t$))=" " %� %=a$ %��fract(a$) %& spt$()="" %0J%=1 %:ȕ �a$," ")>0 %D prt$(J%)=" "+�a$,�a$," ")-1) %Na$=�a$,�a$," ")+1) %X J%+=1 %b� %lprt$(J%)=" "+a$ %vL%=1 %� �K%=1� J% %��(spt$(L%)+prt$(K%))<39 � %�6�spt$(L%)="" spt$(L%)=prt$(K%) �spt$(L%)+=prt$(K%) %�� %� L%+=1 %�spt$(L%)=prt$(K%) %�� %�� %��J%=1�3 %�ȕ �spt$(J%),1)=" " %�spt$(J%)=�spt$(J%),2) %�� %�� &�spt$(4)="" � & �J%=3�0�� &spt$(J%+1)=spt$(J%) & � &*� &4� &>ݤchooseanother &H� &RX%=�(1500) &\�wrd$(grd%,X%)>""� X%<>pre% &f=wrd$(grd%,X%) �
00000000 0d 00 0a 22 f4 20 3e 3c 44 69 73 63 31 24 44 69 |...". ><Disc1$Di| 00000010 72 3e 2e 53 69 78 47 61 6d 65 73 2e 54 68 65 43 |r>.SixGames.TheC| 00000020 6f 70 0d 00 14 20 ee 85 3a e7 9f 3d 31 37 20 f2 |op... ..:..=17 .| 00000030 74 72 61 70 3a e5 8d 54 7c 40 20 8b f2 65 72 72 |trap:..T|@ ..err| 00000040 6f 72 0d 00 1e 10 e7 eb 3c 3e 31 32 3a eb 31 32 |or......<>12:.12| 00000050 3a 87 0d 00 28 0d f2 61 73 73 65 6d 62 6c 65 0d |:...(..assemble.| 00000060 00 32 0c f2 69 6e 69 74 69 61 6c 0d 00 3c 09 f2 |.2..initial..<..| 00000070 6d 65 6e 75 0d 00 46 05 f5 0d 00 50 14 f2 6d 6f |menu..F....P..mo| 00000080 75 73 65 69 6c 6c 75 6d 69 6e 61 74 65 0d 00 5a |useilluminate..Z| 00000090 0a f2 73 6f 75 6e 64 0d 00 64 0d f2 70 72 61 63 |..sound..d..prac| 000000a0 74 69 63 65 0d 00 6e 11 f2 69 6e 73 74 72 75 63 |tice..n..instruc| 000000b0 74 69 6f 6e 73 0d 00 78 07 fd 20 a3 0d 00 82 0d |tions..x.. .....| 000000c0 dd f2 69 6e 69 74 69 61 6c 0d 00 8c 6d de 20 6c |..initial...m. l| 000000d0 66 74 25 28 37 29 2c 6c 65 66 79 25 28 37 29 2c |ft%(7),lefy%(7),| 000000e0 72 67 74 25 28 37 29 2c 72 69 67 79 25 28 37 29 |rgt%(7),rigy%(7)| 000000f0 2c 6c 65 66 74 24 28 37 29 2c 72 69 67 74 24 28 |,left$(7),rigt$(| 00000100 37 29 2c 64 69 73 24 28 32 29 2c 6e 6d 65 24 28 |7),dis$(2),nme$(| 00000110 31 36 29 2c 73 65 71 24 28 31 36 29 2c 69 6e 67 |16),seq$(16),ing| 00000120 25 28 31 36 29 2c 73 70 74 24 28 34 29 2c 70 72 |%(16),spt$(4),pr| 00000130 74 24 28 33 32 29 0d 00 96 0a 40 25 20 20 3d 30 |t$(32)....@% =0| 00000140 0d 00 a0 0b 62 69 74 25 3d 31 30 0d 00 aa 0a 62 |....bit%=10....b| 00000150 6c 74 25 3d 31 0d 00 b4 0a 67 6d 65 25 3d 31 0d |lt%=1....gme%=1.| 00000160 00 be 26 65 24 20 20 3d 22 3c 44 69 73 63 31 24 |..&e$ ="<Disc1$| 00000170 44 69 72 3e 2e 46 72 61 6e 63 61 69 73 2e 54 68 |Dir>.Francais.Th| 00000180 65 43 6f 70 22 0d 00 c8 20 66 24 20 20 3d 22 3c |eCop"... f$ ="<| 00000190 44 69 73 63 31 24 44 69 72 3e 2e 53 69 78 47 61 |Disc1$Dir>.SixGa| 000001a0 6d 65 73 2e 22 0d 00 d2 12 c8 9b 20 66 24 2b 22 |mes."...... f$+"| 000001b0 43 6f 6d 6d 6f 6e 22 0d 00 dc 26 6a 25 20 20 3d |Common"...&j% =| 000001c0 a4 69 6e 69 74 69 61 6c 63 6f 6d 70 72 65 73 73 |.initialcompress| 000001d0 65 64 28 22 4e 75 6d 62 65 72 73 22 29 0d 00 e6 |ed("Numbers")...| 000001e0 24 7a 25 20 20 3d a4 69 6e 69 74 69 61 6c 63 6f |$z% =.initialco| 000001f0 6d 70 72 65 73 73 65 64 28 22 47 61 6d 65 31 22 |mpressed("Game1"| 00000200 29 0d 00 f0 10 f2 6c 6f 61 64 64 65 74 61 69 6c |).....loaddetail| 00000210 73 0d 00 fa 0f f2 73 6f 72 74 73 63 6f 72 65 73 |s.....sortscores| 00000220 0d 01 04 0e f2 6c 6f 61 64 77 6f 72 64 73 0d 01 |.....loadwords..| 00000230 0e 0a f2 6c 69 6d 69 74 0d 01 18 0a f7 20 8d 44 |...limit..... .D| 00000240 68 41 0d 01 22 09 f2 64 61 74 61 0d 01 2c 17 c8 |hA.."..data..,..| 00000250 99 22 48 6f 75 72 67 6c 61 73 73 5f 53 6d 61 73 |."Hourglass_Smas| 00000260 68 22 0d 01 36 13 f2 70 6f 69 6e 74 28 22 54 65 |h"..6..point("Te| 00000270 6e 22 2c 31 29 0d 01 40 15 f2 70 6f 69 6e 74 28 |n",1)..@..point(| 00000280 22 48 61 6e 64 31 22 2c 32 29 0d 01 4a 15 f2 70 |"Hand1",2)..J..p| 00000290 6f 69 6e 74 28 22 48 61 6e 64 32 22 2c 33 29 0d |oint("Hand2",3).| 000002a0 01 54 0a f2 66 6c 75 73 68 0d 01 5e 05 e1 0d 01 |.T..flush..^....| 000002b0 68 37 dc 20 66 72 75 69 74 2f 76 65 67 2c 64 72 |h7. fruit/veg,dr| 000002c0 69 6e 6b 73 20 61 6e 64 20 62 61 6b 65 72 27 73 |inks and baker's| 000002d0 2c 64 65 6c 69 63 61 74 65 73 73 61 6e 2c 67 65 |,delicatessan,ge| 000002e0 6e 65 72 61 6c 0d 01 72 35 dc 20 69 6e 20 67 72 |neral..r5. in gr| 000002f0 6f 63 65 72 27 73 2c 69 6e 20 67 72 6f 63 65 72 |ocer's,in grocer| 00000300 27 73 2c 69 6e 20 64 65 6c 69 63 61 74 65 73 73 |'s,in delicatess| 00000310 61 6e 2c 67 65 6e 65 72 61 6c 0d 01 7c 45 dc 20 |an,general..|E. | 00000320 66 6f 6f 64 20 73 68 6f 70 70 69 6e 67 2c 72 65 |food shopping,re| 00000330 73 74 61 75 72 61 6e 74 2f 63 61 66 65 2c 63 6c |staurant/cafe,cl| 00000340 6f 74 68 65 73 20 73 68 6f 70 70 69 6e 67 2c 70 |othes shopping,p| 00000350 72 65 73 65 6e 74 20 73 68 6f 70 70 69 6e 67 0d |resent shopping.| 00000360 01 86 6b dc 20 22 61 76 6f 69 72 2c 20 ea 74 72 |..k. "avoir, .tr| 00000370 65 20 70 72 65 73 65 6e 74 20 74 65 6e 73 65 22 |e present tense"| 00000380 2c 72 65 67 75 6c 61 72 20 27 65 72 27 20 76 65 |,regular 'er' ve| 00000390 72 62 20 61 69 6d 65 72 2c 76 6f 75 6c 6f 69 72 |rb aimer,vouloir| 000003a0 73 2c 72 65 67 75 6c 61 72 20 27 72 65 27 20 27 |s,regular 're' '| 000003b0 69 72 27 20 76 65 72 62 73 20 76 65 6e 64 72 65 |ir' verbs vendre| 000003c0 20 61 6e 64 20 66 69 6e 69 72 0d 01 90 3b dc 20 | and finir...;. | 000003d0 66 6f 6f 64 2f 64 69 73 68 65 73 2c 73 68 6f 70 |food/dishes,shop| 000003e0 73 20 61 6e 64 20 73 65 72 76 69 63 65 73 2c 66 |s and services,f| 000003f0 6f 6f 64 20 69 74 65 6d 73 2c 72 65 73 74 61 75 |ood items,restau| 00000400 72 61 6e 74 73 0d 01 9a 9a dc 20 61 70 6f 6c 6f |rants..... apolo| 00000410 67 69 73 69 6e 67 20 61 6e 64 20 65 78 63 75 73 |gising and excus| 00000420 65 73 2c 22 63 6f 6d 70 6c 61 69 6e 74 73 2c 20 |es,"complaints, | 00000430 70 72 6f 62 6c 65 6d 73 20 61 6e 64 20 64 69 73 |problems and dis| 00000440 61 70 70 72 6f 76 61 6c 22 2c 22 6c 69 6b 65 73 |approval","likes| 00000450 2c 20 64 69 73 6c 69 6b 65 73 2c 20 76 6f 69 63 |, dislikes, voic| 00000460 69 6e 67 20 61 6e 67 65 72 20 61 6e 64 20 65 78 |ing anger and ex| 00000470 61 73 70 65 72 61 74 69 6f 6e 22 2c 22 69 6e 76 |asperation","inv| 00000480 69 74 69 6e 67 2c 20 72 65 66 75 73 69 6e 67 20 |iting, refusing | 00000490 61 6e 64 20 66 6f 72 62 69 64 64 69 6e 67 22 0d |and forbidding".| 000004a0 01 a4 0c dd f2 6d 6f 75 73 65 32 0d 01 ae 10 c8 |.....mouse2.....| 000004b0 97 20 fb 20 31 2c 30 2c 30 2c 30 0d 01 b8 15 c8 |. . 1,0,0,0.....| 000004c0 97 20 fb 20 32 2c 31 39 32 2c 39 36 2c 31 32 38 |. . 2,192,96,128| 000004d0 0d 01 c2 15 c8 97 20 fb 20 33 2c 31 39 32 2c 39 |...... . 3,192,9| 000004e0 36 2c 31 32 38 0d 01 cc 0a c8 97 20 ee 20 32 0d |6,128...... . 2.| 000004f0 01 d6 05 e1 0d 01 e0 0c dd f2 6d 6f 75 73 65 33 |..........mouse3| 00000500 0d 01 ea 10 c8 97 20 fb 20 31 2c 30 2c 30 2c 30 |...... . 1,0,0,0| 00000510 0d 01 f4 15 c8 97 20 fb 20 32 2c 31 39 32 2c 39 |...... . 2,192,9| 00000520 36 2c 31 32 38 0d 01 fe 15 c8 97 20 fb 20 33 2c |6,128...... . 3,| 00000530 31 39 32 2c 39 36 2c 31 32 38 0d 02 08 0a c8 97 |192,96,128......| 00000540 20 ee 20 33 0d 02 12 05 e1 0d 02 1c 15 dd f2 6d | . 3...........m| 00000550 6f 75 73 65 69 6c 6c 75 6d 69 6e 61 74 65 0d 02 |ouseilluminate..| 00000560 26 15 c8 97 20 6d 6f 78 25 2c 6d 6f 79 25 2c 62 |&... mox%,moy%,b| 00000570 75 74 25 0d 02 30 16 62 6f 78 25 3d 28 6d 6f 79 |ut%..0.box%=(moy| 00000580 25 2d 31 36 34 29 3e 3e 36 0d 02 3a 12 e7 62 6f |%-164)>>6..:..bo| 00000590 78 25 3e 39 3a 62 6f 78 25 3d 39 0d 02 44 4e e7 |x%>9:box%=9..DN.| 000005a0 62 6f 78 25 3c 3e 73 75 6e 25 3a c8 96 3a f2 73 |box%<>sun%:..:.s| 000005b0 71 72 28 73 75 6e 25 2c 31 31 29 3a f2 73 71 72 |qr(sun%,11):.sqr| 000005c0 28 62 6f 78 25 2c 31 35 29 3a f2 69 6e 74 28 73 |(box%,15):.int(s| 000005d0 75 6e 25 29 3a f2 69 6e 74 28 62 6f 78 25 29 3a |un%):.int(box%):| 000005e0 73 75 6e 25 3d 62 6f 78 25 0d 02 4e 0d f2 6c 6f |sun%=box%..N..lo| 000005f0 6e 67 6d 65 6e 75 0d 02 58 0d e7 62 75 74 25 3d |ngmenu..X..but%=| 00000600 30 3a e1 0d 02 62 07 ef 20 37 0d 02 6c 0a 75 70 |0:...b.. 7..l.up| 00000610 64 25 3d b9 0d 02 76 0a 73 75 6e 25 3d 30 0d 02 |d%=...v.sun%=0..| 00000620 80 0d c8 8e 20 62 6f 78 25 20 ca 0d 02 8a 0d c9 |.... box% ......| 00000630 20 30 3a f2 71 75 69 74 0d 02 94 14 c9 20 31 3a | 0:.quit..... 1:| 00000640 f2 69 6e 66 6f 72 6d 61 74 69 6f 6e 0d 02 9e 0f |.information....| 00000650 c9 20 32 3a f2 76 6f 6c 75 6d 65 0d 02 a8 0e c9 |. 2:.volume.....| 00000660 20 33 3a f2 67 72 61 64 65 0d 02 b2 07 c9 20 34 | 3:.grade..... 4| 00000670 0d 02 bc 0c 62 69 74 25 2b 3d 31 30 0d 02 c6 14 |....bit%+=10....| 00000680 e7 62 69 74 25 3d 36 30 3a 62 69 74 25 3d 31 30 |.bit%=60:bit%=10| 00000690 0d 02 d0 0a 75 70 64 25 3d a3 0d 02 da 07 c9 20 |....upd%=...... | 000006a0 35 0d 02 e4 0c 73 61 6e 25 2b 3d 32 30 0d 02 ee |5....san%+=20...| 000006b0 14 e7 73 61 6e 25 3d 32 32 30 3a 73 61 6e 25 3d |..san%=220:san%=| 000006c0 30 0d 02 f8 0a 75 70 64 25 3d a3 0d 03 02 07 c9 |0....upd%=......| 000006d0 20 36 0d 03 0c 0b 62 6c 74 25 2b 3d 31 0d 03 16 | 6....blt%+=1...| 000006e0 12 e7 62 6c 74 25 3e 34 3a 62 6c 74 25 3d 31 0d |..blt%>4:blt%=1.| 000006f0 03 20 0a 75 70 64 25 3d a3 0d 03 2a 10 c9 20 37 |. .upd%=...*.. 7| 00000700 3a f2 70 6c 61 79 65 72 73 0d 03 34 12 c9 20 38 |:.players..4.. 8| 00000710 3a f2 68 69 67 68 73 63 6f 72 65 0d 03 3e 05 7f |:.highscore..>..| 00000720 0d 03 48 0a f2 69 6e 74 72 6f 0d 03 52 0f f2 6e |..H..intro..R..n| 00000730 75 6d 62 65 72 6e 61 6d 65 0d 03 5c 0d f2 70 6c |umbername..\..pl| 00000740 61 79 67 61 6d 65 0d 03 66 05 cb 0d 03 70 0e f2 |aygame..f....p..| 00000750 6d 65 6e 75 63 6c 65 61 6e 0d 03 7a 05 e1 0d 03 |menuclean..z....| 00000760 84 0f dd f2 69 6e 74 28 69 6e 74 25 29 0d 03 8e |....int(int%)...| 00000770 07 ef 20 35 0d 03 98 09 e6 20 30 2c 30 0d 03 a2 |.. 5..... 0,0...| 00000780 0d c8 8e 20 69 6e 74 25 20 ca 0d 03 ac 1c c9 20 |... int% ...... | 00000790 32 3a f2 69 6e 73 65 72 74 28 31 31 2c c3 28 4d |2:.insert(11,.(M| 000007a0 25 3e 3e 34 29 29 0d 03 b6 47 c9 20 33 3a e7 73 |%>>4))...G. 3:.s| 000007b0 75 62 25 3d 30 20 f2 69 6e 73 65 72 74 28 31 33 |ub%=0 .insert(13| 000007c0 2c c3 28 67 72 64 25 29 29 20 8b f2 69 6e 73 65 |,.(grd%)) ..inse| 000007d0 72 74 28 31 33 2c c3 28 67 72 64 25 29 2b 22 2f |rt(13,.(grd%)+"/| 000007e0 22 2b bd 28 73 75 62 25 2b 36 34 29 29 0d 03 c0 |"+.(sub%+64))...| 000007f0 1b c9 20 34 3a f2 69 6e 73 65 72 74 28 31 35 2c |.. 4:.insert(15,| 00000800 c3 28 62 69 74 25 29 29 0d 03 ca 07 c9 20 35 0d |.(bit%))..... 5.| 00000810 03 d4 0d e7 73 61 6e 25 3d 30 20 8c 0d 03 de 31 |....san%=0 ....1| 00000820 e7 66 6f 72 25 20 f2 69 6e 73 65 72 74 28 31 37 |.for% .insert(17| 00000830 2c 22 45 54 45 49 4e 54 22 29 20 8b f2 69 6e 73 |,"ETEINT") ..ins| 00000840 65 72 74 28 31 37 2c 22 4f 46 46 22 29 0d 03 e8 |ert(17,"OFF")...| 00000850 0a 74 69 6d 25 3d a3 0d 03 f2 05 cc 0d 03 fc 17 |.tim%=..........| 00000860 f2 69 6e 73 65 72 74 28 31 37 2c c3 28 73 61 6e |.insert(17,.(san| 00000870 25 29 29 0d 04 06 0a 74 69 6d 25 3d b9 0d 04 10 |%))....tim%=....| 00000880 05 cd 0d 04 1a 1b c9 20 36 3a f2 69 6e 73 65 72 |....... 6:.inser| 00000890 74 28 31 39 2c c3 28 62 6c 74 25 29 29 0d 04 24 |t(19,.(blt%))..$| 000008a0 1b c9 20 37 3a f2 69 6e 73 65 72 74 28 32 31 2c |.. 7:.insert(21,| 000008b0 c3 28 70 6c 79 25 29 29 0d 04 2e 05 cb 0d 04 38 |.(ply%)).......8| 000008c0 07 ef 20 34 0d 04 42 05 87 0d 04 4c 05 e1 0d 04 |.. 4..B....L....| 000008d0 56 0a dd f2 6d 65 6e 75 0d 04 60 14 c8 99 22 41 |V...menu..`..."A| 000008e0 42 43 5f 42 6c 61 6e 6b 22 2c 31 35 0d 04 6a 15 |BC_Blank",15..j.| 000008f0 c8 99 22 41 42 43 5f 43 6f 6c 6f 75 72 22 2c 31 |.."ABC_Colour",1| 00000900 35 0d 04 74 0c f2 66 6f 72 65 69 67 6e 0d 04 7e |5..t..foreign..~| 00000910 0b e7 66 6f 72 25 20 8c 0d 04 88 24 f2 63 61 72 |..for% ....$.car| 00000920 64 28 22 4c 45 20 46 4c 49 43 20 4d 45 4e 55 22 |d("LE FLIC MENU"| 00000930 2c 32 34 2c 31 30 2c 32 2c 31 30 29 0d 04 92 0a |,24,10,2,10)....| 00000940 f7 20 8d 54 54 45 0d 04 9c 05 cc 0d 04 a6 24 f2 |. .TTE........$.| 00000950 63 61 72 64 28 22 54 48 45 20 43 4f 50 20 4d 45 |card("THE COP ME| 00000960 4e 55 22 2c 32 34 2c 31 30 2c 32 2c 31 30 29 0d |NU",24,10,2,10).| 00000970 04 b0 0a f7 20 8d 54 40 45 0d 04 ba 05 cd 0d 04 |.... .T@E.......| 00000980 c4 0d f2 66 69 6c 6c 6d 65 6e 75 0d 04 ce 0c f2 |...fillmenu.....| 00000990 73 70 72 69 74 65 73 0d 04 d8 19 c8 97 20 c8 93 |sprites...... ..| 000009a0 20 37 30 34 2c 31 36 34 2c 31 35 38 2c 36 34 32 | 704,164,158,642| 000009b0 0d 04 e2 13 c8 99 22 41 42 43 5f 50 61 6c 65 74 |......"ABC_Palet| 000009c0 74 65 22 0d 04 ec 0b f2 6d 6f 75 73 65 31 0d 04 |te".....mouse1..| 000009d0 f6 05 e1 0d 05 00 42 dc 20 50 6c 61 79 20 54 68 |......B. Play Th| 000009e0 65 20 43 6f 70 2c 48 69 67 68 20 73 63 6f 72 65 |e Cop,High score| 000009f0 20 74 61 62 6c 65 2c 4e 75 6d 62 65 72 20 6f 66 | table,Number of| 00000a00 20 70 6c 61 79 65 72 73 2c 54 61 72 67 65 74 20 | players,Target | 00000a10 73 70 65 65 64 0d 05 0a 3b dc 20 54 69 6d 65 72 |speed...;. Timer| 00000a20 2c 51 75 65 73 74 69 6f 6e 73 2c 2c 56 6f 6c 75 |,Questions,,Volu| 00000a30 6d 65 2c 49 6e 66 6f 72 6d 61 74 69 6f 6e 2c 45 |me,Information,E| 00000a40 78 69 74 20 74 6f 20 4d 61 69 6e 20 4d 65 6e 75 |xit to Main Menu| 00000a50 0d 05 14 53 dc 20 4a 6f 75 65 72 20 61 75 20 46 |...S. Jouer au F| 00000a60 6c 69 63 2c 22 47 72 69 6c 6c 65 20 64 65 73 20 |lic,"Grille des | 00000a70 72 e9 73 75 6c 74 61 74 73 20 e9 6c 65 76 e9 73 |r.sultats .lev.s| 00000a80 22 2c 4e 6f 6d 62 72 65 20 64 65 20 6a 6f 75 65 |",Nombre de joue| 00000a90 75 72 73 2c 56 69 74 65 73 73 65 20 63 68 6f 69 |urs,Vitesse choi| 00000aa0 73 69 65 0d 05 1e 45 dc 20 4d 69 6e 75 74 65 75 |sie...E. Minuteu| 00000ab0 72 2c 51 75 65 73 74 69 6f 6e 73 2c 2c 56 6f 6c |r,Questions,,Vol| 00000ac0 75 6d 65 2c 49 6e 66 6f 72 6d 61 74 69 6f 6e 2c |ume,Information,| 00000ad0 52 65 74 6f 75 72 20 61 75 20 6d 65 6e 75 20 70 |Retour au menu p| 00000ae0 72 69 6e 63 69 70 61 6c 0d 05 28 0e dd f2 70 6c |rincipal..(...pl| 00000af0 61 79 67 61 6d 65 0d 05 32 10 f2 69 6e 69 74 69 |aygame..2..initi| 00000b00 61 6c 67 61 6d 65 0d 05 3c 0e f2 67 72 61 62 6d |algame..<..grabm| 00000b10 6f 75 73 65 0d 05 46 05 f5 0d 05 50 0b f2 64 6f |ouse..F....P..do| 00000b20 77 6f 72 64 0d 05 5a 05 f5 0d 05 64 05 f5 0d 05 |word..Z....d....| 00000b30 6e 14 f2 72 65 76 65 61 6c 28 31 33 2c 31 34 2c |n..reveal(13,14,| 00000b40 32 29 0d 05 78 0a f2 70 61 75 73 65 0d 05 82 0a |2)..x..pause....| 00000b50 f2 6d 6f 75 73 65 0d 05 8c 0a f2 73 6f 75 6e 64 |.mouse.....sound| 00000b60 0d 05 96 0a f2 74 69 6d 65 72 0d 05 a0 0a f2 67 |.....timer.....g| 00000b70 65 6e 65 72 0d 05 aa 0e f2 6d 6f 76 65 62 65 6c |ener.....movebel| 00000b80 74 73 0d 05 b4 13 fd 20 62 75 74 25 3e 30 20 84 |ts..... but%>0 .| 00000b90 20 6f 76 72 25 0d 05 be 0c e7 ac 6f 76 72 25 20 | ovr%......ovr% | 00000ba0 8c 0d 05 c8 0b f2 6d 6f 75 73 65 33 0d 05 d2 0a |......mouse3....| 00000bb0 f2 6d 61 74 63 68 0d 05 dc 0b f2 73 63 6f 72 65 |.match.....score| 00000bc0 73 0d 05 e6 1e e7 ac 73 75 63 25 20 80 20 70 6c |s......suc% . pl| 00000bd0 79 25 3e 31 3a f2 67 72 61 62 6d 6f 75 73 65 0d |y%>1:.grabmouse.| 00000be0 05 f0 05 cd 0d 05 fa 11 fd 20 66 69 6e 25 20 84 |......... fin% .| 00000bf0 20 6f 76 72 25 0d 06 04 0a fd 20 6f 76 72 25 0d | ovr%..... ovr%.| 00000c00 06 0e 0b e7 74 69 6d 25 20 8c 0d 06 18 0d e7 73 |....tim% ......s| 00000c10 65 63 25 3e 30 20 8c 0d 06 22 0f f2 64 65 6c 61 |ec%>0 ..."..dela| 00000c20 79 28 31 35 30 29 0d 06 2c 14 f2 65 6e 74 65 72 |y(150)..,..enter| 00000c30 68 69 67 68 73 63 6f 72 65 73 0d 06 36 0b f2 72 |highscores..6..r| 00000c40 65 70 6f 72 74 0d 06 40 05 cc 0d 06 4a 0c f2 65 |eport..@....J..e| 00000c50 78 68 61 75 73 74 0d 06 54 05 cd 0d 06 5e 05 cc |xhaust..T....^..| 00000c60 0d 06 68 0f f2 64 65 6c 61 79 28 31 35 30 29 0d |..h..delay(150).| 00000c70 06 72 14 f2 65 6e 74 65 72 68 69 67 68 73 63 6f |.r..enterhighsco| 00000c80 72 65 73 0d 06 7c 0b f2 72 65 70 6f 72 74 0d 06 |res..|..report..| 00000c90 86 05 cd 0d 06 90 05 e1 0d 06 9a 0b dd f2 6d 6f |..............mo| 00000ca0 75 73 65 0d 06 a4 15 c8 97 20 6d 6f 78 25 2c 6d |use...... mox%,m| 00000cb0 6f 79 25 2c 62 75 74 25 0d 06 ae 1c e7 62 75 74 |oy%,but%.....but| 00000cc0 25 3d 30 3a 6c 65 74 25 3d b9 3a f2 6d 6f 75 73 |%=0:let%=.:.mous| 00000cd0 65 32 3a e1 0d 06 b8 14 e7 6c 65 74 25 3d b9 3a |e2:......let%=.:| 00000ce0 6c 65 74 25 3d a3 3a e1 0d 06 c2 0a 62 75 74 25 |let%=.:.....but%| 00000cf0 3d 30 0d 06 cc 05 e1 0d 06 d6 11 dd f2 69 6e 69 |=0...........ini| 00000d00 74 69 61 6c 67 61 6d 65 0d 06 e0 13 c8 99 22 41 |tialgame......"A| 00000d10 42 43 5f 42 6c 61 6e 6b 22 2c 34 0d 06 ea 14 c8 |BC_Blank",4.....| 00000d20 99 22 41 42 43 5f 43 6f 6c 6f 75 72 22 2c 34 0d |."ABC_Colour",4.| 00000d30 06 f4 0c f2 66 6f 72 65 69 67 6e 0d 06 fe 0c f2 |....foreign.....| 00000d40 73 63 61 6e 73 75 62 0d 07 08 0e f2 76 61 72 69 |scansub.....vari| 00000d50 61 62 6c 65 73 0d 07 12 0a f2 77 68 69 63 68 0d |ables.....which.| 00000d60 07 1c 0b f2 73 63 6f 72 65 73 0d 07 26 0b f2 75 |....scores..&..u| 00000d70 70 64 61 74 65 0d 07 30 13 c8 99 22 41 42 43 5f |pdate..0..."ABC_| 00000d80 50 61 6c 65 74 74 65 22 0d 07 3a 18 c8 97 20 c8 |Palette"..:... .| 00000d90 93 20 30 2c 32 35 36 2c 31 32 38 30 2c 37 36 38 |. 0,256,1280,768| 00000da0 0d 07 44 05 e1 0d 07 4e 0d dd f2 73 63 61 6e 73 |..D....N...scans| 00000db0 75 62 0d 07 58 16 e7 67 72 64 25 3d 31 20 84 20 |ub..X..grd%=1 . | 00000dc0 73 75 62 25 3d 30 3a e1 0d 07 62 0a 61 6d 74 25 |sub%=0:...b.amt%| 00000dd0 3d 30 0d 07 6c 0e e3 4a 25 3d 31 b8 31 35 30 30 |=0..l..J%=1.1500| 00000de0 0d 07 76 1f e7 6b 6e 64 25 28 67 72 64 25 2c 4a |..v..knd%(grd%,J| 00000df0 25 29 3d 73 75 62 25 3a 61 6d 74 25 2b 3d 31 0d |%)=sub%:amt%+=1.| 00000e00 07 80 05 ed 0d 07 8a 12 e7 61 6d 74 25 3c 32 3a |.........amt%<2:| 00000e10 73 75 62 25 3d 30 0d 07 94 05 e1 0d 07 9e 0f dd |sub%=0..........| 00000e20 f2 76 61 72 69 61 62 6c 65 73 0d 07 a8 0a 61 6e |.variables....an| 00000e30 69 25 3d 30 0d 07 b2 10 62 6f 6e 25 3d 31 30 2a |i%=0....bon%=10*| 00000e40 67 72 64 25 0d 07 bc 0a 67 61 70 25 3d 31 0d 07 |grd%....gap%=1..| 00000e50 c6 0a 68 72 74 25 3d b9 0d 07 d0 0a 6c 65 74 25 |..hrt%=.....let%| 00000e60 3d b9 0d 07 da 0a 6d 6f 72 25 3d 33 0d 07 e4 0a |=.....mor%=3....| 00000e70 6f 76 72 25 3d a3 0d 07 ee 0a 70 72 65 25 3d b9 |ovr%=.....pre%=.| 00000e80 0d 07 f8 0a 72 79 74 25 3d 30 0d 08 02 0a 72 6f |....ryt%=0....ro| 00000e90 6e 25 3d 30 0d 08 0c 0d 73 65 63 25 3d 73 61 6e |n%=0....sec%=san| 00000ea0 25 0d 08 16 0d 73 68 74 25 3d 62 69 74 25 0d 08 |%....sht%=bit%..| 00000eb0 20 0f 73 70 64 25 3d 62 6c 74 25 2a 32 0d 08 2a | .spd%=blt%*2..*| 00000ec0 0a 73 75 63 25 3d a3 0d 08 34 0a 74 72 79 25 3d |.suc%=...4.try%=| 00000ed0 30 0d 08 3e 0c 73 63 72 25 28 29 3d 30 0d 08 48 |0..>.scr%()=0..H| 00000ee0 0d 6c 66 74 25 28 29 3d 2d 32 0d 08 52 0d 6c 65 |.lft%()=-2..R.le| 00000ef0 66 79 25 28 29 3d 30 0d 08 5c 0d 72 67 74 25 28 |fy%()=0..\.rgt%(| 00000f00 29 3d 2d 32 0d 08 66 0d 72 69 67 79 25 28 29 3d |)=-2..f.rigy%()=| 00000f10 30 0d 08 70 1c f2 72 65 63 28 31 34 2c 31 33 2c |0..p..rec(14,13,| 00000f20 30 2c 30 2c 31 32 37 38 2c 32 35 36 29 0d 08 7a |0,0,1278,256)..z| 00000f30 27 c8 99 22 41 42 43 5f 55 6e 70 61 63 6b 50 6c |'.."ABC_UnpackPl| 00000f40 61 63 65 22 2c 22 74 34 22 2c 7a 25 2c 32 35 32 |ace","t4",z%,252| 00000f50 2c 32 34 38 0d 08 84 25 c8 99 22 41 42 43 5f 55 |,248...%.."ABC_U| 00000f60 6e 70 61 63 6b 50 6c 61 63 65 22 2c 22 62 31 22 |npackPlace","b1"| 00000f70 2c 7a 25 2c 30 2c 32 34 32 0d 08 8e 27 c8 99 22 |,z%,0,242...'.."| 00000f80 41 42 43 5f 55 6e 70 61 63 6b 50 6c 61 63 65 22 |ABC_UnpackPlace"| 00000f90 2c 22 62 32 22 2c 7a 25 2c 36 30 38 2c 32 34 32 |,"b2",z%,608,242| 00000fa0 0d 08 98 29 c8 99 22 41 42 43 5f 55 6e 70 61 63 |...).."ABC_Unpac| 00000fb0 6b 50 6c 61 63 65 22 2c 22 68 69 6e 74 22 2c 7a |kPlace","hint",z| 00000fc0 25 2c 31 36 30 2c 31 33 32 0d 08 a2 09 e6 20 30 |%,160,132..... 0| 00000fd0 2c 35 0d 08 ac 16 c8 93 c8 90 20 33 36 2c 34 30 |,5........ 36,40| 00000fe0 2c 32 30 30 2c 31 39 32 0d 08 b6 17 c8 93 c8 90 |,200,192........| 00000ff0 20 32 34 38 2c 34 30 2c 32 37 38 2c 31 39 32 0d | 248,40,278,192.| 00001000 08 c0 09 e6 20 30 2c 33 0d 08 ca 16 c8 93 c8 90 |.... 0,3........| 00001010 20 32 38 2c 33 32 2c 32 30 30 2c 31 39 32 0d 08 | 28,32,200,192..| 00001020 d4 17 c8 93 c8 90 20 32 34 30 2c 33 32 2c 32 37 |...... 240,32,27| 00001030 38 2c 31 39 32 0d 08 de 25 c8 99 22 41 42 43 5f |8,192...%.."ABC_| 00001040 55 6e 70 61 63 6b 50 6c 61 63 65 22 2c 22 68 31 |UnpackPlace","h1| 00001050 22 2c 6a 25 2c 35 30 2c 34 34 0d 08 e8 07 fb 20 |",j%,50,44..... | 00001060 30 0d 08 f2 09 fb 20 31 33 31 0d 08 fc 2d e7 66 |0..... 131...-.f| 00001070 6f 72 25 20 f1 8a 32 2c 32 39 29 22 54 65 6d 70 |or% ..2,29)"Temp| 00001080 73 3a 22 3b 20 8b f1 8a 33 2c 32 39 29 22 54 69 |s:"; ...3,29)"Ti| 00001090 6d 65 20 3a 20 22 3b 0d 09 06 0b e7 74 69 6d 25 |me : ";.....tim%| 000010a0 20 8c 0d 09 10 08 fb 20 31 30 0d 09 1a 09 f1 73 | ...... 10.....s| 000010b0 65 63 25 0d 09 24 05 cc 0d 09 2e 07 fb 20 39 0d |ec%..$....... 9.| 000010c0 09 38 1b e7 66 6f 72 25 20 f1 22 45 74 65 69 6e |.8..for% ."Etein| 000010d0 74 22 20 8b f1 22 4f 66 66 22 0d 09 42 05 cd 0d |t" .."Off"..B...| 000010e0 09 4c 07 ef 20 35 0d 09 56 0f e3 58 25 3d 31 b8 |.L.. 5..V..X%=1.| 000010f0 20 70 6c 79 25 0d 09 60 0a e6 20 30 2c 31 31 0d | ply%..`.. 0,11.| 00001100 09 6a 23 c8 93 c8 90 20 34 34 34 2b 58 25 2a 39 |.j#.... 444+X%*9| 00001110 36 2c 32 34 30 2d 58 25 2a 35 32 2c 33 32 34 2c |6,240-X%*52,324,| 00001120 34 30 0d 09 74 09 e6 20 30 2c 39 0d 09 7e 23 c8 |40..t.. 0,9..~#.| 00001130 93 c8 90 20 34 34 30 2b 58 25 2a 39 36 2c 32 33 |... 440+X%*96,23| 00001140 36 2d 58 25 2a 35 32 2c 33 32 30 2c 33 36 0d 09 |6-X%*52,320,36..| 00001150 88 09 e6 20 30 2c 38 0d 09 92 19 ec 20 34 35 36 |... 0,8..... 456| 00001160 2b 58 25 2a 39 36 2c 32 36 38 2d 58 25 2a 35 32 |+X%*96,268-X%*52| 00001170 0d 09 9c 0e f1 6e 61 6d 65 24 28 58 25 29 0d 09 |.....name$(X%)..| 00001180 a6 05 ed 0d 09 b0 18 e7 66 6f 72 25 20 f7 20 8d |........for% . .| 00001190 54 72 4a 20 8b f7 20 8d 54 68 4a 0d 09 ba 0a e6 |TrJ .. .ThJ.....| 000011a0 20 30 2c 31 31 0d 09 c4 0b e3 4a 25 3d 31 b8 34 | 0,11.....J%=1.4| 000011b0 0d 09 ce 08 f3 20 61 24 0d 09 d8 13 ec 20 32 35 |..... a$..... 25| 000011c0 32 2c 32 34 30 2d 4a 25 2a 34 30 0d 09 e2 1d e7 |2,240-J%*40.....| 000011d0 4a 25 3d 32 3a 61 24 3d a4 66 6f 72 65 69 67 6e |J%=2:a$=.foreign| 000011e0 6c 65 76 65 6c 28 b9 29 0d 09 ec 07 f1 61 24 0d |level(.).....a$.| 000011f0 09 f6 05 ed 0d 0a 00 07 ef 20 34 0d 0a 0a 05 87 |......... 4.....| 00001200 0d 0a 14 20 e7 70 6c 79 25 3e 31 20 63 75 72 25 |... .ply%>1 cur%| 00001210 3d b3 28 70 6c 79 25 29 20 8b 63 75 72 25 3d 31 |=.(ply%) .cur%=1| 00001220 0d 0a 1e 05 e1 0d 0a 28 1b dc 20 48 69 74 73 2c |.......(.. Hits,| 00001230 2c 51 75 65 73 74 69 6f 6e 73 2c 42 6f 6e 75 73 |,Questions,Bonus| 00001240 0d 0a 32 26 dc 20 22 43 6f 75 70 73 20 72 e9 75 |..2&. "Coups r.u| 00001250 73 73 69 73 22 2c 2c 51 75 65 73 74 69 6f 6e 73 |ssis",,Questions| 00001260 2c 42 6f 6e 75 73 0d 0a 3c 0b dd f2 77 68 69 63 |,Bonus..<...whic| 00001270 68 0d 0a 46 09 e6 20 30 2c 38 0d 0a 50 06 c8 96 |h..F.. 0,8..P...| 00001280 0d 0a 5a 17 c8 93 c8 90 20 31 31 38 30 2c 32 30 |..Z..... 1180,20| 00001290 2c 33 32 2c 32 31 36 0d 0a 64 09 e6 20 30 2c 30 |,32,216..d.. 0,0| 000012a0 0d 0a 6e 15 c8 93 20 31 31 38 30 2c 32 30 2c 33 |..n... 1180,20,3| 000012b0 32 2c 32 31 36 0d 0a 78 09 e6 20 30 2c 39 0d 0a |2,216..x.. 0,9..| 000012c0 82 16 ec 20 31 31 38 38 2c 32 34 38 2d 63 75 72 |... 1188,248-cur| 000012d0 25 2a 35 32 0d 0a 8c 0e f0 20 30 2c 31 36 2c 2d |%*52..... 0,16,-| 000012e0 31 36 0d 0a 96 0d f0 20 38 31 2c 30 2c 33 32 0d |16..... 81,0,32.| 000012f0 0a a0 05 e1 0d 0a aa 0c dd f2 75 70 64 61 74 65 |..........update| 00001300 0d 0a b4 09 e6 20 30 2c 33 0d 0a be 07 ef 20 35 |..... 0,3..... 5| 00001310 0d 0a c8 06 c8 96 0d 0a d2 16 c8 93 c8 90 20 34 |.............. 4| 00001320 36 38 2c 33 32 2c 34 34 2c 31 39 32 0d 0a dc 0a |68,32,44,192....| 00001330 e6 20 30 2c 31 34 0d 0a e6 0d ec 20 34 36 38 2c |. 0,14..... 468,| 00001340 32 30 30 0d 0a f0 09 f1 72 79 74 25 0d 0a fa 0d |200.....ryt%....| 00001350 ec 20 34 36 38 2c 31 36 30 0d 0b 04 0a f1 67 72 |. 468,160.....gr| 00001360 64 25 3b 0d 0b 0e 1a e7 73 75 62 25 3e 30 3a f1 |d%;.....sub%>0:.| 00001370 22 2f 22 bd 28 73 75 62 25 2b 36 34 29 0d 0b 18 |"/".(sub%+64)...| 00001380 0d ec 20 34 36 38 2c 31 32 30 0d 0b 22 09 f1 73 |.. 468,120.."..s| 00001390 68 74 25 0d 0b 2c 0c ec 20 34 36 38 2c 38 30 0d |ht%..,.. 468,80.| 000013a0 0b 36 09 f1 62 6f 6e 25 0d 0b 40 07 ef 20 34 0d |.6..bon%..@.. 4.| 000013b0 0b 4a 05 87 0d 0b 54 05 e1 0d 0b 5e 0c dd f2 73 |.J....T....^...s| 000013c0 63 6f 72 65 73 0d 0b 68 07 ef 20 35 0d 0b 72 0f |cores..h.. 5..r.| 000013d0 e3 58 25 3d 31 b8 20 70 6c 79 25 0d 0b 7c 09 e6 |.X%=1. ply%..|..| 000013e0 20 30 2c 34 0d 0b 86 06 c8 96 0d 0b 90 23 c8 93 | 0,4.........#..| 000013f0 c8 90 20 36 30 30 2b 58 25 2a 39 36 2c 32 33 36 |.. 600+X%*96,236| 00001400 2d 58 25 2a 35 32 2c 31 36 30 2c 33 36 0d 0b 9a |-X%*52,160,36...| 00001410 09 e6 20 30 2c 37 0d 0b a4 19 ec 20 36 31 36 2b |.. 0,7..... 616+| 00001420 58 25 2a 39 36 2c 32 36 38 2d 58 25 2a 35 32 0d |X%*96,268-X%*52.| 00001430 0b ae 0d f1 73 63 72 25 28 58 25 29 0d 0b b8 05 |....scr%(X%)....| 00001440 ed 0d 0b c2 07 ef 20 34 0d 0b cc 05 87 0d 0b d6 |...... 4........| 00001450 05 e1 0d 0b e0 0b dd f2 67 65 6e 65 72 0d 0b ea |........gener...| 00001460 0e 67 61 70 25 2d 3d 73 70 64 25 0d 0b f4 0d e7 |.gap%-=spd%.....| 00001470 67 61 70 25 3e 30 3a e1 0d 0b fe 0b 67 61 70 25 |gap%>0:.....gap%| 00001480 3d 34 30 0d 0c 08 08 53 25 3d 31 0d 0c 12 27 c8 |=40....S%=1...'.| 00001490 95 20 53 25 3c 37 20 80 20 6c 66 74 25 28 53 25 |. S%<7 . lft%(S%| 000014a0 29 3e 2d 32 20 84 20 72 67 74 25 28 53 25 29 3e |)>-2 . rgt%(S%)>| 000014b0 2d 32 0d 0c 1c 09 53 25 2b 3d 31 0d 0c 26 05 ce |-2....S%+=1..&..| 000014c0 0d 0c 30 0b e7 53 25 3d 37 3a e1 0d 0c 3a 28 c8 |..0..S%=7:...:(.| 000014d0 99 22 41 42 43 5f 55 6e 70 61 63 6b 50 6c 61 63 |."ABC_UnpackPlac| 000014e0 65 22 2c 22 74 61 72 31 22 2c 7a 25 2c 33 32 2c |e","tar1",z%,32,| 000014f0 31 33 30 0d 0c 44 29 c8 99 22 41 42 43 5f 55 6e |130..D).."ABC_Un| 00001500 70 61 63 6b 50 6c 61 63 65 22 2c 22 74 61 72 32 |packPlace","tar2| 00001510 22 2c 7a 25 2c 34 38 30 2c 32 34 32 0d 0c 4e 0b |",z%,480,242..N.| 00001520 6d 6f 72 25 2d 3d 31 0d 0c 58 0d e7 6d 6f 72 25 |mor%-=1..X..mor%| 00001530 3d 30 20 8c 0d 0c 62 0a 61 63 74 25 3d b9 0d 0c |=0 ...b.act%=...| 00001540 6c 0f 6d 6f 72 25 3d b3 28 33 29 2b 31 0d 0c 76 |l.mor%=.(3)+1..v| 00001550 05 cc 0d 0c 80 0a 61 63 74 25 3d a3 0d 0c 8a 05 |......act%=.....| 00001560 cd 0d 0c 94 0d c8 8e 20 67 72 64 25 20 ca 0d 0c |....... grd% ...| 00001570 9e 0d c9 20 31 3a f2 67 65 6e 31 0d 0c a8 0d c9 |... 1:.gen1.....| 00001580 20 32 3a f2 67 65 6e 32 0d 0c b2 0d c9 20 33 3a | 2:.gen2..... 3:| 00001590 f2 67 65 6e 33 0d 0c bc 0d c9 20 34 3a f2 67 65 |.gen3..... 4:.ge| 000015a0 6e 34 0d 0c c6 0d c9 20 35 3a f2 67 65 6e 35 0d |n4..... 5:.gen5.| 000015b0 0c d0 0b 7f 3a f2 67 65 6e 36 0d 0c da 05 cb 0d |....:.gen6......| 000015c0 0c e4 0e 6c 66 74 25 28 53 25 29 3d 30 0d 0c ee |...lft%(S%)=0...| 000015d0 0e 72 67 74 25 28 53 25 29 3d 30 0d 0c f8 11 6c |.rgt%(S%)=0....l| 000015e0 65 66 79 25 28 53 25 29 3d 31 33 30 0d 0d 02 11 |efy%(S%)=130....| 000015f0 72 69 67 79 25 28 53 25 29 3d 32 34 32 0d 0d 0c |rigy%(S%)=242...| 00001600 05 e1 0d 0d 16 0a dd f2 67 65 6e 31 0d 0d 20 0b |........gen1.. .| 00001610 e7 61 63 74 25 20 8c 0d 0d 2a 0b 4a 25 3d b3 28 |.act% ...*.J%=.(| 00001620 38 29 0d 0d 34 15 6c 65 66 74 24 28 53 25 29 3d |8)..4.left$(S%)=| 00001630 73 65 71 24 28 31 29 0d 0d 3e 0e 61 24 3d 6e 6d |seq$(1)..>.a$=nm| 00001640 65 24 28 31 29 0d 0d 48 16 72 69 67 74 24 28 53 |e$(1)..H.rigt$(S| 00001650 25 29 3d 73 65 71 24 28 4a 25 29 0d 0d 52 0f 62 |%)=seq$(J%)..R.b| 00001660 24 3d 6e 6d 65 24 28 4a 25 29 0d 0d 5c 0a e7 b3 |$=nme$(J%)..\...| 00001670 3e 30 20 8c 0d 0d 66 1a c8 94 20 6c 65 66 74 24 |>0 ...f... left$| 00001680 28 53 25 29 2c 72 69 67 74 24 28 53 25 29 0d 0d |(S%),rigt$(S%)..| 00001690 70 0c c8 94 20 61 24 2c 62 24 0d 0d 7a 05 cd 0d |p... a$,b$..z...| 000016a0 0d 84 05 cc 0d 0d 8e 0b 4a 25 3d b3 28 38 29 0d |........J%=.(8).| 000016b0 0d 98 16 6c 65 66 74 24 28 53 25 29 3d 73 65 71 |...left$(S%)=seq| 000016c0 24 28 4a 25 29 0d 0d a2 0f 61 24 3d 6e 6d 65 24 |$(J%)....a$=nme$| 000016d0 28 4a 25 29 0d 0d ac 0b 4a 25 3d b3 28 38 29 0d |(J%)....J%=.(8).| 000016e0 0d b6 16 72 69 67 74 24 28 53 25 29 3d 73 65 71 |...rigt$(S%)=seq| 000016f0 24 28 4a 25 29 0d 0d c0 0f 62 24 3d 6e 6d 65 24 |$(J%)....b$=nme$| 00001700 28 4a 25 29 0d 0d ca 05 cd 0d 0d d4 25 c8 99 22 |(J%)........%.."| 00001710 41 42 43 5f 55 6e 70 61 63 6b 53 70 72 69 74 65 |ABC_UnpackSprite| 00001720 22 2c 61 24 2c 7a 25 2c 34 34 2c 31 32 39 0d 0d |",a$,z%,44,129..| 00001730 de 26 c8 99 22 41 42 43 5f 55 6e 70 61 63 6b 53 |.&.."ABC_UnpackS| 00001740 70 72 69 74 65 22 2c 62 24 2c 7a 25 2c 35 30 30 |prite",b$,z%,500| 00001750 2c 32 34 31 0d 0d e8 05 e1 0d 0d f2 0a dd f2 67 |,241...........g| 00001760 65 6e 32 0d 0d fc 0b e7 61 63 74 25 20 8c 0d 0e |en2.....act% ...| 00001770 06 15 6c 65 66 74 24 28 53 25 29 3d 73 65 71 24 |..left$(S%)=seq$| 00001780 28 31 29 0d 0e 10 19 72 69 67 74 24 28 53 25 29 |(1)....rigt$(S%)| 00001790 3d 73 65 71 24 28 b3 28 31 36 29 29 0d 0e 1a 1f |=seq$(.(16))....| 000017a0 e7 b3 3e 30 3a c8 94 20 6c 65 66 74 24 28 53 25 |..>0:.. left$(S%| 000017b0 29 2c 72 69 67 74 24 28 53 25 29 0d 0e 24 05 cc |),rigt$(S%)..$..| 000017c0 0d 0e 2e 19 6c 65 66 74 24 28 53 25 29 3d 73 65 |....left$(S%)=se| 000017d0 71 24 28 b3 28 31 36 29 29 0d 0e 38 19 72 69 67 |q$(.(16))..8.rig| 000017e0 74 24 28 53 25 29 3d 73 65 71 24 28 b3 28 31 36 |t$(S%)=seq$(.(16| 000017f0 29 29 0d 0e 42 05 cd 0d 0e 4c 3b c8 99 22 41 42 |))..B....L;.."AB| 00001800 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c 6c |C_PryntString",l| 00001810 65 66 74 24 28 53 25 29 2c 39 30 2d a9 28 6c 65 |eft$(S%),90-.(le| 00001820 66 74 24 28 53 25 29 29 2a 34 2c 31 31 34 2c 30 |ft$(S%))*4,114,0| 00001830 2c 30 0d 0e 56 3c c8 99 22 41 42 43 5f 50 72 79 |,0..V<.."ABC_Pry| 00001840 6e 74 53 74 72 69 6e 67 22 2c 72 69 67 74 24 28 |ntString",rigt$(| 00001850 53 25 29 2c 35 35 30 2d a9 28 72 69 67 74 24 28 |S%),550-.(rigt$(| 00001860 53 25 29 29 2a 34 2c 32 32 38 2c 30 2c 30 0d 0e |S%))*4,228,0,0..| 00001870 60 05 e1 0d 0e 6a 0a dd f2 67 65 6e 33 0d 0e 74 |`....j...gen3..t| 00001880 0b e7 61 63 74 25 20 8c 0d 0e 7e 18 6c 65 66 74 |..act% ...~.left| 00001890 24 28 53 25 29 3d 73 65 71 24 28 73 65 71 25 29 |$(S%)=seq$(seq%)| 000018a0 0d 0e 88 19 72 69 67 74 24 28 53 25 29 3d 73 65 |....rigt$(S%)=se| 000018b0 71 24 28 b3 28 31 36 29 29 0d 0e 92 1f e7 b3 3e |q$(.(16))......>| 000018c0 30 3a c8 94 20 6c 65 66 74 24 28 53 25 29 2c 72 |0:.. left$(S%),r| 000018d0 69 67 74 24 28 53 25 29 0d 0e 9c 05 cc 0d 0e a6 |igt$(S%)........| 000018e0 19 6c 65 66 74 24 28 53 25 29 3d 73 65 71 24 28 |.left$(S%)=seq$(| 000018f0 b3 28 31 36 29 29 0d 0e b0 19 72 69 67 74 24 28 |.(16))....rigt$(| 00001900 53 25 29 3d 73 65 71 24 28 b3 28 31 36 29 29 0d |S%)=seq$(.(16)).| 00001910 0e ba 05 cd 0d 0e c4 10 61 24 3d 6c 65 66 74 24 |........a$=left$| 00001920 28 53 25 29 0d 0e ce 10 62 24 3d 72 69 67 74 24 |(S%)....b$=rigt$| 00001930 28 53 25 29 0d 0e d8 2d c8 99 22 41 42 43 5f 50 |(S%)...-.."ABC_P| 00001940 72 79 6e 74 53 74 72 69 6e 67 22 2c 61 24 2c 39 |ryntString",a$,9| 00001950 30 2d a9 28 61 24 29 2a 34 2c 31 31 34 2c 30 2c |0-.(a$)*4,114,0,| 00001960 30 0d 0e e2 2e c8 99 22 41 42 43 5f 50 72 79 6e |0......"ABC_Pryn| 00001970 74 53 74 72 69 6e 67 22 2c 62 24 2c 35 35 30 2d |tString",b$,550-| 00001980 a9 28 62 24 29 2a 34 2c 32 32 38 2c 30 2c 30 0d |.(b$)*4,228,0,0.| 00001990 0e ec 05 e1 0d 0e f6 0a dd f2 67 65 6e 34 0d 0f |..........gen4..| 000019a0 00 0b e7 61 63 74 25 20 8c 0d 0f 0a 15 6c 65 66 |...act% .....lef| 000019b0 74 24 28 53 25 29 3d 73 65 71 24 28 31 29 0d 0f |t$(S%)=seq$(1)..| 000019c0 14 19 72 69 67 74 24 28 53 25 29 3d 73 65 71 24 |..rigt$(S%)=seq$| 000019d0 28 b3 28 31 36 29 29 0d 0f 1e 1f e7 b3 3e 30 3a |(.(16))......>0:| 000019e0 c8 94 20 6c 65 66 74 24 28 53 25 29 2c 72 69 67 |.. left$(S%),rig| 000019f0 74 24 28 53 25 29 0d 0f 28 05 cc 0d 0f 32 19 6c |t$(S%)..(....2.l| 00001a00 65 66 74 24 28 53 25 29 3d 73 65 71 24 28 b3 28 |eft$(S%)=seq$(.(| 00001a10 31 36 29 29 0d 0f 3c 19 72 69 67 74 24 28 53 25 |16))..<.rigt$(S%| 00001a20 29 3d 73 65 71 24 28 b3 28 31 36 29 29 0d 0f 46 |)=seq$(.(16))..F| 00001a30 05 cd 0d 0f 50 3b c8 99 22 41 42 43 5f 50 72 79 |....P;.."ABC_Pry| 00001a40 6e 74 53 74 72 69 6e 67 22 2c 6c 65 66 74 24 28 |ntString",left$(| 00001a50 53 25 29 2c 39 30 2d a9 28 6c 65 66 74 24 28 53 |S%),90-.(left$(S| 00001a60 25 29 29 2a 34 2c 31 31 34 2c 30 2c 30 0d 0f 5a |%))*4,114,0,0..Z| 00001a70 3c c8 99 22 41 42 43 5f 50 72 79 6e 74 53 74 72 |<.."ABC_PryntStr| 00001a80 69 6e 67 22 2c 72 69 67 74 24 28 53 25 29 2c 35 |ing",rigt$(S%),5| 00001a90 35 30 2d a9 28 72 69 67 74 24 28 53 25 29 29 2a |50-.(rigt$(S%))*| 00001aa0 34 2c 32 32 38 2c 30 2c 30 0d 0f 64 05 e1 0d 0f |4,228,0,0..d....| 00001ab0 6e 0a dd f2 67 65 6e 35 0d 0f 78 14 e7 61 63 74 |n...gen5..x..act| 00001ac0 25 20 84 20 74 72 79 25 3e 31 20 8c 0d 0f 82 15 |% . try%>1 .....| 00001ad0 6c 65 66 74 24 28 53 25 29 3d 73 65 71 24 28 31 |left$(S%)=seq$(1| 00001ae0 29 0d 0f 8c 34 e7 74 72 79 25 3e 31 20 72 69 67 |)...4.try%>1 rig| 00001af0 74 24 28 53 25 29 3d 73 65 71 24 28 31 29 20 8b |t$(S%)=seq$(1) .| 00001b00 72 69 67 74 24 28 53 25 29 3d 73 65 71 24 28 b3 |rigt$(S%)=seq$(.| 00001b10 28 31 36 29 29 0d 0f 96 1f e7 b3 3e 30 3a c8 94 |(16))......>0:..| 00001b20 20 6c 65 66 74 24 28 53 25 29 2c 72 69 67 74 24 | left$(S%),rigt$| 00001b30 28 53 25 29 0d 0f a0 05 cc 0d 0f aa 19 6c 65 66 |(S%).........lef| 00001b40 74 24 28 53 25 29 3d 73 65 71 24 28 b3 28 31 36 |t$(S%)=seq$(.(16| 00001b50 29 29 0d 0f b4 19 72 69 67 74 24 28 53 25 29 3d |))....rigt$(S%)=| 00001b60 73 65 71 24 28 b3 28 31 36 29 29 0d 0f be 05 cd |seq$(.(16)).....| 00001b70 0d 0f c8 17 f2 73 70 6c 69 74 75 70 28 6c 65 66 |.....splitup(lef| 00001b80 74 24 28 53 25 29 29 0d 0f d2 0b e3 4a 25 3d 31 |t$(S%)).....J%=1| 00001b90 b8 33 0d 0f dc 3e c8 99 22 41 42 43 5f 50 72 79 |.3...>.."ABC_Pry| 00001ba0 6e 74 53 74 72 69 6e 67 22 2c 73 70 74 24 28 4a |ntString",spt$(J| 00001bb0 25 29 2c 39 30 2d a9 28 73 70 74 24 28 4a 25 29 |%),90-.(spt$(J%)| 00001bc0 29 2a 34 2c 31 33 30 2d 4a 25 2a 38 2c 30 2c 30 |)*4,130-J%*8,0,0| 00001bd0 0d 0f e6 05 ed 0d 0f f0 17 f2 73 70 6c 69 74 75 |..........splitu| 00001be0 70 28 72 69 67 74 24 28 53 25 29 29 0d 0f fa 0b |p(rigt$(S%))....| 00001bf0 e3 4a 25 3d 31 b8 33 0d 10 04 3f c8 99 22 41 42 |.J%=1.3...?.."AB| 00001c00 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c 73 |C_PryntString",s| 00001c10 70 74 24 28 4a 25 29 2c 35 35 30 2d a9 28 73 70 |pt$(J%),550-.(sp| 00001c20 74 24 28 4a 25 29 29 2a 34 2c 32 34 34 2d 4a 25 |t$(J%))*4,244-J%| 00001c30 2a 38 2c 30 2c 30 0d 10 0e 05 ed 0d 10 18 05 e1 |*8,0,0..........| 00001c40 0d 10 22 0a dd f2 67 65 6e 36 0d 10 2c 0b e7 61 |.."...gen6..,..a| 00001c50 63 74 25 20 8c 0d 10 36 15 6c 65 66 74 24 28 53 |ct% ...6.left$(S| 00001c60 25 29 3d 73 65 71 24 28 31 29 0d 10 40 19 72 69 |%)=seq$(1)..@.ri| 00001c70 67 74 24 28 53 25 29 3d 73 65 71 24 28 b3 28 31 |gt$(S%)=seq$(.(1| 00001c80 36 29 29 0d 10 4a 1f e7 b3 3e 30 3a c8 94 20 6c |6))..J...>0:.. l| 00001c90 65 66 74 24 28 53 25 29 2c 72 69 67 74 24 28 53 |eft$(S%),rigt$(S| 00001ca0 25 29 0d 10 54 05 cc 0d 10 5e 19 6c 65 66 74 24 |%)..T....^.left$| 00001cb0 28 53 25 29 3d 73 65 71 24 28 b3 28 31 36 29 29 |(S%)=seq$(.(16))| 00001cc0 0d 10 68 19 72 69 67 74 24 28 53 25 29 3d 73 65 |..h.rigt$(S%)=se| 00001cd0 71 24 28 b3 28 31 36 29 29 0d 10 72 05 cd 0d 10 |q$(.(16))..r....| 00001ce0 7c 10 61 24 3d 6c 65 66 74 24 28 53 25 29 0d 10 ||.a$=left$(S%)..| 00001cf0 86 10 62 24 3d 72 69 67 74 24 28 53 25 29 0d 10 |..b$=rigt$(S%)..| 00001d00 90 2d c8 99 22 41 42 43 5f 50 72 79 6e 74 53 74 |.-.."ABC_PryntSt| 00001d10 72 69 6e 67 22 2c 61 24 2c 39 30 2d a9 28 61 24 |ring",a$,90-.(a$| 00001d20 29 2a 34 2c 31 31 34 2c 30 2c 30 0d 10 9a 2e c8 |)*4,114,0,0.....| 00001d30 99 22 41 42 43 5f 50 72 79 6e 74 53 74 72 69 6e |."ABC_PryntStrin| 00001d40 67 22 2c 62 24 2c 35 35 30 2d a9 28 62 24 29 2a |g",b$,550-.(b$)*| 00001d50 34 2c 32 32 38 2c 30 2c 30 0d 10 a4 05 e1 0d 10 |4,228,0,0.......| 00001d60 ae 0f dd f2 6d 6f 76 65 62 65 6c 74 73 0d 10 b8 |....movebelts...| 00001d70 12 d6 20 53 43 52 4f 4c 4c 2c 20 73 70 64 25 0d |.. SCROLL, spd%.| 00001d80 10 c2 0b e3 53 25 3d 31 b8 36 0d 10 cc 12 e7 6c |....S%=1.6.....l| 00001d90 66 74 25 28 53 25 29 3e 2d 32 20 8c 0d 10 d6 13 |ft%(S%)>-2 .....| 00001da0 6c 65 66 79 25 28 53 25 29 2b 3d 73 70 64 25 0d |lefy%(S%)+=spd%.| 00001db0 10 e0 2a e7 6c 65 66 79 25 28 53 25 29 3e 32 39 |..*.lefy%(S%)>29| 00001dc0 34 3a 6c 65 66 79 25 28 53 25 29 3d 30 3a 6c 66 |4:lefy%(S%)=0:lf| 00001dd0 74 25 28 53 25 29 3d 2d 32 0d 10 ea 05 cc 0d 10 |t%(S%)=-2.......| 00001de0 f4 0f 6c 65 66 79 25 28 53 25 29 3d 30 0d 10 fe |..lefy%(S%)=0...| 00001df0 05 cd 0d 11 08 12 e7 72 67 74 25 28 53 25 29 3e |.......rgt%(S%)>| 00001e00 2d 32 20 8c 0d 11 12 13 72 69 67 79 25 28 53 25 |-2 .....rigy%(S%| 00001e10 29 2d 3d 73 70 64 25 0d 11 1c 29 e7 72 69 67 79 |)-=spd%...).rigy| 00001e20 25 28 53 25 29 3c 32 36 3a 72 69 67 79 25 28 53 |%(S%)<26:rigy%(S| 00001e30 25 29 3d 30 3a 72 67 74 25 28 53 25 29 3d 2d 32 |%)=0:rgt%(S%)=-2| 00001e40 0d 11 26 05 cc 0d 11 30 0f 72 69 67 79 25 28 53 |..&....0.rigy%(S| 00001e50 25 29 3d 30 0d 11 3a 05 cd 0d 11 44 05 ed 0d 11 |%)=0..:....D....| 00001e60 4e 05 e1 0d 11 58 0b dd f2 6d 61 74 63 68 0d 11 |N....X...match..| 00001e70 62 10 6d 6f 78 25 3d 6d 6f 78 25 3e 3e 31 0d 11 |b.mox%=mox%>>1..| 00001e80 6c 10 6d 6f 79 25 3d 6d 6f 79 25 3e 3e 32 0d 11 |l.moy%=moy%>>2..| 00001e90 76 0a 73 75 63 25 3d a3 0d 11 80 08 53 25 3d 31 |v.suc%=.....S%=1| 00001ea0 0d 11 8a 13 c8 95 20 53 25 3c 37 20 80 20 ac 73 |...... S%<7 . .s| 00001eb0 75 63 25 0d 11 94 16 e7 6c 66 74 25 28 53 25 29 |uc%.....lft%(S%)| 00001ec0 3e 2d 32 3a f2 6c 65 66 74 0d 11 9e 16 e7 72 67 |>-2:.left.....rg| 00001ed0 74 25 28 53 25 29 3e 2d 32 3a f2 72 69 67 74 0d |t%(S%)>-2:.rigt.| 00001ee0 11 a8 09 53 25 2b 3d 31 0d 11 b2 05 ce 0d 11 bc |...S%+=1........| 00001ef0 0a f2 66 6c 75 73 68 0d 11 c6 12 e7 66 69 6e 25 |..flush.....fin%| 00001f00 20 80 20 73 75 63 25 20 8c 0d 11 d0 1b e7 73 68 | . suc% ......sh| 00001f10 74 25 3e 30 20 80 20 ac 73 65 72 25 3a 73 68 74 |t%>0 . .ser%:sht| 00001f20 25 2d 3d 31 0d 11 da 12 e7 73 68 74 25 3d 30 3a |%-=1.....sht%=0:| 00001f30 6f 76 72 25 3d b9 0d 11 e4 05 cd 0d 11 ee 0b e7 |ovr%=...........| 00001f40 73 75 63 25 20 8c 0d 11 f8 0a 74 72 79 25 3d 30 |suc% .....try%=0| 00001f50 0d 12 02 27 c8 99 22 41 42 43 5f 55 6e 70 61 63 |...'.."ABC_Unpac| 00001f60 6b 50 6c 61 63 65 22 2c 22 74 32 22 2c 7a 25 2c |kPlace","t2",z%,| 00001f70 32 35 32 2c 32 34 38 0d 12 0c 24 f2 6e 6f 69 73 |252,248...$.nois| 00001f80 65 28 22 50 69 6e 67 22 2c 32 2c 26 31 37 46 2c |e("Ping",2,&17F,| 00001f90 26 34 38 30 30 2c 26 31 30 30 29 0d 12 16 0a f2 |&4800,&100).....| 00001fa0 63 6f 6e 67 72 0d 12 20 12 e7 ac 73 65 72 25 3a |congr.. ...ser%:| 00001fb0 72 79 74 25 2b 3d 31 0d 12 2a 2a e7 ac 73 65 72 |ryt%+=1..**..ser| 00001fc0 25 3a 73 63 72 25 28 63 75 72 25 29 2b 3d 31 30 |%:scr%(cur%)+=10| 00001fd0 2a 67 72 64 25 2b 62 6f 6e 25 2b 62 6c 74 25 2a |*grd%+bon%+blt%*| 00001fe0 35 0d 12 34 22 e7 74 69 6d 25 3a 73 63 72 25 28 |5..4".tim%:scr%(| 00001ff0 63 75 72 25 29 2b 3d 28 32 30 30 2d 73 61 6e 25 |cur%)+=(200-san%| 00002000 29 81 38 0d 12 3e 10 62 6f 6e 25 3d 31 30 2a 67 |).8..>.bon%=10*g| 00002010 72 64 25 0d 12 48 2d e7 66 69 6e 25 3a c8 99 22 |rd%..H-.fin%:.."| 00002020 41 42 43 5f 55 6e 70 61 63 6b 50 6c 61 63 65 22 |ABC_UnpackPlace"| 00002030 2c 22 74 34 22 2c 7a 25 2c 32 35 32 2c 32 34 38 |,"t4",z%,252,248| 00002040 0d 12 52 05 cc 0d 12 5c 23 f2 6e 6f 69 73 65 28 |..R....\#.noise(| 00002050 22 42 75 72 70 22 2c 32 2c 26 31 37 46 2c 26 31 |"Burp",2,&17F,&1| 00002060 31 30 30 2c 26 31 30 29 0d 12 66 27 c8 99 22 41 |100,&10)..f'.."A| 00002070 42 43 5f 55 6e 70 61 63 6b 50 6c 61 63 65 22 2c |BC_UnpackPlace",| 00002080 22 74 33 22 2c 7a 25 2c 32 35 32 2c 32 34 38 0d |"t3",z%,252,248.| 00002090 12 70 0b 72 6f 6e 25 2b 3d 31 0d 12 7a 1b e7 73 |.p.ron%+=1..z..s| 000020a0 68 74 25 3e 30 20 80 20 ac 73 65 72 25 3a 73 68 |ht%>0 . .ser%:sh| 000020b0 74 25 2d 3d 31 0d 12 84 12 e7 73 68 74 25 3d 30 |t%-=1.....sht%=0| 000020c0 3a 6f 76 72 25 3d b9 0d 12 8e 0b 74 72 79 25 2b |:ovr%=.....try%+| 000020d0 3d 31 0d 12 98 19 e7 74 72 79 25 3d 32 20 80 20 |=1.....try%=2 . | 000020e0 ac 6f 76 72 25 3a f2 68 69 6e 74 0d 12 a2 1e e7 |.ovr%:.hint.....| 000020f0 66 69 6e 25 20 80 20 67 72 64 25 3d 36 3a f2 64 |fin% . grd%=6:.d| 00002100 65 6c 61 79 28 31 30 30 29 0d 12 ac 05 cd 0d 12 |elay(100).......| 00002110 b6 0b f2 75 70 64 61 74 65 0d 12 c0 07 d1 3d 30 |...update.....=0| 00002120 0d 12 ca 05 e1 0d 12 d4 0a dd f2 6c 65 66 74 0d |...........left.| 00002130 12 de 2d e7 ac a4 61 72 65 61 28 31 34 34 2c 6c |..-...area(144,l| 00002140 65 66 79 25 28 53 25 29 2d 33 34 2c 31 36 30 2c |efy%(S%)-34,160,| 00002150 6c 65 66 79 25 28 53 25 29 29 3a e1 0d 12 e8 32 |lefy%(S%)):....2| 00002160 e7 67 72 64 25 3d 33 20 f2 61 6e 73 33 28 6c 65 |.grd%=3 .ans3(le| 00002170 66 74 24 28 53 25 29 29 20 8b f2 61 6e 73 31 32 |ft$(S%)) ..ans12| 00002180 34 35 36 28 6c 65 66 74 24 28 53 25 29 29 0d 12 |456(left$(S%))..| 00002190 f2 0c e7 ac 73 75 63 25 3a e1 0d 12 fc 09 e6 20 |....suc%:...... | 000021a0 30 2c 34 0d 13 06 23 c8 93 c8 90 20 36 34 2c 6c |0,4...#.... 64,l| 000021b0 65 66 79 25 28 53 25 29 2a 34 2d 31 35 32 2c 32 |efy%(S%)*4-152,2| 000021c0 35 34 2c 31 35 32 0d 13 10 0f 6c 66 74 25 28 53 |54,152....lft%(S| 000021d0 25 29 3d 2d 32 0d 13 1a 05 e1 0d 13 24 0a dd f2 |%)=-2.......$...| 000021e0 72 69 67 74 0d 13 2e 2d e7 ac a4 61 72 65 61 28 |rigt...-...area(| 000021f0 34 38 30 2c 72 69 67 79 25 28 53 25 29 2d 33 34 |480,rigy%(S%)-34| 00002200 2c 34 39 36 2c 72 69 67 79 25 28 53 25 29 29 3a |,496,rigy%(S%)):| 00002210 e1 0d 13 38 32 e7 67 72 64 25 3d 33 20 f2 61 6e |...82.grd%=3 .an| 00002220 73 33 28 72 69 67 74 24 28 53 25 29 29 20 8b f2 |s3(rigt$(S%)) ..| 00002230 61 6e 73 31 32 34 35 36 28 72 69 67 74 24 28 53 |ans12456(rigt$(S| 00002240 25 29 29 0d 13 42 0c e7 ac 73 75 63 25 3a e1 0d |%))..B...suc%:..| 00002250 13 4c 09 e6 20 30 2c 34 0d 13 56 5c e7 72 69 67 |.L.. 0,4..V\.rig| 00002260 79 25 28 53 25 29 2a 34 2d 31 35 32 3e 32 35 36 |y%(S%)*4-152>256| 00002270 20 c8 93 c8 90 20 39 36 30 2c 72 69 67 79 25 28 | .... 960,rigy%(| 00002280 53 25 29 2a 34 2d 31 35 32 2c 32 35 34 2c 31 35 |S%)*4-152,254,15| 00002290 32 20 8b c8 93 c8 90 20 39 36 30 2c 32 36 30 2c |2 ..... 960,260,| 000022a0 32 35 34 2c 28 72 69 67 79 25 28 53 25 29 2d 36 |254,(rigy%(S%)-6| 000022b0 35 29 2a 34 0d 13 60 0f 72 67 74 25 28 53 25 29 |5)*4..`.rgt%(S%)| 000022c0 3d 2d 32 0d 13 6a 05 e1 0d 13 74 0a dd f2 68 69 |=-2..j....t...hi| 000022d0 6e 74 0d 13 7e 0d c8 8e 20 67 72 64 25 20 ca 0d |nt..~... grd% ..| 000022e0 13 88 0e c9 20 31 3a f2 68 69 6e 74 31 0d 13 92 |.... 1:.hint1...| 000022f0 0e c9 20 32 3a f2 68 69 6e 74 32 0d 13 9c 0e c9 |.. 2:.hint2.....| 00002300 20 33 3a f2 68 69 6e 74 33 0d 13 a6 0e c9 20 35 | 3:.hint3..... 5| 00002310 3a f2 68 69 6e 74 35 0d 13 b0 0e c9 20 34 3a f2 |:.hint5..... 4:.| 00002320 68 69 6e 74 34 0d 13 ba 0c 7f 3a f2 68 69 6e 74 |hint4.....:.hint| 00002330 36 0d 13 c4 05 cb 0d 13 ce 05 e1 0d 13 d8 0b dd |6...............| 00002340 f2 68 69 6e 74 31 0d 13 e2 29 c8 99 22 41 42 43 |.hint1...).."ABC| 00002350 5f 55 6e 70 61 63 6b 50 6c 61 63 65 22 2c 22 68 |_UnpackPlace","h| 00002360 69 6e 74 22 2c 7a 25 2c 31 36 30 2c 31 33 32 0d |int",z%,160,132.| 00002370 13 ec 2b c8 99 22 41 42 43 5f 55 6e 70 61 63 6b |..+.."ABC_Unpack| 00002380 53 70 72 69 74 65 22 2c 6e 6d 65 24 28 31 29 2c |Sprite",nme$(1),| 00002390 7a 25 2c 32 37 32 2c 31 32 36 0d 13 f6 16 61 24 |z%,272,126....a$| 000023a0 3d a4 61 6c 69 61 73 28 69 6e 67 25 28 31 29 29 |=.alias(ing%(1))| 000023b0 0d 14 00 14 78 73 63 25 3d 33 32 30 2d a9 28 61 |....xsc%=320-.(a| 000023c0 24 29 2a 38 0d 14 0a 27 c8 99 22 41 42 43 5f 50 |$)*8...'.."ABC_P| 000023d0 72 79 6e 74 53 74 72 69 6e 67 22 2c 61 24 2c 78 |ryntString",a$,x| 000023e0 73 63 25 2c 31 30 33 2c 31 2c 37 0d 14 14 29 c8 |sc%,103,1,7...).| 000023f0 99 22 41 42 43 5f 50 72 79 6e 74 53 74 72 69 6e |."ABC_PryntStrin| 00002400 67 22 2c 61 24 2c 78 73 63 25 2d 32 2c 31 30 34 |g",a$,xsc%-2,104| 00002410 2c 31 2c 30 0d 14 1e 05 e1 0d 14 28 0b dd f2 68 |,1,0.......(...h| 00002420 69 6e 74 32 0d 14 32 29 c8 99 22 41 42 43 5f 55 |int2..2).."ABC_U| 00002430 6e 70 61 63 6b 50 6c 61 63 65 22 2c 22 68 69 6e |npackPlace","hin| 00002440 74 22 2c 7a 25 2c 31 36 30 2c 31 33 32 0d 14 3c |t",z%,160,132..<| 00002450 0e 61 24 3d 73 65 71 24 28 30 29 0d 14 46 14 78 |.a$=seq$(0)..F.x| 00002460 73 63 25 3d 33 32 30 2d a9 28 61 24 29 2a 38 0d |sc%=320-.(a$)*8.| 00002470 14 50 27 c8 99 22 41 42 43 5f 50 72 79 6e 74 53 |.P'.."ABC_PryntS| 00002480 74 72 69 6e 67 22 2c 61 24 2c 78 73 63 25 2c 31 |tring",a$,xsc%,1| 00002490 32 33 2c 31 2c 37 0d 14 5a 29 c8 99 22 41 42 43 |23,1,7..Z).."ABC| 000024a0 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c 61 24 |_PryntString",a$| 000024b0 2c 78 73 63 25 2d 32 2c 31 32 34 2c 31 2c 30 0d |,xsc%-2,124,1,0.| 000024c0 14 64 0e 61 24 3d 73 65 71 24 28 31 29 0d 14 6e |.d.a$=seq$(1)..n| 000024d0 14 78 73 63 25 3d 33 32 30 2d a9 28 61 24 29 2a |.xsc%=320-.(a$)*| 000024e0 38 0d 14 78 27 c8 99 22 41 42 43 5f 50 72 79 6e |8..x'.."ABC_Pryn| 000024f0 74 53 74 72 69 6e 67 22 2c 61 24 2c 78 73 63 25 |tString",a$,xsc%| 00002500 2c 31 30 33 2c 31 2c 37 0d 14 82 29 c8 99 22 41 |,103,1,7...).."A| 00002510 42 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c |BC_PryntString",| 00002520 61 24 2c 78 73 63 25 2d 32 2c 31 30 34 2c 31 2c |a$,xsc%-2,104,1,| 00002530 30 0d 14 8c 05 e1 0d 14 96 0b dd f2 68 69 6e 74 |0...........hint| 00002540 33 0d 14 a0 0b e7 74 77 6f 25 20 8c 0d 14 aa 22 |3.....two% ...."| 00002550 e7 a7 64 69 73 24 28 31 29 2c 73 65 71 24 28 73 |..dis$(1),seq$(s| 00002560 65 71 25 29 2c 70 73 61 25 29 3e 30 20 8c 0d 14 |eq%),psa%)>0 ...| 00002570 b4 0e 61 24 3d 64 69 73 24 28 31 29 0d 14 be 1d |..a$=dis$(1)....| 00002580 78 78 78 25 3d a7 61 24 2c 73 65 71 24 28 73 65 |xxx%=.a$,seq$(se| 00002590 71 25 29 2c 70 73 61 25 29 0d 14 c8 1e 61 24 3d |q%),psa%)....a$=| 000025a0 c1 61 24 2c 78 78 78 25 2c a9 28 73 65 71 24 28 |.a$,xxx%,.(seq$(| 000025b0 73 65 71 25 29 29 29 0d 14 d2 3c c8 99 22 41 42 |seq%)))...<.."AB| 000025c0 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c 61 |C_PryntString",a| 000025d0 24 2c 33 32 30 2d a9 28 64 69 73 24 28 31 29 29 |$,320-.(dis$(1))| 000025e0 2a 34 2b 78 78 78 25 2a 38 2d 38 2c 31 30 35 2c |*4+xxx%*8-8,105,| 000025f0 30 2c 37 0d 14 dc 05 cc 0d 14 e6 0e 61 24 3d 64 |0,7.........a$=d| 00002600 69 73 24 28 32 29 0d 14 f0 1d 78 78 78 25 3d a7 |is$(2)....xxx%=.| 00002610 61 24 2c 73 65 71 24 28 73 65 71 25 29 2c 70 73 |a$,seq$(seq%),ps| 00002620 62 25 29 0d 14 fa 1e 61 24 3d c1 61 24 2c 78 78 |b%)....a$=.a$,xx| 00002630 78 25 2c a9 28 73 65 71 24 28 73 65 71 25 29 29 |x%,.(seq$(seq%))| 00002640 29 0d 15 04 3b c8 99 22 41 42 43 5f 50 72 79 6e |)...;.."ABC_Pryn| 00002650 74 53 74 72 69 6e 67 22 2c 61 24 2c 33 32 30 2d |tString",a$,320-| 00002660 a9 28 64 69 73 24 28 32 29 29 2a 34 2b 78 78 78 |.(dis$(2))*4+xxx| 00002670 25 2a 38 2d 38 2c 39 38 2c 30 2c 37 0d 15 0e 05 |%*8-8,98,0,7....| 00002680 cd 0d 15 18 05 cc 0d 15 22 0e 61 24 3d 64 69 73 |........".a$=dis| 00002690 24 28 31 29 0d 15 2c 1d 78 78 78 25 3d a7 61 24 |$(1)..,.xxx%=.a$| 000026a0 2c 73 65 71 24 28 73 65 71 25 29 2c 70 73 61 25 |,seq$(seq%),psa%| 000026b0 29 0d 15 36 1e 61 24 3d c1 61 24 2c 78 78 78 25 |)..6.a$=.a$,xxx%| 000026c0 2c a9 28 73 65 71 24 28 73 65 71 25 29 29 29 0d |,.(seq$(seq%))).| 000026d0 15 40 3c c8 99 22 41 42 43 5f 50 72 79 6e 74 53 |.@<.."ABC_PryntS| 000026e0 74 72 69 6e 67 22 2c 61 24 2c 33 32 30 2d a9 28 |tring",a$,320-.(| 000026f0 64 69 73 24 28 31 29 29 2a 34 2b 78 78 78 25 2a |dis$(1))*4+xxx%*| 00002700 38 2d 38 2c 31 30 35 2c 30 2c 37 0d 15 4a 05 cd |8-8,105,0,7..J..| 00002710 0d 15 54 0f e7 a9 28 6a 24 29 3e 33 38 20 8c 0d |..T...(j$)>38 ..| 00002720 15 5e 09 4a 25 3d 33 38 0d 15 68 15 c8 95 20 c1 |.^.J%=38..h... .| 00002730 6a 24 2c 4a 25 2c 31 29 3c 3e 22 20 22 0d 15 72 |j$,J%,1)<>" "..r| 00002740 09 4a 25 2d 3d 31 0d 15 7c 05 ce 0d 15 86 10 61 |.J%-=1..|......a| 00002750 24 3d c0 6a 24 2c 4a 25 2d 31 29 0d 15 90 10 62 |$=.j$,J%-1)....b| 00002760 24 3d c1 6a 24 2c 4a 25 2b 31 29 0d 15 9a 14 78 |$=.j$,J%+1)....x| 00002770 73 63 25 3d 33 32 30 2d a9 28 61 24 29 2a 34 0d |sc%=320-.(a$)*4.| 00002780 15 a4 26 c8 99 22 41 42 43 5f 50 72 79 6e 74 53 |..&.."ABC_PryntS| 00002790 74 72 69 6e 67 22 2c 61 24 2c 78 73 63 25 2c 38 |tring",a$,xsc%,8| 000027a0 37 2c 30 2c 37 0d 15 ae 27 c8 99 22 41 42 43 5f |7,0,7...'.."ABC_| 000027b0 50 72 79 6e 74 53 74 72 69 6e 67 22 2c 61 24 2c |PryntString",a$,| 000027c0 78 73 63 25 2c 38 38 2c 30 2c 31 31 0d 15 b8 14 |xsc%,88,0,11....| 000027d0 78 73 63 25 3d 33 32 30 2d a9 28 62 24 29 2a 34 |xsc%=320-.(b$)*4| 000027e0 0d 15 c2 26 c8 99 22 41 42 43 5f 50 72 79 6e 74 |...&.."ABC_Prynt| 000027f0 53 74 72 69 6e 67 22 2c 62 24 2c 78 73 63 25 2c |String",b$,xsc%,| 00002800 37 39 2c 30 2c 37 0d 15 cc 27 c8 99 22 41 42 43 |79,0,7...'.."ABC| 00002810 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c 62 24 |_PryntString",b$| 00002820 2c 78 73 63 25 2c 38 30 2c 30 2c 31 31 0d 15 d6 |,xsc%,80,0,11...| 00002830 05 cc 0d 15 e0 14 78 73 63 25 3d 33 32 30 2d a9 |......xsc%=320-.| 00002840 28 6a 24 29 2a 34 0d 15 ea 26 c8 99 22 41 42 43 |(j$)*4...&.."ABC| 00002850 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c 6a 24 |_PryntString",j$| 00002860 2c 78 73 63 25 2c 38 37 2c 30 2c 37 0d 15 f4 27 |,xsc%,87,0,7...'| 00002870 c8 99 22 41 42 43 5f 50 72 79 6e 74 53 74 72 69 |.."ABC_PryntStri| 00002880 6e 67 22 2c 6a 24 2c 78 73 63 25 2c 38 38 2c 30 |ng",j$,xsc%,88,0| 00002890 2c 31 31 0d 15 fe 05 cd 0d 16 08 05 e1 0d 16 12 |,11.............| 000028a0 0b dd f2 68 69 6e 74 34 0d 16 1c 16 e7 a7 64 69 |...hint4......di| 000028b0 73 24 28 31 29 2c 22 5f 22 29 3e 30 20 8c 0d 16 |s$(1),"_")>0 ...| 000028c0 26 16 78 78 78 25 3d a7 64 69 73 24 28 31 29 2c |&.xxx%=.dis$(1),| 000028d0 22 5f 22 29 0d 16 30 0e 61 24 3d 73 65 71 24 28 |"_")..0.a$=seq$(| 000028e0 31 29 0d 16 3a 20 78 73 63 25 3d 33 30 36 2d a9 |1)..: xsc%=306-.| 000028f0 28 64 69 73 24 28 31 29 29 2a 34 2b 78 78 78 25 |(dis$(1))*4+xxx%| 00002900 2a 38 0d 16 44 1c e7 74 77 6f 25 20 79 73 63 25 |*8..D..two% ysc%| 00002910 3d 31 32 33 20 8b 79 73 63 25 3d 31 31 35 0d 16 |=123 .ysc%=115..| 00002920 4e 28 c8 99 22 41 42 43 5f 50 72 79 6e 74 53 74 |N(.."ABC_PryntSt| 00002930 72 69 6e 67 22 2c 61 24 2c 78 73 63 25 2c 79 73 |ring",a$,xsc%,ys| 00002940 63 25 2c 30 2c 37 0d 16 58 2d c8 99 22 41 42 43 |c%,0,7..X-.."ABC| 00002950 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c 61 24 |_PryntString",a$| 00002960 2c 78 73 63 25 2d 32 2c 79 73 63 25 2b 31 2c 30 |,xsc%-2,ysc%+1,0| 00002970 2c 31 30 0d 16 62 05 cc 0d 16 6c 16 78 78 78 25 |,10..b....l.xxx%| 00002980 3d a7 64 69 73 24 28 32 29 2c 22 5f 22 29 0d 16 |=.dis$(2),"_")..| 00002990 76 0e 61 24 3d 73 65 71 24 28 31 29 0d 16 80 20 |v.a$=seq$(1)... | 000029a0 78 73 63 25 3d 33 30 36 2d a9 28 64 69 73 24 28 |xsc%=306-.(dis$(| 000029b0 32 29 29 2a 34 2b 78 78 78 25 2a 38 0d 16 8a 27 |2))*4+xxx%*8...'| 000029c0 c8 99 22 41 42 43 5f 50 72 79 6e 74 53 74 72 69 |.."ABC_PryntStri| 000029d0 6e 67 22 2c 61 24 2c 78 73 63 25 2c 31 31 35 2c |ng",a$,xsc%,115,| 000029e0 30 2c 37 0d 16 94 2a c8 99 22 41 42 43 5f 50 72 |0,7...*.."ABC_Pr| 000029f0 79 6e 74 53 74 72 69 6e 67 22 2c 61 24 2c 78 73 |yntString",a$,xs| 00002a00 63 25 2d 32 2c 31 31 36 2c 30 2c 31 30 0d 16 9e |c%-2,116,0,10...| 00002a10 05 cd 0d 16 a8 0f e7 a9 28 6a 24 29 3e 33 38 20 |........(j$)>38 | 00002a20 8c 0d 16 b2 09 4a 25 3d 33 38 0d 16 bc 15 c8 95 |.....J%=38......| 00002a30 20 c1 6a 24 2c 4a 25 2c 31 29 3c 3e 22 20 22 0d | .j$,J%,1)<>" ".| 00002a40 16 c6 09 4a 25 2d 3d 31 0d 16 d0 05 ce 0d 16 da |...J%-=1........| 00002a50 10 61 24 3d c0 6a 24 2c 4a 25 2d 31 29 0d 16 e4 |.a$=.j$,J%-1)...| 00002a60 10 62 24 3d c1 6a 24 2c 4a 25 2b 31 29 0d 16 ee |.b$=.j$,J%+1)...| 00002a70 14 78 73 63 25 3d 33 32 30 2d a9 28 61 24 29 2a |.xsc%=320-.(a$)*| 00002a80 34 0d 16 f8 26 c8 99 22 41 42 43 5f 50 72 79 6e |4...&.."ABC_Pryn| 00002a90 74 53 74 72 69 6e 67 22 2c 61 24 2c 78 73 63 25 |tString",a$,xsc%| 00002aa0 2c 39 35 2c 30 2c 37 0d 17 02 27 c8 99 22 41 42 |,95,0,7...'.."AB| 00002ab0 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c 61 |C_PryntString",a| 00002ac0 24 2c 78 73 63 25 2c 39 36 2c 30 2c 31 31 0d 17 |$,xsc%,96,0,11..| 00002ad0 0c 14 78 73 63 25 3d 33 32 30 2d a9 28 62 24 29 |..xsc%=320-.(b$)| 00002ae0 2a 34 0d 17 16 26 c8 99 22 41 42 43 5f 50 72 79 |*4...&.."ABC_Pry| 00002af0 6e 74 53 74 72 69 6e 67 22 2c 62 24 2c 78 73 63 |ntString",b$,xsc| 00002b00 25 2c 38 37 2c 30 2c 37 0d 17 20 27 c8 99 22 41 |%,87,0,7.. '.."A| 00002b10 42 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c |BC_PryntString",| 00002b20 62 24 2c 78 73 63 25 2c 38 38 2c 30 2c 31 31 0d |b$,xsc%,88,0,11.| 00002b30 17 2a 05 cc 0d 17 34 14 78 73 63 25 3d 33 32 30 |.*....4.xsc%=320| 00002b40 2d a9 28 6a 24 29 2a 34 0d 17 3e 26 c8 99 22 41 |-.(j$)*4..>&.."A| 00002b50 42 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c |BC_PryntString",| 00002b60 6a 24 2c 78 73 63 25 2c 39 35 2c 30 2c 37 0d 17 |j$,xsc%,95,0,7..| 00002b70 48 27 c8 99 22 41 42 43 5f 50 72 79 6e 74 53 74 |H'.."ABC_PryntSt| 00002b80 72 69 6e 67 22 2c 6a 24 2c 78 73 63 25 2c 39 36 |ring",j$,xsc%,96| 00002b90 2c 30 2c 31 31 0d 17 52 05 cd 0d 17 5c 05 e1 0d |,0,11..R....\...| 00002ba0 17 66 0b dd f2 68 69 6e 74 35 0d 17 70 0e f2 66 |.f...hint5..p..f| 00002bb0 72 61 63 74 28 6a 24 29 0d 17 7a 0b e3 4a 25 3d |ract(j$)..z..J%=| 00002bc0 31 b8 34 0d 17 84 1a 78 73 63 25 3d 33 32 30 2d |1.4....xsc%=320-| 00002bd0 a9 28 73 70 74 24 28 4a 25 29 29 2a 34 0d 17 8e |.(spt$(J%))*4...| 00002be0 32 c8 99 22 41 42 43 5f 50 72 79 6e 74 53 74 72 |2.."ABC_PryntStr| 00002bf0 69 6e 67 22 2c 73 70 74 24 28 4a 25 29 2c 78 73 |ing",spt$(J%),xs| 00002c00 63 25 2c 31 30 36 2d 4a 25 2a 38 2c 30 2c 37 0d |c%,106-J%*8,0,7.| 00002c10 17 98 35 c8 99 22 41 42 43 5f 50 72 79 6e 74 53 |..5.."ABC_PryntS| 00002c20 74 72 69 6e 67 22 2c 73 70 74 24 28 4a 25 29 2c |tring",spt$(J%),| 00002c30 78 73 63 25 2d 32 2c 31 30 37 2d 4a 25 2a 38 2c |xsc%-2,107-J%*8,| 00002c40 30 2c 31 30 0d 17 a2 05 ed 0d 17 ac 05 e1 0d 17 |0,10............| 00002c50 b6 0b dd f2 68 69 6e 74 36 0d 17 c0 16 e7 a7 64 |....hint6......d| 00002c60 69 73 24 28 31 29 2c 22 5f 22 29 3e 30 20 8c 0d |is$(1),"_")>0 ..| 00002c70 17 ca 16 78 78 78 25 3d a7 64 69 73 24 28 31 29 |...xxx%=.dis$(1)| 00002c80 2c 22 5f 22 29 0d 17 d4 0e 61 24 3d 73 65 71 24 |,"_")....a$=seq$| 00002c90 28 31 29 0d 17 de 22 78 73 63 25 3d 33 30 34 2d |(1)..."xsc%=304-| 00002ca0 a9 28 64 69 73 24 28 31 29 29 2a 34 2b 78 78 78 |.(dis$(1))*4+xxx| 00002cb0 25 2a 38 2b 38 0d 17 e8 1c e7 74 77 6f 25 20 79 |%*8+8.....two% y| 00002cc0 73 63 25 3d 31 32 33 20 8b 79 73 63 25 3d 31 31 |sc%=123 .ysc%=11| 00002cd0 35 0d 17 f2 28 c8 99 22 41 42 43 5f 50 72 79 6e |5...(.."ABC_Pryn| 00002ce0 74 53 74 72 69 6e 67 22 2c 61 24 2c 78 73 63 25 |tString",a$,xsc%| 00002cf0 2c 79 73 63 25 2c 30 2c 37 0d 17 fc 2d c8 99 22 |,ysc%,0,7...-.."| 00002d00 41 42 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 |ABC_PryntString"| 00002d10 2c 61 24 2c 78 73 63 25 2d 32 2c 79 73 63 25 2b |,a$,xsc%-2,ysc%+| 00002d20 31 2c 30 2c 31 30 0d 18 06 05 cc 0d 18 10 16 78 |1,0,10.........x| 00002d30 78 78 25 3d a7 64 69 73 24 28 32 29 2c 22 5f 22 |xx%=.dis$(2),"_"| 00002d40 29 0d 18 1a 0e 61 24 3d 73 65 71 24 28 31 29 0d |)....a$=seq$(1).| 00002d50 18 24 22 78 73 63 25 3d 33 30 34 2d a9 28 64 69 |.$"xsc%=304-.(di| 00002d60 73 24 28 32 29 29 2a 34 2b 78 78 78 25 2a 38 2b |s$(2))*4+xxx%*8+| 00002d70 38 0d 18 2e 27 c8 99 22 41 42 43 5f 50 72 79 6e |8...'.."ABC_Pryn| 00002d80 74 53 74 72 69 6e 67 22 2c 61 24 2c 78 73 63 25 |tString",a$,xsc%| 00002d90 2c 31 31 35 2c 30 2c 37 0d 18 38 2a c8 99 22 41 |,115,0,7..8*.."A| 00002da0 42 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c |BC_PryntString",| 00002db0 61 24 2c 78 73 63 25 2d 32 2c 31 31 36 2c 30 2c |a$,xsc%-2,116,0,| 00002dc0 31 30 0d 18 42 05 cd 0d 18 4c 0f e7 a9 28 6a 24 |10..B....L...(j$| 00002dd0 29 3e 33 38 20 8c 0d 18 56 09 4a 25 3d 33 38 0d |)>38 ...V.J%=38.| 00002de0 18 60 15 c8 95 20 c1 6a 24 2c 4a 25 2c 31 29 3c |.`... .j$,J%,1)<| 00002df0 3e 22 20 22 0d 18 6a 09 4a 25 2d 3d 31 0d 18 74 |>" "..j.J%-=1..t| 00002e00 05 ce 0d 18 7e 10 61 24 3d c0 6a 24 2c 4a 25 2d |....~.a$=.j$,J%-| 00002e10 31 29 0d 18 88 10 62 24 3d c1 6a 24 2c 4a 25 2b |1)....b$=.j$,J%+| 00002e20 31 29 0d 18 92 14 78 73 63 25 3d 33 32 30 2d a9 |1)....xsc%=320-.| 00002e30 28 61 24 29 2a 34 0d 18 9c 26 c8 99 22 41 42 43 |(a$)*4...&.."ABC| 00002e40 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c 61 24 |_PryntString",a$| 00002e50 2c 78 73 63 25 2c 39 35 2c 30 2c 37 0d 18 a6 27 |,xsc%,95,0,7...'| 00002e60 c8 99 22 41 42 43 5f 50 72 79 6e 74 53 74 72 69 |.."ABC_PryntStri| 00002e70 6e 67 22 2c 61 24 2c 78 73 63 25 2c 39 36 2c 30 |ng",a$,xsc%,96,0| 00002e80 2c 31 31 0d 18 b0 14 78 73 63 25 3d 33 32 30 2d |,11....xsc%=320-| 00002e90 a9 28 62 24 29 2a 34 0d 18 ba 26 c8 99 22 41 42 |.(b$)*4...&.."AB| 00002ea0 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c 62 |C_PryntString",b| 00002eb0 24 2c 78 73 63 25 2c 38 37 2c 30 2c 37 0d 18 c4 |$,xsc%,87,0,7...| 00002ec0 27 c8 99 22 41 42 43 5f 50 72 79 6e 74 53 74 72 |'.."ABC_PryntStr| 00002ed0 69 6e 67 22 2c 62 24 2c 78 73 63 25 2c 38 38 2c |ing",b$,xsc%,88,| 00002ee0 30 2c 31 31 0d 18 ce 05 cc 0d 18 d8 14 78 73 63 |0,11.........xsc| 00002ef0 25 3d 33 32 30 2d a9 28 6a 24 29 2a 34 0d 18 e2 |%=320-.(j$)*4...| 00002f00 26 c8 99 22 41 42 43 5f 50 72 79 6e 74 53 74 72 |&.."ABC_PryntStr| 00002f10 69 6e 67 22 2c 6a 24 2c 78 73 63 25 2c 39 35 2c |ing",j$,xsc%,95,| 00002f20 30 2c 37 0d 18 ec 27 c8 99 22 41 42 43 5f 50 72 |0,7...'.."ABC_Pr| 00002f30 79 6e 74 53 74 72 69 6e 67 22 2c 6a 24 2c 78 73 |yntString",j$,xs| 00002f40 63 25 2c 39 36 2c 30 2c 31 31 0d 18 f6 05 cd 0d |c%,96,0,11......| 00002f50 19 00 05 e1 0d 19 0a 12 dd f2 61 6e 73 31 32 34 |..........ans124| 00002f60 35 36 28 68 24 29 0d 19 14 11 e7 68 24 3d 73 65 |56(h$).....h$=se| 00002f70 71 24 28 31 29 20 8c 0d 19 1e 0a 73 75 63 25 3d |q$(1) .....suc%=| 00002f80 b9 0d 19 28 0a 66 69 6e 25 3d b9 0d 19 32 05 cd |...(.fin%=...2..| 00002f90 0d 19 3c 05 e1 0d 19 46 0e dd f2 61 6e 73 33 28 |..<....F...ans3(| 00002fa0 68 24 29 0d 19 50 15 e7 73 65 71 24 28 73 65 71 |h$)..P..seq$(seq| 00002fb0 25 29 3c 3e 68 24 3a e1 0d 19 5a 0a 73 75 63 25 |%)<>h$:...Z.suc%| 00002fc0 3d b9 0d 19 64 15 e7 73 65 71 25 3d 62 65 67 25 |=...d..seq%=beg%| 00002fd0 3a 66 69 6e 25 3d b9 0d 19 6e 0e 61 24 3d 64 69 |:fin%=...n.a$=di| 00002fe0 73 24 28 31 29 0d 19 78 0b e7 74 77 6f 25 20 8c |s$(1)..x..two% .| 00002ff0 0d 19 82 1d e7 a7 61 24 2c 73 65 71 24 28 73 65 |......a$,seq$(se| 00003000 71 25 29 2c 70 73 61 25 29 3e 30 20 8c 0d 19 8c |q%),psa%)>0 ....| 00003010 2b 70 73 61 25 3d a7 61 24 2c 73 65 71 24 28 73 |+psa%=.a$,seq$(s| 00003020 65 71 25 29 2c 70 73 61 25 29 2b a9 28 73 65 71 |eq%),psa%)+.(seq| 00003030 24 28 73 65 71 25 29 29 0d 19 96 12 61 24 3d c0 |$(seq%))....a$=.| 00003040 61 24 2c 70 73 61 25 2d 31 29 0d 19 a0 19 78 73 |a$,psa%-1)....xs| 00003050 63 25 3d 33 32 30 2d a9 28 64 69 73 24 28 31 29 |c%=320-.(dis$(1)| 00003060 29 2a 34 0d 19 aa 06 c8 96 0d 19 b4 27 c8 99 22 |)*4.........'.."| 00003070 41 42 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 |ABC_PryntString"| 00003080 2c 61 24 2c 78 73 63 25 2c 31 30 35 2c 30 2c 37 |,a$,xsc%,105,0,7| 00003090 0d 19 be 29 c8 99 22 41 42 43 5f 50 72 79 6e 74 |...).."ABC_Prynt| 000030a0 53 74 72 69 6e 67 22 2c 61 24 2c 78 73 63 25 2d |String",a$,xsc%-| 000030b0 32 2c 31 30 36 2c 30 2c 39 0d 19 c8 05 cc 0d 19 |2,106,0,9.......| 000030c0 d2 0e 61 24 3d 64 69 73 24 28 32 29 0d 19 dc 2b |..a$=dis$(2)...+| 000030d0 70 73 62 25 3d a7 61 24 2c 73 65 71 24 28 73 65 |psb%=.a$,seq$(se| 000030e0 71 25 29 2c 70 73 62 25 29 2b a9 28 73 65 71 24 |q%),psb%)+.(seq$| 000030f0 28 73 65 71 25 29 29 0d 19 e6 12 61 24 3d c0 61 |(seq%))....a$=.a| 00003100 24 2c 70 73 62 25 2d 31 29 0d 19 f0 19 78 73 63 |$,psb%-1)....xsc| 00003110 25 3d 33 32 30 2d a9 28 64 69 73 24 28 32 29 29 |%=320-.(dis$(2))| 00003120 2a 34 0d 19 fa 06 c8 96 0d 1a 04 26 c8 99 22 41 |*4.........&.."A| 00003130 42 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c |BC_PryntString",| 00003140 61 24 2c 78 73 63 25 2c 39 37 2c 30 2c 37 0d 1a |a$,xsc%,97,0,7..| 00003150 0e 28 c8 99 22 41 42 43 5f 50 72 79 6e 74 53 74 |.(.."ABC_PryntSt| 00003160 72 69 6e 67 22 2c 61 24 2c 78 73 63 25 2d 32 2c |ring",a$,xsc%-2,| 00003170 39 38 2c 30 2c 39 0d 1a 18 05 cd 0d 1a 22 05 cc |98,0,9......."..| 00003180 0d 1a 2c 2b 70 73 61 25 3d a7 61 24 2c 73 65 71 |..,+psa%=.a$,seq| 00003190 24 28 73 65 71 25 29 2c 70 73 61 25 29 2b a9 28 |$(seq%),psa%)+.(| 000031a0 73 65 71 24 28 73 65 71 25 29 29 0d 1a 36 12 61 |seq$(seq%))..6.a| 000031b0 24 3d c0 61 24 2c 70 73 61 25 2d 31 29 0d 1a 40 |$=.a$,psa%-1)..@| 000031c0 19 78 73 63 25 3d 33 32 30 2d a9 28 64 69 73 24 |.xsc%=320-.(dis$| 000031d0 28 31 29 29 2a 34 0d 1a 4a 06 c8 96 0d 1a 54 27 |(1))*4..J.....T'| 000031e0 c8 99 22 41 42 43 5f 50 72 79 6e 74 53 74 72 69 |.."ABC_PryntStri| 000031f0 6e 67 22 2c 61 24 2c 78 73 63 25 2c 31 30 35 2c |ng",a$,xsc%,105,| 00003200 30 2c 37 0d 1a 5e 29 c8 99 22 41 42 43 5f 50 72 |0,7..^).."ABC_Pr| 00003210 79 6e 74 53 74 72 69 6e 67 22 2c 61 24 2c 78 73 |yntString",a$,xs| 00003220 63 25 2d 32 2c 31 30 36 2c 30 2c 39 0d 1a 68 05 |c%-2,106,0,9..h.| 00003230 cd 0d 1a 72 0b 73 65 71 25 2b 3d 31 0d 1a 7c 05 |...r.seq%+=1..|.| 00003240 e1 0d 1a 86 0c dd f2 64 6f 77 6f 72 64 0d 1a 90 |.......doword...| 00003250 0a 66 69 6e 25 3d a3 0d 1a 9a 0d 73 65 71 24 28 |.fin%=.....seq$(| 00003260 29 3d 22 22 0d 1a a4 29 c8 99 22 41 42 43 5f 55 |)=""...).."ABC_U| 00003270 6e 70 61 63 6b 50 6c 61 63 65 22 2c 22 68 69 6e |npackPlace","hin| 00003280 74 22 2c 7a 25 2c 31 36 30 2c 31 33 32 0d 1a ae |t",z%,160,132...| 00003290 0d c8 8e 20 67 72 64 25 20 ca 0d 1a b8 0c c9 20 |... grd% ...... | 000032a0 31 3a f2 6f 6e 65 0d 1a c2 0c c9 20 32 3a f2 74 |1:.one..... 2:.t| 000032b0 77 6f 0d 1a cc 0e c9 20 33 3a f2 74 68 72 65 65 |wo..... 3:.three| 000032c0 0d 1a d6 0d c9 20 34 3a f2 66 6f 75 72 0d 1a e0 |..... 4:.four...| 000032d0 0d c9 20 35 3a f2 66 69 76 65 0d 1a ea 0a 7f 3a |.. 5:.five.....:| 000032e0 f2 73 69 78 0d 1a f4 05 cb 0d 1a fe 05 e1 0d 1b |.six............| 000032f0 08 09 dd f2 6f 6e 65 0d 1b 12 05 f5 0d 1b 1c 0d |....one.........| 00003300 e7 73 75 62 25 3d 30 20 8c 0d 1b 26 0b e3 4a 25 |.sub%=0 ...&..J%| 00003310 3d 31 b8 38 0d 1b 30 05 f5 0d 1b 3a 05 f5 0d 1b |=1.8..0....:....| 00003320 44 0f 4b 25 3d b3 28 31 32 38 29 2d 31 0d 1b 4e |D.K%=.(128)-1..N| 00003330 12 fd 20 7a 25 21 28 4b 25 3c 3c 34 29 3e 30 0d |.. z%!(K%<<4)>0.| 00003340 1b 58 13 fd 20 a4 73 75 62 6e 75 6d 28 4b 25 29 |.X.. .subnum(K%)| 00003350 3e 30 0d 1b 62 17 73 65 71 24 28 4a 25 29 3d a4 |>0..b.seq$(J%)=.| 00003360 61 6c 69 61 73 28 4b 25 29 0d 1b 6c 16 6e 6d 65 |alias(K%)..l.nme| 00003370 24 28 4a 25 29 3d a4 6e 61 6d 65 28 4b 25 29 0d |$(J%)=.name(K%).| 00003380 1b 76 0f 69 6e 67 25 28 4a 25 29 3d 4b 25 0d 1b |.v.ing%(J%)=K%..| 00003390 80 05 ed 0d 1b 8a 05 cc 0d 1b 94 0b e3 4a 25 3d |.............J%=| 000033a0 31 b8 38 0d 1b 9e 05 f5 0d 1b a8 05 f5 0d 1b b2 |1.8.............| 000033b0 0f 4b 25 3d b3 28 31 32 38 29 2d 31 0d 1b bc 12 |.K%=.(128)-1....| 000033c0 fd 20 7a 25 21 28 4b 25 3c 3c 34 29 3e 30 0d 1b |. z%!(K%<<4)>0..| 000033d0 c6 16 fd 20 a4 73 75 62 6e 75 6d 28 4b 25 29 3d |... .subnum(K%)=| 000033e0 73 75 62 25 0d 1b d0 17 73 65 71 24 28 4a 25 29 |sub%....seq$(J%)| 000033f0 3d a4 61 6c 69 61 73 28 4b 25 29 0d 1b da 16 6e |=.alias(K%)....n| 00003400 6d 65 24 28 4a 25 29 3d a4 6e 61 6d 65 28 4b 25 |me$(J%)=.name(K%| 00003410 29 0d 1b e4 0f 69 6e 67 25 28 4a 25 29 3d 4b 25 |)....ing%(J%)=K%| 00003420 0d 1b ee 05 ed 0d 1b f8 05 cd 0d 1c 02 16 61 24 |..............a$| 00003430 3d a4 61 6c 69 61 73 28 69 6e 67 25 28 31 29 29 |=.alias(ing%(1))| 00003440 0d 1c 0c 0d fd a9 28 61 24 29 3c 32 31 0d 1c 16 |......(a$)<21...| 00003450 14 78 73 63 25 3d 33 32 30 2d a9 28 61 24 29 2a |.xsc%=320-.(a$)*| 00003460 38 0d 1c 20 06 c8 96 0d 1c 2a 27 c8 99 22 41 42 |8.. .....*'.."AB| 00003470 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c 61 |C_PryntString",a| 00003480 24 2c 78 73 63 25 2c 31 31 35 2c 31 2c 37 0d 1c |$,xsc%,115,1,7..| 00003490 34 29 c8 99 22 41 42 43 5f 50 72 79 6e 74 53 74 |4).."ABC_PryntSt| 000034a0 72 69 6e 67 22 2c 61 24 2c 78 73 63 25 2d 32 2c |ring",a$,xsc%-2,| 000034b0 31 31 36 2c 31 2c 30 0d 1c 3e 05 e1 0d 1c 48 09 |116,1,0..>....H.| 000034c0 dd f2 73 69 78 0d 1c 52 05 f5 0d 1c 5c 0a 74 72 |..six..R....\.tr| 000034d0 75 25 3d b9 0d 1c 66 0d 73 65 71 24 28 29 3d 22 |u%=...f.seq$()="| 000034e0 22 0d 1c 70 05 f5 0d 1c 7a 0e 61 24 3d a4 63 68 |"..p....z.a$=.ch| 000034f0 6f 6f 73 65 0d 1c 84 17 63 6e 74 25 3d a4 63 6f |oose....cnt%=.co| 00003500 75 6e 74 28 61 24 2c 22 2f 22 29 0d 1c 8e 29 fd |unt(a$,"/")...).| 00003510 20 63 6e 74 25 3e 32 20 80 20 63 6e 74 25 3c 31 | cnt%>2 . cnt%<1| 00003520 37 20 80 20 a4 63 6f 75 6e 74 28 61 24 2c 22 2a |7 . .count(a$,"*| 00003530 22 29 3d 31 0d 1c 98 16 6a 24 3d c1 61 24 2c a7 |")=1....j$=.a$,.| 00003540 61 24 2c 22 2a 22 29 2b 31 29 0d 1c a2 16 61 24 |a$,"*")+1)....a$| 00003550 3d c0 61 24 2c a7 61 24 2c 22 2a 22 29 2d 31 29 |=.a$,.a$,"*")-1)| 00003560 0d 1c ac 11 e3 70 6f 73 25 3d 30 b8 20 63 6e 74 |.....pos%=0. cnt| 00003570 25 0d 1c b6 1e 73 65 71 24 28 70 6f 73 25 29 3d |%....seq$(pos%)=| 00003580 a4 65 78 63 69 73 65 28 61 24 2c 22 2f 22 29 0d |.excise(a$,"/").| 00003590 1c c0 30 e7 70 6f 73 25 3e 30 20 80 20 73 65 71 |..0.pos%>0 . seq| 000035a0 24 28 70 6f 73 25 29 3c 3e c0 73 65 71 24 28 70 |$(pos%)<>.seq$(p| 000035b0 6f 73 25 29 2c 31 32 29 3a 74 72 75 25 3d a3 0d |os%),12):tru%=..| 000035c0 1c ca 05 ed 0d 1c d4 21 e7 a4 63 6f 75 6e 74 28 |.......!..count(| 000035d0 73 65 71 24 28 30 29 2c 22 5f 22 29 3d 30 3a 74 |seq$(0),"_")=0:t| 000035e0 72 75 25 3d a3 0d 1c de 0a fd 20 74 72 75 25 0d |ru%=...... tru%.| 000035f0 1c e8 0b 70 72 65 25 3d 58 25 0d 1c f2 0f 61 6d |...pre%=X%....am| 00003600 74 25 3d 70 6f 73 25 2d 32 0d 1c fc 0e c8 95 20 |t%=pos%-2...... | 00003610 70 6f 73 25 3c 31 37 0d 1d 06 1e 73 65 71 24 28 |pos%<17....seq$(| 00003620 70 6f 73 25 29 3d 73 65 71 24 28 b3 28 61 6d 74 |pos%)=seq$(.(amt| 00003630 25 29 2b 31 29 0d 1d 10 0b 70 6f 73 25 2b 3d 31 |%)+1)....pos%+=1| 00003640 0d 1d 1a 05 ce 0d 1d 24 0e 61 24 3d 73 65 71 24 |.......$.a$=seq$| 00003650 28 30 29 0d 1d 2e 0f e7 a9 28 61 24 29 3e 33 38 |(0)......(a$)>38| 00003660 20 8c 0d 1d 38 0a 74 77 6f 25 3d b9 0d 1d 42 10 | ...8.two%=...B.| 00003670 73 70 6c 25 3d a9 28 61 24 29 81 32 0d 1d 4c 20 |spl%=.(a$).2..L | 00003680 c8 95 20 c1 61 24 2c 73 70 6c 25 2c 31 29 3c 3e |.. .a$,spl%,1)<>| 00003690 22 20 22 20 80 20 73 70 6c 25 3e 30 0d 1d 56 0b |" " . spl%>0..V.| 000036a0 73 70 6c 25 2d 3d 31 0d 1d 60 05 ce 0d 1d 6a 17 |spl%-=1..`....j.| 000036b0 64 69 73 24 28 31 29 3d c0 61 24 2c 73 70 6c 25 |dis$(1)=.a$,spl%| 000036c0 2d 31 29 0d 1d 74 17 64 69 73 24 28 32 29 3d c1 |-1)..t.dis$(2)=.| 000036d0 61 24 2c 73 70 6c 25 2b 31 29 0d 1d 7e 19 78 73 |a$,spl%+1)..~.xs| 000036e0 63 25 3d 33 32 30 2d a9 28 64 69 73 24 28 31 29 |c%=320-.(dis$(1)| 000036f0 29 2a 34 0d 1d 88 06 c8 96 0d 1d 92 2c c8 99 22 |)*4.........,.."| 00003700 41 42 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 |ABC_PryntString"| 00003710 2c 64 69 73 24 28 31 29 2c 78 73 63 25 2c 31 32 |,dis$(1),xsc%,12| 00003720 33 2c 30 2c 37 0d 1d 9c 2e c8 99 22 41 42 43 5f |3,0,7......"ABC_| 00003730 50 72 79 6e 74 53 74 72 69 6e 67 22 2c 64 69 73 |PryntString",dis| 00003740 24 28 31 29 2c 78 73 63 25 2d 32 2c 31 32 34 2c |$(1),xsc%-2,124,| 00003750 30 2c 30 0d 1d a6 19 78 73 63 25 3d 33 32 30 2d |0,0....xsc%=320-| 00003760 a9 28 64 69 73 24 28 32 29 29 2a 34 0d 1d b0 06 |.(dis$(2))*4....| 00003770 c8 96 0d 1d ba 2c c8 99 22 41 42 43 5f 50 72 79 |.....,.."ABC_Pry| 00003780 6e 74 53 74 72 69 6e 67 22 2c 64 69 73 24 28 32 |ntString",dis$(2| 00003790 29 2c 78 73 63 25 2c 31 31 35 2c 30 2c 37 0d 1d |),xsc%,115,0,7..| 000037a0 c4 2e c8 99 22 41 42 43 5f 50 72 79 6e 74 53 74 |...."ABC_PryntSt| 000037b0 72 69 6e 67 22 2c 64 69 73 24 28 32 29 2c 78 73 |ring",dis$(2),xs| 000037c0 63 25 2d 32 2c 31 31 36 2c 30 2c 30 0d 1d ce 05 |c%-2,116,0,0....| 000037d0 cc 0d 1d d8 0a 74 77 6f 25 3d a3 0d 1d e2 0e 64 |.....two%=.....d| 000037e0 69 73 24 28 31 29 3d 61 24 0d 1d ec 19 78 73 63 |is$(1)=a$....xsc| 000037f0 25 3d 33 32 30 2d a9 28 64 69 73 24 28 31 29 29 |%=320-.(dis$(1))| 00003800 2a 34 0d 1d f6 06 c8 96 0d 1e 00 2c c8 99 22 41 |*4.........,.."A| 00003810 42 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 2c |BC_PryntString",| 00003820 64 69 73 24 28 31 29 2c 78 73 63 25 2c 31 31 35 |dis$(1),xsc%,115| 00003830 2c 30 2c 37 0d 1e 0a 2e c8 99 22 41 42 43 5f 50 |,0,7......"ABC_P| 00003840 72 79 6e 74 53 74 72 69 6e 67 22 2c 64 69 73 24 |ryntString",dis$| 00003850 28 31 29 2c 78 73 63 25 2d 32 2c 31 31 36 2c 30 |(1),xsc%-2,116,0| 00003860 2c 30 0d 1e 14 05 cd 0d 1e 1e 14 e7 a9 28 73 65 |,0...........(se| 00003870 71 24 28 30 29 29 3e 33 38 20 8c 0d 1e 28 15 73 |q$(0))>38 ...(.s| 00003880 70 6c 25 3d a9 28 73 65 71 24 28 30 29 29 81 32 |pl%=.(seq$(0)).2| 00003890 0d 1e 32 25 c8 95 20 c1 73 65 71 24 28 30 29 2c |..2%.. .seq$(0),| 000038a0 73 70 6c 25 2c 31 29 3c 3e 22 20 22 20 80 20 73 |spl%,1)<>" " . s| 000038b0 70 6c 25 3e 30 0d 1e 3c 0b 73 70 6c 25 2d 3d 31 |pl%>0..<.spl%-=1| 000038c0 0d 1e 46 05 ce 0d 1e 50 1c 64 69 73 24 28 31 29 |..F....P.dis$(1)| 000038d0 3d c0 73 65 71 24 28 30 29 2c 73 70 6c 25 2d 31 |=.seq$(0),spl%-1| 000038e0 29 0d 1e 5a 1c 64 69 73 24 28 32 29 3d c1 73 65 |)..Z.dis$(2)=.se| 000038f0 71 24 28 30 29 2c 73 70 6c 25 2b 31 29 0d 1e 64 |q$(0),spl%+1)..d| 00003900 05 cc 0d 1e 6e 13 64 69 73 24 28 31 29 3d 73 65 |....n.dis$(1)=se| 00003910 71 24 28 30 29 0d 1e 78 0e 64 69 73 24 28 32 29 |q$(0)..x.dis$(2)| 00003920 3d 22 22 0d 1e 82 05 cd 0d 1e 8c 05 e1 0d 1e 96 |="".............| 00003930 10 dd a4 74 69 64 79 75 70 28 61 24 29 0d 1e a0 |...tidyup(a$)...| 00003940 11 c8 95 20 a7 61 24 2c 22 2f 22 29 3e 30 0d 1e |... .a$,"/")>0..| 00003950 aa 17 c1 61 24 2c a7 61 24 2c 22 2f 22 29 2c 31 |...a$,.a$,"/"),1| 00003960 29 3d 22 20 22 0d 1e b4 05 ce 0d 1e be 0a f7 20 |)=" ".......... | 00003970 8d 54 4e 5f 0d 1e c8 0d e3 74 69 64 25 3d 31 b8 |.TN_.....tid%=1.| 00003980 35 0d 1e d2 0b f3 20 78 24 2c 79 24 0d 1e dc 10 |5..... x$,y$....| 00003990 c8 95 20 a7 61 24 2c 78 24 29 3e 30 0d 1e e6 2b |.. .a$,x$)>0...+| 000039a0 61 24 3d c0 61 24 2c a7 61 24 2c 78 24 29 2d 31 |a$=.a$,.a$,x$)-1| 000039b0 29 2b 79 24 2b c1 61 24 2c a7 61 24 2c 78 24 29 |)+y$+.a$,.a$,x$)| 000039c0 2b a9 28 78 24 29 29 0d 1e f0 05 ce 0d 1e fa 05 |+.(x$)).........| 000039d0 ed 0d 1f 04 07 3d 61 24 0d 1f 0e 0d dc 20 22 20 |.....=a$..... " | 000039e0 2d 20 22 2c 2d 0d 1f 18 0c dc 20 22 20 2d 22 2c |- ",-..... " -",| 000039f0 2d 0d 1f 22 0c dc 20 22 2d 20 22 2c 2d 0d 1f 2c |-..".. "- ",-..,| 00003a00 0c dc 20 22 20 3f 22 2c 3f 0d 1f 36 0c dc 20 22 |.. " ?",?..6.. "| 00003a10 20 21 22 2c 21 0d 1f 40 0b dd f2 74 69 6d 65 72 | !",!..@...timer| 00003a20 0d 1f 4a 0c e7 91 3c 31 30 30 3a e1 0d 1f 54 15 |..J...<100:...T.| 00003a30 e7 ac 73 65 72 25 3a 62 6f 6e 25 2d 3d 67 72 64 |..ser%:bon%-=grd| 00003a40 25 0d 1f 5e 12 e7 62 6f 6e 25 3c 30 3a 62 6f 6e |%..^..bon%<0:bon| 00003a50 25 3d 30 0d 1f 68 0b f2 75 70 64 61 74 65 0d 1f |%=0..h..update..| 00003a60 72 11 61 6e 69 25 3d 61 6e 69 25 20 82 26 31 0d |r.ani%=ani% .&1.| 00003a70 1f 7c 2e c8 99 22 41 42 43 5f 55 6e 70 61 63 6b |.|..."ABC_Unpack| 00003a80 50 6c 61 63 65 22 2c 22 74 22 2b c3 28 61 6e 69 |Place","t"+.(ani| 00003a90 25 29 2c 7a 25 2c 32 35 32 2c 32 34 38 0d 1f 86 |%),z%,252,248...| 00003aa0 0e 68 72 74 25 3d ac 68 72 74 25 0d 1f 90 07 d1 |.hrt%=.hrt%.....| 00003ab0 3d 30 0d 1f 9a 0c e7 ac 74 69 6d 25 3a e1 0d 1f |=0......tim%:...| 00003ac0 a4 4f e7 68 72 74 25 20 c8 99 22 41 42 43 5f 55 |.O.hrt% .."ABC_U| 00003ad0 6e 70 61 63 6b 50 6c 61 63 65 22 2c 22 68 31 22 |npackPlace","h1"| 00003ae0 2c 6a 25 2c 35 30 2c 34 34 20 8b c8 99 22 41 42 |,j%,50,44 ..."AB| 00003af0 43 5f 55 6e 70 61 63 6b 53 70 72 69 74 65 22 2c |C_UnpackSprite",| 00003b00 22 68 32 22 2c 6a 25 2c 35 30 2c 34 34 0d 1f ae |"h2",j%,50,44...| 00003b10 25 f2 6e 6f 69 73 65 28 22 54 69 6d 65 72 22 2c |%.noise("Timer",| 00003b20 33 2c 26 31 37 46 2c 26 31 30 30 30 2c 26 31 30 |3,&17F,&1000,&10| 00003b30 30 29 0d 1f b8 0b 73 65 63 25 2d 3d 31 0d 1f c2 |0)....sec%-=1...| 00003b40 09 fb 20 31 33 31 0d 1f cc 17 e7 73 65 63 25 3c |.. 131.....sec%<| 00003b50 31 30 20 fb 20 31 31 20 8b fb 20 31 30 0d 1f d6 |10 . 11 .. 10...| 00003b60 14 f1 8a 31 30 2c 32 39 29 73 65 63 25 89 28 31 |...10,29)sec%.(1| 00003b70 29 0d 1f e0 07 d1 3d 30 0d 1f ea 0d e7 73 65 63 |).....=0.....sec| 00003b80 25 3e 30 3a e1 0d 1f f4 0a 73 75 63 25 3d a3 0d |%>0:.....suc%=..| 00003b90 1f fe 0d e7 70 6c 79 25 3d 31 20 8c 0d 20 08 0a |....ply%=1 .. ..| 00003ba0 6f 76 72 25 3d b9 0d 20 12 05 cc 0d 20 1c 0d 73 |ovr%=.. .... ..s| 00003bb0 65 63 25 3d 73 61 6e 25 0d 20 26 10 62 6f 6e 25 |ec%=san%. &.bon%| 00003bc0 3d 31 30 2a 67 72 64 25 0d 20 30 08 fb 20 31 30 |=10*grd%. 0.. 10| 00003bd0 0d 20 3a 10 f1 8a 31 30 2c 32 39 29 73 65 63 25 |. :...10,29)sec%| 00003be0 0d 20 44 0b f2 75 70 64 61 74 65 0d 20 4e 0e f2 |. D..update. N..| 00003bf0 67 72 61 62 6d 6f 75 73 65 0d 20 58 05 cd 0d 20 |grabmouse. X... | 00003c00 62 05 e1 0d 20 6c 0b dd f2 69 6e 74 72 6f 0d 20 |b... l...intro. | 00003c10 76 08 c8 97 20 87 0d 20 80 13 c8 99 22 41 42 43 |v... .. ...."ABC| 00003c20 5f 42 6c 61 6e 6b 22 2c 35 0d 20 8a 14 c8 99 22 |_Blank",5. ...."| 00003c30 41 42 43 5f 43 6f 6c 6f 75 72 22 2c 35 0d 20 94 |ABC_Colour",5. .| 00003c40 32 c8 99 22 41 42 43 5f 55 6e 70 61 63 6b 50 6c |2.."ABC_UnpackPl| 00003c50 61 63 65 22 2c 22 69 6e 74 72 6f 22 2b c3 28 67 |ace","intro"+.(g| 00003c60 6d 65 25 29 2c 7a 25 2c 32 35 32 2c 31 39 38 0d |me%),z%,252,198.| 00003c70 20 9e 3a e7 66 6f 72 25 20 f2 74 69 74 6c 65 28 | .:.for% .title(| 00003c80 22 4c 45 20 46 4c 49 43 22 2c 31 31 30 2c 30 29 |"LE FLIC",110,0)| 00003c90 20 8b f2 74 69 74 6c 65 28 22 54 48 45 20 43 4f | ..title("THE CO| 00003ca0 50 22 2c 31 31 30 2c 30 29 0d 20 a8 07 d1 3d 30 |P",110,0). ...=0| 00003cb0 0d 20 b2 13 c8 99 22 41 42 43 5f 50 61 6c 65 74 |. ...."ABC_Palet| 00003cc0 74 65 22 0d 20 bc 0a 73 65 72 25 3d a3 0d 20 c6 |te". ..ser%=.. .| 00003cd0 05 f5 0d 20 d0 19 e7 67 72 64 25 3e 31 20 80 20 |... ...grd%>1 . | 00003ce0 a6 2d 39 39 3a f2 73 74 61 72 74 0d 20 da 0b fd |.-99:.start. ...| 00003cf0 20 91 3e 32 30 30 0d 20 e4 05 e1 0d 20 ee 15 dd | .>200. .... ...| 00003d00 f2 65 6e 74 65 72 68 69 67 68 73 63 6f 72 65 73 |.enterhighscores| 00003d10 0d 20 f8 1b 51 25 3d 72 79 74 25 2f 28 72 79 74 |. ..Q%=ryt%/(ryt| 00003d20 25 2b 72 6f 6e 25 29 2a 31 30 30 0d 21 02 0c f2 |%+ron%)*100.!...| 00003d30 68 69 67 68 65 73 74 0d 21 0c 05 e1 0d 21 16 11 |highest.!....!..| 00003d40 dd f2 61 6e 79 70 72 6f 67 72 65 73 73 0d 21 20 |..anyprogress.! | 00003d50 1a e7 70 6c 79 25 3e 31 20 84 20 61 74 74 65 6e |..ply%>1 . atten| 00003d60 64 24 3d 22 22 3a e1 0d 21 2a 1b 51 25 3d 72 79 |d$="":..!*.Q%=ry| 00003d70 74 25 2f 28 72 79 74 25 2b 72 6f 6e 25 29 2a 31 |t%/(ryt%+ron%)*1| 00003d80 30 30 0d 21 34 0c f2 75 70 67 72 61 64 65 0d 21 |00.!4..upgrade.!| 00003d90 3e 05 e1 0d 21 48 0b dd f2 63 6f 6e 67 72 0d 21 |>...!H...congr.!| 00003da0 52 14 e7 ac 66 69 6e 25 20 84 20 ac 73 75 63 25 |R...fin% . .suc%| 00003db0 3a e1 0d 21 5c 0b f2 75 70 64 61 74 65 0d 21 66 |:..!\..update.!f| 00003dc0 08 c8 97 20 87 0d 21 70 0e f2 64 65 6c 61 79 28 |... ..!p..delay(| 00003dd0 35 30 29 0d 21 7a 29 c8 99 22 41 42 43 5f 55 6e |50).!z).."ABC_Un| 00003de0 70 61 63 6b 50 6c 61 63 65 22 2c 22 68 69 6e 74 |packPlace","hint| 00003df0 22 2c 7a 25 2c 31 36 30 2c 31 33 32 0d 21 84 12 |",z%,160,132.!..| 00003e00 61 24 3d 22 54 72 e8 73 20 62 69 65 6e 22 0d 21 |a$="Tr.s bien".!| 00003e10 8e 14 78 73 63 25 3d 33 32 30 2d a9 28 61 24 29 |..xsc%=320-.(a$)| 00003e20 2a 38 0d 21 98 27 c8 99 22 41 42 43 5f 50 72 79 |*8.!.'.."ABC_Pry| 00003e30 6e 74 53 74 72 69 6e 67 22 2c 61 24 2c 78 73 63 |ntString",a$,xsc| 00003e40 25 2c 31 32 30 2c 31 2c 37 0d 21 a2 29 c8 99 22 |%,120,1,7.!.).."| 00003e50 41 42 43 5f 50 72 79 6e 74 53 74 72 69 6e 67 22 |ABC_PryntString"| 00003e60 2c 61 24 2c 78 73 63 25 2d 32 2c 31 32 31 2c 31 |,a$,xsc%-2,121,1| 00003e70 2c 30 0d 21 ac 0b e3 4a 25 3d 31 b8 35 0d 21 b6 |,0.!...J%=1.5.!.| 00003e80 28 f2 6e 6f 69 73 65 28 22 53 79 6e 73 6d 61 6a |(.noise("Synsmaj| 00003e90 73 22 2c 34 2c 26 31 37 46 2c 26 31 38 30 30 2c |s",4,&17F,&1800,| 00003ea0 26 31 30 30 29 0d 21 c0 0d f2 64 65 6c 61 79 28 |&100).!...delay(| 00003eb0 35 29 0d 21 ca 05 ed 0d 21 d4 0f f2 64 65 6c 61 |5).!....!...dela| 00003ec0 79 28 31 30 30 29 0d 21 de 0b f2 6d 6f 75 73 65 |y(100).!...mouse| 00003ed0 32 0d 21 e8 05 e1 0d 21 f2 0e dd f2 61 73 73 65 |2.!....!....asse| 00003ee0 6d 62 6c 65 0d 21 fc 0e de 20 67 6e 61 25 20 26 |mble.!... gna% &| 00003ef0 41 30 0d 22 06 1f c8 99 22 41 42 43 5f 56 69 64 |A0."...."ABC_Vid| 00003f00 65 6f 41 64 64 72 65 73 73 22 20 b8 20 76 69 64 |eoAddress" . vid| 00003f10 25 0d 22 10 0b 6c 69 6e 6b 3d 31 34 0d 22 1a 0b |%."..link=14."..| 00003f20 70 63 20 20 3d 31 35 0d 22 24 0d e3 41 25 3d 30 |pc =15."$..A%=0| 00003f30 b8 32 88 32 0d 22 2e 0b 50 25 3d 67 6e 61 25 0d |.2.2."..P%=gna%.| 00003f40 22 38 0a 5b 4f 50 54 41 25 0d 22 42 0b 2e 53 43 |"8.[OPTA%."B..SC| 00003f50 52 4f 4c 4c 0d 22 4c 33 4c 44 52 20 20 20 20 52 |ROLL."L3LDR R| 00003f60 31 32 2c 5b 52 39 5d 3a 4c 44 52 20 20 20 20 52 |12,[R9]:LDR R| 00003f70 31 32 2c 5b 52 31 32 5d 3a 4d 4f 56 20 20 20 20 |12,[R12]:MOV | 00003f80 52 31 31 2c 23 26 34 0d 22 56 0a 2e 64 65 6c 61 |R11,#&4."V..dela| 00003f90 79 0d 22 60 43 4d 4f 56 20 20 20 20 52 30 2c 23 |y."`CMOV R0,#| 00003fa0 31 39 3a 53 57 49 20 20 20 20 22 58 4f 53 5f 42 |19:SWI "XOS_B| 00003fb0 79 74 65 22 3a 53 55 42 53 20 20 20 52 31 31 2c |yte":SUBS R11,| 00003fc0 52 31 31 2c 23 26 31 3a 42 4e 45 20 20 20 20 64 |R11,#&1:BNE d| 00003fd0 65 6c 61 79 0d 22 6a 2c 4c 44 52 20 20 20 20 52 |elay."j,LDR R| 00003fe0 39 2c 73 63 72 65 65 6e 3a 41 44 44 20 20 20 20 |9,screen:ADD | 00003ff0 52 30 2c 52 31 32 2c 52 31 32 2c 4c 53 4c 23 32 |R0,R12,R12,LSL#2| 00004000 0d 22 74 2e 41 44 44 20 20 20 20 52 31 32 2c 52 |."t.ADD R12,R| 00004010 39 2c 23 26 31 30 3a 41 44 44 20 20 20 20 52 31 |9,#&10:ADD R1| 00004020 31 2c 52 31 32 2c 52 30 2c 4c 53 4c 23 36 0d 22 |1,R12,R0,LSL#6."| 00004030 7e 13 4d 4f 56 20 20 20 20 52 31 30 2c 23 31 36 |~.MOV R10,#16| 00004040 34 0d 22 88 0a 2e 73 68 69 66 74 0d 22 92 2b 4c |4."...shift.".+L| 00004050 44 4d 49 41 20 20 52 31 31 21 2c 7b 52 31 2d 52 |DMIA R11!,{R1-R| 00004060 38 7d 3a 53 54 4d 49 41 20 20 52 31 32 21 2c 7b |8}:STMIA R12!,{| 00004070 52 31 2d 52 38 7d 0d 22 9c 2b 4c 44 4d 49 41 20 |R1-R8}.".+LDMIA | 00004080 20 52 31 31 21 2c 7b 52 31 2d 52 38 7d 3a 53 54 | R11!,{R1-R8}:ST| 00004090 4d 49 41 20 20 52 31 32 21 2c 7b 52 31 2d 52 38 |MIA R12!,{R1-R8| 000040a0 7d 0d 22 a6 40 41 44 44 20 20 20 20 52 31 31 2c |}.".@ADD R11,| 000040b0 52 31 31 2c 23 26 31 30 30 3a 41 44 44 20 20 20 |R11,#&100:ADD | 000040c0 20 52 31 32 2c 52 31 32 2c 23 26 31 30 30 3a 53 | R12,R12,#&100:S| 000040d0 55 42 53 20 20 20 52 31 30 2c 52 31 30 2c 23 26 |UBS R10,R10,#&| 000040e0 31 0d 22 b0 10 42 4e 45 20 20 20 20 73 68 69 66 |1."..BNE shif| 000040f0 74 0d 22 ba 16 41 44 44 20 20 20 20 52 31 32 2c |t."..ADD R12,| 00004100 52 39 2c 23 26 37 30 0d 22 c4 19 41 44 44 20 20 |R9,#&70."..ADD | 00004110 20 20 52 31 32 2c 52 31 32 2c 23 26 45 34 30 30 | R12,R12,#&E400| 00004120 0d 22 ce 1b 53 55 42 20 20 20 20 52 31 31 2c 52 |."..SUB R11,R| 00004130 31 32 2c 52 30 2c 4c 53 4c 23 36 0d 22 d8 13 4d |12,R0,LSL#6."..M| 00004140 4f 56 20 20 20 20 52 31 30 2c 23 31 37 32 0d 22 |OV R10,#172."| 00004150 e2 0a 2e 6d 6f 76 65 73 0d 22 ec 11 43 4d 50 20 |...moves."..CMP | 00004160 20 20 20 52 31 31 2c 52 39 0d 22 f6 12 4d 4f 56 | R11,R9."..MOV| 00004170 4c 54 20 20 70 63 2c 6c 69 6e 6b 0d 23 00 2b 4c |LT pc,link.#.+L| 00004180 44 4d 49 41 20 20 52 31 31 21 2c 7b 52 31 2d 52 |DMIA R11!,{R1-R| 00004190 38 7d 3a 53 54 4d 49 41 20 20 52 31 32 21 2c 7b |8}:STMIA R12!,{| 000041a0 52 31 2d 52 38 7d 0d 23 0a 2b 4c 44 4d 49 41 20 |R1-R8}.#.+LDMIA | 000041b0 20 52 31 31 21 2c 7b 52 31 2d 52 38 7d 3a 53 54 | R11!,{R1-R8}:ST| 000041c0 4d 49 41 20 20 52 31 32 21 2c 7b 52 31 2d 52 38 |MIA R12!,{R1-R8| 000041d0 7d 0d 23 14 2d 53 55 42 20 20 20 20 52 31 31 2c |}.#.-SUB R11,| 000041e0 52 31 31 2c 23 26 31 38 30 3a 53 55 42 20 20 20 |R11,#&180:SUB | 000041f0 20 52 31 32 2c 52 31 32 2c 23 26 31 38 30 0d 23 | R12,R12,#&180.#| 00004200 1e 32 53 55 42 53 20 20 20 52 31 30 2c 52 31 30 |.2SUBS R10,R10| 00004210 2c 23 26 31 3a 42 4e 45 20 20 20 20 6d 6f 76 65 |,#&1:BNE move| 00004220 73 3a 4d 4f 56 20 20 20 20 70 63 2c 6c 69 6e 6b |s:MOV pc,link| 00004230 0d 23 28 0b 2e 73 63 72 65 65 6e 0d 23 32 0d 45 |.#(..screen.#2.E| 00004240 51 55 44 20 76 69 64 25 0d 23 3c 05 5d 0d 23 46 |QUD vid%.#<.].#F| 00004250 05 ed 0d 23 50 05 e1 0d 23 5a 0f dd f2 67 72 61 |...#P...#Z...gra| 00004260 62 6d 6f 75 73 65 0d 23 64 0b 63 75 72 25 2b 3d |bmouse.#d.cur%+=| 00004270 31 0d 23 6e 15 e7 63 75 72 25 3e 70 6c 79 25 3a |1.#n..cur%>ply%:| 00004280 63 75 72 25 3d 31 0d 23 78 0a f2 66 6c 75 73 68 |cur%=1.#x..flush| 00004290 0d 23 82 0a f2 77 68 69 63 68 0d 23 8c 16 f2 73 |.#...which.#...s| 000042a0 61 6d 65 28 6e 61 6d 65 24 28 63 75 72 25 29 29 |ame(name$(cur%))| 000042b0 0d 23 96 05 e1 0d 23 a0 0e dd f2 73 61 6d 65 28 |.#....#....same(| 000042c0 74 24 29 0d 23 aa 08 c8 97 20 87 0d 23 b4 07 ef |t$).#.... ..#...| 000042d0 20 37 0d 23 be 23 c8 99 22 41 42 43 5f 54 72 61 | 7.#.#.."ABC_Tra| 000042e0 6e 73 66 65 72 22 2c 32 35 36 2c 31 36 38 2c 31 |nsfer",256,168,1| 000042f0 32 38 2c 37 38 0d 23 c8 2b c8 99 22 41 42 43 5f |28,78.#.+.."ABC_| 00004300 55 6e 70 61 63 6b 53 70 72 69 74 65 22 2c 22 6d |UnpackSprite","m| 00004310 6f 75 73 65 22 2c 6a 25 2c 32 35 36 2c 31 36 38 |ouse",j%,256,168| 00004320 0d 23 d2 14 78 73 63 25 3d 33 32 32 2d a9 28 74 |.#..xsc%=322-.(t| 00004330 24 29 2a 38 0d 23 dc 27 c8 99 22 41 42 43 5f 50 |$)*8.#.'.."ABC_P| 00004340 72 79 6e 74 53 74 72 69 6e 67 22 2c 74 24 2c 78 |ryntString",t$,x| 00004350 73 63 25 2c 31 32 30 2c 31 2c 37 0d 23 e6 29 c8 |sc%,120,1,7.#.).| 00004360 99 22 41 42 43 5f 50 72 79 6e 74 53 74 72 69 6e |."ABC_PryntStrin| 00004370 67 22 2c 74 24 2c 78 73 63 25 2d 32 2c 31 32 31 |g",t$,xsc%-2,121| 00004380 2c 31 2c 38 0d 23 f0 05 f5 0d 23 fa 15 c8 97 20 |,1,8.#....#.... | 00004390 6d 6f 78 25 2c 6d 6f 79 25 2c 62 75 74 25 0d 24 |mox%,moy%,but%.$| 000043a0 04 0c fd 20 62 75 74 25 3e 30 0d 24 0e 13 c8 99 |... but%>0.$....| 000043b0 22 41 42 43 5f 52 65 73 74 6f 72 65 22 0d 24 18 |"ABC_Restore".$.| 000043c0 0e f2 7a 65 72 6f 6d 6f 75 73 65 0d 24 22 0b f2 |..zeromouse.$"..| 000043d0 6d 6f 75 73 65 32 0d 24 2c 07 d1 3d 30 0d 24 36 |mouse2.$,..=0.$6| 000043e0 05 e1 0d 24 40 0d dd f2 65 78 68 61 75 73 74 0d |...$@...exhaust.| 000043f0 24 4a 08 c8 97 20 87 0d 24 54 19 c8 99 22 41 42 |$J... ..$T..."AB| 00004400 43 5f 42 6c 61 6e 6b 22 2c 32 32 31 2c 30 2c 30 |C_Blank",221,0,0| 00004410 0d 24 5e 15 c8 99 22 41 42 43 5f 43 6f 6c 6f 75 |.$^..."ABC_Colou| 00004420 72 22 2c 31 31 0d 24 68 42 e7 66 6f 72 25 20 79 |r",11.$hB.for% y| 00004430 24 3d 22 56 6f 75 73 20 61 76 65 7a 20 6d 61 6e |$="Vous avez man| 00004440 71 75 e9 20 64 65 20 74 65 6d 70 73 22 20 8b 79 |qu. de temps" .y| 00004450 24 3d 22 59 6f 75 20 72 61 6e 20 6f 75 74 20 6f |$="You ran out o| 00004460 66 20 74 69 6d 65 22 0d 24 72 15 78 73 63 25 3d |f time".$r.xsc%=| 00004470 33 32 30 2d a9 28 79 24 29 2a 31 32 0d 24 7c 27 |320-.(y$)*12.$|'| 00004480 c8 99 22 41 42 43 5f 50 72 79 6e 74 53 74 72 69 |.."ABC_PryntStri| 00004490 6e 67 22 2c 79 24 2c 78 73 63 25 2c 31 36 38 2c |ng",y$,xsc%,168,| 000044a0 32 2c 37 0d 24 86 29 c8 99 22 41 42 43 5f 50 72 |2,7.$.).."ABC_Pr| 000044b0 79 6e 74 53 74 72 69 6e 67 22 2c 79 24 2c 78 73 |yntString",y$,xs| 000044c0 63 25 2d 32 2c 31 36 39 2c 32 2c 30 0d 24 90 13 |c%-2,169,2,0.$..| 000044d0 c8 99 22 41 42 43 5f 50 61 6c 65 74 74 65 22 0d |.."ABC_Palette".| 000044e0 24 9a 0f f2 64 65 6c 61 79 28 31 35 30 29 0d 24 |$...delay(150).$| 000044f0 a4 05 e1 0d 24 ae 0d dd f2 73 70 72 69 74 65 73 |....$....sprites| 00004500 0d 24 b8 0b e3 4a 25 3d 31 b8 33 0d 24 c2 31 c8 |.$...J%=1.3.$.1.| 00004510 99 22 41 42 43 5f 55 6e 70 61 63 6b 53 70 72 69 |."ABC_UnpackSpri| 00004520 74 65 22 2c 22 7a 22 2b c3 28 4a 25 29 2c 7a 25 |te","z"+.(J%),z%| 00004530 2c 34 30 2c 4a 25 2a 36 34 2b 31 38 0d 24 cc 32 |,40,J%*64+18.$.2| 00004540 c8 99 22 41 42 43 5f 55 6e 70 61 63 6b 53 70 72 |.."ABC_UnpackSpr| 00004550 69 74 65 22 2c 22 7a 22 2b c3 28 4a 25 29 2c 7a |ite","z"+.(J%),z| 00004560 25 2c 34 38 30 2c 4a 25 2a 36 34 2b 31 38 0d 24 |%,480,J%*64+18.$| 00004570 d6 05 ed 0d 24 e0 05 e1 0d 24 ea 12 dd a4 73 70 |....$....$....sp| 00004580 61 63 65 28 61 24 2c 74 24 29 0d 24 f4 10 c8 95 |ace(a$,t$).$....| 00004590 20 a7 61 24 2c 74 24 29 3e 30 0d 24 fe 14 c1 61 | .a$,t$)>0.$...a| 000045a0 24 2c a7 61 24 2c 74 24 29 29 3d 22 20 22 0d 25 |$,.a$,t$))=" ".%| 000045b0 08 05 ce 0d 25 12 07 3d 61 24 0d 25 1c 0f dd f2 |....%..=a$.%....| 000045c0 66 72 61 63 74 28 61 24 29 0d 25 26 0d 73 70 74 |fract(a$).%&.spt| 000045d0 24 28 29 3d 22 22 0d 25 30 08 4a 25 3d 31 0d 25 |$()="".%0.J%=1.%| 000045e0 3a 11 c8 95 20 a7 61 24 2c 22 20 22 29 3e 30 0d |:... .a$," ")>0.| 000045f0 25 44 20 70 72 74 24 28 4a 25 29 3d 22 20 22 2b |%D prt$(J%)=" "+| 00004600 c0 61 24 2c a7 61 24 2c 22 20 22 29 2d 31 29 0d |.a$,.a$," ")-1).| 00004610 25 4e 16 61 24 3d c1 61 24 2c a7 61 24 2c 22 20 |%N.a$=.a$,.a$," | 00004620 22 29 2b 31 29 0d 25 58 09 4a 25 2b 3d 31 0d 25 |")+1).%X.J%+=1.%| 00004630 62 05 ce 0d 25 6c 13 70 72 74 24 28 4a 25 29 3d |b...%l.prt$(J%)=| 00004640 22 20 22 2b 61 24 0d 25 76 08 4c 25 3d 31 0d 25 |" "+a$.%v.L%=1.%| 00004650 80 0d e3 4b 25 3d 31 b8 20 4a 25 0d 25 8a 1e e7 |...K%=1. J%.%...| 00004660 a9 28 73 70 74 24 28 4c 25 29 2b 70 72 74 24 28 |.(spt$(L%)+prt$(| 00004670 4b 25 29 29 3c 33 39 20 8c 0d 25 94 36 e7 73 70 |K%))<39 ..%.6.sp| 00004680 74 24 28 4c 25 29 3d 22 22 20 73 70 74 24 28 4c |t$(L%)="" spt$(L| 00004690 25 29 3d 70 72 74 24 28 4b 25 29 20 8b 73 70 74 |%)=prt$(K%) .spt| 000046a0 24 28 4c 25 29 2b 3d 70 72 74 24 28 4b 25 29 0d |$(L%)+=prt$(K%).| 000046b0 25 9e 05 cc 0d 25 a8 09 4c 25 2b 3d 31 0d 25 b2 |%....%..L%+=1.%.| 000046c0 15 73 70 74 24 28 4c 25 29 3d 70 72 74 24 28 4b |.spt$(L%)=prt$(K| 000046d0 25 29 0d 25 bc 05 cd 0d 25 c6 05 ed 0d 25 d0 0b |%).%....%....%..| 000046e0 e3 4a 25 3d 31 b8 33 0d 25 da 17 c8 95 20 c0 73 |.J%=1.3.%.... .s| 000046f0 70 74 24 28 4a 25 29 2c 31 29 3d 22 20 22 0d 25 |pt$(J%),1)=" ".%| 00004700 e4 19 73 70 74 24 28 4a 25 29 3d c1 73 70 74 24 |..spt$(J%)=.spt$| 00004710 28 4a 25 29 2c 32 29 0d 25 ee 05 ce 0d 25 f8 05 |(J%),2).%....%..| 00004720 ed 0d 26 02 11 e7 73 70 74 24 28 34 29 3d 22 22 |..&...spt$(4)=""| 00004730 20 8c 0d 26 0c 0d e3 4a 25 3d 33 b8 30 88 b9 0d | ..&...J%=3.0...| 00004740 26 16 17 73 70 74 24 28 4a 25 2b 31 29 3d 73 70 |&..spt$(J%+1)=sp| 00004750 74 24 28 4a 25 29 0d 26 20 05 ed 0d 26 2a 05 cd |t$(J%).& ...&*..| 00004760 0d 26 34 05 e1 0d 26 3e 13 dd a4 63 68 6f 6f 73 |.&4...&>...choos| 00004770 65 61 6e 6f 74 68 65 72 0d 26 48 05 f5 0d 26 52 |eanother.&H...&R| 00004780 0e 58 25 3d b3 28 31 35 30 30 29 0d 26 5c 1f fd |.X%=.(1500).&\..| 00004790 77 72 64 24 28 67 72 64 25 2c 58 25 29 3e 22 22 |wrd$(grd%,X%)>""| 000047a0 80 20 58 25 3c 3e 70 72 65 25 0d 26 66 12 3d 77 |. X%<>pre%.&f.=w| 000047b0 72 64 24 28 67 72 64 25 2c 58 25 29 0d ff |rd$(grd%,X%)..| 000047be