Home » Archimedes archive » Archimedes World » archimedes_world_volume_15_issue_4_scp.adf » Aaaghs » !Aargh!/!RunImage
!Aargh!/!RunImage
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
| Tape/disk: | Home » Archimedes archive » Archimedes World » archimedes_world_volume_15_issue_4_scp.adf » Aaaghs |
| Filename: | !Aargh!/!RunImage |
| Read OK: | ✔ |
| File size: | 4954 bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
10REM>!Aargh!.!RunImage 20REM LEN 1992 Cheap 'N' Arsty Software 30REM This program is PD, but is not to be spread arround in any edited 40REM form without my consent! 50REM So There ! 60REM LORIS 70REM NOTE [it may, however be archived using SPARK, ArcFS etc.] 80ON ERROR PROCerror 90MODE12 100MOUSE STEP 1 110COLOUR128+7 120COLOUR0 130CLS 140OFF 150PROCPalette 160DIMstars%(20,5) 170DIMspikes%(9,5) 180DIMmouse%(2) 190DIM icicles%(5,1) 200DIM ricicles%(5) 210DIM drips%(5) 220DIM motes%(50,1) 230whichblack%=3 240COLOUR1,0,0,0 250REPEAT 260PROClevel1 270PROClevel2 280PROClevel3 290PROClevel4 300PROClevel5 310IF n%=121 UNTIL0 ELSE UNTIL 1 320*|<Obey$Dir>.PaletteOK 330*DeskTop 340END 350DEFPROCerror 360ON ERROR OFF 370IF ERR=17 THEN 380CLS 390PRINTTAB(30,10)"Fine! Be like that!" 400*|<Obey$Dir>.PaletteOK 410*DeskTop 420ENDIF 430CLS 440PRINTTAB(5,5)"Oh no! A bug!" 450REPORT:PRINT;" at line ";ERL 460PRINT'"Please contact me -LORIS- at 65 Davenport Ave,Hessle,N.Humberside,HU13ORN" 470PRINT"or (0482) 640558 and tell me what happened! Thanks!" 480*|<Obey$Dir>.PaletteOK 490END 500DEFPROClevel1 510REPEAT 520PRINTTAB(35,15)"Get Ready" 530COLOUR1,0,0,0 540PROClocate 550*ScreenLoad <Obey$Dir>.Level1 560PROCPalette 570MOUSE RECTANGLE 60,60,0,0 580SYS"Wimp_SpriteOp",36,,"gamepointer",%1100001 590MOUSE COLOUR 2,255,255,255 600DX%=0:DY%=0 610blobX%=1100:blobY%=300 620missileX%=-100:missileY%=0 630missileDX%=0:missileDY%=0 640s0%=0:s1%=0:s2%=0 650trap%=380 660X%=60:Y%=60 670nomorebombs=FALSE 680FOR spikes%=0 TO 9 690spikes%(spikes%,0)=spikes%*42+RND(42)+480 700spikes%(spikes%,1)=382 710spikes%(spikes%,2)=0 720spikes%(spikes%,3)=0 730spikes%(spikes%,4)=spikes%(spikes%,0)-RND(200) 740spikes%(spikes%,5)=50+RND(50) 750NEXT 760FOR stars%=0 TO 20 770FOR n%=0 TO 3 780stars%(stars%,n%)=0 790NEXT:NEXT 800GCOL128+7 810across=0 820REPEAT 830across+=0.2 840COLOUR whichblack%,0,0,0 850whichblack%+=1 860IF whichblack%=7 whichblack%=2 870COLOUR whichblack%,255,255,0 880GCOL7 890MOVE 1200,100 900MOVE 1200,90 910PLOT&55,1200+DX%*3,100+DY%*3 920CIRCLE FILL blobX%,blobY%,32 930DX%+=RND(11)-6 940DY%+=RND(11)-6 950IF DX%>20 DX%=20 960IF DX%<-20 DX%=-20 970IF DY%>20 DY%=20 980IF DY%<-20 DY%=-20 990blobX%+=DX% 1000blobY%+=DY% 1010blobY%-=8 1020IF blobX%<992 blobX%=992 1030IF blobX%>1232 blobX%=1232 1040IF blobY%<40 blobY%=40 1050IF blobY%>380 blobY%=380 1060GCOL9 1070MOVE 1200,100 1080MOVE 1200,90 1090PLOT&55,1200+DX%*3,100+DY%*3 1100GCOL10 1110CIRCLE FILL blobX%,blobY%,32 1120IF X%>950 AND Y%<420 MOUSE TO X%+DX%,Y%+DY% 1130IF missileX%=-100 AND X%>852 AND Y%<838 AND Y%>474 AND nomorebombs=FALSE THEN missileX%=900:missileY%=800:missileDX%=2:missileDY%=-4 1140IF missileX%>0 THEN 1150GCOL7 1160CIRCLE FILL missileX%,missileY%,8 1170missileX%+=missileDX% 1180missileY%+=missileDY% 1190missileDX%=missileDX%/1.1+(X%-missileX%)/20 1200missileDY%=missileDY%/1.1+(Y%-missileY%)/20 1210IF missileDX%>32 missileDX%=32 1220IF missileDX%<-32 missileDX%=-32 1230IF missileDY%>32 missileDY%=32 1240IF missileDY%<-32 missileDY%=-32 1250IF missileY%>826 OR missileY%<480 THEN missileX%=-100 1260IF missileX%<874 AND missileX%>0 RECTANGLE FILL 824,476,42,362:missileX%=-50:GCOL12:MOVE 800,472:MOVE 890,472:PLOT&55,840,500:nomorebombs=TRUE 1270IF POINT(missileX%,missileY%)<>7 missileX%=-100 1280GCOL11 1290CIRCLE FILL missileX%,missileY%,8 1300IF missileX%>X%-32 AND missileX%<X%+32 AND missileY%>Y%-32 AND missileY%<Y%+32 CIRCLE FILL missileX%,missileY%,100 1310ENDIF 1320FOR stars%=0 TO 20 1330IF stars%(stars%,0)=0 THEN 1340stars%(stars%,2)=RND(15)-8 1350stars%(stars%,3)=RND(13)-8 1360IF stars%(stars%,2)<-2 AND stars%(stars%,2)>2 AND stars%(stars%,3)<-2 AND stars%(stars%,3)>2 GOTO 1340 1370IF stars%(stars%,2)=0 OR stars%(stars%,3)=0 GOTO 1340 1380stars%(stars%,0)=566+stars%(stars%,2)*2 1390stars%(stars%,1)=668+stars%(stars%,3)*2 1400ENDIF 1410GCOL7 1420CIRCLE FILL stars%(stars%,0),stars%(stars%,1),4 1430stars%(stars%,0)+=stars%(stars%,2) 1440stars%(stars%,1)+=stars%(stars%,3) 1450IF POINT(stars%(stars%,0)+stars%(stars%,2)*3,stars%(stars%,1)+stars%(stars%,3)*3)<>7 stars%(stars%,0)=0:stars%(stars%,1)=0 1460GCOL14 1470CIRCLE FILL stars%(stars%,0),stars%(stars%,1),4 1480NEXT 1490GCOL8 1500WAIT 1510PROCwait 1520RECTANGLE FILL 4,515,260,252 1530GCOL7 1540FOR a=0 TO 1 STEP 0.2 1550MOVE SIN(a+across)*80+120,515+a*208 1560MOVE SIN(a+across)*80+160,515+a*208 1570PLOT&75,SIN(a+across+0.2)*80+160,556+a*208 1580NEXT 1590GCOL7 1600RECTANGLE FILL 5,100,436,280 1610GCOL13 1620FOR a=0 TO 1 STEP 0.2 1630MOVE a*352,SIN(a+across)*100+280 1640MOVE a*352,SIN(a+across)*100+200 1650PLOT&75,a*352+88,SIN(a+across+0.2)*100+200 1660NEXT 1670IF X%<264 AND Y%>791 THEN s1%+=8 1680GCOL15 1690RECTANGLE FILL 264,791,-s1%,48 1700IF s1%>264 AND s1%<300 RECTANGLE FILL 36,842,34,s1%-264 1710IF X%>550 AND X%<838 AND Y%>910 AND Y%<978 THEN s2%+=4 1720RECTANGLE FILL 550,977,290,-s2% 1730RECTANGLE FILL 550,913,290,s2% 1740IF Y%<400 OR trap%>80 THEN 1750FOR spikes%=0 TO 9 1760GCOL7 1770MOVE spikes%(spikes%,0),spikes%(spikes%,1) 1780MOVE spikes%(spikes%,0)+20,spikes%(spikes%,1) 1790PLOT&55,spikes%(spikes%,0)+10,spikes%(spikes%,1)-spikes%(spikes%,5) 1800IF X%>spikes%(spikes%,4) spikes%(spikes%,3)=1 1810IF spikes%(spikes%,3)=1 spikes%(spikes%,2)+=1 1820spikes%(spikes%,1)-=spikes%(spikes%,2) 1830IF spikes%(spikes%,1)<spikes%(spikes%,5)/2+64 spikes%(spikes%,1)=spikes%(spikes%,5)/2+64 1840GCOL15 1850MOVE spikes%(spikes%,0),spikes%(spikes%,1) 1860MOVE spikes%(spikes%,0)+20,spikes%(spikes%,1) 1870PLOT&55,spikes%(spikes%,0)+10,spikes%(spikes%,1)-spikes%(spikes%,5) 1880NEXT 1890IF spikes%(8,1)<spikes%(8,5)+64 AND spikes%(9,1)<spikes%(9,5)+64 s0%=16 1900trap%-=s0% 1910IF trap%<80 s0%=0 1920RECTANGLE FILL 480,trap%,444,52 TO 480,trap%-s0% 1930ENDIF 1940PROCmouse 1950UNTIL POINT(X%+4,Y%-4)=0 OR POINT(X%+4,Y%-4)=whichblack% OR POINT(X%+4,Y%-4)>7 OR X%<0 OR X%>1280 OR Y%>1024 OR Y%<0 OR X%>1070 AND Y%>870 1960IF X%>1070 AND Y%>870 UNTIL 1 ELSE PROCexplosion:UNTIL0 1970FOR across=X% TO 1300 1980COLOUR1,128+RND(127),128+RND(127),128+RND(127) 1990MOUSE RECTANGLE across,Y%,0,0 2000FOR PORS=0 TO 100:NEXT 2010NEXT 2020FOR down=Y% TO -20 STEP -1 2030COLOUR1,128+RND(127),128+RND(127),128+RND(127) 2040MOUSE RECTANGLE 1300,down,0,0 2050FOR PORS=0 TO 100:NEXT 2060NEXT 2070COLOUR1,0,0,0 2080ENDPROC 2090DEFPROClevel2 2100CLS 2110REPEAT 2120PROClocate 2140*ScreenLoad <Obey$Dir>.Level2 2150PROCPalette 2151MOUSE RECTANGLE 590,680,0,0 2160SYS"Wimp_SpriteOp",36,,"gamepointer",%1100001 2170MOUSE COLOUR 2,255,255,255 2180MOUSEX%,X%,Z 2190a%=0:s0%=0:s1%=0:s2%=0 2200door1%=58:door2%=58:door3%=30:door4%=30 2210sec%=75-VAL(RIGHT$(TIME$,2)) 2220min%=60-VAL(MID$(TIME$,20,2)) 2230hour%=12-VAL(MID$(TIME$,17,2))-min%/60 2240FOR icicle%=0 TO 5 2250icicles%(icicle%,0)=850+RND(30)+icicle%*30 2260icicles%(icicle%,1)=RND(10) 2270drips%(icicle%)=RND(400)+66 2280ricicles%(icicle%)=RND(8) 2290NEXT 2300REPEAT 2301PROCwait 2310COLOURwhichblack%,0,0,0 2320whichblack%+=1 2330IF whichblack%=7 whichblack%=2 2340COLOUR whichblack%,255,128,0 2350GCOL7 2360CIRCLE FILL 590+(COSRAD(a%)*40),684+(SINRAD(a%)*80),16 2370CIRCLE FILL 590+(COSRAD(a%)*80),684+(SINRAD(a%)*40),16 2380a%+=16 2390GCOL11 2400CIRCLE FILL 590+(COSRAD(a%)*40),684+(SINRAD(a%)*80),16 2410CIRCLE FILL 590+(COSRAD(a%)*80),684+(SINRAD(a%)*40),16 2420IF X%>554 AND Y%<896 AND X%<622 AND Y%>840 s0%+=8 2430GCOL9 2440IF s0%>0 RECTANGLE FILL 554,840,68,s0% 2450IF X%<418 AND Y%<536 s1%-=4 2460IF s1%<0 AND s1%>-62 RECTANGLE FILL 420,480,s1%,52 2470IF s1%<-62 s1%-=12 2480IF s1%<-60 AND s1%>-432 RECTANGLE FILL 420,436,s1%+58,46 2490IF s1%<-426 AND s1%>-790 s1%-=12 2500IF s1%<-426 AND s1%>-790 RECTANGLE FILL 56,434,60,s1%+426 2510IF s1%<-790 AND s2%<136 s2%+=8 2520IF s2%>0 RECTANGLE 116,60+s2%,300,20 TO 116,68+s2% 2530IF s2%>0 RECTANGLE 116,364-s2%,300,20 TO 116,356-s2% 2540GCOL7 2550RECTANGLE FILL 642,66,100,door1% 2560IF X%>476 AND Y%>200 door1%-=4 2570IF door1%<0 door1%=0 2580IF Y%<200 door1%+=14 2590IF door1%>60 door1%=60 2600RECTANGLE FILL 646,200,96,60 2610CIRCLE FILL 688,370,door3% 2620IF X%<488 door2%-=4 2630IF door2%<0 door2%=0 2640IF X%>488 door2%+=12 2650IF door2%>60 door2%=60 2660IF Y%<300 door3%-=4 2670IF door3%<0 door3%=0 2680IF Y%>300 door3%+=12 2690IF door3%>40 door3%=40 2700IF X%>600 AND Y%>460 AND Y%<580 door4%-=2 ELSE door4%+=10 2710IF door4%<0 door4%=0 2720IF door4%>32 door4%=32 2730RECTANGLE FILL 646,474,98,64 2740GCOL15 2750RECTANGLE FILL 646,66,90,door1% 2760MOVE 650,200 2770MOVE 650,200+door2% 2780PLOT&55,670+door2%,200 2790MOVE 730,260 2800MOVE 730,260-door2% 2810PLOT&55,708-door2%,260 2820CIRCLE FILL 688,370,door3% 2830RECTANGLE FILL 678-door4%,504-door4%,door4%*2+24,door4%*2 2840FOR icicle%=0 TO 5 2850GCOL0 2860RECTANGLE FILL 835,0,250,60 2870IF drips%(icicle%)<60+ricicles%(icicle%) AND drips%(icicle%)>0 drips%(icicle%)=0:ricicles%(icicle%)+=6 2880IF drips%(icicle%)>0 GCOL7:CIRCLE FILL icicles%(icicle%,0)+10,drips%(icicle%),4:drips%(icicle%)-=12:GCOL15:CIRCLE FILL icicles%(icicle%,0)+10,drips%(icicle%),4 2890IF drips%(icicle%)=0 AND RND(20)=1 icicles%(icicle%,1)+=8:drips%(icicle%)=460-icicles%(icicle%,1) 2900IF icicles%(icicle%,1)>300 icicles%(icicle%,1)=300 2910IF ricicles%(icicle%)>200 ricicles%(icicle%)=200 2920GCOL8 2930MOVE icicles%(icicle%,0)-icicles%(icicle%,1)/10,460 2940MOVE icicles%(icicle%,0)+20+icicles%(icicle%,1)/10,460 2950PLOT&55,icicles%(icicle%,0)+10,460-icicles%(icicle%,1) 2960MOVE icicles%(icicle%,0)-ricicles%(icicle%)/2+10,66 2970MOVE icicles%(icicle%,0)+ricicles%(icicle%)/2+10,66 2980PLOT&55,icicles%(icicle%,0)+10,66+ricicles%(icicle%) 2990NEXT 3000GCOL7 3010LINE 1024,676,1024+(COSRAD((sec%)*6)*150),676+(SINRAD((sec%)*6)*150) 3020IF sec%>74 THEN 3030MOVE 1024+COSRAD(min%*6)*16,676+SINRAD(min%*6)*16 3040MOVE 1024-COSRAD(min%*6)*16,676-SINRAD(min%*6)*16 3050PLOT&55,1024+(COSRAD((min%*6)+90)*150),676+(SINRAD((min%*6)+90)*150) 3060MOVE 1024+COSRAD(hour%*30)*24,676+SINRAD(hour%*30)*24 3070MOVE 1024-COSRAD(hour%*30)*24,676-SINRAD(hour%*30)*24 3080PLOT&55,1024+(COSRAD((hour%*30)+90)*120),676+(SINRAD((hour%*30)+90)*120) 3090min%=60-VAL(MID$(TIME$,20,2)) 3100IF min%<60 AND min%>29 THEN demi=0.5 ELSE demi%=0 3110hour%=12-VAL(MID$(TIME$,17,2))-min%/60 3120ENDIF 3130sec%=75-VAL(RIGHT$(TIME$,2)) 3140GCOL11 3150MOVE 1024+COSRAD(hour%*30)*24,676+SINRAD(hour%*30)*24 3160MOVE 1024-COSRAD(hour%*30)*24,676-SINRAD(hour%*30)*24 3170PLOT&55,1024+(COSRAD((hour%*30)+90)*120),676+(SINRAD((hour%*30)+90)*120) 3180GCOL14 3190MOVE 1024+COSRAD(min%*6)*16,676+SINRAD(min%*6)*16 3200MOVE 1024-COSRAD(min%*6)*16,676-SINRAD(min%*6)*16 3210PLOT&55,1024+(COSRAD((min%*6)+90)*150),676+(SINRAD((min%*6)+90)*150) 3220GCOL9 3230LINE 1024,676,1024+(COSRAD((sec%)*6)*150),676+(SINRAD((sec%)*6)*150) 3240PROCmouse 3250UNTIL POINT(X%+4,Y%-4)=0 OR POINT(X%+4,Y%-4)=whichblack% OR POINT(X%+4,Y%-4)>7 OR X%<0 OR X%>1280 OR Y%>1024 OR Y%<0 OR X%>1200 AND Y%>354 AND Y%<466 3260IF X%>1200 AND Y%>354 AND Y%<466 UNTIL1 ELSE PROCexplosion:UNTIL0 3270FOR across=X% TO 1300 3280COLOUR1,RND(128)+128,RND(128)+128,RND(128)+128 3290MOUSE RECTANGLE across,Y%,0,0 3300FOR pors=0 TO 100:NEXT 3310NEXT 3320FOR up=Y% TO 1100 3330COLOUR1,RND(128)+128,RND(128)+128,RND(128)+128 3340MOUSE RECTANGLE 1300,up,0,0 3350FOR pors=0 TO 100:NEXT 3360NEXT 3370COLOUR1,0,0,0 3380ENDPROC 3390DEFPROCexplosion 3400*POINTER 0 3410VDU 19,1,24,255,0,0 3420FOR explosion=0 TO 50 3430GCOL(POINT(X%+4,Y%-4)) 3440CIRCLE FILL X%,Y%,explosion 3450GCOL0 3460CIRCLE X%,Y%,explosion+8 3470FOR PORS=0 TO 100:NEXT 3480NEXT 3490CLS 3500VDU19,1,24,128,128,128 3510ENDPROC 3520DEFPROCmouse 3530FOR colour%=0 TO 2 3540mouse%(colour%)+=RND(33)-17 3550IF mouse%(colour%)>255 mouse%(colour%)=255 3560IF mouse%(colour%)<128 mouse%(colour%)=128 3570NEXT 3580MOUSE COLOUR 1,mouse%(0),mouse%(1),mouse%(2) 3590MOUSEX%,Y%,Z% 3600MOUSE RECTANGLE X%-50,Y%-50,100,100 3610IF Z% THEN MOUSE RECTANGLE X%,Y%,0,0 3620ENDPROC 3630DEFPROClevel3 3640CLS 3650REPEAT 3660PROClocate 3680X%=0 3690COLOUR2,0,0,0 3700*SCREENLOAD <Obey$Dir>.Level3 3710PROCPalette 3711MOUSE RECTANGLE 80,980,0,0 3720a%=0:b%=0:c%=4:d%=600:e%=114:lastdrop%=0:drips%(0)=0:drips%(1)=0 3730door1%=0:f%=2:s0%=0 3740SYS"Wimp_SpriteOp",36,,"gamepointer",%1100001 3750MOUSE COLOUR 2,255,255,255 3760REPEAT 3770GCOL7 3780WAIT 3790PROCwait 3800ELLIPSE FILL 268,430,230,50,RAD(a%) 3810ELLIPSE FILL 268,430,230,50,RAD(a%+90) 3820a%-=12 3830GCOL10 3840ELLIPSE FILL 268,430,230,50,RAD(a%) 3850ELLIPSE FILL 268,430,230,50,RAD(a%+90) 3860GCOL7 3870ELLIPSE FILL 300,938,100,b% 3880b%+=c% 3890IF b%>78 OR b%<-78 c%=-c% 3900GCOL9.5+SGN(b%)/2 3910ELLIPSE FILL 300,938,80,b% 3920lastdrop%+=1 3930IF lastdrop%=16 AND e%<350 drips%(1)=340:d%-=4 3940IF lastdrop%=32 AND e%<350 drips%(0)=340:d%-=4:lastdrop%=0 3950FOR drip%=0 TO 1 3960IF drips%(drip%)>0 GCOL7:CIRCLE FILL 1104,drips%(drip%),8:drips%(drip%)-=8:GCOL14:CIRCLE FILL 1104,drips%(drip%),8 3970IF drips%(drip%)>0 AND drips%(drip%)<e%-8 e%+=4:GCOL14:RECTANGLE FILL 1096,e%-16,16,12:drips%(drip%)=0 3980NEXT 3990GCOL128+14 4000GCOL7 4010PLOT77,1100,d% 4020GCOL128+7 4030GCOL14 4040PLOT77,1100,e% 4050IF X%>565 AND Y%<666 AND s0%=0 THEN s0%=4 4060IF s0%>0 AND s0%<330 THEN 4070s0%+=8 4080GCOL0 4090MOVE565,666 4100MOVE565+s0%+12,666 4110PLOT&55,565,666-s0%*2+32 4120MOVE908,32 4130MOVE908-s0%-12,32 4140PLOT&55,908,32+s0%*2-32 4150ENDIF 4160GCOL7 4170RECTANGLE FILL444,908,120,56 4180door1%+=f% 4190IF door1%>28 OR door1%<2 f%=-f% 4200GCOL15 4210RECTANGLE FILL 444,904,120,door1% 4220RECTANGLE FILL 444,964,120,-door1% 4230RECTANGLE0,738,8,60 TO 1272,738 4240RECTANGLE0,738,1280,60 TO -8,738 4250PROCmouse 4260IF X%>564 AND X%<1100 AND Y%>850 THEN MOUSE TO X%,Y%-(X%-564)/64 4270UNTIL POINT(X%+4,Y%-4)=0 OR POINT(X%+4,Y%-4)>7 OR X%<0 OR X%>1280 OR Y%>1024 OR Y%<0 OR X%>1216 AND Y%>240 AND Y%<274 4280IF X%>1216 AND Y%>240 AND Y%<274 UNTIL 1 ELSE PROCexplosion:UNTIL0 4290FOR across=X% TO 1300 4300COLOUR1,128+RND(127),128+RND(127),128+RND(127) 4310MOUSE RECTANGLE across,Y%,0,0 4320FOR PORS=0 TO 100:NEXT 4330NEXT 4340FOR up=Y% TO 1100 4350COLOUR1,128+RND(127),128+RND(127),128+RND(127) 4360MOUSE RECTANGLE 1300,up,0,0 4370FOR PORS=0 TO 100:NEXT 4380NEXT 4390COLOUR1,0,0,0 4400ENDPROC 4410DEFPROClevel4 4420REPEAT 4430PROClocate 4440a%=50:b%=5 4450c%=0:d%=0 4460e%=930 4470f%=0:g%=0 4480h%=730:m%=0 4490FOR smoke%=0 TO 50 4500motes%(smoke%,0)=RND(40)+40 4510motes%(smoke%,1)=950+RND(20) 4520NEXT 4530whichblack2%=whichblack%-1 4540IF whichblack2%=1 whichblack2%=6 4560*ScreenLoad <Obey$Dir>.Level4 4570PROCPalette 4571MOUSE RECTANGLE 1160,924,0,0 4580SYS"Wimp_SpriteOp",36,,"gamepointer",%1100001 4590MOUSE COLOUR 2,255,255,255 4600REPEAT 4601PROCwait 4610COLOURwhichblack%,0,0,0 4620COLOURwhichblack2%,0,0,0 4630whichblack%+=1:whichblack2%+=1 4640IF whichblack%=7 whichblack%=2 4650IF whichblack2%=7 whichblack2%=2 4660COLOUR whichblack%,0,255,0 4670COLOUR whichblack2%,0,128,128 4680IF Y%>830 THEN 4690GCOL7 4700ELLIPSE FILL 840,916,a%,100-a% 4710a%+=b% 4720IF a%>70 OR a%<25 b%=-b% 4730GCOL14 4740ELLIPSE FILL 840,916,a%,100-a% 4750GCOL7 4760CIRCLE FILL 460+COSRAD(c%)*200,916+SINRAD(d%)*50,24 4770c%+=5:d%+=10 4780GCOL9 4790CIRCLE FILL 460+COSRAD(c%)*200,916+SINRAD(d%)*50,24 4800ENDIF 4810GCOL7 4820CIRCLE FILL 58,e%,20 4830e%-=3 4840REM DIE IF e%<390 4850GCOL0 4860CIRCLE FILL 58,e%,8+RND(12) 4870FOR smoke%=0 TO 50 4880IF motes%(smoke%,0)=0 THEN motes%(smoke%,0)=40+RND(36):motes%(smoke%,1)=e%+24 4890R%=RND(17)-9 4900GCOL7 4910PLOT69,motes%(smoke%,0),motes%(smoke%,1) 4920IF POINT(motes%(smoke%,0)+R%,motes%(smoke%,1)+4)<>7 OR motes%(smoke%,1)>e%+100 AND RND(20)=1 motes%(smoke%,0)=0 ELSE motes%(smoke%,0)+=R%:motes%(smoke%,1)+=4 4930GCOL 0 4940PLOT69,motes%(smoke%,0),motes%(smoke%,1) 4950NEXT 4960m%+=1 4970GCOL7 4980CIRCLE FILL 1224,h%,32 4990h%-=m% 5000IF h%<64 h%=64:m%=-36 5010GCOL13 5020CIRCLE FILL 1224,h%,32 5030GCOL7 5040CIRCLE FILL 504+(X%-504)/32,714+(Y%-714)/32,24 5050CIRCLE FILL 644+(X%-644)/32,714+(Y%-714)/32,24 5060PROCmouse 5070GCOL8 5080CIRCLE FILL 504+(X%-504)/32,714+(Y%-714)/32,24 5090CIRCLE FILL 644+(X%-644)/32,714+(Y%-714)/32,24 5100UNTIL POINT(X%+4,Y%-4)=0 OR POINT(X%+4,Y%-4)=whichblack% OR POINT(X%+4,Y%-4)=whichblack2% OR POINT(X%+4,Y%-4)>7 OR X%<0 OR X%>1280 OR Y%>1024 OR e%<390 OR X%<50 AND Y%>15 AND Y%<150 5110IF e%<390 THEN 5120FOR fade%=255 TO 0 STEP-1 5130WAIT 5140FOR colour%=1 TO 15 5150COLOURcolour%,fade%,fade%,fade% 5160NEXT 5170*POINTER 0 5180NEXT 5190CLS 5200PROCPalette 5210COLOUR1,0,0,0 5220*POINTER 1 5230ENDIF 5240IF X%<50 AND Y%>15 AND Y%<150 UNTIL1 ELSE IF e%<390 UNTIL 0 ELSE PROCexplosion:UNTIL0 5250FOR across=X% TO -20 STEP-1 5260GCOL8 5270CIRCLE FILL 504+(across-504)/32,714+(Y%-714)/32,24 5280CIRCLE FILL 644+(across-644)/32,714+(Y%-714)/32,24 5290COLOUR1,RND(128)+128,RND(128)+128,RND(128)+128 5300MOUSE RECTANGLE across,Y%,0,0 5310GCOL7 5320WAIT 5330CIRCLE FILL 504+(across-504)/32,714+(Y%-714)/32,24 5340CIRCLE FILL 644+(across-644)/32,714+(Y%-714)/32,24 5350NEXT 5360FOR up=Y% TO 1100 STEP4 5370GCOL8 5380CIRCLE FILL 488,714+(up-714)/32,24 5390CIRCLE FILL 624,714+(up-714)/32,24 5400COLOUR1,RND(128)+128,RND(128)+128,RND(128)+128 5410MOUSE RECTANGLE -20,up,0,0 5420GCOL7 5430WAIT 5440CIRCLE FILL 488,714+(up-714)/32,24 5450CIRCLE FILL 624,714+(up-714)/32,24 5460NEXT 5470COLOUR1,0,0,0 5480ENDPROC 5490DEFPROClocate 5500*POINTER 1 5510SYS"Wimp_SpriteOp",36,,"u_r_here",%1100001 5520MOUSE COLOUR 1,0,0,255 5530MOUSE COLOUR 2,0,0,128 5540MOUSE COLOUR 3,255,0,0 5550ENDPROC 5560DEFPROClevel5 5570CLS 5580REPEAT 5590PROClocate 5610*ScreenLoad <Obey$Dir>.Level5 5620PROCPalette 5621MOUSE RECTANGLE 320,400,0,0 5630SYS"Wimp_SpriteOp",36,,"gamepointer",%1100001 5640MOUSE COLOUR 2,255,255,255 5650satX%=1000:satY%=220:satA%=0:satDX%=0:satDY%=0 5660a%=0:b%=10:c%=-10:d%=0:e%=0:i%=0:j%=0:k%=0:l%=6:t%=0 5670FOR m=0 TO 9 5680FOR c=0 TO 5 5690spikes%(m,c)=0 5700NEXT:NEXT 5710FOR m=0 TO 5 5720stars%(0,m)=1130+m*16+RND(16) 5730stars%(1,m)=650+RND(100) 5740stars%(2,m)=0 5750stars%(3,m)=RND(32)-16 5760stars%(4,m)=0 5770NEXT 5780MOUSEX%,Y%,Z 5790MOUSE RECTANGLE X%-4,Y%-4,8,8 5800REPEAT:MOUSEX,Y,Z:UNTIL X<>X% OR Y<>Y% 5810REPEAT 5820IF X%>200 AND Y%>164 AND X%<460 AND Y%<432 THEN 5830MOUSE RECTANGLE X%-50,Y%-80,100,100 5840MOUSE TO X%,Y%-t% 5850IF t%<100 t%+=1 5860ENDIF 5870IF X%<640 AND Y%>524 AND Y%<854 THEN 5880MOUSE TO X%+SINRAD(satA%)*8,Y%+COSRAD(satA%)*8 5890GCOL7 5900RECTANGLE FILL584,588,58,74 5910GCOL0 5920RECTANGLE FILL584,662,58,Y%-680 5930ENDIF 5940GCOL7 5950MOVE satX%+(SINRAD(satA%)*32),satY%+(COSRAD(satA%)*32) 5960MOVE satX%+(SINRAD(satA%+100)*48),satY%+(COSRAD(satA%+100)*48) 5970PROCwait 5980PLOT85,satX%+(SINRAD(satA%+260)*40),satY%+(COSRAD(satA%+260)*40) 5990satA%+=4 6000IF X%>908 AND Y%>150 AND Y%<528 THEN 6010satX%+=satDX% 6020IF satX%<954 satX%=954 6030IF satX%>1212 satX%=1212 6040satY%+=satDY% 6050IF satY%<204 satY%=204 6060IF satY%>474 satY%=474 6070MOUSE TO X%-satDX%/2,Y%-satDY%/2 6080satDX%=satDX%/1.1+(X%-satX%)/48 6090satDY%=satDY%/1.1+(Y%-satY%)/48 6100ENDIF 6110IF d%=0 AND X%>900 AND X%<1100 AND Y%>910 THEN 6120e%=1 6130GCOLRND(8)+7 6140RECTANGLE 900,918,20,80 6150GCOLRND(8)+7 6160RECTANGLE 904,926,12,64 6170MOUSE TO X%-16,Y% 6180IF X%<924 THEN ENDIF:UNTIL1:GOTO290 6190ENDIF 6200IF e%=1 AND X%>1100 THEN d%=1:GCOL7:RECTANGLE FILL 900,918,20,80:e%=0 6210IF d%=1 AND X%>600 AND X%<800 AND Y%>910 THEN 6220e%=2 6230GCOLRND(8)+7 6240RECTANGLE 600,918,20,80 6250GCOLRND(8)+7 6260RECTANGLE 604,926,12,64 6270MOUSE TO X%-20,Y% 6280IF X%<624 THEN ENDIF:UNTIL1:GOTO280 6290ENDIF 6300IF e%=2 AND X%>800 THEN d%=2:GCOL7:RECTANGLE FILL 600,918,20,80:e%=0 6310IF d%=2 AND X%<500 AND Y%>910 OR e%=3 THEN 6320e%=3 6330GCOLRND(8)+7 6340RECTANGLE 600,918,20,80 6350GCOLRND(8)+7 6360RECTANGLE 604,926,12,64 6370MOUSE TO X%+24,Y% 6380IF X%>596 THEN ENDIF:UNTIL1:GOTO270 6390ENDIF 6400IF e%=3 AND X%<300 THEN d%=3:GCOL7:RECTANGLE FILL 600,918,20,80:e%=0 6410GCOL11 6420MOVE satX%+(SINRAD(satA%)*32),satY%+(COSRAD(satA%)*32) 6430MOVE satX%+(SINRAD(satA%+100)*48),satY%+(COSRAD(satA%+100)*48) 6440PLOT85,satX%+(SINRAD(satA%+260)*40),satY%+(COSRAD(satA%+260)*40) 6450GCOL7 6460WAIT 6470RECTANGLE FILL644,154,196,366 6480b%+=c% 6490a%+=b% 6500c%-=SGN(b%) 6510GCOL0 6520MOVE 730,520:MOVE 770,520 6530PLOT&75,770+(SINRAD(a%/36-168)*350),520+(COSRAD(a%/36-168)*330) 6540GCOL14 6550CIRCLE FILL 750+(SINRAD(a%/36-168)*350),520+(COSRAD(a%/36-168)*330),32 6560j%=(j%+1)MOD6 6570IF j%=5 k%=(k%+1)MOD10 6580IF X%>640 AND Y%<840 AND X%<1032 AND Y%>590 AND spikes%(k%,0)=0 THEN 6590spikes%(k%,0)=1 6600spikes%(k%,1)=850 6610spikes%(k%,2)=840 6620spikes%(k%,3)=(X%-850)/5 6630spikes%(k%,4)=(Y%-840)/5 6640ENDIF 6650FOR i%=0 TO 9 6660IF spikes%(i%,0)=1 THEN 6670GCOL7 6680CIRCLE FILL spikes%(i%,1),spikes%(i%,2),8 6690IF spikes%(i%,1)+spikes%(i%,3)<652 OR spikes%(i%,1)+spikes%(i%,3)>1016 spikes%(i%,3)=-spikes%(i%,3)/4*3 6700IF spikes%(i%,2)+spikes%(i%,4)<596 OR spikes%(i%,2)+spikes%(i%,4)>840 spikes%(i%,4)=-spikes%(i%,4)/4*3 6710spikes%(i%,1)+=spikes%(i%,3) 6720spikes%(i%,2)+=spikes%(i%,4) 6730GCOL13 6740CIRCLE FILL spikes%(i%,1),spikes%(i%,2),8 6750IF spikes%(i%,3)>-6 AND spikes%(i%,3)<6 AND spikes%(i%,4)>-6 AND spikes%(i%,4)<6 GCOL7:CIRCLE FILL spikes%(i%,1),spikes%(i%,2),8:spikes%(i%,0)=0 6760ENDIF 6770NEXT 6780FOR f%=0 TO 5 6790IF stars%(4,f%)=1 GOTO 6900 6800GCOL7 6810CIRCLE FILL stars%(0,f%),stars%(1,f%),16 6820IF stars%(2,f%)<20 stars%(1,f%)+=SGN(stars%(3,f%)) 6830stars%(3,f%)=((stars%(3,f%)+17)MOD33)-16 6840IF X%+50>stars%(0,f%) AND X%-50<stars%(0,f%) AND Y%+50>stars%(1,f%) AND Y%-50<stars%(1,f%) AND stars%(2,f%)=0 THEN stars%(2,f%)=1 6850IF stars%(2,f%)>0 stars%(2,f%)+=1 6860IF stars%(2,f%)=0 GCOL9 ELSE IF stars%(2,f%)<16 GCOL14 ELSE GCOL11 6870CIRCLE FILL stars%(0,f%),stars%(1,f%),16 6880IF stars%(2,f%)>20 AND stars%(2,f%)<22 CIRCLE FILL stars%(0,f%),stars%(1,f%),100 6890IF stars%(2,f%)=22 GCOL7:CIRCLE FILL stars%(0,f%),stars%(1,f%),100:stars%(4,f%)=1:l%-=1 6900NEXT 6910IF l%=0 GCOL7:RECTANGLE FILL 1164,848,98,60:l%=1 6920PROCmouse 6930UNTIL POINT(X%+4,Y%-4)<>7 OR X%<60 AND Y%<944 AND Y%>880 6940IF X%<60 AND Y%<944 AND Y%>880 UNTIL1 ELSE PROCexplosion:UNTIL0 6950FOR across=X% TO -20 STEP-1 6960COLOUR1,RND(128)+128,RND(128)+128,RND(128)+128 6970MOUSE RECTANGLE across,Y%,0,0 6980FOR pors=0 TO 100:NEXT 6990NEXT 7000CLS 7010MOUSE RECTANGLE 200,200,880,724 7020PRINTTAB(35,15)"Well Done." 7030PRINTTAB(24,17)"You have Completed all 5 levels." 7040PRINTTAB(27,19)"Do you want to play again?" 7050SYS"OS_Confirm" TO n% 7060ENDPROC 7070: 7080DEFPROCPalette 7090VDU 19,0,16,240,240,240 7100VDU 19,1,16,128,0,0 7110VDU 19,2,16,0,0,0 7120VDU 19,3,16,0,0,0 7130VDU 19,4,16,0,0,0 7140VDU 19,5,16,0,0,0 7150VDU 19,6,16,0,0,0 7160VDU 19,7,16,0,0,0 7170VDU 19,8,16,0,64,144 7180VDU 19,9,16,224,224,0 7190VDU 19,10,16,0,240,0 7200VDU 19,11,16,208,0,0 7210VDU 19,12,16,224,224,176 7220VDU 19,13,16,224,96,208 7230VDU 19,14,16,240,128,0 7240VDU 19,15,16,0,176,240 7250*POINTER 1 7260ENDPROC 7270: 7280DEFPROCwait 7290WAIT 7300WAIT 7310WAIT 7320WAIT 7330WAIT 7340ENDPROC
�>!Aargh!.!RunImage
%� � 1992 Cheap 'N' Arsty Software
G� This program is PD, but is not to be spread arround in any edited
( � form without my consent!
2� So There !
< � LORIS
F@� NOTE [it may, however be archived using SPARK, ArcFS etc.]
P� � �error
Z�12
d
ȗ � 1
n
�128+7
x�0
��
��
� �Palette
��stars%(20,5)
��spikes%(9,5)
��mouse%(2)
�� icicles%(5,1)
�� ricicles%(5)
�� drips%(5)
�� motes%(50,1)
�whichblack%=3
� �1,0,0,0
��
�level1
�level2
�level3
" �level4
, �level5
6� n%=121 �0 � � 1
@*|<Obey$Dir>.PaletteOK
J *DeskTop
T�
^ ��error
h � � �
r � �=17 �
|�
�!�30,10)"Fine! Be like that!"
�*|<Obey$Dir>.PaletteOK
� *DeskTop
��
��
��5,5)"Oh no! A bug!"
��:�;" at line ";�
�Q�'"Please contact me -LORIS- at 65 Davenport Ave,Hessle,N.Humberside,HU13ORN"
�:�"or (0482) 640558 and tell me what happened! Thanks!"
�*|<Obey$Dir>.PaletteOK
��
� ��level1
��
�35,15)"Get Ready"
�1,0,0,0
�locate
&!*ScreenLoad <Obey$Dir>.Level1
0 �Palette
:ȗ ȓ 60,60,0,0
D0ș"Wimp_SpriteOp",36,,"gamepointer",%1100001
Nȗ � 2,255,255,255
XDX%=0:DY%=0
bblobX%=1100:blobY%=300
l missileX%=-100:missileY%=0
v missileDX%=0:missileDY%=0
�s0%=0:s1%=0:s2%=0
�
trap%=380
�X%=60:Y%=60
�nomorebombs=�
�� spikes%=0 � 9
�+spikes%(spikes%,0)=spikes%*42+�(42)+480
�spikes%(spikes%,1)=382
�spikes%(spikes%,2)=0
�spikes%(spikes%,3)=0
�0spikes%(spikes%,4)=spikes%(spikes%,0)-�(200)
� spikes%(spikes%,5)=50+�(50)
��
�� stars%=0 � 20
� n%=0 � 3
stars%(stars%,n%)=0
�:�
�128+7
* across=0
4�
>across+=0.2
H� whichblack%,0,0,0
Rwhichblack%+=1
\!� whichblack%=7 whichblack%=2
f� whichblack%,255,255,0
p�7
z� 1200,100
�
� 1200,90
� �&55,1200+DX%*3,100+DY%*3
�ȏ Ȑ blobX%,blobY%,32
�DX%+=�(11)-6
�DY%+=�(11)-6
�� DX%>20 DX%=20
�� DX%<-20 DX%=-20
�� DY%>20 DY%=20
�� DY%<-20 DY%=-20
�blobX%+=DX%
�blobY%+=DY%
�
blobY%-=8
�� blobX%<992 blobX%=992
� blobX%>1232 blobX%=1232
� blobY%<40 blobY%=40
� blobY%>380 blobY%=380
$�9
.� 1200,100
8
� 1200,90
B �&55,1200+DX%*3,100+DY%*3
L�10
Vȏ Ȑ blobX%,blobY%,32
`(� X%>950 � Y%<420 ȗ � X%+DX%,Y%+DY%
jx� missileX%=-100 � X%>852 � Y%<838 � Y%>474 � nomorebombs=� � missileX%=900:missileY%=800:missileDX%=2:missileDY%=-4
t� missileX%>0 �
~�7
� ȏ Ȑ missileX%,missileY%,8
�missileX%+=missileDX%
�missileY%+=missileDY%
�/missileDX%=missileDX%/1.1+(X%-missileX%)/20
�/missileDY%=missileDY%/1.1+(Y%-missileY%)/20
�!� missileDX%>32 missileDX%=32
�#� missileDX%<-32 missileDX%=-32
�!� missileDY%>32 missileDY%=32
�#� missileDY%<-32 missileDY%=-32
�4� missileY%>826 � missileY%<480 � missileX%=-100
�x� missileX%<874 � missileX%>0 ȓ Ȑ 824,476,42,362:missileX%=-50:�12:� 800,472:� 890,472:�&55,840,500:nomorebombs=�
�-� �missileX%,missileY%)<>7 missileX%=-100
�11
ȏ Ȑ missileX%,missileY%,8
i� missileX%>X%-32 � missileX%<X%+32 � missileY%>Y%-32 � missileY%<Y%+32 ȏ Ȑ missileX%,missileY%,100
�
(� stars%=0 � 20
2� stars%(stars%,0)=0 �
< stars%(stars%,2)=�(15)-8
F stars%(stars%,3)=�(13)-8
P`� stars%(stars%,2)<-2 � stars%(stars%,2)>2 � stars%(stars%,3)<-2 � stars%(stars%,3)>2 � �T|E
Z4� stars%(stars%,2)=0 � stars%(stars%,3)=0 � �T|E
d+stars%(stars%,0)=566+stars%(stars%,2)*2
n+stars%(stars%,1)=668+stars%(stars%,3)*2
x�
��7
�-ȏ Ȑ stars%(stars%,0),stars%(stars%,1),4
�&stars%(stars%,0)+=stars%(stars%,2)
�&stars%(stars%,1)+=stars%(stars%,3)
�x� �stars%(stars%,0)+stars%(stars%,2)*3,stars%(stars%,1)+stars%(stars%,3)*3)<>7 stars%(stars%,0)=0:stars%(stars%,1)=0
��14
�-ȏ Ȑ stars%(stars%,0),stars%(stars%,1),4
��
��8
�Ȗ
� �wait
�ȓ Ȑ 4,515,260,252
��7
� a=0 � 1 � 0.2
"� �(a+across)*80+120,515+a*208
"� �(a+across)*80+160,515+a*208
")�&75,�(a+across+0.2)*80+160,556+a*208
,�
6�7
@ȓ Ȑ 5,100,436,280
J�13
T� a=0 � 1 � 0.2
^ � a*352,�(a+across)*100+280
h � a*352,�(a+across)*100+200
r)�&75,a*352+88,�(a+across+0.2)*100+200
|�
� � X%<264 � Y%>791 � s1%+=8
��15
�ȓ Ȑ 264,791,-s1%,48
�/� s1%>264 � s1%<300 ȓ Ȑ 36,842,34,s1%-264
�0� X%>550 � X%<838 � Y%>910 � Y%<978 � s2%+=4
�ȓ Ȑ 550,977,290,-s2%
�ȓ Ȑ 550,913,290,s2%
�� Y%<400 � trap%>80 �
�� spikes%=0 � 9
��7
�+� spikes%(spikes%,0),spikes%(spikes%,1)
�.� spikes%(spikes%,0)+20,spikes%(spikes%,1)
�D�&55,spikes%(spikes%,0)+10,spikes%(spikes%,1)-spikes%(spikes%,5)
0� X%>spikes%(spikes%,4) spikes%(spikes%,3)=1
0� spikes%(spikes%,3)=1 spikes%(spikes%,2)+=1
*spikes%(spikes%,1)-=spikes%(spikes%,2)
&[� spikes%(spikes%,1)<spikes%(spikes%,5)/2+64 spikes%(spikes%,1)=spikes%(spikes%,5)/2+64
0�15
:+� spikes%(spikes%,0),spikes%(spikes%,1)
D.� spikes%(spikes%,0)+20,spikes%(spikes%,1)
ND�&55,spikes%(spikes%,0)+10,spikes%(spikes%,1)-spikes%(spikes%,5)
X�
bH� spikes%(8,1)<spikes%(8,5)+64 � spikes%(9,1)<spikes%(9,5)+64 s0%=16
ltrap%-=s0%
v� trap%<80 s0%=0
�*ȓ Ȑ 480,trap%,444,52 � 480,trap%-s0%
��
�
�mouse
�r� �X%+4,Y%-4)=0 � �X%+4,Y%-4)=whichblack% � �X%+4,Y%-4)>7 � X%<0 � X%>1280 � Y%>1024 � Y%<0 � X%>1070 � Y%>870
�*� X%>1070 � Y%>870 � 1 � �explosion:�0
�� across=X% � 1300
�'�1,128+�(127),128+�(127),128+�(127)
�ȗ ȓ across,Y%,0,0
�� PORS=0 � 100:�
��
�� down=Y% � -20 � -1
�'�1,128+�(127),128+�(127),128+�(127)
�ȗ ȓ 1300,down,0,0
� PORS=0 � 100:�
�
�1,0,0,0
�
* ��level2
4�
>�
H �locate
\!*ScreenLoad <Obey$Dir>.Level2
f �Palette
gȗ ȓ 590,680,0,0
p0ș"Wimp_SpriteOp",36,,"gamepointer",%1100001
zȗ � 2,255,255,255
�
ȗX%,X%,Z
�a%=0:s0%=0:s1%=0:s2%=0
�+door1%=58:door2%=58:door3%=30:door4%=30
�sec%=75-�($,2))
�min%=60-�(��$,20,2))
�!hour%=12-�(��$,17,2))-min%/60
�� icicle%=0 � 5
�,icicles%(icicle%,0)=850+�(30)+icicle%*30
� icicles%(icicle%,1)=�(10)
� drips%(icicle%)=�(400)+66
�ricicles%(icicle%)=�(8)
��
��
� �wait
�whichblack%,0,0,0
whichblack%+=1
!� whichblack%=7 whichblack%=2
$� whichblack%,255,128,0
.�7
8,ȏ Ȑ 590+(��(a%)*40),684+(��(a%)*80),16
B,ȏ Ȑ 590+(��(a%)*80),684+(��(a%)*40),16
L
a%+=16
V�11
`,ȏ Ȑ 590+(��(a%)*40),684+(��(a%)*80),16
j,ȏ Ȑ 590+(��(a%)*80),684+(��(a%)*40),16
t.� X%>554 � Y%<896 � X%<622 � Y%>840 s0%+=8
~�9
� � s0%>0 ȓ Ȑ 554,840,68,s0%
� � X%<418 � Y%<536 s1%-=4
�*� s1%<0 � s1%>-62 ȓ Ȑ 420,480,s1%,52
�� s1%<-62 s1%-=12
�0� s1%<-60 � s1%>-432 ȓ Ȑ 420,436,s1%+58,46
�!� s1%<-426 � s1%>-790 s1%-=12
�1� s1%<-426 � s1%>-790 ȓ Ȑ 56,434,60,s1%+426
� � s1%<-790 � s2%<136 s2%+=8
�-� s2%>0 ȓ 116,60+s2%,300,20 � 116,68+s2%
�/� s2%>0 ȓ 116,364-s2%,300,20 � 116,356-s2%
��7
�ȓ Ȑ 642,66,100,door1%
� X%>476 � Y%>200 door1%-=4
� door1%<0 door1%=0
� Y%<200 door1%+=14
� door1%>60 door1%=60
(ȓ Ȑ 646,200,96,60
2ȏ Ȑ 688,370,door3%
<� X%<488 door2%-=4
F� door2%<0 door2%=0
P� X%>488 door2%+=12
Z� door2%>60 door2%=60
d� Y%<300 door3%-=4
n� door3%<0 door3%=0
x� Y%>300 door3%+=12
�� door3%>40 door3%=40
�5� X%>600 � Y%>460 � Y%<580 door4%-=2 � door4%+=10
�� door4%<0 door4%=0
�� door4%>32 door4%=32
�ȓ Ȑ 646,474,98,64
��15
�ȓ Ȑ 646,66,90,door1%
�
� 650,200
�� 650,200+door2%
��&55,670+door2%,200
�
� 730,260
�� 730,260-door2%
��&55,708-door2%,260
ȏ Ȑ 688,370,door3%
4ȓ Ȑ 678-door4%,504-door4%,door4%*2+24,door4%*2
� icicle%=0 � 5
"�0
,ȓ Ȑ 835,0,250,60
6g� drips%(icicle%)<60+ricicles%(icicle%) � drips%(icicle%)>0 drips%(icicle%)=0:ricicles%(icicle%)+=6
@�� drips%(icicle%)>0 �7:ȏ Ȑ icicles%(icicle%,0)+10,drips%(icicle%),4:drips%(icicle%)-=12:�15:ȏ Ȑ icicles%(icicle%,0)+10,drips%(icicle%),4
J`� drips%(icicle%)=0 � �(20)=1 icicles%(icicle%,1)+=8:drips%(icicle%)=460-icicles%(icicle%,1)
T5� icicles%(icicle%,1)>300 icicles%(icicle%,1)=300
^3� ricicles%(icicle%)>200 ricicles%(icicle%)=200
h�8
r4� icicles%(icicle%,0)-icicles%(icicle%,1)/10,460
|7� icicles%(icicle%,0)+20+icicles%(icicle%,1)/10,460
�7�&55,icicles%(icicle%,0)+10,460-icicles%(icicle%,1)
�4� icicles%(icicle%,0)-ricicles%(icicle%)/2+10,66
�4� icicles%(icicle%,0)+ricicles%(icicle%)/2+10,66
�5�&55,icicles%(icicle%,0)+10,66+ricicles%(icicle%)
��
��7
�=� 1024,676,1024+(��((sec%)*6)*150),676+(��((sec%)*6)*150)
�� sec%>74 �
�*� 1024+��(min%*6)*16,676+��(min%*6)*16
�*� 1024-��(min%*6)*16,676-��(min%*6)*16
�=�&55,1024+(��((min%*6)+90)*150),676+(��((min%*6)+90)*150)
�.� 1024+��(hour%*30)*24,676+��(hour%*30)*24
�.� 1024-��(hour%*30)*24,676-��(hour%*30)*24
A�&55,1024+(��((hour%*30)+90)*120),676+(��((hour%*30)+90)*120)
min%=60-�(��$,20,2))
,� min%<60 � min%>29 � demi=0.5 � demi%=0
&!hour%=12-�(��$,17,2))-min%/60
0�
:sec%=75-�($,2))
D�11
N.� 1024+��(hour%*30)*24,676+��(hour%*30)*24
X.� 1024-��(hour%*30)*24,676-��(hour%*30)*24
bA�&55,1024+(��((hour%*30)+90)*120),676+(��((hour%*30)+90)*120)
l�14
v*� 1024+��(min%*6)*16,676+��(min%*6)*16
�*� 1024-��(min%*6)*16,676-��(min%*6)*16
�=�&55,1024+(��((min%*6)+90)*150),676+(��((min%*6)+90)*150)
��9
�=� 1024,676,1024+(��((sec%)*6)*150),676+(��((sec%)*6)*150)
�
�mouse
�{� �X%+4,Y%-4)=0 � �X%+4,Y%-4)=whichblack% � �X%+4,Y%-4)>7 � X%<0 � X%>1280 � Y%>1024 � Y%<0 � X%>1200 � Y%>354 � Y%<466
�2� X%>1200 � Y%>354 � Y%<466 �1 � �explosion:�0
�� across=X% � 1300
�'�1,�(128)+128,�(128)+128,�(128)+128
�ȗ ȓ across,Y%,0,0
�� pors=0 � 100:�
��
�� up=Y% � 1100
'�1,�(128)+128,�(128)+128,�(128)+128
ȗ ȓ 1300,up,0,0
� pors=0 � 100:�
�
* �1,0,0,0
4�
>��explosion
H*POINTER 0
R� 19,1,24,255,0,0
\� explosion=0 � 50
f�(�X%+4,Y%-4))
pȏ Ȑ X%,Y%,explosion
z�0
�ȏ X%,Y%,explosion+8
�� PORS=0 � 100:�
��
��
��19,1,24,128,128,128
��
� ��mouse
�� colour%=0 � 2
� mouse%(colour%)+=�(33)-17
�-� mouse%(colour%)>255 mouse%(colour%)=255
�-� mouse%(colour%)<128 mouse%(colour%)=128
��
�(ȗ � 1,mouse%(0),mouse%(1),mouse%(2)
ȗX%,Y%,Z%
ȗ ȓ X%-50,Y%-50,100,100
� Z% � ȗ ȓ X%,Y%,0,0
$�
. ��level3
8�
B�
L �locate
`X%=0
j �2,0,0,0
t!*SCREENLOAD <Obey$Dir>.Level3
~ �Palette
ȗ ȓ 80,980,0,0
�Da%=0:b%=0:c%=4:d%=600:e%=114:lastdrop%=0:drips%(0)=0:drips%(1)=0
�door1%=0:f%=2:s0%=0
�0ș"Wimp_SpriteOp",36,,"gamepointer",%1100001
�ȗ � 2,255,255,255
��
��7
�Ȗ
� �wait
� ȝ Ȑ 268,430,230,50,�(a%)
�!ȝ Ȑ 268,430,230,50,�(a%+90)
�
a%-=12
��10
ȝ Ȑ 268,430,230,50,�(a%)
!ȝ Ȑ 268,430,230,50,�(a%+90)
�7
ȝ Ȑ 300,938,100,b%
(
b%+=c%
2� b%>78 � b%<-78 c%=-c%
<�9.5+�(b%)/2
Fȝ Ȑ 300,938,80,b%
Plastdrop%+=1
Z/� lastdrop%=16 � e%<350 drips%(1)=340:d%-=4
d;� lastdrop%=32 � e%<350 drips%(0)=340:d%-=4:lastdrop%=0
n� drip%=0 � 1
xc� drips%(drip%)>0 �7:ȏ Ȑ 1104,drips%(drip%),8:drips%(drip%)-=8:�14:ȏ Ȑ 1104,drips%(drip%),8
�[� drips%(drip%)>0 � drips%(drip%)<e%-8 e%+=4:�14:ȓ Ȑ 1096,e%-16,16,12:drips%(drip%)=0
��
� �128+14
��7
��77,1100,d%
�
�128+7
��14
��77,1100,e%
�%� X%>565 � Y%<666 � s0%=0 � s0%=4
�� s0%>0 � s0%<330 �
�
s0%+=8
��0
� �565,666
�565+s0%+12,666
�&55,565,666-s0%*2+32
�908,32
"�908-s0%-12,32
,�&55,908,32+s0%*2-32
6�
@�7
Jȓ Ȑ444,908,120,56
Tdoor1%+=f%
^!� door1%>28 � door1%<2 f%=-f%
h�15
r ȓ Ȑ 444,904,120,door1%
| ȓ Ȑ 444,964,120,-door1%
�ȓ0,738,8,60 � 1272,738
� ȓ0,738,1280,60 � -8,738
�
�mouse
�8� X%>564 � X%<1100 � Y%>850 � ȗ � X%,Y%-(X%-564)/64
�a� �X%+4,Y%-4)=0 � �X%+4,Y%-4)>7 � X%<0 � X%>1280 � Y%>1024 � Y%<0 � X%>1216 � Y%>240 � Y%<274
�3� X%>1216 � Y%>240 � Y%<274 � 1 � �explosion:�0
�� across=X% � 1300
�'�1,128+�(127),128+�(127),128+�(127)
�ȗ ȓ across,Y%,0,0
�� PORS=0 � 100:�
��
�� up=Y% � 1100
�'�1,128+�(127),128+�(127),128+�(127)
ȗ ȓ 1300,up,0,0
� PORS=0 � 100:�
�
& �1,0,0,0
0�
: ��level4
D�
N �locate
Xa%=50:b%=5
b
c%=0:d%=0
l
e%=930
v
f%=0:g%=0
�h%=730:m%=0
�� smoke%=0 � 50
� motes%(smoke%,0)=�(40)+40
� motes%(smoke%,1)=950+�(20)
��
� whichblack2%=whichblack%-1
�#� whichblack2%=1 whichblack2%=6
�!*ScreenLoad <Obey$Dir>.Level4
� �Palette
�ȗ ȓ 1160,924,0,0
�0ș"Wimp_SpriteOp",36,,"gamepointer",%1100001
�ȗ � 2,255,255,255
��
� �wait
�whichblack%,0,0,0
�whichblack2%,0,0,0
"whichblack%+=1:whichblack2%+=1
!� whichblack%=7 whichblack%=2
*#� whichblack2%=7 whichblack2%=2
4� whichblack%,0,255,0
> � whichblack2%,0,128,128
H� Y%>830 �
R�7
\ȝ Ȑ 840,916,a%,100-a%
f
a%+=b%
p� a%>70 � a%<25 b%=-b%
z�14
�ȝ Ȑ 840,916,a%,100-a%
��7
�)ȏ Ȑ 460+��(c%)*200,916+��(d%)*50,24
�c%+=5:d%+=10
��9
�)ȏ Ȑ 460+��(c%)*200,916+��(d%)*50,24
��
��7
�ȏ Ȑ 58,e%,20
� e%-=3
�� DIE IF e%<390
��0
�ȏ Ȑ 58,e%,8+�(12)
� smoke%=0 � 50
K� motes%(smoke%,0)=0 � motes%(smoke%,0)=40+�(36):motes%(smoke%,1)=e%+24
R%=�(17)-9
$�7
.)�69,motes%(smoke%,0),motes%(smoke%,1)
8�� �motes%(smoke%,0)+R%,motes%(smoke%,1)+4)<>7 � motes%(smoke%,1)>e%+100 � �(20)=1 motes%(smoke%,0)=0 � motes%(smoke%,0)+=R%:motes%(smoke%,1)+=4
B� 0
L)�69,motes%(smoke%,0),motes%(smoke%,1)
V�
` m%+=1
j�7
tȏ Ȑ 1224,h%,32
~
h%-=m%
�� h%<64 h%=64:m%=-36
��13
�ȏ Ȑ 1224,h%,32
��7
�,ȏ Ȑ 504+(X%-504)/32,714+(Y%-714)/32,24
�,ȏ Ȑ 644+(X%-644)/32,714+(Y%-714)/32,24
�
�mouse
��8
�,ȏ Ȑ 504+(X%-504)/32,714+(Y%-714)/32,24
�,ȏ Ȑ 644+(X%-644)/32,714+(Y%-714)/32,24
� �X%+4,Y%-4)=0 � �X%+4,Y%-4)=whichblack% � �X%+4,Y%-4)=whichblack2% � �X%+4,Y%-4)>7 � X%<0 � X%>1280 � Y%>1024 � e%<390 � X%<50 � Y%>15 � Y%<150
�� e%<390 �
� fade%=255 � 0 �-1
Ȗ
� colour%=1 � 15
�colour%,fade%,fade%,fade%
(�
2*POINTER 0
<�
F�
P �Palette
Z �1,0,0,0
d*POINTER 1
n�
x>� X%<50 � Y%>15 � Y%<150 �1 � � e%<390 � 0 � �explosion:�0
�� across=X% � -20 �-1
��8
�0ȏ Ȑ 504+(across-504)/32,714+(Y%-714)/32,24
�0ȏ Ȑ 644+(across-644)/32,714+(Y%-714)/32,24
�'�1,�(128)+128,�(128)+128,�(128)+128
�ȗ ȓ across,Y%,0,0
��7
�Ȗ
�0ȏ Ȑ 504+(across-504)/32,714+(Y%-714)/32,24
�0ȏ Ȑ 644+(across-644)/32,714+(Y%-714)/32,24
��
�� up=Y% � 1100 �4
��8
ȏ Ȑ 488,714+(up-714)/32,24
ȏ Ȑ 624,714+(up-714)/32,24
'�1,�(128)+128,�(128)+128,�(128)+128
"ȗ ȓ -20,up,0,0
,�7
6Ȗ
@ ȏ Ȑ 488,714+(up-714)/32,24
J ȏ Ȑ 624,714+(up-714)/32,24
T�
^ �1,0,0,0
h�
r ��locate
|*POINTER 1
�-ș"Wimp_SpriteOp",36,,"u_r_here",%1100001
�ȗ � 1,0,0,255
�ȗ � 2,0,0,128
�ȗ � 3,255,0,0
��
� ��level5
��
��
� �locate
�!*ScreenLoad <Obey$Dir>.Level5
� �Palette
�ȗ ȓ 320,400,0,0
�0ș"Wimp_SpriteOp",36,,"gamepointer",%1100001
ȗ � 2,255,255,255
2satX%=1000:satY%=220:satA%=0:satDX%=0:satDY%=0
8a%=0:b%=10:c%=-10:d%=0:e%=0:i%=0:j%=0:k%=0:l%=6:t%=0
&
� m=0 � 9
0
� c=0 � 5
:spikes%(m,c)=0
D�:�
N
� m=0 � 5
X stars%(0,m)=1130+m*16+�(16)
bstars%(1,m)=650+�(100)
lstars%(2,m)=0
vstars%(3,m)=�(32)-16
�stars%(4,m)=0
��
�
ȗX%,Y%,Z
�ȗ ȓ X%-4,Y%-4,8,8
� �:ȗX,Y,Z:� X<>X% � Y<>Y%
��
�)� X%>200 � Y%>164 � X%<460 � Y%<432 �
� ȗ ȓ X%-50,Y%-80,100,100
�ȗ � X%,Y%-t%
�� t%<100 t%+=1
��
� � X%<640 � Y%>524 � Y%<854 �
�&ȗ � X%+��(satA%)*8,Y%+��(satA%)*8
�7
ȓ Ȑ584,588,58,74
�0
ȓ Ȑ584,662,58,Y%-680
*�
4�7
>/� satX%+(��(satA%)*32),satY%+(��(satA%)*32)
H7� satX%+(��(satA%+100)*48),satY%+(��(satA%+100)*48)
R �wait
\9�85,satX%+(��(satA%+260)*40),satY%+(��(satA%+260)*40)
f satA%+=4
p � X%>908 � Y%>150 � Y%<528 �
zsatX%+=satDX%
�� satX%<954 satX%=954
�� satX%>1212 satX%=1212
�satY%+=satDY%
�� satY%<204 satY%=204
�� satY%>474 satY%=474
� ȗ � X%-satDX%/2,Y%-satDY%/2
�#satDX%=satDX%/1.1+(X%-satX%)/48
�#satDY%=satDY%/1.1+(Y%-satY%)/48
��
�(� d%=0 � X%>900 � X%<1100 � Y%>910 �
�e%=1
� �(8)+7
�ȓ 900,918,20,80
�(8)+7
ȓ 904,926,12,64
ȗ � X%-16,Y%
$� X%<924 � �:�1:�TbA
.�
87� e%=1 � X%>1100 � d%=1:�7:ȓ Ȑ 900,918,20,80:e%=0
B'� d%=1 � X%>600 � X%<800 � Y%>910 �
Le%=2
V �(8)+7
`ȓ 600,918,20,80
j �(8)+7
tȓ 604,926,12,64
~ȗ � X%-20,Y%
�� X%<624 � �:�1:�TXA
��
�6� e%=2 � X%>800 � d%=2:�7:ȓ Ȑ 600,918,20,80:e%=0
�%� d%=2 � X%<500 � Y%>910 � e%=3 �
�e%=3
� �(8)+7
�ȓ 600,918,20,80
� �(8)+7
�ȓ 604,926,12,64
�ȗ � X%+24,Y%
�� X%>596 � �:�1:�TNA
��
6� e%=3 � X%<300 � d%=3:�7:ȓ Ȑ 600,918,20,80:e%=0
�11
/� satX%+(��(satA%)*32),satY%+(��(satA%)*32)
7� satX%+(��(satA%+100)*48),satY%+(��(satA%+100)*48)
(9�85,satX%+(��(satA%+260)*40),satY%+(��(satA%+260)*40)
2�7
<Ȗ
Fȓ Ȑ644,154,196,366
P
b%+=c%
Z
a%+=b%
d
c%-=�(b%)
n�0
x� 730,520:� 770,520
�8�&75,770+(��(a%/36-168)*350),520+(��(a%/36-168)*330)
��14
�<ȏ Ȑ 750+(��(a%/36-168)*350),520+(��(a%/36-168)*330),32
�j%=(j%+1)�6
�� j%=5 k%=(k%+1)�10
�<� X%>640 � Y%<840 � X%<1032 � Y%>590 � spikes%(k%,0)=0 �
�spikes%(k%,0)=1
�spikes%(k%,1)=850
�spikes%(k%,2)=840
� spikes%(k%,3)=(X%-850)/5
� spikes%(k%,4)=(Y%-840)/5
��
�� i%=0 � 9
� spikes%(i%,0)=1 �
�7
'ȏ Ȑ spikes%(i%,1),spikes%(i%,2),8
"i� spikes%(i%,1)+spikes%(i%,3)<652 � spikes%(i%,1)+spikes%(i%,3)>1016 spikes%(i%,3)=-spikes%(i%,3)/4*3
,h� spikes%(i%,2)+spikes%(i%,4)<596 � spikes%(i%,2)+spikes%(i%,4)>840 spikes%(i%,4)=-spikes%(i%,4)/4*3
6 spikes%(i%,1)+=spikes%(i%,3)
@ spikes%(i%,2)+=spikes%(i%,4)
J�13
T'ȏ Ȑ spikes%(i%,1),spikes%(i%,2),8
^�� spikes%(i%,3)>-6 � spikes%(i%,3)<6 � spikes%(i%,4)>-6 � spikes%(i%,4)<6 �7:ȏ Ȑ spikes%(i%,1),spikes%(i%,2),8:spikes%(i%,0)=0
h�
r�
|� f%=0 � 5
�� stars%(4,f%)=1 � �dtZ
��7
�&ȏ Ȑ stars%(0,f%),stars%(1,f%),16
�3� stars%(2,f%)<20 stars%(1,f%)+=�(stars%(3,f%))
�*stars%(3,f%)=((stars%(3,f%)+17)�33)-16
�y� X%+50>stars%(0,f%) � X%-50<stars%(0,f%) � Y%+50>stars%(1,f%) � Y%-50<stars%(1,f%) � stars%(2,f%)=0 � stars%(2,f%)=1
�$� stars%(2,f%)>0 stars%(2,f%)+=1
�5� stars%(2,f%)=0 �9 � � stars%(2,f%)<16 �14 � �11
�&ȏ Ȑ stars%(0,f%),stars%(1,f%),16
�K� stars%(2,f%)>20 � stars%(2,f%)<22 ȏ Ȑ stars%(0,f%),stars%(1,f%),100
�Q� stars%(2,f%)=22 �7:ȏ Ȑ stars%(0,f%),stars%(1,f%),100:stars%(4,f%)=1:l%-=1
��
�'� l%=0 �7:ȓ Ȑ 1164,848,98,60:l%=1
�mouse
.� �X%+4,Y%-4)<>7 � X%<60 � Y%<944 � Y%>880
0� X%<60 � Y%<944 � Y%>880 �1 � �explosion:�0
&� across=X% � -20 �-1
0'�1,�(128)+128,�(128)+128,�(128)+128
:ȗ ȓ across,Y%,0,0
D� pors=0 � 100:�
N�
X�
bȗ ȓ 200,200,880,724
l�35,15)"Well Done."
v.�24,17)"You have Completed all 5 levels."
�(�27,19)"Do you want to play again?"
�ș"OS_Confirm" � n%
��
�:
�
��Palette
�� 19,0,16,240,240,240
�� 19,1,16,128,0,0
�� 19,2,16,0,0,0
�� 19,3,16,0,0,0
�� 19,4,16,0,0,0
�� 19,5,16,0,0,0
�� 19,6,16,0,0,0
�� 19,7,16,0,0,0
� 19,8,16,0,64,144
� 19,9,16,224,224,0
� 19,10,16,0,240,0
� 19,11,16,208,0,0
*� 19,12,16,224,224,176
4� 19,13,16,224,96,208
>� 19,14,16,240,128,0
H� 19,15,16,0,176,240
R*POINTER 1
\�
f:
p
��wait
zȖ
�Ȗ
�Ȗ
�Ȗ
�Ȗ
��
� 00000000 0d 00 0a 17 f4 3e 21 41 61 72 67 68 21 2e 21 52 |.....>!Aargh!.!R|
00000010 75 6e 49 6d 61 67 65 0d 00 14 25 f4 20 a9 20 31 |unImage...%. . 1|
00000020 39 39 32 20 43 68 65 61 70 20 27 4e 27 20 41 72 |992 Cheap 'N' Ar|
00000030 73 74 79 20 53 6f 66 74 77 61 72 65 0d 00 1e 47 |sty Software...G|
00000040 f4 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 |. This program i|
00000050 73 20 50 44 2c 20 62 75 74 20 69 73 20 6e 6f 74 |s PD, but is not|
00000060 20 74 6f 20 62 65 20 73 70 72 65 61 64 20 61 72 | to be spread ar|
00000070 72 6f 75 6e 64 20 69 6e 20 61 6e 79 20 65 64 69 |round in any edi|
00000080 74 65 64 0d 00 28 1e f4 20 66 6f 72 6d 20 77 69 |ted..(.. form wi|
00000090 74 68 6f 75 74 20 6d 79 20 63 6f 6e 73 65 6e 74 |thout my consent|
000000a0 21 0d 00 32 10 f4 20 53 6f 20 54 68 65 72 65 20 |!..2.. So There |
000000b0 21 0d 00 3c 0b f4 20 4c 4f 52 49 53 0d 00 46 40 |!..<.. LORIS..F@|
000000c0 f4 20 4e 4f 54 45 20 5b 69 74 20 6d 61 79 2c 20 |. NOTE [it may, |
000000d0 68 6f 77 65 76 65 72 20 62 65 20 61 72 63 68 69 |however be archi|
000000e0 76 65 64 20 75 73 69 6e 67 20 53 50 41 52 4b 2c |ved using SPARK,|
000000f0 20 41 72 63 46 53 20 65 74 63 2e 5d 0d 00 50 0e | ArcFS etc.]..P.|
00000100 ee 20 85 20 f2 65 72 72 6f 72 0d 00 5a 07 eb 31 |. . .error..Z..1|
00000110 32 0d 00 64 0a c8 97 20 88 20 31 0d 00 6e 0a fb |2..d... . 1..n..|
00000120 31 32 38 2b 37 0d 00 78 06 fb 30 0d 00 82 05 db |128+7..x..0.....|
00000130 0d 00 8c 05 87 0d 00 96 0c f2 50 61 6c 65 74 74 |..........Palett|
00000140 65 0d 00 a0 11 de 73 74 61 72 73 25 28 32 30 2c |e.....stars%(20,|
00000150 35 29 0d 00 aa 11 de 73 70 69 6b 65 73 25 28 39 |5).....spikes%(9|
00000160 2c 35 29 0d 00 b4 0e de 6d 6f 75 73 65 25 28 32 |,5).....mouse%(2|
00000170 29 0d 00 be 13 de 20 69 63 69 63 6c 65 73 25 28 |)..... icicles%(|
00000180 35 2c 31 29 0d 00 c8 12 de 20 72 69 63 69 63 6c |5,1)..... ricicl|
00000190 65 73 25 28 35 29 0d 00 d2 0f de 20 64 72 69 70 |es%(5)..... drip|
000001a0 73 25 28 35 29 0d 00 dc 12 de 20 6d 6f 74 65 73 |s%(5)..... motes|
000001b0 25 28 35 30 2c 31 29 0d 00 e6 11 77 68 69 63 68 |%(50,1)....which|
000001c0 62 6c 61 63 6b 25 3d 33 0d 00 f0 0c fb 31 2c 30 |black%=3.....1,0|
000001d0 2c 30 2c 30 0d 00 fa 05 f5 0d 01 04 0b f2 6c 65 |,0,0..........le|
000001e0 76 65 6c 31 0d 01 0e 0b f2 6c 65 76 65 6c 32 0d |vel1.....level2.|
000001f0 01 18 0b f2 6c 65 76 65 6c 33 0d 01 22 0b f2 6c |....level3.."..l|
00000200 65 76 65 6c 34 0d 01 2c 0b f2 6c 65 76 65 6c 35 |evel4..,..level5|
00000210 0d 01 36 15 e7 20 6e 25 3d 31 32 31 20 fd 30 20 |..6.. n%=121 .0 |
00000220 8b 20 fd 20 31 0d 01 40 1a 2a 7c 3c 4f 62 65 79 |. . 1..@.*|<Obey|
00000230 24 44 69 72 3e 2e 50 61 6c 65 74 74 65 4f 4b 0d |$Dir>.PaletteOK.|
00000240 01 4a 0c 2a 44 65 73 6b 54 6f 70 0d 01 54 05 e0 |.J.*DeskTop..T..|
00000250 0d 01 5e 0b dd f2 65 72 72 6f 72 0d 01 68 09 ee |..^...error..h..|
00000260 20 85 20 87 0d 01 72 0c e7 20 9f 3d 31 37 20 8c | . ...r.. .=17 .|
00000270 0d 01 7c 05 db 0d 01 86 21 f1 8a 33 30 2c 31 30 |..|.....!..30,10|
00000280 29 22 46 69 6e 65 21 20 42 65 20 6c 69 6b 65 20 |)"Fine! Be like |
00000290 74 68 61 74 21 22 0d 01 90 1a 2a 7c 3c 4f 62 65 |that!"....*|<Obe|
000002a0 79 24 44 69 72 3e 2e 50 61 6c 65 74 74 65 4f 4b |y$Dir>.PaletteOK|
000002b0 0d 01 9a 0c 2a 44 65 73 6b 54 6f 70 0d 01 a4 05 |....*DeskTop....|
000002c0 cd 0d 01 ae 05 db 0d 01 b8 19 f1 8a 35 2c 35 29 |............5,5)|
000002d0 22 4f 68 20 6e 6f 21 20 41 20 62 75 67 21 22 0d |"Oh no! A bug!".|
000002e0 01 c2 15 f6 3a f1 3b 22 20 61 74 20 6c 69 6e 65 |....:.;" at line|
000002f0 20 22 3b 9e 0d 01 cc 51 f1 27 22 50 6c 65 61 73 | ";....Q.'"Pleas|
00000300 65 20 63 6f 6e 74 61 63 74 20 6d 65 20 2d 4c 4f |e contact me -LO|
00000310 52 49 53 2d 20 61 74 20 36 35 20 44 61 76 65 6e |RIS- at 65 Daven|
00000320 70 6f 72 74 20 41 76 65 2c 48 65 73 73 6c 65 2c |port Ave,Hessle,|
00000330 4e 2e 48 75 6d 62 65 72 73 69 64 65 2c 48 55 31 |N.Humberside,HU1|
00000340 33 4f 52 4e 22 0d 01 d6 3a f1 22 6f 72 20 28 30 |3ORN"...:."or (0|
00000350 34 38 32 29 20 36 34 30 35 35 38 20 61 6e 64 20 |482) 640558 and |
00000360 74 65 6c 6c 20 6d 65 20 77 68 61 74 20 68 61 70 |tell me what hap|
00000370 70 65 6e 65 64 21 20 54 68 61 6e 6b 73 21 22 0d |pened! Thanks!".|
00000380 01 e0 1a 2a 7c 3c 4f 62 65 79 24 44 69 72 3e 2e |...*|<Obey$Dir>.|
00000390 50 61 6c 65 74 74 65 4f 4b 0d 01 ea 05 e0 0d 01 |PaletteOK.......|
000003a0 f4 0c dd f2 6c 65 76 65 6c 31 0d 01 fe 05 f5 0d |....level1......|
000003b0 02 08 17 f1 8a 33 35 2c 31 35 29 22 47 65 74 20 |.....35,15)"Get |
000003c0 52 65 61 64 79 22 0d 02 12 0c fb 31 2c 30 2c 30 |Ready".....1,0,0|
000003d0 2c 30 0d 02 1c 0b f2 6c 6f 63 61 74 65 0d 02 26 |,0.....locate..&|
000003e0 21 2a 53 63 72 65 65 6e 4c 6f 61 64 20 3c 4f 62 |!*ScreenLoad <Ob|
000003f0 65 79 24 44 69 72 3e 2e 4c 65 76 65 6c 31 0d 02 |ey$Dir>.Level1..|
00000400 30 0c f2 50 61 6c 65 74 74 65 0d 02 3a 13 c8 97 |0..Palette..:...|
00000410 20 c8 93 20 36 30 2c 36 30 2c 30 2c 30 0d 02 44 | .. 60,60,0,0..D|
00000420 30 c8 99 22 57 69 6d 70 5f 53 70 72 69 74 65 4f |0.."Wimp_SpriteO|
00000430 70 22 2c 33 36 2c 2c 22 67 61 6d 65 70 6f 69 6e |p",36,,"gamepoin|
00000440 74 65 72 22 2c 25 31 31 30 30 30 30 31 0d 02 4e |ter",%1100001..N|
00000450 16 c8 97 20 fb 20 32 2c 32 35 35 2c 32 35 35 2c |... . 2,255,255,|
00000460 32 35 35 0d 02 58 0f 44 58 25 3d 30 3a 44 59 25 |255..X.DX%=0:DY%|
00000470 3d 30 0d 02 62 1a 62 6c 6f 62 58 25 3d 31 31 30 |=0..b.blobX%=110|
00000480 30 3a 62 6c 6f 62 59 25 3d 33 30 30 0d 02 6c 1e |0:blobY%=300..l.|
00000490 6d 69 73 73 69 6c 65 58 25 3d 2d 31 30 30 3a 6d |missileX%=-100:m|
000004a0 69 73 73 69 6c 65 59 25 3d 30 0d 02 76 1d 6d 69 |issileY%=0..v.mi|
000004b0 73 73 69 6c 65 44 58 25 3d 30 3a 6d 69 73 73 69 |ssileDX%=0:missi|
000004c0 6c 65 44 59 25 3d 30 0d 02 80 15 73 30 25 3d 30 |leDY%=0....s0%=0|
000004d0 3a 73 31 25 3d 30 3a 73 32 25 3d 30 0d 02 8a 0d |:s1%=0:s2%=0....|
000004e0 74 72 61 70 25 3d 33 38 30 0d 02 94 0f 58 25 3d |trap%=380....X%=|
000004f0 36 30 3a 59 25 3d 36 30 0d 02 9e 11 6e 6f 6d 6f |60:Y%=60....nomo|
00000500 72 65 62 6f 6d 62 73 3d a3 0d 02 a8 13 e3 20 73 |rebombs=...... s|
00000510 70 69 6b 65 73 25 3d 30 20 b8 20 39 0d 02 b2 2b |pikes%=0 . 9...+|
00000520 73 70 69 6b 65 73 25 28 73 70 69 6b 65 73 25 2c |spikes%(spikes%,|
00000530 30 29 3d 73 70 69 6b 65 73 25 2a 34 32 2b b3 28 |0)=spikes%*42+.(|
00000540 34 32 29 2b 34 38 30 0d 02 bc 1a 73 70 69 6b 65 |42)+480....spike|
00000550 73 25 28 73 70 69 6b 65 73 25 2c 31 29 3d 33 38 |s%(spikes%,1)=38|
00000560 32 0d 02 c6 18 73 70 69 6b 65 73 25 28 73 70 69 |2....spikes%(spi|
00000570 6b 65 73 25 2c 32 29 3d 30 0d 02 d0 18 73 70 69 |kes%,2)=0....spi|
00000580 6b 65 73 25 28 73 70 69 6b 65 73 25 2c 33 29 3d |kes%(spikes%,3)=|
00000590 30 0d 02 da 30 73 70 69 6b 65 73 25 28 73 70 69 |0...0spikes%(spi|
000005a0 6b 65 73 25 2c 34 29 3d 73 70 69 6b 65 73 25 28 |kes%,4)=spikes%(|
000005b0 73 70 69 6b 65 73 25 2c 30 29 2d b3 28 32 30 30 |spikes%,0)-.(200|
000005c0 29 0d 02 e4 1f 73 70 69 6b 65 73 25 28 73 70 69 |)....spikes%(spi|
000005d0 6b 65 73 25 2c 35 29 3d 35 30 2b b3 28 35 30 29 |kes%,5)=50+.(50)|
000005e0 0d 02 ee 05 ed 0d 02 f8 13 e3 20 73 74 61 72 73 |.......... stars|
000005f0 25 3d 30 20 b8 20 32 30 0d 03 02 0e e3 20 6e 25 |%=0 . 20..... n%|
00000600 3d 30 20 b8 20 33 0d 03 0c 17 73 74 61 72 73 25 |=0 . 3....stars%|
00000610 28 73 74 61 72 73 25 2c 6e 25 29 3d 30 0d 03 16 |(stars%,n%)=0...|
00000620 07 ed 3a ed 0d 03 20 0a e6 31 32 38 2b 37 0d 03 |..:... ..128+7..|
00000630 2a 0c 61 63 72 6f 73 73 3d 30 0d 03 34 05 f5 0d |*.across=0..4...|
00000640 03 3e 0f 61 63 72 6f 73 73 2b 3d 30 2e 32 0d 03 |.>.across+=0.2..|
00000650 48 17 fb 20 77 68 69 63 68 62 6c 61 63 6b 25 2c |H.. whichblack%,|
00000660 30 2c 30 2c 30 0d 03 52 12 77 68 69 63 68 62 6c |0,0,0..R.whichbl|
00000670 61 63 6b 25 2b 3d 31 0d 03 5c 21 e7 20 77 68 69 |ack%+=1..\!. whi|
00000680 63 68 62 6c 61 63 6b 25 3d 37 20 77 68 69 63 68 |chblack%=7 which|
00000690 62 6c 61 63 6b 25 3d 32 0d 03 66 1b fb 20 77 68 |black%=2..f.. wh|
000006a0 69 63 68 62 6c 61 63 6b 25 2c 32 35 35 2c 32 35 |ichblack%,255,25|
000006b0 35 2c 30 0d 03 70 06 e6 37 0d 03 7a 0e ec 20 31 |5,0..p..7..z.. 1|
000006c0 32 30 30 2c 31 30 30 0d 03 84 0d ec 20 31 32 30 |200,100..... 120|
000006d0 30 2c 39 30 0d 03 8e 1d f0 26 35 35 2c 31 32 30 |0,90.....&55,120|
000006e0 30 2b 44 58 25 2a 33 2c 31 30 30 2b 44 59 25 2a |0+DX%*3,100+DY%*|
000006f0 33 0d 03 98 1a c8 8f 20 c8 90 20 62 6c 6f 62 58 |3...... .. blobX|
00000700 25 2c 62 6c 6f 62 59 25 2c 33 32 0d 03 a2 10 44 |%,blobY%,32....D|
00000710 58 25 2b 3d b3 28 31 31 29 2d 36 0d 03 ac 10 44 |X%+=.(11)-6....D|
00000720 59 25 2b 3d b3 28 31 31 29 2d 36 0d 03 b6 13 e7 |Y%+=.(11)-6.....|
00000730 20 44 58 25 3e 32 30 20 44 58 25 3d 32 30 0d 03 | DX%>20 DX%=20..|
00000740 c0 15 e7 20 44 58 25 3c 2d 32 30 20 44 58 25 3d |... DX%<-20 DX%=|
00000750 2d 32 30 0d 03 ca 13 e7 20 44 59 25 3e 32 30 20 |-20..... DY%>20 |
00000760 44 59 25 3d 32 30 0d 03 d4 15 e7 20 44 59 25 3c |DY%=20..... DY%<|
00000770 2d 32 30 20 44 59 25 3d 2d 32 30 0d 03 de 0f 62 |-20 DY%=-20....b|
00000780 6c 6f 62 58 25 2b 3d 44 58 25 0d 03 e8 0f 62 6c |lobX%+=DX%....bl|
00000790 6f 62 59 25 2b 3d 44 59 25 0d 03 f2 0d 62 6c 6f |obY%+=DY%....blo|
000007a0 62 59 25 2d 3d 38 0d 03 fc 1b e7 20 62 6c 6f 62 |bY%-=8..... blob|
000007b0 58 25 3c 39 39 32 20 62 6c 6f 62 58 25 3d 39 39 |X%<992 blobX%=99|
000007c0 32 0d 04 06 1d e7 20 62 6c 6f 62 58 25 3e 31 32 |2..... blobX%>12|
000007d0 33 32 20 62 6c 6f 62 58 25 3d 31 32 33 32 0d 04 |32 blobX%=1232..|
000007e0 10 19 e7 20 62 6c 6f 62 59 25 3c 34 30 20 62 6c |... blobY%<40 bl|
000007f0 6f 62 59 25 3d 34 30 0d 04 1a 1b e7 20 62 6c 6f |obY%=40..... blo|
00000800 62 59 25 3e 33 38 30 20 62 6c 6f 62 59 25 3d 33 |bY%>380 blobY%=3|
00000810 38 30 0d 04 24 06 e6 39 0d 04 2e 0e ec 20 31 32 |80..$..9..... 12|
00000820 30 30 2c 31 30 30 0d 04 38 0d ec 20 31 32 30 30 |00,100..8.. 1200|
00000830 2c 39 30 0d 04 42 1d f0 26 35 35 2c 31 32 30 30 |,90..B..&55,1200|
00000840 2b 44 58 25 2a 33 2c 31 30 30 2b 44 59 25 2a 33 |+DX%*3,100+DY%*3|
00000850 0d 04 4c 07 e6 31 30 0d 04 56 1a c8 8f 20 c8 90 |..L..10..V... ..|
00000860 20 62 6c 6f 62 58 25 2c 62 6c 6f 62 59 25 2c 33 | blobX%,blobY%,3|
00000870 32 0d 04 60 28 e7 20 58 25 3e 39 35 30 20 80 20 |2..`(. X%>950 . |
00000880 59 25 3c 34 32 30 20 c8 97 20 b8 20 58 25 2b 44 |Y%<420 .. . X%+D|
00000890 58 25 2c 59 25 2b 44 59 25 0d 04 6a 78 e7 20 6d |X%,Y%+DY%..jx. m|
000008a0 69 73 73 69 6c 65 58 25 3d 2d 31 30 30 20 80 20 |issileX%=-100 . |
000008b0 58 25 3e 38 35 32 20 80 20 59 25 3c 38 33 38 20 |X%>852 . Y%<838 |
000008c0 80 20 59 25 3e 34 37 34 20 80 20 6e 6f 6d 6f 72 |. Y%>474 . nomor|
000008d0 65 62 6f 6d 62 73 3d a3 20 8c 20 6d 69 73 73 69 |ebombs=. . missi|
000008e0 6c 65 58 25 3d 39 30 30 3a 6d 69 73 73 69 6c 65 |leX%=900:missile|
000008f0 59 25 3d 38 30 30 3a 6d 69 73 73 69 6c 65 44 58 |Y%=800:missileDX|
00000900 25 3d 32 3a 6d 69 73 73 69 6c 65 44 59 25 3d 2d |%=2:missileDY%=-|
00000910 34 0d 04 74 13 e7 20 6d 69 73 73 69 6c 65 58 25 |4..t.. missileX%|
00000920 3e 30 20 8c 0d 04 7e 06 e6 37 0d 04 88 1f c8 8f |>0 ...~..7......|
00000930 20 c8 90 20 6d 69 73 73 69 6c 65 58 25 2c 6d 69 | .. missileX%,mi|
00000940 73 73 69 6c 65 59 25 2c 38 0d 04 92 19 6d 69 73 |ssileY%,8....mis|
00000950 73 69 6c 65 58 25 2b 3d 6d 69 73 73 69 6c 65 44 |sileX%+=missileD|
00000960 58 25 0d 04 9c 19 6d 69 73 73 69 6c 65 59 25 2b |X%....missileY%+|
00000970 3d 6d 69 73 73 69 6c 65 44 59 25 0d 04 a6 2f 6d |=missileDY%.../m|
00000980 69 73 73 69 6c 65 44 58 25 3d 6d 69 73 73 69 6c |issileDX%=missil|
00000990 65 44 58 25 2f 31 2e 31 2b 28 58 25 2d 6d 69 73 |eDX%/1.1+(X%-mis|
000009a0 73 69 6c 65 58 25 29 2f 32 30 0d 04 b0 2f 6d 69 |sileX%)/20.../mi|
000009b0 73 73 69 6c 65 44 59 25 3d 6d 69 73 73 69 6c 65 |ssileDY%=missile|
000009c0 44 59 25 2f 31 2e 31 2b 28 59 25 2d 6d 69 73 73 |DY%/1.1+(Y%-miss|
000009d0 69 6c 65 59 25 29 2f 32 30 0d 04 ba 21 e7 20 6d |ileY%)/20...!. m|
000009e0 69 73 73 69 6c 65 44 58 25 3e 33 32 20 6d 69 73 |issileDX%>32 mis|
000009f0 73 69 6c 65 44 58 25 3d 33 32 0d 04 c4 23 e7 20 |sileDX%=32...#. |
00000a00 6d 69 73 73 69 6c 65 44 58 25 3c 2d 33 32 20 6d |missileDX%<-32 m|
00000a10 69 73 73 69 6c 65 44 58 25 3d 2d 33 32 0d 04 ce |issileDX%=-32...|
00000a20 21 e7 20 6d 69 73 73 69 6c 65 44 59 25 3e 33 32 |!. missileDY%>32|
00000a30 20 6d 69 73 73 69 6c 65 44 59 25 3d 33 32 0d 04 | missileDY%=32..|
00000a40 d8 23 e7 20 6d 69 73 73 69 6c 65 44 59 25 3c 2d |.#. missileDY%<-|
00000a50 33 32 20 6d 69 73 73 69 6c 65 44 59 25 3d 2d 33 |32 missileDY%=-3|
00000a60 32 0d 04 e2 34 e7 20 6d 69 73 73 69 6c 65 59 25 |2...4. missileY%|
00000a70 3e 38 32 36 20 84 20 6d 69 73 73 69 6c 65 59 25 |>826 . missileY%|
00000a80 3c 34 38 30 20 8c 20 6d 69 73 73 69 6c 65 58 25 |<480 . missileX%|
00000a90 3d 2d 31 30 30 0d 04 ec 78 e7 20 6d 69 73 73 69 |=-100...x. missi|
00000aa0 6c 65 58 25 3c 38 37 34 20 80 20 6d 69 73 73 69 |leX%<874 . missi|
00000ab0 6c 65 58 25 3e 30 20 20 c8 93 20 c8 90 20 38 32 |leX%>0 .. .. 82|
00000ac0 34 2c 34 37 36 2c 34 32 2c 33 36 32 3a 6d 69 73 |4,476,42,362:mis|
00000ad0 73 69 6c 65 58 25 3d 2d 35 30 3a e6 31 32 3a ec |sileX%=-50:.12:.|
00000ae0 20 38 30 30 2c 34 37 32 3a ec 20 38 39 30 2c 34 | 800,472:. 890,4|
00000af0 37 32 3a f0 26 35 35 2c 38 34 30 2c 35 30 30 3a |72:.&55,840,500:|
00000b00 6e 6f 6d 6f 72 65 62 6f 6d 62 73 3d b9 0d 04 f6 |nomorebombs=....|
00000b10 2d e7 20 b0 6d 69 73 73 69 6c 65 58 25 2c 6d 69 |-. .missileX%,mi|
00000b20 73 73 69 6c 65 59 25 29 3c 3e 37 20 6d 69 73 73 |ssileY%)<>7 miss|
00000b30 69 6c 65 58 25 3d 2d 31 30 30 0d 05 00 07 e6 31 |ileX%=-100.....1|
00000b40 31 0d 05 0a 1f c8 8f 20 c8 90 20 6d 69 73 73 69 |1...... .. missi|
00000b50 6c 65 58 25 2c 6d 69 73 73 69 6c 65 59 25 2c 38 |leX%,missileY%,8|
00000b60 0d 05 14 69 e7 20 6d 69 73 73 69 6c 65 58 25 3e |...i. missileX%>|
00000b70 58 25 2d 33 32 20 80 20 6d 69 73 73 69 6c 65 58 |X%-32 . missileX|
00000b80 25 3c 58 25 2b 33 32 20 80 20 6d 69 73 73 69 6c |%<X%+32 . missil|
00000b90 65 59 25 3e 59 25 2d 33 32 20 80 20 6d 69 73 73 |eY%>Y%-32 . miss|
00000ba0 69 6c 65 59 25 3c 59 25 2b 33 32 20 c8 8f 20 c8 |ileY%<Y%+32 .. .|
00000bb0 90 20 6d 69 73 73 69 6c 65 58 25 2c 6d 69 73 73 |. missileX%,miss|
00000bc0 69 6c 65 59 25 2c 31 30 30 0d 05 1e 05 cd 0d 05 |ileY%,100.......|
00000bd0 28 13 e3 20 73 74 61 72 73 25 3d 30 20 b8 20 32 |(.. stars%=0 . 2|
00000be0 30 0d 05 32 1a e7 20 73 74 61 72 73 25 28 73 74 |0..2.. stars%(st|
00000bf0 61 72 73 25 2c 30 29 3d 30 20 8c 0d 05 3c 1c 73 |ars%,0)=0 ...<.s|
00000c00 74 61 72 73 25 28 73 74 61 72 73 25 2c 32 29 3d |tars%(stars%,2)=|
00000c10 b3 28 31 35 29 2d 38 0d 05 46 1c 73 74 61 72 73 |.(15)-8..F.stars|
00000c20 25 28 73 74 61 72 73 25 2c 33 29 3d b3 28 31 33 |%(stars%,3)=.(13|
00000c30 29 2d 38 0d 05 50 60 e7 20 73 74 61 72 73 25 28 |)-8..P`. stars%(|
00000c40 73 74 61 72 73 25 2c 32 29 3c 2d 32 20 80 20 73 |stars%,2)<-2 . s|
00000c50 74 61 72 73 25 28 73 74 61 72 73 25 2c 32 29 3e |tars%(stars%,2)>|
00000c60 32 20 80 20 73 74 61 72 73 25 28 73 74 61 72 73 |2 . stars%(stars|
00000c70 25 2c 33 29 3c 2d 32 20 80 20 73 74 61 72 73 25 |%,3)<-2 . stars%|
00000c80 28 73 74 61 72 73 25 2c 33 29 3e 32 20 e5 20 8d |(stars%,3)>2 . .|
00000c90 54 7c 45 0d 05 5a 34 e7 20 73 74 61 72 73 25 28 |T|E..Z4. stars%(|
00000ca0 73 74 61 72 73 25 2c 32 29 3d 30 20 84 20 73 74 |stars%,2)=0 . st|
00000cb0 61 72 73 25 28 73 74 61 72 73 25 2c 33 29 3d 30 |ars%(stars%,3)=0|
00000cc0 20 e5 20 8d 54 7c 45 0d 05 64 2b 73 74 61 72 73 | . .T|E..d+stars|
00000cd0 25 28 73 74 61 72 73 25 2c 30 29 3d 35 36 36 2b |%(stars%,0)=566+|
00000ce0 73 74 61 72 73 25 28 73 74 61 72 73 25 2c 32 29 |stars%(stars%,2)|
00000cf0 2a 32 0d 05 6e 2b 73 74 61 72 73 25 28 73 74 61 |*2..n+stars%(sta|
00000d00 72 73 25 2c 31 29 3d 36 36 38 2b 73 74 61 72 73 |rs%,1)=668+stars|
00000d10 25 28 73 74 61 72 73 25 2c 33 29 2a 32 0d 05 78 |%(stars%,3)*2..x|
00000d20 05 cd 0d 05 82 06 e6 37 0d 05 8c 2d c8 8f 20 c8 |.......7...-.. .|
00000d30 90 20 73 74 61 72 73 25 28 73 74 61 72 73 25 2c |. stars%(stars%,|
00000d40 30 29 2c 73 74 61 72 73 25 28 73 74 61 72 73 25 |0),stars%(stars%|
00000d50 2c 31 29 2c 34 0d 05 96 26 73 74 61 72 73 25 28 |,1),4...&stars%(|
00000d60 73 74 61 72 73 25 2c 30 29 2b 3d 73 74 61 72 73 |stars%,0)+=stars|
00000d70 25 28 73 74 61 72 73 25 2c 32 29 0d 05 a0 26 73 |%(stars%,2)...&s|
00000d80 74 61 72 73 25 28 73 74 61 72 73 25 2c 31 29 2b |tars%(stars%,1)+|
00000d90 3d 73 74 61 72 73 25 28 73 74 61 72 73 25 2c 33 |=stars%(stars%,3|
00000da0 29 0d 05 aa 78 e7 20 b0 73 74 61 72 73 25 28 73 |)...x. .stars%(s|
00000db0 74 61 72 73 25 2c 30 29 2b 73 74 61 72 73 25 28 |tars%,0)+stars%(|
00000dc0 73 74 61 72 73 25 2c 32 29 2a 33 2c 73 74 61 72 |stars%,2)*3,star|
00000dd0 73 25 28 73 74 61 72 73 25 2c 31 29 2b 73 74 61 |s%(stars%,1)+sta|
00000de0 72 73 25 28 73 74 61 72 73 25 2c 33 29 2a 33 29 |rs%(stars%,3)*3)|
00000df0 3c 3e 37 20 73 74 61 72 73 25 28 73 74 61 72 73 |<>7 stars%(stars|
00000e00 25 2c 30 29 3d 30 3a 73 74 61 72 73 25 28 73 74 |%,0)=0:stars%(st|
00000e10 61 72 73 25 2c 31 29 3d 30 0d 05 b4 07 e6 31 34 |ars%,1)=0.....14|
00000e20 0d 05 be 2d c8 8f 20 c8 90 20 73 74 61 72 73 25 |...-.. .. stars%|
00000e30 28 73 74 61 72 73 25 2c 30 29 2c 73 74 61 72 73 |(stars%,0),stars|
00000e40 25 28 73 74 61 72 73 25 2c 31 29 2c 34 0d 05 c8 |%(stars%,1),4...|
00000e50 05 ed 0d 05 d2 06 e6 38 0d 05 dc 06 c8 96 0d 05 |.......8........|
00000e60 e6 09 f2 77 61 69 74 0d 05 f0 17 c8 93 20 c8 90 |...wait...... ..|
00000e70 20 34 2c 35 31 35 2c 32 36 30 2c 32 35 32 0d 05 | 4,515,260,252..|
00000e80 fa 06 e6 37 0d 06 04 13 e3 20 61 3d 30 20 b8 20 |...7..... a=0 . |
00000e90 31 20 88 20 30 2e 32 0d 06 0e 22 ec 20 b5 28 61 |1 . 0.2...". .(a|
00000ea0 2b 61 63 72 6f 73 73 29 2a 38 30 2b 31 32 30 2c |+across)*80+120,|
00000eb0 35 31 35 2b 61 2a 32 30 38 0d 06 18 22 ec 20 b5 |515+a*208...". .|
00000ec0 28 61 2b 61 63 72 6f 73 73 29 2a 38 30 2b 31 36 |(a+across)*80+16|
00000ed0 30 2c 35 31 35 2b 61 2a 32 30 38 0d 06 22 29 f0 |0,515+a*208..").|
00000ee0 26 37 35 2c b5 28 61 2b 61 63 72 6f 73 73 2b 30 |&75,.(a+across+0|
00000ef0 2e 32 29 2a 38 30 2b 31 36 30 2c 35 35 36 2b 61 |.2)*80+160,556+a|
00000f00 2a 32 30 38 0d 06 2c 05 ed 0d 06 36 06 e6 37 0d |*208..,....6..7.|
00000f10 06 40 17 c8 93 20 c8 90 20 35 2c 31 30 30 2c 34 |.@... .. 5,100,4|
00000f20 33 36 2c 32 38 30 0d 06 4a 07 e6 31 33 0d 06 54 |36,280..J..13..T|
00000f30 13 e3 20 61 3d 30 20 b8 20 31 20 88 20 30 2e 32 |.. a=0 . 1 . 0.2|
00000f40 0d 06 5e 1f ec 20 61 2a 33 35 32 2c b5 28 61 2b |..^.. a*352,.(a+|
00000f50 61 63 72 6f 73 73 29 2a 31 30 30 2b 32 38 30 0d |across)*100+280.|
00000f60 06 68 1f ec 20 61 2a 33 35 32 2c b5 28 61 2b 61 |.h.. a*352,.(a+a|
00000f70 63 72 6f 73 73 29 2a 31 30 30 2b 32 30 30 0d 06 |cross)*100+200..|
00000f80 72 29 f0 26 37 35 2c 61 2a 33 35 32 2b 38 38 2c |r).&75,a*352+88,|
00000f90 b5 28 61 2b 61 63 72 6f 73 73 2b 30 2e 32 29 2a |.(a+across+0.2)*|
00000fa0 31 30 30 2b 32 30 30 0d 06 7c 05 ed 0d 06 86 1e |100+200..|......|
00000fb0 e7 20 58 25 3c 32 36 34 20 80 20 59 25 3e 37 39 |. X%<264 . Y%>79|
00000fc0 31 20 8c 20 73 31 25 2b 3d 38 0d 06 90 07 e6 31 |1 . s1%+=8.....1|
00000fd0 35 0d 06 9a 19 c8 93 20 c8 90 20 32 36 34 2c 37 |5...... .. 264,7|
00000fe0 39 31 2c 2d 73 31 25 2c 34 38 0d 06 a4 2f e7 20 |91,-s1%,48.../. |
00000ff0 73 31 25 3e 32 36 34 20 80 20 73 31 25 3c 33 30 |s1%>264 . s1%<30|
00001000 30 20 c8 93 20 c8 90 20 33 36 2c 38 34 32 2c 33 |0 .. .. 36,842,3|
00001010 34 2c 73 31 25 2d 32 36 34 0d 06 ae 30 e7 20 58 |4,s1%-264...0. X|
00001020 25 3e 35 35 30 20 80 20 58 25 3c 38 33 38 20 80 |%>550 . X%<838 .|
00001030 20 59 25 3e 39 31 30 20 80 20 59 25 3c 39 37 38 | Y%>910 . Y%<978|
00001040 20 8c 20 73 32 25 2b 3d 34 0d 06 b8 1a c8 93 20 | . s2%+=4...... |
00001050 c8 90 20 35 35 30 2c 39 37 37 2c 32 39 30 2c 2d |.. 550,977,290,-|
00001060 73 32 25 0d 06 c2 19 c8 93 20 c8 90 20 35 35 30 |s2%...... .. 550|
00001070 2c 39 31 33 2c 32 39 30 2c 73 32 25 0d 06 cc 19 |,913,290,s2%....|
00001080 e7 20 59 25 3c 34 30 30 20 84 20 74 72 61 70 25 |. Y%<400 . trap%|
00001090 3e 38 30 20 8c 0d 06 d6 13 e3 20 73 70 69 6b 65 |>80 ...... spike|
000010a0 73 25 3d 30 20 b8 20 39 0d 06 e0 06 e6 37 0d 06 |s%=0 . 9.....7..|
000010b0 ea 2b ec 20 73 70 69 6b 65 73 25 28 73 70 69 6b |.+. spikes%(spik|
000010c0 65 73 25 2c 30 29 2c 73 70 69 6b 65 73 25 28 73 |es%,0),spikes%(s|
000010d0 70 69 6b 65 73 25 2c 31 29 0d 06 f4 2e ec 20 73 |pikes%,1)..... s|
000010e0 70 69 6b 65 73 25 28 73 70 69 6b 65 73 25 2c 30 |pikes%(spikes%,0|
000010f0 29 2b 32 30 2c 73 70 69 6b 65 73 25 28 73 70 69 |)+20,spikes%(spi|
00001100 6b 65 73 25 2c 31 29 0d 06 fe 44 f0 26 35 35 2c |kes%,1)...D.&55,|
00001110 73 70 69 6b 65 73 25 28 73 70 69 6b 65 73 25 2c |spikes%(spikes%,|
00001120 30 29 2b 31 30 2c 73 70 69 6b 65 73 25 28 73 70 |0)+10,spikes%(sp|
00001130 69 6b 65 73 25 2c 31 29 2d 73 70 69 6b 65 73 25 |ikes%,1)-spikes%|
00001140 28 73 70 69 6b 65 73 25 2c 35 29 0d 07 08 30 e7 |(spikes%,5)...0.|
00001150 20 58 25 3e 73 70 69 6b 65 73 25 28 73 70 69 6b | X%>spikes%(spik|
00001160 65 73 25 2c 34 29 20 73 70 69 6b 65 73 25 28 73 |es%,4) spikes%(s|
00001170 70 69 6b 65 73 25 2c 33 29 3d 31 0d 07 12 30 e7 |pikes%,3)=1...0.|
00001180 20 73 70 69 6b 65 73 25 28 73 70 69 6b 65 73 25 | spikes%(spikes%|
00001190 2c 33 29 3d 31 20 73 70 69 6b 65 73 25 28 73 70 |,3)=1 spikes%(sp|
000011a0 69 6b 65 73 25 2c 32 29 2b 3d 31 0d 07 1c 2a 73 |ikes%,2)+=1...*s|
000011b0 70 69 6b 65 73 25 28 73 70 69 6b 65 73 25 2c 31 |pikes%(spikes%,1|
000011c0 29 2d 3d 73 70 69 6b 65 73 25 28 73 70 69 6b 65 |)-=spikes%(spike|
000011d0 73 25 2c 32 29 0d 07 26 5b e7 20 73 70 69 6b 65 |s%,2)..&[. spike|
000011e0 73 25 28 73 70 69 6b 65 73 25 2c 31 29 3c 73 70 |s%(spikes%,1)<sp|
000011f0 69 6b 65 73 25 28 73 70 69 6b 65 73 25 2c 35 29 |ikes%(spikes%,5)|
00001200 2f 32 2b 36 34 20 73 70 69 6b 65 73 25 28 73 70 |/2+64 spikes%(sp|
00001210 69 6b 65 73 25 2c 31 29 3d 73 70 69 6b 65 73 25 |ikes%,1)=spikes%|
00001220 28 73 70 69 6b 65 73 25 2c 35 29 2f 32 2b 36 34 |(spikes%,5)/2+64|
00001230 0d 07 30 07 e6 31 35 0d 07 3a 2b ec 20 73 70 69 |..0..15..:+. spi|
00001240 6b 65 73 25 28 73 70 69 6b 65 73 25 2c 30 29 2c |kes%(spikes%,0),|
00001250 73 70 69 6b 65 73 25 28 73 70 69 6b 65 73 25 2c |spikes%(spikes%,|
00001260 31 29 0d 07 44 2e ec 20 73 70 69 6b 65 73 25 28 |1)..D.. spikes%(|
00001270 73 70 69 6b 65 73 25 2c 30 29 2b 32 30 2c 73 70 |spikes%,0)+20,sp|
00001280 69 6b 65 73 25 28 73 70 69 6b 65 73 25 2c 31 29 |ikes%(spikes%,1)|
00001290 0d 07 4e 44 f0 26 35 35 2c 73 70 69 6b 65 73 25 |..ND.&55,spikes%|
000012a0 28 73 70 69 6b 65 73 25 2c 30 29 2b 31 30 2c 73 |(spikes%,0)+10,s|
000012b0 70 69 6b 65 73 25 28 73 70 69 6b 65 73 25 2c 31 |pikes%(spikes%,1|
000012c0 29 2d 73 70 69 6b 65 73 25 28 73 70 69 6b 65 73 |)-spikes%(spikes|
000012d0 25 2c 35 29 0d 07 58 05 ed 0d 07 62 48 e7 20 73 |%,5)..X....bH. s|
000012e0 70 69 6b 65 73 25 28 38 2c 31 29 3c 73 70 69 6b |pikes%(8,1)<spik|
000012f0 65 73 25 28 38 2c 35 29 2b 36 34 20 80 20 73 70 |es%(8,5)+64 . sp|
00001300 69 6b 65 73 25 28 39 2c 31 29 3c 73 70 69 6b 65 |ikes%(9,1)<spike|
00001310 73 25 28 39 2c 35 29 2b 36 34 20 73 30 25 3d 31 |s%(9,5)+64 s0%=1|
00001320 36 0d 07 6c 0e 74 72 61 70 25 2d 3d 73 30 25 0d |6..l.trap%-=s0%.|
00001330 07 76 14 e7 20 74 72 61 70 25 3c 38 30 20 73 30 |.v.. trap%<80 s0|
00001340 25 3d 30 0d 07 80 2a c8 93 20 c8 90 20 34 38 30 |%=0...*.. .. 480|
00001350 2c 74 72 61 70 25 2c 34 34 34 2c 35 32 20 b8 20 |,trap%,444,52 . |
00001360 34 38 30 2c 74 72 61 70 25 2d 73 30 25 0d 07 8a |480,trap%-s0%...|
00001370 05 cd 0d 07 94 0a f2 6d 6f 75 73 65 0d 07 9e 72 |.......mouse...r|
00001380 fd 20 b0 58 25 2b 34 2c 59 25 2d 34 29 3d 30 20 |. .X%+4,Y%-4)=0 |
00001390 84 20 b0 58 25 2b 34 2c 59 25 2d 34 29 3d 77 68 |. .X%+4,Y%-4)=wh|
000013a0 69 63 68 62 6c 61 63 6b 25 20 84 20 b0 58 25 2b |ichblack% . .X%+|
000013b0 34 2c 59 25 2d 34 29 3e 37 20 84 20 58 25 3c 30 |4,Y%-4)>7 . X%<0|
000013c0 20 84 20 58 25 3e 31 32 38 30 20 84 20 59 25 3e | . X%>1280 . Y%>|
000013d0 31 30 32 34 20 84 20 59 25 3c 30 20 84 20 58 25 |1024 . Y%<0 . X%|
000013e0 3e 31 30 37 30 20 80 20 59 25 3e 38 37 30 0d 07 |>1070 . Y%>870..|
000013f0 a8 2a e7 20 58 25 3e 31 30 37 30 20 80 20 59 25 |.*. X%>1070 . Y%|
00001400 3e 38 37 30 20 fd 20 31 20 8b 20 f2 65 78 70 6c |>870 . 1 . .expl|
00001410 6f 73 69 6f 6e 3a fd 30 0d 07 b2 16 e3 20 61 63 |osion:.0..... ac|
00001420 72 6f 73 73 3d 58 25 20 b8 20 31 33 30 30 0d 07 |ross=X% . 1300..|
00001430 bc 27 fb 31 2c 31 32 38 2b b3 28 31 32 37 29 2c |.'.1,128+.(127),|
00001440 31 32 38 2b b3 28 31 32 37 29 2c 31 32 38 2b b3 |128+.(127),128+.|
00001450 28 31 32 37 29 0d 07 c6 17 c8 97 20 c8 93 20 61 |(127)...... .. a|
00001460 63 72 6f 73 73 2c 59 25 2c 30 2c 30 0d 07 d0 14 |cross,Y%,0,0....|
00001470 e3 20 50 4f 52 53 3d 30 20 b8 20 31 30 30 3a ed |. PORS=0 . 100:.|
00001480 0d 07 da 05 ed 0d 07 e4 18 e3 20 64 6f 77 6e 3d |.......... down=|
00001490 59 25 20 b8 20 2d 32 30 20 88 20 2d 31 0d 07 ee |Y% . -20 . -1...|
000014a0 27 fb 31 2c 31 32 38 2b b3 28 31 32 37 29 2c 31 |'.1,128+.(127),1|
000014b0 32 38 2b b3 28 31 32 37 29 2c 31 32 38 2b b3 28 |28+.(127),128+.(|
000014c0 31 32 37 29 0d 07 f8 17 c8 97 20 c8 93 20 31 33 |127)...... .. 13|
000014d0 30 30 2c 64 6f 77 6e 2c 30 2c 30 0d 08 02 14 e3 |00,down,0,0.....|
000014e0 20 50 4f 52 53 3d 30 20 b8 20 31 30 30 3a ed 0d | PORS=0 . 100:..|
000014f0 08 0c 05 ed 0d 08 16 0c fb 31 2c 30 2c 30 2c 30 |.........1,0,0,0|
00001500 0d 08 20 05 e1 0d 08 2a 0c dd f2 6c 65 76 65 6c |.. ....*...level|
00001510 32 0d 08 34 05 db 0d 08 3e 05 f5 0d 08 48 0b f2 |2..4....>....H..|
00001520 6c 6f 63 61 74 65 0d 08 5c 21 2a 53 63 72 65 65 |locate..\!*Scree|
00001530 6e 4c 6f 61 64 20 3c 4f 62 65 79 24 44 69 72 3e |nLoad <Obey$Dir>|
00001540 2e 4c 65 76 65 6c 32 0d 08 66 0c f2 50 61 6c 65 |.Level2..f..Pale|
00001550 74 74 65 0d 08 67 15 c8 97 20 c8 93 20 35 39 30 |tte..g... .. 590|
00001560 2c 36 38 30 2c 30 2c 30 0d 08 70 30 c8 99 22 57 |,680,0,0..p0.."W|
00001570 69 6d 70 5f 53 70 72 69 74 65 4f 70 22 2c 33 36 |imp_SpriteOp",36|
00001580 2c 2c 22 67 61 6d 65 70 6f 69 6e 74 65 72 22 2c |,,"gamepointer",|
00001590 25 31 31 30 30 30 30 31 0d 08 7a 16 c8 97 20 fb |%1100001..z... .|
000015a0 20 32 2c 32 35 35 2c 32 35 35 2c 32 35 35 0d 08 | 2,255,255,255..|
000015b0 84 0d c8 97 58 25 2c 58 25 2c 5a 0d 08 8e 1a 61 |....X%,X%,Z....a|
000015c0 25 3d 30 3a 73 30 25 3d 30 3a 73 31 25 3d 30 3a |%=0:s0%=0:s1%=0:|
000015d0 73 32 25 3d 30 0d 08 98 2b 64 6f 6f 72 31 25 3d |s2%=0...+door1%=|
000015e0 35 38 3a 64 6f 6f 72 32 25 3d 35 38 3a 64 6f 6f |58:door2%=58:doo|
000015f0 72 33 25 3d 33 30 3a 64 6f 6f 72 34 25 3d 33 30 |r3%=30:door4%=30|
00001600 0d 08 a2 15 73 65 63 25 3d 37 35 2d bb 28 c2 91 |....sec%=75-.(..|
00001610 24 2c 32 29 29 0d 08 ac 18 6d 69 6e 25 3d 36 30 |$,2))....min%=60|
00001620 2d bb 28 c1 91 24 2c 32 30 2c 32 29 29 0d 08 b6 |-.(..$,20,2))...|
00001630 21 68 6f 75 72 25 3d 31 32 2d bb 28 c1 91 24 2c |!hour%=12-.(..$,|
00001640 31 37 2c 32 29 29 2d 6d 69 6e 25 2f 36 30 0d 08 |17,2))-min%/60..|
00001650 c0 13 e3 20 69 63 69 63 6c 65 25 3d 30 20 b8 20 |... icicle%=0 . |
00001660 35 0d 08 ca 2c 69 63 69 63 6c 65 73 25 28 69 63 |5...,icicles%(ic|
00001670 69 63 6c 65 25 2c 30 29 3d 38 35 30 2b b3 28 33 |icle%,0)=850+.(3|
00001680 30 29 2b 69 63 69 63 6c 65 25 2a 33 30 0d 08 d4 |0)+icicle%*30...|
00001690 1d 69 63 69 63 6c 65 73 25 28 69 63 69 63 6c 65 |.icicles%(icicle|
000016a0 25 2c 31 29 3d b3 28 31 30 29 0d 08 de 1d 64 72 |%,1)=.(10)....dr|
000016b0 69 70 73 25 28 69 63 69 63 6c 65 25 29 3d b3 28 |ips%(icicle%)=.(|
000016c0 34 30 30 29 2b 36 36 0d 08 e8 1b 72 69 63 69 63 |400)+66....ricic|
000016d0 6c 65 73 25 28 69 63 69 63 6c 65 25 29 3d b3 28 |les%(icicle%)=.(|
000016e0 38 29 0d 08 f2 05 ed 0d 08 fc 05 f5 0d 08 fd 09 |8)..............|
000016f0 f2 77 61 69 74 0d 09 06 16 fb 77 68 69 63 68 62 |.wait.....whichb|
00001700 6c 61 63 6b 25 2c 30 2c 30 2c 30 0d 09 10 12 77 |lack%,0,0,0....w|
00001710 68 69 63 68 62 6c 61 63 6b 25 2b 3d 31 0d 09 1a |hichblack%+=1...|
00001720 21 e7 20 77 68 69 63 68 62 6c 61 63 6b 25 3d 37 |!. whichblack%=7|
00001730 20 77 68 69 63 68 62 6c 61 63 6b 25 3d 32 0d 09 | whichblack%=2..|
00001740 24 1b fb 20 77 68 69 63 68 62 6c 61 63 6b 25 2c |$.. whichblack%,|
00001750 32 35 35 2c 31 32 38 2c 30 0d 09 2e 06 e6 37 0d |255,128,0.....7.|
00001760 09 38 2c c8 8f 20 c8 90 20 35 39 30 2b 28 9b b2 |.8,.. .. 590+(..|
00001770 28 61 25 29 2a 34 30 29 2c 36 38 34 2b 28 b5 b2 |(a%)*40),684+(..|
00001780 28 61 25 29 2a 38 30 29 2c 31 36 0d 09 42 2c c8 |(a%)*80),16..B,.|
00001790 8f 20 c8 90 20 35 39 30 2b 28 9b b2 28 61 25 29 |. .. 590+(..(a%)|
000017a0 2a 38 30 29 2c 36 38 34 2b 28 b5 b2 28 61 25 29 |*80),684+(..(a%)|
000017b0 2a 34 30 29 2c 31 36 0d 09 4c 0a 61 25 2b 3d 31 |*40),16..L.a%+=1|
000017c0 36 0d 09 56 07 e6 31 31 0d 09 60 2c c8 8f 20 c8 |6..V..11..`,.. .|
000017d0 90 20 35 39 30 2b 28 9b b2 28 61 25 29 2a 34 30 |. 590+(..(a%)*40|
000017e0 29 2c 36 38 34 2b 28 b5 b2 28 61 25 29 2a 38 30 |),684+(..(a%)*80|
000017f0 29 2c 31 36 0d 09 6a 2c c8 8f 20 c8 90 20 35 39 |),16..j,.. .. 59|
00001800 30 2b 28 9b b2 28 61 25 29 2a 38 30 29 2c 36 38 |0+(..(a%)*80),68|
00001810 34 2b 28 b5 b2 28 61 25 29 2a 34 30 29 2c 31 36 |4+(..(a%)*40),16|
00001820 0d 09 74 2e e7 20 58 25 3e 35 35 34 20 80 20 59 |..t.. X%>554 . Y|
00001830 25 3c 38 39 36 20 80 20 58 25 3c 36 32 32 20 80 |%<896 . X%<622 .|
00001840 20 59 25 3e 38 34 30 20 73 30 25 2b 3d 38 0d 09 | Y%>840 s0%+=8..|
00001850 7e 06 e6 39 0d 09 88 20 e7 20 73 30 25 3e 30 20 |~..9... . s0%>0 |
00001860 c8 93 20 c8 90 20 35 35 34 2c 38 34 30 2c 36 38 |.. .. 554,840,68|
00001870 2c 73 30 25 0d 09 92 1c e7 20 58 25 3c 34 31 38 |,s0%..... X%<418|
00001880 20 80 20 59 25 3c 35 33 36 20 73 31 25 2d 3d 34 | . Y%<536 s1%-=4|
00001890 0d 09 9c 2a e7 20 73 31 25 3c 30 20 80 20 73 31 |...*. s1%<0 . s1|
000018a0 25 3e 2d 36 32 20 c8 93 20 c8 90 20 34 32 30 2c |%>-62 .. .. 420,|
000018b0 34 38 30 2c 73 31 25 2c 35 32 0d 09 a6 15 e7 20 |480,s1%,52..... |
000018c0 73 31 25 3c 2d 36 32 20 73 31 25 2d 3d 31 32 0d |s1%<-62 s1%-=12.|
000018d0 09 b0 30 e7 20 73 31 25 3c 2d 36 30 20 80 20 73 |..0. s1%<-60 . s|
000018e0 31 25 3e 2d 34 33 32 20 c8 93 20 c8 90 20 34 32 |1%>-432 .. .. 42|
000018f0 30 2c 34 33 36 2c 73 31 25 2b 35 38 2c 34 36 0d |0,436,s1%+58,46.|
00001900 09 ba 21 e7 20 73 31 25 3c 2d 34 32 36 20 80 20 |..!. s1%<-426 . |
00001910 73 31 25 3e 2d 37 39 30 20 73 31 25 2d 3d 31 32 |s1%>-790 s1%-=12|
00001920 0d 09 c4 31 e7 20 73 31 25 3c 2d 34 32 36 20 80 |...1. s1%<-426 .|
00001930 20 73 31 25 3e 2d 37 39 30 20 c8 93 20 c8 90 20 | s1%>-790 .. .. |
00001940 35 36 2c 34 33 34 2c 36 30 2c 73 31 25 2b 34 32 |56,434,60,s1%+42|
00001950 36 0d 09 ce 1f e7 20 73 31 25 3c 2d 37 39 30 20 |6..... s1%<-790 |
00001960 80 20 73 32 25 3c 31 33 36 20 73 32 25 2b 3d 38 |. s2%<136 s2%+=8|
00001970 0d 09 d8 2d e7 20 73 32 25 3e 30 20 c8 93 20 31 |...-. s2%>0 .. 1|
00001980 31 36 2c 36 30 2b 73 32 25 2c 33 30 30 2c 32 30 |16,60+s2%,300,20|
00001990 20 b8 20 31 31 36 2c 36 38 2b 73 32 25 0d 09 e2 | . 116,68+s2%...|
000019a0 2f e7 20 73 32 25 3e 30 20 c8 93 20 31 31 36 2c |/. s2%>0 .. 116,|
000019b0 33 36 34 2d 73 32 25 2c 33 30 30 2c 32 30 20 b8 |364-s2%,300,20 .|
000019c0 20 31 31 36 2c 33 35 36 2d 73 32 25 0d 09 ec 06 | 116,356-s2%....|
000019d0 e6 37 0d 09 f6 1b c8 93 20 c8 90 20 36 34 32 2c |.7...... .. 642,|
000019e0 36 36 2c 31 30 30 2c 64 6f 6f 72 31 25 0d 0a 00 |66,100,door1%...|
000019f0 1f e7 20 58 25 3e 34 37 36 20 80 20 59 25 3e 32 |.. X%>476 . Y%>2|
00001a00 30 30 20 64 6f 6f 72 31 25 2d 3d 34 0d 0a 0a 17 |00 door1%-=4....|
00001a10 e7 20 64 6f 6f 72 31 25 3c 30 20 64 6f 6f 72 31 |. door1%<0 door1|
00001a20 25 3d 30 0d 0a 14 17 e7 20 59 25 3c 32 30 30 20 |%=0..... Y%<200 |
00001a30 64 6f 6f 72 31 25 2b 3d 31 34 0d 0a 1e 19 e7 20 |door1%+=14..... |
00001a40 64 6f 6f 72 31 25 3e 36 30 20 64 6f 6f 72 31 25 |door1%>60 door1%|
00001a50 3d 36 30 0d 0a 28 17 c8 93 20 c8 90 20 36 34 36 |=60..(... .. 646|
00001a60 2c 32 30 30 2c 39 36 2c 36 30 0d 0a 32 18 c8 8f |,200,96,60..2...|
00001a70 20 c8 90 20 36 38 38 2c 33 37 30 2c 64 6f 6f 72 | .. 688,370,door|
00001a80 33 25 0d 0a 3c 16 e7 20 58 25 3c 34 38 38 20 64 |3%..<.. X%<488 d|
00001a90 6f 6f 72 32 25 2d 3d 34 0d 0a 46 17 e7 20 64 6f |oor2%-=4..F.. do|
00001aa0 6f 72 32 25 3c 30 20 64 6f 6f 72 32 25 3d 30 0d |or2%<0 door2%=0.|
00001ab0 0a 50 17 e7 20 58 25 3e 34 38 38 20 64 6f 6f 72 |.P.. X%>488 door|
00001ac0 32 25 2b 3d 31 32 0d 0a 5a 19 e7 20 64 6f 6f 72 |2%+=12..Z.. door|
00001ad0 32 25 3e 36 30 20 64 6f 6f 72 32 25 3d 36 30 0d |2%>60 door2%=60.|
00001ae0 0a 64 16 e7 20 59 25 3c 33 30 30 20 64 6f 6f 72 |.d.. Y%<300 door|
00001af0 33 25 2d 3d 34 0d 0a 6e 17 e7 20 64 6f 6f 72 33 |3%-=4..n.. door3|
00001b00 25 3c 30 20 64 6f 6f 72 33 25 3d 30 0d 0a 78 17 |%<0 door3%=0..x.|
00001b10 e7 20 59 25 3e 33 30 30 20 64 6f 6f 72 33 25 2b |. Y%>300 door3%+|
00001b20 3d 31 32 0d 0a 82 19 e7 20 64 6f 6f 72 33 25 3e |=12..... door3%>|
00001b30 34 30 20 64 6f 6f 72 33 25 3d 34 30 0d 0a 8c 35 |40 door3%=40...5|
00001b40 e7 20 58 25 3e 36 30 30 20 80 20 59 25 3e 34 36 |. X%>600 . Y%>46|
00001b50 30 20 80 20 59 25 3c 35 38 30 20 64 6f 6f 72 34 |0 . Y%<580 door4|
00001b60 25 2d 3d 32 20 8b 20 64 6f 6f 72 34 25 2b 3d 31 |%-=2 . door4%+=1|
00001b70 30 0d 0a 96 17 e7 20 64 6f 6f 72 34 25 3c 30 20 |0..... door4%<0 |
00001b80 64 6f 6f 72 34 25 3d 30 0d 0a a0 19 e7 20 64 6f |door4%=0..... do|
00001b90 6f 72 34 25 3e 33 32 20 64 6f 6f 72 34 25 3d 33 |or4%>32 door4%=3|
00001ba0 32 0d 0a aa 17 c8 93 20 c8 90 20 36 34 36 2c 34 |2...... .. 646,4|
00001bb0 37 34 2c 39 38 2c 36 34 0d 0a b4 07 e6 31 35 0d |74,98,64.....15.|
00001bc0 0a be 1a c8 93 20 c8 90 20 36 34 36 2c 36 36 2c |..... .. 646,66,|
00001bd0 39 30 2c 64 6f 6f 72 31 25 0d 0a c8 0d ec 20 36 |90,door1%..... 6|
00001be0 35 30 2c 32 30 30 0d 0a d2 14 ec 20 36 35 30 2c |50,200..... 650,|
00001bf0 32 30 30 2b 64 6f 6f 72 32 25 0d 0a dc 17 f0 26 |200+door2%.....&|
00001c00 35 35 2c 36 37 30 2b 64 6f 6f 72 32 25 2c 32 30 |55,670+door2%,20|
00001c10 30 0d 0a e6 0d ec 20 37 33 30 2c 32 36 30 0d 0a |0..... 730,260..|
00001c20 f0 14 ec 20 37 33 30 2c 32 36 30 2d 64 6f 6f 72 |... 730,260-door|
00001c30 32 25 0d 0a fa 17 f0 26 35 35 2c 37 30 38 2d 64 |2%.....&55,708-d|
00001c40 6f 6f 72 32 25 2c 32 36 30 0d 0b 04 18 c8 8f 20 |oor2%,260...... |
00001c50 c8 90 20 36 38 38 2c 33 37 30 2c 64 6f 6f 72 33 |.. 688,370,door3|
00001c60 25 0d 0b 0e 34 c8 93 20 c8 90 20 36 37 38 2d 64 |%...4.. .. 678-d|
00001c70 6f 6f 72 34 25 2c 35 30 34 2d 64 6f 6f 72 34 25 |oor4%,504-door4%|
00001c80 2c 64 6f 6f 72 34 25 2a 32 2b 32 34 2c 64 6f 6f |,door4%*2+24,doo|
00001c90 72 34 25 2a 32 0d 0b 18 13 e3 20 69 63 69 63 6c |r4%*2..... icicl|
00001ca0 65 25 3d 30 20 b8 20 35 0d 0b 22 06 e6 30 0d 0b |e%=0 . 5.."..0..|
00001cb0 2c 16 c8 93 20 c8 90 20 38 33 35 2c 30 2c 32 35 |,... .. 835,0,25|
00001cc0 30 2c 36 30 0d 0b 36 67 e7 20 64 72 69 70 73 25 |0,60..6g. drips%|
00001cd0 28 69 63 69 63 6c 65 25 29 3c 36 30 2b 72 69 63 |(icicle%)<60+ric|
00001ce0 69 63 6c 65 73 25 28 69 63 69 63 6c 65 25 29 20 |icles%(icicle%) |
00001cf0 80 20 64 72 69 70 73 25 28 69 63 69 63 6c 65 25 |. drips%(icicle%|
00001d00 29 3e 30 20 64 72 69 70 73 25 28 69 63 69 63 6c |)>0 drips%(icicl|
00001d10 65 25 29 3d 30 3a 72 69 63 69 63 6c 65 73 25 28 |e%)=0:ricicles%(|
00001d20 69 63 69 63 6c 65 25 29 2b 3d 36 0d 0b 40 90 e7 |icicle%)+=6..@..|
00001d30 20 64 72 69 70 73 25 28 69 63 69 63 6c 65 25 29 | drips%(icicle%)|
00001d40 3e 30 20 e6 37 3a c8 8f 20 c8 90 20 69 63 69 63 |>0 .7:.. .. icic|
00001d50 6c 65 73 25 28 69 63 69 63 6c 65 25 2c 30 29 2b |les%(icicle%,0)+|
00001d60 31 30 2c 64 72 69 70 73 25 28 69 63 69 63 6c 65 |10,drips%(icicle|
00001d70 25 29 2c 34 3a 64 72 69 70 73 25 28 69 63 69 63 |%),4:drips%(icic|
00001d80 6c 65 25 29 2d 3d 31 32 3a e6 31 35 3a c8 8f 20 |le%)-=12:.15:.. |
00001d90 c8 90 20 69 63 69 63 6c 65 73 25 28 69 63 69 63 |.. icicles%(icic|
00001da0 6c 65 25 2c 30 29 2b 31 30 2c 64 72 69 70 73 25 |le%,0)+10,drips%|
00001db0 28 69 63 69 63 6c 65 25 29 2c 34 0d 0b 4a 60 e7 |(icicle%),4..J`.|
00001dc0 20 64 72 69 70 73 25 28 69 63 69 63 6c 65 25 29 | drips%(icicle%)|
00001dd0 3d 30 20 80 20 b3 28 32 30 29 3d 31 20 69 63 69 |=0 . .(20)=1 ici|
00001de0 63 6c 65 73 25 28 69 63 69 63 6c 65 25 2c 31 29 |cles%(icicle%,1)|
00001df0 2b 3d 38 3a 64 72 69 70 73 25 28 69 63 69 63 6c |+=8:drips%(icicl|
00001e00 65 25 29 3d 34 36 30 2d 69 63 69 63 6c 65 73 25 |e%)=460-icicles%|
00001e10 28 69 63 69 63 6c 65 25 2c 31 29 0d 0b 54 35 e7 |(icicle%,1)..T5.|
00001e20 20 69 63 69 63 6c 65 73 25 28 69 63 69 63 6c 65 | icicles%(icicle|
00001e30 25 2c 31 29 3e 33 30 30 20 69 63 69 63 6c 65 73 |%,1)>300 icicles|
00001e40 25 28 69 63 69 63 6c 65 25 2c 31 29 3d 33 30 30 |%(icicle%,1)=300|
00001e50 0d 0b 5e 33 e7 20 72 69 63 69 63 6c 65 73 25 28 |..^3. ricicles%(|
00001e60 69 63 69 63 6c 65 25 29 3e 32 30 30 20 72 69 63 |icicle%)>200 ric|
00001e70 69 63 6c 65 73 25 28 69 63 69 63 6c 65 25 29 3d |icles%(icicle%)=|
00001e80 32 30 30 0d 0b 68 06 e6 38 0d 0b 72 34 ec 20 69 |200..h..8..r4. i|
00001e90 63 69 63 6c 65 73 25 28 69 63 69 63 6c 65 25 2c |cicles%(icicle%,|
00001ea0 30 29 2d 69 63 69 63 6c 65 73 25 28 69 63 69 63 |0)-icicles%(icic|
00001eb0 6c 65 25 2c 31 29 2f 31 30 2c 34 36 30 0d 0b 7c |le%,1)/10,460..||
00001ec0 37 ec 20 69 63 69 63 6c 65 73 25 28 69 63 69 63 |7. icicles%(icic|
00001ed0 6c 65 25 2c 30 29 2b 32 30 2b 69 63 69 63 6c 65 |le%,0)+20+icicle|
00001ee0 73 25 28 69 63 69 63 6c 65 25 2c 31 29 2f 31 30 |s%(icicle%,1)/10|
00001ef0 2c 34 36 30 0d 0b 86 37 f0 26 35 35 2c 69 63 69 |,460...7.&55,ici|
00001f00 63 6c 65 73 25 28 69 63 69 63 6c 65 25 2c 30 29 |cles%(icicle%,0)|
00001f10 2b 31 30 2c 34 36 30 2d 69 63 69 63 6c 65 73 25 |+10,460-icicles%|
00001f20 28 69 63 69 63 6c 65 25 2c 31 29 0d 0b 90 34 ec |(icicle%,1)...4.|
00001f30 20 69 63 69 63 6c 65 73 25 28 69 63 69 63 6c 65 | icicles%(icicle|
00001f40 25 2c 30 29 2d 72 69 63 69 63 6c 65 73 25 28 69 |%,0)-ricicles%(i|
00001f50 63 69 63 6c 65 25 29 2f 32 2b 31 30 2c 36 36 0d |cicle%)/2+10,66.|
00001f60 0b 9a 34 ec 20 69 63 69 63 6c 65 73 25 28 69 63 |..4. icicles%(ic|
00001f70 69 63 6c 65 25 2c 30 29 2b 72 69 63 69 63 6c 65 |icle%,0)+ricicle|
00001f80 73 25 28 69 63 69 63 6c 65 25 29 2f 32 2b 31 30 |s%(icicle%)/2+10|
00001f90 2c 36 36 0d 0b a4 35 f0 26 35 35 2c 69 63 69 63 |,66...5.&55,icic|
00001fa0 6c 65 73 25 28 69 63 69 63 6c 65 25 2c 30 29 2b |les%(icicle%,0)+|
00001fb0 31 30 2c 36 36 2b 72 69 63 69 63 6c 65 73 25 28 |10,66+ricicles%(|
00001fc0 69 63 69 63 6c 65 25 29 0d 0b ae 05 ed 0d 0b b8 |icicle%)........|
00001fd0 06 e6 37 0d 0b c2 3d 86 20 31 30 32 34 2c 36 37 |..7...=. 1024,67|
00001fe0 36 2c 31 30 32 34 2b 28 9b b2 28 28 73 65 63 25 |6,1024+(..((sec%|
00001ff0 29 2a 36 29 2a 31 35 30 29 2c 36 37 36 2b 28 b5 |)*6)*150),676+(.|
00002000 b2 28 28 73 65 63 25 29 2a 36 29 2a 31 35 30 29 |.((sec%)*6)*150)|
00002010 0d 0b cc 0f e7 20 73 65 63 25 3e 37 34 20 8c 0d |..... sec%>74 ..|
00002020 0b d6 2a ec 20 31 30 32 34 2b 9b b2 28 6d 69 6e |..*. 1024+..(min|
00002030 25 2a 36 29 2a 31 36 2c 36 37 36 2b b5 b2 28 6d |%*6)*16,676+..(m|
00002040 69 6e 25 2a 36 29 2a 31 36 0d 0b e0 2a ec 20 31 |in%*6)*16...*. 1|
00002050 30 32 34 2d 9b b2 28 6d 69 6e 25 2a 36 29 2a 31 |024-..(min%*6)*1|
00002060 36 2c 36 37 36 2d b5 b2 28 6d 69 6e 25 2a 36 29 |6,676-..(min%*6)|
00002070 2a 31 36 0d 0b ea 3d f0 26 35 35 2c 31 30 32 34 |*16...=.&55,1024|
00002080 2b 28 9b b2 28 28 6d 69 6e 25 2a 36 29 2b 39 30 |+(..((min%*6)+90|
00002090 29 2a 31 35 30 29 2c 36 37 36 2b 28 b5 b2 28 28 |)*150),676+(..((|
000020a0 6d 69 6e 25 2a 36 29 2b 39 30 29 2a 31 35 30 29 |min%*6)+90)*150)|
000020b0 0d 0b f4 2e ec 20 31 30 32 34 2b 9b b2 28 68 6f |..... 1024+..(ho|
000020c0 75 72 25 2a 33 30 29 2a 32 34 2c 36 37 36 2b b5 |ur%*30)*24,676+.|
000020d0 b2 28 68 6f 75 72 25 2a 33 30 29 2a 32 34 0d 0b |.(hour%*30)*24..|
000020e0 fe 2e ec 20 31 30 32 34 2d 9b b2 28 68 6f 75 72 |... 1024-..(hour|
000020f0 25 2a 33 30 29 2a 32 34 2c 36 37 36 2d b5 b2 28 |%*30)*24,676-..(|
00002100 68 6f 75 72 25 2a 33 30 29 2a 32 34 0d 0c 08 41 |hour%*30)*24...A|
00002110 f0 26 35 35 2c 31 30 32 34 2b 28 9b b2 28 28 68 |.&55,1024+(..((h|
00002120 6f 75 72 25 2a 33 30 29 2b 39 30 29 2a 31 32 30 |our%*30)+90)*120|
00002130 29 2c 36 37 36 2b 28 b5 b2 28 28 68 6f 75 72 25 |),676+(..((hour%|
00002140 2a 33 30 29 2b 39 30 29 2a 31 32 30 29 0d 0c 12 |*30)+90)*120)...|
00002150 18 6d 69 6e 25 3d 36 30 2d bb 28 c1 91 24 2c 32 |.min%=60-.(..$,2|
00002160 30 2c 32 29 29 0d 0c 1c 2c e7 20 6d 69 6e 25 3c |0,2))...,. min%<|
00002170 36 30 20 80 20 6d 69 6e 25 3e 32 39 20 8c 20 64 |60 . min%>29 . d|
00002180 65 6d 69 3d 30 2e 35 20 8b 20 64 65 6d 69 25 3d |emi=0.5 . demi%=|
00002190 30 0d 0c 26 21 68 6f 75 72 25 3d 31 32 2d bb 28 |0..&!hour%=12-.(|
000021a0 c1 91 24 2c 31 37 2c 32 29 29 2d 6d 69 6e 25 2f |..$,17,2))-min%/|
000021b0 36 30 0d 0c 30 05 cd 0d 0c 3a 15 73 65 63 25 3d |60..0....:.sec%=|
000021c0 37 35 2d bb 28 c2 91 24 2c 32 29 29 0d 0c 44 07 |75-.(..$,2))..D.|
000021d0 e6 31 31 0d 0c 4e 2e ec 20 31 30 32 34 2b 9b b2 |.11..N.. 1024+..|
000021e0 28 68 6f 75 72 25 2a 33 30 29 2a 32 34 2c 36 37 |(hour%*30)*24,67|
000021f0 36 2b b5 b2 28 68 6f 75 72 25 2a 33 30 29 2a 32 |6+..(hour%*30)*2|
00002200 34 0d 0c 58 2e ec 20 31 30 32 34 2d 9b b2 28 68 |4..X.. 1024-..(h|
00002210 6f 75 72 25 2a 33 30 29 2a 32 34 2c 36 37 36 2d |our%*30)*24,676-|
00002220 b5 b2 28 68 6f 75 72 25 2a 33 30 29 2a 32 34 0d |..(hour%*30)*24.|
00002230 0c 62 41 f0 26 35 35 2c 31 30 32 34 2b 28 9b b2 |.bA.&55,1024+(..|
00002240 28 28 68 6f 75 72 25 2a 33 30 29 2b 39 30 29 2a |((hour%*30)+90)*|
00002250 31 32 30 29 2c 36 37 36 2b 28 b5 b2 28 28 68 6f |120),676+(..((ho|
00002260 75 72 25 2a 33 30 29 2b 39 30 29 2a 31 32 30 29 |ur%*30)+90)*120)|
00002270 0d 0c 6c 07 e6 31 34 0d 0c 76 2a ec 20 31 30 32 |..l..14..v*. 102|
00002280 34 2b 9b b2 28 6d 69 6e 25 2a 36 29 2a 31 36 2c |4+..(min%*6)*16,|
00002290 36 37 36 2b b5 b2 28 6d 69 6e 25 2a 36 29 2a 31 |676+..(min%*6)*1|
000022a0 36 0d 0c 80 2a ec 20 31 30 32 34 2d 9b b2 28 6d |6...*. 1024-..(m|
000022b0 69 6e 25 2a 36 29 2a 31 36 2c 36 37 36 2d b5 b2 |in%*6)*16,676-..|
000022c0 28 6d 69 6e 25 2a 36 29 2a 31 36 0d 0c 8a 3d f0 |(min%*6)*16...=.|
000022d0 26 35 35 2c 31 30 32 34 2b 28 9b b2 28 28 6d 69 |&55,1024+(..((mi|
000022e0 6e 25 2a 36 29 2b 39 30 29 2a 31 35 30 29 2c 36 |n%*6)+90)*150),6|
000022f0 37 36 2b 28 b5 b2 28 28 6d 69 6e 25 2a 36 29 2b |76+(..((min%*6)+|
00002300 39 30 29 2a 31 35 30 29 0d 0c 94 06 e6 39 0d 0c |90)*150).....9..|
00002310 9e 3d 86 20 31 30 32 34 2c 36 37 36 2c 31 30 32 |.=. 1024,676,102|
00002320 34 2b 28 9b b2 28 28 73 65 63 25 29 2a 36 29 2a |4+(..((sec%)*6)*|
00002330 31 35 30 29 2c 36 37 36 2b 28 b5 b2 28 28 73 65 |150),676+(..((se|
00002340 63 25 29 2a 36 29 2a 31 35 30 29 0d 0c a8 0a f2 |c%)*6)*150).....|
00002350 6d 6f 75 73 65 0d 0c b2 7b fd 20 b0 58 25 2b 34 |mouse...{. .X%+4|
00002360 2c 59 25 2d 34 29 3d 30 20 84 20 b0 58 25 2b 34 |,Y%-4)=0 . .X%+4|
00002370 2c 59 25 2d 34 29 3d 77 68 69 63 68 62 6c 61 63 |,Y%-4)=whichblac|
00002380 6b 25 20 84 20 b0 58 25 2b 34 2c 59 25 2d 34 29 |k% . .X%+4,Y%-4)|
00002390 3e 37 20 84 20 58 25 3c 30 20 84 20 58 25 3e 31 |>7 . X%<0 . X%>1|
000023a0 32 38 30 20 84 20 59 25 3e 31 30 32 34 20 84 20 |280 . Y%>1024 . |
000023b0 59 25 3c 30 20 84 20 58 25 3e 31 32 30 30 20 80 |Y%<0 . X%>1200 .|
000023c0 20 59 25 3e 33 35 34 20 80 20 59 25 3c 34 36 36 | Y%>354 . Y%<466|
000023d0 0d 0c bc 32 e7 20 58 25 3e 31 32 30 30 20 80 20 |...2. X%>1200 . |
000023e0 59 25 3e 33 35 34 20 80 20 59 25 3c 34 36 36 20 |Y%>354 . Y%<466 |
000023f0 fd 31 20 8b 20 f2 65 78 70 6c 6f 73 69 6f 6e 3a |.1 . .explosion:|
00002400 fd 30 0d 0c c6 16 e3 20 61 63 72 6f 73 73 3d 58 |.0..... across=X|
00002410 25 20 b8 20 31 33 30 30 0d 0c d0 27 fb 31 2c b3 |% . 1300...'.1,.|
00002420 28 31 32 38 29 2b 31 32 38 2c b3 28 31 32 38 29 |(128)+128,.(128)|
00002430 2b 31 32 38 2c b3 28 31 32 38 29 2b 31 32 38 0d |+128,.(128)+128.|
00002440 0c da 17 c8 97 20 c8 93 20 61 63 72 6f 73 73 2c |..... .. across,|
00002450 59 25 2c 30 2c 30 0d 0c e4 14 e3 20 70 6f 72 73 |Y%,0,0..... pors|
00002460 3d 30 20 b8 20 31 30 30 3a ed 0d 0c ee 05 ed 0d |=0 . 100:.......|
00002470 0c f8 12 e3 20 75 70 3d 59 25 20 b8 20 31 31 30 |.... up=Y% . 110|
00002480 30 0d 0d 02 27 fb 31 2c b3 28 31 32 38 29 2b 31 |0...'.1,.(128)+1|
00002490 32 38 2c b3 28 31 32 38 29 2b 31 32 38 2c b3 28 |28,.(128)+128,.(|
000024a0 31 32 38 29 2b 31 32 38 0d 0d 0c 15 c8 97 20 c8 |128)+128...... .|
000024b0 93 20 31 33 30 30 2c 75 70 2c 30 2c 30 0d 0d 16 |. 1300,up,0,0...|
000024c0 14 e3 20 70 6f 72 73 3d 30 20 b8 20 31 30 30 3a |.. pors=0 . 100:|
000024d0 ed 0d 0d 20 05 ed 0d 0d 2a 0c fb 31 2c 30 2c 30 |... ....*..1,0,0|
000024e0 2c 30 0d 0d 34 05 e1 0d 0d 3e 0f dd f2 65 78 70 |,0..4....>...exp|
000024f0 6c 6f 73 69 6f 6e 0d 0d 48 0e 2a 50 4f 49 4e 54 |losion..H.*POINT|
00002500 45 52 20 30 0d 0d 52 15 ef 20 31 39 2c 31 2c 32 |ER 0..R.. 19,1,2|
00002510 34 2c 32 35 35 2c 30 2c 30 0d 0d 5c 16 e3 20 65 |4,255,0,0..\.. e|
00002520 78 70 6c 6f 73 69 6f 6e 3d 30 20 b8 20 35 30 0d |xplosion=0 . 50.|
00002530 0d 66 12 e6 28 b0 58 25 2b 34 2c 59 25 2d 34 29 |.f..(.X%+4,Y%-4)|
00002540 29 0d 0d 70 19 c8 8f 20 c8 90 20 58 25 2c 59 25 |)..p... .. X%,Y%|
00002550 2c 65 78 70 6c 6f 73 69 6f 6e 0d 0d 7a 06 e6 30 |,explosion..z..0|
00002560 0d 0d 84 19 c8 8f 20 20 58 25 2c 59 25 2c 65 78 |...... X%,Y%,ex|
00002570 70 6c 6f 73 69 6f 6e 2b 38 0d 0d 8e 14 e3 20 50 |plosion+8..... P|
00002580 4f 52 53 3d 30 20 b8 20 31 30 30 3a ed 0d 0d 98 |ORS=0 . 100:....|
00002590 05 ed 0d 0d a2 05 db 0d 0d ac 18 ef 31 39 2c 31 |............19,1|
000025a0 2c 32 34 2c 31 32 38 2c 31 32 38 2c 31 32 38 0d |,24,128,128,128.|
000025b0 0d b6 05 e1 0d 0d c0 0b dd f2 6d 6f 75 73 65 0d |..........mouse.|
000025c0 0d ca 13 e3 20 63 6f 6c 6f 75 72 25 3d 30 20 b8 |.... colour%=0 .|
000025d0 20 32 0d 0d d4 1d 6d 6f 75 73 65 25 28 63 6f 6c | 2....mouse%(col|
000025e0 6f 75 72 25 29 2b 3d b3 28 33 33 29 2d 31 37 0d |our%)+=.(33)-17.|
000025f0 0d de 2d e7 20 6d 6f 75 73 65 25 28 63 6f 6c 6f |..-. mouse%(colo|
00002600 75 72 25 29 3e 32 35 35 20 6d 6f 75 73 65 25 28 |ur%)>255 mouse%(|
00002610 63 6f 6c 6f 75 72 25 29 3d 32 35 35 0d 0d e8 2d |colour%)=255...-|
00002620 e7 20 6d 6f 75 73 65 25 28 63 6f 6c 6f 75 72 25 |. mouse%(colour%|
00002630 29 3c 31 32 38 20 6d 6f 75 73 65 25 28 63 6f 6c |)<128 mouse%(col|
00002640 6f 75 72 25 29 3d 31 32 38 0d 0d f2 05 ed 0d 0d |our%)=128.......|
00002650 fc 28 c8 97 20 fb 20 31 2c 6d 6f 75 73 65 25 28 |.(.. . 1,mouse%(|
00002660 30 29 2c 6d 6f 75 73 65 25 28 31 29 2c 6d 6f 75 |0),mouse%(1),mou|
00002670 73 65 25 28 32 29 0d 0e 06 0e c8 97 58 25 2c 59 |se%(2)......X%,Y|
00002680 25 2c 5a 25 0d 0e 10 1d c8 97 20 c8 93 20 58 25 |%,Z%...... .. X%|
00002690 2d 35 30 2c 59 25 2d 35 30 2c 31 30 30 2c 31 30 |-50,Y%-50,100,10|
000026a0 30 0d 0e 1a 1a e7 20 5a 25 20 8c 20 c8 97 20 c8 |0..... Z% . .. .|
000026b0 93 20 58 25 2c 59 25 2c 30 2c 30 0d 0e 24 05 e1 |. X%,Y%,0,0..$..|
000026c0 0d 0e 2e 0c dd f2 6c 65 76 65 6c 33 0d 0e 38 05 |......level3..8.|
000026d0 db 0d 0e 42 05 f5 0d 0e 4c 0b f2 6c 6f 63 61 74 |...B....L..locat|
000026e0 65 0d 0e 60 08 58 25 3d 30 0d 0e 6a 0c fb 32 2c |e..`.X%=0..j..2,|
000026f0 30 2c 30 2c 30 0d 0e 74 21 2a 53 43 52 45 45 4e |0,0,0..t!*SCREEN|
00002700 4c 4f 41 44 20 3c 4f 62 65 79 24 44 69 72 3e 2e |LOAD <Obey$Dir>.|
00002710 4c 65 76 65 6c 33 0d 0e 7e 0c f2 50 61 6c 65 74 |Level3..~..Palet|
00002720 74 65 0d 0e 7f 14 c8 97 20 c8 93 20 38 30 2c 39 |te...... .. 80,9|
00002730 38 30 2c 30 2c 30 0d 0e 88 44 61 25 3d 30 3a 62 |80,0,0...Da%=0:b|
00002740 25 3d 30 3a 63 25 3d 34 3a 64 25 3d 36 30 30 3a |%=0:c%=4:d%=600:|
00002750 65 25 3d 31 31 34 3a 6c 61 73 74 64 72 6f 70 25 |e%=114:lastdrop%|
00002760 3d 30 3a 64 72 69 70 73 25 28 30 29 3d 30 3a 64 |=0:drips%(0)=0:d|
00002770 72 69 70 73 25 28 31 29 3d 30 0d 0e 92 17 64 6f |rips%(1)=0....do|
00002780 6f 72 31 25 3d 30 3a 66 25 3d 32 3a 73 30 25 3d |or1%=0:f%=2:s0%=|
00002790 30 0d 0e 9c 30 c8 99 22 57 69 6d 70 5f 53 70 72 |0...0.."Wimp_Spr|
000027a0 69 74 65 4f 70 22 2c 33 36 2c 2c 22 67 61 6d 65 |iteOp",36,,"game|
000027b0 70 6f 69 6e 74 65 72 22 2c 25 31 31 30 30 30 30 |pointer",%110000|
000027c0 31 0d 0e a6 16 c8 97 20 fb 20 32 2c 32 35 35 2c |1...... . 2,255,|
000027d0 32 35 35 2c 32 35 35 0d 0e b0 05 f5 0d 0e ba 06 |255,255.........|
000027e0 e6 37 0d 0e c4 06 c8 96 0d 0e ce 09 f2 77 61 69 |.7...........wai|
000027f0 74 0d 0e d8 1e c8 9d 20 c8 90 20 32 36 38 2c 34 |t...... .. 268,4|
00002800 33 30 2c 32 33 30 2c 35 30 2c b2 28 61 25 29 0d |30,230,50,.(a%).|
00002810 0e e2 21 c8 9d 20 c8 90 20 32 36 38 2c 34 33 30 |..!.. .. 268,430|
00002820 2c 32 33 30 2c 35 30 2c b2 28 61 25 2b 39 30 29 |,230,50,.(a%+90)|
00002830 0d 0e ec 0a 61 25 2d 3d 31 32 0d 0e f6 07 e6 31 |....a%-=12.....1|
00002840 30 0d 0f 00 1e c8 9d 20 c8 90 20 32 36 38 2c 34 |0...... .. 268,4|
00002850 33 30 2c 32 33 30 2c 35 30 2c b2 28 61 25 29 0d |30,230,50,.(a%).|
00002860 0f 0a 21 c8 9d 20 c8 90 20 32 36 38 2c 34 33 30 |..!.. .. 268,430|
00002870 2c 32 33 30 2c 35 30 2c b2 28 61 25 2b 39 30 29 |,230,50,.(a%+90)|
00002880 0d 0f 14 06 e6 37 0d 0f 1e 18 c8 9d 20 c8 90 20 |.....7...... .. |
00002890 33 30 30 2c 39 33 38 2c 31 30 30 2c 62 25 0d 0f |300,938,100,b%..|
000028a0 28 0a 62 25 2b 3d 63 25 0d 0f 32 1b e7 20 62 25 |(.b%+=c%..2.. b%|
000028b0 3e 37 38 20 84 20 62 25 3c 2d 37 38 20 63 25 3d |>78 . b%<-78 c%=|
000028c0 2d 63 25 0d 0f 3c 10 e6 39 2e 35 2b b4 28 62 25 |-c%..<..9.5+.(b%|
000028d0 29 2f 32 0d 0f 46 17 c8 9d 20 c8 90 20 33 30 30 |)/2..F... .. 300|
000028e0 2c 39 33 38 2c 38 30 2c 62 25 0d 0f 50 10 6c 61 |,938,80,b%..P.la|
000028f0 73 74 64 72 6f 70 25 2b 3d 31 0d 0f 5a 2f e7 20 |stdrop%+=1..Z/. |
00002900 6c 61 73 74 64 72 6f 70 25 3d 31 36 20 80 20 65 |lastdrop%=16 . e|
00002910 25 3c 33 35 30 20 64 72 69 70 73 25 28 31 29 3d |%<350 drips%(1)=|
00002920 33 34 30 3a 64 25 2d 3d 34 0d 0f 64 3b e7 20 6c |340:d%-=4..d;. l|
00002930 61 73 74 64 72 6f 70 25 3d 33 32 20 80 20 65 25 |astdrop%=32 . e%|
00002940 3c 33 35 30 20 64 72 69 70 73 25 28 30 29 3d 33 |<350 drips%(0)=3|
00002950 34 30 3a 64 25 2d 3d 34 3a 6c 61 73 74 64 72 6f |40:d%-=4:lastdro|
00002960 70 25 3d 30 0d 0f 6e 11 e3 20 64 72 69 70 25 3d |p%=0..n.. drip%=|
00002970 30 20 b8 20 31 0d 0f 78 63 e7 20 64 72 69 70 73 |0 . 1..xc. drips|
00002980 25 28 64 72 69 70 25 29 3e 30 20 e6 37 3a c8 8f |%(drip%)>0 .7:..|
00002990 20 c8 90 20 31 31 30 34 2c 64 72 69 70 73 25 28 | .. 1104,drips%(|
000029a0 64 72 69 70 25 29 2c 38 3a 64 72 69 70 73 25 28 |drip%),8:drips%(|
000029b0 64 72 69 70 25 29 2d 3d 38 3a e6 31 34 3a c8 8f |drip%)-=8:.14:..|
000029c0 20 c8 90 20 31 31 30 34 2c 64 72 69 70 73 25 28 | .. 1104,drips%(|
000029d0 64 72 69 70 25 29 2c 38 0d 0f 82 5b e7 20 64 72 |drip%),8...[. dr|
000029e0 69 70 73 25 28 64 72 69 70 25 29 3e 30 20 80 20 |ips%(drip%)>0 . |
000029f0 64 72 69 70 73 25 28 64 72 69 70 25 29 3c 65 25 |drips%(drip%)<e%|
00002a00 2d 38 20 65 25 2b 3d 34 3a e6 31 34 3a c8 93 20 |-8 e%+=4:.14:.. |
00002a10 c8 90 20 31 30 39 36 2c 65 25 2d 31 36 2c 31 36 |.. 1096,e%-16,16|
00002a20 2c 31 32 3a 64 72 69 70 73 25 28 64 72 69 70 25 |,12:drips%(drip%|
00002a30 29 3d 30 0d 0f 8c 05 ed 0d 0f 96 0b e6 31 32 38 |)=0..........128|
00002a40 2b 31 34 0d 0f a0 06 e6 37 0d 0f aa 0f f0 37 37 |+14.....7.....77|
00002a50 2c 31 31 30 30 2c 64 25 0d 0f b4 0a e6 31 32 38 |,1100,d%.....128|
00002a60 2b 37 0d 0f be 07 e6 31 34 0d 0f c8 0f f0 37 37 |+7.....14.....77|
00002a70 2c 31 31 30 30 2c 65 25 0d 0f d2 25 e7 20 58 25 |,1100,e%...%. X%|
00002a80 3e 35 36 35 20 80 20 59 25 3c 36 36 36 20 80 20 |>565 . Y%<666 . |
00002a90 73 30 25 3d 30 20 8c 20 73 30 25 3d 34 0d 0f dc |s0%=0 . s0%=4...|
00002aa0 17 e7 20 73 30 25 3e 30 20 80 20 73 30 25 3c 33 |.. s0%>0 . s0%<3|
00002ab0 33 30 20 8c 0d 0f e6 0a 73 30 25 2b 3d 38 0d 0f |30 .....s0%+=8..|
00002ac0 f0 06 e6 30 0d 0f fa 0c ec 35 36 35 2c 36 36 36 |...0.....565,666|
00002ad0 0d 10 04 13 ec 35 36 35 2b 73 30 25 2b 31 32 2c |.....565+s0%+12,|
00002ae0 36 36 36 0d 10 0e 19 f0 26 35 35 2c 35 36 35 2c |666.....&55,565,|
00002af0 36 36 36 2d 73 30 25 2a 32 2b 33 32 0d 10 18 0b |666-s0%*2+32....|
00002b00 ec 39 30 38 2c 33 32 0d 10 22 12 ec 39 30 38 2d |.908,32.."..908-|
00002b10 73 30 25 2d 31 32 2c 33 32 0d 10 2c 18 f0 26 35 |s0%-12,32..,..&5|
00002b20 35 2c 39 30 38 2c 33 32 2b 73 30 25 2a 32 2d 33 |5,908,32+s0%*2-3|
00002b30 32 0d 10 36 05 cd 0d 10 40 06 e6 37 0d 10 4a 17 |2..6....@..7..J.|
00002b40 c8 93 20 c8 90 34 34 34 2c 39 30 38 2c 31 32 30 |.. ..444,908,120|
00002b50 2c 35 36 0d 10 54 0e 64 6f 6f 72 31 25 2b 3d 66 |,56..T.door1%+=f|
00002b60 25 0d 10 5e 21 e7 20 64 6f 6f 72 31 25 3e 32 38 |%..^!. door1%>28|
00002b70 20 84 20 64 6f 6f 72 31 25 3c 32 20 66 25 3d 2d | . door1%<2 f%=-|
00002b80 66 25 0d 10 68 07 e6 31 35 0d 10 72 1c c8 93 20 |f%..h..15..r... |
00002b90 c8 90 20 34 34 34 2c 39 30 34 2c 31 32 30 2c 64 |.. 444,904,120,d|
00002ba0 6f 6f 72 31 25 0d 10 7c 1d c8 93 20 c8 90 20 34 |oor1%..|... .. 4|
00002bb0 34 34 2c 39 36 34 2c 31 32 30 2c 2d 64 6f 6f 72 |44,964,120,-door|
00002bc0 31 25 0d 10 86 1b c8 93 30 2c 37 33 38 2c 38 2c |1%......0,738,8,|
00002bd0 36 30 20 b8 20 31 32 37 32 2c 37 33 38 0d 10 90 |60 . 1272,738...|
00002be0 1c c8 93 30 2c 37 33 38 2c 31 32 38 30 2c 36 30 |...0,738,1280,60|
00002bf0 20 b8 20 2d 38 2c 37 33 38 0d 10 9a 0a f2 6d 6f | . -8,738.....mo|
00002c00 75 73 65 0d 10 a4 38 e7 20 58 25 3e 35 36 34 20 |use...8. X%>564 |
00002c10 80 20 58 25 3c 31 31 30 30 20 80 20 59 25 3e 38 |. X%<1100 . Y%>8|
00002c20 35 30 20 8c 20 c8 97 20 b8 20 58 25 2c 59 25 2d |50 . .. . X%,Y%-|
00002c30 28 58 25 2d 35 36 34 29 2f 36 34 0d 10 ae 61 fd |(X%-564)/64...a.|
00002c40 20 b0 58 25 2b 34 2c 59 25 2d 34 29 3d 30 20 84 | .X%+4,Y%-4)=0 .|
00002c50 20 b0 58 25 2b 34 2c 59 25 2d 34 29 3e 37 20 84 | .X%+4,Y%-4)>7 .|
00002c60 20 58 25 3c 30 20 84 20 58 25 3e 31 32 38 30 20 | X%<0 . X%>1280 |
00002c70 84 20 59 25 3e 31 30 32 34 20 84 20 59 25 3c 30 |. Y%>1024 . Y%<0|
00002c80 20 84 20 58 25 3e 31 32 31 36 20 80 20 59 25 3e | . X%>1216 . Y%>|
00002c90 32 34 30 20 80 20 59 25 3c 32 37 34 0d 10 b8 33 |240 . Y%<274...3|
00002ca0 e7 20 58 25 3e 31 32 31 36 20 80 20 59 25 3e 32 |. X%>1216 . Y%>2|
00002cb0 34 30 20 80 20 59 25 3c 32 37 34 20 fd 20 31 20 |40 . Y%<274 . 1 |
00002cc0 8b 20 f2 65 78 70 6c 6f 73 69 6f 6e 3a fd 30 0d |. .explosion:.0.|
00002cd0 10 c2 16 e3 20 61 63 72 6f 73 73 3d 58 25 20 b8 |.... across=X% .|
00002ce0 20 31 33 30 30 0d 10 cc 27 fb 31 2c 31 32 38 2b | 1300...'.1,128+|
00002cf0 b3 28 31 32 37 29 2c 31 32 38 2b b3 28 31 32 37 |.(127),128+.(127|
00002d00 29 2c 31 32 38 2b b3 28 31 32 37 29 0d 10 d6 17 |),128+.(127)....|
00002d10 c8 97 20 c8 93 20 61 63 72 6f 73 73 2c 59 25 2c |.. .. across,Y%,|
00002d20 30 2c 30 0d 10 e0 14 e3 20 50 4f 52 53 3d 30 20 |0,0..... PORS=0 |
00002d30 b8 20 31 30 30 3a ed 0d 10 ea 05 ed 0d 10 f4 12 |. 100:..........|
00002d40 e3 20 75 70 3d 59 25 20 b8 20 31 31 30 30 0d 10 |. up=Y% . 1100..|
00002d50 fe 27 fb 31 2c 31 32 38 2b b3 28 31 32 37 29 2c |.'.1,128+.(127),|
00002d60 31 32 38 2b b3 28 31 32 37 29 2c 31 32 38 2b b3 |128+.(127),128+.|
00002d70 28 31 32 37 29 0d 11 08 15 c8 97 20 c8 93 20 31 |(127)...... .. 1|
00002d80 33 30 30 2c 75 70 2c 30 2c 30 0d 11 12 14 e3 20 |300,up,0,0..... |
00002d90 50 4f 52 53 3d 30 20 b8 20 31 30 30 3a ed 0d 11 |PORS=0 . 100:...|
00002da0 1c 05 ed 0d 11 26 0c fb 31 2c 30 2c 30 2c 30 0d |.....&..1,0,0,0.|
00002db0 11 30 05 e1 0d 11 3a 0c dd f2 6c 65 76 65 6c 34 |.0....:...level4|
00002dc0 0d 11 44 05 f5 0d 11 4e 0b f2 6c 6f 63 61 74 65 |..D....N..locate|
00002dd0 0d 11 58 0e 61 25 3d 35 30 3a 62 25 3d 35 0d 11 |..X.a%=50:b%=5..|
00002de0 62 0d 63 25 3d 30 3a 64 25 3d 30 0d 11 6c 0a 65 |b.c%=0:d%=0..l.e|
00002df0 25 3d 39 33 30 0d 11 76 0d 66 25 3d 30 3a 67 25 |%=930..v.f%=0:g%|
00002e00 3d 30 0d 11 80 0f 68 25 3d 37 33 30 3a 6d 25 3d |=0....h%=730:m%=|
00002e10 30 0d 11 8a 13 e3 20 73 6d 6f 6b 65 25 3d 30 20 |0..... smoke%=0 |
00002e20 b8 20 35 30 0d 11 94 1d 6d 6f 74 65 73 25 28 73 |. 50....motes%(s|
00002e30 6d 6f 6b 65 25 2c 30 29 3d b3 28 34 30 29 2b 34 |moke%,0)=.(40)+4|
00002e40 30 0d 11 9e 1e 6d 6f 74 65 73 25 28 73 6d 6f 6b |0....motes%(smok|
00002e50 65 25 2c 31 29 3d 39 35 30 2b b3 28 32 30 29 0d |e%,1)=950+.(20).|
00002e60 11 a8 05 ed 0d 11 b2 1e 77 68 69 63 68 62 6c 61 |........whichbla|
00002e70 63 6b 32 25 3d 77 68 69 63 68 62 6c 61 63 6b 25 |ck2%=whichblack%|
00002e80 2d 31 0d 11 bc 23 e7 20 77 68 69 63 68 62 6c 61 |-1...#. whichbla|
00002e90 63 6b 32 25 3d 31 20 77 68 69 63 68 62 6c 61 63 |ck2%=1 whichblac|
00002ea0 6b 32 25 3d 36 0d 11 d0 21 2a 53 63 72 65 65 6e |k2%=6...!*Screen|
00002eb0 4c 6f 61 64 20 3c 4f 62 65 79 24 44 69 72 3e 2e |Load <Obey$Dir>.|
00002ec0 4c 65 76 65 6c 34 0d 11 da 0c f2 50 61 6c 65 74 |Level4.....Palet|
00002ed0 74 65 0d 11 db 16 c8 97 20 c8 93 20 31 31 36 30 |te...... .. 1160|
00002ee0 2c 39 32 34 2c 30 2c 30 0d 11 e4 30 c8 99 22 57 |,924,0,0...0.."W|
00002ef0 69 6d 70 5f 53 70 72 69 74 65 4f 70 22 2c 33 36 |imp_SpriteOp",36|
00002f00 2c 2c 22 67 61 6d 65 70 6f 69 6e 74 65 72 22 2c |,,"gamepointer",|
00002f10 25 31 31 30 30 30 30 31 0d 11 ee 16 c8 97 20 fb |%1100001...... .|
00002f20 20 32 2c 32 35 35 2c 32 35 35 2c 32 35 35 0d 11 | 2,255,255,255..|
00002f30 f8 05 f5 0d 11 f9 09 f2 77 61 69 74 0d 12 02 16 |........wait....|
00002f40 fb 77 68 69 63 68 62 6c 61 63 6b 25 2c 30 2c 30 |.whichblack%,0,0|
00002f50 2c 30 0d 12 0c 17 fb 77 68 69 63 68 62 6c 61 63 |,0.....whichblac|
00002f60 6b 32 25 2c 30 2c 30 2c 30 0d 12 16 22 77 68 69 |k2%,0,0,0..."whi|
00002f70 63 68 62 6c 61 63 6b 25 2b 3d 31 3a 77 68 69 63 |chblack%+=1:whic|
00002f80 68 62 6c 61 63 6b 32 25 2b 3d 31 0d 12 20 21 e7 |hblack2%+=1.. !.|
00002f90 20 77 68 69 63 68 62 6c 61 63 6b 25 3d 37 20 77 | whichblack%=7 w|
00002fa0 68 69 63 68 62 6c 61 63 6b 25 3d 32 0d 12 2a 23 |hichblack%=2..*#|
00002fb0 e7 20 77 68 69 63 68 62 6c 61 63 6b 32 25 3d 37 |. whichblack2%=7|
00002fc0 20 77 68 69 63 68 62 6c 61 63 6b 32 25 3d 32 0d | whichblack2%=2.|
00002fd0 12 34 19 fb 20 77 68 69 63 68 62 6c 61 63 6b 25 |.4.. whichblack%|
00002fe0 2c 30 2c 32 35 35 2c 30 0d 12 3e 1c fb 20 77 68 |,0,255,0..>.. wh|
00002ff0 69 63 68 62 6c 61 63 6b 32 25 2c 30 2c 31 32 38 |ichblack2%,0,128|
00003000 2c 31 32 38 0d 12 48 0e e7 20 59 25 3e 38 33 30 |,128..H.. Y%>830|
00003010 20 8c 0d 12 52 06 e6 37 0d 12 5c 1b c8 9d 20 c8 | ...R..7..\... .|
00003020 90 20 38 34 30 2c 39 31 36 2c 61 25 2c 31 30 30 |. 840,916,a%,100|
00003030 2d 61 25 0d 12 66 0a 61 25 2b 3d 62 25 0d 12 70 |-a%..f.a%+=b%..p|
00003040 1a e7 20 61 25 3e 37 30 20 84 20 61 25 3c 32 35 |.. a%>70 . a%<25|
00003050 20 62 25 3d 2d 62 25 0d 12 7a 07 e6 31 34 0d 12 | b%=-b%..z..14..|
00003060 84 1b c8 9d 20 c8 90 20 38 34 30 2c 39 31 36 2c |.... .. 840,916,|
00003070 61 25 2c 31 30 30 2d 61 25 0d 12 8e 06 e6 37 0d |a%,100-a%.....7.|
00003080 12 98 29 c8 8f 20 c8 90 20 34 36 30 2b 9b b2 28 |..).. .. 460+..(|
00003090 63 25 29 2a 32 30 30 2c 39 31 36 2b b5 b2 28 64 |c%)*200,916+..(d|
000030a0 25 29 2a 35 30 2c 32 34 0d 12 a2 10 63 25 2b 3d |%)*50,24....c%+=|
000030b0 35 3a 64 25 2b 3d 31 30 0d 12 ac 06 e6 39 0d 12 |5:d%+=10.....9..|
000030c0 b6 29 c8 8f 20 c8 90 20 34 36 30 2b 9b b2 28 63 |.).. .. 460+..(c|
000030d0 25 29 2a 32 30 30 2c 39 31 36 2b b5 b2 28 64 25 |%)*200,916+..(d%|
000030e0 29 2a 35 30 2c 32 34 0d 12 c0 05 cd 0d 12 ca 06 |)*50,24.........|
000030f0 e6 37 0d 12 d4 12 c8 8f 20 c8 90 20 35 38 2c 65 |.7...... .. 58,e|
00003100 25 2c 32 30 0d 12 de 09 65 25 2d 3d 33 0d 12 e8 |%,20....e%-=3...|
00003110 13 f4 20 44 49 45 20 49 46 20 65 25 3c 33 39 30 |.. DIE IF e%<390|
00003120 0d 12 f2 06 e6 30 0d 12 fc 17 c8 8f 20 c8 90 20 |.....0...... .. |
00003130 35 38 2c 65 25 2c 38 2b b3 28 31 32 29 0d 13 06 |58,e%,8+.(12)...|
00003140 13 e3 20 73 6d 6f 6b 65 25 3d 30 20 b8 20 35 30 |.. smoke%=0 . 50|
00003150 0d 13 10 4b e7 20 6d 6f 74 65 73 25 28 73 6d 6f |...K. motes%(smo|
00003160 6b 65 25 2c 30 29 3d 30 20 8c 20 6d 6f 74 65 73 |ke%,0)=0 . motes|
00003170 25 28 73 6d 6f 6b 65 25 2c 30 29 3d 34 30 2b b3 |%(smoke%,0)=40+.|
00003180 28 33 36 29 3a 6d 6f 74 65 73 25 28 73 6d 6f 6b |(36):motes%(smok|
00003190 65 25 2c 31 29 3d 65 25 2b 32 34 0d 13 1a 0e 52 |e%,1)=e%+24....R|
000031a0 25 3d b3 28 31 37 29 2d 39 0d 13 24 06 e6 37 0d |%=.(17)-9..$..7.|
000031b0 13 2e 29 f0 36 39 2c 6d 6f 74 65 73 25 28 73 6d |..).69,motes%(sm|
000031c0 6f 6b 65 25 2c 30 29 2c 6d 6f 74 65 73 25 28 73 |oke%,0),motes%(s|
000031d0 6d 6f 6b 65 25 2c 31 29 0d 13 38 93 e7 20 b0 6d |moke%,1)..8.. .m|
000031e0 6f 74 65 73 25 28 73 6d 6f 6b 65 25 2c 30 29 2b |otes%(smoke%,0)+|
000031f0 52 25 2c 6d 6f 74 65 73 25 28 73 6d 6f 6b 65 25 |R%,motes%(smoke%|
00003200 2c 31 29 2b 34 29 3c 3e 37 20 84 20 6d 6f 74 65 |,1)+4)<>7 . mote|
00003210 73 25 28 73 6d 6f 6b 65 25 2c 31 29 3e 65 25 2b |s%(smoke%,1)>e%+|
00003220 31 30 30 20 80 20 b3 28 32 30 29 3d 31 20 6d 6f |100 . .(20)=1 mo|
00003230 74 65 73 25 28 73 6d 6f 6b 65 25 2c 30 29 3d 30 |tes%(smoke%,0)=0|
00003240 20 8b 20 6d 6f 74 65 73 25 28 73 6d 6f 6b 65 25 | . motes%(smoke%|
00003250 2c 30 29 2b 3d 52 25 3a 6d 6f 74 65 73 25 28 73 |,0)+=R%:motes%(s|
00003260 6d 6f 6b 65 25 2c 31 29 2b 3d 34 0d 13 42 07 e6 |moke%,1)+=4..B..|
00003270 20 30 0d 13 4c 29 f0 36 39 2c 6d 6f 74 65 73 25 | 0..L).69,motes%|
00003280 28 73 6d 6f 6b 65 25 2c 30 29 2c 6d 6f 74 65 73 |(smoke%,0),motes|
00003290 25 28 73 6d 6f 6b 65 25 2c 31 29 0d 13 56 05 ed |%(smoke%,1)..V..|
000032a0 0d 13 60 09 6d 25 2b 3d 31 0d 13 6a 06 e6 37 0d |..`.m%+=1..j..7.|
000032b0 13 74 14 c8 8f 20 c8 90 20 31 32 32 34 2c 68 25 |.t... .. 1224,h%|
000032c0 2c 33 32 0d 13 7e 0a 68 25 2d 3d 6d 25 0d 13 88 |,32..~.h%-=m%...|
000032d0 18 e7 20 68 25 3c 36 34 20 68 25 3d 36 34 3a 6d |.. h%<64 h%=64:m|
000032e0 25 3d 2d 33 36 0d 13 92 07 e6 31 33 0d 13 9c 14 |%=-36.....13....|
000032f0 c8 8f 20 c8 90 20 31 32 32 34 2c 68 25 2c 33 32 |.. .. 1224,h%,32|
00003300 0d 13 a6 06 e6 37 0d 13 b0 2c c8 8f 20 c8 90 20 |.....7...,.. .. |
00003310 35 30 34 2b 28 58 25 2d 35 30 34 29 2f 33 32 2c |504+(X%-504)/32,|
00003320 37 31 34 2b 28 59 25 2d 37 31 34 29 2f 33 32 2c |714+(Y%-714)/32,|
00003330 32 34 0d 13 ba 2c c8 8f 20 c8 90 20 36 34 34 2b |24...,.. .. 644+|
00003340 28 58 25 2d 36 34 34 29 2f 33 32 2c 37 31 34 2b |(X%-644)/32,714+|
00003350 28 59 25 2d 37 31 34 29 2f 33 32 2c 32 34 0d 13 |(Y%-714)/32,24..|
00003360 c4 0a f2 6d 6f 75 73 65 0d 13 ce 06 e6 38 0d 13 |...mouse.....8..|
00003370 d8 2c c8 8f 20 c8 90 20 35 30 34 2b 28 58 25 2d |.,.. .. 504+(X%-|
00003380 35 30 34 29 2f 33 32 2c 37 31 34 2b 28 59 25 2d |504)/32,714+(Y%-|
00003390 37 31 34 29 2f 33 32 2c 32 34 0d 13 e2 2c c8 8f |714)/32,24...,..|
000033a0 20 c8 90 20 36 34 34 2b 28 58 25 2d 36 34 34 29 | .. 644+(X%-644)|
000033b0 2f 33 32 2c 37 31 34 2b 28 59 25 2d 37 31 34 29 |/32,714+(Y%-714)|
000033c0 2f 33 32 2c 32 34 0d 13 ec 95 fd 20 b0 58 25 2b |/32,24..... .X%+|
000033d0 34 2c 59 25 2d 34 29 3d 30 20 84 20 b0 58 25 2b |4,Y%-4)=0 . .X%+|
000033e0 34 2c 59 25 2d 34 29 3d 77 68 69 63 68 62 6c 61 |4,Y%-4)=whichbla|
000033f0 63 6b 25 20 84 20 b0 58 25 2b 34 2c 59 25 2d 34 |ck% . .X%+4,Y%-4|
00003400 29 3d 77 68 69 63 68 62 6c 61 63 6b 32 25 20 84 |)=whichblack2% .|
00003410 20 b0 58 25 2b 34 2c 59 25 2d 34 29 3e 37 20 84 | .X%+4,Y%-4)>7 .|
00003420 20 58 25 3c 30 20 84 20 58 25 3e 31 32 38 30 20 | X%<0 . X%>1280 |
00003430 84 20 59 25 3e 31 30 32 34 20 84 20 65 25 3c 33 |. Y%>1024 . e%<3|
00003440 39 30 20 84 20 58 25 3c 35 30 20 80 20 59 25 3e |90 . X%<50 . Y%>|
00003450 31 35 20 80 20 59 25 3c 31 35 30 0d 13 f6 0e e7 |15 . Y%<150.....|
00003460 20 65 25 3c 33 39 30 20 8c 0d 14 00 17 e3 20 66 | e%<390 ...... f|
00003470 61 64 65 25 3d 32 35 35 20 b8 20 30 20 88 2d 31 |ade%=255 . 0 .-1|
00003480 0d 14 0a 06 c8 96 0d 14 14 14 e3 20 63 6f 6c 6f |........... colo|
00003490 75 72 25 3d 31 20 b8 20 31 35 0d 14 1e 1e fb 63 |ur%=1 . 15.....c|
000034a0 6f 6c 6f 75 72 25 2c 66 61 64 65 25 2c 66 61 64 |olour%,fade%,fad|
000034b0 65 25 2c 66 61 64 65 25 0d 14 28 05 ed 0d 14 32 |e%,fade%..(....2|
000034c0 0e 2a 50 4f 49 4e 54 45 52 20 30 0d 14 3c 05 ed |.*POINTER 0..<..|
000034d0 0d 14 46 05 db 0d 14 50 0c f2 50 61 6c 65 74 74 |..F....P..Palett|
000034e0 65 0d 14 5a 0c fb 31 2c 30 2c 30 2c 30 0d 14 64 |e..Z..1,0,0,0..d|
000034f0 0e 2a 50 4f 49 4e 54 45 52 20 31 0d 14 6e 05 cd |.*POINTER 1..n..|
00003500 0d 14 78 3e e7 20 58 25 3c 35 30 20 80 20 59 25 |..x>. X%<50 . Y%|
00003510 3e 31 35 20 80 20 59 25 3c 31 35 30 20 fd 31 20 |>15 . Y%<150 .1 |
00003520 8b 20 e7 20 65 25 3c 33 39 30 20 fd 20 30 20 8b |. . e%<390 . 0 .|
00003530 20 f2 65 78 70 6c 6f 73 69 6f 6e 3a fd 30 0d 14 | .explosion:.0..|
00003540 82 19 e3 20 61 63 72 6f 73 73 3d 58 25 20 b8 20 |... across=X% . |
00003550 2d 32 30 20 88 2d 31 0d 14 8c 06 e6 38 0d 14 96 |-20 .-1.....8...|
00003560 30 c8 8f 20 c8 90 20 35 30 34 2b 28 61 63 72 6f |0.. .. 504+(acro|
00003570 73 73 2d 35 30 34 29 2f 33 32 2c 37 31 34 2b 28 |ss-504)/32,714+(|
00003580 59 25 2d 37 31 34 29 2f 33 32 2c 32 34 0d 14 a0 |Y%-714)/32,24...|
00003590 30 c8 8f 20 c8 90 20 36 34 34 2b 28 61 63 72 6f |0.. .. 644+(acro|
000035a0 73 73 2d 36 34 34 29 2f 33 32 2c 37 31 34 2b 28 |ss-644)/32,714+(|
000035b0 59 25 2d 37 31 34 29 2f 33 32 2c 32 34 0d 14 aa |Y%-714)/32,24...|
000035c0 27 fb 31 2c b3 28 31 32 38 29 2b 31 32 38 2c b3 |'.1,.(128)+128,.|
000035d0 28 31 32 38 29 2b 31 32 38 2c b3 28 31 32 38 29 |(128)+128,.(128)|
000035e0 2b 31 32 38 0d 14 b4 17 c8 97 20 c8 93 20 61 63 |+128...... .. ac|
000035f0 72 6f 73 73 2c 59 25 2c 30 2c 30 0d 14 be 06 e6 |ross,Y%,0,0.....|
00003600 37 0d 14 c8 06 c8 96 0d 14 d2 30 c8 8f 20 c8 90 |7.........0.. ..|
00003610 20 35 30 34 2b 28 61 63 72 6f 73 73 2d 35 30 34 | 504+(across-504|
00003620 29 2f 33 32 2c 37 31 34 2b 28 59 25 2d 37 31 34 |)/32,714+(Y%-714|
00003630 29 2f 33 32 2c 32 34 0d 14 dc 30 c8 8f 20 c8 90 |)/32,24...0.. ..|
00003640 20 36 34 34 2b 28 61 63 72 6f 73 73 2d 36 34 34 | 644+(across-644|
00003650 29 2f 33 32 2c 37 31 34 2b 28 59 25 2d 37 31 34 |)/32,714+(Y%-714|
00003660 29 2f 33 32 2c 32 34 0d 14 e6 05 ed 0d 14 f0 15 |)/32,24.........|
00003670 e3 20 75 70 3d 59 25 20 b8 20 31 31 30 30 20 88 |. up=Y% . 1100 .|
00003680 34 0d 14 fa 06 e6 38 0d 15 04 20 c8 8f 20 c8 90 |4.....8... .. ..|
00003690 20 34 38 38 2c 37 31 34 2b 28 75 70 2d 37 31 34 | 488,714+(up-714|
000036a0 29 2f 33 32 2c 32 34 0d 15 0e 20 c8 8f 20 c8 90 |)/32,24... .. ..|
000036b0 20 36 32 34 2c 37 31 34 2b 28 75 70 2d 37 31 34 | 624,714+(up-714|
000036c0 29 2f 33 32 2c 32 34 0d 15 18 27 fb 31 2c b3 28 |)/32,24...'.1,.(|
000036d0 31 32 38 29 2b 31 32 38 2c b3 28 31 32 38 29 2b |128)+128,.(128)+|
000036e0 31 32 38 2c b3 28 31 32 38 29 2b 31 32 38 0d 15 |128,.(128)+128..|
000036f0 22 14 c8 97 20 c8 93 20 2d 32 30 2c 75 70 2c 30 |"... .. -20,up,0|
00003700 2c 30 0d 15 2c 06 e6 37 0d 15 36 06 c8 96 0d 15 |,0..,..7..6.....|
00003710 40 20 c8 8f 20 c8 90 20 34 38 38 2c 37 31 34 2b |@ .. .. 488,714+|
00003720 28 75 70 2d 37 31 34 29 2f 33 32 2c 32 34 0d 15 |(up-714)/32,24..|
00003730 4a 20 c8 8f 20 c8 90 20 36 32 34 2c 37 31 34 2b |J .. .. 624,714+|
00003740 28 75 70 2d 37 31 34 29 2f 33 32 2c 32 34 0d 15 |(up-714)/32,24..|
00003750 54 05 ed 0d 15 5e 0c fb 31 2c 30 2c 30 2c 30 0d |T....^..1,0,0,0.|
00003760 15 68 05 e1 0d 15 72 0c dd f2 6c 6f 63 61 74 65 |.h....r...locate|
00003770 0d 15 7c 0e 2a 50 4f 49 4e 54 45 52 20 31 0d 15 |..|.*POINTER 1..|
00003780 86 2d c8 99 22 57 69 6d 70 5f 53 70 72 69 74 65 |.-.."Wimp_Sprite|
00003790 4f 70 22 2c 33 36 2c 2c 22 75 5f 72 5f 68 65 72 |Op",36,,"u_r_her|
000037a0 65 22 2c 25 31 31 30 30 30 30 31 0d 15 90 12 c8 |e",%1100001.....|
000037b0 97 20 fb 20 31 2c 30 2c 30 2c 32 35 35 0d 15 9a |. . 1,0,0,255...|
000037c0 12 c8 97 20 fb 20 32 2c 30 2c 30 2c 31 32 38 0d |... . 2,0,0,128.|
000037d0 15 a4 12 c8 97 20 fb 20 33 2c 32 35 35 2c 30 2c |..... . 3,255,0,|
000037e0 30 0d 15 ae 05 e1 0d 15 b8 0c dd f2 6c 65 76 65 |0...........leve|
000037f0 6c 35 0d 15 c2 05 db 0d 15 cc 05 f5 0d 15 d6 0b |l5..............|
00003800 f2 6c 6f 63 61 74 65 0d 15 ea 21 2a 53 63 72 65 |.locate...!*Scre|
00003810 65 6e 4c 6f 61 64 20 3c 4f 62 65 79 24 44 69 72 |enLoad <Obey$Dir|
00003820 3e 2e 4c 65 76 65 6c 35 0d 15 f4 0c f2 50 61 6c |>.Level5.....Pal|
00003830 65 74 74 65 0d 15 f5 15 c8 97 20 c8 93 20 33 32 |ette...... .. 32|
00003840 30 2c 34 30 30 2c 30 2c 30 0d 15 fe 30 c8 99 22 |0,400,0,0...0.."|
00003850 57 69 6d 70 5f 53 70 72 69 74 65 4f 70 22 2c 33 |Wimp_SpriteOp",3|
00003860 36 2c 2c 22 67 61 6d 65 70 6f 69 6e 74 65 72 22 |6,,"gamepointer"|
00003870 2c 25 31 31 30 30 30 30 31 0d 16 08 16 c8 97 20 |,%1100001...... |
00003880 fb 20 32 2c 32 35 35 2c 32 35 35 2c 32 35 35 0d |. 2,255,255,255.|
00003890 16 12 32 73 61 74 58 25 3d 31 30 30 30 3a 73 61 |..2satX%=1000:sa|
000038a0 74 59 25 3d 32 32 30 3a 73 61 74 41 25 3d 30 3a |tY%=220:satA%=0:|
000038b0 73 61 74 44 58 25 3d 30 3a 73 61 74 44 59 25 3d |satDX%=0:satDY%=|
000038c0 30 0d 16 1c 38 61 25 3d 30 3a 62 25 3d 31 30 3a |0...8a%=0:b%=10:|
000038d0 63 25 3d 2d 31 30 3a 64 25 3d 30 3a 65 25 3d 30 |c%=-10:d%=0:e%=0|
000038e0 3a 69 25 3d 30 3a 6a 25 3d 30 3a 6b 25 3d 30 3a |:i%=0:j%=0:k%=0:|
000038f0 6c 25 3d 36 3a 74 25 3d 30 0d 16 26 0d e3 20 6d |l%=6:t%=0..&.. m|
00003900 3d 30 20 b8 20 39 0d 16 30 0d e3 20 63 3d 30 20 |=0 . 9..0.. c=0 |
00003910 b8 20 35 0d 16 3a 12 73 70 69 6b 65 73 25 28 6d |. 5..:.spikes%(m|
00003920 2c 63 29 3d 30 0d 16 44 07 ed 3a ed 0d 16 4e 0d |,c)=0..D..:...N.|
00003930 e3 20 6d 3d 30 20 b8 20 35 0d 16 58 1f 73 74 61 |. m=0 . 5..X.sta|
00003940 72 73 25 28 30 2c 6d 29 3d 31 31 33 30 2b 6d 2a |rs%(0,m)=1130+m*|
00003950 31 36 2b b3 28 31 36 29 0d 16 62 1a 73 74 61 72 |16+.(16)..b.star|
00003960 73 25 28 31 2c 6d 29 3d 36 35 30 2b b3 28 31 30 |s%(1,m)=650+.(10|
00003970 30 29 0d 16 6c 11 73 74 61 72 73 25 28 32 2c 6d |0)..l.stars%(2,m|
00003980 29 3d 30 0d 16 76 18 73 74 61 72 73 25 28 33 2c |)=0..v.stars%(3,|
00003990 6d 29 3d b3 28 33 32 29 2d 31 36 0d 16 80 11 73 |m)=.(32)-16....s|
000039a0 74 61 72 73 25 28 34 2c 6d 29 3d 30 0d 16 8a 05 |tars%(4,m)=0....|
000039b0 ed 0d 16 94 0d c8 97 58 25 2c 59 25 2c 5a 0d 16 |.......X%,Y%,Z..|
000039c0 9e 17 c8 97 20 c8 93 20 58 25 2d 34 2c 59 25 2d |.... .. X%-4,Y%-|
000039d0 34 2c 38 2c 38 0d 16 a8 1d f5 3a c8 97 58 2c 59 |4,8,8.....:..X,Y|
000039e0 2c 5a 3a fd 20 58 3c 3e 58 25 20 84 20 59 3c 3e |,Z:. X<>X% . Y<>|
000039f0 59 25 0d 16 b2 05 f5 0d 16 bc 29 e7 20 58 25 3e |Y%........). X%>|
00003a00 32 30 30 20 80 20 59 25 3e 31 36 34 20 80 20 58 |200 . Y%>164 . X|
00003a10 25 3c 34 36 30 20 80 20 59 25 3c 34 33 32 20 8c |%<460 . Y%<432 .|
00003a20 0d 16 c6 1d c8 97 20 c8 93 20 58 25 2d 35 30 2c |...... .. X%-50,|
00003a30 59 25 2d 38 30 2c 31 30 30 2c 31 30 30 0d 16 d0 |Y%-80,100,100...|
00003a40 11 c8 97 20 b8 20 58 25 2c 59 25 2d 74 25 0d 16 |... . X%,Y%-t%..|
00003a50 da 12 e7 20 74 25 3c 31 30 30 20 74 25 2b 3d 31 |... t%<100 t%+=1|
00003a60 0d 16 e4 05 cd 0d 16 ee 20 e7 20 58 25 3c 36 34 |........ . X%<64|
00003a70 30 20 80 20 59 25 3e 35 32 34 20 80 20 59 25 3c |0 . Y%>524 . Y%<|
00003a80 38 35 34 20 8c 0d 16 f8 26 c8 97 20 b8 20 58 25 |854 ....&.. . X%|
00003a90 2b b5 b2 28 73 61 74 41 25 29 2a 38 2c 59 25 2b |+..(satA%)*8,Y%+|
00003aa0 9b b2 28 73 61 74 41 25 29 2a 38 0d 17 02 06 e6 |..(satA%)*8.....|
00003ab0 37 0d 17 0c 16 c8 93 20 c8 90 35 38 34 2c 35 38 |7...... ..584,58|
00003ac0 38 2c 35 38 2c 37 34 0d 17 16 06 e6 30 0d 17 20 |8,58,74.....0.. |
00003ad0 1a c8 93 20 c8 90 35 38 34 2c 36 36 32 2c 35 38 |... ..584,662,58|
00003ae0 2c 59 25 2d 36 38 30 0d 17 2a 05 cd 0d 17 34 06 |,Y%-680..*....4.|
00003af0 e6 37 0d 17 3e 2f ec 20 73 61 74 58 25 2b 28 b5 |.7..>/. satX%+(.|
00003b00 b2 28 73 61 74 41 25 29 2a 33 32 29 2c 73 61 74 |.(satA%)*32),sat|
00003b10 59 25 2b 28 9b b2 28 73 61 74 41 25 29 2a 33 32 |Y%+(..(satA%)*32|
00003b20 29 0d 17 48 37 ec 20 73 61 74 58 25 2b 28 b5 b2 |)..H7. satX%+(..|
00003b30 28 73 61 74 41 25 2b 31 30 30 29 2a 34 38 29 2c |(satA%+100)*48),|
00003b40 73 61 74 59 25 2b 28 9b b2 28 73 61 74 41 25 2b |satY%+(..(satA%+|
00003b50 31 30 30 29 2a 34 38 29 0d 17 52 09 f2 77 61 69 |100)*48)..R..wai|
00003b60 74 0d 17 5c 39 f0 38 35 2c 73 61 74 58 25 2b 28 |t..\9.85,satX%+(|
00003b70 b5 b2 28 73 61 74 41 25 2b 32 36 30 29 2a 34 30 |..(satA%+260)*40|
00003b80 29 2c 73 61 74 59 25 2b 28 9b b2 28 73 61 74 41 |),satY%+(..(satA|
00003b90 25 2b 32 36 30 29 2a 34 30 29 0d 17 66 0c 73 61 |%+260)*40)..f.sa|
00003ba0 74 41 25 2b 3d 34 0d 17 70 20 e7 20 58 25 3e 39 |tA%+=4..p . X%>9|
00003bb0 30 38 20 80 20 59 25 3e 31 35 30 20 80 20 59 25 |08 . Y%>150 . Y%|
00003bc0 3c 35 32 38 20 8c 0d 17 7a 11 73 61 74 58 25 2b |<528 ...z.satX%+|
00003bd0 3d 73 61 74 44 58 25 0d 17 84 19 e7 20 73 61 74 |=satDX%..... sat|
00003be0 58 25 3c 39 35 34 20 73 61 74 58 25 3d 39 35 34 |X%<954 satX%=954|
00003bf0 0d 17 8e 1b e7 20 73 61 74 58 25 3e 31 32 31 32 |..... satX%>1212|
00003c00 20 73 61 74 58 25 3d 31 32 31 32 0d 17 98 11 73 | satX%=1212....s|
00003c10 61 74 59 25 2b 3d 73 61 74 44 59 25 0d 17 a2 19 |atY%+=satDY%....|
00003c20 e7 20 73 61 74 59 25 3c 32 30 34 20 73 61 74 59 |. satY%<204 satY|
00003c30 25 3d 32 30 34 0d 17 ac 19 e7 20 73 61 74 59 25 |%=204..... satY%|
00003c40 3e 34 37 34 20 73 61 74 59 25 3d 34 37 34 0d 17 |>474 satY%=474..|
00003c50 b6 20 c8 97 20 b8 20 58 25 2d 73 61 74 44 58 25 |. .. . X%-satDX%|
00003c60 2f 32 2c 59 25 2d 73 61 74 44 59 25 2f 32 0d 17 |/2,Y%-satDY%/2..|
00003c70 c0 23 73 61 74 44 58 25 3d 73 61 74 44 58 25 2f |.#satDX%=satDX%/|
00003c80 31 2e 31 2b 28 58 25 2d 73 61 74 58 25 29 2f 34 |1.1+(X%-satX%)/4|
00003c90 38 0d 17 ca 23 73 61 74 44 59 25 3d 73 61 74 44 |8...#satDY%=satD|
00003ca0 59 25 2f 31 2e 31 2b 28 59 25 2d 73 61 74 59 25 |Y%/1.1+(Y%-satY%|
00003cb0 29 2f 34 38 0d 17 d4 05 cd 0d 17 de 28 e7 20 64 |)/48........(. d|
00003cc0 25 3d 30 20 80 20 58 25 3e 39 30 30 20 80 20 58 |%=0 . X%>900 . X|
00003cd0 25 3c 31 31 30 30 20 80 20 59 25 3e 39 31 30 20 |%<1100 . Y%>910 |
00003ce0 8c 0d 17 e8 08 65 25 3d 31 0d 17 f2 0b e6 b3 28 |.....e%=1......(|
00003cf0 38 29 2b 37 0d 17 fc 14 c8 93 20 39 30 30 2c 39 |8)+7...... 900,9|
00003d00 31 38 2c 32 30 2c 38 30 0d 18 06 0b e6 b3 28 38 |18,20,80......(8|
00003d10 29 2b 37 0d 18 10 14 c8 93 20 39 30 34 2c 39 32 |)+7...... 904,92|
00003d20 36 2c 31 32 2c 36 34 0d 18 1a 11 c8 97 20 b8 20 |6,12,64...... . |
00003d30 58 25 2d 31 36 2c 59 25 0d 18 24 19 e7 20 58 25 |X%-16,Y%..$.. X%|
00003d40 3c 39 32 34 20 8c 20 cd 3a fd 31 3a e5 8d 54 62 |<924 . .:.1:..Tb|
00003d50 41 0d 18 2e 05 cd 0d 18 38 37 e7 20 65 25 3d 31 |A.......87. e%=1|
00003d60 20 80 20 58 25 3e 31 31 30 30 20 8c 20 64 25 3d | . X%>1100 . d%=|
00003d70 31 3a e6 37 3a c8 93 20 c8 90 20 39 30 30 2c 39 |1:.7:.. .. 900,9|
00003d80 31 38 2c 32 30 2c 38 30 3a 65 25 3d 30 0d 18 42 |18,20,80:e%=0..B|
00003d90 27 e7 20 64 25 3d 31 20 80 20 58 25 3e 36 30 30 |'. d%=1 . X%>600|
00003da0 20 80 20 58 25 3c 38 30 30 20 80 20 59 25 3e 39 | . X%<800 . Y%>9|
00003db0 31 30 20 8c 0d 18 4c 08 65 25 3d 32 0d 18 56 0b |10 ...L.e%=2..V.|
00003dc0 e6 b3 28 38 29 2b 37 0d 18 60 14 c8 93 20 36 30 |..(8)+7..`... 60|
00003dd0 30 2c 39 31 38 2c 32 30 2c 38 30 0d 18 6a 0b e6 |0,918,20,80..j..|
00003de0 b3 28 38 29 2b 37 0d 18 74 14 c8 93 20 36 30 34 |.(8)+7..t... 604|
00003df0 2c 39 32 36 2c 31 32 2c 36 34 0d 18 7e 11 c8 97 |,926,12,64..~...|
00003e00 20 b8 20 58 25 2d 32 30 2c 59 25 0d 18 88 19 e7 | . X%-20,Y%.....|
00003e10 20 58 25 3c 36 32 34 20 8c 20 cd 3a fd 31 3a e5 | X%<624 . .:.1:.|
00003e20 8d 54 58 41 0d 18 92 05 cd 0d 18 9c 36 e7 20 65 |.TXA........6. e|
00003e30 25 3d 32 20 80 20 58 25 3e 38 30 30 20 8c 20 64 |%=2 . X%>800 . d|
00003e40 25 3d 32 3a e6 37 3a c8 93 20 c8 90 20 36 30 30 |%=2:.7:.. .. 600|
00003e50 2c 39 31 38 2c 32 30 2c 38 30 3a 65 25 3d 30 0d |,918,20,80:e%=0.|
00003e60 18 a6 25 e7 20 64 25 3d 32 20 80 20 58 25 3c 35 |..%. d%=2 . X%<5|
00003e70 30 30 20 80 20 59 25 3e 39 31 30 20 84 20 65 25 |00 . Y%>910 . e%|
00003e80 3d 33 20 8c 0d 18 b0 08 65 25 3d 33 0d 18 ba 0b |=3 .....e%=3....|
00003e90 e6 b3 28 38 29 2b 37 0d 18 c4 14 c8 93 20 36 30 |..(8)+7...... 60|
00003ea0 30 2c 39 31 38 2c 32 30 2c 38 30 0d 18 ce 0b e6 |0,918,20,80.....|
00003eb0 b3 28 38 29 2b 37 0d 18 d8 14 c8 93 20 36 30 34 |.(8)+7...... 604|
00003ec0 2c 39 32 36 2c 31 32 2c 36 34 0d 18 e2 11 c8 97 |,926,12,64......|
00003ed0 20 b8 20 58 25 2b 32 34 2c 59 25 0d 18 ec 19 e7 | . X%+24,Y%.....|
00003ee0 20 58 25 3e 35 39 36 20 8c 20 cd 3a fd 31 3a e5 | X%>596 . .:.1:.|
00003ef0 8d 54 4e 41 0d 18 f6 05 cd 0d 19 00 36 e7 20 65 |.TNA........6. e|
00003f00 25 3d 33 20 80 20 58 25 3c 33 30 30 20 8c 20 64 |%=3 . X%<300 . d|
00003f10 25 3d 33 3a e6 37 3a c8 93 20 c8 90 20 36 30 30 |%=3:.7:.. .. 600|
00003f20 2c 39 31 38 2c 32 30 2c 38 30 3a 65 25 3d 30 0d |,918,20,80:e%=0.|
00003f30 19 0a 07 e6 31 31 0d 19 14 2f ec 20 73 61 74 58 |....11.../. satX|
00003f40 25 2b 28 b5 b2 28 73 61 74 41 25 29 2a 33 32 29 |%+(..(satA%)*32)|
00003f50 2c 73 61 74 59 25 2b 28 9b b2 28 73 61 74 41 25 |,satY%+(..(satA%|
00003f60 29 2a 33 32 29 0d 19 1e 37 ec 20 73 61 74 58 25 |)*32)...7. satX%|
00003f70 2b 28 b5 b2 28 73 61 74 41 25 2b 31 30 30 29 2a |+(..(satA%+100)*|
00003f80 34 38 29 2c 73 61 74 59 25 2b 28 9b b2 28 73 61 |48),satY%+(..(sa|
00003f90 74 41 25 2b 31 30 30 29 2a 34 38 29 0d 19 28 39 |tA%+100)*48)..(9|
00003fa0 f0 38 35 2c 73 61 74 58 25 2b 28 b5 b2 28 73 61 |.85,satX%+(..(sa|
00003fb0 74 41 25 2b 32 36 30 29 2a 34 30 29 2c 73 61 74 |tA%+260)*40),sat|
00003fc0 59 25 2b 28 9b b2 28 73 61 74 41 25 2b 32 36 30 |Y%+(..(satA%+260|
00003fd0 29 2a 34 30 29 0d 19 32 06 e6 37 0d 19 3c 06 c8 |)*40)..2..7..<..|
00003fe0 96 0d 19 46 18 c8 93 20 c8 90 36 34 34 2c 31 35 |...F... ..644,15|
00003ff0 34 2c 31 39 36 2c 33 36 36 0d 19 50 0a 62 25 2b |4,196,366..P.b%+|
00004000 3d 63 25 0d 19 5a 0a 61 25 2b 3d 62 25 0d 19 64 |=c%..Z.a%+=b%..d|
00004010 0d 63 25 2d 3d b4 28 62 25 29 0d 19 6e 06 e6 30 |.c%-=.(b%)..n..0|
00004020 0d 19 78 17 ec 20 37 33 30 2c 35 32 30 3a ec 20 |..x.. 730,520:. |
00004030 37 37 30 2c 35 32 30 0d 19 82 38 f0 26 37 35 2c |770,520...8.&75,|
00004040 37 37 30 2b 28 b5 b2 28 61 25 2f 33 36 2d 31 36 |770+(..(a%/36-16|
00004050 38 29 2a 33 35 30 29 2c 35 32 30 2b 28 9b b2 28 |8)*350),520+(..(|
00004060 61 25 2f 33 36 2d 31 36 38 29 2a 33 33 30 29 0d |a%/36-168)*330).|
00004070 19 8c 07 e6 31 34 0d 19 96 3c c8 8f 20 c8 90 20 |....14...<.. .. |
00004080 37 35 30 2b 28 b5 b2 28 61 25 2f 33 36 2d 31 36 |750+(..(a%/36-16|
00004090 38 29 2a 33 35 30 29 2c 35 32 30 2b 28 9b b2 28 |8)*350),520+(..(|
000040a0 61 25 2f 33 36 2d 31 36 38 29 2a 33 33 30 29 2c |a%/36-168)*330),|
000040b0 33 32 0d 19 a0 0f 6a 25 3d 28 6a 25 2b 31 29 83 |32....j%=(j%+1).|
000040c0 36 0d 19 aa 17 e7 20 6a 25 3d 35 20 6b 25 3d 28 |6..... j%=5 k%=(|
000040d0 6b 25 2b 31 29 83 31 30 0d 19 b4 3c e7 20 58 25 |k%+1).10...<. X%|
000040e0 3e 36 34 30 20 80 20 59 25 3c 38 34 30 20 80 20 |>640 . Y%<840 . |
000040f0 58 25 3c 31 30 33 32 20 80 20 59 25 3e 35 39 30 |X%<1032 . Y%>590|
00004100 20 80 20 73 70 69 6b 65 73 25 28 6b 25 2c 30 29 | . spikes%(k%,0)|
00004110 3d 30 20 8c 0d 19 be 13 73 70 69 6b 65 73 25 28 |=0 .....spikes%(|
00004120 6b 25 2c 30 29 3d 31 0d 19 c8 15 73 70 69 6b 65 |k%,0)=1....spike|
00004130 73 25 28 6b 25 2c 31 29 3d 38 35 30 0d 19 d2 15 |s%(k%,1)=850....|
00004140 73 70 69 6b 65 73 25 28 6b 25 2c 32 29 3d 38 34 |spikes%(k%,2)=84|
00004150 30 0d 19 dc 1c 73 70 69 6b 65 73 25 28 6b 25 2c |0....spikes%(k%,|
00004160 33 29 3d 28 58 25 2d 38 35 30 29 2f 35 0d 19 e6 |3)=(X%-850)/5...|
00004170 1c 73 70 69 6b 65 73 25 28 6b 25 2c 34 29 3d 28 |.spikes%(k%,4)=(|
00004180 59 25 2d 38 34 30 29 2f 35 0d 19 f0 05 cd 0d 19 |Y%-840)/5.......|
00004190 fa 0e e3 20 69 25 3d 30 20 b8 20 39 0d 1a 04 17 |... i%=0 . 9....|
000041a0 e7 20 73 70 69 6b 65 73 25 28 69 25 2c 30 29 3d |. spikes%(i%,0)=|
000041b0 31 20 8c 0d 1a 0e 06 e6 37 0d 1a 18 27 c8 8f 20 |1 ......7...'.. |
000041c0 c8 90 20 73 70 69 6b 65 73 25 28 69 25 2c 31 29 |.. spikes%(i%,1)|
000041d0 2c 73 70 69 6b 65 73 25 28 69 25 2c 32 29 2c 38 |,spikes%(i%,2),8|
000041e0 0d 1a 22 69 e7 20 73 70 69 6b 65 73 25 28 69 25 |.."i. spikes%(i%|
000041f0 2c 31 29 2b 73 70 69 6b 65 73 25 28 69 25 2c 33 |,1)+spikes%(i%,3|
00004200 29 3c 36 35 32 20 84 20 73 70 69 6b 65 73 25 28 |)<652 . spikes%(|
00004210 69 25 2c 31 29 2b 73 70 69 6b 65 73 25 28 69 25 |i%,1)+spikes%(i%|
00004220 2c 33 29 3e 31 30 31 36 20 73 70 69 6b 65 73 25 |,3)>1016 spikes%|
00004230 28 69 25 2c 33 29 3d 2d 73 70 69 6b 65 73 25 28 |(i%,3)=-spikes%(|
00004240 69 25 2c 33 29 2f 34 2a 33 0d 1a 2c 68 e7 20 73 |i%,3)/4*3..,h. s|
00004250 70 69 6b 65 73 25 28 69 25 2c 32 29 2b 73 70 69 |pikes%(i%,2)+spi|
00004260 6b 65 73 25 28 69 25 2c 34 29 3c 35 39 36 20 84 |kes%(i%,4)<596 .|
00004270 20 73 70 69 6b 65 73 25 28 69 25 2c 32 29 2b 73 | spikes%(i%,2)+s|
00004280 70 69 6b 65 73 25 28 69 25 2c 34 29 3e 38 34 30 |pikes%(i%,4)>840|
00004290 20 73 70 69 6b 65 73 25 28 69 25 2c 34 29 3d 2d | spikes%(i%,4)=-|
000042a0 73 70 69 6b 65 73 25 28 69 25 2c 34 29 2f 34 2a |spikes%(i%,4)/4*|
000042b0 33 0d 1a 36 20 73 70 69 6b 65 73 25 28 69 25 2c |3..6 spikes%(i%,|
000042c0 31 29 2b 3d 73 70 69 6b 65 73 25 28 69 25 2c 33 |1)+=spikes%(i%,3|
000042d0 29 0d 1a 40 20 73 70 69 6b 65 73 25 28 69 25 2c |)..@ spikes%(i%,|
000042e0 32 29 2b 3d 73 70 69 6b 65 73 25 28 69 25 2c 34 |2)+=spikes%(i%,4|
000042f0 29 0d 1a 4a 07 e6 31 33 0d 1a 54 27 c8 8f 20 c8 |)..J..13..T'.. .|
00004300 90 20 73 70 69 6b 65 73 25 28 69 25 2c 31 29 2c |. spikes%(i%,1),|
00004310 73 70 69 6b 65 73 25 28 69 25 2c 32 29 2c 38 0d |spikes%(i%,2),8.|
00004320 1a 5e 84 e7 20 73 70 69 6b 65 73 25 28 69 25 2c |.^.. spikes%(i%,|
00004330 33 29 3e 2d 36 20 80 20 73 70 69 6b 65 73 25 28 |3)>-6 . spikes%(|
00004340 69 25 2c 33 29 3c 36 20 80 20 73 70 69 6b 65 73 |i%,3)<6 . spikes|
00004350 25 28 69 25 2c 34 29 3e 2d 36 20 80 20 73 70 69 |%(i%,4)>-6 . spi|
00004360 6b 65 73 25 28 69 25 2c 34 29 3c 36 20 e6 37 3a |kes%(i%,4)<6 .7:|
00004370 c8 8f 20 c8 90 20 73 70 69 6b 65 73 25 28 69 25 |.. .. spikes%(i%|
00004380 2c 31 29 2c 73 70 69 6b 65 73 25 28 69 25 2c 32 |,1),spikes%(i%,2|
00004390 29 2c 38 3a 73 70 69 6b 65 73 25 28 69 25 2c 30 |),8:spikes%(i%,0|
000043a0 29 3d 30 0d 1a 68 05 cd 0d 1a 72 05 ed 0d 1a 7c |)=0..h....r....||
000043b0 0e e3 20 66 25 3d 30 20 b8 20 35 0d 1a 86 1b e7 |.. f%=0 . 5.....|
000043c0 20 73 74 61 72 73 25 28 34 2c 66 25 29 3d 31 20 | stars%(4,f%)=1 |
000043d0 e5 20 8d 64 74 5a 0d 1a 90 06 e6 37 0d 1a 9a 26 |. .dtZ.....7...&|
000043e0 c8 8f 20 c8 90 20 73 74 61 72 73 25 28 30 2c 66 |.. .. stars%(0,f|
000043f0 25 29 2c 73 74 61 72 73 25 28 31 2c 66 25 29 2c |%),stars%(1,f%),|
00004400 31 36 0d 1a a4 33 e7 20 73 74 61 72 73 25 28 32 |16...3. stars%(2|
00004410 2c 66 25 29 3c 32 30 20 73 74 61 72 73 25 28 31 |,f%)<20 stars%(1|
00004420 2c 66 25 29 2b 3d b4 28 73 74 61 72 73 25 28 33 |,f%)+=.(stars%(3|
00004430 2c 66 25 29 29 0d 1a ae 2a 73 74 61 72 73 25 28 |,f%))...*stars%(|
00004440 33 2c 66 25 29 3d 28 28 73 74 61 72 73 25 28 33 |3,f%)=((stars%(3|
00004450 2c 66 25 29 2b 31 37 29 83 33 33 29 2d 31 36 0d |,f%)+17).33)-16.|
00004460 1a b8 79 e7 20 58 25 2b 35 30 3e 73 74 61 72 73 |..y. X%+50>stars|
00004470 25 28 30 2c 66 25 29 20 80 20 58 25 2d 35 30 3c |%(0,f%) . X%-50<|
00004480 73 74 61 72 73 25 28 30 2c 66 25 29 20 80 20 59 |stars%(0,f%) . Y|
00004490 25 2b 35 30 3e 73 74 61 72 73 25 28 31 2c 66 25 |%+50>stars%(1,f%|
000044a0 29 20 80 20 59 25 2d 35 30 3c 73 74 61 72 73 25 |) . Y%-50<stars%|
000044b0 28 31 2c 66 25 29 20 80 20 73 74 61 72 73 25 28 |(1,f%) . stars%(|
000044c0 32 2c 66 25 29 3d 30 20 8c 20 73 74 61 72 73 25 |2,f%)=0 . stars%|
000044d0 28 32 2c 66 25 29 3d 31 0d 1a c2 24 e7 20 73 74 |(2,f%)=1...$. st|
000044e0 61 72 73 25 28 32 2c 66 25 29 3e 30 20 73 74 61 |ars%(2,f%)>0 sta|
000044f0 72 73 25 28 32 2c 66 25 29 2b 3d 31 0d 1a cc 35 |rs%(2,f%)+=1...5|
00004500 e7 20 73 74 61 72 73 25 28 32 2c 66 25 29 3d 30 |. stars%(2,f%)=0|
00004510 20 e6 39 20 8b 20 e7 20 73 74 61 72 73 25 28 32 | .9 . . stars%(2|
00004520 2c 66 25 29 3c 31 36 20 e6 31 34 20 8b 20 e6 31 |,f%)<16 .14 . .1|
00004530 31 0d 1a d6 26 c8 8f 20 c8 90 20 73 74 61 72 73 |1...&.. .. stars|
00004540 25 28 30 2c 66 25 29 2c 73 74 61 72 73 25 28 31 |%(0,f%),stars%(1|
00004550 2c 66 25 29 2c 31 36 0d 1a e0 4b e7 20 73 74 61 |,f%),16...K. sta|
00004560 72 73 25 28 32 2c 66 25 29 3e 32 30 20 80 20 73 |rs%(2,f%)>20 . s|
00004570 74 61 72 73 25 28 32 2c 66 25 29 3c 32 32 20 c8 |tars%(2,f%)<22 .|
00004580 8f 20 c8 90 20 73 74 61 72 73 25 28 30 2c 66 25 |. .. stars%(0,f%|
00004590 29 2c 73 74 61 72 73 25 28 31 2c 66 25 29 2c 31 |),stars%(1,f%),1|
000045a0 30 30 0d 1a ea 51 e7 20 73 74 61 72 73 25 28 32 |00...Q. stars%(2|
000045b0 2c 66 25 29 3d 32 32 20 e6 37 3a c8 8f 20 c8 90 |,f%)=22 .7:.. ..|
000045c0 20 73 74 61 72 73 25 28 30 2c 66 25 29 2c 73 74 | stars%(0,f%),st|
000045d0 61 72 73 25 28 31 2c 66 25 29 2c 31 30 30 3a 73 |ars%(1,f%),100:s|
000045e0 74 61 72 73 25 28 34 2c 66 25 29 3d 31 3a 6c 25 |tars%(4,f%)=1:l%|
000045f0 2d 3d 31 0d 1a f4 05 ed 0d 1a fe 27 e7 20 6c 25 |-=1........'. l%|
00004600 3d 30 20 e6 37 3a c8 93 20 c8 90 20 31 31 36 34 |=0 .7:.. .. 1164|
00004610 2c 38 34 38 2c 39 38 2c 36 30 3a 6c 25 3d 31 0d |,848,98,60:l%=1.|
00004620 1b 08 0a f2 6d 6f 75 73 65 0d 1b 12 2e fd 20 b0 |....mouse..... .|
00004630 58 25 2b 34 2c 59 25 2d 34 29 3c 3e 37 20 84 20 |X%+4,Y%-4)<>7 . |
00004640 58 25 3c 36 30 20 80 20 59 25 3c 39 34 34 20 80 |X%<60 . Y%<944 .|
00004650 20 59 25 3e 38 38 30 0d 1b 1c 30 e7 20 58 25 3c | Y%>880...0. X%<|
00004660 36 30 20 80 20 59 25 3c 39 34 34 20 80 20 59 25 |60 . Y%<944 . Y%|
00004670 3e 38 38 30 20 fd 31 20 8b 20 f2 65 78 70 6c 6f |>880 .1 . .explo|
00004680 73 69 6f 6e 3a fd 30 0d 1b 26 19 e3 20 61 63 72 |sion:.0..&.. acr|
00004690 6f 73 73 3d 58 25 20 b8 20 2d 32 30 20 88 2d 31 |oss=X% . -20 .-1|
000046a0 0d 1b 30 27 fb 31 2c b3 28 31 32 38 29 2b 31 32 |..0'.1,.(128)+12|
000046b0 38 2c b3 28 31 32 38 29 2b 31 32 38 2c b3 28 31 |8,.(128)+128,.(1|
000046c0 32 38 29 2b 31 32 38 0d 1b 3a 17 c8 97 20 c8 93 |28)+128..:... ..|
000046d0 20 61 63 72 6f 73 73 2c 59 25 2c 30 2c 30 0d 1b | across,Y%,0,0..|
000046e0 44 14 e3 20 70 6f 72 73 3d 30 20 b8 20 31 30 30 |D.. pors=0 . 100|
000046f0 3a ed 0d 1b 4e 05 ed 0d 1b 58 05 db 0d 1b 62 19 |:...N....X....b.|
00004700 c8 97 20 c8 93 20 32 30 30 2c 32 30 30 2c 38 38 |.. .. 200,200,88|
00004710 30 2c 37 32 34 0d 1b 6c 18 f1 8a 33 35 2c 31 35 |0,724..l...35,15|
00004720 29 22 57 65 6c 6c 20 44 6f 6e 65 2e 22 0d 1b 76 |)"Well Done."..v|
00004730 2e f1 8a 32 34 2c 31 37 29 22 59 6f 75 20 68 61 |...24,17)"You ha|
00004740 76 65 20 43 6f 6d 70 6c 65 74 65 64 20 61 6c 6c |ve Completed all|
00004750 20 35 20 6c 65 76 65 6c 73 2e 22 0d 1b 80 28 f1 | 5 levels."...(.|
00004760 8a 32 37 2c 31 39 29 22 44 6f 20 79 6f 75 20 77 |.27,19)"Do you w|
00004770 61 6e 74 20 74 6f 20 70 6c 61 79 20 61 67 61 69 |ant to play agai|
00004780 6e 3f 22 0d 1b 8a 17 c8 99 22 4f 53 5f 43 6f 6e |n?"......"OS_Con|
00004790 66 69 72 6d 22 20 b8 20 6e 25 0d 1b 94 05 e1 0d |firm" . n%......|
000047a0 1b 9e 05 3a 0d 1b a8 0d dd f2 50 61 6c 65 74 74 |...:......Palett|
000047b0 65 0d 1b b2 19 ef 20 31 39 2c 30 2c 31 36 2c 32 |e..... 19,0,16,2|
000047c0 34 30 2c 32 34 30 2c 32 34 30 0d 1b bc 15 ef 20 |40,240,240..... |
000047d0 31 39 2c 31 2c 31 36 2c 31 32 38 2c 30 2c 30 0d |19,1,16,128,0,0.|
000047e0 1b c6 13 ef 20 31 39 2c 32 2c 31 36 2c 30 2c 30 |.... 19,2,16,0,0|
000047f0 2c 30 0d 1b d0 13 ef 20 31 39 2c 33 2c 31 36 2c |,0..... 19,3,16,|
00004800 30 2c 30 2c 30 0d 1b da 13 ef 20 31 39 2c 34 2c |0,0,0..... 19,4,|
00004810 31 36 2c 30 2c 30 2c 30 0d 1b e4 13 ef 20 31 39 |16,0,0,0..... 19|
00004820 2c 35 2c 31 36 2c 30 2c 30 2c 30 0d 1b ee 13 ef |,5,16,0,0,0.....|
00004830 20 31 39 2c 36 2c 31 36 2c 30 2c 30 2c 30 0d 1b | 19,6,16,0,0,0..|
00004840 f8 13 ef 20 31 39 2c 37 2c 31 36 2c 30 2c 30 2c |... 19,7,16,0,0,|
00004850 30 0d 1c 02 16 ef 20 31 39 2c 38 2c 31 36 2c 30 |0..... 19,8,16,0|
00004860 2c 36 34 2c 31 34 34 0d 1c 0c 17 ef 20 31 39 2c |,64,144..... 19,|
00004870 39 2c 31 36 2c 32 32 34 2c 32 32 34 2c 30 0d 1c |9,16,224,224,0..|
00004880 16 16 ef 20 31 39 2c 31 30 2c 31 36 2c 30 2c 32 |... 19,10,16,0,2|
00004890 34 30 2c 30 0d 1c 20 16 ef 20 31 39 2c 31 31 2c |40,0.. .. 19,11,|
000048a0 31 36 2c 32 30 38 2c 30 2c 30 0d 1c 2a 1a ef 20 |16,208,0,0..*.. |
000048b0 31 39 2c 31 32 2c 31 36 2c 32 32 34 2c 32 32 34 |19,12,16,224,224|
000048c0 2c 31 37 36 0d 1c 34 19 ef 20 31 39 2c 31 33 2c |,176..4.. 19,13,|
000048d0 31 36 2c 32 32 34 2c 39 36 2c 32 30 38 0d 1c 3e |16,224,96,208..>|
000048e0 18 ef 20 31 39 2c 31 34 2c 31 36 2c 32 34 30 2c |.. 19,14,16,240,|
000048f0 31 32 38 2c 30 0d 1c 48 18 ef 20 31 39 2c 31 35 |128,0..H.. 19,15|
00004900 2c 31 36 2c 30 2c 31 37 36 2c 32 34 30 0d 1c 52 |,16,0,176,240..R|
00004910 0e 2a 50 4f 49 4e 54 45 52 20 31 0d 1c 5c 05 e1 |.*POINTER 1..\..|
00004920 0d 1c 66 05 3a 0d 1c 70 0a dd f2 77 61 69 74 0d |..f.:..p...wait.|
00004930 1c 7a 06 c8 96 0d 1c 84 06 c8 96 0d 1c 8e 06 c8 |.z..............|
00004940 96 0d 1c 98 06 c8 96 0d 1c a2 06 c8 96 0d 1c ac |................|
00004950 05 e1 0d ff |....|
00004954 
.