Home » Archimedes archive » Micro User » MU 1992-06.adf » PD » !BeastDemo/GameCode
!BeastDemo/GameCode
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 » Micro User » MU 1992-06.adf » PD |
| Filename: | !BeastDemo/GameCode |
| Read OK: | ✔ |
| File size: | 312C bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
10REM Dungeons of the Beast
20REM BY Graham Green and David Law
30REM (c) The Micro User
40:
50*DIR <Game$Dir>
60p$="LEVELONE"
70ON ERROR IF ERR=17 PROCgameover:GOTO120 ELSE REPORT:PRINT" at line ";ERL:END
80MODE13:OFF
90PROCinit
100PROCsprites
110REPEAT
120PROCset
130PROCtitle
140PROCscreen
150PROCupdate
160PD=0
170REPEAT
180TIME=0
190FORwait=0TO750:NEXT
200PROCcheck
210PROCmove
220IF DEAD GOTO 270
230PROCcheck
240PROCenemy
250PROCmisc
260IFKEY AND DOOR PROCnextlev
270UNTIL DEAD
280LIVES%=LIVES%-1:IFLIVES%=0PROCgameover:GOTO110
290mx%=omx%:my%=omy%:sx%=osx%:sy%=osy%:PROCtitle:PROCscreen:PROCupdate:DEAD=FALSE:KEY=FALSE:GOTO170
300PROCgameover
310UNTIL0
320:
330DEFPROCtitle
340*SCHOOSE title
350PLOT237,440,850
360ENDPROC
370:
380DEFPROCinit
390VOICES4
400FORa=1TO4
410OSCLI"CHANNELVOICE "+STR$(a)+" "+STR$(a)
420NEXT
430*CHANNELVOICE 3 5
440HS%=300
450hilev=1
460stlv=1
470DIM LEV%(18,10)
480VDU28,1,30,38,1
490OSCLI"SCREENLOAD <Game$Dir>.border"
500ENDPROC
510:
520DEFPROCsprites
530*DIR <Game$Dir>.Chars
540ENDPROC
550:
560DEFPROCset
570S%=0
580DEAD=FALSE
590L%=stlv
600KEY=FALSE
610DOOR=FALSE
620LIVES%=3:tm%=6030-(L%*30):dp=FALSE
630ENDPROC
640:
650DEFPROCscreen
660CLS
670PROCtitle
680RESTORE (2600+(L%-1)*110)
690FORY=0TO9
700FORX=0TO17
710READLEV%(X,Y)
720NEXT:NEXT
730READomx%,omy%,osx%,osy%
740mx%=omx%:my%=omy%:sx%=osx%:sy%=osy%
750FORY=0TO9
760FORX=0TO17
770PROCplace(LEV%(X,Y),X,Y)
780NEXT:NEXT
790PROCplace(17,mx%,my%)
800PROCplace(7,sx%,sy%)
810ENDPROC
820:
830DEFPROCcheck
840IFLEV%(mx%,my%)=9 S%=S%+15:PROCfont(STR$(S%),9,28):KEY=TRUE:LEV%(mx%,my%)=0:SOUND2,-10,2,8
850IFLEV%(mx%,my%)=10 AND NOT KEY PROCdie
860IFLEV%(mx%,my%)=10 AND KEY DOOR=TRUE
870IFmx%=sx%ANDmy%=sy%PROCdie
880IF KEY AND DOOR ENDPROC
890IF LEV%(mx%,my%)=5 OR LEV%(mx%,my%)=4 PROCdie
900IF LEV%(mx%,my%)=3 PROCcollect
910IF LEV%(mx%,my%)=12 SOUND2,-15,-10,20:LEV%(mx%,my%)=4
920IF LEV%(mx%,my%)=13 SOUND2,-15,-10,20:LEV%(mx%,my%)=3
930IF LEV%(mx%,my%)=14 SOUND2,-15,-10,20:LEV%(mx%,my%)=1
940IF LEV%(mx%,my%)=15 SOUND2,-15,-10,20:LEV%(mx%,my%)=9
950IF LEV%(mx%,my%)=16 SOUND2,-15,-10,20:LEV%(mx%,my%)=10
960ENDPROC
970:
980DEFPROCmove
990IF mx%=0 GOTO 1020
1000IF INKEY-98 AND LEV%(mx%-1,my%)<>1 AND LEV%(mx%-1,my%)<>2 AND LEV%(mx%-1,my%)<>6 PROCplace(0,mx%,my%):mx%=mx%-1:PROCplace(18,mx%,my%):ENDPROC
1010IF INKEY-98 AND LEV%(mx%-1,my%)=6 PROCpush(-1,0)
1020IF mx%=17 GOTO 1050
1030IF INKEY-67 AND LEV%(mx%+1,my%)<>1 AND LEV%(mx%+1,my%)<>2 AND LEV%(mx%+1,my%)<>6 PROCplace(0,mx%,my%):mx%=mx%+1:PROCplace(20,mx%,my%):ENDPROC
1040IF INKEY-67 AND LEV%(mx%+1,my%)=6 PROCpush(1,0)
1050IF my%=0 GOTO 1080
1060IF INKEY-88 AND LEV%(mx%,my%-1)<>1 AND LEV%(mx%,my%-1)<>2 AND LEV%(mx%,my%-1)<>6 PROCplace(0,mx%,my%):my%=my%-1:PROCplace(19,mx%,my%):ENDPROC
1070IF INKEY-88 AND LEV%(mx%,my%-1)=6 PROCpush(0,-1)
1080IF my%=9 GOTO 1110
1090IF INKEY-104 AND LEV%(mx%,my%+1)<>1 AND LEV%(mx%,my%+1)<>2 AND LEV%(mx%,my%+1)<>6 PROCplace(0,mx%,my%):my%=my%+1:PROCplace(17,mx%,my%):ENDPROC
1100IF INKEY-104 AND LEV%(mx%,my%+1)=6 PROCpush(0,1)
1110ENDPROC
1120:
1130DEFPROCenemy
1140IF sy%=0 REPEAT PD=RND(4)-1:UNTIL PD<>0:GOTO1160
1150IF PD=0 AND LEV%(sx%,sy%-1)=0 PROCplace(0,sx%,sy%):sy%=sy%-1:PROCplace(7,sx%,sy%):ENDPROC ELSE IF PD=0 AND LEV%(sx%,sy%-1)<>0 PD=RND(4)-1:ENDPROC
1160IF sx%=17 REPEAT PD=RND(4)-1:UNTIL PD<>1:GOTO1180
1170IF PD=1 AND LEV%(sx%+1,sy%)=0 PROCplace(0,sx%,sy%):sx%=sx%+1:PROCplace(7,sx%,sy%):ENDPROC ELSE IF PD=1 AND LEV%(sx%+1,sy%)<>0 PD=RND(4)-1:ENDPROC
1180IF sy%=9 REPEAT PD=RND(4)-1:UNTIL PD<>2:GOTO1200
1190IF PD=2 AND LEV%(sx%,sy%+1)=0 PROCplace(0,sx%,sy%):sy%=sy%+1:PROCplace(7,sx%,sy%):ENDPROC ELSE IF PD=2 AND LEV%(sx%,sy%+1)<>0 PD=RND(4)-1:ENDPROC
1200IF sx%=0 REPEAT PD=RND(4)-1:UNTIL PD<>3:ENDPROC
1210IF PD=3 AND LEV%(sx%-1,sy%)=0 PROCplace(0,sx%,sy%):sx%=sx%-1:PROCplace(7,sx%,sy%):ENDPROC ELSE IF PD=3 AND LEV%(sx%-1,sy%)<>0 PD=RND(4)-1:ENDPROC
1220ENDPROC
1230DEFPROCplace(t,a,b)
1240IFt=0 OSCLI"SCHOOSE blank"
1250IFt=1 OSCLI"SCHOOSE wall"
1260IFt=2 OSCLI"SCHOOSE girder"
1270IFt=3 OSCLI"SCHOOSE jewel"
1280IFt=4 OSCLI"SCHOOSE skull"
1290IFt=5 OSCLI"SCHOOSE poison"
1300IFt=6 OSCLI"SCHOOSE rock"
1310IFt=7 OSCLI"SCHOOSE beast"
1320IFt=9 OSCLI"SCHOOSE key"
1330IFt=10 OSCLI"SCHOOSE door"
1340IFt=11 OSCLI"SCHOOSE dead"
1350IFt>11 AND t<17 OSCLI"SCHOOSE special"
1360IFt=17 OSCLI"SCHOOSE down"
1370IFt=18 OSCLI"SCHOOSE left"
1380IFt=19 OSCLI"SCHOOSE up"
1390IFt=20 OSCLI"SCHOOSE right"
1400pox=64+(64*a):poy=736-(b*64)
1410PLOT237,pox,poy
1420ENDPROC
1430:
1440DEFPROCupdate
1450PROCfont("score :"+STR$(S%),2,28)
1460PROCfont("level :"+STR$(L%),15,28)
1470PROCfont("lives :"+STR$(LIVES%),28,28)
1480PROCfont(p$,(40-LEN(p$))/2,27)
1490ENDPROC
1500:
1510DEFPROCdie
1520PROCplace(11,mx%,my%)
1530SOUND4,-15,-200,70:FORa=1TO10000:NEXT:SOUND4,-15,-200,4:FORa=1TO3000:NEXT:SOUND4,-15,-160,30
1540FORc=0TO10000:NEXT
1550DEAD=TRUE:tm%=6030-(L%*30):dp=FALSE
1560ENDPROC
1570:
1580DEFPROCcollect
1590LEV%(mx%,my%)=0
1600S%=S%+10
1610PROCfont(STR$(S%),9,28)
1620SOUND2,-10,2,8
1630ENDPROC
1640:
1650DEFPROCpush(x,y)
1660IFx=-1 AND mx%=1 OR x=1 AND mx%=16 OR y=-1 AND my%=1 OR y=1 AND my%=8 ENDPROC
1670IF LEV%(mx%+x*2,my%+y*2)<>0 ENDPROC
1680IF sx%=mx%+x*2 AND sy%=my%+y*2 ENDPROC
1690LEV%(mx%+x*2,my%+y*2)=6:PROCplace(6,mx%+x*2,my%+y*2):PROCplace(0,mx%,my%):LEV%(mx%+x,my%+y)=0:mx%=mx%+x:my%=my%+y:PROCmakeyermindup
1700ENDPROC
1710:
1720DEFPROCgameover
1730IFL%>hilev hilev=L%-1
1740IFhilev=0hilev=1
1750CLS:PROCplace(7,0,0)
1760PROCplace(7,17,0)
1770SOUND2,-15,-100,30
1780PROCfont("beast",16,5)
1790PRINTTAB(12,6);"=-=-=-=-=-=-="
1800PROCfont("game over",14,13)
1810PROCfont("you scored :"+STR$(S%),12,18)
1820PROCfont("and reached level :"+STR$(L%),8,20)
1830PROCfont("press space to play",8,24)
1840REPEATUNTILINKEY-99
1850*FX21,0
1860CLS
1870PROCfont("start level 1 to 15",0,1)
1880lvl=1
1890PROCfont("1",0,5)
1900REPEAT MOUSE crinkely,bottom,factor
1910IF factor=2 AND lvl>1 lvl-=1:PROCfont(STR$(lvl)+" ",0,5)
1920IF factor=1 AND lvl<15 lvl+=1:PROCfont(STR$(lvl)+" ",0,5)
1930IF factor=4 b=lvl:stlv=b
1940WAIT:WAIT:WAIT
1950UNTIL factor=4
1960IF b>1 PROClevch ELSE p$="LEVELONE"
1970CLS
1980ENDPROC
1990:
2000DEFPROCnextlev
2010IF L%=15 PROCend
2020FORm=100TO255:SOUND2,-15,m,1:WAIT:NEXT
2030PROCenlarge
2040L%=L%+1
2050RESTORE(2700+((L%-1)*110)):READg,h,i,j,p$
2060PROCtitle
2070PROCscreen
2080PROCupdate
2090KEY=FALSE:DOOR=FALSE:tm%=6030-(L%*30):dp=FALSE
2100ENDPROC
2110:
2120DEFPROClevch:RESTORE(2700+((b-1)*110))
2130READg,h,i,j,p$:PROCfont("password :",2,9)
2140pa$=""
2150REPEAT
2160REPEAT but=GET
2170UNTIL but>64 AND but<91 OR but=127 OR but=13
2180IF but<>127 AND but<>13 pa$=pa$+CHR$(but):PROCfont(pa$,13,9)
2190IF but=127 AND LEN(pa$)>0 pa$=LEFT$(pa$,LEN(pa$)-1):PROCfont(pa$+" ",13,9)
2200IF but<>13 UNTIL but=13
2210IF pa$<>p$ stlv=1:p$="LEVELONE" ELSE stlv=b
2220ENDPROC
2230:
2240DEFPROCmisc
2250IF INKEY-106 REPEATUNTILINKEY-90
2260IF INKEY-17 OSCLI"FX210,1"
2270IF INKEY-82 OSCLI"FX210,0"
2280IF INKEY-119 OSCLI"DESKTOP"
2290tm%-=TIME:TIME=0:IF tm%<1000 AND NOT dp OSCLI"SCHOOSE time":PLOT237,100,820:dp=TRUE
2300IF tm%<0 PROCdie
2310ENDPROC
2320:
2330DEFPROCenlarge
2340FORent=1TO10
2350OSCLI"SCHOOSE b"+STR$(ent)
2360enx=640-(ent*32)
2370eny=512-(ent*32)
2380PLOT237,enx,eny
2390FORwt=0TO5:WAIT:NEXT:NEXT
2400ENDPROC
2410:
2420DEFPROCfont(text$,txx,txy)
2430FORcnt=1TOLEN(text$)
2440tx=(txx*32)+((cnt-1)*32)
2450ty=996-(txy*32)
2460tx+=32:ty-=32
2470IF MID$(text$,cnt,1)<>" " OSCLI"SCHOOSE "+MID$(text$,cnt,1):PLOT237,tx,ty ELSE PRINTTAB(txx+cnt-1,txy);SPC1
2480NEXT
2490ENDPROC
2500:
2510DEFPROCmakeyermindup
2520IF x=1 cjs=20
2530IF x=-1 cjs=18
2540IF y=-1 cjs=19
2550IF y=1 cjs=17
2560PROCplace(cjs,mx%,my%)
2570ENDPROC
2580:
2590REM >>>Levels Data<<<
2600DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
2610DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
2620DATA0,0,0,0,0,0,0,2,2,2,0,0,2,0,0,0,0,0
2630DATA0,0,0,0,0,1,1,0,9,0,2,2,0,2,0,0,0,0
2640DATA0,0,0,0,2,0,0,6,0,0,0,0,0,2,0,0,0,0
2650DATA0,0,0,0,2,1,1,4,0,1,1,1,3,1,0,0,0,0
2660DATA0,0,0,0,0,0,1,0,1,0,0,1,3,1,0,0,0,0
2670DATA0,0,0,0,0,0,0,1,0,0,0,1,3,1,0,0,0,0
2680DATA0,0,0,0,0,0,0,0,0,0,0,1,10,1,0,0,0,0
2690DATA0,0,0,0,0,0,0,0,0,0,0,0,2,0,0,0,0,0
2700DATA5,4,7,6,"LEVELONE"
2710DATA0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
2720DATA0,1,1,1,4,4,4,0,1,1,1,1,1,1,5,5,5,2
2730DATA0,1,0,0,0,10,4,0,1,0,6,6,6,0,3,3,0,2
2740DATA0,1,0,4,4,4,4,0,1,0,0,0,0,6,0,4,5,2
2750DATA0,1,0,4,0,0,0,4,9,0,6,0,6,0,0,0,0,2
2760DATA0,1,0,4,0,0,0,0,1,0,0,6,0,0,0,0,0,2
2770DATA0,1,0,4,0,0,0,0,1,6,0,0,0,0,0,0,0,2
2780DATA0,1,0,4,1,1,1,1,0,0,6,0,0,0,0,0,0,5
2790DATA0,4,0,0,0,0,0,0,0,6,0,0,0,0,0,0,0,5
2800DATA0,4,1,1,1,1,1,1,2,5,5,5,5,5,5,5,5,5
2810DATA16,2,10,3,"COSWORTH"
2820DATA0,1,1,2,2,4,0,2,2,2,2,2,4,4,4,5,5,10
2830DATA0,0,3,0,4,1,0,3,4,3,5,2,2,1,4,3,4,0
2840DATA1,1,1,0,0,5,0,0,4,0,4,5,5,5,4,0,5,0
2850DATA2,2,2,2,0,3,0,1,5,0,0,0,0,0,0,0,5,0
2860DATA1,0,0,3,0,4,0,0,1,0,2,2,2,2,2,2,5,3
2870DATA1,0,5,5,0,3,0,0,0,0,0,0,0,0,0,0,0,0
2880DATA1,0,0,4,5,5,0,0,3,1,0,1,1,5,0,4,1,0
2890DATA1,1,0,4,5,5,0,0,3,1,0,1,1,5,0,4,2,0
2900DATA1,1,0,4,5,4,0,5,3,0,0,1,1,5,9,4,1,3
2910DATA0,0,0,4,5,1,0,2,2,2,2,2,2,2,2,3,2,2
2920DATA0,0,7,1,"SIROX"
2930DATA2,2,2,2,2,2,2,2,2,2,2,2,2,2,3,2,2,2
2940DATA4,5,4,0,4,5,4,5,3,4,5,3,5,4,0,5,5,4
2950DATA0,6,0,0,1,1,2,2,2,9,2,2,2,2,0,4,5,5
2960DATA4,4,5,0,1,1,0,0,0,0,0,0,0,0,0,1,3,4
2970DATA3,0,0,0,0,0,0,0,0,0,0,0,3,0,6,0,0,0
2980DATA1,1,1,5,4,4,2,2,2,2,2,2,2,2,0,1,3,4
2990DATA2,2,2,1,1,1,1,1,1,1,1,3,4,5,0,3,0,5
3000DATA1,1,1,5,5,5,3,3,4,4,5,5,4,4,0,5,4,4
3010DATA1,1,1,4,3,0,0,0,0,0,6,0,0,0,0,1,1,1
3020DATA1,1,1,1,1,1,1,1,1,1,2,2,2,2,0,3,0,10
3030DATA3,1,7,4,"CHICANE"
3040DATA0,6,0,0,3,0,0,4,4,4,2,2,2,2,2,2,2,2
3050DATA1,1,0,4,0,5,0,0,0,3,6,0,1,1,1,1,1,1
3060DATA1,1,0,4,0,5,0,4,5,5,0,5,5,1,1,1,1,1
3070DATA1,1,0,4,0,5,0,4,5,5,0,4,5,1,1,1,1,1
3080DATA2,2,6,5,0,5,1,1,1,1,0,1,1,1,1,1,1,1
3090DATA2,2,0,0,0,5,2,2,2,2,0,2,2,5,5,5,5,5
3100DATA2,2,0,1,1,1,1,1,1,1,0,0,0,3,0,0,0,0
3110DATA2,2,2,2,2,2,2,2,2,2,4,4,4,4,4,4,4,0
3120DATA1,1,1,0,6,0,0,0,9,0,0,0,0,0,0,0,0,0
3130DATA1,1,1,1,10,4,5,4,5,4,5,4,5,4,5,4,5,4
3140DATA0,0,7,1,"MUTILATE"
3150DATA2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
3160DATA0,0,6,0,1,0,0,0,0,0,0,0,0,0,0,0,0,1
3170DATA0,1,0,4,3,3,4,5,4,5,4,3,4,5,9,5,3,1
3180DATA1,1,0,0,0,4,2,2,2,2,2,2,2,2,2,2,3,1
3190DATA1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1
3200DATA2,2,2,2,2,0,6,0,0,3,0,0,0,0,0,0,0,5
3210DATA1,0,0,3,0,0,0,1,1,4,5,4,5,4,5,4,5,1
3220DATA1,0,4,5,4,4,0,3,0,0,0,0,4,5,0,3,5,1
3230DATA1,1,1,1,1,1,1,5,5,5,5,0,0,0,0,5,5,5
3240DATA1,4,4,4,4,4,10,0,0,0,0,0,0,0,0,5,5,1
3250DATA0,2,6,1,"COCOPLEX"
3260DATA10,0,3,0,5,0,0,1,9,1,0,0,0,0,0,0,0,6
3270DATA3,0,1,0,1,0,0,1,0,1,0,0,1,0,1,3,1,0
3280DATA0,3,1,0,1,0,6,0,0,1,0,0,1,4,1,0,1,6
3290DATA3,0,1,0,0,0,0,1,0,0,0,0,0,0,0,0,6,0
3300DATA1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,3
3310DATA3,0,0,2,2,2,0,1,0,1,5,3,1,3,3,3,0,0
3320DATA4,4,0,2,9,0,0,6,0,1,3,0,1,3,1,1,1,0
3330DATA0,0,3,2,2,2,6,0,0,0,0,3,1,0,1,0,0,0
3340DATA0,0,0,0,0,6,0,1,0,1,3,0,1,0,1,0,1,6
3350DATA3,1,3,5,3,5,0,1,0,1,0,0,0,0,6,0,1,0
3360DATA17,9,8,9,"FLONGYPONG"
3370DATA10,0,0,0,0,0,2,2,2,2,2,2,2,2,2,1,0,5
3380DATA1,1,5,1,1,3,1,1,1,1,1,1,1,1,1,1,0,4
3390DATA1,5,5,5,1,0,4,4,5,5,3,4,5,5,5,1,0,5
3400DATA1,4,3,0,5,0,0,0,0,0,5,5,5,5,3,4,0,4
3410DATA1,4,1,0,1,5,5,5,5,0,5,5,5,0,0,4,0,9
3420DATA1,1,0,6,0,0,0,0,0,6,0,0,0,0,0,5,0,5
3430DATA1,4,1,0,4,0,0,4,4,0,4,4,4,0,0,5,0,4
3440DATA1,1,0,4,0,0,4,5,5,0,0,0,1,4,0,1,0,4
3450DATA1,1,4,0,0,4,1,1,1,4,4,3,1,4,0,1,0,4
3460DATA0,0,0,0,4,2,2,2,2,4,4,2,1,4,0,0,0,5
3470DATA0,9,16,0,"BANANABUS"
3480DATA5,5,0,6,0,0,3,0,0,3,0,0,3,1,0,0,0,0
3490DATA5,9,0,0,0,5,4,5,4,5,4,5,4,0,4,0,1,1
3500DATA2,2,2,2,0,2,2,2,2,2,2,2,2,0,0,0,1,1
3510DATA0,0,0,0,0,0,0,0,1,0,0,0,3,3,3,0,0,1
3520DATA1,1,1,0,1,1,1,1,1,0,4,5,4,5,4,0,0,1
3530DATA1,1,1,0,0,3,3,0,0,0,1,1,1,0,0,0,5,1
3540DATA2,2,2,2,2,2,2,2,2,2,2,2,0,3,4,4,4,1
3550DATA2,2,2,2,2,2,2,2,2,2,3,3,0,5,5,5,5,2
3560DATA1,0,6,0,0,4,0,0,0,4,0,0,4,4,4,4,4,1
3570DATA10,0,0,5,0,0,0,5,0,0,3,5,5,5,5,5,5,1
3580DATA17,0,0,4,"FLAGELLATION"
3590DATA2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,10
3600DATA0,9,0,1,0,0,0,0,0,0,0,0,0,0,1,4,5,0
3610DATA0,1,0,3,3,4,5,4,0,5,4,5,4,5,4,5,0,0
3620DATA0,3,1,1,1,1,1,1,0,0,5,4,4,5,0,0,0,0
3630DATA5,0,0,1,3,0,0,0,1,0,4,5,5,4,6,0,1,0
3640DATA1,5,0,0,1,3,3,0,0,0,0,5,4,5,0,1,1,0
3650DATA5,5,5,0,0,1,3,0,0,5,0,0,4,0,0,1,1,0
3660DATA0,0,0,0,0,3,1,5,0,0,4,0,0,0,5,5,5,3
3670DATA0,2,2,2,2,2,2,2,5,2,2,2,2,2,4,4,3,3
3680DATA0,0,0,0,3,0,0,0,0,1,1,1,1,1,1,1,1,1
3690DATA9,9,5,1,"PAYTHEPENALTY"
3700DATA10,0,0,0,1,4,3,5,0,0,3,3,5,5,1,0,5,3
3710DATA0,1,0,6,0,0,0,0,0,1,4,0,0,0,0,0,0,3
3720DATA0,0,0,6,1,0,0,5,4,1,5,0,4,4,1,4,5,3
3730DATA4,4,4,0,1,1,1,1,4,9,5,0,1,1,1,4,5,3
3740DATA1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1
3750DATA1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,5,5,1
3760DATA0,3,3,3,1,0,4,0,3,0,0,5,0,0,0,0,0,1
3770DATA6,5,0,5,1,4,0,0,4,1,0,0,3,1,1,5,0,1
3780DATA0,6,0,0,0,0,0,0,1,1,4,4,4,1,1,5,3,1
3790DATA1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
3800DATA0,8,1,4,"PUNISHMENT"
3810DATA0,0,0,0,0,0,0,0,10,1,2,2,2,2,2,2,2,2
3820DATA0,5,5,0,4,4,4,5,1,4,4,0,3,0,0,0,0,4
3830DATA0,5,5,0,5,5,5,5,9,4,4,4,0,1,1,4,0,0
3840DATA0,5,4,3,3,5,0,0,0,0,0,4,0,0,0,4,4,0
3850DATA0,4,5,3,0,3,3,0,0,5,3,3,4,0,0,4,3,0
3860DATA0,5,5,5,3,1,1,0,3,0,0,3,0,4,0,4,3,0
3870DATA0,5,5,0,0,1,1,4,0,0,0,4,1,0,0,4,0,0
3880DATA0,5,0,0,5,5,1,1,5,0,0,0,1,0,0,4,1,6
3890DATA0,0,0,5,5,1,1,1,1,5,0,0,0,4,0,4,4,0
3900DATA1,1,1,1,1,1,1,1,1,1,1,5,0,0,0,0,3,4
3910DATA17,8,6,3,"INCIDENTALLY"
3920DATA2,2,2,2,1,1,1,1,1,1,1,1,5,5,1,5,0,16
3930DATA2,2,2,1,5,4,5,4,0,0,3,0,0,0,0,0,0,3
3940DATA2,2,2,0,0,0,0,0,0,0,0,0,0,1,4,0,1,1
3950DATA2,1,1,1,1,1,1,0,12,1,1,1,1,1,1,0,3,1
3960DATA1,0,0,0,0,0,0,0,5,4,4,0,0,0,9,1,1,1
3970DATA1,0,1,1,1,1,4,0,0,0,0,0,5,1,1,1,1,1
3980DATA1,3,1,3,3,1,0,0,5,4,4,4,0,1,3,4,1,1
3990DATA1,1,1,3,3,1,0,1,1,1,1,1,1,1,3,4,1,1
4000DATA4,5,4,1,0,5,0,0,0,5,0,0,0,4,0,1,5,5
4010DATA4,5,4,5,0,0,0,4,0,0,0,1,0,0,0,0,0,0
4020DATA8,1,3,2,"FINDTHEDOOR"
4030DATA2,2,2,6,0,6,0,3,10,5,4,0,0,0,0,2,5,2
4040DATA2,6,2,6,0,0,6,0,6,1,1,5,4,3,0,4,9,4
4050DATA2,6,2,2,6,1,2,1,1,0,3,0,0,0,0,2,0,2
4060DATA2,4,2,0,0,0,4,0,1,1,1,0,0,6,0,2,3,2
4070DATA2,5,2,0,0,5,0,5,4,5,2,3,4,0,0,2,0,2
4080DATA2,4,2,0,0,0,0,0,2,2,2,3,4,5,0,2,3,2
4090DATA2,5,2,3,0,4,0,0,3,3,3,3,0,0,0,2,0,2
4100DATA2,0,2,3,3,1,3,1,1,1,1,1,1,1,1,2,3,2
4110DATA2,0,0,0,0,0,0,0,0,0,0,3,0,3,0,3,0,2
4120DATA2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
4130DATA9,2,1,7,"JIPUNGA"
4140DATA0,0,6,0,0,3,0,0,0,6,0,0,0,3,0,0,0,6
4150DATA0,6,0,6,0,0,0,6,0,0,6,0,6,0,6,0,0,0
4160DATA6,0,6,0,1,4,1,1,1,1,1,1,4,4,0,6,0,6
4170DATA0,6,6,0,5,0,0,0,3,0,0,0,0,0,3,0,0,6
4180DATA0,0,0,6,1,0,4,1,1,1,1,1,4,4,0,0,6,6
4190DATA6,6,0,0,5,0,0,0,0,0,0,0,0,5,6,0,6,0
4200DATA0,6,6,10,1,4,0,0,0,0,0,4,0,1,0,6,0,6
4210DATA1,1,1,1,5,0,0,0,0,0,0,0,0,5,6,0,6,0
4220DATA1,0,0,0,1,0,4,1,1,1,1,1,4,1,6,0,6,0
4230DATA1,0,0,0,0,0,0,0,0,0,0,0,0,1,0,6,0,9
4240DATA3,8,12,3,"SALOONCARSRULES"
4250DEFPROCend
4260MODE9:PRINT''"Hope you enjoyed the demo...."
4270REPEAT UNTIL INKEY-99:REPEAT UNTIL NOT INKEY-99
� Dungeons of the Beast
#� BY Graham Green and David Law
� (c) The Micro User
(:
2*DIR <Game$Dir>
<p$="LEVELONE"
F3� � � �=17 �gameover:�Dx@ � �:�" at line ";�:�
P �13:�
Z �init
d �sprites
n�
x�set
�
�title
� �screen
� �update
�PD=0
��
��=0
��wait=0�750:�
�
�check
� �move
�� DEAD � �TNA
�
�check
�
�enemy
� �misc
�KEY � DOOR �nextlev
� DEAD
,LIVES%=LIVES%-1:�LIVES%=0�gameover:�Dn@
"Qmx%=omx%:my%=omy%:sx%=osx%:sy%=osy%:�title:�screen:�update:DEAD=�:KEY=�:�tj@
,
�gameover
6�0
@:
J ��title
T*SCHOOSE title
^�237,440,850
h�
r:
|
��init
�Ƞ4
�
�a=1�4
�"�"CHANNELVOICE "+�(a)+" "+�(a)
��
�*CHANNELVOICE 3 5
� HS%=300
� hilev=1
�
stlv=1
�� LEV%(18,10)
��28,1,30,38,1
�#�"SCREENLOAD <Game$Dir>.border"
��
�:
��sprites
*DIR <Game$Dir>.Chars
�
&:
0 ��set
:S%=0
D
DEAD=�
N L%=stlv
X KEY=�
b
DOOR=�
l"LIVES%=3:tm%=6030-(L%*30):dp=�
v�
�:
� ��screen
��
�
�title
�� (2600+(L%-1)*110)
�
�Y=0�9
� �X=0�17
��LEV%(X,Y)
��:�
��omx%,omy%,osx%,osy%
�'mx%=omx%:my%=omy%:sx%=osx%:sy%=osy%
�
�Y=0�9
� �X=0�17
�place(LEV%(X,Y),X,Y)
�:�
�place(17,mx%,my%)
�place(7,sx%,sy%)
*�
4:
> ��check
HP�LEV%(mx%,my%)=9 S%=S%+15:�font(�(S%),9,28):KEY=�:LEV%(mx%,my%)=0:�2,-10,2,8
R"�LEV%(mx%,my%)=10 � � KEY �die
\"�LEV%(mx%,my%)=10 � KEY DOOR=�
f�mx%=sx%�my%=sy%�die
p� KEY � DOOR �
z,� LEV%(mx%,my%)=5 � LEV%(mx%,my%)=4 �die
� � LEV%(mx%,my%)=3 �collect
�4� LEV%(mx%,my%)=12 �2,-15,-10,20:LEV%(mx%,my%)=4
�4� LEV%(mx%,my%)=13 �2,-15,-10,20:LEV%(mx%,my%)=3
�4� LEV%(mx%,my%)=14 �2,-15,-10,20:LEV%(mx%,my%)=1
�4� LEV%(mx%,my%)=15 �2,-15,-10,20:LEV%(mx%,my%)=9
�5� LEV%(mx%,my%)=16 �2,-15,-10,20:LEV%(mx%,my%)=10
��
�:
�
��move
�� mx%=0 � �d|C
�z� �-98 � LEV%(mx%-1,my%)<>1 � LEV%(mx%-1,my%)<>2 � LEV%(mx%-1,my%)<>6 �place(0,mx%,my%):mx%=mx%-1:�place(18,mx%,my%):�
�*� �-98 � LEV%(mx%-1,my%)=6 �push(-1,0)
�� mx%=17 � �TZD
z� �-67 � LEV%(mx%+1,my%)<>1 � LEV%(mx%+1,my%)<>2 � LEV%(mx%+1,my%)<>6 �place(0,mx%,my%):mx%=mx%+1:�place(20,mx%,my%):�
)� �-67 � LEV%(mx%+1,my%)=6 �push(1,0)
� my%=0 � �TxD
$z� �-88 � LEV%(mx%,my%-1)<>1 � LEV%(mx%,my%-1)<>2 � LEV%(mx%,my%-1)<>6 �place(0,mx%,my%):my%=my%-1:�place(19,mx%,my%):�
.*� �-88 � LEV%(mx%,my%-1)=6 �push(0,-1)
8� my%=9 � �DVD
B{� �-104 � LEV%(mx%,my%+1)<>1 � LEV%(mx%,my%+1)<>2 � LEV%(mx%,my%+1)<>6 �place(0,mx%,my%):my%=my%+1:�place(17,mx%,my%):�
L*� �-104 � LEV%(mx%,my%+1)=6 �push(0,1)
V�
`:
j ��enemy
t%� sy%=0 � PD=�(4)-1:� PD<>0:�tHD
~x� PD=0 � LEV%(sx%,sy%-1)=0 �place(0,sx%,sy%):sy%=sy%-1:�place(7,sx%,sy%):� � � PD=0 � LEV%(sx%,sy%-1)<>0 PD=�(4)-1:�
�&� sx%=17 � PD=�(4)-1:� PD<>1:�t\D
�x� PD=1 � LEV%(sx%+1,sy%)=0 �place(0,sx%,sy%):sx%=sx%+1:�place(7,sx%,sy%):� � � PD=1 � LEV%(sx%+1,sy%)<>0 PD=�(4)-1:�
�%� sy%=9 � PD=�(4)-1:� PD<>2:�tpD
�x� PD=2 � LEV%(sx%,sy%+1)=0 �place(0,sx%,sy%):sy%=sy%+1:�place(7,sx%,sy%):� � � PD=2 � LEV%(sx%,sy%+1)<>0 PD=�(4)-1:�
�!� sx%=0 � PD=�(4)-1:� PD<>3:�
�x� PD=3 � LEV%(sx%-1,sy%)=0 �place(0,sx%,sy%):sx%=sx%-1:�place(7,sx%,sy%):� � � PD=3 � LEV%(sx%-1,sy%)<>0 PD=�(4)-1:�
��
���place(t,a,b)
��t=0 �"SCHOOSE blank"
��t=1 �"SCHOOSE wall"
��t=2 �"SCHOOSE girder"
��t=3 �"SCHOOSE jewel"
�t=4 �"SCHOOSE skull"
�t=5 �"SCHOOSE poison"
�t=6 �"SCHOOSE rock"
�t=7 �"SCHOOSE beast"
(�t=9 �"SCHOOSE key"
2�t=10 �"SCHOOSE door"
<�t=11 �"SCHOOSE dead"
F#�t>11 � t<17 �"SCHOOSE special"
P�t=17 �"SCHOOSE down"
Z�t=18 �"SCHOOSE left"
d�t=19 �"SCHOOSE up"
n�t=20 �"SCHOOSE right"
x pox=64+(64*a):poy=736-(b*64)
��237,pox,poy
��
�:
� ��update
� �font("score :"+�(S%),2,28)
� �font("level :"+�(L%),15,28)
�$�font("lives :"+�(LIVES%),28,28)
� �font(p$,(40-�(p$))/2,27)
��
�:
� ��die
��place(11,mx%,my%)
�H�4,-15,-200,70:�a=1�10000:�:�4,-15,-200,4:�a=1�3000:�:�4,-15,-160,30
�c=0�10000:�
DEAD=�:tm%=6030-(L%*30):dp=�
�
":
,
��collect
6LEV%(mx%,my%)=0
@ S%=S%+10
J�font(�(S%),9,28)
T�2,-10,2,8
^�
h:
r��push(x,y)
|?�x=-1 � mx%=1 � x=1 � mx%=16 � y=-1 � my%=1 � y=1 � my%=8 �
� � LEV%(mx%+x*2,my%+y*2)<>0 �
�!� sx%=mx%+x*2 � sy%=my%+y*2 �
�~LEV%(mx%+x*2,my%+y*2)=6:�place(6,mx%+x*2,my%+y*2):�place(0,mx%,my%):LEV%(mx%+x,my%+y)=0:mx%=mx%+x:my%=my%+y:�makeyermindup
��
�:
���gameover
��L%>hilev hilev=L%-1
��hilev=0hilev=1
��:�place(7,0,0)
��place(7,17,0)
��2,-15,-100,30
��font("beast",16,5)
��12,6);"=-=-=-=-=-=-="
�font("game over",14,13)
%�font("you scored :"+�(S%),12,18)
+�font("and reached level :"+�(L%),8,20)
&%�font("press space to play",8,24)
0
���-99
: *FX21,0
D�
N$�font("start level 1 to 15",0,1)
X lvl=1
b�font("1",0,5)
l � ȗ crinkely,bottom,factor
v4� factor=2 � lvl>1 lvl-=1:�font(�(lvl)+" ",0,5)
�5� factor=1 � lvl<15 lvl+=1:�font(�(lvl)+" ",0,5)
�� factor=4 b=lvl:stlv=b
� Ȗ:Ȗ:Ȗ
�� factor=4
� � b>1 �levch � p$="LEVELONE"
��
��
�:
�
��nextlev
�� L%=15 �end
� �m=100�255:�2,-15,m,1:Ȗ:�
� �enlarge
� L%=L%+1
$�(2700+((L%-1)*110)):�g,h,i,j,p$
�title
�screen
�update
*&KEY=�:DOOR=�:tm%=6030-(L%*30):dp=�
4�
>:
H ��levch:�(2700+((b-1)*110))
R'�g,h,i,j,p$:�font("password :",2,9)
\
pa$=""
f�
p � but=�
z(� but>64 � but<91 � but=127 � but=13
�7� but<>127 � but<>13 pa$=pa$+�(but):�font(pa$,13,9)
�?� but=127 � �(pa$)>0 pa$=�pa$,�(pa$)-1):�font(pa$+" ",13,9)
�� but<>13 � but=13
�+� pa$<>p$ stlv=1:p$="LEVELONE" � stlv=b
��
�:
�
��misc
�� �-106 ���-90
�� �-17 �"FX210,1"
�� �-82 �"FX210,0"
�� �-119 �"DESKTOP"
�Btm%-=�:�=0:� tm%<1000 � � dp �"SCHOOSE time":�237,100,820:dp=�
�� tm%<0 �die
�
:
��enlarge
$
�ent=1�10
.�"SCHOOSE b"+�(ent)
8enx=640-(ent*32)
Beny=512-(ent*32)
L�237,enx,eny
V�wt=0�5:Ȗ:�:�
`�
j:
t��font(text$,txx,txy)
~�cnt=1��(text$)
� tx=(txx*32)+((cnt-1)*32)
�ty=996-(txy*32)
�tx+=32:ty-=32
�S� �text$,cnt,1)<>" " �"SCHOOSE "+�text$,cnt,1):�237,tx,ty � �txx+cnt-1,txy);�1
��
��
�:
���makeyermindup
�� x=1 cjs=20
�� x=-1 cjs=18
�� y=-1 cjs=19
�� y=1 cjs=17
�place(cjs,mx%,my%)
�
:
� >>>Levels Data<<<
((�0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
2(�0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
<(�0,0,0,0,0,0,0,2,2,2,0,0,2,0,0,0,0,0
F(�0,0,0,0,0,1,1,0,9,0,2,2,0,2,0,0,0,0
P(�0,0,0,0,2,0,0,6,0,0,0,0,0,2,0,0,0,0
Z(�0,0,0,0,2,1,1,4,0,1,1,1,3,1,0,0,0,0
d(�0,0,0,0,0,0,1,0,1,0,0,1,3,1,0,0,0,0
n(�0,0,0,0,0,0,0,1,0,0,0,1,3,1,0,0,0,0
x)�0,0,0,0,0,0,0,0,0,0,0,1,10,1,0,0,0,0
�(�0,0,0,0,0,0,0,0,0,0,0,0,2,0,0,0,0,0
��5,4,7,6,"LEVELONE"
�(�0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
�(�0,1,1,1,4,4,4,0,1,1,1,1,1,1,5,5,5,2
�)�0,1,0,0,0,10,4,0,1,0,6,6,6,0,3,3,0,2
�(�0,1,0,4,4,4,4,0,1,0,0,0,0,6,0,4,5,2
�(�0,1,0,4,0,0,0,4,9,0,6,0,6,0,0,0,0,2
�(�0,1,0,4,0,0,0,0,1,0,0,6,0,0,0,0,0,2
�(�0,1,0,4,0,0,0,0,1,6,0,0,0,0,0,0,0,2
�(�0,1,0,4,1,1,1,1,0,0,6,0,0,0,0,0,0,5
�(�0,4,0,0,0,0,0,0,0,6,0,0,0,0,0,0,0,5
�(�0,4,1,1,1,1,1,1,2,5,5,5,5,5,5,5,5,5
��16,2,10,3,"COSWORTH"
)�0,1,1,2,2,4,0,2,2,2,2,2,4,4,4,5,5,10
(�0,0,3,0,4,1,0,3,4,3,5,2,2,1,4,3,4,0
(�1,1,1,0,0,5,0,0,4,0,4,5,5,5,4,0,5,0
"(�2,2,2,2,0,3,0,1,5,0,0,0,0,0,0,0,5,0
,(�1,0,0,3,0,4,0,0,1,0,2,2,2,2,2,2,5,3
6(�1,0,5,5,0,3,0,0,0,0,0,0,0,0,0,0,0,0
@(�1,0,0,4,5,5,0,0,3,1,0,1,1,5,0,4,1,0
J(�1,1,0,4,5,5,0,0,3,1,0,1,1,5,0,4,2,0
T(�1,1,0,4,5,4,0,5,3,0,0,1,1,5,9,4,1,3
^(�0,0,0,4,5,1,0,2,2,2,2,2,2,2,2,3,2,2
h�0,0,7,1,"SIROX"
r(�2,2,2,2,2,2,2,2,2,2,2,2,2,2,3,2,2,2
|(�4,5,4,0,4,5,4,5,3,4,5,3,5,4,0,5,5,4
�(�0,6,0,0,1,1,2,2,2,9,2,2,2,2,0,4,5,5
�(�4,4,5,0,1,1,0,0,0,0,0,0,0,0,0,1,3,4
�(�3,0,0,0,0,0,0,0,0,0,0,0,3,0,6,0,0,0
�(�1,1,1,5,4,4,2,2,2,2,2,2,2,2,0,1,3,4
�(�2,2,2,1,1,1,1,1,1,1,1,3,4,5,0,3,0,5
�(�1,1,1,5,5,5,3,3,4,4,5,5,4,4,0,5,4,4
�(�1,1,1,4,3,0,0,0,0,0,6,0,0,0,0,1,1,1
�)�1,1,1,1,1,1,1,1,1,1,2,2,2,2,0,3,0,10
��3,1,7,4,"CHICANE"
�(�0,6,0,0,3,0,0,4,4,4,2,2,2,2,2,2,2,2
�(�1,1,0,4,0,5,0,0,0,3,6,0,1,1,1,1,1,1
�(�1,1,0,4,0,5,0,4,5,5,0,5,5,1,1,1,1,1
�(�1,1,0,4,0,5,0,4,5,5,0,4,5,1,1,1,1,1
(�2,2,6,5,0,5,1,1,1,1,0,1,1,1,1,1,1,1
(�2,2,0,0,0,5,2,2,2,2,0,2,2,5,5,5,5,5
(�2,2,0,1,1,1,1,1,1,1,0,0,0,3,0,0,0,0
&(�2,2,2,2,2,2,2,2,2,2,4,4,4,4,4,4,4,0
0(�1,1,1,0,6,0,0,0,9,0,0,0,0,0,0,0,0,0
:)�1,1,1,1,10,4,5,4,5,4,5,4,5,4,5,4,5,4
D�0,0,7,1,"MUTILATE"
N(�2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
X(�0,0,6,0,1,0,0,0,0,0,0,0,0,0,0,0,0,1
b(�0,1,0,4,3,3,4,5,4,5,4,3,4,5,9,5,3,1
l(�1,1,0,0,0,4,2,2,2,2,2,2,2,2,2,2,3,1
v(�1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,1
�(�2,2,2,2,2,0,6,0,0,3,0,0,0,0,0,0,0,5
�(�1,0,0,3,0,0,0,1,1,4,5,4,5,4,5,4,5,1
�(�1,0,4,5,4,4,0,3,0,0,0,0,4,5,0,3,5,1
�(�1,1,1,1,1,1,1,5,5,5,5,0,0,0,0,5,5,5
�)�1,4,4,4,4,4,10,0,0,0,0,0,0,0,0,5,5,1
��0,2,6,1,"COCOPLEX"
�)�10,0,3,0,5,0,0,1,9,1,0,0,0,0,0,0,0,6
�(�3,0,1,0,1,0,0,1,0,1,0,0,1,0,1,3,1,0
�(�0,3,1,0,1,0,6,0,0,1,0,0,1,4,1,0,1,6
�(�3,0,1,0,0,0,0,1,0,0,0,0,0,0,0,0,6,0
�(�1,1,1,1,1,1,1,1,0,1,1,1,1,1,1,1,1,3
�(�3,0,0,2,2,2,0,1,0,1,5,3,1,3,3,3,0,0
�(�4,4,0,2,9,0,0,6,0,1,3,0,1,3,1,1,1,0
(�0,0,3,2,2,2,6,0,0,0,0,3,1,0,1,0,0,0
(�0,0,0,0,0,6,0,1,0,1,3,0,1,0,1,0,1,6
(�3,1,3,5,3,5,0,1,0,1,0,0,0,0,6,0,1,0
�17,9,8,9,"FLONGYPONG"
*)�10,0,0,0,0,0,2,2,2,2,2,2,2,2,2,1,0,5
4(�1,1,5,1,1,3,1,1,1,1,1,1,1,1,1,1,0,4
>(�1,5,5,5,1,0,4,4,5,5,3,4,5,5,5,1,0,5
H(�1,4,3,0,5,0,0,0,0,0,5,5,5,5,3,4,0,4
R(�1,4,1,0,1,5,5,5,5,0,5,5,5,0,0,4,0,9
\(�1,1,0,6,0,0,0,0,0,6,0,0,0,0,0,5,0,5
f(�1,4,1,0,4,0,0,4,4,0,4,4,4,0,0,5,0,4
p(�1,1,0,4,0,0,4,5,5,0,0,0,1,4,0,1,0,4
z(�1,1,4,0,0,4,1,1,1,4,4,3,1,4,0,1,0,4
�(�0,0,0,0,4,2,2,2,2,4,4,2,1,4,0,0,0,5
��0,9,16,0,"BANANABUS"
�(�5,5,0,6,0,0,3,0,0,3,0,0,3,1,0,0,0,0
�(�5,9,0,0,0,5,4,5,4,5,4,5,4,0,4,0,1,1
�(�2,2,2,2,0,2,2,2,2,2,2,2,2,0,0,0,1,1
�(�0,0,0,0,0,0,0,0,1,0,0,0,3,3,3,0,0,1
�(�1,1,1,0,1,1,1,1,1,0,4,5,4,5,4,0,0,1
�(�1,1,1,0,0,3,3,0,0,0,1,1,1,0,0,0,5,1
�(�2,2,2,2,2,2,2,2,2,2,2,2,0,3,4,4,4,1
�(�2,2,2,2,2,2,2,2,2,2,3,3,0,5,5,5,5,2
�(�1,0,6,0,0,4,0,0,0,4,0,0,4,4,4,4,4,1
�)�10,0,0,5,0,0,0,5,0,0,3,5,5,5,5,5,5,1
� �17,0,0,4,"FLAGELLATION"
)�2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,10
(�0,9,0,1,0,0,0,0,0,0,0,0,0,0,1,4,5,0
(�0,1,0,3,3,4,5,4,0,5,4,5,4,5,4,5,0,0
$(�0,3,1,1,1,1,1,1,0,0,5,4,4,5,0,0,0,0
.(�5,0,0,1,3,0,0,0,1,0,4,5,5,4,6,0,1,0
8(�1,5,0,0,1,3,3,0,0,0,0,5,4,5,0,1,1,0
B(�5,5,5,0,0,1,3,0,0,5,0,0,4,0,0,1,1,0
L(�0,0,0,0,0,3,1,5,0,0,4,0,0,0,5,5,5,3
V(�0,2,2,2,2,2,2,2,5,2,2,2,2,2,4,4,3,3
`(�0,0,0,0,3,0,0,0,0,1,1,1,1,1,1,1,1,1
j �9,9,5,1,"PAYTHEPENALTY"
t)�10,0,0,0,1,4,3,5,0,0,3,3,5,5,1,0,5,3
~(�0,1,0,6,0,0,0,0,0,1,4,0,0,0,0,0,0,3
�(�0,0,0,6,1,0,0,5,4,1,5,0,4,4,1,4,5,3
�(�4,4,4,0,1,1,1,1,4,9,5,0,1,1,1,4,5,3
�(�1,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1
�(�1,1,1,1,1,1,1,1,1,1,0,1,1,1,1,5,5,1
�(�0,3,3,3,1,0,4,0,3,0,0,5,0,0,0,0,0,1
�(�6,5,0,5,1,4,0,0,4,1,0,0,3,1,1,5,0,1
�(�0,6,0,0,0,0,0,0,1,1,4,4,4,1,1,5,3,1
�(�1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
��0,8,1,4,"PUNISHMENT"
�)�0,0,0,0,0,0,0,0,10,1,2,2,2,2,2,2,2,2
�(�0,5,5,0,4,4,4,5,1,4,4,0,3,0,0,0,0,4
�(�0,5,5,0,5,5,5,5,9,4,4,4,0,1,1,4,0,0
(�0,5,4,3,3,5,0,0,0,0,0,4,0,0,0,4,4,0
(�0,4,5,3,0,3,3,0,0,5,3,3,4,0,0,4,3,0
(�0,5,5,5,3,1,1,0,3,0,0,3,0,4,0,4,3,0
(�0,5,5,0,0,1,1,4,0,0,0,4,1,0,0,4,0,0
((�0,5,0,0,5,5,1,1,5,0,0,0,1,0,0,4,1,6
2(�0,0,0,5,5,1,1,1,1,5,0,0,0,4,0,4,4,0
<(�1,1,1,1,1,1,1,1,1,1,1,5,0,0,0,0,3,4
F �17,8,6,3,"INCIDENTALLY"
P)�2,2,2,2,1,1,1,1,1,1,1,1,5,5,1,5,0,16
Z(�2,2,2,1,5,4,5,4,0,0,3,0,0,0,0,0,0,3
d(�2,2,2,0,0,0,0,0,0,0,0,0,0,1,4,0,1,1
n)�2,1,1,1,1,1,1,0,12,1,1,1,1,1,1,0,3,1
x(�1,0,0,0,0,0,0,0,5,4,4,0,0,0,9,1,1,1
�(�1,0,1,1,1,1,4,0,0,0,0,0,5,1,1,1,1,1
�(�1,3,1,3,3,1,0,0,5,4,4,4,0,1,3,4,1,1
�(�1,1,1,3,3,1,0,1,1,1,1,1,1,1,3,4,1,1
�(�4,5,4,1,0,5,0,0,0,5,0,0,0,4,0,1,5,5
�(�4,5,4,5,0,0,0,4,0,0,0,1,0,0,0,0,0,0
��8,1,3,2,"FINDTHEDOOR"
�)�2,2,2,6,0,6,0,3,10,5,4,0,0,0,0,2,5,2
�(�2,6,2,6,0,0,6,0,6,1,1,5,4,3,0,4,9,4
�(�2,6,2,2,6,1,2,1,1,0,3,0,0,0,0,2,0,2
�(�2,4,2,0,0,0,4,0,1,1,1,0,0,6,0,2,3,2
�(�2,5,2,0,0,5,0,5,4,5,2,3,4,0,0,2,0,2
�(�2,4,2,0,0,0,0,0,2,2,2,3,4,5,0,2,3,2
�(�2,5,2,3,0,4,0,0,3,3,3,3,0,0,0,2,0,2
(�2,0,2,3,3,1,3,1,1,1,1,1,1,1,1,2,3,2
(�2,0,0,0,0,0,0,0,0,0,0,3,0,3,0,3,0,2
(�2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2
"�9,2,1,7,"JIPUNGA"
,(�0,0,6,0,0,3,0,0,0,6,0,0,0,3,0,0,0,6
6(�0,6,0,6,0,0,0,6,0,0,6,0,6,0,6,0,0,0
@(�6,0,6,0,1,4,1,1,1,1,1,1,4,4,0,6,0,6
J(�0,6,6,0,5,0,0,0,3,0,0,0,0,0,3,0,0,6
T(�0,0,0,6,1,0,4,1,1,1,1,1,4,4,0,0,6,6
^(�6,6,0,0,5,0,0,0,0,0,0,0,0,5,6,0,6,0
h)�0,6,6,10,1,4,0,0,0,0,0,4,0,1,0,6,0,6
r(�1,1,1,1,5,0,0,0,0,0,0,0,0,5,6,0,6,0
|(�1,0,0,0,1,0,4,1,1,1,1,1,4,1,6,0,6,0
�(�1,0,0,0,0,0,0,0,0,0,0,0,0,1,0,6,0,9
� �3,8,12,3,"SALOONCARSRULES"
� ��end
�)�9:�''"Hope you enjoyed the demo...."
�� � �-99:� � � �-99
� 00000000 0d 00 0a 1b f4 20 44 75 6e 67 65 6f 6e 73 20 6f |..... Dungeons o|
00000010 66 20 74 68 65 20 42 65 61 73 74 0d 00 14 23 f4 |f the Beast...#.|
00000020 20 42 59 20 47 72 61 68 61 6d 20 47 72 65 65 6e | BY Graham Green|
00000030 20 61 6e 64 20 44 61 76 69 64 20 4c 61 77 0d 00 | and David Law..|
00000040 1e 18 f4 20 28 63 29 20 54 68 65 20 4d 69 63 72 |... (c) The Micr|
00000050 6f 20 55 73 65 72 0d 00 28 05 3a 0d 00 32 13 2a |o User..(.:..2.*|
00000060 44 49 52 20 3c 47 61 6d 65 24 44 69 72 3e 0d 00 |DIR <Game$Dir>..|
00000070 3c 11 70 24 3d 22 4c 45 56 45 4c 4f 4e 45 22 0d |<.p$="LEVELONE".|
00000080 00 46 33 ee 20 85 20 e7 20 9f 3d 31 37 20 f2 67 |.F3. . . .=17 .g|
00000090 61 6d 65 6f 76 65 72 3a e5 8d 44 78 40 20 8b 20 |ameover:..Dx@ . |
000000a0 f6 3a f1 22 20 61 74 20 6c 69 6e 65 20 22 3b 9e |.:." at line ";.|
000000b0 3a e0 0d 00 50 09 eb 31 33 3a 87 0d 00 5a 09 f2 |:...P..13:...Z..|
000000c0 69 6e 69 74 0d 00 64 0c f2 73 70 72 69 74 65 73 |init..d..sprites|
000000d0 0d 00 6e 05 f5 0d 00 78 08 f2 73 65 74 0d 00 82 |..n....x..set...|
000000e0 0a f2 74 69 74 6c 65 0d 00 8c 0b f2 73 63 72 65 |..title.....scre|
000000f0 65 6e 0d 00 96 0b f2 75 70 64 61 74 65 0d 00 a0 |en.....update...|
00000100 08 50 44 3d 30 0d 00 aa 05 f5 0d 00 b4 07 d1 3d |.PD=0..........=|
00000110 30 0d 00 be 11 e3 77 61 69 74 3d 30 b8 37 35 30 |0.....wait=0.750|
00000120 3a ed 0d 00 c8 0a f2 63 68 65 63 6b 0d 00 d2 09 |:......check....|
00000130 f2 6d 6f 76 65 0d 00 dc 11 e7 20 44 45 41 44 20 |.move..... DEAD |
00000140 e5 20 8d 54 4e 41 0d 00 e6 0a f2 63 68 65 63 6b |. .TNA.....check|
00000150 0d 00 f0 0a f2 65 6e 65 6d 79 0d 00 fa 09 f2 6d |.....enemy.....m|
00000160 69 73 63 0d 01 04 18 e7 4b 45 59 20 80 20 44 4f |isc.....KEY . DO|
00000170 4f 52 20 f2 6e 65 78 74 6c 65 76 0d 01 0e 0a fd |OR .nextlev.....|
00000180 20 44 45 41 44 0d 01 18 2c 4c 49 56 45 53 25 3d | DEAD...,LIVES%=|
00000190 4c 49 56 45 53 25 2d 31 3a e7 4c 49 56 45 53 25 |LIVES%-1:.LIVES%|
000001a0 3d 30 f2 67 61 6d 65 6f 76 65 72 3a e5 8d 44 6e |=0.gameover:..Dn|
000001b0 40 0d 01 22 51 6d 78 25 3d 6f 6d 78 25 3a 6d 79 |@.."Qmx%=omx%:my|
000001c0 25 3d 6f 6d 79 25 3a 73 78 25 3d 6f 73 78 25 3a |%=omy%:sx%=osx%:|
000001d0 73 79 25 3d 6f 73 79 25 3a f2 74 69 74 6c 65 3a |sy%=osy%:.title:|
000001e0 f2 73 63 72 65 65 6e 3a f2 75 70 64 61 74 65 3a |.screen:.update:|
000001f0 44 45 41 44 3d a3 3a 4b 45 59 3d a3 3a e5 8d 74 |DEAD=.:KEY=.:..t|
00000200 6a 40 0d 01 2c 0d f2 67 61 6d 65 6f 76 65 72 0d |j@..,..gameover.|
00000210 01 36 06 fd 30 0d 01 40 05 3a 0d 01 4a 0b dd f2 |.6..0..@.:..J...|
00000220 74 69 74 6c 65 0d 01 54 12 2a 53 43 48 4f 4f 53 |title..T.*SCHOOS|
00000230 45 20 74 69 74 6c 65 0d 01 5e 10 f0 32 33 37 2c |E title..^..237,|
00000240 34 34 30 2c 38 35 30 0d 01 68 05 e1 0d 01 72 05 |440,850..h....r.|
00000250 3a 0d 01 7c 0a dd f2 69 6e 69 74 0d 01 86 07 c8 |:..|...init.....|
00000260 a0 34 0d 01 90 0a e3 61 3d 31 b8 34 0d 01 9a 22 |.4.....a=1.4..."|
00000270 ff 22 43 48 41 4e 4e 45 4c 56 4f 49 43 45 20 22 |."CHANNELVOICE "|
00000280 2b c3 28 61 29 2b 22 20 22 2b c3 28 61 29 0d 01 |+.(a)+" "+.(a)..|
00000290 a4 05 ed 0d 01 ae 15 2a 43 48 41 4e 4e 45 4c 56 |.......*CHANNELV|
000002a0 4f 49 43 45 20 33 20 35 0d 01 b8 0b 48 53 25 3d |OICE 3 5....HS%=|
000002b0 33 30 30 0d 01 c2 0b 68 69 6c 65 76 3d 31 0d 01 |300....hilev=1..|
000002c0 cc 0a 73 74 6c 76 3d 31 0d 01 d6 11 de 20 4c 45 |..stlv=1..... LE|
000002d0 56 25 28 31 38 2c 31 30 29 0d 01 e0 11 ef 32 38 |V%(18,10).....28|
000002e0 2c 31 2c 33 30 2c 33 38 2c 31 0d 01 ea 23 ff 22 |,1,30,38,1...#."|
000002f0 53 43 52 45 45 4e 4c 4f 41 44 20 3c 47 61 6d 65 |SCREENLOAD <Game|
00000300 24 44 69 72 3e 2e 62 6f 72 64 65 72 22 0d 01 f4 |$Dir>.border"...|
00000310 05 e1 0d 01 fe 05 3a 0d 02 08 0d dd f2 73 70 72 |......:......spr|
00000320 69 74 65 73 0d 02 12 19 2a 44 49 52 20 3c 47 61 |ites....*DIR <Ga|
00000330 6d 65 24 44 69 72 3e 2e 43 68 61 72 73 0d 02 1c |me$Dir>.Chars...|
00000340 05 e1 0d 02 26 05 3a 0d 02 30 09 dd f2 73 65 74 |....&.:..0...set|
00000350 0d 02 3a 08 53 25 3d 30 0d 02 44 0a 44 45 41 44 |..:.S%=0..D.DEAD|
00000360 3d a3 0d 02 4e 0b 4c 25 3d 73 74 6c 76 0d 02 58 |=...N.L%=stlv..X|
00000370 09 4b 45 59 3d a3 0d 02 62 0a 44 4f 4f 52 3d a3 |.KEY=...b.DOOR=.|
00000380 0d 02 6c 22 4c 49 56 45 53 25 3d 33 3a 74 6d 25 |..l"LIVES%=3:tm%|
00000390 3d 36 30 33 30 2d 28 4c 25 2a 33 30 29 3a 64 70 |=6030-(L%*30):dp|
000003a0 3d a3 0d 02 76 05 e1 0d 02 80 05 3a 0d 02 8a 0c |=...v......:....|
000003b0 dd f2 73 63 72 65 65 6e 0d 02 94 05 db 0d 02 9e |..screen........|
000003c0 0a f2 74 69 74 6c 65 0d 02 a8 17 f7 20 28 32 36 |..title..... (26|
000003d0 30 30 2b 28 4c 25 2d 31 29 2a 31 31 30 29 0d 02 |00+(L%-1)*110)..|
000003e0 b2 0a e3 59 3d 30 b8 39 0d 02 bc 0b e3 58 3d 30 |...Y=0.9.....X=0|
000003f0 b8 31 37 0d 02 c6 0e f3 4c 45 56 25 28 58 2c 59 |.17.....LEV%(X,Y|
00000400 29 0d 02 d0 07 ed 3a ed 0d 02 da 18 f3 6f 6d 78 |).....:......omx|
00000410 25 2c 6f 6d 79 25 2c 6f 73 78 25 2c 6f 73 79 25 |%,omy%,osx%,osy%|
00000420 0d 02 e4 27 6d 78 25 3d 6f 6d 78 25 3a 6d 79 25 |...'mx%=omx%:my%|
00000430 3d 6f 6d 79 25 3a 73 78 25 3d 6f 73 78 25 3a 73 |=omy%:sx%=osx%:s|
00000440 79 25 3d 6f 73 79 25 0d 02 ee 0a e3 59 3d 30 b8 |y%=osy%.....Y=0.|
00000450 39 0d 02 f8 0b e3 58 3d 30 b8 31 37 0d 03 02 19 |9.....X=0.17....|
00000460 f2 70 6c 61 63 65 28 4c 45 56 25 28 58 2c 59 29 |.place(LEV%(X,Y)|
00000470 2c 58 2c 59 29 0d 03 0c 07 ed 3a ed 0d 03 16 16 |,X,Y).....:.....|
00000480 f2 70 6c 61 63 65 28 31 37 2c 6d 78 25 2c 6d 79 |.place(17,mx%,my|
00000490 25 29 0d 03 20 15 f2 70 6c 61 63 65 28 37 2c 73 |%).. ..place(7,s|
000004a0 78 25 2c 73 79 25 29 0d 03 2a 05 e1 0d 03 34 05 |x%,sy%)..*....4.|
000004b0 3a 0d 03 3e 0b dd f2 63 68 65 63 6b 0d 03 48 50 |:..>...check..HP|
000004c0 e7 4c 45 56 25 28 6d 78 25 2c 6d 79 25 29 3d 39 |.LEV%(mx%,my%)=9|
000004d0 20 53 25 3d 53 25 2b 31 35 3a f2 66 6f 6e 74 28 | S%=S%+15:.font(|
000004e0 c3 28 53 25 29 2c 39 2c 32 38 29 3a 4b 45 59 3d |.(S%),9,28):KEY=|
000004f0 b9 3a 4c 45 56 25 28 6d 78 25 2c 6d 79 25 29 3d |.:LEV%(mx%,my%)=|
00000500 30 3a d4 32 2c 2d 31 30 2c 32 2c 38 0d 03 52 22 |0:.2,-10,2,8..R"|
00000510 e7 4c 45 56 25 28 6d 78 25 2c 6d 79 25 29 3d 31 |.LEV%(mx%,my%)=1|
00000520 30 20 80 20 ac 20 4b 45 59 20 f2 64 69 65 0d 03 |0 . . KEY .die..|
00000530 5c 22 e7 4c 45 56 25 28 6d 78 25 2c 6d 79 25 29 |\".LEV%(mx%,my%)|
00000540 3d 31 30 20 80 20 4b 45 59 20 44 4f 4f 52 3d b9 |=10 . KEY DOOR=.|
00000550 0d 03 66 18 e7 6d 78 25 3d 73 78 25 80 6d 79 25 |..f..mx%=sx%.my%|
00000560 3d 73 79 25 f2 64 69 65 0d 03 70 12 e7 20 4b 45 |=sy%.die..p.. KE|
00000570 59 20 80 20 44 4f 4f 52 20 e1 0d 03 7a 2c e7 20 |Y . DOOR ...z,. |
00000580 4c 45 56 25 28 6d 78 25 2c 6d 79 25 29 3d 35 20 |LEV%(mx%,my%)=5 |
00000590 84 20 4c 45 56 25 28 6d 78 25 2c 6d 79 25 29 3d |. LEV%(mx%,my%)=|
000005a0 34 20 f2 64 69 65 0d 03 84 1e e7 20 4c 45 56 25 |4 .die..... LEV%|
000005b0 28 6d 78 25 2c 6d 79 25 29 3d 33 20 f2 63 6f 6c |(mx%,my%)=3 .col|
000005c0 6c 65 63 74 0d 03 8e 34 e7 20 4c 45 56 25 28 6d |lect...4. LEV%(m|
000005d0 78 25 2c 6d 79 25 29 3d 31 32 20 d4 32 2c 2d 31 |x%,my%)=12 .2,-1|
000005e0 35 2c 2d 31 30 2c 32 30 3a 4c 45 56 25 28 6d 78 |5,-10,20:LEV%(mx|
000005f0 25 2c 6d 79 25 29 3d 34 0d 03 98 34 e7 20 4c 45 |%,my%)=4...4. LE|
00000600 56 25 28 6d 78 25 2c 6d 79 25 29 3d 31 33 20 d4 |V%(mx%,my%)=13 .|
00000610 32 2c 2d 31 35 2c 2d 31 30 2c 32 30 3a 4c 45 56 |2,-15,-10,20:LEV|
00000620 25 28 6d 78 25 2c 6d 79 25 29 3d 33 0d 03 a2 34 |%(mx%,my%)=3...4|
00000630 e7 20 4c 45 56 25 28 6d 78 25 2c 6d 79 25 29 3d |. LEV%(mx%,my%)=|
00000640 31 34 20 d4 32 2c 2d 31 35 2c 2d 31 30 2c 32 30 |14 .2,-15,-10,20|
00000650 3a 4c 45 56 25 28 6d 78 25 2c 6d 79 25 29 3d 31 |:LEV%(mx%,my%)=1|
00000660 0d 03 ac 34 e7 20 4c 45 56 25 28 6d 78 25 2c 6d |...4. LEV%(mx%,m|
00000670 79 25 29 3d 31 35 20 d4 32 2c 2d 31 35 2c 2d 31 |y%)=15 .2,-15,-1|
00000680 30 2c 32 30 3a 4c 45 56 25 28 6d 78 25 2c 6d 79 |0,20:LEV%(mx%,my|
00000690 25 29 3d 39 0d 03 b6 35 e7 20 4c 45 56 25 28 6d |%)=9...5. LEV%(m|
000006a0 78 25 2c 6d 79 25 29 3d 31 36 20 d4 32 2c 2d 31 |x%,my%)=16 .2,-1|
000006b0 35 2c 2d 31 30 2c 32 30 3a 4c 45 56 25 28 6d 78 |5,-10,20:LEV%(mx|
000006c0 25 2c 6d 79 25 29 3d 31 30 0d 03 c0 05 e1 0d 03 |%,my%)=10.......|
000006d0 ca 05 3a 0d 03 d4 0a dd f2 6d 6f 76 65 0d 03 de |..:......move...|
000006e0 12 e7 20 6d 78 25 3d 30 20 e5 20 8d 64 7c 43 0d |.. mx%=0 . .d|C.|
000006f0 03 e8 7a e7 20 a6 2d 39 38 20 80 20 4c 45 56 25 |..z. .-98 . LEV%|
00000700 28 6d 78 25 2d 31 2c 6d 79 25 29 3c 3e 31 20 80 |(mx%-1,my%)<>1 .|
00000710 20 4c 45 56 25 28 6d 78 25 2d 31 2c 6d 79 25 29 | LEV%(mx%-1,my%)|
00000720 3c 3e 32 20 80 20 4c 45 56 25 28 6d 78 25 2d 31 |<>2 . LEV%(mx%-1|
00000730 2c 6d 79 25 29 3c 3e 36 20 f2 70 6c 61 63 65 28 |,my%)<>6 .place(|
00000740 30 2c 6d 78 25 2c 6d 79 25 29 3a 6d 78 25 3d 6d |0,mx%,my%):mx%=m|
00000750 78 25 2d 31 3a f2 70 6c 61 63 65 28 31 38 2c 6d |x%-1:.place(18,m|
00000760 78 25 2c 6d 79 25 29 3a e1 0d 03 f2 2a e7 20 a6 |x%,my%):....*. .|
00000770 2d 39 38 20 80 20 4c 45 56 25 28 6d 78 25 2d 31 |-98 . LEV%(mx%-1|
00000780 2c 6d 79 25 29 3d 36 20 f2 70 75 73 68 28 2d 31 |,my%)=6 .push(-1|
00000790 2c 30 29 0d 03 fc 13 e7 20 6d 78 25 3d 31 37 20 |,0)..... mx%=17 |
000007a0 e5 20 8d 54 5a 44 0d 04 06 7a e7 20 a6 2d 36 37 |. .TZD...z. .-67|
000007b0 20 80 20 4c 45 56 25 28 6d 78 25 2b 31 2c 6d 79 | . LEV%(mx%+1,my|
000007c0 25 29 3c 3e 31 20 80 20 4c 45 56 25 28 6d 78 25 |%)<>1 . LEV%(mx%|
000007d0 2b 31 2c 6d 79 25 29 3c 3e 32 20 80 20 4c 45 56 |+1,my%)<>2 . LEV|
000007e0 25 28 6d 78 25 2b 31 2c 6d 79 25 29 3c 3e 36 20 |%(mx%+1,my%)<>6 |
000007f0 f2 70 6c 61 63 65 28 30 2c 6d 78 25 2c 6d 79 25 |.place(0,mx%,my%|
00000800 29 3a 6d 78 25 3d 6d 78 25 2b 31 3a f2 70 6c 61 |):mx%=mx%+1:.pla|
00000810 63 65 28 32 30 2c 6d 78 25 2c 6d 79 25 29 3a e1 |ce(20,mx%,my%):.|
00000820 0d 04 10 29 e7 20 a6 2d 36 37 20 80 20 4c 45 56 |...). .-67 . LEV|
00000830 25 28 6d 78 25 2b 31 2c 6d 79 25 29 3d 36 20 f2 |%(mx%+1,my%)=6 .|
00000840 70 75 73 68 28 31 2c 30 29 0d 04 1a 12 e7 20 6d |push(1,0)..... m|
00000850 79 25 3d 30 20 e5 20 8d 54 78 44 0d 04 24 7a e7 |y%=0 . .TxD..$z.|
00000860 20 a6 2d 38 38 20 80 20 4c 45 56 25 28 6d 78 25 | .-88 . LEV%(mx%|
00000870 2c 6d 79 25 2d 31 29 3c 3e 31 20 80 20 4c 45 56 |,my%-1)<>1 . LEV|
00000880 25 28 6d 78 25 2c 6d 79 25 2d 31 29 3c 3e 32 20 |%(mx%,my%-1)<>2 |
00000890 80 20 4c 45 56 25 28 6d 78 25 2c 6d 79 25 2d 31 |. LEV%(mx%,my%-1|
000008a0 29 3c 3e 36 20 f2 70 6c 61 63 65 28 30 2c 6d 78 |)<>6 .place(0,mx|
000008b0 25 2c 6d 79 25 29 3a 6d 79 25 3d 6d 79 25 2d 31 |%,my%):my%=my%-1|
000008c0 3a f2 70 6c 61 63 65 28 31 39 2c 6d 78 25 2c 6d |:.place(19,mx%,m|
000008d0 79 25 29 3a e1 0d 04 2e 2a e7 20 a6 2d 38 38 20 |y%):....*. .-88 |
000008e0 80 20 4c 45 56 25 28 6d 78 25 2c 6d 79 25 2d 31 |. LEV%(mx%,my%-1|
000008f0 29 3d 36 20 f2 70 75 73 68 28 30 2c 2d 31 29 0d |)=6 .push(0,-1).|
00000900 04 38 12 e7 20 6d 79 25 3d 39 20 e5 20 8d 44 56 |.8.. my%=9 . .DV|
00000910 44 0d 04 42 7b e7 20 a6 2d 31 30 34 20 80 20 4c |D..B{. .-104 . L|
00000920 45 56 25 28 6d 78 25 2c 6d 79 25 2b 31 29 3c 3e |EV%(mx%,my%+1)<>|
00000930 31 20 80 20 4c 45 56 25 28 6d 78 25 2c 6d 79 25 |1 . LEV%(mx%,my%|
00000940 2b 31 29 3c 3e 32 20 80 20 4c 45 56 25 28 6d 78 |+1)<>2 . LEV%(mx|
00000950 25 2c 6d 79 25 2b 31 29 3c 3e 36 20 f2 70 6c 61 |%,my%+1)<>6 .pla|
00000960 63 65 28 30 2c 6d 78 25 2c 6d 79 25 29 3a 6d 79 |ce(0,mx%,my%):my|
00000970 25 3d 6d 79 25 2b 31 3a f2 70 6c 61 63 65 28 31 |%=my%+1:.place(1|
00000980 37 2c 6d 78 25 2c 6d 79 25 29 3a e1 0d 04 4c 2a |7,mx%,my%):...L*|
00000990 e7 20 a6 2d 31 30 34 20 80 20 4c 45 56 25 28 6d |. .-104 . LEV%(m|
000009a0 78 25 2c 6d 79 25 2b 31 29 3d 36 20 f2 70 75 73 |x%,my%+1)=6 .pus|
000009b0 68 28 30 2c 31 29 0d 04 56 05 e1 0d 04 60 05 3a |h(0,1)..V....`.:|
000009c0 0d 04 6a 0b dd f2 65 6e 65 6d 79 0d 04 74 25 e7 |..j...enemy..t%.|
000009d0 20 73 79 25 3d 30 20 f5 20 50 44 3d b3 28 34 29 | sy%=0 . PD=.(4)|
000009e0 2d 31 3a fd 20 50 44 3c 3e 30 3a e5 8d 74 48 44 |-1:. PD<>0:..tHD|
000009f0 0d 04 7e 78 e7 20 50 44 3d 30 20 80 20 4c 45 56 |..~x. PD=0 . LEV|
00000a00 25 28 73 78 25 2c 73 79 25 2d 31 29 3d 30 20 f2 |%(sx%,sy%-1)=0 .|
00000a10 70 6c 61 63 65 28 30 2c 73 78 25 2c 73 79 25 29 |place(0,sx%,sy%)|
00000a20 3a 73 79 25 3d 73 79 25 2d 31 3a f2 70 6c 61 63 |:sy%=sy%-1:.plac|
00000a30 65 28 37 2c 73 78 25 2c 73 79 25 29 3a e1 20 8b |e(7,sx%,sy%):. .|
00000a40 20 e7 20 50 44 3d 30 20 80 20 4c 45 56 25 28 73 | . PD=0 . LEV%(s|
00000a50 78 25 2c 73 79 25 2d 31 29 3c 3e 30 20 50 44 3d |x%,sy%-1)<>0 PD=|
00000a60 b3 28 34 29 2d 31 3a e1 0d 04 88 26 e7 20 73 78 |.(4)-1:....&. sx|
00000a70 25 3d 31 37 20 f5 20 50 44 3d b3 28 34 29 2d 31 |%=17 . PD=.(4)-1|
00000a80 3a fd 20 50 44 3c 3e 31 3a e5 8d 74 5c 44 0d 04 |:. PD<>1:..t\D..|
00000a90 92 78 e7 20 50 44 3d 31 20 80 20 4c 45 56 25 28 |.x. PD=1 . LEV%(|
00000aa0 73 78 25 2b 31 2c 73 79 25 29 3d 30 20 f2 70 6c |sx%+1,sy%)=0 .pl|
00000ab0 61 63 65 28 30 2c 73 78 25 2c 73 79 25 29 3a 73 |ace(0,sx%,sy%):s|
00000ac0 78 25 3d 73 78 25 2b 31 3a f2 70 6c 61 63 65 28 |x%=sx%+1:.place(|
00000ad0 37 2c 73 78 25 2c 73 79 25 29 3a e1 20 8b 20 e7 |7,sx%,sy%):. . .|
00000ae0 20 50 44 3d 31 20 80 20 4c 45 56 25 28 73 78 25 | PD=1 . LEV%(sx%|
00000af0 2b 31 2c 73 79 25 29 3c 3e 30 20 50 44 3d b3 28 |+1,sy%)<>0 PD=.(|
00000b00 34 29 2d 31 3a e1 0d 04 9c 25 e7 20 73 79 25 3d |4)-1:....%. sy%=|
00000b10 39 20 f5 20 50 44 3d b3 28 34 29 2d 31 3a fd 20 |9 . PD=.(4)-1:. |
00000b20 50 44 3c 3e 32 3a e5 8d 74 70 44 0d 04 a6 78 e7 |PD<>2:..tpD...x.|
00000b30 20 50 44 3d 32 20 80 20 4c 45 56 25 28 73 78 25 | PD=2 . LEV%(sx%|
00000b40 2c 73 79 25 2b 31 29 3d 30 20 f2 70 6c 61 63 65 |,sy%+1)=0 .place|
00000b50 28 30 2c 73 78 25 2c 73 79 25 29 3a 73 79 25 3d |(0,sx%,sy%):sy%=|
00000b60 73 79 25 2b 31 3a f2 70 6c 61 63 65 28 37 2c 73 |sy%+1:.place(7,s|
00000b70 78 25 2c 73 79 25 29 3a e1 20 8b 20 e7 20 50 44 |x%,sy%):. . . PD|
00000b80 3d 32 20 80 20 4c 45 56 25 28 73 78 25 2c 73 79 |=2 . LEV%(sx%,sy|
00000b90 25 2b 31 29 3c 3e 30 20 50 44 3d b3 28 34 29 2d |%+1)<>0 PD=.(4)-|
00000ba0 31 3a e1 0d 04 b0 21 e7 20 73 78 25 3d 30 20 f5 |1:....!. sx%=0 .|
00000bb0 20 50 44 3d b3 28 34 29 2d 31 3a fd 20 50 44 3c | PD=.(4)-1:. PD<|
00000bc0 3e 33 3a e1 0d 04 ba 78 e7 20 50 44 3d 33 20 80 |>3:....x. PD=3 .|
00000bd0 20 4c 45 56 25 28 73 78 25 2d 31 2c 73 79 25 29 | LEV%(sx%-1,sy%)|
00000be0 3d 30 20 f2 70 6c 61 63 65 28 30 2c 73 78 25 2c |=0 .place(0,sx%,|
00000bf0 73 79 25 29 3a 73 78 25 3d 73 78 25 2d 31 3a f2 |sy%):sx%=sx%-1:.|
00000c00 70 6c 61 63 65 28 37 2c 73 78 25 2c 73 79 25 29 |place(7,sx%,sy%)|
00000c10 3a e1 20 8b 20 e7 20 50 44 3d 33 20 80 20 4c 45 |:. . . PD=3 . LE|
00000c20 56 25 28 73 78 25 2d 31 2c 73 79 25 29 3c 3e 30 |V%(sx%-1,sy%)<>0|
00000c30 20 50 44 3d b3 28 34 29 2d 31 3a e1 0d 04 c4 05 | PD=.(4)-1:.....|
00000c40 e1 0d 04 ce 12 dd f2 70 6c 61 63 65 28 74 2c 61 |.......place(t,a|
00000c50 2c 62 29 0d 04 d8 19 e7 74 3d 30 20 ff 22 53 43 |,b).....t=0 ."SC|
00000c60 48 4f 4f 53 45 20 62 6c 61 6e 6b 22 0d 04 e2 18 |HOOSE blank"....|
00000c70 e7 74 3d 31 20 ff 22 53 43 48 4f 4f 53 45 20 77 |.t=1 ."SCHOOSE w|
00000c80 61 6c 6c 22 0d 04 ec 1a e7 74 3d 32 20 ff 22 53 |all".....t=2 ."S|
00000c90 43 48 4f 4f 53 45 20 67 69 72 64 65 72 22 0d 04 |CHOOSE girder"..|
00000ca0 f6 19 e7 74 3d 33 20 ff 22 53 43 48 4f 4f 53 45 |...t=3 ."SCHOOSE|
00000cb0 20 6a 65 77 65 6c 22 0d 05 00 19 e7 74 3d 34 20 | jewel".....t=4 |
00000cc0 ff 22 53 43 48 4f 4f 53 45 20 73 6b 75 6c 6c 22 |."SCHOOSE skull"|
00000cd0 0d 05 0a 1a e7 74 3d 35 20 ff 22 53 43 48 4f 4f |.....t=5 ."SCHOO|
00000ce0 53 45 20 70 6f 69 73 6f 6e 22 0d 05 14 18 e7 74 |SE poison".....t|
00000cf0 3d 36 20 ff 22 53 43 48 4f 4f 53 45 20 72 6f 63 |=6 ."SCHOOSE roc|
00000d00 6b 22 0d 05 1e 19 e7 74 3d 37 20 ff 22 53 43 48 |k".....t=7 ."SCH|
00000d10 4f 4f 53 45 20 62 65 61 73 74 22 0d 05 28 17 e7 |OOSE beast"..(..|
00000d20 74 3d 39 20 ff 22 53 43 48 4f 4f 53 45 20 6b 65 |t=9 ."SCHOOSE ke|
00000d30 79 22 0d 05 32 19 e7 74 3d 31 30 20 ff 22 53 43 |y"..2..t=10 ."SC|
00000d40 48 4f 4f 53 45 20 64 6f 6f 72 22 0d 05 3c 19 e7 |HOOSE door"..<..|
00000d50 74 3d 31 31 20 ff 22 53 43 48 4f 4f 53 45 20 64 |t=11 ."SCHOOSE d|
00000d60 65 61 64 22 0d 05 46 23 e7 74 3e 31 31 20 80 20 |ead"..F#.t>11 . |
00000d70 74 3c 31 37 20 ff 22 53 43 48 4f 4f 53 45 20 73 |t<17 ."SCHOOSE s|
00000d80 70 65 63 69 61 6c 22 0d 05 50 19 e7 74 3d 31 37 |pecial"..P..t=17|
00000d90 20 ff 22 53 43 48 4f 4f 53 45 20 64 6f 77 6e 22 | ."SCHOOSE down"|
00000da0 0d 05 5a 19 e7 74 3d 31 38 20 ff 22 53 43 48 4f |..Z..t=18 ."SCHO|
00000db0 4f 53 45 20 6c 65 66 74 22 0d 05 64 17 e7 74 3d |OSE left"..d..t=|
00000dc0 31 39 20 ff 22 53 43 48 4f 4f 53 45 20 75 70 22 |19 ."SCHOOSE up"|
00000dd0 0d 05 6e 1a e7 74 3d 32 30 20 ff 22 53 43 48 4f |..n..t=20 ."SCHO|
00000de0 4f 53 45 20 72 69 67 68 74 22 0d 05 78 20 70 6f |OSE right"..x po|
00000df0 78 3d 36 34 2b 28 36 34 2a 61 29 3a 70 6f 79 3d |x=64+(64*a):poy=|
00000e00 37 33 36 2d 28 62 2a 36 34 29 0d 05 82 10 f0 32 |736-(b*64).....2|
00000e10 33 37 2c 70 6f 78 2c 70 6f 79 0d 05 8c 05 e1 0d |37,pox,poy......|
00000e20 05 96 05 3a 0d 05 a0 0c dd f2 75 70 64 61 74 65 |...:......update|
00000e30 0d 05 aa 1f f2 66 6f 6e 74 28 22 73 63 6f 72 65 |.....font("score|
00000e40 20 3a 22 2b c3 28 53 25 29 2c 32 2c 32 38 29 0d | :"+.(S%),2,28).|
00000e50 05 b4 20 f2 66 6f 6e 74 28 22 6c 65 76 65 6c 20 |.. .font("level |
00000e60 3a 22 2b c3 28 4c 25 29 2c 31 35 2c 32 38 29 0d |:"+.(L%),15,28).|
00000e70 05 be 24 f2 66 6f 6e 74 28 22 6c 69 76 65 73 20 |..$.font("lives |
00000e80 3a 22 2b c3 28 4c 49 56 45 53 25 29 2c 32 38 2c |:"+.(LIVES%),28,|
00000e90 32 38 29 0d 05 c8 1d f2 66 6f 6e 74 28 70 24 2c |28).....font(p$,|
00000ea0 28 34 30 2d a9 28 70 24 29 29 2f 32 2c 32 37 29 |(40-.(p$))/2,27)|
00000eb0 0d 05 d2 05 e1 0d 05 dc 05 3a 0d 05 e6 09 dd f2 |.........:......|
00000ec0 64 69 65 0d 05 f0 16 f2 70 6c 61 63 65 28 31 31 |die.....place(11|
00000ed0 2c 6d 78 25 2c 6d 79 25 29 0d 05 fa 48 d4 34 2c |,mx%,my%)...H.4,|
00000ee0 2d 31 35 2c 2d 32 30 30 2c 37 30 3a e3 61 3d 31 |-15,-200,70:.a=1|
00000ef0 b8 31 30 30 30 30 3a ed 3a d4 34 2c 2d 31 35 2c |.10000:.:.4,-15,|
00000f00 2d 32 30 30 2c 34 3a e3 61 3d 31 b8 33 30 30 30 |-200,4:.a=1.3000|
00000f10 3a ed 3a d4 34 2c 2d 31 35 2c 2d 31 36 30 2c 33 |:.:.4,-15,-160,3|
00000f20 30 0d 06 04 10 e3 63 3d 30 b8 31 30 30 30 30 3a |0.....c=0.10000:|
00000f30 ed 0d 06 0e 20 44 45 41 44 3d b9 3a 74 6d 25 3d |.... DEAD=.:tm%=|
00000f40 36 30 33 30 2d 28 4c 25 2a 33 30 29 3a 64 70 3d |6030-(L%*30):dp=|
00000f50 a3 0d 06 18 05 e1 0d 06 22 05 3a 0d 06 2c 0d dd |........".:..,..|
00000f60 f2 63 6f 6c 6c 65 63 74 0d 06 36 13 4c 45 56 25 |.collect..6.LEV%|
00000f70 28 6d 78 25 2c 6d 79 25 29 3d 30 0d 06 40 0c 53 |(mx%,my%)=0..@.S|
00000f80 25 3d 53 25 2b 31 30 0d 06 4a 15 f2 66 6f 6e 74 |%=S%+10..J..font|
00000f90 28 c3 28 53 25 29 2c 39 2c 32 38 29 0d 06 54 0e |(.(S%),9,28)..T.|
00000fa0 d4 32 2c 2d 31 30 2c 32 2c 38 0d 06 5e 05 e1 0d |.2,-10,2,8..^...|
00000fb0 06 68 05 3a 0d 06 72 0f dd f2 70 75 73 68 28 78 |.h.:..r...push(x|
00000fc0 2c 79 29 0d 06 7c 3f e7 78 3d 2d 31 20 80 20 6d |,y)..|?.x=-1 . m|
00000fd0 78 25 3d 31 20 84 20 78 3d 31 20 80 20 6d 78 25 |x%=1 . x=1 . mx%|
00000fe0 3d 31 36 20 84 20 79 3d 2d 31 20 80 20 6d 79 25 |=16 . y=-1 . my%|
00000ff0 3d 31 20 84 20 79 3d 31 20 80 20 6d 79 25 3d 38 |=1 . y=1 . my%=8|
00001000 20 e1 0d 06 86 20 e7 20 4c 45 56 25 28 6d 78 25 | .... . LEV%(mx%|
00001010 2b 78 2a 32 2c 6d 79 25 2b 79 2a 32 29 3c 3e 30 |+x*2,my%+y*2)<>0|
00001020 20 e1 0d 06 90 21 e7 20 73 78 25 3d 6d 78 25 2b | ....!. sx%=mx%+|
00001030 78 2a 32 20 80 20 73 79 25 3d 6d 79 25 2b 79 2a |x*2 . sy%=my%+y*|
00001040 32 20 e1 0d 06 9a 7e 4c 45 56 25 28 6d 78 25 2b |2 ....~LEV%(mx%+|
00001050 78 2a 32 2c 6d 79 25 2b 79 2a 32 29 3d 36 3a f2 |x*2,my%+y*2)=6:.|
00001060 70 6c 61 63 65 28 36 2c 6d 78 25 2b 78 2a 32 2c |place(6,mx%+x*2,|
00001070 6d 79 25 2b 79 2a 32 29 3a f2 70 6c 61 63 65 28 |my%+y*2):.place(|
00001080 30 2c 6d 78 25 2c 6d 79 25 29 3a 4c 45 56 25 28 |0,mx%,my%):LEV%(|
00001090 6d 78 25 2b 78 2c 6d 79 25 2b 79 29 3d 30 3a 6d |mx%+x,my%+y)=0:m|
000010a0 78 25 3d 6d 78 25 2b 78 3a 6d 79 25 3d 6d 79 25 |x%=mx%+x:my%=my%|
000010b0 2b 79 3a f2 6d 61 6b 65 79 65 72 6d 69 6e 64 75 |+y:.makeyermindu|
000010c0 70 0d 06 a4 05 e1 0d 06 ae 05 3a 0d 06 b8 0e dd |p.........:.....|
000010d0 f2 67 61 6d 65 6f 76 65 72 0d 06 c2 18 e7 4c 25 |.gameover.....L%|
000010e0 3e 68 69 6c 65 76 20 68 69 6c 65 76 3d 4c 25 2d |>hilev hilev=L%-|
000010f0 31 0d 06 cc 13 e7 68 69 6c 65 76 3d 30 68 69 6c |1.....hilev=0hil|
00001100 65 76 3d 31 0d 06 d6 13 db 3a f2 70 6c 61 63 65 |ev=1.....:.place|
00001110 28 37 2c 30 2c 30 29 0d 06 e0 12 f2 70 6c 61 63 |(7,0,0).....plac|
00001120 65 28 37 2c 31 37 2c 30 29 0d 06 ea 12 d4 32 2c |e(7,17,0).....2,|
00001130 2d 31 35 2c 2d 31 30 30 2c 33 30 0d 06 f4 17 f2 |-15,-100,30.....|
00001140 66 6f 6e 74 28 22 62 65 61 73 74 22 2c 31 36 2c |font("beast",16,|
00001150 35 29 0d 06 fe 1b f1 8a 31 32 2c 36 29 3b 22 3d |5)......12,6);"=|
00001160 2d 3d 2d 3d 2d 3d 2d 3d 2d 3d 2d 3d 22 0d 07 08 |-=-=-=-=-=-="...|
00001170 1c f2 66 6f 6e 74 28 22 67 61 6d 65 20 6f 76 65 |..font("game ove|
00001180 72 22 2c 31 34 2c 31 33 29 0d 07 12 25 f2 66 6f |r",14,13)...%.fo|
00001190 6e 74 28 22 79 6f 75 20 73 63 6f 72 65 64 20 3a |nt("you scored :|
000011a0 22 2b c3 28 53 25 29 2c 31 32 2c 31 38 29 0d 07 |"+.(S%),12,18)..|
000011b0 1c 2b f2 66 6f 6e 74 28 22 61 6e 64 20 72 65 61 |.+.font("and rea|
000011c0 63 68 65 64 20 6c 65 76 65 6c 20 3a 22 2b c3 28 |ched level :"+.(|
000011d0 4c 25 29 2c 38 2c 32 30 29 0d 07 26 25 f2 66 6f |L%),8,20)..&%.fo|
000011e0 6e 74 28 22 70 72 65 73 73 20 73 70 61 63 65 20 |nt("press space |
000011f0 74 6f 20 70 6c 61 79 22 2c 38 2c 32 34 29 0d 07 |to play",8,24)..|
00001200 30 0a f5 fd a6 2d 39 39 0d 07 3a 0b 2a 46 58 32 |0....-99..:.*FX2|
00001210 31 2c 30 0d 07 44 05 db 0d 07 4e 24 f2 66 6f 6e |1,0..D....N$.fon|
00001220 74 28 22 73 74 61 72 74 20 6c 65 76 65 6c 20 31 |t("start level 1|
00001230 20 74 6f 20 31 35 22 2c 30 2c 31 29 0d 07 58 09 | to 15",0,1)..X.|
00001240 6c 76 6c 3d 31 0d 07 62 12 f2 66 6f 6e 74 28 22 |lvl=1..b..font("|
00001250 31 22 2c 30 2c 35 29 0d 07 6c 1f f5 20 c8 97 20 |1",0,5)..l.. .. |
00001260 63 72 69 6e 6b 65 6c 79 2c 62 6f 74 74 6f 6d 2c |crinkely,bottom,|
00001270 66 61 63 74 6f 72 0d 07 76 34 e7 20 66 61 63 74 |factor..v4. fact|
00001280 6f 72 3d 32 20 80 20 6c 76 6c 3e 31 20 6c 76 6c |or=2 . lvl>1 lvl|
00001290 2d 3d 31 3a f2 66 6f 6e 74 28 c3 28 6c 76 6c 29 |-=1:.font(.(lvl)|
000012a0 2b 22 20 20 22 2c 30 2c 35 29 0d 07 80 35 e7 20 |+" ",0,5)...5. |
000012b0 66 61 63 74 6f 72 3d 31 20 80 20 6c 76 6c 3c 31 |factor=1 . lvl<1|
000012c0 35 20 6c 76 6c 2b 3d 31 3a f2 66 6f 6e 74 28 c3 |5 lvl+=1:.font(.|
000012d0 28 6c 76 6c 29 2b 22 20 20 22 2c 30 2c 35 29 0d |(lvl)+" ",0,5).|
000012e0 07 8a 1b e7 20 66 61 63 74 6f 72 3d 34 20 62 3d |.... factor=4 b=|
000012f0 6c 76 6c 3a 73 74 6c 76 3d 62 0d 07 94 0c c8 96 |lvl:stlv=b......|
00001300 3a c8 96 3a c8 96 0d 07 9e 0e fd 20 66 61 63 74 |:..:....... fact|
00001310 6f 72 3d 34 0d 07 a8 20 e7 20 62 3e 31 20 f2 6c |or=4... . b>1 .l|
00001320 65 76 63 68 20 8b 20 70 24 3d 22 4c 45 56 45 4c |evch . p$="LEVEL|
00001330 4f 4e 45 22 0d 07 b2 05 db 0d 07 bc 05 e1 0d 07 |ONE"............|
00001340 c6 05 3a 0d 07 d0 0d dd f2 6e 65 78 74 6c 65 76 |..:......nextlev|
00001350 0d 07 da 10 e7 20 4c 25 3d 31 35 20 f2 65 6e 64 |..... L%=15 .end|
00001360 0d 07 e4 1e e3 6d 3d 31 30 30 b8 32 35 35 3a d4 |.....m=100.255:.|
00001370 32 2c 2d 31 35 2c 6d 2c 31 3a c8 96 3a ed 0d 07 |2,-15,m,1:..:...|
00001380 ee 0c f2 65 6e 6c 61 72 67 65 0d 07 f8 0b 4c 25 |...enlarge....L%|
00001390 3d 4c 25 2b 31 0d 08 02 24 f7 28 32 37 30 30 2b |=L%+1...$.(2700+|
000013a0 28 28 4c 25 2d 31 29 2a 31 31 30 29 29 3a f3 67 |((L%-1)*110)):.g|
000013b0 2c 68 2c 69 2c 6a 2c 70 24 0d 08 0c 0a f2 74 69 |,h,i,j,p$.....ti|
000013c0 74 6c 65 0d 08 16 0b f2 73 63 72 65 65 6e 0d 08 |tle.....screen..|
000013d0 20 0b f2 75 70 64 61 74 65 0d 08 2a 26 4b 45 59 | ..update..*&KEY|
000013e0 3d a3 3a 44 4f 4f 52 3d a3 3a 74 6d 25 3d 36 30 |=.:DOOR=.:tm%=60|
000013f0 33 30 2d 28 4c 25 2a 33 30 29 3a 64 70 3d a3 0d |30-(L%*30):dp=..|
00001400 08 34 05 e1 0d 08 3e 05 3a 0d 08 48 1f dd f2 6c |.4....>.:..H...l|
00001410 65 76 63 68 3a f7 28 32 37 30 30 2b 28 28 62 2d |evch:.(2700+((b-|
00001420 31 29 2a 31 31 30 29 29 0d 08 52 27 f3 67 2c 68 |1)*110))..R'.g,h|
00001430 2c 69 2c 6a 2c 70 24 3a f2 66 6f 6e 74 28 22 70 |,i,j,p$:.font("p|
00001440 61 73 73 77 6f 72 64 20 3a 22 2c 32 2c 39 29 0d |assword :",2,9).|
00001450 08 5c 0a 70 61 24 3d 22 22 0d 08 66 05 f5 0d 08 |.\.pa$=""..f....|
00001460 70 0b f5 20 62 75 74 3d a5 0d 08 7a 28 fd 20 62 |p.. but=...z(. b|
00001470 75 74 3e 36 34 20 80 20 62 75 74 3c 39 31 20 84 |ut>64 . but<91 .|
00001480 20 62 75 74 3d 31 32 37 20 84 20 62 75 74 3d 31 | but=127 . but=1|
00001490 33 0d 08 84 37 e7 20 62 75 74 3c 3e 31 32 37 20 |3...7. but<>127 |
000014a0 80 20 62 75 74 3c 3e 31 33 20 70 61 24 3d 70 61 |. but<>13 pa$=pa|
000014b0 24 2b bd 28 62 75 74 29 3a f2 66 6f 6e 74 28 70 |$+.(but):.font(p|
000014c0 61 24 2c 31 33 2c 39 29 0d 08 8e 3f e7 20 62 75 |a$,13,9)...?. bu|
000014d0 74 3d 31 32 37 20 80 20 a9 28 70 61 24 29 3e 30 |t=127 . .(pa$)>0|
000014e0 20 70 61 24 3d c0 70 61 24 2c a9 28 70 61 24 29 | pa$=.pa$,.(pa$)|
000014f0 2d 31 29 3a f2 66 6f 6e 74 28 70 61 24 2b 22 20 |-1):.font(pa$+" |
00001500 22 2c 31 33 2c 39 29 0d 08 98 16 e7 20 62 75 74 |",13,9)..... but|
00001510 3c 3e 31 33 20 fd 20 62 75 74 3d 31 33 0d 08 a2 |<>13 . but=13...|
00001520 2b e7 20 70 61 24 3c 3e 70 24 20 73 74 6c 76 3d |+. pa$<>p$ stlv=|
00001530 31 3a 70 24 3d 22 4c 45 56 45 4c 4f 4e 45 22 20 |1:p$="LEVELONE" |
00001540 8b 20 73 74 6c 76 3d 62 0d 08 ac 05 e1 0d 08 b6 |. stlv=b........|
00001550 05 3a 0d 08 c0 0a dd f2 6d 69 73 63 0d 08 ca 12 |.:......misc....|
00001560 e7 20 a6 2d 31 30 36 20 f5 fd a6 2d 39 30 0d 08 |. .-106 ...-90..|
00001570 d4 15 e7 20 a6 2d 31 37 20 ff 22 46 58 32 31 30 |... .-17 ."FX210|
00001580 2c 31 22 0d 08 de 15 e7 20 a6 2d 38 32 20 ff 22 |,1"..... .-82 ."|
00001590 46 58 32 31 30 2c 30 22 0d 08 e8 16 e7 20 a6 2d |FX210,0"..... .-|
000015a0 31 31 39 20 ff 22 44 45 53 4b 54 4f 50 22 0d 08 |119 ."DESKTOP"..|
000015b0 f2 42 74 6d 25 2d 3d 91 3a d1 3d 30 3a e7 20 74 |.Btm%-=.:.=0:. t|
000015c0 6d 25 3c 31 30 30 30 20 80 20 ac 20 64 70 20 ff |m%<1000 . . dp .|
000015d0 22 53 43 48 4f 4f 53 45 20 74 69 6d 65 22 3a f0 |"SCHOOSE time":.|
000015e0 32 33 37 2c 31 30 30 2c 38 32 30 3a 64 70 3d b9 |237,100,820:dp=.|
000015f0 0d 08 fc 10 e7 20 74 6d 25 3c 30 20 f2 64 69 65 |..... tm%<0 .die|
00001600 0d 09 06 05 e1 0d 09 10 05 3a 0d 09 1a 0d dd f2 |.........:......|
00001610 65 6e 6c 61 72 67 65 0d 09 24 0d e3 65 6e 74 3d |enlarge..$..ent=|
00001620 31 b8 31 30 0d 09 2e 17 ff 22 53 43 48 4f 4f 53 |1.10....."SCHOOS|
00001630 45 20 62 22 2b c3 28 65 6e 74 29 0d 09 38 14 65 |E b"+.(ent)..8.e|
00001640 6e 78 3d 36 34 30 2d 28 65 6e 74 2a 33 32 29 0d |nx=640-(ent*32).|
00001650 09 42 14 65 6e 79 3d 35 31 32 2d 28 65 6e 74 2a |.B.eny=512-(ent*|
00001660 33 32 29 0d 09 4c 10 f0 32 33 37 2c 65 6e 78 2c |32)..L..237,enx,|
00001670 65 6e 79 0d 09 56 12 e3 77 74 3d 30 b8 35 3a c8 |eny..V..wt=0.5:.|
00001680 96 3a ed 3a ed 0d 09 60 05 e1 0d 09 6a 05 3a 0d |.:.:...`....j.:.|
00001690 09 74 19 dd f2 66 6f 6e 74 28 74 65 78 74 24 2c |.t...font(text$,|
000016a0 74 78 78 2c 74 78 79 29 0d 09 7e 13 e3 63 6e 74 |txx,txy)..~..cnt|
000016b0 3d 31 b8 a9 28 74 65 78 74 24 29 0d 09 88 1c 74 |=1..(text$)....t|
000016c0 78 3d 28 74 78 78 2a 33 32 29 2b 28 28 63 6e 74 |x=(txx*32)+((cnt|
000016d0 2d 31 29 2a 33 32 29 0d 09 92 13 74 79 3d 39 39 |-1)*32)....ty=99|
000016e0 36 2d 28 74 78 79 2a 33 32 29 0d 09 9c 11 74 78 |6-(txy*32)....tx|
000016f0 2b 3d 33 32 3a 74 79 2d 3d 33 32 0d 09 a6 53 e7 |+=32:ty-=32...S.|
00001700 20 c1 74 65 78 74 24 2c 63 6e 74 2c 31 29 3c 3e | .text$,cnt,1)<>|
00001710 22 20 22 20 ff 22 53 43 48 4f 4f 53 45 20 22 2b |" " ."SCHOOSE "+|
00001720 c1 74 65 78 74 24 2c 63 6e 74 2c 31 29 3a f0 32 |.text$,cnt,1):.2|
00001730 33 37 2c 74 78 2c 74 79 20 8b 20 f1 8a 74 78 78 |37,tx,ty . ..txx|
00001740 2b 63 6e 74 2d 31 2c 74 78 79 29 3b 89 31 0d 09 |+cnt-1,txy);.1..|
00001750 b0 05 ed 0d 09 ba 05 e1 0d 09 c4 05 3a 0d 09 ce |............:...|
00001760 13 dd f2 6d 61 6b 65 79 65 72 6d 69 6e 64 75 70 |...makeyermindup|
00001770 0d 09 d8 10 e7 20 78 3d 31 20 63 6a 73 3d 32 30 |..... x=1 cjs=20|
00001780 0d 09 e2 11 e7 20 78 3d 2d 31 20 63 6a 73 3d 31 |..... x=-1 cjs=1|
00001790 38 0d 09 ec 11 e7 20 79 3d 2d 31 20 63 6a 73 3d |8..... y=-1 cjs=|
000017a0 31 39 0d 09 f6 10 e7 20 79 3d 31 20 63 6a 73 3d |19..... y=1 cjs=|
000017b0 31 37 0d 0a 00 17 f2 70 6c 61 63 65 28 63 6a 73 |17.....place(cjs|
000017c0 2c 6d 78 25 2c 6d 79 25 29 0d 0a 0a 05 e1 0d 0a |,mx%,my%).......|
000017d0 14 05 3a 0d 0a 1e 17 f4 20 3e 3e 3e 4c 65 76 65 |..:..... >>>Leve|
000017e0 6c 73 20 44 61 74 61 3c 3c 3c 0d 0a 28 28 dc 30 |ls Data<<<..((.0|
000017f0 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 |,0,0,0,0,0,0,0,0|
*
00001810 2c 30 0d 0a 32 28 dc 30 2c 30 2c 30 2c 30 2c 30 |,0..2(.0,0,0,0,0|
00001820 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 |,0,0,0,0,0,0,0,0|
00001830 2c 30 2c 30 2c 30 2c 30 2c 30 0d 0a 3c 28 dc 30 |,0,0,0,0,0..<(.0|
00001840 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 32 2c 32 |,0,0,0,0,0,0,2,2|
00001850 2c 32 2c 30 2c 30 2c 32 2c 30 2c 30 2c 30 2c 30 |,2,0,0,2,0,0,0,0|
00001860 2c 30 0d 0a 46 28 dc 30 2c 30 2c 30 2c 30 2c 30 |,0..F(.0,0,0,0,0|
00001870 2c 31 2c 31 2c 30 2c 39 2c 30 2c 32 2c 32 2c 30 |,1,1,0,9,0,2,2,0|
00001880 2c 32 2c 30 2c 30 2c 30 2c 30 0d 0a 50 28 dc 30 |,2,0,0,0,0..P(.0|
00001890 2c 30 2c 30 2c 30 2c 32 2c 30 2c 30 2c 36 2c 30 |,0,0,0,2,0,0,6,0|
000018a0 2c 30 2c 30 2c 30 2c 30 2c 32 2c 30 2c 30 2c 30 |,0,0,0,0,2,0,0,0|
000018b0 2c 30 0d 0a 5a 28 dc 30 2c 30 2c 30 2c 30 2c 32 |,0..Z(.0,0,0,0,2|
000018c0 2c 31 2c 31 2c 34 2c 30 2c 31 2c 31 2c 31 2c 33 |,1,1,4,0,1,1,1,3|
000018d0 2c 31 2c 30 2c 30 2c 30 2c 30 0d 0a 64 28 dc 30 |,1,0,0,0,0..d(.0|
000018e0 2c 30 2c 30 2c 30 2c 30 2c 30 2c 31 2c 30 2c 31 |,0,0,0,0,0,1,0,1|
000018f0 2c 30 2c 30 2c 31 2c 33 2c 31 2c 30 2c 30 2c 30 |,0,0,1,3,1,0,0,0|
00001900 2c 30 0d 0a 6e 28 dc 30 2c 30 2c 30 2c 30 2c 30 |,0..n(.0,0,0,0,0|
00001910 2c 30 2c 30 2c 31 2c 30 2c 30 2c 30 2c 31 2c 33 |,0,0,1,0,0,0,1,3|
00001920 2c 31 2c 30 2c 30 2c 30 2c 30 0d 0a 78 29 dc 30 |,1,0,0,0,0..x).0|
00001930 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 |,0,0,0,0,0,0,0,0|
00001940 2c 30 2c 30 2c 31 2c 31 30 2c 31 2c 30 2c 30 2c |,0,0,1,10,1,0,0,|
00001950 30 2c 30 0d 0a 82 28 dc 30 2c 30 2c 30 2c 30 2c |0,0...(.0,0,0,0,|
00001960 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c |0,0,0,0,0,0,0,0,|
00001970 32 2c 30 2c 30 2c 30 2c 30 2c 30 0d 0a 8c 17 dc |2,0,0,0,0,0.....|
00001980 35 2c 34 2c 37 2c 36 2c 22 4c 45 56 45 4c 4f 4e |5,4,7,6,"LEVELON|
00001990 45 22 0d 0a 96 28 dc 30 2c 30 2c 30 2c 30 2c 30 |E"...(.0,0,0,0,0|
000019a0 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 |,0,0,0,0,0,0,0,0|
000019b0 2c 30 2c 30 2c 30 2c 30 2c 30 0d 0a a0 28 dc 30 |,0,0,0,0,0...(.0|
000019c0 2c 31 2c 31 2c 31 2c 34 2c 34 2c 34 2c 30 2c 31 |,1,1,1,4,4,4,0,1|
000019d0 2c 31 2c 31 2c 31 2c 31 2c 31 2c 35 2c 35 2c 35 |,1,1,1,1,1,5,5,5|
000019e0 2c 32 0d 0a aa 29 dc 30 2c 31 2c 30 2c 30 2c 30 |,2...).0,1,0,0,0|
000019f0 2c 31 30 2c 34 2c 30 2c 31 2c 30 2c 36 2c 36 2c |,10,4,0,1,0,6,6,|
00001a00 36 2c 30 2c 33 2c 33 2c 30 2c 32 0d 0a b4 28 dc |6,0,3,3,0,2...(.|
00001a10 30 2c 31 2c 30 2c 34 2c 34 2c 34 2c 34 2c 30 2c |0,1,0,4,4,4,4,0,|
00001a20 31 2c 30 2c 30 2c 30 2c 30 2c 36 2c 30 2c 34 2c |1,0,0,0,0,6,0,4,|
00001a30 35 2c 32 0d 0a be 28 dc 30 2c 31 2c 30 2c 34 2c |5,2...(.0,1,0,4,|
00001a40 30 2c 30 2c 30 2c 34 2c 39 2c 30 2c 36 2c 30 2c |0,0,0,4,9,0,6,0,|
00001a50 36 2c 30 2c 30 2c 30 2c 30 2c 32 0d 0a c8 28 dc |6,0,0,0,0,2...(.|
00001a60 30 2c 31 2c 30 2c 34 2c 30 2c 30 2c 30 2c 30 2c |0,1,0,4,0,0,0,0,|
00001a70 31 2c 30 2c 30 2c 36 2c 30 2c 30 2c 30 2c 30 2c |1,0,0,6,0,0,0,0,|
00001a80 30 2c 32 0d 0a d2 28 dc 30 2c 31 2c 30 2c 34 2c |0,2...(.0,1,0,4,|
00001a90 30 2c 30 2c 30 2c 30 2c 31 2c 36 2c 30 2c 30 2c |0,0,0,0,1,6,0,0,|
00001aa0 30 2c 30 2c 30 2c 30 2c 30 2c 32 0d 0a dc 28 dc |0,0,0,0,0,2...(.|
00001ab0 30 2c 31 2c 30 2c 34 2c 31 2c 31 2c 31 2c 31 2c |0,1,0,4,1,1,1,1,|
00001ac0 30 2c 30 2c 36 2c 30 2c 30 2c 30 2c 30 2c 30 2c |0,0,6,0,0,0,0,0,|
00001ad0 30 2c 35 0d 0a e6 28 dc 30 2c 34 2c 30 2c 30 2c |0,5...(.0,4,0,0,|
00001ae0 30 2c 30 2c 30 2c 30 2c 30 2c 36 2c 30 2c 30 2c |0,0,0,0,0,6,0,0,|
00001af0 30 2c 30 2c 30 2c 30 2c 30 2c 35 0d 0a f0 28 dc |0,0,0,0,0,5...(.|
00001b00 30 2c 34 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c |0,4,1,1,1,1,1,1,|
00001b10 32 2c 35 2c 35 2c 35 2c 35 2c 35 2c 35 2c 35 2c |2,5,5,5,5,5,5,5,|
00001b20 35 2c 35 0d 0a fa 19 dc 31 36 2c 32 2c 31 30 2c |5,5.....16,2,10,|
00001b30 33 2c 22 43 4f 53 57 4f 52 54 48 22 0d 0b 04 29 |3,"COSWORTH"...)|
00001b40 dc 30 2c 31 2c 31 2c 32 2c 32 2c 34 2c 30 2c 32 |.0,1,1,2,2,4,0,2|
00001b50 2c 32 2c 32 2c 32 2c 32 2c 34 2c 34 2c 34 2c 35 |,2,2,2,2,4,4,4,5|
00001b60 2c 35 2c 31 30 0d 0b 0e 28 dc 30 2c 30 2c 33 2c |,5,10...(.0,0,3,|
00001b70 30 2c 34 2c 31 2c 30 2c 33 2c 34 2c 33 2c 35 2c |0,4,1,0,3,4,3,5,|
00001b80 32 2c 32 2c 31 2c 34 2c 33 2c 34 2c 30 0d 0b 18 |2,2,1,4,3,4,0...|
00001b90 28 dc 31 2c 31 2c 31 2c 30 2c 30 2c 35 2c 30 2c |(.1,1,1,0,0,5,0,|
00001ba0 30 2c 34 2c 30 2c 34 2c 35 2c 35 2c 35 2c 34 2c |0,4,0,4,5,5,5,4,|
00001bb0 30 2c 35 2c 30 0d 0b 22 28 dc 32 2c 32 2c 32 2c |0,5,0.."(.2,2,2,|
00001bc0 32 2c 30 2c 33 2c 30 2c 31 2c 35 2c 30 2c 30 2c |2,0,3,0,1,5,0,0,|
00001bd0 30 2c 30 2c 30 2c 30 2c 30 2c 35 2c 30 0d 0b 2c |0,0,0,0,0,5,0..,|
00001be0 28 dc 31 2c 30 2c 30 2c 33 2c 30 2c 34 2c 30 2c |(.1,0,0,3,0,4,0,|
00001bf0 30 2c 31 2c 30 2c 32 2c 32 2c 32 2c 32 2c 32 2c |0,1,0,2,2,2,2,2,|
00001c00 32 2c 35 2c 33 0d 0b 36 28 dc 31 2c 30 2c 35 2c |2,5,3..6(.1,0,5,|
00001c10 35 2c 30 2c 33 2c 30 2c 30 2c 30 2c 30 2c 30 2c |5,0,3,0,0,0,0,0,|
00001c20 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 0d 0b 40 |0,0,0,0,0,0,0..@|
00001c30 28 dc 31 2c 30 2c 30 2c 34 2c 35 2c 35 2c 30 2c |(.1,0,0,4,5,5,0,|
00001c40 30 2c 33 2c 31 2c 30 2c 31 2c 31 2c 35 2c 30 2c |0,3,1,0,1,1,5,0,|
00001c50 34 2c 31 2c 30 0d 0b 4a 28 dc 31 2c 31 2c 30 2c |4,1,0..J(.1,1,0,|
00001c60 34 2c 35 2c 35 2c 30 2c 30 2c 33 2c 31 2c 30 2c |4,5,5,0,0,3,1,0,|
00001c70 31 2c 31 2c 35 2c 30 2c 34 2c 32 2c 30 0d 0b 54 |1,1,5,0,4,2,0..T|
00001c80 28 dc 31 2c 31 2c 30 2c 34 2c 35 2c 34 2c 30 2c |(.1,1,0,4,5,4,0,|
00001c90 35 2c 33 2c 30 2c 30 2c 31 2c 31 2c 35 2c 39 2c |5,3,0,0,1,1,5,9,|
00001ca0 34 2c 31 2c 33 0d 0b 5e 28 dc 30 2c 30 2c 30 2c |4,1,3..^(.0,0,0,|
00001cb0 34 2c 35 2c 31 2c 30 2c 32 2c 32 2c 32 2c 32 2c |4,5,1,0,2,2,2,2,|
00001cc0 32 2c 32 2c 32 2c 32 2c 33 2c 32 2c 32 0d 0b 68 |2,2,2,2,3,2,2..h|
00001cd0 14 dc 30 2c 30 2c 37 2c 31 2c 22 53 49 52 4f 58 |..0,0,7,1,"SIROX|
00001ce0 22 0d 0b 72 28 dc 32 2c 32 2c 32 2c 32 2c 32 2c |"..r(.2,2,2,2,2,|
00001cf0 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c |2,2,2,2,2,2,2,2,|
00001d00 32 2c 33 2c 32 2c 32 2c 32 0d 0b 7c 28 dc 34 2c |2,3,2,2,2..|(.4,|
00001d10 35 2c 34 2c 30 2c 34 2c 35 2c 34 2c 35 2c 33 2c |5,4,0,4,5,4,5,3,|
00001d20 34 2c 35 2c 33 2c 35 2c 34 2c 30 2c 35 2c 35 2c |4,5,3,5,4,0,5,5,|
00001d30 34 0d 0b 86 28 dc 30 2c 36 2c 30 2c 30 2c 31 2c |4...(.0,6,0,0,1,|
00001d40 31 2c 32 2c 32 2c 32 2c 39 2c 32 2c 32 2c 32 2c |1,2,2,2,9,2,2,2,|
00001d50 32 2c 30 2c 34 2c 35 2c 35 0d 0b 90 28 dc 34 2c |2,0,4,5,5...(.4,|
00001d60 34 2c 35 2c 30 2c 31 2c 31 2c 30 2c 30 2c 30 2c |4,5,0,1,1,0,0,0,|
00001d70 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 31 2c 33 2c |0,0,0,0,0,0,1,3,|
00001d80 34 0d 0b 9a 28 dc 33 2c 30 2c 30 2c 30 2c 30 2c |4...(.3,0,0,0,0,|
00001d90 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 33 2c |0,0,0,0,0,0,0,3,|
00001da0 30 2c 36 2c 30 2c 30 2c 30 0d 0b a4 28 dc 31 2c |0,6,0,0,0...(.1,|
00001db0 31 2c 31 2c 35 2c 34 2c 34 2c 32 2c 32 2c 32 2c |1,1,5,4,4,2,2,2,|
00001dc0 32 2c 32 2c 32 2c 32 2c 32 2c 30 2c 31 2c 33 2c |2,2,2,2,2,0,1,3,|
00001dd0 34 0d 0b ae 28 dc 32 2c 32 2c 32 2c 31 2c 31 2c |4...(.2,2,2,1,1,|
00001de0 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 33 2c 34 2c |1,1,1,1,1,1,3,4,|
00001df0 35 2c 30 2c 33 2c 30 2c 35 0d 0b b8 28 dc 31 2c |5,0,3,0,5...(.1,|
00001e00 31 2c 31 2c 35 2c 35 2c 35 2c 33 2c 33 2c 34 2c |1,1,5,5,5,3,3,4,|
00001e10 34 2c 35 2c 35 2c 34 2c 34 2c 30 2c 35 2c 34 2c |4,5,5,4,4,0,5,4,|
00001e20 34 0d 0b c2 28 dc 31 2c 31 2c 31 2c 34 2c 33 2c |4...(.1,1,1,4,3,|
00001e30 30 2c 30 2c 30 2c 30 2c 30 2c 36 2c 30 2c 30 2c |0,0,0,0,0,6,0,0,|
00001e40 30 2c 30 2c 31 2c 31 2c 31 0d 0b cc 29 dc 31 2c |0,0,1,1,1...).1,|
00001e50 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c |1,1,1,1,1,1,1,1,|
00001e60 31 2c 32 2c 32 2c 32 2c 32 2c 30 2c 33 2c 30 2c |1,2,2,2,2,0,3,0,|
00001e70 31 30 0d 0b d6 16 dc 33 2c 31 2c 37 2c 34 2c 22 |10.....3,1,7,4,"|
00001e80 43 48 49 43 41 4e 45 22 0d 0b e0 28 dc 30 2c 36 |CHICANE"...(.0,6|
00001e90 2c 30 2c 30 2c 33 2c 30 2c 30 2c 34 2c 34 2c 34 |,0,0,3,0,0,4,4,4|
00001ea0 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 |,2,2,2,2,2,2,2,2|
00001eb0 0d 0b ea 28 dc 31 2c 31 2c 30 2c 34 2c 30 2c 35 |...(.1,1,0,4,0,5|
00001ec0 2c 30 2c 30 2c 30 2c 33 2c 36 2c 30 2c 31 2c 31 |,0,0,0,3,6,0,1,1|
00001ed0 2c 31 2c 31 2c 31 2c 31 0d 0b f4 28 dc 31 2c 31 |,1,1,1,1...(.1,1|
00001ee0 2c 30 2c 34 2c 30 2c 35 2c 30 2c 34 2c 35 2c 35 |,0,4,0,5,0,4,5,5|
00001ef0 2c 30 2c 35 2c 35 2c 31 2c 31 2c 31 2c 31 2c 31 |,0,5,5,1,1,1,1,1|
00001f00 0d 0b fe 28 dc 31 2c 31 2c 30 2c 34 2c 30 2c 35 |...(.1,1,0,4,0,5|
00001f10 2c 30 2c 34 2c 35 2c 35 2c 30 2c 34 2c 35 2c 31 |,0,4,5,5,0,4,5,1|
00001f20 2c 31 2c 31 2c 31 2c 31 0d 0c 08 28 dc 32 2c 32 |,1,1,1,1...(.2,2|
00001f30 2c 36 2c 35 2c 30 2c 35 2c 31 2c 31 2c 31 2c 31 |,6,5,0,5,1,1,1,1|
00001f40 2c 30 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 |,0,1,1,1,1,1,1,1|
00001f50 0d 0c 12 28 dc 32 2c 32 2c 30 2c 30 2c 30 2c 35 |...(.2,2,0,0,0,5|
00001f60 2c 32 2c 32 2c 32 2c 32 2c 30 2c 32 2c 32 2c 35 |,2,2,2,2,0,2,2,5|
00001f70 2c 35 2c 35 2c 35 2c 35 0d 0c 1c 28 dc 32 2c 32 |,5,5,5,5...(.2,2|
00001f80 2c 30 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 |,0,1,1,1,1,1,1,1|
00001f90 2c 30 2c 30 2c 30 2c 33 2c 30 2c 30 2c 30 2c 30 |,0,0,0,3,0,0,0,0|
00001fa0 0d 0c 26 28 dc 32 2c 32 2c 32 2c 32 2c 32 2c 32 |..&(.2,2,2,2,2,2|
00001fb0 2c 32 2c 32 2c 32 2c 32 2c 34 2c 34 2c 34 2c 34 |,2,2,2,2,4,4,4,4|
00001fc0 2c 34 2c 34 2c 34 2c 30 0d 0c 30 28 dc 31 2c 31 |,4,4,4,0..0(.1,1|
00001fd0 2c 31 2c 30 2c 36 2c 30 2c 30 2c 30 2c 39 2c 30 |,1,0,6,0,0,0,9,0|
00001fe0 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 |,0,0,0,0,0,0,0,0|
00001ff0 0d 0c 3a 29 dc 31 2c 31 2c 31 2c 31 2c 31 30 2c |..:).1,1,1,1,10,|
00002000 34 2c 35 2c 34 2c 35 2c 34 2c 35 2c 34 2c 35 2c |4,5,4,5,4,5,4,5,|
00002010 34 2c 35 2c 34 2c 35 2c 34 0d 0c 44 17 dc 30 2c |4,5,4,5,4..D..0,|
00002020 30 2c 37 2c 31 2c 22 4d 55 54 49 4c 41 54 45 22 |0,7,1,"MUTILATE"|
00002030 0d 0c 4e 28 dc 32 2c 32 2c 32 2c 32 2c 32 2c 32 |..N(.2,2,2,2,2,2|
00002040 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 |,2,2,2,2,2,2,2,2|
00002050 2c 32 2c 32 2c 32 2c 32 0d 0c 58 28 dc 30 2c 30 |,2,2,2,2..X(.0,0|
00002060 2c 36 2c 30 2c 31 2c 30 2c 30 2c 30 2c 30 2c 30 |,6,0,1,0,0,0,0,0|
00002070 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 31 |,0,0,0,0,0,0,0,1|
00002080 0d 0c 62 28 dc 30 2c 31 2c 30 2c 34 2c 33 2c 33 |..b(.0,1,0,4,3,3|
00002090 2c 34 2c 35 2c 34 2c 35 2c 34 2c 33 2c 34 2c 35 |,4,5,4,5,4,3,4,5|
000020a0 2c 39 2c 35 2c 33 2c 31 0d 0c 6c 28 dc 31 2c 31 |,9,5,3,1..l(.1,1|
000020b0 2c 30 2c 30 2c 30 2c 34 2c 32 2c 32 2c 32 2c 32 |,0,0,0,4,2,2,2,2|
000020c0 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 33 2c 31 |,2,2,2,2,2,2,3,1|
000020d0 0d 0c 76 28 dc 31 2c 31 2c 31 2c 31 2c 31 2c 31 |..v(.1,1,1,1,1,1|
000020e0 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 |,1,1,1,1,1,1,1,1|
000020f0 2c 31 2c 31 2c 30 2c 31 0d 0c 80 28 dc 32 2c 32 |,1,1,0,1...(.2,2|
00002100 2c 32 2c 32 2c 32 2c 30 2c 36 2c 30 2c 30 2c 33 |,2,2,2,0,6,0,0,3|
00002110 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 35 |,0,0,0,0,0,0,0,5|
00002120 0d 0c 8a 28 dc 31 2c 30 2c 30 2c 33 2c 30 2c 30 |...(.1,0,0,3,0,0|
00002130 2c 30 2c 31 2c 31 2c 34 2c 35 2c 34 2c 35 2c 34 |,0,1,1,4,5,4,5,4|
00002140 2c 35 2c 34 2c 35 2c 31 0d 0c 94 28 dc 31 2c 30 |,5,4,5,1...(.1,0|
00002150 2c 34 2c 35 2c 34 2c 34 2c 30 2c 33 2c 30 2c 30 |,4,5,4,4,0,3,0,0|
00002160 2c 30 2c 30 2c 34 2c 35 2c 30 2c 33 2c 35 2c 31 |,0,0,4,5,0,3,5,1|
00002170 0d 0c 9e 28 dc 31 2c 31 2c 31 2c 31 2c 31 2c 31 |...(.1,1,1,1,1,1|
00002180 2c 31 2c 35 2c 35 2c 35 2c 35 2c 30 2c 30 2c 30 |,1,5,5,5,5,0,0,0|
00002190 2c 30 2c 35 2c 35 2c 35 0d 0c a8 29 dc 31 2c 34 |,0,5,5,5...).1,4|
000021a0 2c 34 2c 34 2c 34 2c 34 2c 31 30 2c 30 2c 30 2c |,4,4,4,4,10,0,0,|
000021b0 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 35 2c 35 2c |0,0,0,0,0,0,5,5,|
000021c0 31 0d 0c b2 17 dc 30 2c 32 2c 36 2c 31 2c 22 43 |1.....0,2,6,1,"C|
000021d0 4f 43 4f 50 4c 45 58 22 0d 0c bc 29 dc 31 30 2c |OCOPLEX"...).10,|
000021e0 30 2c 33 2c 30 2c 35 2c 30 2c 30 2c 31 2c 39 2c |0,3,0,5,0,0,1,9,|
000021f0 31 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c |1,0,0,0,0,0,0,0,|
00002200 36 0d 0c c6 28 dc 33 2c 30 2c 31 2c 30 2c 31 2c |6...(.3,0,1,0,1,|
00002210 30 2c 30 2c 31 2c 30 2c 31 2c 30 2c 30 2c 31 2c |0,0,1,0,1,0,0,1,|
00002220 30 2c 31 2c 33 2c 31 2c 30 0d 0c d0 28 dc 30 2c |0,1,3,1,0...(.0,|
00002230 33 2c 31 2c 30 2c 31 2c 30 2c 36 2c 30 2c 30 2c |3,1,0,1,0,6,0,0,|
00002240 31 2c 30 2c 30 2c 31 2c 34 2c 31 2c 30 2c 31 2c |1,0,0,1,4,1,0,1,|
00002250 36 0d 0c da 28 dc 33 2c 30 2c 31 2c 30 2c 30 2c |6...(.3,0,1,0,0,|
00002260 30 2c 30 2c 31 2c 30 2c 30 2c 30 2c 30 2c 30 2c |0,0,1,0,0,0,0,0,|
00002270 30 2c 30 2c 30 2c 36 2c 30 0d 0c e4 28 dc 31 2c |0,0,0,6,0...(.1,|
00002280 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 30 2c |1,1,1,1,1,1,1,0,|
00002290 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c |1,1,1,1,1,1,1,1,|
000022a0 33 0d 0c ee 28 dc 33 2c 30 2c 30 2c 32 2c 32 2c |3...(.3,0,0,2,2,|
000022b0 32 2c 30 2c 31 2c 30 2c 31 2c 35 2c 33 2c 31 2c |2,0,1,0,1,5,3,1,|
000022c0 33 2c 33 2c 33 2c 30 2c 30 0d 0c f8 28 dc 34 2c |3,3,3,0,0...(.4,|
000022d0 34 2c 30 2c 32 2c 39 2c 30 2c 30 2c 36 2c 30 2c |4,0,2,9,0,0,6,0,|
000022e0 31 2c 33 2c 30 2c 31 2c 33 2c 31 2c 31 2c 31 2c |1,3,0,1,3,1,1,1,|
000022f0 30 0d 0d 02 28 dc 30 2c 30 2c 33 2c 32 2c 32 2c |0...(.0,0,3,2,2,|
00002300 32 2c 36 2c 30 2c 30 2c 30 2c 30 2c 33 2c 31 2c |2,6,0,0,0,0,3,1,|
00002310 30 2c 31 2c 30 2c 30 2c 30 0d 0d 0c 28 dc 30 2c |0,1,0,0,0...(.0,|
00002320 30 2c 30 2c 30 2c 30 2c 36 2c 30 2c 31 2c 30 2c |0,0,0,0,6,0,1,0,|
00002330 31 2c 33 2c 30 2c 31 2c 30 2c 31 2c 30 2c 31 2c |1,3,0,1,0,1,0,1,|
00002340 36 0d 0d 16 28 dc 33 2c 31 2c 33 2c 35 2c 33 2c |6...(.3,1,3,5,3,|
00002350 35 2c 30 2c 31 2c 30 2c 31 2c 30 2c 30 2c 30 2c |5,0,1,0,1,0,0,0,|
00002360 30 2c 36 2c 30 2c 31 2c 30 0d 0d 20 1a dc 31 37 |0,6,0,1,0.. ..17|
00002370 2c 39 2c 38 2c 39 2c 22 46 4c 4f 4e 47 59 50 4f |,9,8,9,"FLONGYPO|
00002380 4e 47 22 0d 0d 2a 29 dc 31 30 2c 30 2c 30 2c 30 |NG"..*).10,0,0,0|
00002390 2c 30 2c 30 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 |,0,0,2,2,2,2,2,2|
000023a0 2c 32 2c 32 2c 32 2c 31 2c 30 2c 35 0d 0d 34 28 |,2,2,2,1,0,5..4(|
000023b0 dc 31 2c 31 2c 35 2c 31 2c 31 2c 33 2c 31 2c 31 |.1,1,5,1,1,3,1,1|
000023c0 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 |,1,1,1,1,1,1,1,1|
000023d0 2c 30 2c 34 0d 0d 3e 28 dc 31 2c 35 2c 35 2c 35 |,0,4..>(.1,5,5,5|
000023e0 2c 31 2c 30 2c 34 2c 34 2c 35 2c 35 2c 33 2c 34 |,1,0,4,4,5,5,3,4|
000023f0 2c 35 2c 35 2c 35 2c 31 2c 30 2c 35 0d 0d 48 28 |,5,5,5,1,0,5..H(|
00002400 dc 31 2c 34 2c 33 2c 30 2c 35 2c 30 2c 30 2c 30 |.1,4,3,0,5,0,0,0|
00002410 2c 30 2c 30 2c 35 2c 35 2c 35 2c 35 2c 33 2c 34 |,0,0,5,5,5,5,3,4|
00002420 2c 30 2c 34 0d 0d 52 28 dc 31 2c 34 2c 31 2c 30 |,0,4..R(.1,4,1,0|
00002430 2c 31 2c 35 2c 35 2c 35 2c 35 2c 30 2c 35 2c 35 |,1,5,5,5,5,0,5,5|
00002440 2c 35 2c 30 2c 30 2c 34 2c 30 2c 39 0d 0d 5c 28 |,5,0,0,4,0,9..\(|
00002450 dc 31 2c 31 2c 30 2c 36 2c 30 2c 30 2c 30 2c 30 |.1,1,0,6,0,0,0,0|
00002460 2c 30 2c 36 2c 30 2c 30 2c 30 2c 30 2c 30 2c 35 |,0,6,0,0,0,0,0,5|
00002470 2c 30 2c 35 0d 0d 66 28 dc 31 2c 34 2c 31 2c 30 |,0,5..f(.1,4,1,0|
00002480 2c 34 2c 30 2c 30 2c 34 2c 34 2c 30 2c 34 2c 34 |,4,0,0,4,4,0,4,4|
00002490 2c 34 2c 30 2c 30 2c 35 2c 30 2c 34 0d 0d 70 28 |,4,0,0,5,0,4..p(|
000024a0 dc 31 2c 31 2c 30 2c 34 2c 30 2c 30 2c 34 2c 35 |.1,1,0,4,0,0,4,5|
000024b0 2c 35 2c 30 2c 30 2c 30 2c 31 2c 34 2c 30 2c 31 |,5,0,0,0,1,4,0,1|
000024c0 2c 30 2c 34 0d 0d 7a 28 dc 31 2c 31 2c 34 2c 30 |,0,4..z(.1,1,4,0|
000024d0 2c 30 2c 34 2c 31 2c 31 2c 31 2c 34 2c 34 2c 33 |,0,4,1,1,1,4,4,3|
000024e0 2c 31 2c 34 2c 30 2c 31 2c 30 2c 34 0d 0d 84 28 |,1,4,0,1,0,4...(|
000024f0 dc 30 2c 30 2c 30 2c 30 2c 34 2c 32 2c 32 2c 32 |.0,0,0,0,4,2,2,2|
00002500 2c 32 2c 34 2c 34 2c 32 2c 31 2c 34 2c 30 2c 30 |,2,4,4,2,1,4,0,0|
00002510 2c 30 2c 35 0d 0d 8e 19 dc 30 2c 39 2c 31 36 2c |,0,5.....0,9,16,|
00002520 30 2c 22 42 41 4e 41 4e 41 42 55 53 22 0d 0d 98 |0,"BANANABUS"...|
00002530 28 dc 35 2c 35 2c 30 2c 36 2c 30 2c 30 2c 33 2c |(.5,5,0,6,0,0,3,|
00002540 30 2c 30 2c 33 2c 30 2c 30 2c 33 2c 31 2c 30 2c |0,0,3,0,0,3,1,0,|
00002550 30 2c 30 2c 30 0d 0d a2 28 dc 35 2c 39 2c 30 2c |0,0,0...(.5,9,0,|
00002560 30 2c 30 2c 35 2c 34 2c 35 2c 34 2c 35 2c 34 2c |0,0,5,4,5,4,5,4,|
00002570 35 2c 34 2c 30 2c 34 2c 30 2c 31 2c 31 0d 0d ac |5,4,0,4,0,1,1...|
00002580 28 dc 32 2c 32 2c 32 2c 32 2c 30 2c 32 2c 32 2c |(.2,2,2,2,0,2,2,|
00002590 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 30 2c 30 2c |2,2,2,2,2,2,0,0,|
000025a0 30 2c 31 2c 31 0d 0d b6 28 dc 30 2c 30 2c 30 2c |0,1,1...(.0,0,0,|
000025b0 30 2c 30 2c 30 2c 30 2c 30 2c 31 2c 30 2c 30 2c |0,0,0,0,0,1,0,0,|
000025c0 30 2c 33 2c 33 2c 33 2c 30 2c 30 2c 31 0d 0d c0 |0,3,3,3,0,0,1...|
000025d0 28 dc 31 2c 31 2c 31 2c 30 2c 31 2c 31 2c 31 2c |(.1,1,1,0,1,1,1,|
000025e0 31 2c 31 2c 30 2c 34 2c 35 2c 34 2c 35 2c 34 2c |1,1,0,4,5,4,5,4,|
000025f0 30 2c 30 2c 31 0d 0d ca 28 dc 31 2c 31 2c 31 2c |0,0,1...(.1,1,1,|
00002600 30 2c 30 2c 33 2c 33 2c 30 2c 30 2c 30 2c 31 2c |0,0,3,3,0,0,0,1,|
00002610 31 2c 31 2c 30 2c 30 2c 30 2c 35 2c 31 0d 0d d4 |1,1,0,0,0,5,1...|
00002620 28 dc 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c |(.2,2,2,2,2,2,2,|
00002630 32 2c 32 2c 32 2c 32 2c 32 2c 30 2c 33 2c 34 2c |2,2,2,2,2,0,3,4,|
00002640 34 2c 34 2c 31 0d 0d de 28 dc 32 2c 32 2c 32 2c |4,4,1...(.2,2,2,|
00002650 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 33 2c |2,2,2,2,2,2,2,3,|
00002660 33 2c 30 2c 35 2c 35 2c 35 2c 35 2c 32 0d 0d e8 |3,0,5,5,5,5,2...|
00002670 28 dc 31 2c 30 2c 36 2c 30 2c 30 2c 34 2c 30 2c |(.1,0,6,0,0,4,0,|
00002680 30 2c 30 2c 34 2c 30 2c 30 2c 34 2c 34 2c 34 2c |0,0,4,0,0,4,4,4,|
00002690 34 2c 34 2c 31 0d 0d f2 29 dc 31 30 2c 30 2c 30 |4,4,1...).10,0,0|
000026a0 2c 35 2c 30 2c 30 2c 30 2c 35 2c 30 2c 30 2c 33 |,5,0,0,0,5,0,0,3|
000026b0 2c 35 2c 35 2c 35 2c 35 2c 35 2c 35 2c 31 0d 0d |,5,5,5,5,5,5,1..|
000026c0 fc 1c dc 31 37 2c 30 2c 30 2c 34 2c 22 46 4c 41 |...17,0,0,4,"FLA|
000026d0 47 45 4c 4c 41 54 49 4f 4e 22 0d 0e 06 29 dc 32 |GELLATION"...).2|
000026e0 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 |,2,2,2,2,2,2,2,2|
*
00002700 2c 31 30 0d 0e 10 28 dc 30 2c 39 2c 30 2c 31 2c |,10...(.0,9,0,1,|
00002710 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c |0,0,0,0,0,0,0,0,|
00002720 30 2c 30 2c 31 2c 34 2c 35 2c 30 0d 0e 1a 28 dc |0,0,1,4,5,0...(.|
00002730 30 2c 31 2c 30 2c 33 2c 33 2c 34 2c 35 2c 34 2c |0,1,0,3,3,4,5,4,|
00002740 30 2c 35 2c 34 2c 35 2c 34 2c 35 2c 34 2c 35 2c |0,5,4,5,4,5,4,5,|
00002750 30 2c 30 0d 0e 24 28 dc 30 2c 33 2c 31 2c 31 2c |0,0..$(.0,3,1,1,|
00002760 31 2c 31 2c 31 2c 31 2c 30 2c 30 2c 35 2c 34 2c |1,1,1,1,0,0,5,4,|
00002770 34 2c 35 2c 30 2c 30 2c 30 2c 30 0d 0e 2e 28 dc |4,5,0,0,0,0...(.|
00002780 35 2c 30 2c 30 2c 31 2c 33 2c 30 2c 30 2c 30 2c |5,0,0,1,3,0,0,0,|
00002790 31 2c 30 2c 34 2c 35 2c 35 2c 34 2c 36 2c 30 2c |1,0,4,5,5,4,6,0,|
000027a0 31 2c 30 0d 0e 38 28 dc 31 2c 35 2c 30 2c 30 2c |1,0..8(.1,5,0,0,|
000027b0 31 2c 33 2c 33 2c 30 2c 30 2c 30 2c 30 2c 35 2c |1,3,3,0,0,0,0,5,|
000027c0 34 2c 35 2c 30 2c 31 2c 31 2c 30 0d 0e 42 28 dc |4,5,0,1,1,0..B(.|
000027d0 35 2c 35 2c 35 2c 30 2c 30 2c 31 2c 33 2c 30 2c |5,5,5,0,0,1,3,0,|
000027e0 30 2c 35 2c 30 2c 30 2c 34 2c 30 2c 30 2c 31 2c |0,5,0,0,4,0,0,1,|
000027f0 31 2c 30 0d 0e 4c 28 dc 30 2c 30 2c 30 2c 30 2c |1,0..L(.0,0,0,0,|
00002800 30 2c 33 2c 31 2c 35 2c 30 2c 30 2c 34 2c 30 2c |0,3,1,5,0,0,4,0,|
00002810 30 2c 30 2c 35 2c 35 2c 35 2c 33 0d 0e 56 28 dc |0,0,5,5,5,3..V(.|
00002820 30 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c |0,2,2,2,2,2,2,2,|
00002830 35 2c 32 2c 32 2c 32 2c 32 2c 32 2c 34 2c 34 2c |5,2,2,2,2,2,4,4,|
00002840 33 2c 33 0d 0e 60 28 dc 30 2c 30 2c 30 2c 30 2c |3,3..`(.0,0,0,0,|
00002850 33 2c 30 2c 30 2c 30 2c 30 2c 31 2c 31 2c 31 2c |3,0,0,0,0,1,1,1,|
00002860 31 2c 31 2c 31 2c 31 2c 31 2c 31 0d 0e 6a 1c dc |1,1,1,1,1,1..j..|
00002870 39 2c 39 2c 35 2c 31 2c 22 50 41 59 54 48 45 50 |9,9,5,1,"PAYTHEP|
00002880 45 4e 41 4c 54 59 22 0d 0e 74 29 dc 31 30 2c 30 |ENALTY"..t).10,0|
00002890 2c 30 2c 30 2c 31 2c 34 2c 33 2c 35 2c 30 2c 30 |,0,0,1,4,3,5,0,0|
000028a0 2c 33 2c 33 2c 35 2c 35 2c 31 2c 30 2c 35 2c 33 |,3,3,5,5,1,0,5,3|
000028b0 0d 0e 7e 28 dc 30 2c 31 2c 30 2c 36 2c 30 2c 30 |..~(.0,1,0,6,0,0|
000028c0 2c 30 2c 30 2c 30 2c 31 2c 34 2c 30 2c 30 2c 30 |,0,0,0,1,4,0,0,0|
000028d0 2c 30 2c 30 2c 30 2c 33 0d 0e 88 28 dc 30 2c 30 |,0,0,0,3...(.0,0|
000028e0 2c 30 2c 36 2c 31 2c 30 2c 30 2c 35 2c 34 2c 31 |,0,6,1,0,0,5,4,1|
000028f0 2c 35 2c 30 2c 34 2c 34 2c 31 2c 34 2c 35 2c 33 |,5,0,4,4,1,4,5,3|
00002900 0d 0e 92 28 dc 34 2c 34 2c 34 2c 30 2c 31 2c 31 |...(.4,4,4,0,1,1|
00002910 2c 31 2c 31 2c 34 2c 39 2c 35 2c 30 2c 31 2c 31 |,1,1,4,9,5,0,1,1|
00002920 2c 31 2c 34 2c 35 2c 33 0d 0e 9c 28 dc 31 2c 30 |,1,4,5,3...(.1,0|
00002930 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 |,0,0,0,0,0,0,0,0|
00002940 2c 30 2c 30 2c 30 2c 30 2c 31 2c 31 2c 31 2c 31 |,0,0,0,0,1,1,1,1|
00002950 0d 0e a6 28 dc 31 2c 31 2c 31 2c 31 2c 31 2c 31 |...(.1,1,1,1,1,1|
00002960 2c 31 2c 31 2c 31 2c 31 2c 30 2c 31 2c 31 2c 31 |,1,1,1,1,0,1,1,1|
00002970 2c 31 2c 35 2c 35 2c 31 0d 0e b0 28 dc 30 2c 33 |,1,5,5,1...(.0,3|
00002980 2c 33 2c 33 2c 31 2c 30 2c 34 2c 30 2c 33 2c 30 |,3,3,1,0,4,0,3,0|
00002990 2c 30 2c 35 2c 30 2c 30 2c 30 2c 30 2c 30 2c 31 |,0,5,0,0,0,0,0,1|
000029a0 0d 0e ba 28 dc 36 2c 35 2c 30 2c 35 2c 31 2c 34 |...(.6,5,0,5,1,4|
000029b0 2c 30 2c 30 2c 34 2c 31 2c 30 2c 30 2c 33 2c 31 |,0,0,4,1,0,0,3,1|
000029c0 2c 31 2c 35 2c 30 2c 31 0d 0e c4 28 dc 30 2c 36 |,1,5,0,1...(.0,6|
000029d0 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 31 2c 31 |,0,0,0,0,0,0,1,1|
000029e0 2c 34 2c 34 2c 34 2c 31 2c 31 2c 35 2c 33 2c 31 |,4,4,4,1,1,5,3,1|
000029f0 0d 0e ce 28 dc 31 2c 31 2c 31 2c 31 2c 31 2c 31 |...(.1,1,1,1,1,1|
00002a00 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 |,1,1,1,1,1,1,1,1|
00002a10 2c 31 2c 31 2c 31 2c 31 0d 0e d8 19 dc 30 2c 38 |,1,1,1,1.....0,8|
00002a20 2c 31 2c 34 2c 22 50 55 4e 49 53 48 4d 45 4e 54 |,1,4,"PUNISHMENT|
00002a30 22 0d 0e e2 29 dc 30 2c 30 2c 30 2c 30 2c 30 2c |"...).0,0,0,0,0,|
00002a40 30 2c 30 2c 30 2c 31 30 2c 31 2c 32 2c 32 2c 32 |0,0,0,10,1,2,2,2|
00002a50 2c 32 2c 32 2c 32 2c 32 2c 32 0d 0e ec 28 dc 30 |,2,2,2,2,2...(.0|
00002a60 2c 35 2c 35 2c 30 2c 34 2c 34 2c 34 2c 35 2c 31 |,5,5,0,4,4,4,5,1|
00002a70 2c 34 2c 34 2c 30 2c 33 2c 30 2c 30 2c 30 2c 30 |,4,4,0,3,0,0,0,0|
00002a80 2c 34 0d 0e f6 28 dc 30 2c 35 2c 35 2c 30 2c 35 |,4...(.0,5,5,0,5|
00002a90 2c 35 2c 35 2c 35 2c 39 2c 34 2c 34 2c 34 2c 30 |,5,5,5,9,4,4,4,0|
00002aa0 2c 31 2c 31 2c 34 2c 30 2c 30 0d 0f 00 28 dc 30 |,1,1,4,0,0...(.0|
00002ab0 2c 35 2c 34 2c 33 2c 33 2c 35 2c 30 2c 30 2c 30 |,5,4,3,3,5,0,0,0|
00002ac0 2c 30 2c 30 2c 34 2c 30 2c 30 2c 30 2c 34 2c 34 |,0,0,4,0,0,0,4,4|
00002ad0 2c 30 0d 0f 0a 28 dc 30 2c 34 2c 35 2c 33 2c 30 |,0...(.0,4,5,3,0|
00002ae0 2c 33 2c 33 2c 30 2c 30 2c 35 2c 33 2c 33 2c 34 |,3,3,0,0,5,3,3,4|
00002af0 2c 30 2c 30 2c 34 2c 33 2c 30 0d 0f 14 28 dc 30 |,0,0,4,3,0...(.0|
00002b00 2c 35 2c 35 2c 35 2c 33 2c 31 2c 31 2c 30 2c 33 |,5,5,5,3,1,1,0,3|
00002b10 2c 30 2c 30 2c 33 2c 30 2c 34 2c 30 2c 34 2c 33 |,0,0,3,0,4,0,4,3|
00002b20 2c 30 0d 0f 1e 28 dc 30 2c 35 2c 35 2c 30 2c 30 |,0...(.0,5,5,0,0|
00002b30 2c 31 2c 31 2c 34 2c 30 2c 30 2c 30 2c 34 2c 31 |,1,1,4,0,0,0,4,1|
00002b40 2c 30 2c 30 2c 34 2c 30 2c 30 0d 0f 28 28 dc 30 |,0,0,4,0,0..((.0|
00002b50 2c 35 2c 30 2c 30 2c 35 2c 35 2c 31 2c 31 2c 35 |,5,0,0,5,5,1,1,5|
00002b60 2c 30 2c 30 2c 30 2c 31 2c 30 2c 30 2c 34 2c 31 |,0,0,0,1,0,0,4,1|
00002b70 2c 36 0d 0f 32 28 dc 30 2c 30 2c 30 2c 35 2c 35 |,6..2(.0,0,0,5,5|
00002b80 2c 31 2c 31 2c 31 2c 31 2c 35 2c 30 2c 30 2c 30 |,1,1,1,1,5,0,0,0|
00002b90 2c 34 2c 30 2c 34 2c 34 2c 30 0d 0f 3c 28 dc 31 |,4,0,4,4,0..<(.1|
00002ba0 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 |,1,1,1,1,1,1,1,1|
00002bb0 2c 31 2c 31 2c 35 2c 30 2c 30 2c 30 2c 30 2c 33 |,1,1,5,0,0,0,0,3|
00002bc0 2c 34 0d 0f 46 1c dc 31 37 2c 38 2c 36 2c 33 2c |,4..F..17,8,6,3,|
00002bd0 22 49 4e 43 49 44 45 4e 54 41 4c 4c 59 22 0d 0f |"INCIDENTALLY"..|
00002be0 50 29 dc 32 2c 32 2c 32 2c 32 2c 31 2c 31 2c 31 |P).2,2,2,2,1,1,1|
00002bf0 2c 31 2c 31 2c 31 2c 31 2c 31 2c 35 2c 35 2c 31 |,1,1,1,1,1,5,5,1|
00002c00 2c 35 2c 30 2c 31 36 0d 0f 5a 28 dc 32 2c 32 2c |,5,0,16..Z(.2,2,|
00002c10 32 2c 31 2c 35 2c 34 2c 35 2c 34 2c 30 2c 30 2c |2,1,5,4,5,4,0,0,|
00002c20 33 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 33 0d |3,0,0,0,0,0,0,3.|
00002c30 0f 64 28 dc 32 2c 32 2c 32 2c 30 2c 30 2c 30 2c |.d(.2,2,2,0,0,0,|
00002c40 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 31 2c |0,0,0,0,0,0,0,1,|
00002c50 34 2c 30 2c 31 2c 31 0d 0f 6e 29 dc 32 2c 31 2c |4,0,1,1..n).2,1,|
00002c60 31 2c 31 2c 31 2c 31 2c 31 2c 30 2c 31 32 2c 31 |1,1,1,1,1,0,12,1|
00002c70 2c 31 2c 31 2c 31 2c 31 2c 31 2c 30 2c 33 2c 31 |,1,1,1,1,1,0,3,1|
00002c80 0d 0f 78 28 dc 31 2c 30 2c 30 2c 30 2c 30 2c 30 |..x(.1,0,0,0,0,0|
00002c90 2c 30 2c 30 2c 35 2c 34 2c 34 2c 30 2c 30 2c 30 |,0,0,5,4,4,0,0,0|
00002ca0 2c 39 2c 31 2c 31 2c 31 0d 0f 82 28 dc 31 2c 30 |,9,1,1,1...(.1,0|
00002cb0 2c 31 2c 31 2c 31 2c 31 2c 34 2c 30 2c 30 2c 30 |,1,1,1,1,4,0,0,0|
00002cc0 2c 30 2c 30 2c 35 2c 31 2c 31 2c 31 2c 31 2c 31 |,0,0,5,1,1,1,1,1|
00002cd0 0d 0f 8c 28 dc 31 2c 33 2c 31 2c 33 2c 33 2c 31 |...(.1,3,1,3,3,1|
00002ce0 2c 30 2c 30 2c 35 2c 34 2c 34 2c 34 2c 30 2c 31 |,0,0,5,4,4,4,0,1|
00002cf0 2c 33 2c 34 2c 31 2c 31 0d 0f 96 28 dc 31 2c 31 |,3,4,1,1...(.1,1|
00002d00 2c 31 2c 33 2c 33 2c 31 2c 30 2c 31 2c 31 2c 31 |,1,3,3,1,0,1,1,1|
00002d10 2c 31 2c 31 2c 31 2c 31 2c 33 2c 34 2c 31 2c 31 |,1,1,1,1,3,4,1,1|
00002d20 0d 0f a0 28 dc 34 2c 35 2c 34 2c 31 2c 30 2c 35 |...(.4,5,4,1,0,5|
00002d30 2c 30 2c 30 2c 30 2c 35 2c 30 2c 30 2c 30 2c 34 |,0,0,0,5,0,0,0,4|
00002d40 2c 30 2c 31 2c 35 2c 35 0d 0f aa 28 dc 34 2c 35 |,0,1,5,5...(.4,5|
00002d50 2c 34 2c 35 2c 30 2c 30 2c 30 2c 34 2c 30 2c 30 |,4,5,0,0,0,4,0,0|
00002d60 2c 30 2c 31 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 |,0,1,0,0,0,0,0,0|
00002d70 0d 0f b4 1a dc 38 2c 31 2c 33 2c 32 2c 22 46 49 |.....8,1,3,2,"FI|
00002d80 4e 44 54 48 45 44 4f 4f 52 22 0d 0f be 29 dc 32 |NDTHEDOOR"...).2|
00002d90 2c 32 2c 32 2c 36 2c 30 2c 36 2c 30 2c 33 2c 31 |,2,2,6,0,6,0,3,1|
00002da0 30 2c 35 2c 34 2c 30 2c 30 2c 30 2c 30 2c 32 2c |0,5,4,0,0,0,0,2,|
00002db0 35 2c 32 0d 0f c8 28 dc 32 2c 36 2c 32 2c 36 2c |5,2...(.2,6,2,6,|
00002dc0 30 2c 30 2c 36 2c 30 2c 36 2c 31 2c 31 2c 35 2c |0,0,6,0,6,1,1,5,|
00002dd0 34 2c 33 2c 30 2c 34 2c 39 2c 34 0d 0f d2 28 dc |4,3,0,4,9,4...(.|
00002de0 32 2c 36 2c 32 2c 32 2c 36 2c 31 2c 32 2c 31 2c |2,6,2,2,6,1,2,1,|
00002df0 31 2c 30 2c 33 2c 30 2c 30 2c 30 2c 30 2c 32 2c |1,0,3,0,0,0,0,2,|
00002e00 30 2c 32 0d 0f dc 28 dc 32 2c 34 2c 32 2c 30 2c |0,2...(.2,4,2,0,|
00002e10 30 2c 30 2c 34 2c 30 2c 31 2c 31 2c 31 2c 30 2c |0,0,4,0,1,1,1,0,|
00002e20 30 2c 36 2c 30 2c 32 2c 33 2c 32 0d 0f e6 28 dc |0,6,0,2,3,2...(.|
00002e30 32 2c 35 2c 32 2c 30 2c 30 2c 35 2c 30 2c 35 2c |2,5,2,0,0,5,0,5,|
00002e40 34 2c 35 2c 32 2c 33 2c 34 2c 30 2c 30 2c 32 2c |4,5,2,3,4,0,0,2,|
00002e50 30 2c 32 0d 0f f0 28 dc 32 2c 34 2c 32 2c 30 2c |0,2...(.2,4,2,0,|
00002e60 30 2c 30 2c 30 2c 30 2c 32 2c 32 2c 32 2c 33 2c |0,0,0,0,2,2,2,3,|
00002e70 34 2c 35 2c 30 2c 32 2c 33 2c 32 0d 0f fa 28 dc |4,5,0,2,3,2...(.|
00002e80 32 2c 35 2c 32 2c 33 2c 30 2c 34 2c 30 2c 30 2c |2,5,2,3,0,4,0,0,|
00002e90 33 2c 33 2c 33 2c 33 2c 30 2c 30 2c 30 2c 32 2c |3,3,3,3,0,0,0,2,|
00002ea0 30 2c 32 0d 10 04 28 dc 32 2c 30 2c 32 2c 33 2c |0,2...(.2,0,2,3,|
00002eb0 33 2c 31 2c 33 2c 31 2c 31 2c 31 2c 31 2c 31 2c |3,1,3,1,1,1,1,1,|
00002ec0 31 2c 31 2c 31 2c 32 2c 33 2c 32 0d 10 0e 28 dc |1,1,1,2,3,2...(.|
00002ed0 32 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c |2,0,0,0,0,0,0,0,|
00002ee0 30 2c 30 2c 30 2c 33 2c 30 2c 33 2c 30 2c 33 2c |0,0,0,3,0,3,0,3,|
00002ef0 30 2c 32 0d 10 18 28 dc 32 2c 32 2c 32 2c 32 2c |0,2...(.2,2,2,2,|
00002f00 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c 32 2c |2,2,2,2,2,2,2,2,|
00002f10 32 2c 32 2c 32 2c 32 2c 32 2c 32 0d 10 22 16 dc |2,2,2,2,2,2.."..|
00002f20 39 2c 32 2c 31 2c 37 2c 22 4a 49 50 55 4e 47 41 |9,2,1,7,"JIPUNGA|
00002f30 22 0d 10 2c 28 dc 30 2c 30 2c 36 2c 30 2c 30 2c |"..,(.0,0,6,0,0,|
00002f40 33 2c 30 2c 30 2c 30 2c 36 2c 30 2c 30 2c 30 2c |3,0,0,0,6,0,0,0,|
00002f50 33 2c 30 2c 30 2c 30 2c 36 0d 10 36 28 dc 30 2c |3,0,0,0,6..6(.0,|
00002f60 36 2c 30 2c 36 2c 30 2c 30 2c 30 2c 36 2c 30 2c |6,0,6,0,0,0,6,0,|
00002f70 30 2c 36 2c 30 2c 36 2c 30 2c 36 2c 30 2c 30 2c |0,6,0,6,0,6,0,0,|
00002f80 30 0d 10 40 28 dc 36 2c 30 2c 36 2c 30 2c 31 2c |0..@(.6,0,6,0,1,|
00002f90 34 2c 31 2c 31 2c 31 2c 31 2c 31 2c 31 2c 34 2c |4,1,1,1,1,1,1,4,|
00002fa0 34 2c 30 2c 36 2c 30 2c 36 0d 10 4a 28 dc 30 2c |4,0,6,0,6..J(.0,|
00002fb0 36 2c 36 2c 30 2c 35 2c 30 2c 30 2c 30 2c 33 2c |6,6,0,5,0,0,0,3,|
00002fc0 30 2c 30 2c 30 2c 30 2c 30 2c 33 2c 30 2c 30 2c |0,0,0,0,0,3,0,0,|
00002fd0 36 0d 10 54 28 dc 30 2c 30 2c 30 2c 36 2c 31 2c |6..T(.0,0,0,6,1,|
00002fe0 30 2c 34 2c 31 2c 31 2c 31 2c 31 2c 31 2c 34 2c |0,4,1,1,1,1,1,4,|
00002ff0 34 2c 30 2c 30 2c 36 2c 36 0d 10 5e 28 dc 36 2c |4,0,0,6,6..^(.6,|
00003000 36 2c 30 2c 30 2c 35 2c 30 2c 30 2c 30 2c 30 2c |6,0,0,5,0,0,0,0,|
00003010 30 2c 30 2c 30 2c 30 2c 35 2c 36 2c 30 2c 36 2c |0,0,0,0,5,6,0,6,|
00003020 30 0d 10 68 29 dc 30 2c 36 2c 36 2c 31 30 2c 31 |0..h).0,6,6,10,1|
00003030 2c 34 2c 30 2c 30 2c 30 2c 30 2c 30 2c 34 2c 30 |,4,0,0,0,0,0,4,0|
00003040 2c 31 2c 30 2c 36 2c 30 2c 36 0d 10 72 28 dc 31 |,1,0,6,0,6..r(.1|
00003050 2c 31 2c 31 2c 31 2c 35 2c 30 2c 30 2c 30 2c 30 |,1,1,1,5,0,0,0,0|
00003060 2c 30 2c 30 2c 30 2c 30 2c 35 2c 36 2c 30 2c 36 |,0,0,0,0,5,6,0,6|
00003070 2c 30 0d 10 7c 28 dc 31 2c 30 2c 30 2c 30 2c 31 |,0..|(.1,0,0,0,1|
00003080 2c 30 2c 34 2c 31 2c 31 2c 31 2c 31 2c 31 2c 34 |,0,4,1,1,1,1,1,4|
00003090 2c 31 2c 36 2c 30 2c 36 2c 30 0d 10 86 28 dc 31 |,1,6,0,6,0...(.1|
000030a0 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 |,0,0,0,0,0,0,0,0|
000030b0 2c 30 2c 30 2c 30 2c 30 2c 31 2c 30 2c 36 2c 30 |,0,0,0,0,1,0,6,0|
000030c0 2c 39 0d 10 90 1f dc 33 2c 38 2c 31 32 2c 33 2c |,9.....3,8,12,3,|
000030d0 22 53 41 4c 4f 4f 4e 43 41 52 53 52 55 4c 45 53 |"SALOONCARSRULES|
000030e0 22 0d 10 9a 09 dd f2 65 6e 64 0d 10 a4 29 eb 39 |"......end...).9|
000030f0 3a f1 27 27 22 48 6f 70 65 20 79 6f 75 20 65 6e |:.''"Hope you en|
00003100 6a 6f 79 65 64 20 74 68 65 20 64 65 6d 6f 2e 2e |joyed the demo..|
00003110 2e 2e 22 0d 10 ae 17 f5 20 fd 20 a6 2d 39 39 3a |.."..... . .-99:|
00003120 f5 20 fd 20 ac 20 a6 2d 39 39 0d ff |. . . .-99..|
0000312c 
.