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