Home » Archimedes archive » Archimedes World » AW-1992-05.adf » May92 » !AWMay92/Goodies/Opus/!Opus/!RunImage

!AWMay92/Goodies/Opus/!Opus/!RunImage

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

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

Tape/disk: Home » Archimedes archive » Archimedes World » AW-1992-05.adf » May92
Filename: !AWMay92/Goodies/Opus/!Opus/!RunImage
Read OK:
File size: 6090 bytes
Load address: 0000
Exec address: 0000
File contents
  160ONERRORMODE0:REPORT:PRINT" at Line ";ERL:END
  180MODE9:OFF:PROCUV:PROCUW:PROCUX:END
  240DEFPROCUV:UY=13:UZ=14:Ua=15:DIMUb  64*1024:Uc= NOTTRUE:COLOUR&0,&00,&00,&00:COLOUR&1,&FF,&00,&00:COLOUR&2,&00,&FF,&00:COLOUR&3,&FF,&FF,&00:COLOUR&4,&00,&00,&FF:COLOUR&5,&FF,&00,&FF:COLOUR&6,&00,&FF,&FF:COLOUR&7,&FF,&FF,&FF:COLOUR&8,&FF,&88,&00:COLOUR&9,&00,&00,&00:COLOUR&A,&77,&77,&77:COLOUR&B,&AA,&AA,&AA
  350COLOUR&C,&CC,&CC,&CC:COLOUR&D,&DD,&DD,&DD:COLOUR&E,&EE,&EE,&EE:COLOUR&F,&FF,&FF,&FF:ENDPROC
  390DEFPROCUX:CALLUd:CALLUe:PROCUf:REPEAT:PROCUg:IF NOTUc THEN
  460PROCUh:PROCUi
  480ENDIF:UNTILUc:PROCUj:ENDPROC
  530DEFPROCUf:SYS"Opus-Sound_InstallInstrument",00,Uk,Ul,0,0,127,5:SYS"Opus-Sound_InstallInstrument",01,Um,Un,0,0,127,5:SYS"Opus-Sound_InstallInstrument",02,Uo,Up,0,0,127,5:SYS"Opus-Sound_InstallInstrument",03,Uq,Ur,0,0,127,5:SYS"Opus-Sound_SetSampleRate",5
  590SYS"Opus-Sound_SetStereoPositions",4,4,4,4:SYS"Opus-Sound_InstallVoices":ENDPROC
  630DEFPROCUj:SYS"Opus-Sound_DeInstallVoices":SYS&40140,1,208,48,0,0:OSCLI"RmKill Opus-Sound":ENDPROC
  690DEFPROCUg:REPEAT:CALLUs:A%=Ut:B%=!Uu:C%=40*1024 :CALLUv:PROCUw("OPUS",14*4,2*8,1):PROCUw("----",14*4,3*8,2):PROCUw("Keys To Use",10.5*4,10*8,3):PROCUw("-----------",10.5*4,11*8,4):PROCUw("Z                Left",5.5*4,13*8,5):PROCUw("X               Right",5.5*4,14*8,6)
  800PROCUw(";                  Up",5.5*4,15*8,7):PROCUw(".                Down",5.5*4,16*8,1):PROCUw("SPACE    Push/Crumble",5.5*4,17*8,2):PROCUw("P      Pause/Continue",5.5*4,18*8,5):PROCUw("Press SPACE To Play",6.5*4,24*8,3):PROCUw("or H to see High Scores",4.5*4,25*8,3)
  860PROCUw("{ 1991 Kevin J Swinton",4*4,30*8,4):CALLUx:OSCLI"FX200 1":Uy= NOTTRUE:TIME=0:REPEATUNTILINKEY(-99) ORINKEY(-113) ORINKEY(-85) ORTIME>12*100:IFINKEY(-99) THENREPEATUNTIL NOTINKEY(-99):Uy=TRUE
  930IFINKEY(-113) THENREPEATUNTIL NOTINKEY(-113):Uc=TRUE
  940IFINKEY(-85) THENREPEATUNTIL NOTINKEY(-85):TIME=13*100
  950IFTIME>12*100 AND NOT(Uy ORUc) THEN
  960PROCUz
  970ENDIF:UNTILUc ORUy:OSCLI"FX 200 0":OSCLI"FX  15 1":ENDPROC
 1030DEFPROCUi:OSCLI"FX 200 1":CALLVU:IF!VV<>99 THEN
 1070VDU28,0,31,31,0:CLS:PROCUw("CONGRATULATIONS!",8*4,2*8,5):PROCUw("----------------",8*4,3*8,6):PROCUw("You made the High Scores",4*4,7*8,3):PROCUw("PLEASE ENTER YOUR NAME",5*4,14*8,1):CALLUx:CALLVW:OSCLI"FX 15 1":CALLVX:CALLVY
 1170ENDIF:OSCLI"FX 200 0":ENDPROC
 1210DEFPROCUz:VZ$="Last Score : ":FORi=0 TO7:IFVa?i>=ASC"0" THEN
 1250VZ$+=CHR$Va?i
 1260ENDIF:NEXTi:Vb=(32-LENVZ$)/2:CALLVY:VDU28,0,31,31,0:CLS:VDU26:PROCUw("OPUS",14*4,2*8,5):PROCUw("----",14*4,3*8,6):PROCUw("Today's Highest Scores",5*4,7*8,3):PROCUw("Press SPACE for Main Screen",2.5*4,24*8,7):PROCUw(VZ$,Vb*4,26*8,1):PROCUw("{ 1991 Kevin J Swinton",4*4,30*8,4):CALLVc:CALLUx:TIME=0
 1400REPEATUNTILINKEY(-99) ORTIME>12*100:REPEATUNTIL NOTINKEY(-99):CALLVY:ENDPROC
 1450DEFPROCUh:OSCLI"FX 200 1":CALLVd:REPEAT:PROCVe:CALLVf:REPEAT:IFINKEY(-113) THEN!Vg=1:!Vh=-1
 1530IFINKEY(-56) THENPROCVi
 1540CALLVj:UNTIL!Vk OR!Vh OR(!Vl AND!Vm=0):CALLVn:IF!Vl THENPROCVo
 1580IF!Vh THEN!Vg-=1
 1590IF!Vk THEN!Vg-=1
 1600CALLVp:UNTIL!Vg=0 OR!Vq=16+1:!Vr+=!Vs:CALLVp:IF!Vk THENPROCVt
 1640IF!Vg=0 THENPROCVu
 1650IF!Vq=16+1 THENPROCVv
 1660CALLVY:OSCLI"FX 200 0":ENDPROC
 1700DEFPROCVe:VDU28,0,31,31,0:CLS:PROCUw("LEVEL "+STR$!Vq+"!",12*4,15*8,3):IF!Vg=1 THEN
 1740PROCUw("Last  Life",11*4,18*8,5)
 1750ENDIF:TIME=0:REPEATUNTILINKEY(-99) ORTIME>2*100:IFINKEY(-99) THENREPEATUNTIL NOTINKEY(-99)
 1790CLS:VDU26:ENDPROC
 1820DEFPROCVo:!Vq+=1:VDU28,0,31,31,0:CLS:PROCUw("We Done It!",10.5*4,15*8,3):Vw=7*8-1:Vx=2*8-1:REPEAT:Vw+=1:Vx+=1:IFVw<22*8 THEN
 1920PROCVy(Vw,16*8,6+(Vw MOD16) DIV8,Vz)
 1930ENDIF:IFVx>=7*8 THEN
 1950A%=!Uu:B%=Vx:C%=16*8 :CALLWU
 1970ENDIF:PROCVy(7*8,16*8,1,WV):PROCVy(22*8,16*8,1,WV):WAIT:PROCVy(Vw,16*8,0,WV):PROCVy(Vx,16*8,0,WV):PROCVy(22*8,16*8,1,WV):UNTILVx=22*8:IF!WW>0 THENPROCWX
 2060TIME=0:REPEATUNTILTIME>3*100 ORINKEY(-99):IFINKEY(-99) THENREPEATUNTIL NOTINKEY(-99)
 2090CLS:VDU26:ENDPROC
 2120DEFPROCWX:WY$="Bonus Score = "+STR$!WW+" x 100pts":WZ=((32-LENWY$) DIV2)*4:PROCUw(WY$,WZ,22*8,7):Wa=ABS(!WW<10):TIME=0:REPEATUNTILTIME>1*100:REPEAT:WAIT:WAIT:!Vr+=100:!WW-=1:!Wb=1:CALLVp:PROCUw(RIGHT$("  "+STR$!WW,2),WZ+56-Wa*4,22*8,7):A%=0:C%=2:D%=1:CALLWc:CALLWd:UNTIL!WW=0:!Vk=0:ENDPROC
 2310DEFPROCVy(x,y,We,Wf):A%=!Uu:B%=x:C%=y:D%=We:E%=Wf:CALLWg:ENDPROC
 2400DEFPROCVi:CALLWh:REPEATUNTIL NOTINKEY(-56):Wi=0:REPEAT:WAIT:PROCVy(36*8,24*8,12+(Wi DIV6),WV):Wi=(Wi+1) MOD48:UNTILINKEY(-56):REPEATUNTIL NOTINKEY(-56):PROCVy(36*8,24*8,11,WV):CALLWj:ENDPROC
 2540DEFPROCVu:VDU28,0,31,31,0:CLS:PROCUw("GAME OVER!",11*4,15*8,7):TIME=0:REPEATUNTILTIME>3*100 ORINKEY(-99):IFINKEY(-99) THENREPEATUNTIL NOTINKEY(-99)
 2600CLS:VDU26:ENDPROC
 2630DEFPROCVt:!Vg+=1:VDU28,0,31,31,0:CLS:PROCUw("GAME OVER!",11*4,15*8,7):PROCUw("Out of time!",10*4,18*8,6):TIME=0:REPEATUNTILTIME>3*100 ORINKEY(-99):IFINKEY(-99) THENREPEATUNTIL NOTINKEY(-99)
 2710CLS:VDU26:ENDPROC
 2740DEFPROCVv:VDU28,0,31,31,0:CLS:FORi=1 TO2000:x=RND(240)-1:y=RND(240)-1:PROCVy(x,y,2,Vz):NEXTi:PROCUw("GAME COMPLETED",9*4,15*8,2):REPEATUNTILINKEY(-99):REPEATUNTIL NOTINKEY(-99):CLS:VDU26:ENDPROC
 2870DEFPROCUw(Wk$,x,y,Wl):$Wm=Wk$+CHR$0:A%=!Uu:B%=Wm:C%=Wl:D%=x:E%=y:CALLWn:ENDPROC
 2950DEFPROCUW:FORWo=0 TO2STEP2:P%=Ub:[OPT Wo:.Vj STMFD (UY)!,{UZ}:BL Wp:BL Wd:BL Vp:BL Wq:BL Wr:BL Wh:BL Ws:BL Wj:BL Wt:BL Wu:LDMFD (UY)!,{PC}:.Vd MOV r0,#3:STR r0,Vg:MOV r0,#1:STR r0,Vq:MOV r0,#0:STR r0,Vr:STR r0,Vs:MOV PC,UZ:.Vf STMFD (UY)!,{UZ}:LDR r0,Vq:BL Wv
 3280LDR r0,Vq:SUB r0,r0,#1:ADR r1,Ww:LDRB r0,[r1,r0]:STR r0,Wx:MOV r0,#0:STR r0,Vh:STR r0,Vl:STR r0,Vm:LDR r0,Wy:LDR r1,Vq:SUB r1,r1,#1:ADD r0,r0,r1,LSL #4:LDRB r1,[r0],#1 : STRB r1,Wz +0:LDRB r1,[r0],#1 : STRB r1,Wz +1:LDRB r1,[r0],#1 : STRB r1,XU+0
 3440LDRB r1,[r0],#1 : STRB r1,XU+1:LDRB r1,[r0],#1 : STRB r1,XV+0:LDRB r1,[r0],#1 : STRB r1,XV+1:LDRB r1,[r0],#1 : STRB r1,XW+0:LDRB r1,[r0],#1 : STRB r1,XW+1:LDRB r1,[r0],#1 : STRB r1,XX+0:LDRB r1,[r0],#1 : STRB r1,XX+1:MOV r0,#0:STRB r0,XU+3
 3530STRB r0,XV+3:STRB r0,XW+3:STRB r0,XX+3:STR r0,XY:STR r0,XZ:STR r0,Vk:STR r0,Xa:MOV r0,#1:STRB r0,Wz+3:MOV r0,#60:LDR r1,Vq:SUB r1,r1,#1:MOV r2,#2:MUL r3,r1,r2:SUB r0,r0,r3:STR r0,WW:MOV r0,#100:STR r0,Wb:MOV r0,#4:STR r0,Xb:LDMFD (UY)!,{PC}
 3760.Wy EQUD Xc:.Ww EQUB 1 : EQUB 1:EQUB 1 : EQUB 1:EQUB 1 : EQUB 2:EQUB 2 : EQUB 2:EQUB 2 : EQUB 2:EQUB 4 : EQUB 4:EQUB 4 : EQUB 4:EQUB 8 : EQUB 8:.Vg EQUD 0:.Vq EQUD 0:.Vr EQUD 0:.Vs EQUD 0:.Vh EQUD 0:.Vl EQUD 0:.Wx EQUD 0:.WW EQUD 0:.Wb EQUD 0
 3960.Vk EQUD 0:.XZ EQUD 0:.Xb EQUD 0:.Xa EQUD 0:.Xd EQUD 0:.Xe EQUD 0:.Xf EQUD 0:.Wu STMFD (UY)!,{UZ}:LDR r0,Xa:CMP r0,#0:BEQ Xg:LDR r0,Xd:SUBS r0,r0,#1:STR r0,Xd:MOVEQ r0,#0:STREQ r0,Xa:LDREQ r9,Xh:LDREQ r10,Xe:LDREQ r11,Xf:ADDEQ r9,r9,r10,LSR #4:MOVEQ r4,#0
 4230STREQB r4,[r9,r11]:MOVEQ r3,#0:BEQ Xi:LDR r10,Xe:LDR r11,Xf:LDR r3,Xa:B Xi:.Xg:BL Xj: AND r12, r12, #255:CMP r12,#183:LDMNEFD (UY)!,{PC}:.Xk BL Xj: AND r10, r12, #15:MOV r10,r10,LSL #4:BL Xj: AND r11, r12, #15:MOV r11,r11,LSL #4:BL Xj: AND r12, r12, #3
 4450ADD r12,r12,#5:LDRB r0,Wz+0:LDRB r1,Wz+1: AND r0, r0, #240: AND r1, r1, #240:CMP r0,r10:CMPEQ r1,r11:LDMEQFD (UY)!,{PC}:LDR r9,Xh:ADD r9,r9,r10,LSR #4:ADD r9,r9,r11:LDRB r8,[r9]:CMP r8,#0:LDMNEFD (UY)!,{PC}:STRB r12,[r9]:STR r12,Xa:STR r10,Xe:STR r11,Xf
 4620MOV r3,r12:ADR r4,Xl:LDR r5,[r4,r12,LSL #2]:STR r5,Xd:.Xi LDR r0,Xm:LDR r0,[r0]:MOV r1,r10:MOV r2,r11:LDR r4,Xn:BL Wg:LDMFD (UY)!,{PC}:.Xm EQUD Uu:.Xn EQUD WV:.Xh EQUD Xo:.Xl EQUD 0:EQUD0:EQUD0:EQUD0:EQUD0:EQUD 6*50:EQUD 5*50:EQUD 4*50:EQUD 3*50
 4850.Wp LDR r1,Vs:CMP r1,#0:MOVEQ PC,UZ:LDR r0,Vr:CMP r1,#10:ADDGE r0,r0,#10:SUBGE r1,r1,#10:ADDLT r0,r0,#1:SUBLT r1,r1,#1:STR r0,Vr:STR r1,Vs:MOV PC,UZ:.Wd STMFD (UY)!,{UZ}:LDR r0,WW:LDR r1,Wb:SUBS r1,r1,#2:MOVEQ r1,#100:SUBEQ r0,r0,#1:STR r0,WW:STR r1,Wb
 5070.XpMOVEQ r0,#00:MOVEQ r2,#2:LDREQ r3,WW:MOVEQ r3,r3,LSR #4:RSB r3,r3,#5:BLEQ Wc:LDR r0,WW:CMP r0,#0:MVNEQ r2,#0:STREQ r2,Vk:.Xq ADR r1,Xr:MOV r3,#35*4:MOV r4,#30*8+1:LDR r0,Uu:MOV r2,#5:BL Wn:LDR r0,WW:ADR r1,Xs:MOV r2,#6:SWI "OS_ConvertInteger4":MOV r3,#31*4
 5280ADD r3,r3,r2,LSL #2:MOV r4,#30*8+1:LDR r0,Uu:ADR r1,Xs:LDR r5,WW:CMP r5,#10:MOVLE r2,#1:MOVGT r2,#2:BL Wn:LDMFD (UY)!,{PC}:.Xs EQUS "??": EQUB 0 : ALIGN:.Xr EQUS "  ": EQUB 0 : ALIGN:.Wt STMFD (UY)!,{UZ}:LDR r0,Xt:CMP r0,#1:BLEQ Xu:.Xv LDRB r0,Wz+0
 5510LDRB r1,Wz+1:LDR r2,Xw: AND r4, r0, #240: AND r5, r1, #240:ADD r2,r2,r4,LSR #4:ADD r2,r2,r5:MOV r3,#0:STRB r3,[r2]:LDRB r4,Xx:LDRB r5,Xy:LDRB r6,Xz:LDRB r7,YU:LDR r8,XY:LDR r9,YV:CMP r8,#0:BEQ YW:.YX SUB r8,r8,#1:STR r8,XY:CMP r9,#0:SUBEQ r1,r1,#1
 5720CMP r9,#1:ADDEQ r1,r1,#1:CMP r9,#2:SUBEQ r0,r0,#1:CMP r9,#3:ADDEQ r0,r0,#1:STRB r0,Wz+0:STRB r1,Wz+1:LDMFD (UY)!,{PC}:.YW MOV r0,#122:SWI "OS_Byte":MOV r2,#16:MOV r9,#0:LDR r10,Vs:ADR r11,YY:.YZ CMP r1,#NOT-98:BNE Ya:MOV r3,#2:STR r3,YV:CMP r6,#0
 5940CMPNE r6,#5:CMPNE r6,#6:CMPNE r6,#7:CMPNE r6,#8:MOVEQ r9,r6:STREQ r2,XY:BEQ Yb:CMP r6,#10:MVNEQ r1,#0:MOVEQ r2,#0:BEQ Yc:.Ya CMP r1,#NOT-67:BNE Yd:MOV r3,#3:STR r3,YV:CMP r7,#0:CMPNE r7,#5:CMPNE r7,#6:CMPNE r7,#7:CMPNE r7,#8:MOVEQ r9,r7:STREQ r2,XY:BEQ Yb
 6180CMP r7,#10:MOVEQ r1,#1:MOVEQ r2,#0:BEQ Yc:.Yd CMP r1,#NOT-73:BNE Ye:MOV r3,#0:STR r3,YV:CMP r4,#0:CMPNE r4,#5:CMPNE r4,#6:CMPNE r4,#7:CMPNE r4,#8:MOVEQ r9,r4:STREQ r2,XY:BEQ Yb:CMP r4,#10:MOVEQ r1,#0:MVNEQ r2,#0:BEQ Yc:.Ye CMP r1,#NOT-104:BNE Yb:MOV r3,#1:STR r3,YV
 6440CMP r5,#0:CMPNE r5,#5:CMPNE r5,#6:CMPNE r5,#7:CMPNE r5,#8:MOVEQ r9,r5:STREQ r2,XY:CMP r5,#10:MOVEQ r1,#0:MOVEQ r2,#1:BEQ Yc:.Yb LDR r0,YV:STRB r0,Wz+3:LDR r12,[r11,r9,ASL #2]:ADD r10,r10,r12:STR r10,Vs:CMP r9,#8:BNE Yf:LDR r10,Yg:LDR r11,[r10]:ADD r11,r11,#1
 6660CMP r11,#4:MOVEQ r11,#3:STR r11,[r10]:MOV r12,#0001:.Yf CMP r12,#0000:BEQ Yh:.Yi MOV r0,#0:STR r0,Xa:LDR r0,Yj:LDR r0,[r0]:LDRB r1,Wz+0:LDRB r2,Wz+1:LDR r4,Yk:LDR r3,YV:CMP r3,#0:SUBEQ r2,r2,#1*16:CMP r3,#1:ADDEQ r2,r2,#1*16:CMP r3,#2:SUBEQ r1,r1,#1*16
 6860CMP r3,#3:ADDEQ r1,r1,#1*16:MOV r3,#0:BL Wg:MOV r0,#3:MOV r2,#2:MOV r3,#1:BL Wc:.Yh MOV r0,#121:MOV r1,#98 EOR &80:SWI "OS_Byte":LDR r8,XY:CMP r1,#&FF:CMPEQ r8,#0:BLEQ Yl:LDR r8,XY:CMP r8,#0:BNE Xv:LDMFD (UY)!,{PC}:.Yc LDR r0,YV:STRB r0,Wz+3:LDR r0,Yj
 7100LDR r0,[r0]:LDRB r3,Wz+0:LDRB r4,Wz+1:ADD r1,r3,r1,ASL #4:ADD r2,r4,r2,ASL #4:MOV r3,#1:STR r3,Xt:STR r1,Ym:STR r2,Yn:LDR r4,Yk:BL Wg:LDR r0,Yj:LDR r0,[r0]:LDRB r1,Wz+0:LDRB r2,Wz+1:LDRB r3,Wz+3:MOV r3,r3,LSL #1:LDR r4,Yo:BL Wg:LDMFD (UY)!,{PC}
 7300.Xu STMFD (UY)!,{UZ}:LDR r0,Yj:LDR r0,[r0]:LDR r1,Ym:LDR r2,Yn:MOV r3,#10:LDR r4,Yk:BL Wg:MOV r0,#0:STR r0,Xt:LDMFD (UY)!,{PC}:.Xt EQUD 0:.Ym EQUD 0:.Yn EQUD 0:.YV EQUD 0:.XY EQUD 0:.Xw EQUD Xo:.Yj EQUD Uu:.Yg EQUD Vg:.Yk EQUD WV:.Yo
 7530.YY EQUD 0:EQUD 0:EQUD 0:EQUD 0:EQUD 0:EQUD 500:EQUD 750:EQUD 1000:EQUD 0000:.Ws STMFD (UY)!,{UZ}:LDRB r0,Wz+0:LDRB r1,Wz+1: AND r1, r1, #240:ADD r0,r1,r0,LSR #4:LDR r5,Yp:ADD r5,r5,r0:LDRB r6,[r5,#-16]:LDRB r7,[r5,#+16]:LDRB r8,[r5,#-1]
 7710LDRB r9,[r5,#+1]:LDRB r0,Wz+0:LDRB r1,Wz+1: ANDS r11, r1, #15:STREQB r6,Xx:STREQB r7,Xy: ANDS r11, r0, #15:STREQB r8,Xz:STREQB r9,YU:.Yq LDRB r0,Wz+0:LDRB r1,Wz+1:MOV r2,#0:LDR r3,Yr:.Ys ADD r4,r3,r2,LSL #3:LDRB r5,[r4,#0]:LDRB r6,[r4,#1]:LDRB r7,[r4,#3]
 7880CMP r7,#1:BEQ Yt:SUBS r8,r0,r5:SUBLT r8,r5,r0:SUBS r9,r1,r6:SUBLT r9,r6,r1:CMP r8,#16:BGE Yt:CMP r9,#16:BGE Yt:MVN r10,#0:STRB r10,Vh:.Yu MOV r0,#1:MOV r2,#2:MOV r3,#5:BL Wc:LDMFD (UY)!,{PC}:.Yt ADD r2,r2,#1:CMP r2,#4:BNE Ys:LDMFD (UY)!,{PC}
 8110.Yr EQUD XU:.Xx EQUB 0:.Xy EQUB 0:.Xz EQUB 0:.YU EQUB 0:.Yp EQUD Xo:.Yl STMFD (UY)!,{UZ}:LDR r0,Vm:CMP r0,#1:LDMEQFD (UY)!,{PC}:LDRB r1,Wz+0:LDRB r2,Wz+1:LDRB r3,Wz+3:.Yv CMP r1,#14*16:CMPEQ r3,#3:LDMEQFD (UY)!,{PC}:CMP r1,#1*16
 8310CMPEQ r3,#2:LDMEQFD (UY)!,{PC}:CMP r2,#14*16:CMPEQ r3,#1:LDMEQFD (UY)!,{PC}:CMP r2,#1*16:CMPEQ r3,#0:LDMEQFD (UY)!,{PC}:.Yw LDR r0,Yx:MOV r1,r1,LSR #4: AND r2, r2, #%11110000:ADD r4,r0,r2:ADD r4,r4,r1:CMP r3,#0:LDREQB r5,[r4,#-16]:LDREQB r6,[r4,#-16-16]
 8440SUBEQ r2,r2,#1*16:CMP r3,#1:LDREQB r5,[r4,#+16]:LDREQB r6,[r4,#+16+16]:ADDEQ r2,r2,#1*16:CMP r3,#2:LDREQB r5,[r4,#-1]:LDREQB r6,[r4,#-1-1]:SUBEQ r1,r1,#1:CMP r3,#3:LDREQB r5,[r4,#+1]:LDREQB r6,[r4,#+1+1]:ADDEQ r1,r1,#1:CMP r5,#1:CMPNE r5,#2
 8590CMPNE r5,#3:CMPNE r5,#4:CMPNE r5,#5:LDMNEFD (UY)!,{PC}:CMP r6,#0:BEQ Yy:.Yz CMP r5,#2:CMPNE r5,#3:CMPNE r5,#4:CMPNE r5,#5:LDMEQFD (UY)!,{PC}:MOV r0,#1:STR r0,Vm:STR r1,ZU+0:STR r2,ZU+4:MOV r0,#2:STR r0,ZU+8:STR r3,ZU+12:MOV r0,#15:STR r0,ZU+16
 8790LDR r0,Vs:ADD r0,r0,#50:STR r0,Vs:LDMFD (UY)!,{PC}:.Yy MOV r0,#1:STR r0,Vm:STR r1,ZU+0:STR r2,ZU+4:MOV r0,#1:STR r0,ZU+8:STR r3,ZU+12:LDR r0,Yx:ADD r4,r1,r2:STRB r5,ZU+16:MOV r5,#0:STRB r5,[r0,r4]:LDR r0,Vs:ADD r0,r0,#10:STR r0,Vs:LDMFD (UY)!,{PC}
 9010.Wr STMFD (UY)!,{UZ}:LDR r0,Vm:CMP r0,#0:LDMEQFD (UY)!,{PC}:LDR r0,ZU+8:CMP r0,#1:BEQ ZV:.ZW LDR r0,ZU+16:SUBS r0,r0,#1:BEQ ZX:STR r0,ZU+16:LDR r1,ZU+0:LDR r2,ZU+4:LDR r5,Uu:MOV r2,r2,LSR #4:ADD r5,r5,r2,LSL #11:ADD r5,r5,r2,LSL #9:ADD r5,r5,r1,LSL #3
 9190BL Xj: AND r12, r12, #15:ADD r5,r5,r12,LSL #7:ADD r5,r5,r12,LSL #5:BL Xj: AND r12, r12, #1:ADD r5,r5,r12,LSL #2:BL Xj:LDR r6,[r5]: AND r6, r6, r12:STR r6,[r5]:LDMFD (UY)!,{PC}:.ZX STR r0,Vm:LDR r0,Yx:LDR r1,ZU+0:LDR r2,ZU+4:ADD r3,r1,r2:MOV r4,#0
 9370STRB r4,[r0,r3]:LDR r5,Uu:MOV r2,r2,LSR #4:ADD r5,r5,r2,LSL #11:ADD r5,r5,r2,LSL #9:ADD r5,r5,r1,LSL #3:.ZY MOV r6,#&00000000:MOV r7,#16:.ZZ STR r6,[r5,#0]:STR r6,[r5,#4]:ADD r5,r5,#160:SUBS r7,r7,#1:BNE ZZ:LDMFD (UY)!,{PC}:.ZV LDR r0,Yp:LDR r1,ZU+0
 9530LDR r2,ZU+4:ADD r3,r1,r2:ADD r3,r3,r0:LDR r4,ZU+12:CMP r4,#0:LDREQB r5,[r3,#-16]:CMP r4,#1:LDREQB r5,[r3,#+16]:CMP r4,#2:LDREQB r5,[r3,#-1]:CMP r4,#3:LDREQB r5,[r3,#+1]:CMP r5,#0:BEQ Za:MOV r0,#0:STR r0,Vm:LDR r0,Yx:ADD r4,r1,r2:LDR r5,ZU+16
 9720STRB r5,[r0,r4]:.Zb MOV r0,#2:MOV r2,#2:MOV r3,#8:BL Wc:BL Zc:B Zd:.Za LDR r0,Uu:MOV r3,#0:MOV r1,r1,LSL #4:LDR r4,Ze:BL Wg:LDR r1,ZU+0:LDR r2,ZU+4:LDR r4,ZU+12:CMP r4,#0:SUBEQ r2,r2,#16:CMP r4,#1:ADDEQ r2,r2,#16:CMP r4,#2:SUBEQ r1,r1,#1:CMP r4,#3
 9940ADDEQ r1,r1,#1:STR r1,ZU+0:STR r2,ZU+4:.Zf LDR r0,Uu:LDR r3,ZU+16:MOV r1,r1,LSL #4:LDR r4,Ze:BL Wg:.Zd LDR r0,ZU+0:LDR r1,ZU+4:MOV r0,r0,LSL #4:MOV r2,#1:MOV r3,#0:ADR r4,XU:.Zg ADD r5,r4,r3,LSL #3:LDRB r6,[r5,#0]:LDRB r7,[r5,#1]:LDRB r8,[r5,#3]
10120CMP r8,#1:BEQ Zh:SUBS r9,r0,r6:SUBLT r9,r6,r0:SUBS r10,r1,r7:SUBLT r10,r7,r1:CMP r9,#16:BGE Zh:CMP r10,#16:BGE Zh:STRB r2,[r5,#3]:LDR r9,Vs:LDR r10,ZU+16:CMP r10,#1:ADDEQ r9,r9,#250:CMP r10,#4:ADDEQ r9,r9,#500:CMP r10,#3:ADDEQ r9,r9,#250
10310ADDEQ r9,r9,#500:CMP r10,#2:ADDEQ r9,r9,#1000:STR r9,Vs:LDR r9,Xb:SUBS r9,r9,#1:STR r9,Xb:MVNEQ r9,#0:STREQ r9,Vl:.Zh ADD r3,r3,#1:CMP r3,#4:BNE Zg:LDMFD (UY)!,{PC}:.Ze EQUD WV:.Vm EQUD 0:.ZU EQUD 0:EQUD 0:EQUD 0:EQUD 0:EQUD 0:.Yx EQUD Xo
10560.Zc STMFD (UY)!,{UZ}:LDR r0,XZ:CMP r0,#1:LDMEQFD (UY)!,{PC}:LDR r0,Zi:MOV r1,#0:.Zj LDRB r2,[r0]: AND r3, r1, #15:MOV r4,r1,LSR #4:CMP r2,#2:BNE Zk:.Zl CMP r3,#12:BGT Zm:LDRB r5,[r0,#+1]:LDRB r6,[r0,#+2]:LDRB r7,[r0,#+3]:CMP r5,#3:CMPEQ r6,#4
10740CMPEQ r7,#4:BLEQ Zn:MOVEQ r0,#1:STREQ r0,XZ:LDMEQFD (UY)!,{PC}:.Zm CMP r4,#12:BGT Zk:LDRB r5,[r0,#+1*16]:LDRB r6,[r0,#+2*16]:LDRB r7,[r0,#+3*16]:CMP r5,#3:CMPEQ r6,#4:CMPEQ r7,#4:BLEQ Zn:MOVEQ r0,#1:STREQ r0,XZ:LDMEQFD (UY)!,{PC}:.Zk ADD r0,r0,#1
10920ADD r1,r1,#1:CMP r1,#16*16:BNE Zj:MOV r0,#0:LDMFD (UY)!,{PC}:.Zi EQUD Xo:.Zn STMFD (UY)!,{UZ}:LDR r0,Vs:LDR r1,Zo:ADD r0,r0,r1:STR r0,Vs:LDMFD (UY)!,{PC}:.Zo EQUD 5000:.Wh STMFD (UY)!,{UZ}:.Zp LDR r0,Uu:LDRB r1,Wz+0:LDRB r2,Wz+1:LDRB r3,Wz+3
11180 AND r5,r1,#15: AND r6,r2,#15:CMP r3,#0:MOVEQ r4,r6,LSR #3:CMP r3,#1:MOVEQ r4,r6,LSR #3:CMP r3,#2:MOVEQ r4,r5,LSR #3:CMP r3,#3:MOVEQ r4,r5,LSR #3:MOV r3,r3,LSL #1:ADD r3,r3,r4:LDR r4,Zq:BL Wg:.Zr LDRB r0,XU+3:CMP r0,#1:BEQ Zs:LDR r0,Uu:LDRB r1,XU+0:LDRB r2,XU+1:BL WU
11390.Zs LDRB r0,XV+3:CMP r0,#1:BEQ Zt:LDR r0,Uu:LDRB r1,XV+0:LDRB r2,XV+1:BL WU:.Zt LDRB r0,XW+3:CMP r0,#1:BEQ Zu:LDR r0,Uu:LDRB r1,XW+0:LDRB r2,XW+1:BL WU:.Zu LDRB r0,XX+3:CMP r0,#1:LDMEQFD (UY)!,{PC}:LDR r0,Uu:LDRB r1,XX+0:LDRB r2,XX+1:BL WU
11600LDMFD (UY)!,{PC}:.Zq EQUD Vz:.Zv EQUD WV:.Wj STMFD (UY)!,{UZ}:MOV r0,#19:SWI "OS_Byte":.Zw LDR r0,Uu:LDRB r1,Wz+0:LDRB r2,Wz+1:MOV r3,#0:LDR r4,Zv:BL Wg:.Zx LDR r0,Uu:LDRB r1,XU+0:LDRB r2,XU+1:MOV r3,#0:LDR r4,Zv:LDRB r5,XU+3:CMP r5,#0:BLEQ Wg
11840.Zy LDR r0,Uu:LDRB r1,XV+0:LDRB r2,XV+1:MOV r3,#0:LDR r4,Zv:LDRB r5,XV+3:CMP r5,#0:BLEQ Wg:.Zz LDR r0,Uu:LDRB r1,XW+0:LDRB r2,XW+1:MOV r3,#0:LDR r4,Zv:LDRB r5,XW+3:CMP r5,#0:BLEQ Wg:.aU LDR r0,Uu:LDRB r1,XX+0:LDRB r2,XX+1:MOV r3,#0:LDR r4,Zv
12050LDRB r5,XX+3:CMP r5,#0:BLEQ Wg:LDMFD (UY)!,{PC}:.Wz EQUB 0 : EQUB 0 : EQUB 0 : EQUB 0:EQUB 0 : EQUB 0 : EQUB 0 : EQUB 0:.XU EQUB 0 : EQUB 0 : EQUB 5 : EQUB 0:EQUB 0 : EQUB 0 : EQUB 0 : EQUB 0:.XV EQUB 0 : EQUB 0 : EQUB 5 : EQUB 0
12160EQUB 0 : EQUB 0 : EQUB 0 : EQUB 0:.XW EQUB 0 : EQUB 0 : EQUB 5 : EQUB 0:EQUB 0 : EQUB 0 : EQUB 0 : EQUB 0:.XX EQUB 0 : EQUB 0 : EQUB 5 : EQUB 0:EQUB 0 : EQUB 0 : EQUB 0 : EQUB 0:.Wq STMFD (UY)!,{UZ}:MOV r0,#3:ADR r1,XU:LDR r2,aV:LDR r6,Wx
12290.aW ADD r3,r1,r0,LSL #3:.aX LDRB r11,[r3,#3]:CMP r11,#1:BEQ aY:.aZ LDRB r11,[r3,#4]:LDRB r12,[r3,#5]:CMP r11,#0:SUBGT r11,r11,#1:STRGTB r11,[r3,#4]:BGT aa:.ab LDRB UZ,[r3,#0]: ANDS UZ, UZ, #15:MOVNE UZ,#1:STRNEB UZ,[r3,#4]:BNE aa:LDRB UZ,[r3,#1]
12470 ANDS UZ, UZ, #15:MOVNE UZ,#1:STRNEB UZ,[r3,#4]:BNE aa:BL Xj: AND r12, r12, #15:MOV r12,r12,LSL #4:STRB r12,[r3,#4]:BL Xj: AND r12, r12, #3:STRB r12,[r3,#5]:B aY:.aa LDRB r4,[r3,#0]:LDRB r5,[r3,#1]: AND UZ, r5, #%11110000:ADD UZ,UZ,r4,LSR #4:ADD UZ,r2,UZ
12660CMP r12,#0:LDREQB r7,[UZ,#-16]: ANDEQ r11, r5, #15:CMP r12,#1:LDREQB r7,[UZ,#+16]: ANDEQ r11, r5, #15:CMP r12,#2:LDREQB r7,[UZ,#-1]: ANDEQ r11, r4, #15:CMP r12,#3:LDREQB r7,[UZ,#+1]: ANDEQ r11, r4, #15:CMP r11,#0:BNE ac:CMP r7,#0:CMPNE r7,#5:CMPNE r7,#6
12870CMPNE r7,#7:CMPNE r7,#8:MOVNE r11,#0:STRNEB r11,[r3,#4]:BNE aY:.ac CMP r12,#0:SUBEQ r5,r5,r6:CMP r12,#1:ADDEQ r5,r5,r6:CMP r12,#2:SUBEQ r4,r4,r6:CMP r12,#3:ADDEQ r4,r4,r6:.ad STRB r4,[r3,#0]:STRB r5,[r3,#1]:.aY SUBS r0,r0,#1:BGE aW:LDMFD (UY)!,{PC}
13100.aV EQUD Xo:.Vp STMFD (UY)!,{UZ}:.ae LDR r0,Uu:ADR r1,af:LDR r2,Vg:ADD r2,r2,#ASC"0":STRB r2,[r1]:MOV r2,#6:MOV r3,#36*4:MOV r4,#10*8-5:BL Wn:.ag LDR r0,Uu:ADR r1,ah:LDR r2,Vq:CMP r2,#10:MOVGE r3,#ASC"1":SUBGE r2,r2,#10:MOVLT r3,#ASC" ":STRB r3,[r1,#0]
13310ADD r2,r2,#ASC"0":STRB r2,[r1,#1]:MOV r2,#2:MOV r3,#35*4:MOV r4,#15*8:BL Wn:.ai LDR r0,Vr:ADR r1,aj:MOV r2,#8:SWI "OS_ConvertInteger4":MOV r3,#31*4:ADD r3,r3,r2,LSL #2:MOV r4,#21*8:LDR r0,Uu:ADR r1,aj:MOV r2,#7:BL Wn:LDMFD (UY)!,{PC}
13510.af EQUS "?": EQUB 0 : ALIGN:.ah EQUS "??": EQUB 0 : ALIGN:.aj EQUS "????????": EQUB 0 : ALIGN:.Uv LDRB r4,[r0],#1:LDRB r5,[r0],#1:SUBS r2,r2,r5:MOVLT PC,UZ:.ak STRB r4,[r1],#1:SUBS r5,r5,#1:BGT ak:B Uv:.Ud ADR r0,al:ADR r1,Uu
13730SWI "OS_ReadVduVariables":MOV PC,UZ:.al DCD 149:DCD -1:.Uu DCD 0:.Wn STMFD (UY)!,{UZ}:ADD r5,r3,r4,ASL #7:ADD r5,r5,r4,ASL #5:ADR r6,am:LDR UZ,[r6,r2,ASL #2]:LDR r2,an:ADD r0,r0,r5:.ao LDRB r3,[r1],#1:CMP r3,#0:LDMEQFD (UY)!,{PC}:SUB r3,r3,#32
13930ADD r4,r2,r3,ASL #5:.ap LDMIA r4!,{r5-r12}: AND r5, r5, UZ: AND r6, r6, UZ: AND r7, r7, UZ: AND r8, r8, UZ: AND r9, r9, UZ: AND r10, r10, UZ: AND r11, r11, UZ: AND r12, r12, UZ:STR r5,[r0,#0*160]:STR r6,[r0,#1*160]:STR r7,[r0,#2*160]:STR r8,[r0,#3*160]
14070STR r9,[r0,#4*160]:STR r10,[r0,#5*160]:STR r11,[r0,#6*160]:STR r12,[r0,#7*160]:ADD r0,r0,#4:BAL ao:.an EQUD aq:.am EQUD &00000000 : EQUD &11111111:EQUD &22222222 : EQUD &33333333:EQUD &44444444 : EQUD &55555555:EQUD &66666666 : EQUD &77777777
14200EQUD &88888888 : EQUD &99999999:EQUD &AAAAAAAA : EQUD &BBBBBBBB:EQUD &CCCCCCCC : EQUD &DDDDDDDD:EQUD &EEEEEEEE : EQUD &FFFFFFFF:.ar EQUD Xc:.Wv LDR r0,Uu:LDR r1,ar:ADD r1,r1,#16*16:LDR r2,Vq:SUB r2,r2,#1:ADD r1,r1,r2,LSL #8:LDR r2,as:LDR r11,at
14350MOV r3,#16:.au MOV r4,#16:MOV r5,r0:.av LDRB r6,[r1],#1:STRB r6,[r11],#1:ADD r7,r2,r6,LSL #7:MOV r8,#16:.aw LDMIA r7!,{r9-r10}:STMIA r5!,{r9-r10}:ADD r5,r5,#160-8:SUBS r8,r8,#1:BNE aw:SUB r5,r5,#(2*8)*160:ADD r5,r5,#8:SUBS r4,r4,#1:BNE av
14510ADD r0,r0,#(2*8)*160:SUBS r3,r3,#1:BNE au:MOV PC,UZ:.as EQUD WV:.at EQUD Xo:.Wg ADD r3,r4,r3,LSL #7:.ax ADD r0,r0,r2,LSL #7:ADD r0,r0,r2,LSL #5:MOV r2,r1,LSR #3:ADD r0,r0,r2,LSL #2: AND r1, r1, #7:MOV r1,r1,LSL #2:MOV r2,#16:.ay LDMIA r3!,{r7,r8}
14700MOV r9,#&00000000:.az CMP r1,#0:BEQ bU:.bV RSB r4,r1,#32:MOV r9,r8,LSR r4:MOV r8,r8,LSL r1: ORR r8,r8,r7,LSR r4:MOV r7,r7,LSL r1:.bU CMP r1,#0:STMEQIA r0!,{r7-r8}:ADDEQ r0,r0,#4:STMNEIA r0!,{r7-r9}:.bW ADD r0,r0,#160-(16/2)-4:SUBS r2,r2,#1:BNE ay
14850MOV PC,UZ:.Xo FNbX(16*16):.Wm EQUSSTRING$(64,CHR$0):.bY EQUD bZ:.WU LDR r3,bY:.ba ADD r0,r0,r2,LSL #7:ADD r0,r0,r2,LSL #5:MOV r2,r1,LSR #3:ADD r0,r0,r2,LSL #2: AND r1, r1, #7:MOV r1,r1,LSL #2:MOV r2,#16:.bb LDMIA r3!,{r7,r8,r10,r11}:.bc CMP r1,#0:MOV r9,#&00000000
15060MVN r12,#&00000000:BEQ bd:.be RSB r4,r1,#32:MOV r12,r12,LSL r1: ORR r12,r12,r11,LSR r4:MOV r11,r11,LSL r1: ORR r11,r11,r10,LSR r4:MOV r10,r10,LSL r1:MVN r5,#&00000000: ORR r10,r10,r5,LSR r4:MOV r9,r8,LSR r4:MOV r8,r8,LSL r1: ORR r8,r8,r7,LSR r4
15190MOV r7,r7,LSL r1:.bd LDMIA r0,{r4-r6}: AND r4, r4, r10: AND r5, r5, r11: AND r6, r6, r12: ORR r4,r4,r7: ORR r5,r5,r8: ORR r6,r6,r9:STMIA r0!,{r4-r6}:.bf ADD r0,r0,#160-(16/2)-4:SUBS r2,r2,#1:BNE bb:MOV PC,UZ:.Xj STMFD (UY)!,{r1-r2}:LDR r12,bg:LDR r1,bh
15370MOVS r2,r12,LSR #31: EORNE r12, r12, r1:MOV r12,r12,ROR #31:MOVS r2,r12,LSR #31: EORNE r12, r12, r1:MOV r12,r12,ROR #31:MOVS r2,r12,LSR #31: EORNE r12, r12, r1:MOV r12,r12,ROR #31:MOVS r2,r12,LSR #31: EORNE r12, r12, r1:MOV r12,r12,ROR #31:STR r12,bg
15500LDMFD (UY)!,{r1-r2}:MOV PC,UZ:.bg EQUD &8B2197C4:.bh EQUD &76B50153:.Ue STMFD (UY)!,{UZ}:ADR r12,bi:MOV r11,#0:.bj MOV r0,r11:MOV r1,#16:SWI "OS_ReadPalette":MOV r4,r2,LSR #24: AND r4, r4, #&FF:MOV r5,r2,LSR #16: AND r5, r5, #&FF:MOV r6,r2,LSR #8
15690 AND r6, r6, #&FF:STR r6,[r12],#4:STR r5,[r12],#4:STR r4,[r12],#4:ADD r11,r11,#1:CMP r11,#16:BNE bj:LDMFD (UY)!,{PC}:.Us STMFD (UY)!,{UZ}:MOV r1,#15:.bk MOV r0,#19:SWI "OS_WriteC":MOV r0,r1:SWI "OS_WriteC":MOV r0,#16:SWI "OS_WriteC":MOV r0,#0
15880SWI "OS_WriteC":SWI "OS_WriteC":SWI "OS_WriteC":SUBS r1,r1,#1:BGE bk:LDMFD (UY)!,{PC}:.Ux STMFD (UY)!,{UZ}:MOV r11,#1:.bl MOV r0,#19:SWI "OS_Byte":ADR r12,bi:MOV r10,#0:.bm MOV r0,#19:SWI "OS_WriteC":MOV r0,r10:SWI "OS_WriteC":MOV r0,#16
16070SWI "OS_WriteC":LDR r0,[r12],#4:MUL r0,r11,r0:MOV r0,r0,LSR #4: AND r0, r0, #&FF:SWI "OS_WriteC":LDR r0,[r12],#4:MUL r0,r11,r0:MOV r0,r0,LSR #4: AND r0, r0, #&FF:SWI "OS_WriteC":LDR r0,[r12],#4:MUL r0,r11,r0:MOV r0,r0,LSR #4: AND r0, r0, #&FF
16220SWI "OS_WriteC":ADD r10,r10,#1:CMP r10,#16:BNE bm:ADD r11,r11,#1:CMP r11,#16+1:BNE bl:LDMFD (UY)!,{PC}:.VY STMFD (UY)!,{UZ}:MOV r11,#15:.bn MOV r0,#19:SWI "OS_Byte":ADR r12,bi:MOV r10,#0:.bo MOV r0,#19:SWI "OS_WriteC":MOV r0,r10:SWI "OS_WriteC"
16420MOV r0,#16:SWI "OS_WriteC":LDR r0,[r12],#4:MUL r0,r11,r0:MOV r0,r0,LSR #4: AND r0, r0, #&FF:SWI "OS_WriteC":LDR r0,[r12],#4:MUL r0,r11,r0:MOV r0,r0,LSR #4: AND r0, r0, #&FF:SWI "OS_WriteC":LDR r0,[r12],#4:MUL r0,r11,r0:MOV r0,r0,LSR #4: AND r0, r0, #&FF
16580SWI "OS_WriteC":ADD r10,r10,#1:CMP r10,#16:BNE bo:SUBS r11,r11,#1:BGE bn:LDMFD (UY)!,{PC}:.bi FNbX((16*3)*4):.Vn STMFD (UY)!,{UZ}:LDR r0,bp:LDR r0,[r0]:MOV r1,#255:MOV r2,#000:MOV r5,#0:MOV r6,#0:MOV r7,#0:MOV r8,#0
16760MOV r9,#0:MOV r10,#0:MOV r11,#0:MOV r12,#0:.bq STMFD (UY)!,{r0-r2}:MOV r0,#19:SWI "OS_Byte":LDMFD (UY)!,{r0-r2}:MOV UZ,#2:.br ADD r3,r0,r1,LSL #7:ADD r3,r3,r1,LSL #5:ADD r4,r0,r2,LSL #7:ADD r4,r4,r2,LSL #5:STMIA r3!,{r5-r12}:STMIA r3!,{r5-r12}
16880STMIA r3!,{r5-r12}:STMIA r3!,{r5-r12}:STMIA r4!,{r5-r12}:STMIA r4!,{r5-r12}:STMIA r4!,{r5-r12}:STMIA r4!,{r5-r12}:ADD r2,r2,#2:SUB r1,r1,#2:SUBS UZ,UZ,#1:BNE br:CMP r1,#0:BGE bq:LDMFD (UY)!,{PC}:.bp EQUD Uu:.VU STMFD (UY)!,{UZ}:BL bs:.bt LDR r0,bu
17090LDR r0,[r0]:ADR r1,Va:MOV r2,#7:SWI "OS_ConvertInteger4":LDMFD (UY)!,{PC}:.bs STMFD (UY)!,{UZ}:ADR r12,bv:MOV r11,#0:LDR r10,bu:LDR r10,[r10]:.bw MOV r0,#0:ADD r1,r12,#16:SWI "OS_ReadUnsigned":CMP r10,r2:STRGE r11,VV:LDMGEFD (UY)!,{PC}
17270.bx ADD r12,r12,#24:ADD r11,r11,#1:CMP r11,#8:BNE bw:MOV r0,#99:STR r0,VV:LDMFD (UY)!,{PC}:.VW STMFD (UY)!,{UZ}:ADR r12,bv:LDR r11,VV:ADD r10,r12,r11,ASL #4:ADD r10,r10,r11,ASL #3:SUB r10,r10,#24:ADD r9,r12,#7*24:.by MOV r8,#4:.bz ADD r7,r8,#24
17450LDRB r0,[r9,r8]:STRB r0,[r9,r7]:ADD r8,r8,#1:CMP r8,#24:BNE bz:SUB r9,r9,#24:CMP r9,r10:BNE by:LDMFD (UY)!,{PC}:.VX STMFD (UY)!,{UZ}:ADR r0,cU:SWI "OS_Write0":.cV ADR r12,bv:LDR r11,VV:ADD r10,r12,r11,ASL #4:ADD r10,r10,r11,ASL #3:ADD r10,r10,#4
17640.cW MOV r0,#ASC" ":MOV r1,#11:.cX STRB r0,[r10,r1]:SUBS r1,r1,#1:BGE cX:MOV r0,r10:MOV r1,#12:MOV r2,#ASC" ":MOV r3,#ASC"~":SWI "OS_ReadLine":MOV r1,#0:.cY LDRB r0,[r10,r1]:CMP r0,#32:MOVLT r0,#ASC" ":STRB r0,[r10,r1]:ADD r1,r1,#1:CMP r1,#12:BNE cY
17810ADD r10,r10,#12:MOV r0,#ASC"0":MOV r1,#4:.cZ STRB r0,[r10,r1]:SUBS r1,r1,#1:BNE cZ:.ca LDR r0,bu:LDR r0,[r0]:ADR r1,Va:MOV r2,#7:SWI "OS_ConvertInteger4":RSB r3,r2,#8:MOV r4,#ASC" ":CMP r2,#0:BEQ cb:.cc STRB r4,[r10],#1:SUBS r2,r2,#1:BNE cc
17990.cb LDRB r4,[r0],#1:STRB r4,[r10],#1:SUBS r3,r3,#1:BNE cb:LDMFD (UY)!,{PC}:.bu EQUD Vr:.cd EQUD Uu:.ce EQUD aq:.VV EQUD 0:.cf EQUS "????????????":.Va EQUS "        ":EQUD 0:.cU EQUB 31:EQUB 9:EQUB16:EQUS">            <":EQUB 31:EQUB10:EQUB16
18140EQUB 0 :ALIGN:.bv:.cg EQUS "1 : ": EQUS "K J Swinton ":EQUS "  75000":EQUB 0:.ch EQUS "2 : ": EQUS "Ian Swinton ":EQUS "  60000":EQUB 0:.ci EQUS "3 : ": EQUS "------------":EQUS "  50000":EQUB 0:.cj EQUS "4 : ": EQUS "Edgar Froese"
18250EQUS "  45000":EQUB 0:.ck EQUS "5 : ": EQUS "Roger Waters":EQUS "  30000":EQUB 0:.cl EQUS "6 : ": EQUS "Paul Brennan":EQUS "  25000":EQUB 0:.cm EQUS "7 : ": EQUS "------------":EQUS "  20000":EQUB 0:.cn EQUS "8 : ": EQUS "Melrose     "
18330EQUS "  10000":EQUB 0:.co EQUS "x : ": EQUS "xxxxxxxxxxxx":EQUS "xxxxxxx":EQUB 0:.Vc STMFD (UY)!,{UZ}:ADR r11,bv:MOV r10,#0:.cp ADD r1,r11,r10,ASL #4:ADD r1,r1,r10,ASL #3:.cq BL Xj:MOV r2,r12: AND r2, r2, #7:CMP r2,#0:CMPNE r2,#4:BEQ cq:MOV r3,#4*4
18500MOV r4,#11*8:ADD r4,r4,r10,LSL #3:ADD r4,r4,r10:LDR r0,cd:LDR r0,[r0]:STMFD (UY)!,{r10,r11}:BL Wn:LDMFD (UY)!,{r10,r11}:.cr ADD r10,r10,#1:CMP r10,#8:BNE cp:LDMFD (UY)!,{PC}:.Wc STMFD (UY)!,{UZ}:LDR r4,cs:ADD r4,r4,#1: AND r4, r4, #3:STR r4,cs:MOV r1,r0
18700ADD r0,r4,#1:SWI "Opus-Sound_SoundInstrument":LDMFD (UY)!,{PC}:.cs EQUD 0:.ct FNcu("Game-Data"):]:Uk=ct+0:Ul=Uk+1935:Um=Uk+2447:Un=Um+5788:Uo=Um+6300:Up=Uo+5150:Uq=Uo+5662:Ur=Uq+2841:Ut=Uq+3353:bZ=Ut+6330:aq=bZ+256:Xc=aq+3008:Vz=Xc+4352:WV=Vz+1024:NEXTWo
18990ENDPROC
19010DEFFNcu(cv$):cv$="<Opus$Dir>."+cv$:D=OPENINcv$:L=EXT#D:CLOSE#D:IFWo=2OSCLI"LOAD "+cv$+" "+STR$~P%
19050P%+=L:[OPT Wo:ALIGN:]:=Wo
19080DEFFNcw(cx$):FORcy=1 TO16:?P%=ASC(MID$(cx$,cy,1))-48:P%+=1:NEXTcy:=Wo
19150DEFFNbX(cz):FORi=0 TOcz-1:?P%=0:P%+=1:NEXTi:=Wo
���0:�:�" at Line ";�:�
��9:�:�UV:�UW:�UX:�
����UV:UY=13:UZ=14:Ua=15:�Ub  64*1024:Uc= ��:�&0,&00,&00,&00:�&1,&FF,&00,&00:�&2,&00,&FF,&00:�&3,&FF,&FF,&00:�&4,&00,&00,&FF:�&5,&FF,&00,&FF:�&6,&00,&FF,&FF:�&7,&FF,&FF,&FF:�&8,&FF,&88,&00:�&9,&00,&00,&00:�&A,&77,&77,&77:�&B,&AA,&AA,&AA
^E�&C,&CC,&CC,&CC:�&D,&DD,&DD,&DD:�&E,&EE,&EE,&EE:�&F,&FF,&FF,&FF:�
�"��UX:�Ud:�Ue:�Uf:�:�Ug:� �Uc �
��Uh:�Ui
��:�Uc:�Uj:�
���Uf:ș"Opus-Sound_InstallInstrument",00,Uk,Ul,0,0,127,5:ș"Opus-Sound_InstallInstrument",01,Um,Un,0,0,127,5:ș"Opus-Sound_InstallInstrument",02,Uo,Up,0,0,127,5:ș"Opus-Sound_InstallInstrument",03,Uq,Ur,0,0,127,5:ș"Opus-Sound_SetSampleRate",5
NLș"Opus-Sound_SetStereoPositions",4,4,4,4:ș"Opus-Sound_InstallVoices":�
vT��Uj:ș"Opus-Sound_DeInstallVoices":ș&40140,1,208,48,0,0:�"RmKill Opus-Sound":�
����Ug:�:�Us:A%=Ut:B%=!Uu:C%=40*1024 :�Uv:�Uw("OPUS",14*4,2*8,1):�Uw("----",14*4,3*8,2):�Uw("Keys To Use",10.5*4,10*8,3):�Uw("-----------",10.5*4,11*8,4):�Uw("Z                Left",5.5*4,13*8,5):�Uw("X               Right",5.5*4,14*8,6)
 ��Uw(";                  Up",5.5*4,15*8,7):�Uw(".                Down",5.5*4,16*8,1):�Uw("SPACE    Push/Crumble",5.5*4,17*8,2):�Uw("P      Pause/Continue",5.5*4,18*8,5):�Uw("Press SPACE To Play",6.5*4,24*8,3):�Uw("or H to see High Scores",4.5*4,25*8,3)
\��Uw("{ 1991 Kevin J Swinton",4*4,30*8,4):�Ux:�"FX200 1":Uy= ��:�=0:���(-99) ��(-113) ��(-85) ��>12*100:�(-99) ��� ��(-99):Uy=�
��(-113) ��� ��(-113):Uc=�
� �(-85) ��� ��(-85):�=13*100
��>12*100 � �(Uy �Uc) �
��Uz
�'�:�Uc �Uy:�"FX 200 0":�"FX  15 1":�
#��Ui:�"FX 200 1":�VU:�!VV<>99 �
.��28,0,31,31,0:�:�Uw("CONGRATULATIONS!",8*4,2*8,5):�Uw("----------------",8*4,3*8,6):�Uw("You made the High Scores",4*4,7*8,3):�Uw("PLEASE ENTER YOUR NAME",5*4,14*8,1):�Ux:�VW:�"FX 15 1":�VX:�VY
��:�"FX 200 0":�
�2��Uz:VZ$="Last Score : ":�i=0 �7:�Va?i>=�"0" �
�VZ$+=�Va?i
��:�i:Vb=(32-�VZ$)/2:�VY:�28,0,31,31,0:�:�26:�Uw("OPUS",14*4,2*8,5):�Uw("----",14*4,3*8,6):�Uw("Today's Highest Scores",5*4,7*8,3):�Uw("Press SPACE for Main Screen",2.5*4,24*8,7):�Uw(VZ$,Vb*4,26*8,1):�Uw("{ 1991 Kevin J Swinton",4*4,30*8,4):�Vc:�Ux:�=0
x'���(-99) ��>12*100:�� ��(-99):�VY:�
�;��Uh:�"FX 200 1":�Vd:�:�Ve:�Vf:�:�(-113) �!Vg=1:!Vh=-1
��(-56) ��Vi
-�Vj:�!Vk �!Vh �(!Vl �!Vm=0):�Vn:�!Vl ��Vo
,�!Vh �!Vg-=1
6�!Vk �!Vg-=1
@/�Vp:�!Vg=0 �!Vq=16+1:!Vr+=!Vs:�Vp:�!Vk ��Vt
h�!Vg=0 ��Vu
r�!Vq=16+1 ��Vv
|�VY:�"FX 200 0":�
�D��Ve:�28,0,31,31,0:�:�Uw("LEVEL "+�!Vq+"!",12*4,15*8,3):�!Vg=1 �
�!�Uw("Last  Life",11*4,18*8,5)
�/�:�=0:���(-99) ��>2*100:�(-99) ��� ��(-99)
��:�26:�
k��Vo:!Vq+=1:�28,0,31,31,0:�:�Uw("We Done It!",10.5*4,15*8,3):Vw=7*8-1:Vx=2*8-1:�:Vw+=1:Vx+=1:�Vw<22*8 �
�!�Vy(Vw,16*8,6+(Vw �16) �8,Vz)
��:�Vx>=7*8 �
�A%=!Uu:B%=Vx:C%=16*8 :�WU
�|�:�Vy(7*8,16*8,1,WV):�Vy(22*8,16*8,1,WV):Ȗ:�Vy(Vw,16*8,0,WV):�Vy(Vx,16*8,0,WV):�Vy(22*8,16*8,1,WV):�Vx=22*8:�!WW>0 ��WX
-�=0:���>3*100 ��(-99):�(-99) ��� ��(-99)
*�:�26:�
H���WX:WY$="Bonus Score = "+�!WW+" x 100pts":WZ=((32-�WY$) �2)*4:�Uw(WY$,WZ,22*8,7):Wa=�(!WW<10):�=0:���>1*100:�:Ȗ:Ȗ:!Vr+=100:!WW-=1:!Wb=1:�Vp:�Uw(�"  "+�!WW,2),WZ+56-Wa*4,22*8,7):A%=0:C%=2:D%=1:�Wc:�Wd:�!WW=0:!Vk=0:�
	6��Vy(x,y,We,Wf):A%=!Uu:B%=x:C%=y:D%=We:E%=Wf:�Wg:�
	`z��Vi:�Wh:�� ��(-56):Wi=0:�:Ȗ:�Vy(36*8,24*8,12+(Wi �6),WV):Wi=(Wi+1) �48:��(-56):�� ��(-56):�Vy(36*8,24*8,11,WV):�Wj:�
	�`��Vu:�28,0,31,31,0:�:�Uw("GAME OVER!",11*4,15*8,7):�=0:���>3*100 ��(-99):�(-99) ��� ��(-99)
(�:�26:�
F���Vt:!Vg+=1:�28,0,31,31,0:�:�Uw("GAME OVER!",11*4,15*8,7):�Uw("Out of time!",10*4,18*8,6):�=0:���>3*100 ��(-99):�(-99) ��� ��(-99)
��:�26:�
����Vv:�28,0,31,31,0:�:�i=1 �2000:x=�(240)-1:y=�(240)-1:�Vy(x,y,2,Vz):�i:�Uw("GAME COMPLETED",9*4,15*8,2):���(-99):�� ��(-99):�:�26:�
6B��Uw(Wk$,x,y,Wl):$Wm=Wk$+�0:A%=!Uu:B%=Wm:C%=Wl:D%=x:E%=y:�Wn:�
����UW:�Wo=0 �2�2:P%=Ub:[OPT Wo:.Vj STMFD (UY)!,{UZ}:BL Wp:BL Wd:BL Vp:BL Wq:BL Wr:BL Wh:BL Ws:BL Wj:BL Wt:BL Wu:LDMFD (UY)!,{PC}:.Vd MOV r0,#3:STR r0,Vg:MOV r0,#1:STR r0,Vq:MOV r0,#0:STR r0,Vr:STR r0,Vs:MOV PC,UZ:.Vf STMFD (UY)!,{UZ}:LDR r0,Vq:BL Wv
�LDR r0,Vq:SUB r0,r0,#1:ADR r1,Ww:LDRB r0,[r1,r0]:STR r0,Wx:MOV r0,#0:STR r0,Vh:STR r0,Vl:STR r0,Vm:LDR r0,Wy:LDR r1,Vq:SUB r1,r1,#1:ADD r0,r0,r1,LSL #4:LDRB r1,[r0],#1 : STRB r1,Wz +0:LDRB r1,[r0],#1 : STRB r1,Wz +1:LDRB r1,[r0],#1 : STRB r1,XU+0

p�LDRB r1,[r0],#1 : STRB r1,XU+1:LDRB r1,[r0],#1 : STRB r1,XV+0:LDRB r1,[r0],#1 : STRB r1,XV+1:LDRB r1,[r0],#1 : STRB r1,XW+0:LDRB r1,[r0],#1 : STRB r1,XW+1:LDRB r1,[r0],#1 : STRB r1,XX+0:LDRB r1,[r0],#1 : STRB r1,XX+1:MOV r0,#0:STRB r0,XU+3

��STRB r0,XV+3:STRB r0,XW+3:STRB r0,XX+3:STR r0,XY:STR r0,XZ:STR r0,Vk:STR r0,Xa:MOV r0,#1:STRB r0,Wz+3:MOV r0,#60:LDR r1,Vq:SUB r1,r1,#1:MOV r2,#2:MUL r3,r1,r2:SUB r0,r0,r3:STR r0,WW:MOV r0,#100:STR r0,Wb:MOV r0,#4:STR r0,Xb:LDMFD (UY)!,{PC}
��.Wy EQUD Xc:.Ww EQUB 1 : EQUB 1:EQUB 1 : EQUB 1:EQUB 1 : EQUB 2:EQUB 2 : EQUB 2:EQUB 2 : EQUB 2:EQUB 4 : EQUB 4:EQUB 4 : EQUB 4:EQUB 8 : EQUB 8:.Vg EQUD 0:.Vq EQUD 0:.Vr EQUD 0:.Vs EQUD 0:.Vh EQUD 0:.Vl EQUD 0:.Wx EQUD 0:.WW EQUD 0:.Wb EQUD 0
x�.Vk EQUD 0:.XZ EQUD 0:.Xb EQUD 0:.Xa EQUD 0:.Xd EQUD 0:.Xe EQUD 0:.Xf EQUD 0:.Wu STMFD (UY)!,{UZ}:LDR r0,Xa:CMP r0,#0:BEQ Xg:LDR r0,Xd:SUBS r0,r0,#1:STR r0,Xd:�Q r0,#0:STREQ r0,Xa:LDREQ r9,Xh:LDREQ r10,Xe:LDREQ r11,Xf:ADDEQ r9,r9,r10,LSR #4:�Q r4,#0
��STREQB r4,[r9,r11]:�Q r3,#0:BEQ Xi:LDR r10,Xe:LDR r11,Xf:LDR r3,Xa:B Xi:.Xg:BL Xj: � r12, r12, #255:CMP r12,#183:LDMNEFD (UY)!,{PC}:.Xk BL Xj: � r10, r12, #15:MOV r10,r10,LSL #4:BL Xj: � r11, r12, #15:MOV r11,r11,LSL #4:BL Xj: � r12, r12, #3
b�ADD r12,r12,#5:LDRB r0,Wz+0:LDRB r1,Wz+1: � r0, r0, #240: � r1, r1, #240:CMP r0,r10:CMPEQ r1,r11:LDMEQFD (UY)!,{PC}:LDR r9,Xh:ADD r9,r9,r10,LSR #4:ADD r9,r9,r11:LDRB r8,[r9]:CMP r8,#0:LDMNEFD (UY)!,{PC}:STRB r12,[r9]:STR r12,Xa:STR r10,Xe:STR r11,Xf
�MOV r3,r12:ADR r4,Xl:LDR r5,[r4,r12,LSL #2]:STR r5,Xd:.Xi LDR r0,Xm:LDR r0,[r0]:MOV r1,r10:MOV r2,r11:LDR r4,Xn:BL Wg:LDMFD (UY)!,{PC}:.Xm EQUD Uu:.Xn EQUD WV:.Xh EQUD Xo:.Xl EQUD 0:EQUD0:EQUD0:EQUD0:EQUD0:EQUD 6*50:EQUD 5*50:EQUD 4*50:EQUD 3*50
�.Wp LDR r1,Vs:CMP r1,#0:�Q PC,UZ:LDR r0,Vr:CMP r1,#10:ADDGE r0,r0,#10:SUBGE r1,r1,#10:ADDLT r0,r0,#1:SUBLT r1,r1,#1:STR r0,Vr:STR r1,Vs:MOV PC,UZ:.Wd STMFD (UY)!,{UZ}:LDR r0,WW:LDR r1,Wb:SUBS r1,r1,#2:�Q r1,#100:SUBEQ r0,r0,#1:STR r0,WW:STR r1,Wb
�.Xp�Q r0,#00:�Q r2,#2:LDREQ r3,WW:�Q r3,r3,LSR #4:RSB r3,r3,#5:BLEQ Wc:LDR r0,WW:CMP r0,#0:MVNEQ r2,#0:STREQ r2,Vk:.Xq ADR r1,Xr:MOV r3,#35*4:MOV r4,#30*8+1:LDR r0,Uu:MOV r2,#5:BL Wn:LDR r0,WW:ADR r1,Xs:MOV r2,#6:SWI "OS_ConvertInteger4":MOV r3,#31*4
��ADD r3,r3,r2,LSL #2:MOV r4,#30*8+1:LDR r0,Uu:ADR r1,Xs:LDR r5,WW:CMP r5,#10:MOVLE r2,#1:MOVGT r2,#2:BL Wn:LDMFD (UY)!,{PC}:.Xs EQUS "??": EQUB 0 : ALIGN:.Xr EQUS "  ": EQUB 0 : ALIGN:.Wt STMFD (UY)!,{UZ}:LDR r0,Xt:CMP r0,#1:BLEQ Xu:.Xv LDRB r0,Wz+0
��LDRB r1,Wz+1:LDR r2,Xw: � r4, r0, #240: � r5, r1, #240:ADD r2,r2,r4,LSR #4:ADD r2,r2,r5:MOV r3,#0:STRB r3,[r2]:LDRB r4,Xx:LDRB r5,Xy:LDRB r6,Xz:LDRB r7,YU:LDR r8,XY:LDR r9,YV:CMP r8,#0:BEQ YW:.YX SUB r8,r8,#1:STR r8,XY:CMP r9,#0:SUBEQ r1,r1,#1
X�CMP r9,#1:ADDEQ r1,r1,#1:CMP r9,#2:SUBEQ r0,r0,#1:CMP r9,#3:ADDEQ r0,r0,#1:STRB r0,Wz+0:STRB r1,Wz+1:LDMFD (UY)!,{PC}:.YW MOV r0,#122:SWI "OS_Byte":MOV r2,#16:MOV r9,#0:LDR r10,Vs:ADR r11,YY:.YZ CMP r1,#�-98:BNE Ya:MOV r3,#2:STR r3,YV:CMP r6,#0
4�CMPNE r6,#5:CMPNE r6,#6:CMPNE r6,#7:CMPNE r6,#8:�Q r9,r6:STREQ r2,XY:BEQ Yb:CMP r6,#10:MVNEQ r1,#0:�Q r2,#0:BEQ Yc:.Ya CMP r1,#�-67:BNE Yd:MOV r3,#3:STR r3,YV:CMP r7,#0:CMPNE r7,#5:CMPNE r7,#6:CMPNE r7,#7:CMPNE r7,#8:�Q r9,r7:STREQ r2,XY:BEQ Yb
$�CMP r7,#10:�Q r1,#1:�Q r2,#0:BEQ Yc:.Yd CMP r1,#�-73:BNE Ye:MOV r3,#0:STR r3,YV:CMP r4,#0:CMPNE r4,#5:CMPNE r4,#6:CMPNE r4,#7:CMPNE r4,#8:�Q r9,r4:STREQ r2,XY:BEQ Yb:CMP r4,#10:�Q r1,#0:MVNEQ r2,#0:BEQ Yc:.Ye CMP r1,#�-104:BNE Yb:MOV r3,#1:STR r3,YV
(�CMP r5,#0:CMPNE r5,#5:CMPNE r5,#6:CMPNE r5,#7:CMPNE r5,#8:�Q r9,r5:STREQ r2,XY:CMP r5,#10:�Q r1,#0:�Q r2,#1:BEQ Yc:.Yb LDR r0,YV:STRB r0,Wz+3:LDR r12,[r11,r9,ASL #2]:ADD r10,r10,r12:STR r10,Vs:CMP r9,#8:BNE Yf:LDR r10,Yg:LDR r11,[r10]:ADD r11,r11,#1
�CMP r11,#4:�Q r11,#3:STR r11,[r10]:MOV r12,#0001:.Yf CMP r12,#0000:BEQ Yh:.Yi MOV r0,#0:STR r0,Xa:LDR r0,Yj:LDR r0,[r0]:LDRB r1,Wz+0:LDRB r2,Wz+1:LDR r4,Yk:LDR r3,YV:CMP r3,#0:SUBEQ r2,r2,#1*16:CMP r3,#1:ADDEQ r2,r2,#1*16:CMP r3,#2:SUBEQ r1,r1,#1*16
�CMP r3,#3:ADDEQ r1,r1,#1*16:MOV r3,#0:BL Wg:MOV r0,#3:MOV r2,#2:MOV r3,#1:BL Wc:.Yh MOV r0,#121:MOV r1,#98 � &80:SWI "OS_Byte":LDR r8,XY:CMP r1,#&FF:CMPEQ r8,#0:BLEQ Yl:LDR r8,XY:CMP r8,#0:BNE Xv:LDMFD (UY)!,{PC}:.Yc LDR r0,YV:STRB r0,Wz+3:LDR r0,Yj
��LDR r0,[r0]:LDRB r3,Wz+0:LDRB r4,Wz+1:ADD r1,r3,r1,ASL #4:ADD r2,r4,r2,ASL #4:MOV r3,#1:STR r3,Xt:STR r1,Ym:STR r2,Yn:LDR r4,Yk:BL Wg:LDR r0,Yj:LDR r0,[r0]:LDRB r1,Wz+0:LDRB r2,Wz+1:LDRB r3,Wz+3:MOV r3,r3,LSL #1:LDR r4,Yo:BL Wg:LDMFD (UY)!,{PC}
��.Xu STMFD (UY)!,{UZ}:LDR r0,Yj:LDR r0,[r0]:LDR r1,Ym:LDR r2,Yn:MOV r3,#10:LDR r4,Yk:BL Wg:MOV r0,#0:STR r0,Xt:LDMFD (UY)!,{PC}:.Xt EQUD 0:.Ym EQUD 0:.Yn EQUD 0:.YV EQUD 0:.XY EQUD 0:.Xw EQUD Xo:.Yj EQUD Uu:.Yg EQUD Vg:.Yk EQUD WV:.Yo
j�.YY EQUD 0:EQUD 0:EQUD 0:EQUD 0:EQUD 0:EQUD 500:EQUD 750:EQUD 1000:EQUD 0000:.Ws STMFD (UY)!,{UZ}:LDRB r0,Wz+0:LDRB r1,Wz+1: � r1, r1, #240:ADD r0,r1,r0,LSR #4:LDR r5,Yp:ADD r5,r5,r0:LDRB r6,[r5,#-16]:LDRB r7,[r5,#+16]:LDRB r8,[r5,#-1]
�LDRB r9,[r5,#+1]:LDRB r0,Wz+0:LDRB r1,Wz+1: �S r11, r1, #15:STREQB r6,Xx:STREQB r7,Xy: �S r11, r0, #15:STREQB r8,Xz:STREQB r9,YU:.Yq LDRB r0,Wz+0:LDRB r1,Wz+1:MOV r2,#0:LDR r3,Yr:.Ys ADD r4,r3,r2,LSL #3:LDRB r5,[r4,#0]:LDRB r6,[r4,#1]:LDRB r7,[r4,#3]
�CMP r7,#1:BEQ Yt:SUBS r8,r0,r5:SUBLT r8,r5,r0:SUBS r9,r1,r6:SUBLT r9,r6,r1:CMP r8,#16:BGE Yt:CMP r9,#16:BGE Yt:MVN r10,#0:STRB r10,Vh:.Yu MOV r0,#1:MOV r2,#2:MOV r3,#5:BL Wc:LDMFD (UY)!,{PC}:.Yt ADD r2,r2,#1:CMP r2,#4:BNE Ys:LDMFD (UY)!,{PC}
��.Yr EQUD XU:.Xx EQUB 0:.Xy EQUB 0:.Xz EQUB 0:.YU EQUB 0:.Yp EQUD Xo:.Yl STMFD (UY)!,{UZ}:LDR r0,Vm:CMP r0,#1:LDMEQFD (UY)!,{PC}:LDRB r1,Wz+0:LDRB r2,Wz+1:LDRB r3,Wz+3:.Yv CMP r1,#14*16:CMPEQ r3,#3:LDMEQFD (UY)!,{PC}:CMP r1,#1*16
 v�CMPEQ r3,#2:LDMEQFD (UY)!,{PC}:CMP r2,#14*16:CMPEQ r3,#1:LDMEQFD (UY)!,{PC}:CMP r2,#1*16:CMPEQ r3,#0:LDMEQFD (UY)!,{PC}:.Yw LDR r0,Yx:MOV r1,r1,LSR #4: � r2, r2, #%11110000:ADD r4,r0,r2:ADD r4,r4,r1:CMP r3,#0:LDREQB r5,[r4,#-16]:LDREQB r6,[r4,#-16-16]
 ��SUBEQ r2,r2,#1*16:CMP r3,#1:LDREQB r5,[r4,#+16]:LDREQB r6,[r4,#+16+16]:ADDEQ r2,r2,#1*16:CMP r3,#2:LDREQB r5,[r4,#-1]:LDREQB r6,[r4,#-1-1]:SUBEQ r1,r1,#1:CMP r3,#3:LDREQB r5,[r4,#+1]:LDREQB r6,[r4,#+1+1]:ADDEQ r1,r1,#1:CMP r5,#1:CMPNE r5,#2
!��CMPNE r5,#3:CMPNE r5,#4:CMPNE r5,#5:LDMNEFD (UY)!,{PC}:CMP r6,#0:BEQ Yy:.Yz CMP r5,#2:CMPNE r5,#3:CMPNE r5,#4:CMPNE r5,#5:LDMEQFD (UY)!,{PC}:MOV r0,#1:STR r0,Vm:STR r1,ZU+0:STR r2,ZU+4:MOV r0,#2:STR r0,ZU+8:STR r3,ZU+12:MOV r0,#15:STR r0,ZU+16
"V�LDR r0,Vs:ADD r0,r0,#50:STR r0,Vs:LDMFD (UY)!,{PC}:.Yy MOV r0,#1:STR r0,Vm:STR r1,ZU+0:STR r2,ZU+4:MOV r0,#1:STR r0,ZU+8:STR r3,ZU+12:LDR r0,Yx:ADD r4,r1,r2:STRB r5,ZU+16:MOV r5,#0:STRB r5,[r0,r4]:LDR r0,Vs:ADD r0,r0,#10:STR r0,Vs:LDMFD (UY)!,{PC}
#2�.Wr STMFD (UY)!,{UZ}:LDR r0,Vm:CMP r0,#0:LDMEQFD (UY)!,{PC}:LDR r0,ZU+8:CMP r0,#1:BEQ ZV:.ZW LDR r0,ZU+16:SUBS r0,r0,#1:BEQ ZX:STR r0,ZU+16:LDR r1,ZU+0:LDR r2,ZU+4:LDR r5,Uu:MOV r2,r2,LSR #4:ADD r5,r5,r2,LSL #11:ADD r5,r5,r2,LSL #9:ADD r5,r5,r1,LSL #3
#��BL Xj: � r12, r12, #15:ADD r5,r5,r12,LSL #7:ADD r5,r5,r12,LSL #5:BL Xj: � r12, r12, #1:ADD r5,r5,r12,LSL #2:BL Xj:LDR r6,[r5]: � r6, r6, r12:STR r6,[r5]:LDMFD (UY)!,{PC}:.ZX STR r0,Vm:LDR r0,Yx:LDR r1,ZU+0:LDR r2,ZU+4:ADD r3,r1,r2:MOV r4,#0
$��STRB r4,[r0,r3]:LDR r5,Uu:MOV r2,r2,LSR #4:ADD r5,r5,r2,LSL #11:ADD r5,r5,r2,LSL #9:ADD r5,r5,r1,LSL #3:.ZY MOV r6,#&00000000:MOV r7,#16:.ZZ STR r6,[r5,#0]:STR r6,[r5,#4]:ADD r5,r5,#160:SUBS r7,r7,#1:BNE ZZ:LDMFD (UY)!,{PC}:.ZV LDR r0,Yp:LDR r1,ZU+0
%:�LDR r2,ZU+4:ADD r3,r1,r2:ADD r3,r3,r0:LDR r4,ZU+12:CMP r4,#0:LDREQB r5,[r3,#-16]:CMP r4,#1:LDREQB r5,[r3,#+16]:CMP r4,#2:LDREQB r5,[r3,#-1]:CMP r4,#3:LDREQB r5,[r3,#+1]:CMP r5,#0:BEQ Za:MOV r0,#0:STR r0,Vm:LDR r0,Yx:ADD r4,r1,r2:LDR r5,ZU+16
%��STRB r5,[r0,r4]:.Zb MOV r0,#2:MOV r2,#2:MOV r3,#8:BL Wc:BL Zc:B Zd:.Za LDR r0,Uu:MOV r3,#0:MOV r1,r1,LSL #4:LDR r4,Ze:BL Wg:LDR r1,ZU+0:LDR r2,ZU+4:LDR r4,ZU+12:CMP r4,#0:SUBEQ r2,r2,#16:CMP r4,#1:ADDEQ r2,r2,#16:CMP r4,#2:SUBEQ r1,r1,#1:CMP r4,#3
&�ADDEQ r1,r1,#1:STR r1,ZU+0:STR r2,ZU+4:.Zf LDR r0,Uu:LDR r3,ZU+16:MOV r1,r1,LSL #4:LDR r4,Ze:BL Wg:.Zd LDR r0,ZU+0:LDR r1,ZU+4:MOV r0,r0,LSL #4:MOV r2,#1:MOV r3,#0:ADR r4,XU:.Zg ADD r5,r4,r3,LSL #3:LDRB r6,[r5,#0]:LDRB r7,[r5,#1]:LDRB r8,[r5,#3]
'��CMP r8,#1:BEQ Zh:SUBS r9,r0,r6:SUBLT r9,r6,r0:SUBS r10,r1,r7:SUBLT r10,r7,r1:CMP r9,#16:BGE Zh:CMP r10,#16:BGE Zh:STRB r2,[r5,#3]:LDR r9,Vs:LDR r10,ZU+16:CMP r10,#1:ADDEQ r9,r9,#250:CMP r10,#4:ADDEQ r9,r9,#500:CMP r10,#3:ADDEQ r9,r9,#250
(F�ADDEQ r9,r9,#500:CMP r10,#2:ADDEQ r9,r9,#1000:STR r9,Vs:LDR r9,Xb:SUBS r9,r9,#1:STR r9,Xb:MVNEQ r9,#0:STREQ r9,Vl:.Zh ADD r3,r3,#1:CMP r3,#4:BNE Zg:LDMFD (UY)!,{PC}:.Ze EQUD WV:.Vm EQUD 0:.ZU EQUD 0:EQUD 0:EQUD 0:EQUD 0:EQUD 0:.Yx EQUD Xo
)@�.Zc STMFD (UY)!,{UZ}:LDR r0,XZ:CMP r0,#1:LDMEQFD (UY)!,{PC}:LDR r0,Zi:MOV r1,#0:.Zj LDRB r2,[r0]: � r3, r1, #15:MOV r4,r1,LSR #4:CMP r2,#2:BNE Zk:.Zl CMP r3,#12:BGT Zm:LDRB r5,[r0,#+1]:LDRB r6,[r0,#+2]:LDRB r7,[r0,#+3]:CMP r5,#3:CMPEQ r6,#4
)��CMPEQ r7,#4:BLEQ Zn:�Q r0,#1:STREQ r0,XZ:LDMEQFD (UY)!,{PC}:.Zm CMP r4,#12:BGT Zk:LDRB r5,[r0,#+1*16]:LDRB r6,[r0,#+2*16]:LDRB r7,[r0,#+3*16]:CMP r5,#3:CMPEQ r6,#4:CMPEQ r7,#4:BLEQ Zn:�Q r0,#1:STREQ r0,XZ:LDMEQFD (UY)!,{PC}:.Zk ADD r0,r0,#1
*��ADD r1,r1,#1:CMP r1,#16*16:BNE Zj:MOV r0,#0:LDMFD (UY)!,{PC}:.Zi EQUD Xo:.Zn STMFD (UY)!,{UZ}:LDR r0,Vs:LDR r1,Zo:ADD r0,r0,r1:STR r0,Vs:LDMFD (UY)!,{PC}:.Zo EQUD 5000:.Wh STMFD (UY)!,{UZ}:.Zp LDR r0,Uu:LDRB r1,Wz+0:LDRB r2,Wz+1:LDRB r3,Wz+3
+�� � r5,r1,#15: � r6,r2,#15:CMP r3,#0:�Q r4,r6,LSR #3:CMP r3,#1:�Q r4,r6,LSR #3:CMP r3,#2:�Q r4,r5,LSR #3:CMP r3,#3:�Q r4,r5,LSR #3:MOV r3,r3,LSL #1:ADD r3,r3,r4:LDR r4,Zq:BL Wg:.Zr LDRB r0,XU+3:CMP r0,#1:BEQ Zs:LDR r0,Uu:LDRB r1,XU+0:LDRB r2,XU+1:BL WU
,~�.Zs LDRB r0,XV+3:CMP r0,#1:BEQ Zt:LDR r0,Uu:LDRB r1,XV+0:LDRB r2,XV+1:BL WU:.Zt LDRB r0,XW+3:CMP r0,#1:BEQ Zu:LDR r0,Uu:LDRB r1,XW+0:LDRB r2,XW+1:BL WU:.Zu LDRB r0,XX+3:CMP r0,#1:LDMEQFD (UY)!,{PC}:LDR r0,Uu:LDRB r1,XX+0:LDRB r2,XX+1:BL WU
-P�LDMFD (UY)!,{PC}:.Zq EQUD Vz:.Zv EQUD WV:.Wj STMFD (UY)!,{UZ}:MOV r0,#19:SWI "OS_Byte":.Zw LDR r0,Uu:LDRB r1,Wz+0:LDRB r2,Wz+1:MOV r3,#0:LDR r4,Zv:BL Wg:.Zx LDR r0,Uu:LDRB r1,XU+0:LDRB r2,XU+1:MOV r3,#0:LDR r4,Zv:LDRB r5,XU+3:CMP r5,#0:BLEQ Wg
.@�.Zy LDR r0,Uu:LDRB r1,XV+0:LDRB r2,XV+1:MOV r3,#0:LDR r4,Zv:LDRB r5,XV+3:CMP r5,#0:BLEQ Wg:.Zz LDR r0,Uu:LDRB r1,XW+0:LDRB r2,XW+1:MOV r3,#0:LDR r4,Zv:LDRB r5,XW+3:CMP r5,#0:BLEQ Wg:.aU LDR r0,Uu:LDRB r1,XX+0:LDRB r2,XX+1:MOV r3,#0:LDR r4,Zv
/�LDRB r5,XX+3:CMP r5,#0:BLEQ Wg:LDMFD (UY)!,{PC}:.Wz EQUB 0 : EQUB 0 : EQUB 0 : EQUB 0:EQUB 0 : EQUB 0 : EQUB 0 : EQUB 0:.XU EQUB 0 : EQUB 0 : EQUB 5 : EQUB 0:EQUB 0 : EQUB 0 : EQUB 0 : EQUB 0:.XV EQUB 0 : EQUB 0 : EQUB 5 : EQUB 0
/��EQUB 0 : EQUB 0 : EQUB 0 : EQUB 0:.XW EQUB 0 : EQUB 0 : EQUB 5 : EQUB 0:EQUB 0 : EQUB 0 : EQUB 0 : EQUB 0:.XX EQUB 0 : EQUB 0 : EQUB 5 : EQUB 0:EQUB 0 : EQUB 0 : EQUB 0 : EQUB 0:.Wq STMFD (UY)!,{UZ}:MOV r0,#3:ADR r1,XU:LDR r2,aV:LDR r6,Wx
0�.aW ADD r3,r1,r0,LSL #3:.aX LDRB r11,[r3,#3]:CMP r11,#1:BEQ aY:.aZ LDRB r11,[r3,#4]:LDRB r12,[r3,#5]:CMP r11,#0:SUBGT r11,r11,#1:STRGTB r11,[r3,#4]:BGT aa:.ab LDRB UZ,[r3,#0]: �S UZ, UZ, #15:MOVNE UZ,#1:STRNEB UZ,[r3,#4]:BNE aa:LDRB UZ,[r3,#1]
0�� �S UZ, UZ, #15:MOVNE UZ,#1:STRNEB UZ,[r3,#4]:BNE aa:BL Xj: � r12, r12, #15:MOV r12,r12,LSL #4:STRB r12,[r3,#4]:BL Xj: � r12, r12, #3:STRB r12,[r3,#5]:B aY:.aa LDRB r4,[r3,#0]:LDRB r5,[r3,#1]: � UZ, r5, #%11110000:ADD UZ,UZ,r4,LSR #4:ADD UZ,r2,UZ
1t�CMP r12,#0:LDREQB r7,[UZ,#-16]: �EQ r11, r5, #15:CMP r12,#1:LDREQB r7,[UZ,#+16]: �EQ r11, r5, #15:CMP r12,#2:LDREQB r7,[UZ,#-1]: �EQ r11, r4, #15:CMP r12,#3:LDREQB r7,[UZ,#+1]: �EQ r11, r4, #15:CMP r11,#0:BNE ac:CMP r7,#0:CMPNE r7,#5:CMPNE r7,#6
2F�CMPNE r7,#7:CMPNE r7,#8:MOVNE r11,#0:STRNEB r11,[r3,#4]:BNE aY:.ac CMP r12,#0:SUBEQ r5,r5,r6:CMP r12,#1:ADDEQ r5,r5,r6:CMP r12,#2:SUBEQ r4,r4,r6:CMP r12,#3:ADDEQ r4,r4,r6:.ad STRB r4,[r3,#0]:STRB r5,[r3,#1]:.aY SUBS r0,r0,#1:BGE aW:LDMFD (UY)!,{PC}
3,�.aV EQUD Xo:.Vp STMFD (UY)!,{UZ}:.ae LDR r0,Uu:ADR r1,af:LDR r2,Vg:ADD r2,r2,#�"0":STRB r2,[r1]:MOV r2,#6:MOV r3,#36*4:MOV r4,#10*8-5:BL Wn:.ag LDR r0,Uu:ADR r1,ah:LDR r2,Vq:CMP r2,#10:MOVGE r3,#�"1":SUBGE r2,r2,#10:MOVLT r3,#�" ":STRB r3,[r1,#0]
3��ADD r2,r2,#�"0":STRB r2,[r1,#1]:MOV r2,#2:MOV r3,#35*4:MOV r4,#15*8:BL Wn:.ai LDR r0,Vr:ADR r1,aj:MOV r2,#8:SWI "OS_ConvertInteger4":MOV r3,#31*4:ADD r3,r3,r2,LSL #2:MOV r4,#21*8:LDR r0,Uu:ADR r1,aj:MOV r2,#7:BL Wn:LDMFD (UY)!,{PC}
4��.af EQUS "?": EQUB 0 : ALIGN:.ah EQUS "??": EQUB 0 : ALIGN:.aj EQUS "????????": EQUB 0 : ALIGN:.Uv LDRB r4,[r0],#1:LDRB r5,[r0],#1:SUBS r2,r2,r5:MOVLT PC,UZ:.ak STRB r4,[r1],#1:SUBS r5,r5,#1:BGT ak:B Uv:.Ud ADR r0,al:ADR r1,Uu
5��SWI "OS_ReadVduVariables":MOV PC,UZ:.al DCD 149:DCD -1:.Uu DCD 0:.Wn STMFD (UY)!,{UZ}:ADD r5,r3,r4,ASL #7:ADD r5,r5,r4,ASL #5:ADR r6,am:LDR UZ,[r6,r2,ASL #2]:LDR r2,an:ADD r0,r0,r5:.ao LDRB r3,[r1],#1:CMP r3,#0:LDMEQFD (UY)!,{PC}:SUB r3,r3,#32
6j�ADD r4,r2,r3,ASL #5:.ap LDMIA r4!,{r5-r12}: � r5, r5, UZ: � r6, r6, UZ: � r7, r7, UZ: � r8, r8, UZ: � r9, r9, UZ: � r10, r10, UZ: � r11, r11, UZ: � r12, r12, UZ:STR r5,[r0,#0*160]:STR r6,[r0,#1*160]:STR r7,[r0,#2*160]:STR r8,[r0,#3*160]
6��STR r9,[r0,#4*160]:STR r10,[r0,#5*160]:STR r11,[r0,#6*160]:STR r12,[r0,#7*160]:ADD r0,r0,#4:BAL ao:.an EQUD aq:.am EQUD &00000000 : EQUD &11111111:EQUD &22222222 : EQUD &33333333:EQUD &44444444 : EQUD &55555555:EQUD &66666666 : EQUD &77777777
7x�EQUD &88888888 : EQUD &99999999:EQUD &AAAAAAAA : EQUD &BBBBBBBB:EQUD &CCCCCCCC : EQUD &DDDDDDDD:EQUD &EEEEEEEE : EQUD &FFFFFFFF:.ar EQUD Xc:.Wv LDR r0,Uu:LDR r1,ar:ADD r1,r1,#16*16:LDR r2,Vq:SUB r2,r2,#1:ADD r1,r1,r2,LSL #8:LDR r2,as:LDR r11,at
8�MOV r3,#16:.au MOV r4,#16:MOV r5,r0:.av LDRB r6,[r1],#1:STRB r6,[r11],#1:ADD r7,r2,r6,LSL #7:MOV r8,#16:.aw LDMIA r7!,{r9-r10}:STMIA r5!,{r9-r10}:ADD r5,r5,#160-8:SUBS r8,r8,#1:BNE aw:SUB r5,r5,#(2*8)*160:ADD r5,r5,#8:SUBS r4,r4,#1:BNE av
8��ADD r0,r0,#(2*8)*160:SUBS r3,r3,#1:BNE au:MOV PC,UZ:.as EQUD WV:.at EQUD Xo:.Wg ADD r3,r4,r3,LSL #7:.ax ADD r0,r0,r2,LSL #7:ADD r0,r0,r2,LSL #5:MOV r2,r1,LSR #3:ADD r0,r0,r2,LSL #2: � r1, r1, #7:MOV r1,r1,LSL #2:MOV r2,#16:.ay LDMIA r3!,{r7,r8}
9l�MOV r9,#&00000000:.az CMP r1,#0:BEQ bU:.bV RSB r4,r1,#32:MOV r9,r8,LSR r4:MOV r8,r8,LSL r1: �R r8,r8,r7,LSR r4:MOV r7,r7,LSL r1:.bU CMP r1,#0:STMEQIA r0!,{r7-r8}:ADDEQ r0,r0,#4:STMNEIA r0!,{r7-r9}:.bW ADD r0,r0,#160-(16/2)-4:SUBS r2,r2,#1:BNE ay
:�MOV PC,UZ:.Xo �bX(16*16):.Wm EQUS�64,�0):.bY EQUD bZ:.WU LDR r3,bY:.ba ADD r0,r0,r2,LSL #7:ADD r0,r0,r2,LSL #5:MOV r2,r1,LSR #3:ADD r0,r0,r2,LSL #2: � r1, r1, #7:MOV r1,r1,LSL #2:MOV r2,#16:.bb LDMIA r3!,{r7,r8,r10,r11}:.bc CMP r1,#0:MOV r9,#&00000000
:��MVN r12,#&00000000:BEQ bd:.be RSB r4,r1,#32:MOV r12,r12,LSL r1: �R r12,r12,r11,LSR r4:MOV r11,r11,LSL r1: �R r11,r11,r10,LSR r4:MOV r10,r10,LSL r1:MVN r5,#&00000000: �R r10,r10,r5,LSR r4:MOV r9,r8,LSR r4:MOV r8,r8,LSL r1: �R r8,r8,r7,LSR r4
;V�MOV r7,r7,LSL r1:.bd LDMIA r0,{r4-r6}: � r4, r4, r10: � r5, r5, r11: � r6, r6, r12: �R r4,r4,r7: �R r5,r5,r8: �R r6,r6,r9:STMIA r0!,{r4-r6}:.bf ADD r0,r0,#160-(16/2)-4:SUBS r2,r2,#1:BNE bb:MOV PC,UZ:.Xj STMFD (UY)!,{r1-r2}:LDR r12,bg:LDR r1,bh
<
�MOVS r2,r12,LSR #31: �NE r12, r12, r1:MOV r12,r12,ROR #31:MOVS r2,r12,LSR #31: �NE r12, r12, r1:MOV r12,r12,ROR #31:MOVS r2,r12,LSR #31: �NE r12, r12, r1:MOV r12,r12,ROR #31:MOVS r2,r12,LSR #31: �NE r12, r12, r1:MOV r12,r12,ROR #31:STR r12,bg
<��LDMFD (UY)!,{r1-r2}:MOV PC,UZ:.bg EQUD &8B2197C4:.bh EQUD &76B50153:.Ue STMFD (UY)!,{UZ}:ADR r12,bi:MOV r11,#0:.bj MOV r0,r11:MOV r1,#16:SWI "OS_ReadPalette":MOV r4,r2,LSR #24: � r4, r4, #&FF:MOV r5,r2,LSR #16: � r5, r5, #&FF:MOV r6,r2,LSR #8
=J� � r6, r6, #&FF:STR r6,[r12],#4:STR r5,[r12],#4:STR r4,[r12],#4:ADD r11,r11,#1:CMP r11,#16:BNE bj:LDMFD (UY)!,{PC}:.Us STMFD (UY)!,{UZ}:MOV r1,#15:.bk MOV r0,#19:SWI "OS_WriteC":MOV r0,r1:SWI "OS_WriteC":MOV r0,#16:SWI "OS_WriteC":MOV r0,#0
>�SWI "OS_WriteC":SWI "OS_WriteC":SWI "OS_WriteC":SUBS r1,r1,#1:BGE bk:LDMFD (UY)!,{PC}:.Ux STMFD (UY)!,{UZ}:MOV r11,#1:.bl MOV r0,#19:SWI "OS_Byte":ADR r12,bi:MOV r10,#0:.bm MOV r0,#19:SWI "OS_WriteC":MOV r0,r10:SWI "OS_WriteC":MOV r0,#16
>��SWI "OS_WriteC":LDR r0,[r12],#4:MUL r0,r11,r0:MOV r0,r0,LSR #4: � r0, r0, #&FF:SWI "OS_WriteC":LDR r0,[r12],#4:MUL r0,r11,r0:MOV r0,r0,LSR #4: � r0, r0, #&FF:SWI "OS_WriteC":LDR r0,[r12],#4:MUL r0,r11,r0:MOV r0,r0,LSR #4: � r0, r0, #&FF
?\�SWI "OS_WriteC":ADD r10,r10,#1:CMP r10,#16:BNE bm:ADD r11,r11,#1:CMP r11,#16+1:BNE bl:LDMFD (UY)!,{PC}:.VY STMFD (UY)!,{UZ}:MOV r11,#15:.bn MOV r0,#19:SWI "OS_Byte":ADR r12,bi:MOV r10,#0:.bo MOV r0,#19:SWI "OS_WriteC":MOV r0,r10:SWI "OS_WriteC"
@$�MOV r0,#16:SWI "OS_WriteC":LDR r0,[r12],#4:MUL r0,r11,r0:MOV r0,r0,LSR #4: � r0, r0, #&FF:SWI "OS_WriteC":LDR r0,[r12],#4:MUL r0,r11,r0:MOV r0,r0,LSR #4: � r0, r0, #&FF:SWI "OS_WriteC":LDR r0,[r12],#4:MUL r0,r11,r0:MOV r0,r0,LSR #4: � r0, r0, #&FF
@��SWI "OS_WriteC":ADD r10,r10,#1:CMP r10,#16:BNE bo:SUBS r11,r11,#1:BGE bn:LDMFD (UY)!,{PC}:.bi �bX((16*3)*4):.Vn STMFD (UY)!,{UZ}:LDR r0,bp:LDR r0,[r0]:MOV r1,#255:MOV r2,#000:MOV r5,#0:MOV r6,#0:MOV r7,#0:MOV r8,#0
Ax�MOV r9,#0:MOV r10,#0:MOV r11,#0:MOV r12,#0:.bq STMFD (UY)!,{r0-r2}:MOV r0,#19:SWI "OS_Byte":LDMFD (UY)!,{r0-r2}:MOV UZ,#2:.br ADD r3,r0,r1,LSL #7:ADD r3,r3,r1,LSL #5:ADD r4,r0,r2,LSL #7:ADD r4,r4,r2,LSL #5:STMIA r3!,{r5-r12}:STMIA r3!,{r5-r12}
A�STMIA r3!,{r5-r12}:STMIA r3!,{r5-r12}:STMIA r4!,{r5-r12}:STMIA r4!,{r5-r12}:STMIA r4!,{r5-r12}:STMIA r4!,{r5-r12}:ADD r2,r2,#2:SUB r1,r1,#2:SUBS UZ,UZ,#1:BNE br:CMP r1,#0:BGE bq:LDMFD (UY)!,{PC}:.bp EQUD Uu:.VU STMFD (UY)!,{UZ}:BL bs:.bt LDR r0,bu
B��LDR r0,[r0]:ADR r1,Va:MOV r2,#7:SWI "OS_ConvertInteger4":LDMFD (UY)!,{PC}:.bs STMFD (UY)!,{UZ}:ADR r12,bv:MOV r11,#0:LDR r10,bu:LDR r10,[r10]:.bw MOV r0,#0:ADD r1,r12,#16:SWI "OS_ReadUnsigned":CMP r10,r2:STRGE r11,VV:LDMGEFD (UY)!,{PC}
Cv�.bx ADD r12,r12,#24:ADD r11,r11,#1:CMP r11,#8:BNE bw:MOV r0,#99:STR r0,VV:LDMFD (UY)!,{PC}:.VW STMFD (UY)!,{UZ}:ADR r12,bv:LDR r11,VV:ADD r10,r12,r11,ASL #4:ADD r10,r10,r11,ASL #3:SUB r10,r10,#24:ADD r9,r12,#7*24:.by MOV r8,#4:.bz ADD r7,r8,#24
D*�LDRB r0,[r9,r8]:STRB r0,[r9,r7]:ADD r8,r8,#1:CMP r8,#24:BNE bz:SUB r9,r9,#24:CMP r9,r10:BNE by:LDMFD (UY)!,{PC}:.VX STMFD (UY)!,{UZ}:ADR r0,cU:SWI "OS_Write0":.cV ADR r12,bv:LDR r11,VV:ADD r10,r12,r11,ASL #4:ADD r10,r10,r11,ASL #3:ADD r10,r10,#4
D��.cW MOV r0,#�" ":MOV r1,#11:.cX STRB r0,[r10,r1]:SUBS r1,r1,#1:BGE cX:MOV r0,r10:MOV r1,#12:MOV r2,#�" ":MOV r3,#�"~":SWI "OS_ReadLine":MOV r1,#0:.cY LDRB r0,[r10,r1]:CMP r0,#32:MOVLT r0,#�" ":STRB r0,[r10,r1]:ADD r1,r1,#1:CMP r1,#12:BNE cY
E��ADD r10,r10,#12:MOV r0,#�"0":MOV r1,#4:.cZ STRB r0,[r10,r1]:SUBS r1,r1,#1:BNE cZ:.ca LDR r0,bu:LDR r0,[r0]:ADR r1,Va:MOV r2,#7:SWI "OS_ConvertInteger4":RSB r3,r2,#8:MOV r4,#�" ":CMP r2,#0:BEQ cb:.cc STRB r4,[r10],#1:SUBS r2,r2,#1:BNE cc
FF�.cb LDRB r4,[r0],#1:STRB r4,[r10],#1:SUBS r3,r3,#1:BNE cb:LDMFD (UY)!,{PC}:.bu EQUD Vr:.cd EQUD Uu:.ce EQUD aq:.VV EQUD 0:.cf EQUS "????????????":.Va EQUS "        ":EQUD 0:.cU EQUB 31:EQUB 9:EQUB16:EQUS">            <":EQUB 31:EQUB10:EQUB16
F��EQUB 0 :ALIGN:.bv:.cg EQUS "1 : ": EQUS "K J Swinton ":EQUS "  75000":EQUB 0:.ch EQUS "2 : ": EQUS "Ian Swinton ":EQUS "  60000":EQUB 0:.ci EQUS "3 : ": EQUS "------------":EQUS "  50000":EQUB 0:.cj EQUS "4 : ": EQUS "Edgar Froese"
GJ�EQUS "  45000":EQUB 0:.ck EQUS "5 : ": EQUS "Roger Waters":EQUS "  30000":EQUB 0:.cl EQUS "6 : ": EQUS "Paul Brennan":EQUS "  25000":EQUB 0:.cm EQUS "7 : ": EQUS "------------":EQUS "  20000":EQUB 0:.cn EQUS "8 : ": EQUS "Melrose     "
G��EQUS "  10000":EQUB 0:.co EQUS "x : ": EQUS "xxxxxxxxxxxx":EQUS "xxxxxxx":EQUB 0:.Vc STMFD (UY)!,{UZ}:ADR r11,bv:MOV r10,#0:.cp ADD r1,r11,r10,ASL #4:ADD r1,r1,r10,ASL #3:.cq BL Xj:MOV r2,r12: � r2, r2, #7:CMP r2,#0:CMPNE r2,#4:BEQ cq:MOV r3,#4*4
HD�MOV r4,#11*8:ADD r4,r4,r10,LSL #3:ADD r4,r4,r10:LDR r0,cd:LDR r0,[r0]:STMFD (UY)!,{r10,r11}:BL Wn:LDMFD (UY)!,{r10,r11}:.cr ADD r10,r10,#1:CMP r10,#8:BNE cp:LDMFD (UY)!,{PC}:.Wc STMFD (UY)!,{UZ}:LDR r4,cs:ADD r4,r4,#1: � r4, r4, #3:STR r4,cs:MOV r1,r0
I�ADD r0,r4,#1:SWI "Opus-Sound_SoundInstrument":LDMFD (UY)!,{PC}:.cs EQUD 0:.ct �cu("Game-Data"):]:Uk=ct+0:Ul=Uk+1935:Um=Uk+2447:Un=Um+5788:Uo=Um+6300:Up=Uo+5150:Uq=Uo+5662:Ur=Uq+2841:Ut=Uq+3353:bZ=Ut+6330:aq=bZ+256:Xc=aq+3008:Vz=Xc+4352:WV=Vz+1024:�Wo
J.�
JBOݤcu(cv$):cv$="<Opus$Dir>."+cv$:D=�cv$:L=�#D:�#D:�Wo=2�"LOAD "+cv$+" "+�~P%
JjP%+=L:[OPT Wo:ALIGN:]:=Wo
J�:ݤcw(cx$):�cy=1 �16:?P%=�(�cx$,cy,1))-48:P%+=1:�cy:=Wo
J�*ݤbX(cz):�i=0 �cz-1:?P%=0:P%+=1:�i:=Wo
�
00000000  0d 00 a0 1b ee 85 eb 30  3a f6 3a f1 22 20 61 74  |.......0:.:." at|
00000010  20 4c 69 6e 65 20 22 3b  9e 3a e0 0d 00 b4 16 eb  | Line ";.:......|
00000020  39 3a 87 3a f2 55 56 3a  f2 55 57 3a f2 55 58 3a  |9:.:.UV:.UW:.UX:|
00000030  e0 0d 00 f0 ee dd f2 55  56 3a 55 59 3d 31 33 3a  |.......UV:UY=13:|
00000040  55 5a 3d 31 34 3a 55 61  3d 31 35 3a de 55 62 20  |UZ=14:Ua=15:.Ub |
00000050  20 36 34 2a 31 30 32 34  3a 55 63 3d 20 ac b9 3a  | 64*1024:Uc= ..:|
00000060  fb 26 30 2c 26 30 30 2c  26 30 30 2c 26 30 30 3a  |.&0,&00,&00,&00:|
00000070  fb 26 31 2c 26 46 46 2c  26 30 30 2c 26 30 30 3a  |.&1,&FF,&00,&00:|
00000080  fb 26 32 2c 26 30 30 2c  26 46 46 2c 26 30 30 3a  |.&2,&00,&FF,&00:|
00000090  fb 26 33 2c 26 46 46 2c  26 46 46 2c 26 30 30 3a  |.&3,&FF,&FF,&00:|
000000a0  fb 26 34 2c 26 30 30 2c  26 30 30 2c 26 46 46 3a  |.&4,&00,&00,&FF:|
000000b0  fb 26 35 2c 26 46 46 2c  26 30 30 2c 26 46 46 3a  |.&5,&FF,&00,&FF:|
000000c0  fb 26 36 2c 26 30 30 2c  26 46 46 2c 26 46 46 3a  |.&6,&00,&FF,&FF:|
000000d0  fb 26 37 2c 26 46 46 2c  26 46 46 2c 26 46 46 3a  |.&7,&FF,&FF,&FF:|
000000e0  fb 26 38 2c 26 46 46 2c  26 38 38 2c 26 30 30 3a  |.&8,&FF,&88,&00:|
000000f0  fb 26 39 2c 26 30 30 2c  26 30 30 2c 26 30 30 3a  |.&9,&00,&00,&00:|
00000100  fb 26 41 2c 26 37 37 2c  26 37 37 2c 26 37 37 3a  |.&A,&77,&77,&77:|
00000110  fb 26 42 2c 26 41 41 2c  26 41 41 2c 26 41 41 0d  |.&B,&AA,&AA,&AA.|
00000120  01 5e 45 fb 26 43 2c 26  43 43 2c 26 43 43 2c 26  |.^E.&C,&CC,&CC,&|
00000130  43 43 3a fb 26 44 2c 26  44 44 2c 26 44 44 2c 26  |CC:.&D,&DD,&DD,&|
00000140  44 44 3a fb 26 45 2c 26  45 45 2c 26 45 45 2c 26  |DD:.&E,&EE,&EE,&|
00000150  45 45 3a fb 26 46 2c 26  46 46 2c 26 46 46 2c 26  |EE:.&F,&FF,&FF,&|
00000160  46 46 3a e1 0d 01 86 22  dd f2 55 58 3a d6 55 64  |FF:...."..UX:.Ud|
00000170  3a d6 55 65 3a f2 55 66  3a f5 3a f2 55 67 3a e7  |:.Ue:.Uf:.:.Ug:.|
00000180  20 ac 55 63 20 8c 0d 01  cc 0b f2 55 68 3a f2 55  | .Uc ......Uh:.U|
00000190  69 0d 01 e0 0f cd 3a fd  55 63 3a f2 55 6a 3a e1  |i.....:.Uc:.Uj:.|
000001a0  0d 02 12 f7 dd f2 55 66  3a c8 99 22 4f 70 75 73  |......Uf:.."Opus|
000001b0  2d 53 6f 75 6e 64 5f 49  6e 73 74 61 6c 6c 49 6e  |-Sound_InstallIn|
000001c0  73 74 72 75 6d 65 6e 74  22 2c 30 30 2c 55 6b 2c  |strument",00,Uk,|
000001d0  55 6c 2c 30 2c 30 2c 31  32 37 2c 35 3a c8 99 22  |Ul,0,0,127,5:.."|
000001e0  4f 70 75 73 2d 53 6f 75  6e 64 5f 49 6e 73 74 61  |Opus-Sound_Insta|
000001f0  6c 6c 49 6e 73 74 72 75  6d 65 6e 74 22 2c 30 31  |llInstrument",01|
00000200  2c 55 6d 2c 55 6e 2c 30  2c 30 2c 31 32 37 2c 35  |,Um,Un,0,0,127,5|
00000210  3a c8 99 22 4f 70 75 73  2d 53 6f 75 6e 64 5f 49  |:.."Opus-Sound_I|
00000220  6e 73 74 61 6c 6c 49 6e  73 74 72 75 6d 65 6e 74  |nstallInstrument|
00000230  22 2c 30 32 2c 55 6f 2c  55 70 2c 30 2c 30 2c 31  |",02,Uo,Up,0,0,1|
00000240  32 37 2c 35 3a c8 99 22  4f 70 75 73 2d 53 6f 75  |27,5:.."Opus-Sou|
00000250  6e 64 5f 49 6e 73 74 61  6c 6c 49 6e 73 74 72 75  |nd_InstallInstru|
00000260  6d 65 6e 74 22 2c 30 33  2c 55 71 2c 55 72 2c 30  |ment",03,Uq,Ur,0|
00000270  2c 30 2c 31 32 37 2c 35  3a c8 99 22 4f 70 75 73  |,0,127,5:.."Opus|
00000280  2d 53 6f 75 6e 64 5f 53  65 74 53 61 6d 70 6c 65  |-Sound_SetSample|
00000290  52 61 74 65 22 2c 35 0d  02 4e 4c c8 99 22 4f 70  |Rate",5..NL.."Op|
000002a0  75 73 2d 53 6f 75 6e 64  5f 53 65 74 53 74 65 72  |us-Sound_SetSter|
000002b0  65 6f 50 6f 73 69 74 69  6f 6e 73 22 2c 34 2c 34  |eoPositions",4,4|
000002c0  2c 34 2c 34 3a c8 99 22  4f 70 75 73 2d 53 6f 75  |,4,4:.."Opus-Sou|
000002d0  6e 64 5f 49 6e 73 74 61  6c 6c 56 6f 69 63 65 73  |nd_InstallVoices|
000002e0  22 3a e1 0d 02 76 54 dd  f2 55 6a 3a c8 99 22 4f  |":...vT..Uj:.."O|
000002f0  70 75 73 2d 53 6f 75 6e  64 5f 44 65 49 6e 73 74  |pus-Sound_DeInst|
00000300  61 6c 6c 56 6f 69 63 65  73 22 3a c8 99 26 34 30  |allVoices":..&40|
00000310  31 34 30 2c 31 2c 32 30  38 2c 34 38 2c 30 2c 30  |140,1,208,48,0,0|
00000320  3a ff 22 52 6d 4b 69 6c  6c 20 4f 70 75 73 2d 53  |:."RmKill Opus-S|
00000330  6f 75 6e 64 22 3a e1 0d  02 b2 ef dd f2 55 67 3a  |ound":.......Ug:|
00000340  f5 3a d6 55 73 3a 41 25  3d 55 74 3a 42 25 3d 21  |.:.Us:A%=Ut:B%=!|
00000350  55 75 3a 43 25 3d 34 30  2a 31 30 32 34 20 3a d6  |Uu:C%=40*1024 :.|
00000360  55 76 3a f2 55 77 28 22  4f 50 55 53 22 2c 31 34  |Uv:.Uw("OPUS",14|
00000370  2a 34 2c 32 2a 38 2c 31  29 3a f2 55 77 28 22 2d  |*4,2*8,1):.Uw("-|
00000380  2d 2d 2d 22 2c 31 34 2a  34 2c 33 2a 38 2c 32 29  |---",14*4,3*8,2)|
00000390  3a f2 55 77 28 22 4b 65  79 73 20 54 6f 20 55 73  |:.Uw("Keys To Us|
000003a0  65 22 2c 31 30 2e 35 2a  34 2c 31 30 2a 38 2c 33  |e",10.5*4,10*8,3|
000003b0  29 3a f2 55 77 28 22 2d  2d 2d 2d 2d 2d 2d 2d 2d  |):.Uw("---------|
000003c0  2d 2d 22 2c 31 30 2e 35  2a 34 2c 31 31 2a 38 2c  |--",10.5*4,11*8,|
000003d0  34 29 3a f2 55 77 28 22  5a 20 20 20 20 20 20 20  |4):.Uw("Z       |
000003e0  20 20 20 20 20 20 20 20  20 4c 65 66 74 22 2c 35  |         Left",5|
000003f0  2e 35 2a 34 2c 31 33 2a  38 2c 35 29 3a f2 55 77  |.5*4,13*8,5):.Uw|
00000400  28 22 58 20 20 20 20 20  20 20 20 20 20 20 20 20  |("X             |
00000410  20 20 52 69 67 68 74 22  2c 35 2e 35 2a 34 2c 31  |  Right",5.5*4,1|
00000420  34 2a 38 2c 36 29 0d 03  20 ff f2 55 77 28 22 3b  |4*8,6).. ..Uw(";|
00000430  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000440  20 20 55 70 22 2c 35 2e  35 2a 34 2c 31 35 2a 38  |  Up",5.5*4,15*8|
00000450  2c 37 29 3a f2 55 77 28  22 2e 20 20 20 20 20 20  |,7):.Uw(".      |
00000460  20 20 20 20 20 20 20 20  20 20 44 6f 77 6e 22 2c  |          Down",|
00000470  35 2e 35 2a 34 2c 31 36  2a 38 2c 31 29 3a f2 55  |5.5*4,16*8,1):.U|
00000480  77 28 22 53 50 41 43 45  20 20 20 20 50 75 73 68  |w("SPACE    Push|
00000490  2f 43 72 75 6d 62 6c 65  22 2c 35 2e 35 2a 34 2c  |/Crumble",5.5*4,|
000004a0  31 37 2a 38 2c 32 29 3a  f2 55 77 28 22 50 20 20  |17*8,2):.Uw("P  |
000004b0  20 20 20 20 50 61 75 73  65 2f 43 6f 6e 74 69 6e  |    Pause/Contin|
000004c0  75 65 22 2c 35 2e 35 2a  34 2c 31 38 2a 38 2c 35  |ue",5.5*4,18*8,5|
000004d0  29 3a f2 55 77 28 22 50  72 65 73 73 20 53 50 41  |):.Uw("Press SPA|
000004e0  43 45 20 54 6f 20 50 6c  61 79 22 2c 36 2e 35 2a  |CE To Play",6.5*|
000004f0  34 2c 32 34 2a 38 2c 33  29 3a f2 55 77 28 22 6f  |4,24*8,3):.Uw("o|
00000500  72 20 48 20 74 6f 20 73  65 65 20 48 69 67 68 20  |r H to see High |
00000510  53 63 6f 72 65 73 22 2c  34 2e 35 2a 34 2c 32 35  |Scores",4.5*4,25|
00000520  2a 38 2c 33 29 0d 03 5c  83 f2 55 77 28 22 7b 20  |*8,3)..\..Uw("{ |
00000530  31 39 39 31 20 4b 65 76  69 6e 20 4a 20 53 77 69  |1991 Kevin J Swi|
00000540  6e 74 6f 6e 22 2c 34 2a  34 2c 33 30 2a 38 2c 34  |nton",4*4,30*8,4|
00000550  29 3a d6 55 78 3a ff 22  46 58 32 30 30 20 31 22  |):.Ux:."FX200 1"|
00000560  3a 55 79 3d 20 ac b9 3a  d1 3d 30 3a f5 fd a6 28  |:Uy= ..:.=0:...(|
00000570  2d 39 39 29 20 84 a6 28  2d 31 31 33 29 20 84 a6  |-99) ..(-113) ..|
00000580  28 2d 38 35 29 20 84 91  3e 31 32 2a 31 30 30 3a  |(-85) ..>12*100:|
00000590  e7 a6 28 2d 39 39 29 20  8c f5 fd 20 ac a6 28 2d  |..(-99) ... ..(-|
000005a0  39 39 29 3a 55 79 3d b9  0d 03 a2 1e e7 a6 28 2d  |99):Uy=.......(-|
000005b0  31 31 33 29 20 8c f5 fd  20 ac a6 28 2d 31 31 33  |113) ... ..(-113|
000005c0  29 3a 55 63 3d b9 0d 03  ac 20 e7 a6 28 2d 38 35  |):Uc=.... ..(-85|
000005d0  29 20 8c f5 fd 20 ac a6  28 2d 38 35 29 3a d1 3d  |) ... ..(-85):.=|
000005e0  31 33 2a 31 30 30 0d 03  b6 1b e7 91 3e 31 32 2a  |13*100......>12*|
000005f0  31 30 30 20 80 20 ac 28  55 79 20 84 55 63 29 20  |100 . .(Uy .Uc) |
00000600  8c 0d 03 c0 07 f2 55 7a  0d 03 ca 27 cd 3a fd 55  |......Uz...'.:.U|
00000610  63 20 84 55 79 3a ff 22  46 58 20 32 30 30 20 30  |c .Uy:."FX 200 0|
00000620  22 3a ff 22 46 58 20 20  31 35 20 31 22 3a e1 0d  |":."FX  15 1":..|
00000630  04 06 23 dd f2 55 69 3a  ff 22 46 58 20 32 30 30  |..#..Ui:."FX 200|
00000640  20 31 22 3a d6 56 55 3a  e7 21 56 56 3c 3e 39 39  | 1":.VU:.!VV<>99|
00000650  20 8c 0d 04 2e c5 ef 32  38 2c 30 2c 33 31 2c 33  | ......28,0,31,3|
00000660  31 2c 30 3a db 3a f2 55  77 28 22 43 4f 4e 47 52  |1,0:.:.Uw("CONGR|
00000670  41 54 55 4c 41 54 49 4f  4e 53 21 22 2c 38 2a 34  |ATULATIONS!",8*4|
00000680  2c 32 2a 38 2c 35 29 3a  f2 55 77 28 22 2d 2d 2d  |,2*8,5):.Uw("---|
00000690  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 22 2c 38  |-------------",8|
000006a0  2a 34 2c 33 2a 38 2c 36  29 3a f2 55 77 28 22 59  |*4,3*8,6):.Uw("Y|
000006b0  6f 75 20 6d 61 64 65 20  74 68 65 20 48 69 67 68  |ou made the High|
000006c0  20 53 63 6f 72 65 73 22  2c 34 2a 34 2c 37 2a 38  | Scores",4*4,7*8|
000006d0  2c 33 29 3a f2 55 77 28  22 50 4c 45 41 53 45 20  |,3):.Uw("PLEASE |
000006e0  45 4e 54 45 52 20 59 4f  55 52 20 4e 41 4d 45 22  |ENTER YOUR NAME"|
000006f0  2c 35 2a 34 2c 31 34 2a  38 2c 31 29 3a d6 55 78  |,5*4,14*8,1):.Ux|
00000700  3a d6 56 57 3a ff 22 46  58 20 31 35 20 31 22 3a  |:.VW:."FX 15 1":|
00000710  d6 56 58 3a d6 56 59 0d  04 92 13 cd 3a ff 22 46  |.VX:.VY.....:."F|
00000720  58 20 32 30 30 20 30 22  3a e1 0d 04 ba 32 dd f2  |X 200 0":....2..|
00000730  55 7a 3a 56 5a 24 3d 22  4c 61 73 74 20 53 63 6f  |Uz:VZ$="Last Sco|
00000740  72 65 20 3a 20 22 3a e3  69 3d 30 20 b8 37 3a e7  |re : ":.i=0 .7:.|
00000750  56 61 3f 69 3e 3d 97 22  30 22 20 8c 0d 04 e2 0e  |Va?i>=."0" .....|
00000760  56 5a 24 2b 3d bd 56 61  3f 69 0d 04 ec ff cd 3a  |VZ$+=.Va?i.....:|
00000770  ed 69 3a 56 62 3d 28 33  32 2d a9 56 5a 24 29 2f  |.i:Vb=(32-.VZ$)/|
00000780  32 3a d6 56 59 3a ef 32  38 2c 30 2c 33 31 2c 33  |2:.VY:.28,0,31,3|
00000790  31 2c 30 3a db 3a ef 32  36 3a f2 55 77 28 22 4f  |1,0:.:.26:.Uw("O|
000007a0  50 55 53 22 2c 31 34 2a  34 2c 32 2a 38 2c 35 29  |PUS",14*4,2*8,5)|
000007b0  3a f2 55 77 28 22 2d 2d  2d 2d 22 2c 31 34 2a 34  |:.Uw("----",14*4|
000007c0  2c 33 2a 38 2c 36 29 3a  f2 55 77 28 22 54 6f 64  |,3*8,6):.Uw("Tod|
000007d0  61 79 27 73 20 48 69 67  68 65 73 74 20 53 63 6f  |ay's Highest Sco|
000007e0  72 65 73 22 2c 35 2a 34  2c 37 2a 38 2c 33 29 3a  |res",5*4,7*8,3):|
000007f0  f2 55 77 28 22 50 72 65  73 73 20 53 50 41 43 45  |.Uw("Press SPACE|
00000800  20 66 6f 72 20 4d 61 69  6e 20 53 63 72 65 65 6e  | for Main Screen|
00000810  22 2c 32 2e 35 2a 34 2c  32 34 2a 38 2c 37 29 3a  |",2.5*4,24*8,7):|
00000820  f2 55 77 28 56 5a 24 2c  56 62 2a 34 2c 32 36 2a  |.Uw(VZ$,Vb*4,26*|
00000830  38 2c 31 29 3a f2 55 77  28 22 7b 20 31 39 39 31  |8,1):.Uw("{ 1991|
00000840  20 4b 65 76 69 6e 20 4a  20 53 77 69 6e 74 6f 6e  | Kevin J Swinton|
00000850  22 2c 34 2a 34 2c 33 30  2a 38 2c 34 29 3a d6 56  |",4*4,30*8,4):.V|
00000860  63 3a d6 55 78 3a d1 3d  30 0d 05 78 27 f5 fd a6  |c:.Ux:.=0..x'...|
00000870  28 2d 39 39 29 20 84 91  3e 31 32 2a 31 30 30 3a  |(-99) ..>12*100:|
00000880  f5 fd 20 ac a6 28 2d 39  39 29 3a d6 56 59 3a e1  |.. ..(-99):.VY:.|
00000890  0d 05 aa 3b dd f2 55 68  3a ff 22 46 58 20 32 30  |...;..Uh:."FX 20|
000008a0  30 20 31 22 3a d6 56 64  3a f5 3a f2 56 65 3a d6  |0 1":.Vd:.:.Ve:.|
000008b0  56 66 3a f5 3a e7 a6 28  2d 31 31 33 29 20 8c 21  |Vf:.:..(-113) .!|
000008c0  56 67 3d 31 3a 21 56 68  3d 2d 31 0d 05 fa 10 e7  |Vg=1:!Vh=-1.....|
000008d0  a6 28 2d 35 36 29 20 8c  f2 56 69 0d 06 04 2d d6  |.(-56) ..Vi...-.|
000008e0  56 6a 3a fd 21 56 6b 20  84 21 56 68 20 84 28 21  |Vj:.!Vk .!Vh .(!|
000008f0  56 6c 20 80 21 56 6d 3d  30 29 3a d6 56 6e 3a e7  |Vl .!Vm=0):.Vn:.|
00000900  21 56 6c 20 8c f2 56 6f  0d 06 2c 10 e7 21 56 68  |!Vl ..Vo..,..!Vh|
00000910  20 8c 21 56 67 2d 3d 31  0d 06 36 10 e7 21 56 6b  | .!Vg-=1..6..!Vk|
00000920  20 8c 21 56 67 2d 3d 31  0d 06 40 2f d6 56 70 3a  | .!Vg-=1..@/.Vp:|
00000930  fd 21 56 67 3d 30 20 84  21 56 71 3d 31 36 2b 31  |.!Vg=0 .!Vq=16+1|
00000940  3a 21 56 72 2b 3d 21 56  73 3a d6 56 70 3a e7 21  |:!Vr+=!Vs:.Vp:.!|
00000950  56 6b 20 8c f2 56 74 0d  06 68 0f e7 21 56 67 3d  |Vk ..Vt..h..!Vg=|
00000960  30 20 8c f2 56 75 0d 06  72 12 e7 21 56 71 3d 31  |0 ..Vu..r..!Vq=1|
00000970  36 2b 31 20 8c f2 56 76  0d 06 7c 15 d6 56 59 3a  |6+1 ..Vv..|..VY:|
00000980  ff 22 46 58 20 32 30 30  20 30 22 3a e1 0d 06 a4  |."FX 200 0":....|
00000990  44 dd f2 56 65 3a ef 32  38 2c 30 2c 33 31 2c 33  |D..Ve:.28,0,31,3|
000009a0  31 2c 30 3a db 3a f2 55  77 28 22 4c 45 56 45 4c  |1,0:.:.Uw("LEVEL|
000009b0  20 22 2b c3 21 56 71 2b  22 21 22 2c 31 32 2a 34  | "+.!Vq+"!",12*4|
000009c0  2c 31 35 2a 38 2c 33 29  3a e7 21 56 67 3d 31 20  |,15*8,3):.!Vg=1 |
000009d0  8c 0d 06 cc 21 f2 55 77  28 22 4c 61 73 74 20 20  |....!.Uw("Last  |
000009e0  4c 69 66 65 22 2c 31 31  2a 34 2c 31 38 2a 38 2c  |Life",11*4,18*8,|
000009f0  35 29 0d 06 d6 2f cd 3a  d1 3d 30 3a f5 fd a6 28  |5).../.:.=0:...(|
00000a00  2d 39 39 29 20 84 91 3e  32 2a 31 30 30 3a e7 a6  |-99) ..>2*100:..|
00000a10  28 2d 39 39 29 20 8c f5  fd 20 ac a6 28 2d 39 39  |(-99) ... ..(-99|
00000a20  29 0d 06 fe 0b db 3a ef  32 36 3a e1 0d 07 1c 6b  |).....:.26:....k|
00000a30  dd f2 56 6f 3a 21 56 71  2b 3d 31 3a ef 32 38 2c  |..Vo:!Vq+=1:.28,|
00000a40  30 2c 33 31 2c 33 31 2c  30 3a db 3a f2 55 77 28  |0,31,31,0:.:.Uw(|
00000a50  22 57 65 20 44 6f 6e 65  20 49 74 21 22 2c 31 30  |"We Done It!",10|
00000a60  2e 35 2a 34 2c 31 35 2a  38 2c 33 29 3a 56 77 3d  |.5*4,15*8,3):Vw=|
00000a70  37 2a 38 2d 31 3a 56 78  3d 32 2a 38 2d 31 3a f5  |7*8-1:Vx=2*8-1:.|
00000a80  3a 56 77 2b 3d 31 3a 56  78 2b 3d 31 3a e7 56 77  |:Vw+=1:Vx+=1:.Vw|
00000a90  3c 32 32 2a 38 20 8c 0d  07 80 21 f2 56 79 28 56  |<22*8 ....!.Vy(V|
00000aa0  77 2c 31 36 2a 38 2c 36  2b 28 56 77 20 83 31 36  |w,16*8,6+(Vw .16|
00000ab0  29 20 81 38 2c 56 7a 29  0d 07 8a 10 cd 3a e7 56  |) .8,Vz).....:.V|
00000ac0  78 3e 3d 37 2a 38 20 8c  0d 07 9e 1d 41 25 3d 21  |x>=7*8 .....A%=!|
00000ad0  55 75 3a 42 25 3d 56 78  3a 43 25 3d 31 36 2a 38  |Uu:B%=Vx:C%=16*8|
00000ae0  20 3a d6 57 55 0d 07 b2  7c cd 3a f2 56 79 28 37  | :.WU...|.:.Vy(7|
00000af0  2a 38 2c 31 36 2a 38 2c  31 2c 57 56 29 3a f2 56  |*8,16*8,1,WV):.V|
00000b00  79 28 32 32 2a 38 2c 31  36 2a 38 2c 31 2c 57 56  |y(22*8,16*8,1,WV|
00000b10  29 3a c8 96 3a f2 56 79  28 56 77 2c 31 36 2a 38  |):..:.Vy(Vw,16*8|
00000b20  2c 30 2c 57 56 29 3a f2  56 79 28 56 78 2c 31 36  |,0,WV):.Vy(Vx,16|
00000b30  2a 38 2c 30 2c 57 56 29  3a f2 56 79 28 32 32 2a  |*8,0,WV):.Vy(22*|
00000b40  38 2c 31 36 2a 38 2c 31  2c 57 56 29 3a fd 56 78  |8,16*8,1,WV):.Vx|
00000b50  3d 32 32 2a 38 3a e7 21  57 57 3e 30 20 8c f2 57  |=22*8:.!WW>0 ..W|
00000b60  58 0d 08 0c 2d d1 3d 30  3a f5 fd 91 3e 33 2a 31  |X...-.=0:...>3*1|
00000b70  30 30 20 84 a6 28 2d 39  39 29 3a e7 a6 28 2d 39  |00 ..(-99):..(-9|
00000b80  39 29 20 8c f5 fd 20 ac  a6 28 2d 39 39 29 0d 08  |9) ... ..(-99)..|
00000b90  2a 0b db 3a ef 32 36 3a  e1 0d 08 48 dd dd f2 57  |*..:.26:...H...W|
00000ba0  58 3a 57 59 24 3d 22 42  6f 6e 75 73 20 53 63 6f  |X:WY$="Bonus Sco|
00000bb0  72 65 20 3d 20 22 2b c3  21 57 57 2b 22 20 78 20  |re = "+.!WW+" x |
00000bc0  31 30 30 70 74 73 22 3a  57 5a 3d 28 28 33 32 2d  |100pts":WZ=((32-|
00000bd0  a9 57 59 24 29 20 81 32  29 2a 34 3a f2 55 77 28  |.WY$) .2)*4:.Uw(|
00000be0  57 59 24 2c 57 5a 2c 32  32 2a 38 2c 37 29 3a 57  |WY$,WZ,22*8,7):W|
00000bf0  61 3d 94 28 21 57 57 3c  31 30 29 3a d1 3d 30 3a  |a=.(!WW<10):.=0:|
00000c00  f5 fd 91 3e 31 2a 31 30  30 3a f5 3a c8 96 3a c8  |...>1*100:.:..:.|
00000c10  96 3a 21 56 72 2b 3d 31  30 30 3a 21 57 57 2d 3d  |.:!Vr+=100:!WW-=|
00000c20  31 3a 21 57 62 3d 31 3a  d6 56 70 3a f2 55 77 28  |1:!Wb=1:.Vp:.Uw(|
00000c30  c2 22 20 20 22 2b c3 21  57 57 2c 32 29 2c 57 5a  |."  "+.!WW,2),WZ|
00000c40  2b 35 36 2d 57 61 2a 34  2c 32 32 2a 38 2c 37 29  |+56-Wa*4,22*8,7)|
00000c50  3a 41 25 3d 30 3a 43 25  3d 32 3a 44 25 3d 31 3a  |:A%=0:C%=2:D%=1:|
00000c60  d6 57 63 3a d6 57 64 3a  fd 21 57 57 3d 30 3a 21  |.Wc:.Wd:.!WW=0:!|
00000c70  56 6b 3d 30 3a e1 0d 09  06 36 dd f2 56 79 28 78  |Vk=0:....6..Vy(x|
00000c80  2c 79 2c 57 65 2c 57 66  29 3a 41 25 3d 21 55 75  |,y,We,Wf):A%=!Uu|
00000c90  3a 42 25 3d 78 3a 43 25  3d 79 3a 44 25 3d 57 65  |:B%=x:C%=y:D%=We|
00000ca0  3a 45 25 3d 57 66 3a d6  57 67 3a e1 0d 09 60 7a  |:E%=Wf:.Wg:...`z|
00000cb0  dd f2 56 69 3a d6 57 68  3a f5 fd 20 ac a6 28 2d  |..Vi:.Wh:.. ..(-|
00000cc0  35 36 29 3a 57 69 3d 30  3a f5 3a c8 96 3a f2 56  |56):Wi=0:.:..:.V|
00000cd0  79 28 33 36 2a 38 2c 32  34 2a 38 2c 31 32 2b 28  |y(36*8,24*8,12+(|
00000ce0  57 69 20 81 36 29 2c 57  56 29 3a 57 69 3d 28 57  |Wi .6),WV):Wi=(W|
00000cf0  69 2b 31 29 20 83 34 38  3a fd a6 28 2d 35 36 29  |i+1) .48:..(-56)|
00000d00  3a f5 fd 20 ac a6 28 2d  35 36 29 3a f2 56 79 28  |:.. ..(-56):.Vy(|
00000d10  33 36 2a 38 2c 32 34 2a  38 2c 31 31 2c 57 56 29  |36*8,24*8,11,WV)|
00000d20  3a d6 57 6a 3a e1 0d 09  ec 60 dd f2 56 75 3a ef  |:.Wj:....`..Vu:.|
00000d30  32 38 2c 30 2c 33 31 2c  33 31 2c 30 3a db 3a f2  |28,0,31,31,0:.:.|
00000d40  55 77 28 22 47 41 4d 45  20 4f 56 45 52 21 22 2c  |Uw("GAME OVER!",|
00000d50  31 31 2a 34 2c 31 35 2a  38 2c 37 29 3a d1 3d 30  |11*4,15*8,7):.=0|
00000d60  3a f5 fd 91 3e 33 2a 31  30 30 20 84 a6 28 2d 39  |:...>3*100 ..(-9|
00000d70  39 29 3a e7 a6 28 2d 39  39 29 20 8c f5 fd 20 ac  |9):..(-99) ... .|
00000d80  a6 28 2d 39 39 29 0d 0a  28 0b db 3a ef 32 36 3a  |.(-99)..(..:.26:|
00000d90  e1 0d 0a 46 87 dd f2 56  74 3a 21 56 67 2b 3d 31  |...F...Vt:!Vg+=1|
00000da0  3a ef 32 38 2c 30 2c 33  31 2c 33 31 2c 30 3a db  |:.28,0,31,31,0:.|
00000db0  3a f2 55 77 28 22 47 41  4d 45 20 4f 56 45 52 21  |:.Uw("GAME OVER!|
00000dc0  22 2c 31 31 2a 34 2c 31  35 2a 38 2c 37 29 3a f2  |",11*4,15*8,7):.|
00000dd0  55 77 28 22 4f 75 74 20  6f 66 20 74 69 6d 65 21  |Uw("Out of time!|
00000de0  22 2c 31 30 2a 34 2c 31  38 2a 38 2c 36 29 3a d1  |",10*4,18*8,6):.|
00000df0  3d 30 3a f5 fd 91 3e 33  2a 31 30 30 20 84 a6 28  |=0:...>3*100 ..(|
00000e00  2d 39 39 29 3a e7 a6 28  2d 39 39 29 20 8c f5 fd  |-99):..(-99) ...|
00000e10  20 ac a6 28 2d 39 39 29  0d 0a 96 0b db 3a ef 32  | ..(-99).....:.2|
00000e20  36 3a e1 0d 0a b4 87 dd  f2 56 76 3a ef 32 38 2c  |6:.......Vv:.28,|
00000e30  30 2c 33 31 2c 33 31 2c  30 3a db 3a e3 69 3d 31  |0,31,31,0:.:.i=1|
00000e40  20 b8 32 30 30 30 3a 78  3d b3 28 32 34 30 29 2d  | .2000:x=.(240)-|
00000e50  31 3a 79 3d b3 28 32 34  30 29 2d 31 3a f2 56 79  |1:y=.(240)-1:.Vy|
00000e60  28 78 2c 79 2c 32 2c 56  7a 29 3a ed 69 3a f2 55  |(x,y,2,Vz):.i:.U|
00000e70  77 28 22 47 41 4d 45 20  43 4f 4d 50 4c 45 54 45  |w("GAME COMPLETE|
00000e80  44 22 2c 39 2a 34 2c 31  35 2a 38 2c 32 29 3a f5  |D",9*4,15*8,2):.|
00000e90  fd a6 28 2d 39 39 29 3a  f5 fd 20 ac a6 28 2d 39  |..(-99):.. ..(-9|
00000ea0  39 29 3a db 3a ef 32 36  3a e1 0d 0b 36 42 dd f2  |9):.:.26:...6B..|
00000eb0  55 77 28 57 6b 24 2c 78  2c 79 2c 57 6c 29 3a 24  |Uw(Wk$,x,y,Wl):$|
00000ec0  57 6d 3d 57 6b 24 2b bd  30 3a 41 25 3d 21 55 75  |Wm=Wk$+.0:A%=!Uu|
00000ed0  3a 42 25 3d 57 6d 3a 43  25 3d 57 6c 3a 44 25 3d  |:B%=Wm:C%=Wl:D%=|
00000ee0  78 3a 45 25 3d 79 3a d6  57 6e 3a e1 0d 0b 86 fc  |x:E%=y:.Wn:.....|
00000ef0  dd f2 55 57 3a e3 57 6f  3d 30 20 b8 32 88 32 3a  |..UW:.Wo=0 .2.2:|
00000f00  50 25 3d 55 62 3a 5b 4f  50 54 20 57 6f 3a 2e 56  |P%=Ub:[OPT Wo:.V|
00000f10  6a 20 53 54 4d 46 44 20  28 55 59 29 21 2c 7b 55  |j STMFD (UY)!,{U|
00000f20  5a 7d 3a 42 4c 20 57 70  3a 42 4c 20 57 64 3a 42  |Z}:BL Wp:BL Wd:B|
00000f30  4c 20 56 70 3a 42 4c 20  57 71 3a 42 4c 20 57 72  |L Vp:BL Wq:BL Wr|
00000f40  3a 42 4c 20 57 68 3a 42  4c 20 57 73 3a 42 4c 20  |:BL Wh:BL Ws:BL |
00000f50  57 6a 3a 42 4c 20 57 74  3a 42 4c 20 57 75 3a 4c  |Wj:BL Wt:BL Wu:L|
00000f60  44 4d 46 44 20 28 55 59  29 21 2c 7b 50 43 7d 3a  |DMFD (UY)!,{PC}:|
00000f70  2e 56 64 20 4d 4f 56 20  72 30 2c 23 33 3a 53 54  |.Vd MOV r0,#3:ST|
00000f80  52 20 72 30 2c 56 67 3a  4d 4f 56 20 72 30 2c 23  |R r0,Vg:MOV r0,#|
00000f90  31 3a 53 54 52 20 72 30  2c 56 71 3a 4d 4f 56 20  |1:STR r0,Vq:MOV |
00000fa0  72 30 2c 23 30 3a 53 54  52 20 72 30 2c 56 72 3a  |r0,#0:STR r0,Vr:|
00000fb0  53 54 52 20 72 30 2c 56  73 3a 4d 4f 56 20 50 43  |STR r0,Vs:MOV PC|
00000fc0  2c 55 5a 3a 2e 56 66 20  53 54 4d 46 44 20 28 55  |,UZ:.Vf STMFD (U|
00000fd0  59 29 21 2c 7b 55 5a 7d  3a 4c 44 52 20 72 30 2c  |Y)!,{UZ}:LDR r0,|
00000fe0  56 71 3a 42 4c 20 57 76  0d 0c d0 fa 4c 44 52 20  |Vq:BL Wv....LDR |
00000ff0  72 30 2c 56 71 3a 53 55  42 20 72 30 2c 72 30 2c  |r0,Vq:SUB r0,r0,|
00001000  23 31 3a 41 44 52 20 72  31 2c 57 77 3a 4c 44 52  |#1:ADR r1,Ww:LDR|
00001010  42 20 72 30 2c 5b 72 31  2c 72 30 5d 3a 53 54 52  |B r0,[r1,r0]:STR|
00001020  20 72 30 2c 57 78 3a 4d  4f 56 20 72 30 2c 23 30  | r0,Wx:MOV r0,#0|
00001030  3a 53 54 52 20 72 30 2c  56 68 3a 53 54 52 20 72  |:STR r0,Vh:STR r|
00001040  30 2c 56 6c 3a 53 54 52  20 72 30 2c 56 6d 3a 4c  |0,Vl:STR r0,Vm:L|
00001050  44 52 20 72 30 2c 57 79  3a 4c 44 52 20 72 31 2c  |DR r0,Wy:LDR r1,|
00001060  56 71 3a 53 55 42 20 72  31 2c 72 31 2c 23 31 3a  |Vq:SUB r1,r1,#1:|
00001070  41 44 44 20 72 30 2c 72  30 2c 72 31 2c 4c 53 4c  |ADD r0,r0,r1,LSL|
00001080  20 23 34 3a 4c 44 52 42  20 72 31 2c 5b 72 30 5d  | #4:LDRB r1,[r0]|
00001090  2c 23 31 20 3a 20 53 54  52 42 20 72 31 2c 57 7a  |,#1 : STRB r1,Wz|
000010a0  20 2b 30 3a 4c 44 52 42  20 72 31 2c 5b 72 30 5d  | +0:LDRB r1,[r0]|
000010b0  2c 23 31 20 3a 20 53 54  52 42 20 72 31 2c 57 7a  |,#1 : STRB r1,Wz|
000010c0  20 2b 31 3a 4c 44 52 42  20 72 31 2c 5b 72 30 5d  | +1:LDRB r1,[r0]|
000010d0  2c 23 31 20 3a 20 53 54  52 42 20 72 31 2c 58 55  |,#1 : STRB r1,XU|
000010e0  2b 30 0d 0d 70 f3 4c 44  52 42 20 72 31 2c 5b 72  |+0..p.LDRB r1,[r|
000010f0  30 5d 2c 23 31 20 3a 20  53 54 52 42 20 72 31 2c  |0],#1 : STRB r1,|
00001100  58 55 2b 31 3a 4c 44 52  42 20 72 31 2c 5b 72 30  |XU+1:LDRB r1,[r0|
00001110  5d 2c 23 31 20 3a 20 53  54 52 42 20 72 31 2c 58  |],#1 : STRB r1,X|
00001120  56 2b 30 3a 4c 44 52 42  20 72 31 2c 5b 72 30 5d  |V+0:LDRB r1,[r0]|
00001130  2c 23 31 20 3a 20 53 54  52 42 20 72 31 2c 58 56  |,#1 : STRB r1,XV|
00001140  2b 31 3a 4c 44 52 42 20  72 31 2c 5b 72 30 5d 2c  |+1:LDRB r1,[r0],|
00001150  23 31 20 3a 20 53 54 52  42 20 72 31 2c 58 57 2b  |#1 : STRB r1,XW+|
00001160  30 3a 4c 44 52 42 20 72  31 2c 5b 72 30 5d 2c 23  |0:LDRB r1,[r0],#|
00001170  31 20 3a 20 53 54 52 42  20 72 31 2c 58 57 2b 31  |1 : STRB r1,XW+1|
00001180  3a 4c 44 52 42 20 72 31  2c 5b 72 30 5d 2c 23 31  |:LDRB r1,[r0],#1|
00001190  20 3a 20 53 54 52 42 20  72 31 2c 58 58 2b 30 3a  | : STRB r1,XX+0:|
000011a0  4c 44 52 42 20 72 31 2c  5b 72 30 5d 2c 23 31 20  |LDRB r1,[r0],#1 |
000011b0  3a 20 53 54 52 42 20 72  31 2c 58 58 2b 31 3a 4d  |: STRB r1,XX+1:M|
000011c0  4f 56 20 72 30 2c 23 30  3a 53 54 52 42 20 72 30  |OV r0,#0:STRB r0|
000011d0  2c 58 55 2b 33 0d 0d ca  f4 53 54 52 42 20 72 30  |,XU+3....STRB r0|
000011e0  2c 58 56 2b 33 3a 53 54  52 42 20 72 30 2c 58 57  |,XV+3:STRB r0,XW|
000011f0  2b 33 3a 53 54 52 42 20  72 30 2c 58 58 2b 33 3a  |+3:STRB r0,XX+3:|
00001200  53 54 52 20 72 30 2c 58  59 3a 53 54 52 20 72 30  |STR r0,XY:STR r0|
00001210  2c 58 5a 3a 53 54 52 20  72 30 2c 56 6b 3a 53 54  |,XZ:STR r0,Vk:ST|
00001220  52 20 72 30 2c 58 61 3a  4d 4f 56 20 72 30 2c 23  |R r0,Xa:MOV r0,#|
00001230  31 3a 53 54 52 42 20 72  30 2c 57 7a 2b 33 3a 4d  |1:STRB r0,Wz+3:M|
00001240  4f 56 20 72 30 2c 23 36  30 3a 4c 44 52 20 72 31  |OV r0,#60:LDR r1|
00001250  2c 56 71 3a 53 55 42 20  72 31 2c 72 31 2c 23 31  |,Vq:SUB r1,r1,#1|
00001260  3a 4d 4f 56 20 72 32 2c  23 32 3a 4d 55 4c 20 72  |:MOV r2,#2:MUL r|
00001270  33 2c 72 31 2c 72 32 3a  53 55 42 20 72 30 2c 72  |3,r1,r2:SUB r0,r|
00001280  30 2c 72 33 3a 53 54 52  20 72 30 2c 57 57 3a 4d  |0,r3:STR r0,WW:M|
00001290  4f 56 20 72 30 2c 23 31  30 30 3a 53 54 52 20 72  |OV r0,#100:STR r|
000012a0  30 2c 57 62 3a 4d 4f 56  20 72 30 2c 23 34 3a 53  |0,Wb:MOV r0,#4:S|
000012b0  54 52 20 72 30 2c 58 62  3a 4c 44 4d 46 44 20 28  |TR r0,Xb:LDMFD (|
000012c0  55 59 29 21 2c 7b 50 43  7d 0d 0e b0 f6 2e 57 79  |UY)!,{PC}.....Wy|
000012d0  20 45 51 55 44 20 58 63  3a 2e 57 77 20 45 51 55  | EQUD Xc:.Ww EQU|
000012e0  42 20 31 20 3a 20 45 51  55 42 20 31 3a 45 51 55  |B 1 : EQUB 1:EQU|
*
00001300  42 20 31 20 3a 20 45 51  55 42 20 32 3a 45 51 55  |B 1 : EQUB 2:EQU|
00001310  42 20 32 20 3a 20 45 51  55 42 20 32 3a 45 51 55  |B 2 : EQUB 2:EQU|
*
00001330  42 20 34 20 3a 20 45 51  55 42 20 34 3a 45 51 55  |B 4 : EQUB 4:EQU|
*
00001350  42 20 38 20 3a 20 45 51  55 42 20 38 3a 2e 56 67  |B 8 : EQUB 8:.Vg|
00001360  20 45 51 55 44 20 30 3a  2e 56 71 20 45 51 55 44  | EQUD 0:.Vq EQUD|
00001370  20 30 3a 2e 56 72 20 45  51 55 44 20 30 3a 2e 56  | 0:.Vr EQUD 0:.V|
00001380  73 20 45 51 55 44 20 30  3a 2e 56 68 20 45 51 55  |s EQUD 0:.Vh EQU|
00001390  44 20 30 3a 2e 56 6c 20  45 51 55 44 20 30 3a 2e  |D 0:.Vl EQUD 0:.|
000013a0  57 78 20 45 51 55 44 20  30 3a 2e 57 57 20 45 51  |Wx EQUD 0:.WW EQ|
000013b0  55 44 20 30 3a 2e 57 62  20 45 51 55 44 20 30 0d  |UD 0:.Wb EQUD 0.|
000013c0  0f 78 fd 2e 56 6b 20 45  51 55 44 20 30 3a 2e 58  |.x..Vk EQUD 0:.X|
000013d0  5a 20 45 51 55 44 20 30  3a 2e 58 62 20 45 51 55  |Z EQUD 0:.Xb EQU|
000013e0  44 20 30 3a 2e 58 61 20  45 51 55 44 20 30 3a 2e  |D 0:.Xa EQUD 0:.|
000013f0  58 64 20 45 51 55 44 20  30 3a 2e 58 65 20 45 51  |Xd EQUD 0:.Xe EQ|
00001400  55 44 20 30 3a 2e 58 66  20 45 51 55 44 20 30 3a  |UD 0:.Xf EQUD 0:|
00001410  2e 57 75 20 53 54 4d 46  44 20 28 55 59 29 21 2c  |.Wu STMFD (UY)!,|
00001420  7b 55 5a 7d 3a 4c 44 52  20 72 30 2c 58 61 3a 43  |{UZ}:LDR r0,Xa:C|
00001430  4d 50 20 72 30 2c 23 30  3a 42 45 51 20 58 67 3a  |MP r0,#0:BEQ Xg:|
00001440  4c 44 52 20 72 30 2c 58  64 3a 53 55 42 53 20 72  |LDR r0,Xd:SUBS r|
00001450  30 2c 72 30 2c 23 31 3a  53 54 52 20 72 30 2c 58  |0,r0,#1:STR r0,X|
00001460  64 3a ec 51 20 72 30 2c  23 30 3a 53 54 52 45 51  |d:.Q r0,#0:STREQ|
00001470  20 72 30 2c 58 61 3a 4c  44 52 45 51 20 72 39 2c  | r0,Xa:LDREQ r9,|
00001480  58 68 3a 4c 44 52 45 51  20 72 31 30 2c 58 65 3a  |Xh:LDREQ r10,Xe:|
00001490  4c 44 52 45 51 20 72 31  31 2c 58 66 3a 41 44 44  |LDREQ r11,Xf:ADD|
000014a0  45 51 20 72 39 2c 72 39  2c 72 31 30 2c 4c 53 52  |EQ r9,r9,r10,LSR|
000014b0  20 23 34 3a ec 51 20 72  34 2c 23 30 0d 10 86 f5  | #4:.Q r4,#0....|
000014c0  53 54 52 45 51 42 20 72  34 2c 5b 72 39 2c 72 31  |STREQB r4,[r9,r1|
000014d0  31 5d 3a ec 51 20 72 33  2c 23 30 3a 42 45 51 20  |1]:.Q r3,#0:BEQ |
000014e0  58 69 3a 4c 44 52 20 72  31 30 2c 58 65 3a 4c 44  |Xi:LDR r10,Xe:LD|
000014f0  52 20 72 31 31 2c 58 66  3a 4c 44 52 20 72 33 2c  |R r11,Xf:LDR r3,|
00001500  58 61 3a 42 20 58 69 3a  2e 58 67 3a 42 4c 20 58  |Xa:B Xi:.Xg:BL X|
00001510  6a 3a 20 80 20 72 31 32  2c 20 72 31 32 2c 20 23  |j: . r12, r12, #|
00001520  32 35 35 3a 43 4d 50 20  72 31 32 2c 23 31 38 33  |255:CMP r12,#183|
00001530  3a 4c 44 4d 4e 45 46 44  20 28 55 59 29 21 2c 7b  |:LDMNEFD (UY)!,{|
00001540  50 43 7d 3a 2e 58 6b 20  42 4c 20 58 6a 3a 20 80  |PC}:.Xk BL Xj: .|
00001550  20 72 31 30 2c 20 72 31  32 2c 20 23 31 35 3a 4d  | r10, r12, #15:M|
00001560  4f 56 20 72 31 30 2c 72  31 30 2c 4c 53 4c 20 23  |OV r10,r10,LSL #|
00001570  34 3a 42 4c 20 58 6a 3a  20 80 20 72 31 31 2c 20  |4:BL Xj: . r11, |
00001580  72 31 32 2c 20 23 31 35  3a 4d 4f 56 20 72 31 31  |r12, #15:MOV r11|
00001590  2c 72 31 31 2c 4c 53 4c  20 23 34 3a 42 4c 20 58  |,r11,LSL #4:BL X|
000015a0  6a 3a 20 80 20 72 31 32  2c 20 72 31 32 2c 20 23  |j: . r12, r12, #|
000015b0  33 0d 11 62 fd 41 44 44  20 72 31 32 2c 72 31 32  |3..b.ADD r12,r12|
000015c0  2c 23 35 3a 4c 44 52 42  20 72 30 2c 57 7a 2b 30  |,#5:LDRB r0,Wz+0|
000015d0  3a 4c 44 52 42 20 72 31  2c 57 7a 2b 31 3a 20 80  |:LDRB r1,Wz+1: .|
000015e0  20 72 30 2c 20 72 30 2c  20 23 32 34 30 3a 20 80  | r0, r0, #240: .|
000015f0  20 72 31 2c 20 72 31 2c  20 23 32 34 30 3a 43 4d  | r1, r1, #240:CM|
00001600  50 20 72 30 2c 72 31 30  3a 43 4d 50 45 51 20 72  |P r0,r10:CMPEQ r|
00001610  31 2c 72 31 31 3a 4c 44  4d 45 51 46 44 20 28 55  |1,r11:LDMEQFD (U|
00001620  59 29 21 2c 7b 50 43 7d  3a 4c 44 52 20 72 39 2c  |Y)!,{PC}:LDR r9,|
00001630  58 68 3a 41 44 44 20 72  39 2c 72 39 2c 72 31 30  |Xh:ADD r9,r9,r10|
00001640  2c 4c 53 52 20 23 34 3a  41 44 44 20 72 39 2c 72  |,LSR #4:ADD r9,r|
00001650  39 2c 72 31 31 3a 4c 44  52 42 20 72 38 2c 5b 72  |9,r11:LDRB r8,[r|
00001660  39 5d 3a 43 4d 50 20 72  38 2c 23 30 3a 4c 44 4d  |9]:CMP r8,#0:LDM|
00001670  4e 45 46 44 20 28 55 59  29 21 2c 7b 50 43 7d 3a  |NEFD (UY)!,{PC}:|
00001680  53 54 52 42 20 72 31 32  2c 5b 72 39 5d 3a 53 54  |STRB r12,[r9]:ST|
00001690  52 20 72 31 32 2c 58 61  3a 53 54 52 20 72 31 30  |R r12,Xa:STR r10|
000016a0  2c 58 65 3a 53 54 52 20  72 31 31 2c 58 66 0d 12  |,Xe:STR r11,Xf..|
000016b0  0c f9 4d 4f 56 20 72 33  2c 72 31 32 3a 41 44 52  |..MOV r3,r12:ADR|
000016c0  20 72 34 2c 58 6c 3a 4c  44 52 20 72 35 2c 5b 72  | r4,Xl:LDR r5,[r|
000016d0  34 2c 72 31 32 2c 4c 53  4c 20 23 32 5d 3a 53 54  |4,r12,LSL #2]:ST|
000016e0  52 20 72 35 2c 58 64 3a  2e 58 69 20 4c 44 52 20  |R r5,Xd:.Xi LDR |
000016f0  72 30 2c 58 6d 3a 4c 44  52 20 72 30 2c 5b 72 30  |r0,Xm:LDR r0,[r0|
00001700  5d 3a 4d 4f 56 20 72 31  2c 72 31 30 3a 4d 4f 56  |]:MOV r1,r10:MOV|
00001710  20 72 32 2c 72 31 31 3a  4c 44 52 20 72 34 2c 58  | r2,r11:LDR r4,X|
00001720  6e 3a 42 4c 20 57 67 3a  4c 44 4d 46 44 20 28 55  |n:BL Wg:LDMFD (U|
00001730  59 29 21 2c 7b 50 43 7d  3a 2e 58 6d 20 45 51 55  |Y)!,{PC}:.Xm EQU|
00001740  44 20 55 75 3a 2e 58 6e  20 45 51 55 44 20 57 56  |D Uu:.Xn EQUD WV|
00001750  3a 2e 58 68 20 45 51 55  44 20 58 6f 3a 2e 58 6c  |:.Xh EQUD Xo:.Xl|
00001760  20 45 51 55 44 20 30 3a  45 51 55 44 30 3a 45 51  | EQUD 0:EQUD0:EQ|
00001770  55 44 30 3a 45 51 55 44  30 3a 45 51 55 44 30 3a  |UD0:EQUD0:EQUD0:|
00001780  45 51 55 44 20 36 2a 35  30 3a 45 51 55 44 20 35  |EQUD 6*50:EQUD 5|
00001790  2a 35 30 3a 45 51 55 44  20 34 2a 35 30 3a 45 51  |*50:EQUD 4*50:EQ|
000017a0  55 44 20 33 2a 35 30 0d  12 f2 fa 2e 57 70 20 4c  |UD 3*50.....Wp L|
000017b0  44 52 20 72 31 2c 56 73  3a 43 4d 50 20 72 31 2c  |DR r1,Vs:CMP r1,|
000017c0  23 30 3a ec 51 20 50 43  2c 55 5a 3a 4c 44 52 20  |#0:.Q PC,UZ:LDR |
000017d0  72 30 2c 56 72 3a 43 4d  50 20 72 31 2c 23 31 30  |r0,Vr:CMP r1,#10|
000017e0  3a 41 44 44 47 45 20 72  30 2c 72 30 2c 23 31 30  |:ADDGE r0,r0,#10|
000017f0  3a 53 55 42 47 45 20 72  31 2c 72 31 2c 23 31 30  |:SUBGE r1,r1,#10|
00001800  3a 41 44 44 4c 54 20 72  30 2c 72 30 2c 23 31 3a  |:ADDLT r0,r0,#1:|
00001810  53 55 42 4c 54 20 72 31  2c 72 31 2c 23 31 3a 53  |SUBLT r1,r1,#1:S|
00001820  54 52 20 72 30 2c 56 72  3a 53 54 52 20 72 31 2c  |TR r0,Vr:STR r1,|
00001830  56 73 3a 4d 4f 56 20 50  43 2c 55 5a 3a 2e 57 64  |Vs:MOV PC,UZ:.Wd|
00001840  20 53 54 4d 46 44 20 28  55 59 29 21 2c 7b 55 5a  | STMFD (UY)!,{UZ|
00001850  7d 3a 4c 44 52 20 72 30  2c 57 57 3a 4c 44 52 20  |}:LDR r0,WW:LDR |
00001860  72 31 2c 57 62 3a 53 55  42 53 20 72 31 2c 72 31  |r1,Wb:SUBS r1,r1|
00001870  2c 23 32 3a ec 51 20 72  31 2c 23 31 30 30 3a 53  |,#2:.Q r1,#100:S|
00001880  55 42 45 51 20 72 30 2c  72 30 2c 23 31 3a 53 54  |UBEQ r0,r0,#1:ST|
00001890  52 20 72 30 2c 57 57 3a  53 54 52 20 72 31 2c 57  |R r0,WW:STR r1,W|
000018a0  62 0d 13 ce fe 2e 58 70  ec 51 20 72 30 2c 23 30  |b.....Xp.Q r0,#0|
000018b0  30 3a ec 51 20 72 32 2c  23 32 3a 4c 44 52 45 51  |0:.Q r2,#2:LDREQ|
000018c0  20 72 33 2c 57 57 3a ec  51 20 72 33 2c 72 33 2c  | r3,WW:.Q r3,r3,|
000018d0  4c 53 52 20 23 34 3a 52  53 42 20 72 33 2c 72 33  |LSR #4:RSB r3,r3|
000018e0  2c 23 35 3a 42 4c 45 51  20 57 63 3a 4c 44 52 20  |,#5:BLEQ Wc:LDR |
000018f0  72 30 2c 57 57 3a 43 4d  50 20 72 30 2c 23 30 3a  |r0,WW:CMP r0,#0:|
00001900  4d 56 4e 45 51 20 72 32  2c 23 30 3a 53 54 52 45  |MVNEQ r2,#0:STRE|
00001910  51 20 72 32 2c 56 6b 3a  2e 58 71 20 41 44 52 20  |Q r2,Vk:.Xq ADR |
00001920  72 31 2c 58 72 3a 4d 4f  56 20 72 33 2c 23 33 35  |r1,Xr:MOV r3,#35|
00001930  2a 34 3a 4d 4f 56 20 72  34 2c 23 33 30 2a 38 2b  |*4:MOV r4,#30*8+|
00001940  31 3a 4c 44 52 20 72 30  2c 55 75 3a 4d 4f 56 20  |1:LDR r0,Uu:MOV |
00001950  72 32 2c 23 35 3a 42 4c  20 57 6e 3a 4c 44 52 20  |r2,#5:BL Wn:LDR |
00001960  72 30 2c 57 57 3a 41 44  52 20 72 31 2c 58 73 3a  |r0,WW:ADR r1,Xs:|
00001970  4d 4f 56 20 72 32 2c 23  36 3a 53 57 49 20 22 4f  |MOV r2,#6:SWI "O|
00001980  53 5f 43 6f 6e 76 65 72  74 49 6e 74 65 67 65 72  |S_ConvertInteger|
00001990  34 22 3a 4d 4f 56 20 72  33 2c 23 33 31 2a 34 0d  |4":MOV r3,#31*4.|
000019a0  14 a0 fc 41 44 44 20 72  33 2c 72 33 2c 72 32 2c  |...ADD r3,r3,r2,|
000019b0  4c 53 4c 20 23 32 3a 4d  4f 56 20 72 34 2c 23 33  |LSL #2:MOV r4,#3|
000019c0  30 2a 38 2b 31 3a 4c 44  52 20 72 30 2c 55 75 3a  |0*8+1:LDR r0,Uu:|
000019d0  41 44 52 20 72 31 2c 58  73 3a 4c 44 52 20 72 35  |ADR r1,Xs:LDR r5|
000019e0  2c 57 57 3a 43 4d 50 20  72 35 2c 23 31 30 3a 4d  |,WW:CMP r5,#10:M|
000019f0  4f 56 4c 45 20 72 32 2c  23 31 3a 4d 4f 56 47 54  |OVLE r2,#1:MOVGT|
00001a00  20 72 32 2c 23 32 3a 42  4c 20 57 6e 3a 4c 44 4d  | r2,#2:BL Wn:LDM|
00001a10  46 44 20 28 55 59 29 21  2c 7b 50 43 7d 3a 2e 58  |FD (UY)!,{PC}:.X|
00001a20  73 20 45 51 55 53 20 22  3f 3f 22 3a 20 45 51 55  |s EQUS "??": EQU|
00001a30  42 20 30 20 3a 20 41 4c  49 47 4e 3a 2e 58 72 20  |B 0 : ALIGN:.Xr |
00001a40  45 51 55 53 20 22 20 20  22 3a 20 45 51 55 42 20  |EQUS "  ": EQUB |
00001a50  30 20 3a 20 41 4c 49 47  4e 3a 2e 57 74 20 53 54  |0 : ALIGN:.Wt ST|
00001a60  4d 46 44 20 28 55 59 29  21 2c 7b 55 5a 7d 3a 4c  |MFD (UY)!,{UZ}:L|
00001a70  44 52 20 72 30 2c 58 74  3a 43 4d 50 20 72 30 2c  |DR r0,Xt:CMP r0,|
00001a80  23 31 3a 42 4c 45 51 20  58 75 3a 2e 58 76 20 4c  |#1:BLEQ Xu:.Xv L|
00001a90  44 52 42 20 72 30 2c 57  7a 2b 30 0d 15 86 f7 4c  |DRB r0,Wz+0....L|
00001aa0  44 52 42 20 72 31 2c 57  7a 2b 31 3a 4c 44 52 20  |DRB r1,Wz+1:LDR |
00001ab0  72 32 2c 58 77 3a 20 80  20 72 34 2c 20 72 30 2c  |r2,Xw: . r4, r0,|
00001ac0  20 23 32 34 30 3a 20 80  20 72 35 2c 20 72 31 2c  | #240: . r5, r1,|
00001ad0  20 23 32 34 30 3a 41 44  44 20 72 32 2c 72 32 2c  | #240:ADD r2,r2,|
00001ae0  72 34 2c 4c 53 52 20 23  34 3a 41 44 44 20 72 32  |r4,LSR #4:ADD r2|
00001af0  2c 72 32 2c 72 35 3a 4d  4f 56 20 72 33 2c 23 30  |,r2,r5:MOV r3,#0|
00001b00  3a 53 54 52 42 20 72 33  2c 5b 72 32 5d 3a 4c 44  |:STRB r3,[r2]:LD|
00001b10  52 42 20 72 34 2c 58 78  3a 4c 44 52 42 20 72 35  |RB r4,Xx:LDRB r5|
00001b20  2c 58 79 3a 4c 44 52 42  20 72 36 2c 58 7a 3a 4c  |,Xy:LDRB r6,Xz:L|
00001b30  44 52 42 20 72 37 2c 59  55 3a 4c 44 52 20 72 38  |DRB r7,YU:LDR r8|
00001b40  2c 58 59 3a 4c 44 52 20  72 39 2c 59 56 3a 43 4d  |,XY:LDR r9,YV:CM|
00001b50  50 20 72 38 2c 23 30 3a  42 45 51 20 59 57 3a 2e  |P r8,#0:BEQ YW:.|
00001b60  59 58 20 53 55 42 20 72  38 2c 72 38 2c 23 31 3a  |YX SUB r8,r8,#1:|
00001b70  53 54 52 20 72 38 2c 58  59 3a 43 4d 50 20 72 39  |STR r8,XY:CMP r9|
00001b80  2c 23 30 3a 53 55 42 45  51 20 72 31 2c 72 31 2c  |,#0:SUBEQ r1,r1,|
00001b90  23 31 0d 16 58 f8 43 4d  50 20 72 39 2c 23 31 3a  |#1..X.CMP r9,#1:|
00001ba0  41 44 44 45 51 20 72 31  2c 72 31 2c 23 31 3a 43  |ADDEQ r1,r1,#1:C|
00001bb0  4d 50 20 72 39 2c 23 32  3a 53 55 42 45 51 20 72  |MP r9,#2:SUBEQ r|
00001bc0  30 2c 72 30 2c 23 31 3a  43 4d 50 20 72 39 2c 23  |0,r0,#1:CMP r9,#|
00001bd0  33 3a 41 44 44 45 51 20  72 30 2c 72 30 2c 23 31  |3:ADDEQ r0,r0,#1|
00001be0  3a 53 54 52 42 20 72 30  2c 57 7a 2b 30 3a 53 54  |:STRB r0,Wz+0:ST|
00001bf0  52 42 20 72 31 2c 57 7a  2b 31 3a 4c 44 4d 46 44  |RB r1,Wz+1:LDMFD|
00001c00  20 28 55 59 29 21 2c 7b  50 43 7d 3a 2e 59 57 20  | (UY)!,{PC}:.YW |
00001c10  4d 4f 56 20 72 30 2c 23  31 32 32 3a 53 57 49 20  |MOV r0,#122:SWI |
00001c20  22 4f 53 5f 42 79 74 65  22 3a 4d 4f 56 20 72 32  |"OS_Byte":MOV r2|
00001c30  2c 23 31 36 3a 4d 4f 56  20 72 39 2c 23 30 3a 4c  |,#16:MOV r9,#0:L|
00001c40  44 52 20 72 31 30 2c 56  73 3a 41 44 52 20 72 31  |DR r10,Vs:ADR r1|
00001c50  31 2c 59 59 3a 2e 59 5a  20 43 4d 50 20 72 31 2c  |1,YY:.YZ CMP r1,|
00001c60  23 ac 2d 39 38 3a 42 4e  45 20 59 61 3a 4d 4f 56  |#.-98:BNE Ya:MOV|
00001c70  20 72 33 2c 23 32 3a 53  54 52 20 72 33 2c 59 56  | r3,#2:STR r3,YV|
00001c80  3a 43 4d 50 20 72 36 2c  23 30 0d 17 34 f8 43 4d  |:CMP r6,#0..4.CM|
00001c90  50 4e 45 20 72 36 2c 23  35 3a 43 4d 50 4e 45 20  |PNE r6,#5:CMPNE |
00001ca0  72 36 2c 23 36 3a 43 4d  50 4e 45 20 72 36 2c 23  |r6,#6:CMPNE r6,#|
00001cb0  37 3a 43 4d 50 4e 45 20  72 36 2c 23 38 3a ec 51  |7:CMPNE r6,#8:.Q|
00001cc0  20 72 39 2c 72 36 3a 53  54 52 45 51 20 72 32 2c  | r9,r6:STREQ r2,|
00001cd0  58 59 3a 42 45 51 20 59  62 3a 43 4d 50 20 72 36  |XY:BEQ Yb:CMP r6|
00001ce0  2c 23 31 30 3a 4d 56 4e  45 51 20 72 31 2c 23 30  |,#10:MVNEQ r1,#0|
00001cf0  3a ec 51 20 72 32 2c 23  30 3a 42 45 51 20 59 63  |:.Q r2,#0:BEQ Yc|
00001d00  3a 2e 59 61 20 43 4d 50  20 72 31 2c 23 ac 2d 36  |:.Ya CMP r1,#.-6|
00001d10  37 3a 42 4e 45 20 59 64  3a 4d 4f 56 20 72 33 2c  |7:BNE Yd:MOV r3,|
00001d20  23 33 3a 53 54 52 20 72  33 2c 59 56 3a 43 4d 50  |#3:STR r3,YV:CMP|
00001d30  20 72 37 2c 23 30 3a 43  4d 50 4e 45 20 72 37 2c  | r7,#0:CMPNE r7,|
00001d40  23 35 3a 43 4d 50 4e 45  20 72 37 2c 23 36 3a 43  |#5:CMPNE r7,#6:C|
00001d50  4d 50 4e 45 20 72 37 2c  23 37 3a 43 4d 50 4e 45  |MPNE r7,#7:CMPNE|
00001d60  20 72 37 2c 23 38 3a ec  51 20 72 39 2c 72 37 3a  | r7,#8:.Q r9,r7:|
00001d70  53 54 52 45 51 20 72 32  2c 58 59 3a 42 45 51 20  |STREQ r2,XY:BEQ |
00001d80  59 62 0d 18 24 fd 43 4d  50 20 72 37 2c 23 31 30  |Yb..$.CMP r7,#10|
00001d90  3a ec 51 20 72 31 2c 23  31 3a ec 51 20 72 32 2c  |:.Q r1,#1:.Q r2,|
00001da0  23 30 3a 42 45 51 20 59  63 3a 2e 59 64 20 43 4d  |#0:BEQ Yc:.Yd CM|
00001db0  50 20 72 31 2c 23 ac 2d  37 33 3a 42 4e 45 20 59  |P r1,#.-73:BNE Y|
00001dc0  65 3a 4d 4f 56 20 72 33  2c 23 30 3a 53 54 52 20  |e:MOV r3,#0:STR |
00001dd0  72 33 2c 59 56 3a 43 4d  50 20 72 34 2c 23 30 3a  |r3,YV:CMP r4,#0:|
00001de0  43 4d 50 4e 45 20 72 34  2c 23 35 3a 43 4d 50 4e  |CMPNE r4,#5:CMPN|
00001df0  45 20 72 34 2c 23 36 3a  43 4d 50 4e 45 20 72 34  |E r4,#6:CMPNE r4|
00001e00  2c 23 37 3a 43 4d 50 4e  45 20 72 34 2c 23 38 3a  |,#7:CMPNE r4,#8:|
00001e10  ec 51 20 72 39 2c 72 34  3a 53 54 52 45 51 20 72  |.Q r9,r4:STREQ r|
00001e20  32 2c 58 59 3a 42 45 51  20 59 62 3a 43 4d 50 20  |2,XY:BEQ Yb:CMP |
00001e30  72 34 2c 23 31 30 3a ec  51 20 72 31 2c 23 30 3a  |r4,#10:.Q r1,#0:|
00001e40  4d 56 4e 45 51 20 72 32  2c 23 30 3a 42 45 51 20  |MVNEQ r2,#0:BEQ |
00001e50  59 63 3a 2e 59 65 20 43  4d 50 20 72 31 2c 23 ac  |Yc:.Ye CMP r1,#.|
00001e60  2d 31 30 34 3a 42 4e 45  20 59 62 3a 4d 4f 56 20  |-104:BNE Yb:MOV |
00001e70  72 33 2c 23 31 3a 53 54  52 20 72 33 2c 59 56 0d  |r3,#1:STR r3,YV.|
00001e80  19 28 fd 43 4d 50 20 72  35 2c 23 30 3a 43 4d 50  |.(.CMP r5,#0:CMP|
00001e90  4e 45 20 72 35 2c 23 35  3a 43 4d 50 4e 45 20 72  |NE r5,#5:CMPNE r|
00001ea0  35 2c 23 36 3a 43 4d 50  4e 45 20 72 35 2c 23 37  |5,#6:CMPNE r5,#7|
00001eb0  3a 43 4d 50 4e 45 20 72  35 2c 23 38 3a ec 51 20  |:CMPNE r5,#8:.Q |
00001ec0  72 39 2c 72 35 3a 53 54  52 45 51 20 72 32 2c 58  |r9,r5:STREQ r2,X|
00001ed0  59 3a 43 4d 50 20 72 35  2c 23 31 30 3a ec 51 20  |Y:CMP r5,#10:.Q |
00001ee0  72 31 2c 23 30 3a ec 51  20 72 32 2c 23 31 3a 42  |r1,#0:.Q r2,#1:B|
00001ef0  45 51 20 59 63 3a 2e 59  62 20 4c 44 52 20 72 30  |EQ Yc:.Yb LDR r0|
00001f00  2c 59 56 3a 53 54 52 42  20 72 30 2c 57 7a 2b 33  |,YV:STRB r0,Wz+3|
00001f10  3a 4c 44 52 20 72 31 32  2c 5b 72 31 31 2c 72 39  |:LDR r12,[r11,r9|
00001f20  2c 41 53 4c 20 23 32 5d  3a 41 44 44 20 72 31 30  |,ASL #2]:ADD r10|
00001f30  2c 72 31 30 2c 72 31 32  3a 53 54 52 20 72 31 30  |,r10,r12:STR r10|
00001f40  2c 56 73 3a 43 4d 50 20  72 39 2c 23 38 3a 42 4e  |,Vs:CMP r9,#8:BN|
00001f50  45 20 59 66 3a 4c 44 52  20 72 31 30 2c 59 67 3a  |E Yf:LDR r10,Yg:|
00001f60  4c 44 52 20 72 31 31 2c  5b 72 31 30 5d 3a 41 44  |LDR r11,[r10]:AD|
00001f70  44 20 72 31 31 2c 72 31  31 2c 23 31 0d 1a 04 fd  |D r11,r11,#1....|
00001f80  43 4d 50 20 72 31 31 2c  23 34 3a ec 51 20 72 31  |CMP r11,#4:.Q r1|
00001f90  31 2c 23 33 3a 53 54 52  20 72 31 31 2c 5b 72 31  |1,#3:STR r11,[r1|
00001fa0  30 5d 3a 4d 4f 56 20 72  31 32 2c 23 30 30 30 31  |0]:MOV r12,#0001|
00001fb0  3a 2e 59 66 20 43 4d 50  20 72 31 32 2c 23 30 30  |:.Yf CMP r12,#00|
00001fc0  30 30 3a 42 45 51 20 59  68 3a 2e 59 69 20 4d 4f  |00:BEQ Yh:.Yi MO|
00001fd0  56 20 72 30 2c 23 30 3a  53 54 52 20 72 30 2c 58  |V r0,#0:STR r0,X|
00001fe0  61 3a 4c 44 52 20 72 30  2c 59 6a 3a 4c 44 52 20  |a:LDR r0,Yj:LDR |
00001ff0  72 30 2c 5b 72 30 5d 3a  4c 44 52 42 20 72 31 2c  |r0,[r0]:LDRB r1,|
00002000  57 7a 2b 30 3a 4c 44 52  42 20 72 32 2c 57 7a 2b  |Wz+0:LDRB r2,Wz+|
00002010  31 3a 4c 44 52 20 72 34  2c 59 6b 3a 4c 44 52 20  |1:LDR r4,Yk:LDR |
00002020  72 33 2c 59 56 3a 43 4d  50 20 72 33 2c 23 30 3a  |r3,YV:CMP r3,#0:|
00002030  53 55 42 45 51 20 72 32  2c 72 32 2c 23 31 2a 31  |SUBEQ r2,r2,#1*1|
00002040  36 3a 43 4d 50 20 72 33  2c 23 31 3a 41 44 44 45  |6:CMP r3,#1:ADDE|
00002050  51 20 72 32 2c 72 32 2c  23 31 2a 31 36 3a 43 4d  |Q r2,r2,#1*16:CM|
00002060  50 20 72 33 2c 23 32 3a  53 55 42 45 51 20 72 31  |P r3,#2:SUBEQ r1|
00002070  2c 72 31 2c 23 31 2a 31  36 0d 1a cc fd 43 4d 50  |,r1,#1*16....CMP|
00002080  20 72 33 2c 23 33 3a 41  44 44 45 51 20 72 31 2c  | r3,#3:ADDEQ r1,|
00002090  72 31 2c 23 31 2a 31 36  3a 4d 4f 56 20 72 33 2c  |r1,#1*16:MOV r3,|
000020a0  23 30 3a 42 4c 20 57 67  3a 4d 4f 56 20 72 30 2c  |#0:BL Wg:MOV r0,|
000020b0  23 33 3a 4d 4f 56 20 72  32 2c 23 32 3a 4d 4f 56  |#3:MOV r2,#2:MOV|
000020c0  20 72 33 2c 23 31 3a 42  4c 20 57 63 3a 2e 59 68  | r3,#1:BL Wc:.Yh|
000020d0  20 4d 4f 56 20 72 30 2c  23 31 32 31 3a 4d 4f 56  | MOV r0,#121:MOV|
000020e0  20 72 31 2c 23 39 38 20  82 20 26 38 30 3a 53 57  | r1,#98 . &80:SW|
000020f0  49 20 22 4f 53 5f 42 79  74 65 22 3a 4c 44 52 20  |I "OS_Byte":LDR |
00002100  72 38 2c 58 59 3a 43 4d  50 20 72 31 2c 23 26 46  |r8,XY:CMP r1,#&F|
00002110  46 3a 43 4d 50 45 51 20  72 38 2c 23 30 3a 42 4c  |F:CMPEQ r8,#0:BL|
00002120  45 51 20 59 6c 3a 4c 44  52 20 72 38 2c 58 59 3a  |EQ Yl:LDR r8,XY:|
00002130  43 4d 50 20 72 38 2c 23  30 3a 42 4e 45 20 58 76  |CMP r8,#0:BNE Xv|
00002140  3a 4c 44 4d 46 44 20 28  55 59 29 21 2c 7b 50 43  |:LDMFD (UY)!,{PC|
00002150  7d 3a 2e 59 63 20 4c 44  52 20 72 30 2c 59 56 3a  |}:.Yc LDR r0,YV:|
00002160  53 54 52 42 20 72 30 2c  57 7a 2b 33 3a 4c 44 52  |STRB r0,Wz+3:LDR|
00002170  20 72 30 2c 59 6a 0d 1b  bc f8 4c 44 52 20 72 30  | r0,Yj....LDR r0|
00002180  2c 5b 72 30 5d 3a 4c 44  52 42 20 72 33 2c 57 7a  |,[r0]:LDRB r3,Wz|
00002190  2b 30 3a 4c 44 52 42 20  72 34 2c 57 7a 2b 31 3a  |+0:LDRB r4,Wz+1:|
000021a0  41 44 44 20 72 31 2c 72  33 2c 72 31 2c 41 53 4c  |ADD r1,r3,r1,ASL|
000021b0  20 23 34 3a 41 44 44 20  72 32 2c 72 34 2c 72 32  | #4:ADD r2,r4,r2|
000021c0  2c 41 53 4c 20 23 34 3a  4d 4f 56 20 72 33 2c 23  |,ASL #4:MOV r3,#|
000021d0  31 3a 53 54 52 20 72 33  2c 58 74 3a 53 54 52 20  |1:STR r3,Xt:STR |
000021e0  72 31 2c 59 6d 3a 53 54  52 20 72 32 2c 59 6e 3a  |r1,Ym:STR r2,Yn:|
000021f0  4c 44 52 20 72 34 2c 59  6b 3a 42 4c 20 57 67 3a  |LDR r4,Yk:BL Wg:|
00002200  4c 44 52 20 72 30 2c 59  6a 3a 4c 44 52 20 72 30  |LDR r0,Yj:LDR r0|
00002210  2c 5b 72 30 5d 3a 4c 44  52 42 20 72 31 2c 57 7a  |,[r0]:LDRB r1,Wz|
00002220  2b 30 3a 4c 44 52 42 20  72 32 2c 57 7a 2b 31 3a  |+0:LDRB r2,Wz+1:|
00002230  4c 44 52 42 20 72 33 2c  57 7a 2b 33 3a 4d 4f 56  |LDRB r3,Wz+3:MOV|
00002240  20 72 33 2c 72 33 2c 4c  53 4c 20 23 31 3a 4c 44  | r3,r3,LSL #1:LD|
00002250  52 20 72 34 2c 59 6f 3a  42 4c 20 57 67 3a 4c 44  |R r4,Yo:BL Wg:LD|
00002260  4d 46 44 20 28 55 59 29  21 2c 7b 50 43 7d 0d 1c  |MFD (UY)!,{PC}..|
00002270  84 ed 2e 58 75 20 53 54  4d 46 44 20 28 55 59 29  |...Xu STMFD (UY)|
00002280  21 2c 7b 55 5a 7d 3a 4c  44 52 20 72 30 2c 59 6a  |!,{UZ}:LDR r0,Yj|
00002290  3a 4c 44 52 20 72 30 2c  5b 72 30 5d 3a 4c 44 52  |:LDR r0,[r0]:LDR|
000022a0  20 72 31 2c 59 6d 3a 4c  44 52 20 72 32 2c 59 6e  | r1,Ym:LDR r2,Yn|
000022b0  3a 4d 4f 56 20 72 33 2c  23 31 30 3a 4c 44 52 20  |:MOV r3,#10:LDR |
000022c0  72 34 2c 59 6b 3a 42 4c  20 57 67 3a 4d 4f 56 20  |r4,Yk:BL Wg:MOV |
000022d0  72 30 2c 23 30 3a 53 54  52 20 72 30 2c 58 74 3a  |r0,#0:STR r0,Xt:|
000022e0  4c 44 4d 46 44 20 28 55  59 29 21 2c 7b 50 43 7d  |LDMFD (UY)!,{PC}|
000022f0  3a 2e 58 74 20 45 51 55  44 20 30 3a 2e 59 6d 20  |:.Xt EQUD 0:.Ym |
00002300  45 51 55 44 20 30 3a 2e  59 6e 20 45 51 55 44 20  |EQUD 0:.Yn EQUD |
00002310  30 3a 2e 59 56 20 45 51  55 44 20 30 3a 2e 58 59  |0:.YV EQUD 0:.XY|
00002320  20 45 51 55 44 20 30 3a  2e 58 77 20 45 51 55 44  | EQUD 0:.Xw EQUD|
00002330  20 58 6f 3a 2e 59 6a 20  45 51 55 44 20 55 75 3a  | Xo:.Yj EQUD Uu:|
00002340  2e 59 67 20 45 51 55 44  20 56 67 3a 2e 59 6b 20  |.Yg EQUD Vg:.Yk |
00002350  45 51 55 44 20 57 56 3a  2e 59 6f 0d 1d 6a ef 2e  |EQUD WV:.Yo..j..|
00002360  59 59 20 45 51 55 44 20  30 3a 45 51 55 44 20 30  |YY EQUD 0:EQUD 0|
00002370  3a 45 51 55 44 20 30 3a  45 51 55 44 20 30 3a 45  |:EQUD 0:EQUD 0:E|
00002380  51 55 44 20 30 3a 45 51  55 44 20 35 30 30 3a 45  |QUD 0:EQUD 500:E|
00002390  51 55 44 20 37 35 30 3a  45 51 55 44 20 31 30 30  |QUD 750:EQUD 100|
000023a0  30 3a 45 51 55 44 20 30  30 30 30 3a 2e 57 73 20  |0:EQUD 0000:.Ws |
000023b0  53 54 4d 46 44 20 28 55  59 29 21 2c 7b 55 5a 7d  |STMFD (UY)!,{UZ}|
000023c0  3a 4c 44 52 42 20 72 30  2c 57 7a 2b 30 3a 4c 44  |:LDRB r0,Wz+0:LD|
000023d0  52 42 20 72 31 2c 57 7a  2b 31 3a 20 80 20 72 31  |RB r1,Wz+1: . r1|
000023e0  2c 20 72 31 2c 20 23 32  34 30 3a 41 44 44 20 72  |, r1, #240:ADD r|
000023f0  30 2c 72 31 2c 72 30 2c  4c 53 52 20 23 34 3a 4c  |0,r1,r0,LSR #4:L|
00002400  44 52 20 72 35 2c 59 70  3a 41 44 44 20 72 35 2c  |DR r5,Yp:ADD r5,|
00002410  72 35 2c 72 30 3a 4c 44  52 42 20 72 36 2c 5b 72  |r5,r0:LDRB r6,[r|
00002420  35 2c 23 2d 31 36 5d 3a  4c 44 52 42 20 72 37 2c  |5,#-16]:LDRB r7,|
00002430  5b 72 35 2c 23 2b 31 36  5d 3a 4c 44 52 42 20 72  |[r5,#+16]:LDRB r|
00002440  38 2c 5b 72 35 2c 23 2d  31 5d 0d 1e 1e fe 4c 44  |8,[r5,#-1]....LD|
00002450  52 42 20 72 39 2c 5b 72  35 2c 23 2b 31 5d 3a 4c  |RB r9,[r5,#+1]:L|
00002460  44 52 42 20 72 30 2c 57  7a 2b 30 3a 4c 44 52 42  |DRB r0,Wz+0:LDRB|
00002470  20 72 31 2c 57 7a 2b 31  3a 20 80 53 20 72 31 31  | r1,Wz+1: .S r11|
00002480  2c 20 72 31 2c 20 23 31  35 3a 53 54 52 45 51 42  |, r1, #15:STREQB|
00002490  20 72 36 2c 58 78 3a 53  54 52 45 51 42 20 72 37  | r6,Xx:STREQB r7|
000024a0  2c 58 79 3a 20 80 53 20  72 31 31 2c 20 72 30 2c  |,Xy: .S r11, r0,|
000024b0  20 23 31 35 3a 53 54 52  45 51 42 20 72 38 2c 58  | #15:STREQB r8,X|
000024c0  7a 3a 53 54 52 45 51 42  20 72 39 2c 59 55 3a 2e  |z:STREQB r9,YU:.|
000024d0  59 71 20 4c 44 52 42 20  72 30 2c 57 7a 2b 30 3a  |Yq LDRB r0,Wz+0:|
000024e0  4c 44 52 42 20 72 31 2c  57 7a 2b 31 3a 4d 4f 56  |LDRB r1,Wz+1:MOV|
000024f0  20 72 32 2c 23 30 3a 4c  44 52 20 72 33 2c 59 72  | r2,#0:LDR r3,Yr|
00002500  3a 2e 59 73 20 41 44 44  20 72 34 2c 72 33 2c 72  |:.Ys ADD r4,r3,r|
00002510  32 2c 4c 53 4c 20 23 33  3a 4c 44 52 42 20 72 35  |2,LSL #3:LDRB r5|
00002520  2c 5b 72 34 2c 23 30 5d  3a 4c 44 52 42 20 72 36  |,[r4,#0]:LDRB r6|
00002530  2c 5b 72 34 2c 23 31 5d  3a 4c 44 52 42 20 72 37  |,[r4,#1]:LDRB r7|
00002540  2c 5b 72 34 2c 23 33 5d  0d 1e c8 f5 43 4d 50 20  |,[r4,#3]....CMP |
00002550  72 37 2c 23 31 3a 42 45  51 20 59 74 3a 53 55 42  |r7,#1:BEQ Yt:SUB|
00002560  53 20 72 38 2c 72 30 2c  72 35 3a 53 55 42 4c 54  |S r8,r0,r5:SUBLT|
00002570  20 72 38 2c 72 35 2c 72  30 3a 53 55 42 53 20 72  | r8,r5,r0:SUBS r|
00002580  39 2c 72 31 2c 72 36 3a  53 55 42 4c 54 20 72 39  |9,r1,r6:SUBLT r9|
00002590  2c 72 36 2c 72 31 3a 43  4d 50 20 72 38 2c 23 31  |,r6,r1:CMP r8,#1|
000025a0  36 3a 42 47 45 20 59 74  3a 43 4d 50 20 72 39 2c  |6:BGE Yt:CMP r9,|
000025b0  23 31 36 3a 42 47 45 20  59 74 3a 4d 56 4e 20 72  |#16:BGE Yt:MVN r|
000025c0  31 30 2c 23 30 3a 53 54  52 42 20 72 31 30 2c 56  |10,#0:STRB r10,V|
000025d0  68 3a 2e 59 75 20 4d 4f  56 20 72 30 2c 23 31 3a  |h:.Yu MOV r0,#1:|
000025e0  4d 4f 56 20 72 32 2c 23  32 3a 4d 4f 56 20 72 33  |MOV r2,#2:MOV r3|
000025f0  2c 23 35 3a 42 4c 20 57  63 3a 4c 44 4d 46 44 20  |,#5:BL Wc:LDMFD |
00002600  28 55 59 29 21 2c 7b 50  43 7d 3a 2e 59 74 20 41  |(UY)!,{PC}:.Yt A|
00002610  44 44 20 72 32 2c 72 32  2c 23 31 3a 43 4d 50 20  |DD r2,r2,#1:CMP |
00002620  72 32 2c 23 34 3a 42 4e  45 20 59 73 3a 4c 44 4d  |r2,#4:BNE Ys:LDM|
00002630  46 44 20 28 55 59 29 21  2c 7b 50 43 7d 0d 1f ae  |FD (UY)!,{PC}...|
00002640  e8 2e 59 72 20 45 51 55  44 20 58 55 3a 2e 58 78  |..Yr EQUD XU:.Xx|
00002650  20 45 51 55 42 20 30 3a  2e 58 79 20 45 51 55 42  | EQUB 0:.Xy EQUB|
00002660  20 30 3a 2e 58 7a 20 45  51 55 42 20 30 3a 2e 59  | 0:.Xz EQUB 0:.Y|
00002670  55 20 45 51 55 42 20 30  3a 2e 59 70 20 45 51 55  |U EQUB 0:.Yp EQU|
00002680  44 20 58 6f 3a 2e 59 6c  20 53 54 4d 46 44 20 28  |D Xo:.Yl STMFD (|
00002690  55 59 29 21 2c 7b 55 5a  7d 3a 4c 44 52 20 72 30  |UY)!,{UZ}:LDR r0|
000026a0  2c 56 6d 3a 43 4d 50 20  72 30 2c 23 31 3a 4c 44  |,Vm:CMP r0,#1:LD|
000026b0  4d 45 51 46 44 20 28 55  59 29 21 2c 7b 50 43 7d  |MEQFD (UY)!,{PC}|
000026c0  3a 4c 44 52 42 20 72 31  2c 57 7a 2b 30 3a 4c 44  |:LDRB r1,Wz+0:LD|
000026d0  52 42 20 72 32 2c 57 7a  2b 31 3a 4c 44 52 42 20  |RB r2,Wz+1:LDRB |
000026e0  72 33 2c 57 7a 2b 33 3a  2e 59 76 20 43 4d 50 20  |r3,Wz+3:.Yv CMP |
000026f0  72 31 2c 23 31 34 2a 31  36 3a 43 4d 50 45 51 20  |r1,#14*16:CMPEQ |
00002700  72 33 2c 23 33 3a 4c 44  4d 45 51 46 44 20 28 55  |r3,#3:LDMEQFD (U|
00002710  59 29 21 2c 7b 50 43 7d  3a 43 4d 50 20 72 31 2c  |Y)!,{PC}:CMP r1,|
00002720  23 31 2a 31 36 0d 20 76  ff 43 4d 50 45 51 20 72  |#1*16. v.CMPEQ r|
00002730  33 2c 23 32 3a 4c 44 4d  45 51 46 44 20 28 55 59  |3,#2:LDMEQFD (UY|
00002740  29 21 2c 7b 50 43 7d 3a  43 4d 50 20 72 32 2c 23  |)!,{PC}:CMP r2,#|
00002750  31 34 2a 31 36 3a 43 4d  50 45 51 20 72 33 2c 23  |14*16:CMPEQ r3,#|
00002760  31 3a 4c 44 4d 45 51 46  44 20 28 55 59 29 21 2c  |1:LDMEQFD (UY)!,|
00002770  7b 50 43 7d 3a 43 4d 50  20 72 32 2c 23 31 2a 31  |{PC}:CMP r2,#1*1|
00002780  36 3a 43 4d 50 45 51 20  72 33 2c 23 30 3a 4c 44  |6:CMPEQ r3,#0:LD|
00002790  4d 45 51 46 44 20 28 55  59 29 21 2c 7b 50 43 7d  |MEQFD (UY)!,{PC}|
000027a0  3a 2e 59 77 20 4c 44 52  20 72 30 2c 59 78 3a 4d  |:.Yw LDR r0,Yx:M|
000027b0  4f 56 20 72 31 2c 72 31  2c 4c 53 52 20 23 34 3a  |OV r1,r1,LSR #4:|
000027c0  20 80 20 72 32 2c 20 72  32 2c 20 23 25 31 31 31  | . r2, r2, #%111|
000027d0  31 30 30 30 30 3a 41 44  44 20 72 34 2c 72 30 2c  |10000:ADD r4,r0,|
000027e0  72 32 3a 41 44 44 20 72  34 2c 72 34 2c 72 31 3a  |r2:ADD r4,r4,r1:|
000027f0  43 4d 50 20 72 33 2c 23  30 3a 4c 44 52 45 51 42  |CMP r3,#0:LDREQB|
00002800  20 72 35 2c 5b 72 34 2c  23 2d 31 36 5d 3a 4c 44  | r5,[r4,#-16]:LD|
00002810  52 45 51 42 20 72 36 2c  5b 72 34 2c 23 2d 31 36  |REQB r6,[r4,#-16|
00002820  2d 31 36 5d 0d 20 f8 f4  53 55 42 45 51 20 72 32  |-16]. ..SUBEQ r2|
00002830  2c 72 32 2c 23 31 2a 31  36 3a 43 4d 50 20 72 33  |,r2,#1*16:CMP r3|
00002840  2c 23 31 3a 4c 44 52 45  51 42 20 72 35 2c 5b 72  |,#1:LDREQB r5,[r|
00002850  34 2c 23 2b 31 36 5d 3a  4c 44 52 45 51 42 20 72  |4,#+16]:LDREQB r|
00002860  36 2c 5b 72 34 2c 23 2b  31 36 2b 31 36 5d 3a 41  |6,[r4,#+16+16]:A|
00002870  44 44 45 51 20 72 32 2c  72 32 2c 23 31 2a 31 36  |DDEQ r2,r2,#1*16|
00002880  3a 43 4d 50 20 72 33 2c  23 32 3a 4c 44 52 45 51  |:CMP r3,#2:LDREQ|
00002890  42 20 72 35 2c 5b 72 34  2c 23 2d 31 5d 3a 4c 44  |B r5,[r4,#-1]:LD|
000028a0  52 45 51 42 20 72 36 2c  5b 72 34 2c 23 2d 31 2d  |REQB r6,[r4,#-1-|
000028b0  31 5d 3a 53 55 42 45 51  20 72 31 2c 72 31 2c 23  |1]:SUBEQ r1,r1,#|
000028c0  31 3a 43 4d 50 20 72 33  2c 23 33 3a 4c 44 52 45  |1:CMP r3,#3:LDRE|
000028d0  51 42 20 72 35 2c 5b 72  34 2c 23 2b 31 5d 3a 4c  |QB r5,[r4,#+1]:L|
000028e0  44 52 45 51 42 20 72 36  2c 5b 72 34 2c 23 2b 31  |DREQB r6,[r4,#+1|
000028f0  2b 31 5d 3a 41 44 44 45  51 20 72 31 2c 72 31 2c  |+1]:ADDEQ r1,r1,|
00002900  23 31 3a 43 4d 50 20 72  35 2c 23 31 3a 43 4d 50  |#1:CMP r5,#1:CMP|
00002910  4e 45 20 72 35 2c 23 32  0d 21 8e f7 43 4d 50 4e  |NE r5,#2.!..CMPN|
00002920  45 20 72 35 2c 23 33 3a  43 4d 50 4e 45 20 72 35  |E r5,#3:CMPNE r5|
00002930  2c 23 34 3a 43 4d 50 4e  45 20 72 35 2c 23 35 3a  |,#4:CMPNE r5,#5:|
00002940  4c 44 4d 4e 45 46 44 20  28 55 59 29 21 2c 7b 50  |LDMNEFD (UY)!,{P|
00002950  43 7d 3a 43 4d 50 20 72  36 2c 23 30 3a 42 45 51  |C}:CMP r6,#0:BEQ|
00002960  20 59 79 3a 2e 59 7a 20  43 4d 50 20 72 35 2c 23  | Yy:.Yz CMP r5,#|
00002970  32 3a 43 4d 50 4e 45 20  72 35 2c 23 33 3a 43 4d  |2:CMPNE r5,#3:CM|
00002980  50 4e 45 20 72 35 2c 23  34 3a 43 4d 50 4e 45 20  |PNE r5,#4:CMPNE |
00002990  72 35 2c 23 35 3a 4c 44  4d 45 51 46 44 20 28 55  |r5,#5:LDMEQFD (U|
000029a0  59 29 21 2c 7b 50 43 7d  3a 4d 4f 56 20 72 30 2c  |Y)!,{PC}:MOV r0,|
000029b0  23 31 3a 53 54 52 20 72  30 2c 56 6d 3a 53 54 52  |#1:STR r0,Vm:STR|
000029c0  20 72 31 2c 5a 55 2b 30  3a 53 54 52 20 72 32 2c  | r1,ZU+0:STR r2,|
000029d0  5a 55 2b 34 3a 4d 4f 56  20 72 30 2c 23 32 3a 53  |ZU+4:MOV r0,#2:S|
000029e0  54 52 20 72 30 2c 5a 55  2b 38 3a 53 54 52 20 72  |TR r0,ZU+8:STR r|
000029f0  33 2c 5a 55 2b 31 32 3a  4d 4f 56 20 72 30 2c 23  |3,ZU+12:MOV r0,#|
00002a00  31 35 3a 53 54 52 20 72  30 2c 5a 55 2b 31 36 0d  |15:STR r0,ZU+16.|
00002a10  22 56 fb 4c 44 52 20 72  30 2c 56 73 3a 41 44 44  |"V.LDR r0,Vs:ADD|
00002a20  20 72 30 2c 72 30 2c 23  35 30 3a 53 54 52 20 72  | r0,r0,#50:STR r|
00002a30  30 2c 56 73 3a 4c 44 4d  46 44 20 28 55 59 29 21  |0,Vs:LDMFD (UY)!|
00002a40  2c 7b 50 43 7d 3a 2e 59  79 20 4d 4f 56 20 72 30  |,{PC}:.Yy MOV r0|
00002a50  2c 23 31 3a 53 54 52 20  72 30 2c 56 6d 3a 53 54  |,#1:STR r0,Vm:ST|
00002a60  52 20 72 31 2c 5a 55 2b  30 3a 53 54 52 20 72 32  |R r1,ZU+0:STR r2|
00002a70  2c 5a 55 2b 34 3a 4d 4f  56 20 72 30 2c 23 31 3a  |,ZU+4:MOV r0,#1:|
00002a80  53 54 52 20 72 30 2c 5a  55 2b 38 3a 53 54 52 20  |STR r0,ZU+8:STR |
00002a90  72 33 2c 5a 55 2b 31 32  3a 4c 44 52 20 72 30 2c  |r3,ZU+12:LDR r0,|
00002aa0  59 78 3a 41 44 44 20 72  34 2c 72 31 2c 72 32 3a  |Yx:ADD r4,r1,r2:|
00002ab0  53 54 52 42 20 72 35 2c  5a 55 2b 31 36 3a 4d 4f  |STRB r5,ZU+16:MO|
00002ac0  56 20 72 35 2c 23 30 3a  53 54 52 42 20 72 35 2c  |V r5,#0:STRB r5,|
00002ad0  5b 72 30 2c 72 34 5d 3a  4c 44 52 20 72 30 2c 56  |[r0,r4]:LDR r0,V|
00002ae0  73 3a 41 44 44 20 72 30  2c 72 30 2c 23 31 30 3a  |s:ADD r0,r0,#10:|
00002af0  53 54 52 20 72 30 2c 56  73 3a 4c 44 4d 46 44 20  |STR r0,Vs:LDMFD |
00002b00  28 55 59 29 21 2c 7b 50  43 7d 0d 23 32 ff 2e 57  |(UY)!,{PC}.#2..W|
00002b10  72 20 53 54 4d 46 44 20  28 55 59 29 21 2c 7b 55  |r STMFD (UY)!,{U|
00002b20  5a 7d 3a 4c 44 52 20 72  30 2c 56 6d 3a 43 4d 50  |Z}:LDR r0,Vm:CMP|
00002b30  20 72 30 2c 23 30 3a 4c  44 4d 45 51 46 44 20 28  | r0,#0:LDMEQFD (|
00002b40  55 59 29 21 2c 7b 50 43  7d 3a 4c 44 52 20 72 30  |UY)!,{PC}:LDR r0|
00002b50  2c 5a 55 2b 38 3a 43 4d  50 20 72 30 2c 23 31 3a  |,ZU+8:CMP r0,#1:|
00002b60  42 45 51 20 5a 56 3a 2e  5a 57 20 4c 44 52 20 72  |BEQ ZV:.ZW LDR r|
00002b70  30 2c 5a 55 2b 31 36 3a  53 55 42 53 20 72 30 2c  |0,ZU+16:SUBS r0,|
00002b80  72 30 2c 23 31 3a 42 45  51 20 5a 58 3a 53 54 52  |r0,#1:BEQ ZX:STR|
00002b90  20 72 30 2c 5a 55 2b 31  36 3a 4c 44 52 20 72 31  | r0,ZU+16:LDR r1|
00002ba0  2c 5a 55 2b 30 3a 4c 44  52 20 72 32 2c 5a 55 2b  |,ZU+0:LDR r2,ZU+|
00002bb0  34 3a 4c 44 52 20 72 35  2c 55 75 3a 4d 4f 56 20  |4:LDR r5,Uu:MOV |
00002bc0  72 32 2c 72 32 2c 4c 53  52 20 23 34 3a 41 44 44  |r2,r2,LSR #4:ADD|
00002bd0  20 72 35 2c 72 35 2c 72  32 2c 4c 53 4c 20 23 31  | r5,r5,r2,LSL #1|
00002be0  31 3a 41 44 44 20 72 35  2c 72 35 2c 72 32 2c 4c  |1:ADD r5,r5,r2,L|
00002bf0  53 4c 20 23 39 3a 41 44  44 20 72 35 2c 72 35 2c  |SL #9:ADD r5,r5,|
00002c00  72 31 2c 4c 53 4c 20 23  33 0d 23 e6 f4 42 4c 20  |r1,LSL #3.#..BL |
00002c10  58 6a 3a 20 80 20 72 31  32 2c 20 72 31 32 2c 20  |Xj: . r12, r12, |
00002c20  23 31 35 3a 41 44 44 20  72 35 2c 72 35 2c 72 31  |#15:ADD r5,r5,r1|
00002c30  32 2c 4c 53 4c 20 23 37  3a 41 44 44 20 72 35 2c  |2,LSL #7:ADD r5,|
00002c40  72 35 2c 72 31 32 2c 4c  53 4c 20 23 35 3a 42 4c  |r5,r12,LSL #5:BL|
00002c50  20 58 6a 3a 20 80 20 72  31 32 2c 20 72 31 32 2c  | Xj: . r12, r12,|
00002c60  20 23 31 3a 41 44 44 20  72 35 2c 72 35 2c 72 31  | #1:ADD r5,r5,r1|
00002c70  32 2c 4c 53 4c 20 23 32  3a 42 4c 20 58 6a 3a 4c  |2,LSL #2:BL Xj:L|
00002c80  44 52 20 72 36 2c 5b 72  35 5d 3a 20 80 20 72 36  |DR r6,[r5]: . r6|
00002c90  2c 20 72 36 2c 20 72 31  32 3a 53 54 52 20 72 36  |, r6, r12:STR r6|
00002ca0  2c 5b 72 35 5d 3a 4c 44  4d 46 44 20 28 55 59 29  |,[r5]:LDMFD (UY)|
00002cb0  21 2c 7b 50 43 7d 3a 2e  5a 58 20 53 54 52 20 72  |!,{PC}:.ZX STR r|
00002cc0  30 2c 56 6d 3a 4c 44 52  20 72 30 2c 59 78 3a 4c  |0,Vm:LDR r0,Yx:L|
00002cd0  44 52 20 72 31 2c 5a 55  2b 30 3a 4c 44 52 20 72  |DR r1,ZU+0:LDR r|
00002ce0  32 2c 5a 55 2b 34 3a 41  44 44 20 72 33 2c 72 31  |2,ZU+4:ADD r3,r1|
00002cf0  2c 72 32 3a 4d 4f 56 20  72 34 2c 23 30 0d 24 9a  |,r2:MOV r4,#0.$.|
00002d00  fd 53 54 52 42 20 72 34  2c 5b 72 30 2c 72 33 5d  |.STRB r4,[r0,r3]|
00002d10  3a 4c 44 52 20 72 35 2c  55 75 3a 4d 4f 56 20 72  |:LDR r5,Uu:MOV r|
00002d20  32 2c 72 32 2c 4c 53 52  20 23 34 3a 41 44 44 20  |2,r2,LSR #4:ADD |
00002d30  72 35 2c 72 35 2c 72 32  2c 4c 53 4c 20 23 31 31  |r5,r5,r2,LSL #11|
00002d40  3a 41 44 44 20 72 35 2c  72 35 2c 72 32 2c 4c 53  |:ADD r5,r5,r2,LS|
00002d50  4c 20 23 39 3a 41 44 44  20 72 35 2c 72 35 2c 72  |L #9:ADD r5,r5,r|
00002d60  31 2c 4c 53 4c 20 23 33  3a 2e 5a 59 20 4d 4f 56  |1,LSL #3:.ZY MOV|
00002d70  20 72 36 2c 23 26 30 30  30 30 30 30 30 30 3a 4d  | r6,#&00000000:M|
00002d80  4f 56 20 72 37 2c 23 31  36 3a 2e 5a 5a 20 53 54  |OV r7,#16:.ZZ ST|
00002d90  52 20 72 36 2c 5b 72 35  2c 23 30 5d 3a 53 54 52  |R r6,[r5,#0]:STR|
00002da0  20 72 36 2c 5b 72 35 2c  23 34 5d 3a 41 44 44 20  | r6,[r5,#4]:ADD |
00002db0  72 35 2c 72 35 2c 23 31  36 30 3a 53 55 42 53 20  |r5,r5,#160:SUBS |
00002dc0  72 37 2c 72 37 2c 23 31  3a 42 4e 45 20 5a 5a 3a  |r7,r7,#1:BNE ZZ:|
00002dd0  4c 44 4d 46 44 20 28 55  59 29 21 2c 7b 50 43 7d  |LDMFD (UY)!,{PC}|
00002de0  3a 2e 5a 56 20 4c 44 52  20 72 30 2c 59 70 3a 4c  |:.ZV LDR r0,Yp:L|
00002df0  44 52 20 72 31 2c 5a 55  2b 30 0d 25 3a f5 4c 44  |DR r1,ZU+0.%:.LD|
00002e00  52 20 72 32 2c 5a 55 2b  34 3a 41 44 44 20 72 33  |R r2,ZU+4:ADD r3|
00002e10  2c 72 31 2c 72 32 3a 41  44 44 20 72 33 2c 72 33  |,r1,r2:ADD r3,r3|
00002e20  2c 72 30 3a 4c 44 52 20  72 34 2c 5a 55 2b 31 32  |,r0:LDR r4,ZU+12|
00002e30  3a 43 4d 50 20 72 34 2c  23 30 3a 4c 44 52 45 51  |:CMP r4,#0:LDREQ|
00002e40  42 20 72 35 2c 5b 72 33  2c 23 2d 31 36 5d 3a 43  |B r5,[r3,#-16]:C|
00002e50  4d 50 20 72 34 2c 23 31  3a 4c 44 52 45 51 42 20  |MP r4,#1:LDREQB |
00002e60  72 35 2c 5b 72 33 2c 23  2b 31 36 5d 3a 43 4d 50  |r5,[r3,#+16]:CMP|
00002e70  20 72 34 2c 23 32 3a 4c  44 52 45 51 42 20 72 35  | r4,#2:LDREQB r5|
00002e80  2c 5b 72 33 2c 23 2d 31  5d 3a 43 4d 50 20 72 34  |,[r3,#-1]:CMP r4|
00002e90  2c 23 33 3a 4c 44 52 45  51 42 20 72 35 2c 5b 72  |,#3:LDREQB r5,[r|
00002ea0  33 2c 23 2b 31 5d 3a 43  4d 50 20 72 35 2c 23 30  |3,#+1]:CMP r5,#0|
00002eb0  3a 42 45 51 20 5a 61 3a  4d 4f 56 20 72 30 2c 23  |:BEQ Za:MOV r0,#|
00002ec0  30 3a 53 54 52 20 72 30  2c 56 6d 3a 4c 44 52 20  |0:STR r0,Vm:LDR |
00002ed0  72 30 2c 59 78 3a 41 44  44 20 72 34 2c 72 31 2c  |r0,Yx:ADD r4,r1,|
00002ee0  72 32 3a 4c 44 52 20 72  35 2c 5a 55 2b 31 36 0d  |r2:LDR r5,ZU+16.|
00002ef0  25 f8 fb 53 54 52 42 20  72 35 2c 5b 72 30 2c 72  |%..STRB r5,[r0,r|
00002f00  34 5d 3a 2e 5a 62 20 4d  4f 56 20 72 30 2c 23 32  |4]:.Zb MOV r0,#2|
00002f10  3a 4d 4f 56 20 72 32 2c  23 32 3a 4d 4f 56 20 72  |:MOV r2,#2:MOV r|
00002f20  33 2c 23 38 3a 42 4c 20  57 63 3a 42 4c 20 5a 63  |3,#8:BL Wc:BL Zc|
00002f30  3a 42 20 5a 64 3a 2e 5a  61 20 4c 44 52 20 72 30  |:B Zd:.Za LDR r0|
00002f40  2c 55 75 3a 4d 4f 56 20  72 33 2c 23 30 3a 4d 4f  |,Uu:MOV r3,#0:MO|
00002f50  56 20 72 31 2c 72 31 2c  4c 53 4c 20 23 34 3a 4c  |V r1,r1,LSL #4:L|
00002f60  44 52 20 72 34 2c 5a 65  3a 42 4c 20 57 67 3a 4c  |DR r4,Ze:BL Wg:L|
00002f70  44 52 20 72 31 2c 5a 55  2b 30 3a 4c 44 52 20 72  |DR r1,ZU+0:LDR r|
00002f80  32 2c 5a 55 2b 34 3a 4c  44 52 20 72 34 2c 5a 55  |2,ZU+4:LDR r4,ZU|
00002f90  2b 31 32 3a 43 4d 50 20  72 34 2c 23 30 3a 53 55  |+12:CMP r4,#0:SU|
00002fa0  42 45 51 20 72 32 2c 72  32 2c 23 31 36 3a 43 4d  |BEQ r2,r2,#16:CM|
00002fb0  50 20 72 34 2c 23 31 3a  41 44 44 45 51 20 72 32  |P r4,#1:ADDEQ r2|
00002fc0  2c 72 32 2c 23 31 36 3a  43 4d 50 20 72 34 2c 23  |,r2,#16:CMP r4,#|
00002fd0  32 3a 53 55 42 45 51 20  72 31 2c 72 31 2c 23 31  |2:SUBEQ r1,r1,#1|
00002fe0  3a 43 4d 50 20 72 34 2c  23 33 0d 26 d4 f9 41 44  |:CMP r4,#3.&..AD|
00002ff0  44 45 51 20 72 31 2c 72  31 2c 23 31 3a 53 54 52  |DEQ r1,r1,#1:STR|
00003000  20 72 31 2c 5a 55 2b 30  3a 53 54 52 20 72 32 2c  | r1,ZU+0:STR r2,|
00003010  5a 55 2b 34 3a 2e 5a 66  20 4c 44 52 20 72 30 2c  |ZU+4:.Zf LDR r0,|
00003020  55 75 3a 4c 44 52 20 72  33 2c 5a 55 2b 31 36 3a  |Uu:LDR r3,ZU+16:|
00003030  4d 4f 56 20 72 31 2c 72  31 2c 4c 53 4c 20 23 34  |MOV r1,r1,LSL #4|
00003040  3a 4c 44 52 20 72 34 2c  5a 65 3a 42 4c 20 57 67  |:LDR r4,Ze:BL Wg|
00003050  3a 2e 5a 64 20 4c 44 52  20 72 30 2c 5a 55 2b 30  |:.Zd LDR r0,ZU+0|
00003060  3a 4c 44 52 20 72 31 2c  5a 55 2b 34 3a 4d 4f 56  |:LDR r1,ZU+4:MOV|
00003070  20 72 30 2c 72 30 2c 4c  53 4c 20 23 34 3a 4d 4f  | r0,r0,LSL #4:MO|
00003080  56 20 72 32 2c 23 31 3a  4d 4f 56 20 72 33 2c 23  |V r2,#1:MOV r3,#|
00003090  30 3a 41 44 52 20 72 34  2c 58 55 3a 2e 5a 67 20  |0:ADR r4,XU:.Zg |
000030a0  41 44 44 20 72 35 2c 72  34 2c 72 33 2c 4c 53 4c  |ADD r5,r4,r3,LSL|
000030b0  20 23 33 3a 4c 44 52 42  20 72 36 2c 5b 72 35 2c  | #3:LDRB r6,[r5,|
000030c0  23 30 5d 3a 4c 44 52 42  20 72 37 2c 5b 72 35 2c  |#0]:LDRB r7,[r5,|
000030d0  23 31 5d 3a 4c 44 52 42  20 72 38 2c 5b 72 35 2c  |#1]:LDRB r8,[r5,|
000030e0  23 33 5d 0d 27 88 f1 43  4d 50 20 72 38 2c 23 31  |#3].'..CMP r8,#1|
000030f0  3a 42 45 51 20 5a 68 3a  53 55 42 53 20 72 39 2c  |:BEQ Zh:SUBS r9,|
00003100  72 30 2c 72 36 3a 53 55  42 4c 54 20 72 39 2c 72  |r0,r6:SUBLT r9,r|
00003110  36 2c 72 30 3a 53 55 42  53 20 72 31 30 2c 72 31  |6,r0:SUBS r10,r1|
00003120  2c 72 37 3a 53 55 42 4c  54 20 72 31 30 2c 72 37  |,r7:SUBLT r10,r7|
00003130  2c 72 31 3a 43 4d 50 20  72 39 2c 23 31 36 3a 42  |,r1:CMP r9,#16:B|
00003140  47 45 20 5a 68 3a 43 4d  50 20 72 31 30 2c 23 31  |GE Zh:CMP r10,#1|
00003150  36 3a 42 47 45 20 5a 68  3a 53 54 52 42 20 72 32  |6:BGE Zh:STRB r2|
00003160  2c 5b 72 35 2c 23 33 5d  3a 4c 44 52 20 72 39 2c  |,[r5,#3]:LDR r9,|
00003170  56 73 3a 4c 44 52 20 72  31 30 2c 5a 55 2b 31 36  |Vs:LDR r10,ZU+16|
00003180  3a 43 4d 50 20 72 31 30  2c 23 31 3a 41 44 44 45  |:CMP r10,#1:ADDE|
00003190  51 20 72 39 2c 72 39 2c  23 32 35 30 3a 43 4d 50  |Q r9,r9,#250:CMP|
000031a0  20 72 31 30 2c 23 34 3a  41 44 44 45 51 20 72 39  | r10,#4:ADDEQ r9|
000031b0  2c 72 39 2c 23 35 30 30  3a 43 4d 50 20 72 31 30  |,r9,#500:CMP r10|
000031c0  2c 23 33 3a 41 44 44 45  51 20 72 39 2c 72 39 2c  |,#3:ADDEQ r9,r9,|
000031d0  23 32 35 30 0d 28 46 f2  41 44 44 45 51 20 72 39  |#250.(F.ADDEQ r9|
000031e0  2c 72 39 2c 23 35 30 30  3a 43 4d 50 20 72 31 30  |,r9,#500:CMP r10|
000031f0  2c 23 32 3a 41 44 44 45  51 20 72 39 2c 72 39 2c  |,#2:ADDEQ r9,r9,|
00003200  23 31 30 30 30 3a 53 54  52 20 72 39 2c 56 73 3a  |#1000:STR r9,Vs:|
00003210  4c 44 52 20 72 39 2c 58  62 3a 53 55 42 53 20 72  |LDR r9,Xb:SUBS r|
00003220  39 2c 72 39 2c 23 31 3a  53 54 52 20 72 39 2c 58  |9,r9,#1:STR r9,X|
00003230  62 3a 4d 56 4e 45 51 20  72 39 2c 23 30 3a 53 54  |b:MVNEQ r9,#0:ST|
00003240  52 45 51 20 72 39 2c 56  6c 3a 2e 5a 68 20 41 44  |REQ r9,Vl:.Zh AD|
00003250  44 20 72 33 2c 72 33 2c  23 31 3a 43 4d 50 20 72  |D r3,r3,#1:CMP r|
00003260  33 2c 23 34 3a 42 4e 45  20 5a 67 3a 4c 44 4d 46  |3,#4:BNE Zg:LDMF|
00003270  44 20 28 55 59 29 21 2c  7b 50 43 7d 3a 2e 5a 65  |D (UY)!,{PC}:.Ze|
00003280  20 45 51 55 44 20 57 56  3a 2e 56 6d 20 45 51 55  | EQUD WV:.Vm EQU|
00003290  44 20 30 3a 2e 5a 55 20  45 51 55 44 20 30 3a 45  |D 0:.ZU EQUD 0:E|
000032a0  51 55 44 20 30 3a 45 51  55 44 20 30 3a 45 51 55  |QUD 0:EQUD 0:EQU|
000032b0  44 20 30 3a 45 51 55 44  20 30 3a 2e 59 78 20 45  |D 0:EQUD 0:.Yx E|
000032c0  51 55 44 20 58 6f 0d 29  40 f4 2e 5a 63 20 53 54  |QUD Xo.)@..Zc ST|
000032d0  4d 46 44 20 28 55 59 29  21 2c 7b 55 5a 7d 3a 4c  |MFD (UY)!,{UZ}:L|
000032e0  44 52 20 72 30 2c 58 5a  3a 43 4d 50 20 72 30 2c  |DR r0,XZ:CMP r0,|
000032f0  23 31 3a 4c 44 4d 45 51  46 44 20 28 55 59 29 21  |#1:LDMEQFD (UY)!|
00003300  2c 7b 50 43 7d 3a 4c 44  52 20 72 30 2c 5a 69 3a  |,{PC}:LDR r0,Zi:|
00003310  4d 4f 56 20 72 31 2c 23  30 3a 2e 5a 6a 20 4c 44  |MOV r1,#0:.Zj LD|
00003320  52 42 20 72 32 2c 5b 72  30 5d 3a 20 80 20 72 33  |RB r2,[r0]: . r3|
00003330  2c 20 72 31 2c 20 23 31  35 3a 4d 4f 56 20 72 34  |, r1, #15:MOV r4|
00003340  2c 72 31 2c 4c 53 52 20  23 34 3a 43 4d 50 20 72  |,r1,LSR #4:CMP r|
00003350  32 2c 23 32 3a 42 4e 45  20 5a 6b 3a 2e 5a 6c 20  |2,#2:BNE Zk:.Zl |
00003360  43 4d 50 20 72 33 2c 23  31 32 3a 42 47 54 20 5a  |CMP r3,#12:BGT Z|
00003370  6d 3a 4c 44 52 42 20 72  35 2c 5b 72 30 2c 23 2b  |m:LDRB r5,[r0,#+|
00003380  31 5d 3a 4c 44 52 42 20  72 36 2c 5b 72 30 2c 23  |1]:LDRB r6,[r0,#|
00003390  2b 32 5d 3a 4c 44 52 42  20 72 37 2c 5b 72 30 2c  |+2]:LDRB r7,[r0,|
000033a0  23 2b 33 5d 3a 43 4d 50  20 72 35 2c 23 33 3a 43  |#+3]:CMP r5,#3:C|
000033b0  4d 50 45 51 20 72 36 2c  23 34 0d 29 f4 f4 43 4d  |MPEQ r6,#4.)..CM|
000033c0  50 45 51 20 72 37 2c 23  34 3a 42 4c 45 51 20 5a  |PEQ r7,#4:BLEQ Z|
000033d0  6e 3a ec 51 20 72 30 2c  23 31 3a 53 54 52 45 51  |n:.Q r0,#1:STREQ|
000033e0  20 72 30 2c 58 5a 3a 4c  44 4d 45 51 46 44 20 28  | r0,XZ:LDMEQFD (|
000033f0  55 59 29 21 2c 7b 50 43  7d 3a 2e 5a 6d 20 43 4d  |UY)!,{PC}:.Zm CM|
00003400  50 20 72 34 2c 23 31 32  3a 42 47 54 20 5a 6b 3a  |P r4,#12:BGT Zk:|
00003410  4c 44 52 42 20 72 35 2c  5b 72 30 2c 23 2b 31 2a  |LDRB r5,[r0,#+1*|
00003420  31 36 5d 3a 4c 44 52 42  20 72 36 2c 5b 72 30 2c  |16]:LDRB r6,[r0,|
00003430  23 2b 32 2a 31 36 5d 3a  4c 44 52 42 20 72 37 2c  |#+2*16]:LDRB r7,|
00003440  5b 72 30 2c 23 2b 33 2a  31 36 5d 3a 43 4d 50 20  |[r0,#+3*16]:CMP |
00003450  72 35 2c 23 33 3a 43 4d  50 45 51 20 72 36 2c 23  |r5,#3:CMPEQ r6,#|
00003460  34 3a 43 4d 50 45 51 20  72 37 2c 23 34 3a 42 4c  |4:CMPEQ r7,#4:BL|
00003470  45 51 20 5a 6e 3a ec 51  20 72 30 2c 23 31 3a 53  |EQ Zn:.Q r0,#1:S|
00003480  54 52 45 51 20 72 30 2c  58 5a 3a 4c 44 4d 45 51  |TREQ r0,XZ:LDMEQ|
00003490  46 44 20 28 55 59 29 21  2c 7b 50 43 7d 3a 2e 5a  |FD (UY)!,{PC}:.Z|
000034a0  6b 20 41 44 44 20 72 30  2c 72 30 2c 23 31 0d 2a  |k ADD r0,r0,#1.*|
000034b0  a8 f5 41 44 44 20 72 31  2c 72 31 2c 23 31 3a 43  |..ADD r1,r1,#1:C|
000034c0  4d 50 20 72 31 2c 23 31  36 2a 31 36 3a 42 4e 45  |MP r1,#16*16:BNE|
000034d0  20 5a 6a 3a 4d 4f 56 20  72 30 2c 23 30 3a 4c 44  | Zj:MOV r0,#0:LD|
000034e0  4d 46 44 20 28 55 59 29  21 2c 7b 50 43 7d 3a 2e  |MFD (UY)!,{PC}:.|
000034f0  5a 69 20 45 51 55 44 20  58 6f 3a 2e 5a 6e 20 53  |Zi EQUD Xo:.Zn S|
00003500  54 4d 46 44 20 28 55 59  29 21 2c 7b 55 5a 7d 3a  |TMFD (UY)!,{UZ}:|
00003510  4c 44 52 20 72 30 2c 56  73 3a 4c 44 52 20 72 31  |LDR r0,Vs:LDR r1|
00003520  2c 5a 6f 3a 41 44 44 20  72 30 2c 72 30 2c 72 31  |,Zo:ADD r0,r0,r1|
00003530  3a 53 54 52 20 72 30 2c  56 73 3a 4c 44 4d 46 44  |:STR r0,Vs:LDMFD|
00003540  20 28 55 59 29 21 2c 7b  50 43 7d 3a 2e 5a 6f 20  | (UY)!,{PC}:.Zo |
00003550  45 51 55 44 20 35 30 30  30 3a 2e 57 68 20 53 54  |EQUD 5000:.Wh ST|
00003560  4d 46 44 20 28 55 59 29  21 2c 7b 55 5a 7d 3a 2e  |MFD (UY)!,{UZ}:.|
00003570  5a 70 20 4c 44 52 20 72  30 2c 55 75 3a 4c 44 52  |Zp LDR r0,Uu:LDR|
00003580  42 20 72 31 2c 57 7a 2b  30 3a 4c 44 52 42 20 72  |B r1,Wz+0:LDRB r|
00003590  32 2c 57 7a 2b 31 3a 4c  44 52 42 20 72 33 2c 57  |2,Wz+1:LDRB r3,W|
000035a0  7a 2b 33 0d 2b ac ff 20  80 20 72 35 2c 72 31 2c  |z+3.+.. . r5,r1,|
000035b0  23 31 35 3a 20 80 20 72  36 2c 72 32 2c 23 31 35  |#15: . r6,r2,#15|
000035c0  3a 43 4d 50 20 72 33 2c  23 30 3a ec 51 20 72 34  |:CMP r3,#0:.Q r4|
000035d0  2c 72 36 2c 4c 53 52 20  23 33 3a 43 4d 50 20 72  |,r6,LSR #3:CMP r|
000035e0  33 2c 23 31 3a ec 51 20  72 34 2c 72 36 2c 4c 53  |3,#1:.Q r4,r6,LS|
000035f0  52 20 23 33 3a 43 4d 50  20 72 33 2c 23 32 3a ec  |R #3:CMP r3,#2:.|
00003600  51 20 72 34 2c 72 35 2c  4c 53 52 20 23 33 3a 43  |Q r4,r5,LSR #3:C|
00003610  4d 50 20 72 33 2c 23 33  3a ec 51 20 72 34 2c 72  |MP r3,#3:.Q r4,r|
00003620  35 2c 4c 53 52 20 23 33  3a 4d 4f 56 20 72 33 2c  |5,LSR #3:MOV r3,|
00003630  72 33 2c 4c 53 4c 20 23  31 3a 41 44 44 20 72 33  |r3,LSL #1:ADD r3|
00003640  2c 72 33 2c 72 34 3a 4c  44 52 20 72 34 2c 5a 71  |,r3,r4:LDR r4,Zq|
00003650  3a 42 4c 20 57 67 3a 2e  5a 72 20 4c 44 52 42 20  |:BL Wg:.Zr LDRB |
00003660  72 30 2c 58 55 2b 33 3a  43 4d 50 20 72 30 2c 23  |r0,XU+3:CMP r0,#|
00003670  31 3a 42 45 51 20 5a 73  3a 4c 44 52 20 72 30 2c  |1:BEQ Zs:LDR r0,|
00003680  55 75 3a 4c 44 52 42 20  72 31 2c 58 55 2b 30 3a  |Uu:LDRB r1,XU+0:|
00003690  4c 44 52 42 20 72 32 2c  58 55 2b 31 3a 42 4c 20  |LDRB r2,XU+1:BL |
000036a0  57 55 0d 2c 7e f3 2e 5a  73 20 4c 44 52 42 20 72  |WU.,~..Zs LDRB r|
000036b0  30 2c 58 56 2b 33 3a 43  4d 50 20 72 30 2c 23 31  |0,XV+3:CMP r0,#1|
000036c0  3a 42 45 51 20 5a 74 3a  4c 44 52 20 72 30 2c 55  |:BEQ Zt:LDR r0,U|
000036d0  75 3a 4c 44 52 42 20 72  31 2c 58 56 2b 30 3a 4c  |u:LDRB r1,XV+0:L|
000036e0  44 52 42 20 72 32 2c 58  56 2b 31 3a 42 4c 20 57  |DRB r2,XV+1:BL W|
000036f0  55 3a 2e 5a 74 20 4c 44  52 42 20 72 30 2c 58 57  |U:.Zt LDRB r0,XW|
00003700  2b 33 3a 43 4d 50 20 72  30 2c 23 31 3a 42 45 51  |+3:CMP r0,#1:BEQ|
00003710  20 5a 75 3a 4c 44 52 20  72 30 2c 55 75 3a 4c 44  | Zu:LDR r0,Uu:LD|
00003720  52 42 20 72 31 2c 58 57  2b 30 3a 4c 44 52 42 20  |RB r1,XW+0:LDRB |
00003730  72 32 2c 58 57 2b 31 3a  42 4c 20 57 55 3a 2e 5a  |r2,XW+1:BL WU:.Z|
00003740  75 20 4c 44 52 42 20 72  30 2c 58 58 2b 33 3a 43  |u LDRB r0,XX+3:C|
00003750  4d 50 20 72 30 2c 23 31  3a 4c 44 4d 45 51 46 44  |MP r0,#1:LDMEQFD|
00003760  20 28 55 59 29 21 2c 7b  50 43 7d 3a 4c 44 52 20  | (UY)!,{PC}:LDR |
00003770  72 30 2c 55 75 3a 4c 44  52 42 20 72 31 2c 58 58  |r0,Uu:LDRB r1,XX|
00003780  2b 30 3a 4c 44 52 42 20  72 32 2c 58 58 2b 31 3a  |+0:LDRB r2,XX+1:|
00003790  42 4c 20 57 55 0d 2d 50  f7 4c 44 4d 46 44 20 28  |BL WU.-P.LDMFD (|
000037a0  55 59 29 21 2c 7b 50 43  7d 3a 2e 5a 71 20 45 51  |UY)!,{PC}:.Zq EQ|
000037b0  55 44 20 56 7a 3a 2e 5a  76 20 45 51 55 44 20 57  |UD Vz:.Zv EQUD W|
000037c0  56 3a 2e 57 6a 20 53 54  4d 46 44 20 28 55 59 29  |V:.Wj STMFD (UY)|
000037d0  21 2c 7b 55 5a 7d 3a 4d  4f 56 20 72 30 2c 23 31  |!,{UZ}:MOV r0,#1|
000037e0  39 3a 53 57 49 20 22 4f  53 5f 42 79 74 65 22 3a  |9:SWI "OS_Byte":|
000037f0  2e 5a 77 20 4c 44 52 20  72 30 2c 55 75 3a 4c 44  |.Zw LDR r0,Uu:LD|
00003800  52 42 20 72 31 2c 57 7a  2b 30 3a 4c 44 52 42 20  |RB r1,Wz+0:LDRB |
00003810  72 32 2c 57 7a 2b 31 3a  4d 4f 56 20 72 33 2c 23  |r2,Wz+1:MOV r3,#|
00003820  30 3a 4c 44 52 20 72 34  2c 5a 76 3a 42 4c 20 57  |0:LDR r4,Zv:BL W|
00003830  67 3a 2e 5a 78 20 4c 44  52 20 72 30 2c 55 75 3a  |g:.Zx LDR r0,Uu:|
00003840  4c 44 52 42 20 72 31 2c  58 55 2b 30 3a 4c 44 52  |LDRB r1,XU+0:LDR|
00003850  42 20 72 32 2c 58 55 2b  31 3a 4d 4f 56 20 72 33  |B r2,XU+1:MOV r3|
00003860  2c 23 30 3a 4c 44 52 20  72 34 2c 5a 76 3a 4c 44  |,#0:LDR r4,Zv:LD|
00003870  52 42 20 72 35 2c 58 55  2b 33 3a 43 4d 50 20 72  |RB r5,XU+3:CMP r|
00003880  35 2c 23 30 3a 42 4c 45  51 20 57 67 0d 2e 40 f5  |5,#0:BLEQ Wg..@.|
00003890  2e 5a 79 20 4c 44 52 20  72 30 2c 55 75 3a 4c 44  |.Zy LDR r0,Uu:LD|
000038a0  52 42 20 72 31 2c 58 56  2b 30 3a 4c 44 52 42 20  |RB r1,XV+0:LDRB |
000038b0  72 32 2c 58 56 2b 31 3a  4d 4f 56 20 72 33 2c 23  |r2,XV+1:MOV r3,#|
000038c0  30 3a 4c 44 52 20 72 34  2c 5a 76 3a 4c 44 52 42  |0:LDR r4,Zv:LDRB|
000038d0  20 72 35 2c 58 56 2b 33  3a 43 4d 50 20 72 35 2c  | r5,XV+3:CMP r5,|
000038e0  23 30 3a 42 4c 45 51 20  57 67 3a 2e 5a 7a 20 4c  |#0:BLEQ Wg:.Zz L|
000038f0  44 52 20 72 30 2c 55 75  3a 4c 44 52 42 20 72 31  |DR r0,Uu:LDRB r1|
00003900  2c 58 57 2b 30 3a 4c 44  52 42 20 72 32 2c 58 57  |,XW+0:LDRB r2,XW|
00003910  2b 31 3a 4d 4f 56 20 72  33 2c 23 30 3a 4c 44 52  |+1:MOV r3,#0:LDR|
00003920  20 72 34 2c 5a 76 3a 4c  44 52 42 20 72 35 2c 58  | r4,Zv:LDRB r5,X|
00003930  57 2b 33 3a 43 4d 50 20  72 35 2c 23 30 3a 42 4c  |W+3:CMP r5,#0:BL|
00003940  45 51 20 57 67 3a 2e 61  55 20 4c 44 52 20 72 30  |EQ Wg:.aU LDR r0|
00003950  2c 55 75 3a 4c 44 52 42  20 72 31 2c 58 58 2b 30  |,Uu:LDRB r1,XX+0|
00003960  3a 4c 44 52 42 20 72 32  2c 58 58 2b 31 3a 4d 4f  |:LDRB r2,XX+1:MO|
00003970  56 20 72 33 2c 23 30 3a  4c 44 52 20 72 34 2c 5a  |V r3,#0:LDR r4,Z|
00003980  76 0d 2f 12 e9 4c 44 52  42 20 72 35 2c 58 58 2b  |v./..LDRB r5,XX+|
00003990  33 3a 43 4d 50 20 72 35  2c 23 30 3a 42 4c 45 51  |3:CMP r5,#0:BLEQ|
000039a0  20 57 67 3a 4c 44 4d 46  44 20 28 55 59 29 21 2c  | Wg:LDMFD (UY)!,|
000039b0  7b 50 43 7d 3a 2e 57 7a  20 45 51 55 42 20 30 20  |{PC}:.Wz EQUB 0 |
000039c0  3a 20 45 51 55 42 20 30  20 3a 20 45 51 55 42 20  |: EQUB 0 : EQUB |
000039d0  30 20 3a 20 45 51 55 42  20 30 3a 45 51 55 42 20  |0 : EQUB 0:EQUB |
000039e0  30 20 3a 20 45 51 55 42  20 30 20 3a 20 45 51 55  |0 : EQUB 0 : EQU|
000039f0  42 20 30 20 3a 20 45 51  55 42 20 30 3a 2e 58 55  |B 0 : EQUB 0:.XU|
00003a00  20 45 51 55 42 20 30 20  3a 20 45 51 55 42 20 30  | EQUB 0 : EQUB 0|
00003a10  20 3a 20 45 51 55 42 20  35 20 3a 20 45 51 55 42  | : EQUB 5 : EQUB|
00003a20  20 30 3a 45 51 55 42 20  30 20 3a 20 45 51 55 42  | 0:EQUB 0 : EQUB|
00003a30  20 30 20 3a 20 45 51 55  42 20 30 20 3a 20 45 51  | 0 : EQUB 0 : EQ|
00003a40  55 42 20 30 3a 2e 58 56  20 45 51 55 42 20 30 20  |UB 0:.XV EQUB 0 |
00003a50  3a 20 45 51 55 42 20 30  20 3a 20 45 51 55 42 20  |: EQUB 0 : EQUB |
00003a60  35 20 3a 20 45 51 55 42  20 30 0d 2f 80 f2 45 51  |5 : EQUB 0./..EQ|
00003a70  55 42 20 30 20 3a 20 45  51 55 42 20 30 20 3a 20  |UB 0 : EQUB 0 : |
00003a80  45 51 55 42 20 30 20 3a  20 45 51 55 42 20 30 3a  |EQUB 0 : EQUB 0:|
00003a90  2e 58 57 20 45 51 55 42  20 30 20 3a 20 45 51 55  |.XW EQUB 0 : EQU|
00003aa0  42 20 30 20 3a 20 45 51  55 42 20 35 20 3a 20 45  |B 0 : EQUB 5 : E|
00003ab0  51 55 42 20 30 3a 45 51  55 42 20 30 20 3a 20 45  |QUB 0:EQUB 0 : E|
00003ac0  51 55 42 20 30 20 3a 20  45 51 55 42 20 30 20 3a  |QUB 0 : EQUB 0 :|
00003ad0  20 45 51 55 42 20 30 3a  2e 58 58 20 45 51 55 42  | EQUB 0:.XX EQUB|
00003ae0  20 30 20 3a 20 45 51 55  42 20 30 20 3a 20 45 51  | 0 : EQUB 0 : EQ|
00003af0  55 42 20 35 20 3a 20 45  51 55 42 20 30 3a 45 51  |UB 5 : EQUB 0:EQ|
00003b00  55 42 20 30 20 3a 20 45  51 55 42 20 30 20 3a 20  |UB 0 : EQUB 0 : |
00003b10  45 51 55 42 20 30 20 3a  20 45 51 55 42 20 30 3a  |EQUB 0 : EQUB 0:|
00003b20  2e 57 71 20 53 54 4d 46  44 20 28 55 59 29 21 2c  |.Wq STMFD (UY)!,|
00003b30  7b 55 5a 7d 3a 4d 4f 56  20 72 30 2c 23 33 3a 41  |{UZ}:MOV r0,#3:A|
00003b40  44 52 20 72 31 2c 58 55  3a 4c 44 52 20 72 32 2c  |DR r1,XU:LDR r2,|
00003b50  61 56 3a 4c 44 52 20 72  36 2c 57 78 0d 30 02 f7  |aV:LDR r6,Wx.0..|
00003b60  2e 61 57 20 41 44 44 20  72 33 2c 72 31 2c 72 30  |.aW ADD r3,r1,r0|
00003b70  2c 4c 53 4c 20 23 33 3a  2e 61 58 20 4c 44 52 42  |,LSL #3:.aX LDRB|
00003b80  20 72 31 31 2c 5b 72 33  2c 23 33 5d 3a 43 4d 50  | r11,[r3,#3]:CMP|
00003b90  20 72 31 31 2c 23 31 3a  42 45 51 20 61 59 3a 2e  | r11,#1:BEQ aY:.|
00003ba0  61 5a 20 4c 44 52 42 20  72 31 31 2c 5b 72 33 2c  |aZ LDRB r11,[r3,|
00003bb0  23 34 5d 3a 4c 44 52 42  20 72 31 32 2c 5b 72 33  |#4]:LDRB r12,[r3|
00003bc0  2c 23 35 5d 3a 43 4d 50  20 72 31 31 2c 23 30 3a  |,#5]:CMP r11,#0:|
00003bd0  53 55 42 47 54 20 72 31  31 2c 72 31 31 2c 23 31  |SUBGT r11,r11,#1|
00003be0  3a 53 54 52 47 54 42 20  72 31 31 2c 5b 72 33 2c  |:STRGTB r11,[r3,|
00003bf0  23 34 5d 3a 42 47 54 20  61 61 3a 2e 61 62 20 4c  |#4]:BGT aa:.ab L|
00003c00  44 52 42 20 55 5a 2c 5b  72 33 2c 23 30 5d 3a 20  |DRB UZ,[r3,#0]: |
00003c10  80 53 20 55 5a 2c 20 55  5a 2c 20 23 31 35 3a 4d  |.S UZ, UZ, #15:M|
00003c20  4f 56 4e 45 20 55 5a 2c  23 31 3a 53 54 52 4e 45  |OVNE UZ,#1:STRNE|
00003c30  42 20 55 5a 2c 5b 72 33  2c 23 34 5d 3a 42 4e 45  |B UZ,[r3,#4]:BNE|
00003c40  20 61 61 3a 4c 44 52 42  20 55 5a 2c 5b 72 33 2c  | aa:LDRB UZ,[r3,|
00003c50  23 31 5d 0d 30 b6 fa 20  80 53 20 55 5a 2c 20 55  |#1].0.. .S UZ, U|
00003c60  5a 2c 20 23 31 35 3a 4d  4f 56 4e 45 20 55 5a 2c  |Z, #15:MOVNE UZ,|
00003c70  23 31 3a 53 54 52 4e 45  42 20 55 5a 2c 5b 72 33  |#1:STRNEB UZ,[r3|
00003c80  2c 23 34 5d 3a 42 4e 45  20 61 61 3a 42 4c 20 58  |,#4]:BNE aa:BL X|
00003c90  6a 3a 20 80 20 72 31 32  2c 20 72 31 32 2c 20 23  |j: . r12, r12, #|
00003ca0  31 35 3a 4d 4f 56 20 72  31 32 2c 72 31 32 2c 4c  |15:MOV r12,r12,L|
00003cb0  53 4c 20 23 34 3a 53 54  52 42 20 72 31 32 2c 5b  |SL #4:STRB r12,[|
00003cc0  72 33 2c 23 34 5d 3a 42  4c 20 58 6a 3a 20 80 20  |r3,#4]:BL Xj: . |
00003cd0  72 31 32 2c 20 72 31 32  2c 20 23 33 3a 53 54 52  |r12, r12, #3:STR|
00003ce0  42 20 72 31 32 2c 5b 72  33 2c 23 35 5d 3a 42 20  |B r12,[r3,#5]:B |
00003cf0  61 59 3a 2e 61 61 20 4c  44 52 42 20 72 34 2c 5b  |aY:.aa LDRB r4,[|
00003d00  72 33 2c 23 30 5d 3a 4c  44 52 42 20 72 35 2c 5b  |r3,#0]:LDRB r5,[|
00003d10  72 33 2c 23 31 5d 3a 20  80 20 55 5a 2c 20 72 35  |r3,#1]: . UZ, r5|
00003d20  2c 20 23 25 31 31 31 31  30 30 30 30 3a 41 44 44  |, #%11110000:ADD|
00003d30  20 55 5a 2c 55 5a 2c 72  34 2c 4c 53 52 20 23 34  | UZ,UZ,r4,LSR #4|
00003d40  3a 41 44 44 20 55 5a 2c  72 32 2c 55 5a 0d 31 74  |:ADD UZ,r2,UZ.1t|
00003d50  f9 43 4d 50 20 72 31 32  2c 23 30 3a 4c 44 52 45  |.CMP r12,#0:LDRE|
00003d60  51 42 20 72 37 2c 5b 55  5a 2c 23 2d 31 36 5d 3a  |QB r7,[UZ,#-16]:|
00003d70  20 80 45 51 20 72 31 31  2c 20 72 35 2c 20 23 31  | .EQ r11, r5, #1|
00003d80  35 3a 43 4d 50 20 72 31  32 2c 23 31 3a 4c 44 52  |5:CMP r12,#1:LDR|
00003d90  45 51 42 20 72 37 2c 5b  55 5a 2c 23 2b 31 36 5d  |EQB r7,[UZ,#+16]|
00003da0  3a 20 80 45 51 20 72 31  31 2c 20 72 35 2c 20 23  |: .EQ r11, r5, #|
00003db0  31 35 3a 43 4d 50 20 72  31 32 2c 23 32 3a 4c 44  |15:CMP r12,#2:LD|
00003dc0  52 45 51 42 20 72 37 2c  5b 55 5a 2c 23 2d 31 5d  |REQB r7,[UZ,#-1]|
00003dd0  3a 20 80 45 51 20 72 31  31 2c 20 72 34 2c 20 23  |: .EQ r11, r4, #|
00003de0  31 35 3a 43 4d 50 20 72  31 32 2c 23 33 3a 4c 44  |15:CMP r12,#3:LD|
00003df0  52 45 51 42 20 72 37 2c  5b 55 5a 2c 23 2b 31 5d  |REQB r7,[UZ,#+1]|
00003e00  3a 20 80 45 51 20 72 31  31 2c 20 72 34 2c 20 23  |: .EQ r11, r4, #|
00003e10  31 35 3a 43 4d 50 20 72  31 31 2c 23 30 3a 42 4e  |15:CMP r11,#0:BN|
00003e20  45 20 61 63 3a 43 4d 50  20 72 37 2c 23 30 3a 43  |E ac:CMP r7,#0:C|
00003e30  4d 50 4e 45 20 72 37 2c  23 35 3a 43 4d 50 4e 45  |MPNE r7,#5:CMPNE|
00003e40  20 72 37 2c 23 36 0d 32  46 fc 43 4d 50 4e 45 20  | r7,#6.2F.CMPNE |
00003e50  72 37 2c 23 37 3a 43 4d  50 4e 45 20 72 37 2c 23  |r7,#7:CMPNE r7,#|
00003e60  38 3a 4d 4f 56 4e 45 20  72 31 31 2c 23 30 3a 53  |8:MOVNE r11,#0:S|
00003e70  54 52 4e 45 42 20 72 31  31 2c 5b 72 33 2c 23 34  |TRNEB r11,[r3,#4|
00003e80  5d 3a 42 4e 45 20 61 59  3a 2e 61 63 20 43 4d 50  |]:BNE aY:.ac CMP|
00003e90  20 72 31 32 2c 23 30 3a  53 55 42 45 51 20 72 35  | r12,#0:SUBEQ r5|
00003ea0  2c 72 35 2c 72 36 3a 43  4d 50 20 72 31 32 2c 23  |,r5,r6:CMP r12,#|
00003eb0  31 3a 41 44 44 45 51 20  72 35 2c 72 35 2c 72 36  |1:ADDEQ r5,r5,r6|
00003ec0  3a 43 4d 50 20 72 31 32  2c 23 32 3a 53 55 42 45  |:CMP r12,#2:SUBE|
00003ed0  51 20 72 34 2c 72 34 2c  72 36 3a 43 4d 50 20 72  |Q r4,r4,r6:CMP r|
00003ee0  31 32 2c 23 33 3a 41 44  44 45 51 20 72 34 2c 72  |12,#3:ADDEQ r4,r|
00003ef0  34 2c 72 36 3a 2e 61 64  20 53 54 52 42 20 72 34  |4,r6:.ad STRB r4|
00003f00  2c 5b 72 33 2c 23 30 5d  3a 53 54 52 42 20 72 35  |,[r3,#0]:STRB r5|
00003f10  2c 5b 72 33 2c 23 31 5d  3a 2e 61 59 20 53 55 42  |,[r3,#1]:.aY SUB|
00003f20  53 20 72 30 2c 72 30 2c  23 31 3a 42 47 45 20 61  |S r0,r0,#1:BGE a|
00003f30  57 3a 4c 44 4d 46 44 20  28 55 59 29 21 2c 7b 50  |W:LDMFD (UY)!,{P|
00003f40  43 7d 0d 33 2c fa 2e 61  56 20 45 51 55 44 20 58  |C}.3,..aV EQUD X|
00003f50  6f 3a 2e 56 70 20 53 54  4d 46 44 20 28 55 59 29  |o:.Vp STMFD (UY)|
00003f60  21 2c 7b 55 5a 7d 3a 2e  61 65 20 4c 44 52 20 72  |!,{UZ}:.ae LDR r|
00003f70  30 2c 55 75 3a 41 44 52  20 72 31 2c 61 66 3a 4c  |0,Uu:ADR r1,af:L|
00003f80  44 52 20 72 32 2c 56 67  3a 41 44 44 20 72 32 2c  |DR r2,Vg:ADD r2,|
00003f90  72 32 2c 23 97 22 30 22  3a 53 54 52 42 20 72 32  |r2,#."0":STRB r2|
00003fa0  2c 5b 72 31 5d 3a 4d 4f  56 20 72 32 2c 23 36 3a  |,[r1]:MOV r2,#6:|
00003fb0  4d 4f 56 20 72 33 2c 23  33 36 2a 34 3a 4d 4f 56  |MOV r3,#36*4:MOV|
00003fc0  20 72 34 2c 23 31 30 2a  38 2d 35 3a 42 4c 20 57  | r4,#10*8-5:BL W|
00003fd0  6e 3a 2e 61 67 20 4c 44  52 20 72 30 2c 55 75 3a  |n:.ag LDR r0,Uu:|
00003fe0  41 44 52 20 72 31 2c 61  68 3a 4c 44 52 20 72 32  |ADR r1,ah:LDR r2|
00003ff0  2c 56 71 3a 43 4d 50 20  72 32 2c 23 31 30 3a 4d  |,Vq:CMP r2,#10:M|
00004000  4f 56 47 45 20 72 33 2c  23 97 22 31 22 3a 53 55  |OVGE r3,#."1":SU|
00004010  42 47 45 20 72 32 2c 72  32 2c 23 31 30 3a 4d 4f  |BGE r2,r2,#10:MO|
00004020  56 4c 54 20 72 33 2c 23  97 22 20 22 3a 53 54 52  |VLT r3,#." ":STR|
00004030  42 20 72 33 2c 5b 72 31  2c 23 30 5d 0d 33 fe eb  |B r3,[r1,#0].3..|
00004040  41 44 44 20 72 32 2c 72  32 2c 23 97 22 30 22 3a  |ADD r2,r2,#."0":|
00004050  53 54 52 42 20 72 32 2c  5b 72 31 2c 23 31 5d 3a  |STRB r2,[r1,#1]:|
00004060  4d 4f 56 20 72 32 2c 23  32 3a 4d 4f 56 20 72 33  |MOV r2,#2:MOV r3|
00004070  2c 23 33 35 2a 34 3a 4d  4f 56 20 72 34 2c 23 31  |,#35*4:MOV r4,#1|
00004080  35 2a 38 3a 42 4c 20 57  6e 3a 2e 61 69 20 4c 44  |5*8:BL Wn:.ai LD|
00004090  52 20 72 30 2c 56 72 3a  41 44 52 20 72 31 2c 61  |R r0,Vr:ADR r1,a|
000040a0  6a 3a 4d 4f 56 20 72 32  2c 23 38 3a 53 57 49 20  |j:MOV r2,#8:SWI |
000040b0  22 4f 53 5f 43 6f 6e 76  65 72 74 49 6e 74 65 67  |"OS_ConvertInteg|
000040c0  65 72 34 22 3a 4d 4f 56  20 72 33 2c 23 33 31 2a  |er4":MOV r3,#31*|
000040d0  34 3a 41 44 44 20 72 33  2c 72 33 2c 72 32 2c 4c  |4:ADD r3,r3,r2,L|
000040e0  53 4c 20 23 32 3a 4d 4f  56 20 72 34 2c 23 32 31  |SL #2:MOV r4,#21|
000040f0  2a 38 3a 4c 44 52 20 72  30 2c 55 75 3a 41 44 52  |*8:LDR r0,Uu:ADR|
00004100  20 72 31 2c 61 6a 3a 4d  4f 56 20 72 32 2c 23 37  | r1,aj:MOV r2,#7|
00004110  3a 42 4c 20 57 6e 3a 4c  44 4d 46 44 20 28 55 59  |:BL Wn:LDMFD (UY|
00004120  29 21 2c 7b 50 43 7d 0d  34 c6 e6 2e 61 66 20 45  |)!,{PC}.4...af E|
00004130  51 55 53 20 22 3f 22 3a  20 45 51 55 42 20 30 20  |QUS "?": EQUB 0 |
00004140  3a 20 41 4c 49 47 4e 3a  2e 61 68 20 45 51 55 53  |: ALIGN:.ah EQUS|
00004150  20 22 3f 3f 22 3a 20 45  51 55 42 20 30 20 3a 20  | "??": EQUB 0 : |
00004160  41 4c 49 47 4e 3a 2e 61  6a 20 45 51 55 53 20 22  |ALIGN:.aj EQUS "|
00004170  3f 3f 3f 3f 3f 3f 3f 3f  22 3a 20 45 51 55 42 20  |????????": EQUB |
00004180  30 20 3a 20 41 4c 49 47  4e 3a 2e 55 76 20 4c 44  |0 : ALIGN:.Uv LD|
00004190  52 42 20 72 34 2c 5b 72  30 5d 2c 23 31 3a 4c 44  |RB r4,[r0],#1:LD|
000041a0  52 42 20 72 35 2c 5b 72  30 5d 2c 23 31 3a 53 55  |RB r5,[r0],#1:SU|
000041b0  42 53 20 72 32 2c 72 32  2c 72 35 3a 4d 4f 56 4c  |BS r2,r2,r5:MOVL|
000041c0  54 20 50 43 2c 55 5a 3a  2e 61 6b 20 53 54 52 42  |T PC,UZ:.ak STRB|
000041d0  20 72 34 2c 5b 72 31 5d  2c 23 31 3a 53 55 42 53  | r4,[r1],#1:SUBS|
000041e0  20 72 35 2c 72 35 2c 23  31 3a 42 47 54 20 61 6b  | r5,r5,#1:BGT ak|
000041f0  3a 42 20 55 76 3a 2e 55  64 20 41 44 52 20 72 30  |:B Uv:.Ud ADR r0|
00004200  2c 61 6c 3a 41 44 52 20  72 31 2c 55 75 0d 35 a2  |,al:ADR r1,Uu.5.|
00004210  f7 53 57 49 20 22 4f 53  5f 52 65 61 64 56 64 75  |.SWI "OS_ReadVdu|
00004220  56 61 72 69 61 62 6c 65  73 22 3a 4d 4f 56 20 50  |Variables":MOV P|
00004230  43 2c 55 5a 3a 2e 61 6c  20 44 43 44 20 31 34 39  |C,UZ:.al DCD 149|
00004240  3a 44 43 44 20 2d 31 3a  2e 55 75 20 44 43 44 20  |:DCD -1:.Uu DCD |
00004250  30 3a 2e 57 6e 20 53 54  4d 46 44 20 28 55 59 29  |0:.Wn STMFD (UY)|
00004260  21 2c 7b 55 5a 7d 3a 41  44 44 20 72 35 2c 72 33  |!,{UZ}:ADD r5,r3|
00004270  2c 72 34 2c 41 53 4c 20  23 37 3a 41 44 44 20 72  |,r4,ASL #7:ADD r|
00004280  35 2c 72 35 2c 72 34 2c  41 53 4c 20 23 35 3a 41  |5,r5,r4,ASL #5:A|
00004290  44 52 20 72 36 2c 61 6d  3a 4c 44 52 20 55 5a 2c  |DR r6,am:LDR UZ,|
000042a0  5b 72 36 2c 72 32 2c 41  53 4c 20 23 32 5d 3a 4c  |[r6,r2,ASL #2]:L|
000042b0  44 52 20 72 32 2c 61 6e  3a 41 44 44 20 72 30 2c  |DR r2,an:ADD r0,|
000042c0  72 30 2c 72 35 3a 2e 61  6f 20 4c 44 52 42 20 72  |r0,r5:.ao LDRB r|
000042d0  33 2c 5b 72 31 5d 2c 23  31 3a 43 4d 50 20 72 33  |3,[r1],#1:CMP r3|
000042e0  2c 23 30 3a 4c 44 4d 45  51 46 44 20 28 55 59 29  |,#0:LDMEQFD (UY)|
000042f0  21 2c 7b 50 43 7d 3a 53  55 42 20 72 33 2c 72 33  |!,{PC}:SUB r3,r3|
00004300  2c 23 33 32 0d 36 6a f0  41 44 44 20 72 34 2c 72  |,#32.6j.ADD r4,r|
00004310  32 2c 72 33 2c 41 53 4c  20 23 35 3a 2e 61 70 20  |2,r3,ASL #5:.ap |
00004320  4c 44 4d 49 41 20 72 34  21 2c 7b 72 35 2d 72 31  |LDMIA r4!,{r5-r1|
00004330  32 7d 3a 20 80 20 72 35  2c 20 72 35 2c 20 55 5a  |2}: . r5, r5, UZ|
00004340  3a 20 80 20 72 36 2c 20  72 36 2c 20 55 5a 3a 20  |: . r6, r6, UZ: |
00004350  80 20 72 37 2c 20 72 37  2c 20 55 5a 3a 20 80 20  |. r7, r7, UZ: . |
00004360  72 38 2c 20 72 38 2c 20  55 5a 3a 20 80 20 72 39  |r8, r8, UZ: . r9|
00004370  2c 20 72 39 2c 20 55 5a  3a 20 80 20 72 31 30 2c  |, r9, UZ: . r10,|
00004380  20 72 31 30 2c 20 55 5a  3a 20 80 20 72 31 31 2c  | r10, UZ: . r11,|
00004390  20 72 31 31 2c 20 55 5a  3a 20 80 20 72 31 32 2c  | r11, UZ: . r12,|
000043a0  20 72 31 32 2c 20 55 5a  3a 53 54 52 20 72 35 2c  | r12, UZ:STR r5,|
000043b0  5b 72 30 2c 23 30 2a 31  36 30 5d 3a 53 54 52 20  |[r0,#0*160]:STR |
000043c0  72 36 2c 5b 72 30 2c 23  31 2a 31 36 30 5d 3a 53  |r6,[r0,#1*160]:S|
000043d0  54 52 20 72 37 2c 5b 72  30 2c 23 32 2a 31 36 30  |TR r7,[r0,#2*160|
000043e0  5d 3a 53 54 52 20 72 38  2c 5b 72 30 2c 23 33 2a  |]:STR r8,[r0,#3*|
000043f0  31 36 30 5d 0d 36 f6 f6  53 54 52 20 72 39 2c 5b  |160].6..STR r9,[|
00004400  72 30 2c 23 34 2a 31 36  30 5d 3a 53 54 52 20 72  |r0,#4*160]:STR r|
00004410  31 30 2c 5b 72 30 2c 23  35 2a 31 36 30 5d 3a 53  |10,[r0,#5*160]:S|
00004420  54 52 20 72 31 31 2c 5b  72 30 2c 23 36 2a 31 36  |TR r11,[r0,#6*16|
00004430  30 5d 3a 53 54 52 20 72  31 32 2c 5b 72 30 2c 23  |0]:STR r12,[r0,#|
00004440  37 2a 31 36 30 5d 3a 41  44 44 20 72 30 2c 72 30  |7*160]:ADD r0,r0|
00004450  2c 23 34 3a 42 41 4c 20  61 6f 3a 2e 61 6e 20 45  |,#4:BAL ao:.an E|
00004460  51 55 44 20 61 71 3a 2e  61 6d 20 45 51 55 44 20  |QUD aq:.am EQUD |
00004470  26 30 30 30 30 30 30 30  30 20 3a 20 45 51 55 44  |&00000000 : EQUD|
00004480  20 26 31 31 31 31 31 31  31 31 3a 45 51 55 44 20  | &11111111:EQUD |
00004490  26 32 32 32 32 32 32 32  32 20 3a 20 45 51 55 44  |&22222222 : EQUD|
000044a0  20 26 33 33 33 33 33 33  33 33 3a 45 51 55 44 20  | &33333333:EQUD |
000044b0  26 34 34 34 34 34 34 34  34 20 3a 20 45 51 55 44  |&44444444 : EQUD|
000044c0  20 26 35 35 35 35 35 35  35 35 3a 45 51 55 44 20  | &55555555:EQUD |
000044d0  26 36 36 36 36 36 36 36  36 20 3a 20 45 51 55 44  |&66666666 : EQUD|
000044e0  20 26 37 37 37 37 37 37  37 37 0d 37 78 f8 45 51  | &77777777.7x.EQ|
000044f0  55 44 20 26 38 38 38 38  38 38 38 38 20 3a 20 45  |UD &88888888 : E|
00004500  51 55 44 20 26 39 39 39  39 39 39 39 39 3a 45 51  |QUD &99999999:EQ|
00004510  55 44 20 26 41 41 41 41  41 41 41 41 20 3a 20 45  |UD &AAAAAAAA : E|
00004520  51 55 44 20 26 42 42 42  42 42 42 42 42 3a 45 51  |QUD &BBBBBBBB:EQ|
00004530  55 44 20 26 43 43 43 43  43 43 43 43 20 3a 20 45  |UD &CCCCCCCC : E|
00004540  51 55 44 20 26 44 44 44  44 44 44 44 44 3a 45 51  |QUD &DDDDDDDD:EQ|
00004550  55 44 20 26 45 45 45 45  45 45 45 45 20 3a 20 45  |UD &EEEEEEEE : E|
00004560  51 55 44 20 26 46 46 46  46 46 46 46 46 3a 2e 61  |QUD &FFFFFFFF:.a|
00004570  72 20 45 51 55 44 20 58  63 3a 2e 57 76 20 4c 44  |r EQUD Xc:.Wv LD|
00004580  52 20 72 30 2c 55 75 3a  4c 44 52 20 72 31 2c 61  |R r0,Uu:LDR r1,a|
00004590  72 3a 41 44 44 20 72 31  2c 72 31 2c 23 31 36 2a  |r:ADD r1,r1,#16*|
000045a0  31 36 3a 4c 44 52 20 72  32 2c 56 71 3a 53 55 42  |16:LDR r2,Vq:SUB|
000045b0  20 72 32 2c 72 32 2c 23  31 3a 41 44 44 20 72 31  | r2,r2,#1:ADD r1|
000045c0  2c 72 31 2c 72 32 2c 4c  53 4c 20 23 38 3a 4c 44  |,r1,r2,LSL #8:LD|
000045d0  52 20 72 32 2c 61 73 3a  4c 44 52 20 72 31 31 2c  |R r2,as:LDR r11,|
000045e0  61 74 0d 38 0e f2 4d 4f  56 20 72 33 2c 23 31 36  |at.8..MOV r3,#16|
000045f0  3a 2e 61 75 20 4d 4f 56  20 72 34 2c 23 31 36 3a  |:.au MOV r4,#16:|
00004600  4d 4f 56 20 72 35 2c 72  30 3a 2e 61 76 20 4c 44  |MOV r5,r0:.av LD|
00004610  52 42 20 72 36 2c 5b 72  31 5d 2c 23 31 3a 53 54  |RB r6,[r1],#1:ST|
00004620  52 42 20 72 36 2c 5b 72  31 31 5d 2c 23 31 3a 41  |RB r6,[r11],#1:A|
00004630  44 44 20 72 37 2c 72 32  2c 72 36 2c 4c 53 4c 20  |DD r7,r2,r6,LSL |
00004640  23 37 3a 4d 4f 56 20 72  38 2c 23 31 36 3a 2e 61  |#7:MOV r8,#16:.a|
00004650  77 20 4c 44 4d 49 41 20  72 37 21 2c 7b 72 39 2d  |w LDMIA r7!,{r9-|
00004660  72 31 30 7d 3a 53 54 4d  49 41 20 72 35 21 2c 7b  |r10}:STMIA r5!,{|
00004670  72 39 2d 72 31 30 7d 3a  41 44 44 20 72 35 2c 72  |r9-r10}:ADD r5,r|
00004680  35 2c 23 31 36 30 2d 38  3a 53 55 42 53 20 72 38  |5,#160-8:SUBS r8|
00004690  2c 72 38 2c 23 31 3a 42  4e 45 20 61 77 3a 53 55  |,r8,#1:BNE aw:SU|
000046a0  42 20 72 35 2c 72 35 2c  23 28 32 2a 38 29 2a 31  |B r5,r5,#(2*8)*1|
000046b0  36 30 3a 41 44 44 20 72  35 2c 72 35 2c 23 38 3a  |60:ADD r5,r5,#8:|
000046c0  53 55 42 53 20 72 34 2c  72 34 2c 23 31 3a 42 4e  |SUBS r4,r4,#1:BN|
000046d0  45 20 61 76 0d 38 ae f8  41 44 44 20 72 30 2c 72  |E av.8..ADD r0,r|
000046e0  30 2c 23 28 32 2a 38 29  2a 31 36 30 3a 53 55 42  |0,#(2*8)*160:SUB|
000046f0  53 20 72 33 2c 72 33 2c  23 31 3a 42 4e 45 20 61  |S r3,r3,#1:BNE a|
00004700  75 3a 4d 4f 56 20 50 43  2c 55 5a 3a 2e 61 73 20  |u:MOV PC,UZ:.as |
00004710  45 51 55 44 20 57 56 3a  2e 61 74 20 45 51 55 44  |EQUD WV:.at EQUD|
00004720  20 58 6f 3a 2e 57 67 20  41 44 44 20 72 33 2c 72  | Xo:.Wg ADD r3,r|
00004730  34 2c 72 33 2c 4c 53 4c  20 23 37 3a 2e 61 78 20  |4,r3,LSL #7:.ax |
00004740  41 44 44 20 72 30 2c 72  30 2c 72 32 2c 4c 53 4c  |ADD r0,r0,r2,LSL|
00004750  20 23 37 3a 41 44 44 20  72 30 2c 72 30 2c 72 32  | #7:ADD r0,r0,r2|
00004760  2c 4c 53 4c 20 23 35 3a  4d 4f 56 20 72 32 2c 72  |,LSL #5:MOV r2,r|
00004770  31 2c 4c 53 52 20 23 33  3a 41 44 44 20 72 30 2c  |1,LSR #3:ADD r0,|
00004780  72 30 2c 72 32 2c 4c 53  4c 20 23 32 3a 20 80 20  |r0,r2,LSL #2: . |
00004790  72 31 2c 20 72 31 2c 20  23 37 3a 4d 4f 56 20 72  |r1, r1, #7:MOV r|
000047a0  31 2c 72 31 2c 4c 53 4c  20 23 32 3a 4d 4f 56 20  |1,r1,LSL #2:MOV |
000047b0  72 32 2c 23 31 36 3a 2e  61 79 20 4c 44 4d 49 41  |r2,#16:.ay LDMIA|
000047c0  20 72 33 21 2c 7b 72 37  2c 72 38 7d 0d 39 6c f9  | r3!,{r7,r8}.9l.|
000047d0  4d 4f 56 20 72 39 2c 23  26 30 30 30 30 30 30 30  |MOV r9,#&0000000|
000047e0  30 3a 2e 61 7a 20 43 4d  50 20 72 31 2c 23 30 3a  |0:.az CMP r1,#0:|
000047f0  42 45 51 20 62 55 3a 2e  62 56 20 52 53 42 20 72  |BEQ bU:.bV RSB r|
00004800  34 2c 72 31 2c 23 33 32  3a 4d 4f 56 20 72 39 2c  |4,r1,#32:MOV r9,|
00004810  72 38 2c 4c 53 52 20 72  34 3a 4d 4f 56 20 72 38  |r8,LSR r4:MOV r8|
00004820  2c 72 38 2c 4c 53 4c 20  72 31 3a 20 84 52 20 72  |,r8,LSL r1: .R r|
00004830  38 2c 72 38 2c 72 37 2c  4c 53 52 20 72 34 3a 4d  |8,r8,r7,LSR r4:M|
00004840  4f 56 20 72 37 2c 72 37  2c 4c 53 4c 20 72 31 3a  |OV r7,r7,LSL r1:|
00004850  2e 62 55 20 43 4d 50 20  72 31 2c 23 30 3a 53 54  |.bU CMP r1,#0:ST|
00004860  4d 45 51 49 41 20 72 30  21 2c 7b 72 37 2d 72 38  |MEQIA r0!,{r7-r8|
00004870  7d 3a 41 44 44 45 51 20  72 30 2c 72 30 2c 23 34  |}:ADDEQ r0,r0,#4|
00004880  3a 53 54 4d 4e 45 49 41  20 72 30 21 2c 7b 72 37  |:STMNEIA r0!,{r7|
00004890  2d 72 39 7d 3a 2e 62 57  20 41 44 44 20 72 30 2c  |-r9}:.bW ADD r0,|
000048a0  72 30 2c 23 31 36 30 2d  28 31 36 2f 32 29 2d 34  |r0,#160-(16/2)-4|
000048b0  3a 53 55 42 53 20 72 32  2c 72 32 2c 23 31 3a 42  |:SUBS r2,r2,#1:B|
000048c0  4e 45 20 61 79 0d 3a 02  ff 4d 4f 56 20 50 43 2c  |NE ay.:..MOV PC,|
000048d0  55 5a 3a 2e 58 6f 20 a4  62 58 28 31 36 2a 31 36  |UZ:.Xo .bX(16*16|
000048e0  29 3a 2e 57 6d 20 45 51  55 53 c4 36 34 2c bd 30  |):.Wm EQUS.64,.0|
000048f0  29 3a 2e 62 59 20 45 51  55 44 20 62 5a 3a 2e 57  |):.bY EQUD bZ:.W|
00004900  55 20 4c 44 52 20 72 33  2c 62 59 3a 2e 62 61 20  |U LDR r3,bY:.ba |
00004910  41 44 44 20 72 30 2c 72  30 2c 72 32 2c 4c 53 4c  |ADD r0,r0,r2,LSL|
00004920  20 23 37 3a 41 44 44 20  72 30 2c 72 30 2c 72 32  | #7:ADD r0,r0,r2|
00004930  2c 4c 53 4c 20 23 35 3a  4d 4f 56 20 72 32 2c 72  |,LSL #5:MOV r2,r|
00004940  31 2c 4c 53 52 20 23 33  3a 41 44 44 20 72 30 2c  |1,LSR #3:ADD r0,|
00004950  72 30 2c 72 32 2c 4c 53  4c 20 23 32 3a 20 80 20  |r0,r2,LSL #2: . |
00004960  72 31 2c 20 72 31 2c 20  23 37 3a 4d 4f 56 20 72  |r1, r1, #7:MOV r|
00004970  31 2c 72 31 2c 4c 53 4c  20 23 32 3a 4d 4f 56 20  |1,r1,LSL #2:MOV |
00004980  72 32 2c 23 31 36 3a 2e  62 62 20 4c 44 4d 49 41  |r2,#16:.bb LDMIA|
00004990  20 72 33 21 2c 7b 72 37  2c 72 38 2c 72 31 30 2c  | r3!,{r7,r8,r10,|
000049a0  72 31 31 7d 3a 2e 62 63  20 43 4d 50 20 72 31 2c  |r11}:.bc CMP r1,|
000049b0  23 30 3a 4d 4f 56 20 72  39 2c 23 26 30 30 30 30  |#0:MOV r9,#&0000|
000049c0  30 30 30 30 0d 3a d4 f4  4d 56 4e 20 72 31 32 2c  |0000.:..MVN r12,|
000049d0  23 26 30 30 30 30 30 30  30 30 3a 42 45 51 20 62  |#&00000000:BEQ b|
000049e0  64 3a 2e 62 65 20 52 53  42 20 72 34 2c 72 31 2c  |d:.be RSB r4,r1,|
000049f0  23 33 32 3a 4d 4f 56 20  72 31 32 2c 72 31 32 2c  |#32:MOV r12,r12,|
00004a00  4c 53 4c 20 72 31 3a 20  84 52 20 72 31 32 2c 72  |LSL r1: .R r12,r|
00004a10  31 32 2c 72 31 31 2c 4c  53 52 20 72 34 3a 4d 4f  |12,r11,LSR r4:MO|
00004a20  56 20 72 31 31 2c 72 31  31 2c 4c 53 4c 20 72 31  |V r11,r11,LSL r1|
00004a30  3a 20 84 52 20 72 31 31  2c 72 31 31 2c 72 31 30  |: .R r11,r11,r10|
00004a40  2c 4c 53 52 20 72 34 3a  4d 4f 56 20 72 31 30 2c  |,LSR r4:MOV r10,|
00004a50  72 31 30 2c 4c 53 4c 20  72 31 3a 4d 56 4e 20 72  |r10,LSL r1:MVN r|
00004a60  35 2c 23 26 30 30 30 30  30 30 30 30 3a 20 84 52  |5,#&00000000: .R|
00004a70  20 72 31 30 2c 72 31 30  2c 72 35 2c 4c 53 52 20  | r10,r10,r5,LSR |
00004a80  72 34 3a 4d 4f 56 20 72  39 2c 72 38 2c 4c 53 52  |r4:MOV r9,r8,LSR|
00004a90  20 72 34 3a 4d 4f 56 20  72 38 2c 72 38 2c 4c 53  | r4:MOV r8,r8,LS|
00004aa0  4c 20 72 31 3a 20 84 52  20 72 38 2c 72 38 2c 72  |L r1: .R r8,r8,r|
00004ab0  37 2c 4c 53 52 20 72 34  0d 3b 56 f7 4d 4f 56 20  |7,LSR r4.;V.MOV |
00004ac0  72 37 2c 72 37 2c 4c 53  4c 20 72 31 3a 2e 62 64  |r7,r7,LSL r1:.bd|
00004ad0  20 4c 44 4d 49 41 20 72  30 2c 7b 72 34 2d 72 36  | LDMIA r0,{r4-r6|
00004ae0  7d 3a 20 80 20 72 34 2c  20 72 34 2c 20 72 31 30  |}: . r4, r4, r10|
00004af0  3a 20 80 20 72 35 2c 20  72 35 2c 20 72 31 31 3a  |: . r5, r5, r11:|
00004b00  20 80 20 72 36 2c 20 72  36 2c 20 72 31 32 3a 20  | . r6, r6, r12: |
00004b10  84 52 20 72 34 2c 72 34  2c 72 37 3a 20 84 52 20  |.R r4,r4,r7: .R |
00004b20  72 35 2c 72 35 2c 72 38  3a 20 84 52 20 72 36 2c  |r5,r5,r8: .R r6,|
00004b30  72 36 2c 72 39 3a 53 54  4d 49 41 20 72 30 21 2c  |r6,r9:STMIA r0!,|
00004b40  7b 72 34 2d 72 36 7d 3a  2e 62 66 20 41 44 44 20  |{r4-r6}:.bf ADD |
00004b50  72 30 2c 72 30 2c 23 31  36 30 2d 28 31 36 2f 32  |r0,r0,#160-(16/2|
00004b60  29 2d 34 3a 53 55 42 53  20 72 32 2c 72 32 2c 23  |)-4:SUBS r2,r2,#|
00004b70  31 3a 42 4e 45 20 62 62  3a 4d 4f 56 20 50 43 2c  |1:BNE bb:MOV PC,|
00004b80  55 5a 3a 2e 58 6a 20 53  54 4d 46 44 20 28 55 59  |UZ:.Xj STMFD (UY|
00004b90  29 21 2c 7b 72 31 2d 72  32 7d 3a 4c 44 52 20 72  |)!,{r1-r2}:LDR r|
00004ba0  31 32 2c 62 67 3a 4c 44  52 20 72 31 2c 62 68 0d  |12,bg:LDR r1,bh.|
00004bb0  3c 0a f6 4d 4f 56 53 20  72 32 2c 72 31 32 2c 4c  |<..MOVS r2,r12,L|
00004bc0  53 52 20 23 33 31 3a 20  82 4e 45 20 72 31 32 2c  |SR #31: .NE r12,|
00004bd0  20 72 31 32 2c 20 72 31  3a 4d 4f 56 20 72 31 32  | r12, r1:MOV r12|
00004be0  2c 72 31 32 2c 52 4f 52  20 23 33 31 3a 4d 4f 56  |,r12,ROR #31:MOV|
00004bf0  53 20 72 32 2c 72 31 32  2c 4c 53 52 20 23 33 31  |S r2,r12,LSR #31|
00004c00  3a 20 82 4e 45 20 72 31  32 2c 20 72 31 32 2c 20  |: .NE r12, r12, |
00004c10  72 31 3a 4d 4f 56 20 72  31 32 2c 72 31 32 2c 52  |r1:MOV r12,r12,R|
00004c20  4f 52 20 23 33 31 3a 4d  4f 56 53 20 72 32 2c 72  |OR #31:MOVS r2,r|
00004c30  31 32 2c 4c 53 52 20 23  33 31 3a 20 82 4e 45 20  |12,LSR #31: .NE |
00004c40  72 31 32 2c 20 72 31 32  2c 20 72 31 3a 4d 4f 56  |r12, r12, r1:MOV|
00004c50  20 72 31 32 2c 72 31 32  2c 52 4f 52 20 23 33 31  | r12,r12,ROR #31|
00004c60  3a 4d 4f 56 53 20 72 32  2c 72 31 32 2c 4c 53 52  |:MOVS r2,r12,LSR|
00004c70  20 23 33 31 3a 20 82 4e  45 20 72 31 32 2c 20 72  | #31: .NE r12, r|
00004c80  31 32 2c 20 72 31 3a 4d  4f 56 20 72 31 32 2c 72  |12, r1:MOV r12,r|
00004c90  31 32 2c 52 4f 52 20 23  33 31 3a 53 54 52 20 72  |12,ROR #31:STR r|
00004ca0  31 32 2c 62 67 0d 3c 8c  f6 4c 44 4d 46 44 20 28  |12,bg.<..LDMFD (|
00004cb0  55 59 29 21 2c 7b 72 31  2d 72 32 7d 3a 4d 4f 56  |UY)!,{r1-r2}:MOV|
00004cc0  20 50 43 2c 55 5a 3a 2e  62 67 20 45 51 55 44 20  | PC,UZ:.bg EQUD |
00004cd0  26 38 42 32 31 39 37 43  34 3a 2e 62 68 20 45 51  |&8B2197C4:.bh EQ|
00004ce0  55 44 20 26 37 36 42 35  30 31 35 33 3a 2e 55 65  |UD &76B50153:.Ue|
00004cf0  20 53 54 4d 46 44 20 28  55 59 29 21 2c 7b 55 5a  | STMFD (UY)!,{UZ|
00004d00  7d 3a 41 44 52 20 72 31  32 2c 62 69 3a 4d 4f 56  |}:ADR r12,bi:MOV|
00004d10  20 72 31 31 2c 23 30 3a  2e 62 6a 20 4d 4f 56 20  | r11,#0:.bj MOV |
00004d20  72 30 2c 72 31 31 3a 4d  4f 56 20 72 31 2c 23 31  |r0,r11:MOV r1,#1|
00004d30  36 3a 53 57 49 20 22 4f  53 5f 52 65 61 64 50 61  |6:SWI "OS_ReadPa|
00004d40  6c 65 74 74 65 22 3a 4d  4f 56 20 72 34 2c 72 32  |lette":MOV r4,r2|
00004d50  2c 4c 53 52 20 23 32 34  3a 20 80 20 72 34 2c 20  |,LSR #24: . r4, |
00004d60  72 34 2c 20 23 26 46 46  3a 4d 4f 56 20 72 35 2c  |r4, #&FF:MOV r5,|
00004d70  72 32 2c 4c 53 52 20 23  31 36 3a 20 80 20 72 35  |r2,LSR #16: . r5|
00004d80  2c 20 72 35 2c 20 23 26  46 46 3a 4d 4f 56 20 72  |, r5, #&FF:MOV r|
00004d90  36 2c 72 32 2c 4c 53 52  20 23 38 0d 3d 4a f4 20  |6,r2,LSR #8.=J. |
00004da0  80 20 72 36 2c 20 72 36  2c 20 23 26 46 46 3a 53  |. r6, r6, #&FF:S|
00004db0  54 52 20 72 36 2c 5b 72  31 32 5d 2c 23 34 3a 53  |TR r6,[r12],#4:S|
00004dc0  54 52 20 72 35 2c 5b 72  31 32 5d 2c 23 34 3a 53  |TR r5,[r12],#4:S|
00004dd0  54 52 20 72 34 2c 5b 72  31 32 5d 2c 23 34 3a 41  |TR r4,[r12],#4:A|
00004de0  44 44 20 72 31 31 2c 72  31 31 2c 23 31 3a 43 4d  |DD r11,r11,#1:CM|
00004df0  50 20 72 31 31 2c 23 31  36 3a 42 4e 45 20 62 6a  |P r11,#16:BNE bj|
00004e00  3a 4c 44 4d 46 44 20 28  55 59 29 21 2c 7b 50 43  |:LDMFD (UY)!,{PC|
00004e10  7d 3a 2e 55 73 20 53 54  4d 46 44 20 28 55 59 29  |}:.Us STMFD (UY)|
00004e20  21 2c 7b 55 5a 7d 3a 4d  4f 56 20 72 31 2c 23 31  |!,{UZ}:MOV r1,#1|
00004e30  35 3a 2e 62 6b 20 4d 4f  56 20 72 30 2c 23 31 39  |5:.bk MOV r0,#19|
00004e40  3a 53 57 49 20 22 4f 53  5f 57 72 69 74 65 43 22  |:SWI "OS_WriteC"|
00004e50  3a 4d 4f 56 20 72 30 2c  72 31 3a 53 57 49 20 22  |:MOV r0,r1:SWI "|
00004e60  4f 53 5f 57 72 69 74 65  43 22 3a 4d 4f 56 20 72  |OS_WriteC":MOV r|
00004e70  30 2c 23 31 36 3a 53 57  49 20 22 4f 53 5f 57 72  |0,#16:SWI "OS_Wr|
00004e80  69 74 65 43 22 3a 4d 4f  56 20 72 30 2c 23 30 0d  |iteC":MOV r0,#0.|
00004e90  3e 08 f1 53 57 49 20 22  4f 53 5f 57 72 69 74 65  |>..SWI "OS_Write|
00004ea0  43 22 3a 53 57 49 20 22  4f 53 5f 57 72 69 74 65  |C":SWI "OS_Write|
*
00004ec0  43 22 3a 53 55 42 53 20  72 31 2c 72 31 2c 23 31  |C":SUBS r1,r1,#1|
00004ed0  3a 42 47 45 20 62 6b 3a  4c 44 4d 46 44 20 28 55  |:BGE bk:LDMFD (U|
00004ee0  59 29 21 2c 7b 50 43 7d  3a 2e 55 78 20 53 54 4d  |Y)!,{PC}:.Ux STM|
00004ef0  46 44 20 28 55 59 29 21  2c 7b 55 5a 7d 3a 4d 4f  |FD (UY)!,{UZ}:MO|
00004f00  56 20 72 31 31 2c 23 31  3a 2e 62 6c 20 4d 4f 56  |V r11,#1:.bl MOV|
00004f10  20 72 30 2c 23 31 39 3a  53 57 49 20 22 4f 53 5f  | r0,#19:SWI "OS_|
00004f20  42 79 74 65 22 3a 41 44  52 20 72 31 32 2c 62 69  |Byte":ADR r12,bi|
00004f30  3a 4d 4f 56 20 72 31 30  2c 23 30 3a 2e 62 6d 20  |:MOV r10,#0:.bm |
00004f40  4d 4f 56 20 72 30 2c 23  31 39 3a 53 57 49 20 22  |MOV r0,#19:SWI "|
00004f50  4f 53 5f 57 72 69 74 65  43 22 3a 4d 4f 56 20 72  |OS_WriteC":MOV r|
00004f60  30 2c 72 31 30 3a 53 57  49 20 22 4f 53 5f 57 72  |0,r10:SWI "OS_Wr|
00004f70  69 74 65 43 22 3a 4d 4f  56 20 72 30 2c 23 31 36  |iteC":MOV r0,#16|
00004f80  0d 3e c6 f0 53 57 49 20  22 4f 53 5f 57 72 69 74  |.>..SWI "OS_Writ|
00004f90  65 43 22 3a 4c 44 52 20  72 30 2c 5b 72 31 32 5d  |eC":LDR r0,[r12]|
00004fa0  2c 23 34 3a 4d 55 4c 20  72 30 2c 72 31 31 2c 72  |,#4:MUL r0,r11,r|
00004fb0  30 3a 4d 4f 56 20 72 30  2c 72 30 2c 4c 53 52 20  |0:MOV r0,r0,LSR |
00004fc0  23 34 3a 20 80 20 72 30  2c 20 72 30 2c 20 23 26  |#4: . r0, r0, #&|
00004fd0  46 46 3a 53 57 49 20 22  4f 53 5f 57 72 69 74 65  |FF:SWI "OS_Write|
00004fe0  43 22 3a 4c 44 52 20 72  30 2c 5b 72 31 32 5d 2c  |C":LDR r0,[r12],|
00004ff0  23 34 3a 4d 55 4c 20 72  30 2c 72 31 31 2c 72 30  |#4:MUL r0,r11,r0|
00005000  3a 4d 4f 56 20 72 30 2c  72 30 2c 4c 53 52 20 23  |:MOV r0,r0,LSR #|
00005010  34 3a 20 80 20 72 30 2c  20 72 30 2c 20 23 26 46  |4: . r0, r0, #&F|
00005020  46 3a 53 57 49 20 22 4f  53 5f 57 72 69 74 65 43  |F:SWI "OS_WriteC|
00005030  22 3a 4c 44 52 20 72 30  2c 5b 72 31 32 5d 2c 23  |":LDR r0,[r12],#|
00005040  34 3a 4d 55 4c 20 72 30  2c 72 31 31 2c 72 30 3a  |4:MUL r0,r11,r0:|
00005050  4d 4f 56 20 72 30 2c 72  30 2c 4c 53 52 20 23 34  |MOV r0,r0,LSR #4|
00005060  3a 20 80 20 72 30 2c 20  72 30 2c 20 23 26 46 46  |: . r0, r0, #&FF|
00005070  0d 3f 5c f8 53 57 49 20  22 4f 53 5f 57 72 69 74  |.?\.SWI "OS_Writ|
00005080  65 43 22 3a 41 44 44 20  72 31 30 2c 72 31 30 2c  |eC":ADD r10,r10,|
00005090  23 31 3a 43 4d 50 20 72  31 30 2c 23 31 36 3a 42  |#1:CMP r10,#16:B|
000050a0  4e 45 20 62 6d 3a 41 44  44 20 72 31 31 2c 72 31  |NE bm:ADD r11,r1|
000050b0  31 2c 23 31 3a 43 4d 50  20 72 31 31 2c 23 31 36  |1,#1:CMP r11,#16|
000050c0  2b 31 3a 42 4e 45 20 62  6c 3a 4c 44 4d 46 44 20  |+1:BNE bl:LDMFD |
000050d0  28 55 59 29 21 2c 7b 50  43 7d 3a 2e 56 59 20 53  |(UY)!,{PC}:.VY S|
000050e0  54 4d 46 44 20 28 55 59  29 21 2c 7b 55 5a 7d 3a  |TMFD (UY)!,{UZ}:|
000050f0  4d 4f 56 20 72 31 31 2c  23 31 35 3a 2e 62 6e 20  |MOV r11,#15:.bn |
00005100  4d 4f 56 20 72 30 2c 23  31 39 3a 53 57 49 20 22  |MOV r0,#19:SWI "|
00005110  4f 53 5f 42 79 74 65 22  3a 41 44 52 20 72 31 32  |OS_Byte":ADR r12|
00005120  2c 62 69 3a 4d 4f 56 20  72 31 30 2c 23 30 3a 2e  |,bi:MOV r10,#0:.|
00005130  62 6f 20 4d 4f 56 20 72  30 2c 23 31 39 3a 53 57  |bo MOV r0,#19:SW|
00005140  49 20 22 4f 53 5f 57 72  69 74 65 43 22 3a 4d 4f  |I "OS_WriteC":MO|
00005150  56 20 72 30 2c 72 31 30  3a 53 57 49 20 22 4f 53  |V r0,r10:SWI "OS|
00005160  5f 57 72 69 74 65 43 22  0d 40 24 fb 4d 4f 56 20  |_WriteC".@$.MOV |
00005170  72 30 2c 23 31 36 3a 53  57 49 20 22 4f 53 5f 57  |r0,#16:SWI "OS_W|
00005180  72 69 74 65 43 22 3a 4c  44 52 20 72 30 2c 5b 72  |riteC":LDR r0,[r|
00005190  31 32 5d 2c 23 34 3a 4d  55 4c 20 72 30 2c 72 31  |12],#4:MUL r0,r1|
000051a0  31 2c 72 30 3a 4d 4f 56  20 72 30 2c 72 30 2c 4c  |1,r0:MOV r0,r0,L|
000051b0  53 52 20 23 34 3a 20 80  20 72 30 2c 20 72 30 2c  |SR #4: . r0, r0,|
000051c0  20 23 26 46 46 3a 53 57  49 20 22 4f 53 5f 57 72  | #&FF:SWI "OS_Wr|
000051d0  69 74 65 43 22 3a 4c 44  52 20 72 30 2c 5b 72 31  |iteC":LDR r0,[r1|
000051e0  32 5d 2c 23 34 3a 4d 55  4c 20 72 30 2c 72 31 31  |2],#4:MUL r0,r11|
000051f0  2c 72 30 3a 4d 4f 56 20  72 30 2c 72 30 2c 4c 53  |,r0:MOV r0,r0,LS|
00005200  52 20 23 34 3a 20 80 20  72 30 2c 20 72 30 2c 20  |R #4: . r0, r0, |
00005210  23 26 46 46 3a 53 57 49  20 22 4f 53 5f 57 72 69  |#&FF:SWI "OS_Wri|
00005220  74 65 43 22 3a 4c 44 52  20 72 30 2c 5b 72 31 32  |teC":LDR r0,[r12|
00005230  5d 2c 23 34 3a 4d 55 4c  20 72 30 2c 72 31 31 2c  |],#4:MUL r0,r11,|
00005240  72 30 3a 4d 4f 56 20 72  30 2c 72 30 2c 4c 53 52  |r0:MOV r0,r0,LSR|
00005250  20 23 34 3a 20 80 20 72  30 2c 20 72 30 2c 20 23  | #4: . r0, r0, #|
00005260  26 46 46 0d 40 c4 da 53  57 49 20 22 4f 53 5f 57  |&FF.@..SWI "OS_W|
00005270  72 69 74 65 43 22 3a 41  44 44 20 72 31 30 2c 72  |riteC":ADD r10,r|
00005280  31 30 2c 23 31 3a 43 4d  50 20 72 31 30 2c 23 31  |10,#1:CMP r10,#1|
00005290  36 3a 42 4e 45 20 62 6f  3a 53 55 42 53 20 72 31  |6:BNE bo:SUBS r1|
000052a0  31 2c 72 31 31 2c 23 31  3a 42 47 45 20 62 6e 3a  |1,r11,#1:BGE bn:|
000052b0  4c 44 4d 46 44 20 28 55  59 29 21 2c 7b 50 43 7d  |LDMFD (UY)!,{PC}|
000052c0  3a 2e 62 69 20 a4 62 58  28 28 31 36 2a 33 29 2a  |:.bi .bX((16*3)*|
000052d0  34 29 3a 2e 56 6e 20 53  54 4d 46 44 20 28 55 59  |4):.Vn STMFD (UY|
000052e0  29 21 2c 7b 55 5a 7d 3a  4c 44 52 20 72 30 2c 62  |)!,{UZ}:LDR r0,b|
000052f0  70 3a 4c 44 52 20 72 30  2c 5b 72 30 5d 3a 4d 4f  |p:LDR r0,[r0]:MO|
00005300  56 20 72 31 2c 23 32 35  35 3a 4d 4f 56 20 72 32  |V r1,#255:MOV r2|
00005310  2c 23 30 30 30 3a 4d 4f  56 20 72 35 2c 23 30 3a  |,#000:MOV r5,#0:|
00005320  4d 4f 56 20 72 36 2c 23  30 3a 4d 4f 56 20 72 37  |MOV r6,#0:MOV r7|
00005330  2c 23 30 3a 4d 4f 56 20  72 38 2c 23 30 0d 41 78  |,#0:MOV r8,#0.Ax|
00005340  f7 4d 4f 56 20 72 39 2c  23 30 3a 4d 4f 56 20 72  |.MOV r9,#0:MOV r|
00005350  31 30 2c 23 30 3a 4d 4f  56 20 72 31 31 2c 23 30  |10,#0:MOV r11,#0|
00005360  3a 4d 4f 56 20 72 31 32  2c 23 30 3a 2e 62 71 20  |:MOV r12,#0:.bq |
00005370  53 54 4d 46 44 20 28 55  59 29 21 2c 7b 72 30 2d  |STMFD (UY)!,{r0-|
00005380  72 32 7d 3a 4d 4f 56 20  72 30 2c 23 31 39 3a 53  |r2}:MOV r0,#19:S|
00005390  57 49 20 22 4f 53 5f 42  79 74 65 22 3a 4c 44 4d  |WI "OS_Byte":LDM|
000053a0  46 44 20 28 55 59 29 21  2c 7b 72 30 2d 72 32 7d  |FD (UY)!,{r0-r2}|
000053b0  3a 4d 4f 56 20 55 5a 2c  23 32 3a 2e 62 72 20 41  |:MOV UZ,#2:.br A|
000053c0  44 44 20 72 33 2c 72 30  2c 72 31 2c 4c 53 4c 20  |DD r3,r0,r1,LSL |
000053d0  23 37 3a 41 44 44 20 72  33 2c 72 33 2c 72 31 2c  |#7:ADD r3,r3,r1,|
000053e0  4c 53 4c 20 23 35 3a 41  44 44 20 72 34 2c 72 30  |LSL #5:ADD r4,r0|
000053f0  2c 72 32 2c 4c 53 4c 20  23 37 3a 41 44 44 20 72  |,r2,LSL #7:ADD r|
00005400  34 2c 72 34 2c 72 32 2c  4c 53 4c 20 23 35 3a 53  |4,r4,r2,LSL #5:S|
00005410  54 4d 49 41 20 72 33 21  2c 7b 72 35 2d 72 31 32  |TMIA r3!,{r5-r12|
00005420  7d 3a 53 54 4d 49 41 20  72 33 21 2c 7b 72 35 2d  |}:STMIA r3!,{r5-|
00005430  72 31 32 7d 0d 41 f0 fb  53 54 4d 49 41 20 72 33  |r12}.A..STMIA r3|
00005440  21 2c 7b 72 35 2d 72 31  32 7d 3a 53 54 4d 49 41  |!,{r5-r12}:STMIA|
00005450  20 72 33 21 2c 7b 72 35  2d 72 31 32 7d 3a 53 54  | r3!,{r5-r12}:ST|
00005460  4d 49 41 20 72 34 21 2c  7b 72 35 2d 72 31 32 7d  |MIA r4!,{r5-r12}|
00005470  3a 53 54 4d 49 41 20 72  34 21 2c 7b 72 35 2d 72  |:STMIA r4!,{r5-r|
00005480  31 32 7d 3a 53 54 4d 49  41 20 72 34 21 2c 7b 72  |12}:STMIA r4!,{r|
00005490  35 2d 72 31 32 7d 3a 53  54 4d 49 41 20 72 34 21  |5-r12}:STMIA r4!|
000054a0  2c 7b 72 35 2d 72 31 32  7d 3a 41 44 44 20 72 32  |,{r5-r12}:ADD r2|
000054b0  2c 72 32 2c 23 32 3a 53  55 42 20 72 31 2c 72 31  |,r2,#2:SUB r1,r1|
000054c0  2c 23 32 3a 53 55 42 53  20 55 5a 2c 55 5a 2c 23  |,#2:SUBS UZ,UZ,#|
000054d0  31 3a 42 4e 45 20 62 72  3a 43 4d 50 20 72 31 2c  |1:BNE br:CMP r1,|
000054e0  23 30 3a 42 47 45 20 62  71 3a 4c 44 4d 46 44 20  |#0:BGE bq:LDMFD |
000054f0  28 55 59 29 21 2c 7b 50  43 7d 3a 2e 62 70 20 45  |(UY)!,{PC}:.bp E|
00005500  51 55 44 20 55 75 3a 2e  56 55 20 53 54 4d 46 44  |QUD Uu:.VU STMFD|
00005510  20 28 55 59 29 21 2c 7b  55 5a 7d 3a 42 4c 20 62  | (UY)!,{UZ}:BL b|
00005520  73 3a 2e 62 74 20 4c 44  52 20 72 30 2c 62 75 0d  |s:.bt LDR r0,bu.|
00005530  42 c2 ef 4c 44 52 20 72  30 2c 5b 72 30 5d 3a 41  |B..LDR r0,[r0]:A|
00005540  44 52 20 72 31 2c 56 61  3a 4d 4f 56 20 72 32 2c  |DR r1,Va:MOV r2,|
00005550  23 37 3a 53 57 49 20 22  4f 53 5f 43 6f 6e 76 65  |#7:SWI "OS_Conve|
00005560  72 74 49 6e 74 65 67 65  72 34 22 3a 4c 44 4d 46  |rtInteger4":LDMF|
00005570  44 20 28 55 59 29 21 2c  7b 50 43 7d 3a 2e 62 73  |D (UY)!,{PC}:.bs|
00005580  20 53 54 4d 46 44 20 28  55 59 29 21 2c 7b 55 5a  | STMFD (UY)!,{UZ|
00005590  7d 3a 41 44 52 20 72 31  32 2c 62 76 3a 4d 4f 56  |}:ADR r12,bv:MOV|
000055a0  20 72 31 31 2c 23 30 3a  4c 44 52 20 72 31 30 2c  | r11,#0:LDR r10,|
000055b0  62 75 3a 4c 44 52 20 72  31 30 2c 5b 72 31 30 5d  |bu:LDR r10,[r10]|
000055c0  3a 2e 62 77 20 4d 4f 56  20 72 30 2c 23 30 3a 41  |:.bw MOV r0,#0:A|
000055d0  44 44 20 72 31 2c 72 31  32 2c 23 31 36 3a 53 57  |DD r1,r12,#16:SW|
000055e0  49 20 22 4f 53 5f 52 65  61 64 55 6e 73 69 67 6e  |I "OS_ReadUnsign|
000055f0  65 64 22 3a 43 4d 50 20  72 31 30 2c 72 32 3a 53  |ed":CMP r10,r2:S|
00005600  54 52 47 45 20 72 31 31  2c 56 56 3a 4c 44 4d 47  |TRGE r11,VV:LDMG|
00005610  45 46 44 20 28 55 59 29  21 2c 7b 50 43 7d 0d 43  |EFD (UY)!,{PC}.C|
00005620  76 f8 2e 62 78 20 41 44  44 20 72 31 32 2c 72 31  |v..bx ADD r12,r1|
00005630  32 2c 23 32 34 3a 41 44  44 20 72 31 31 2c 72 31  |2,#24:ADD r11,r1|
00005640  31 2c 23 31 3a 43 4d 50  20 72 31 31 2c 23 38 3a  |1,#1:CMP r11,#8:|
00005650  42 4e 45 20 62 77 3a 4d  4f 56 20 72 30 2c 23 39  |BNE bw:MOV r0,#9|
00005660  39 3a 53 54 52 20 72 30  2c 56 56 3a 4c 44 4d 46  |9:STR r0,VV:LDMF|
00005670  44 20 28 55 59 29 21 2c  7b 50 43 7d 3a 2e 56 57  |D (UY)!,{PC}:.VW|
00005680  20 53 54 4d 46 44 20 28  55 59 29 21 2c 7b 55 5a  | STMFD (UY)!,{UZ|
00005690  7d 3a 41 44 52 20 72 31  32 2c 62 76 3a 4c 44 52  |}:ADR r12,bv:LDR|
000056a0  20 72 31 31 2c 56 56 3a  41 44 44 20 72 31 30 2c  | r11,VV:ADD r10,|
000056b0  72 31 32 2c 72 31 31 2c  41 53 4c 20 23 34 3a 41  |r12,r11,ASL #4:A|
000056c0  44 44 20 72 31 30 2c 72  31 30 2c 72 31 31 2c 41  |DD r10,r10,r11,A|
000056d0  53 4c 20 23 33 3a 53 55  42 20 72 31 30 2c 72 31  |SL #3:SUB r10,r1|
000056e0  30 2c 23 32 34 3a 41 44  44 20 72 39 2c 72 31 32  |0,#24:ADD r9,r12|
000056f0  2c 23 37 2a 32 34 3a 2e  62 79 20 4d 4f 56 20 72  |,#7*24:.by MOV r|
00005700  38 2c 23 34 3a 2e 62 7a  20 41 44 44 20 72 37 2c  |8,#4:.bz ADD r7,|
00005710  72 38 2c 23 32 34 0d 44  2a f9 4c 44 52 42 20 72  |r8,#24.D*.LDRB r|
00005720  30 2c 5b 72 39 2c 72 38  5d 3a 53 54 52 42 20 72  |0,[r9,r8]:STRB r|
00005730  30 2c 5b 72 39 2c 72 37  5d 3a 41 44 44 20 72 38  |0,[r9,r7]:ADD r8|
00005740  2c 72 38 2c 23 31 3a 43  4d 50 20 72 38 2c 23 32  |,r8,#1:CMP r8,#2|
00005750  34 3a 42 4e 45 20 62 7a  3a 53 55 42 20 72 39 2c  |4:BNE bz:SUB r9,|
00005760  72 39 2c 23 32 34 3a 43  4d 50 20 72 39 2c 72 31  |r9,#24:CMP r9,r1|
00005770  30 3a 42 4e 45 20 62 79  3a 4c 44 4d 46 44 20 28  |0:BNE by:LDMFD (|
00005780  55 59 29 21 2c 7b 50 43  7d 3a 2e 56 58 20 53 54  |UY)!,{PC}:.VX ST|
00005790  4d 46 44 20 28 55 59 29  21 2c 7b 55 5a 7d 3a 41  |MFD (UY)!,{UZ}:A|
000057a0  44 52 20 72 30 2c 63 55  3a 53 57 49 20 22 4f 53  |DR r0,cU:SWI "OS|
000057b0  5f 57 72 69 74 65 30 22  3a 2e 63 56 20 41 44 52  |_Write0":.cV ADR|
000057c0  20 72 31 32 2c 62 76 3a  4c 44 52 20 72 31 31 2c  | r12,bv:LDR r11,|
000057d0  56 56 3a 41 44 44 20 72  31 30 2c 72 31 32 2c 72  |VV:ADD r10,r12,r|
000057e0  31 31 2c 41 53 4c 20 23  34 3a 41 44 44 20 72 31  |11,ASL #4:ADD r1|
000057f0  30 2c 72 31 30 2c 72 31  31 2c 41 53 4c 20 23 33  |0,r10,r11,ASL #3|
00005800  3a 41 44 44 20 72 31 30  2c 72 31 30 2c 23 34 0d  |:ADD r10,r10,#4.|
00005810  44 e8 f4 2e 63 57 20 4d  4f 56 20 72 30 2c 23 97  |D...cW MOV r0,#.|
00005820  22 20 22 3a 4d 4f 56 20  72 31 2c 23 31 31 3a 2e  |" ":MOV r1,#11:.|
00005830  63 58 20 53 54 52 42 20  72 30 2c 5b 72 31 30 2c  |cX STRB r0,[r10,|
00005840  72 31 5d 3a 53 55 42 53  20 72 31 2c 72 31 2c 23  |r1]:SUBS r1,r1,#|
00005850  31 3a 42 47 45 20 63 58  3a 4d 4f 56 20 72 30 2c  |1:BGE cX:MOV r0,|
00005860  72 31 30 3a 4d 4f 56 20  72 31 2c 23 31 32 3a 4d  |r10:MOV r1,#12:M|
00005870  4f 56 20 72 32 2c 23 97  22 20 22 3a 4d 4f 56 20  |OV r2,#." ":MOV |
00005880  72 33 2c 23 97 22 7e 22  3a 53 57 49 20 22 4f 53  |r3,#."~":SWI "OS|
00005890  5f 52 65 61 64 4c 69 6e  65 22 3a 4d 4f 56 20 72  |_ReadLine":MOV r|
000058a0  31 2c 23 30 3a 2e 63 59  20 4c 44 52 42 20 72 30  |1,#0:.cY LDRB r0|
000058b0  2c 5b 72 31 30 2c 72 31  5d 3a 43 4d 50 20 72 30  |,[r10,r1]:CMP r0|
000058c0  2c 23 33 32 3a 4d 4f 56  4c 54 20 72 30 2c 23 97  |,#32:MOVLT r0,#.|
000058d0  22 20 22 3a 53 54 52 42  20 72 30 2c 5b 72 31 30  |" ":STRB r0,[r10|
000058e0  2c 72 31 5d 3a 41 44 44  20 72 31 2c 72 31 2c 23  |,r1]:ADD r1,r1,#|
000058f0  31 3a 43 4d 50 20 72 31  2c 23 31 32 3a 42 4e 45  |1:CMP r1,#12:BNE|
00005900  20 63 59 0d 45 92 f0 41  44 44 20 72 31 30 2c 72  | cY.E..ADD r10,r|
00005910  31 30 2c 23 31 32 3a 4d  4f 56 20 72 30 2c 23 97  |10,#12:MOV r0,#.|
00005920  22 30 22 3a 4d 4f 56 20  72 31 2c 23 34 3a 2e 63  |"0":MOV r1,#4:.c|
00005930  5a 20 53 54 52 42 20 72  30 2c 5b 72 31 30 2c 72  |Z STRB r0,[r10,r|
00005940  31 5d 3a 53 55 42 53 20  72 31 2c 72 31 2c 23 31  |1]:SUBS r1,r1,#1|
00005950  3a 42 4e 45 20 63 5a 3a  2e 63 61 20 4c 44 52 20  |:BNE cZ:.ca LDR |
00005960  72 30 2c 62 75 3a 4c 44  52 20 72 30 2c 5b 72 30  |r0,bu:LDR r0,[r0|
00005970  5d 3a 41 44 52 20 72 31  2c 56 61 3a 4d 4f 56 20  |]:ADR r1,Va:MOV |
00005980  72 32 2c 23 37 3a 53 57  49 20 22 4f 53 5f 43 6f  |r2,#7:SWI "OS_Co|
00005990  6e 76 65 72 74 49 6e 74  65 67 65 72 34 22 3a 52  |nvertInteger4":R|
000059a0  53 42 20 72 33 2c 72 32  2c 23 38 3a 4d 4f 56 20  |SB r3,r2,#8:MOV |
000059b0  72 34 2c 23 97 22 20 22  3a 43 4d 50 20 72 32 2c  |r4,#." ":CMP r2,|
000059c0  23 30 3a 42 45 51 20 63  62 3a 2e 63 63 20 53 54  |#0:BEQ cb:.cc ST|
000059d0  52 42 20 72 34 2c 5b 72  31 30 5d 2c 23 31 3a 53  |RB r4,[r10],#1:S|
000059e0  55 42 53 20 72 32 2c 72  32 2c 23 31 3a 42 4e 45  |UBS r2,r2,#1:BNE|
000059f0  20 63 63 0d 46 46 f5 2e  63 62 20 4c 44 52 42 20  | cc.FF..cb LDRB |
00005a00  72 34 2c 5b 72 30 5d 2c  23 31 3a 53 54 52 42 20  |r4,[r0],#1:STRB |
00005a10  72 34 2c 5b 72 31 30 5d  2c 23 31 3a 53 55 42 53  |r4,[r10],#1:SUBS|
00005a20  20 72 33 2c 72 33 2c 23  31 3a 42 4e 45 20 63 62  | r3,r3,#1:BNE cb|
00005a30  3a 4c 44 4d 46 44 20 28  55 59 29 21 2c 7b 50 43  |:LDMFD (UY)!,{PC|
00005a40  7d 3a 2e 62 75 20 45 51  55 44 20 56 72 3a 2e 63  |}:.bu EQUD Vr:.c|
00005a50  64 20 45 51 55 44 20 55  75 3a 2e 63 65 20 45 51  |d EQUD Uu:.ce EQ|
00005a60  55 44 20 61 71 3a 2e 56  56 20 45 51 55 44 20 30  |UD aq:.VV EQUD 0|
00005a70  3a 2e 63 66 20 45 51 55  53 20 22 3f 3f 3f 3f 3f  |:.cf EQUS "?????|
00005a80  3f 3f 3f 3f 3f 3f 3f 22  3a 2e 56 61 20 45 51 55  |???????":.Va EQU|
00005a90  53 20 22 20 20 20 20 20  20 20 20 22 3a 45 51 55  |S "        ":EQU|
00005aa0  44 20 30 3a 2e 63 55 20  45 51 55 42 20 33 31 3a  |D 0:.cU EQUB 31:|
00005ab0  45 51 55 42 20 39 3a 45  51 55 42 31 36 3a 45 51  |EQUB 9:EQUB16:EQ|
00005ac0  55 53 22 3e 20 20 20 20  20 20 20 20 20 20 20 20  |US">            |
00005ad0  3c 22 3a 45 51 55 42 20  33 31 3a 45 51 55 42 31  |<":EQUB 31:EQUB1|
00005ae0  30 3a 45 51 55 42 31 36  0d 46 dc eb 45 51 55 42  |0:EQUB16.F..EQUB|
00005af0  20 30 20 3a 41 4c 49 47  4e 3a 2e 62 76 3a 2e 63  | 0 :ALIGN:.bv:.c|
00005b00  67 20 45 51 55 53 20 22  31 20 3a 20 22 3a 20 45  |g EQUS "1 : ": E|
00005b10  51 55 53 20 22 4b 20 4a  20 53 77 69 6e 74 6f 6e  |QUS "K J Swinton|
00005b20  20 22 3a 45 51 55 53 20  22 20 20 37 35 30 30 30  | ":EQUS "  75000|
00005b30  22 3a 45 51 55 42 20 30  3a 2e 63 68 20 45 51 55  |":EQUB 0:.ch EQU|
00005b40  53 20 22 32 20 3a 20 22  3a 20 45 51 55 53 20 22  |S "2 : ": EQUS "|
00005b50  49 61 6e 20 53 77 69 6e  74 6f 6e 20 22 3a 45 51  |Ian Swinton ":EQ|
00005b60  55 53 20 22 20 20 36 30  30 30 30 22 3a 45 51 55  |US "  60000":EQU|
00005b70  42 20 30 3a 2e 63 69 20  45 51 55 53 20 22 33 20  |B 0:.ci EQUS "3 |
00005b80  3a 20 22 3a 20 45 51 55  53 20 22 2d 2d 2d 2d 2d  |: ": EQUS "-----|
00005b90  2d 2d 2d 2d 2d 2d 2d 22  3a 45 51 55 53 20 22 20  |-------":EQUS " |
00005ba0  20 35 30 30 30 30 22 3a  45 51 55 42 20 30 3a 2e  | 50000":EQUB 0:.|
00005bb0  63 6a 20 45 51 55 53 20  22 34 20 3a 20 22 3a 20  |cj EQUS "4 : ": |
00005bc0  45 51 55 53 20 22 45 64  67 61 72 20 46 72 6f 65  |EQUS "Edgar Froe|
00005bd0  73 65 22 0d 47 4a ef 45  51 55 53 20 22 20 20 34  |se".GJ.EQUS "  4|
00005be0  35 30 30 30 22 3a 45 51  55 42 20 30 3a 2e 63 6b  |5000":EQUB 0:.ck|
00005bf0  20 45 51 55 53 20 22 35  20 3a 20 22 3a 20 45 51  | EQUS "5 : ": EQ|
00005c00  55 53 20 22 52 6f 67 65  72 20 57 61 74 65 72 73  |US "Roger Waters|
00005c10  22 3a 45 51 55 53 20 22  20 20 33 30 30 30 30 22  |":EQUS "  30000"|
00005c20  3a 45 51 55 42 20 30 3a  2e 63 6c 20 45 51 55 53  |:EQUB 0:.cl EQUS|
00005c30  20 22 36 20 3a 20 22 3a  20 45 51 55 53 20 22 50  | "6 : ": EQUS "P|
00005c40  61 75 6c 20 42 72 65 6e  6e 61 6e 22 3a 45 51 55  |aul Brennan":EQU|
00005c50  53 20 22 20 20 32 35 30  30 30 22 3a 45 51 55 42  |S "  25000":EQUB|
00005c60  20 30 3a 2e 63 6d 20 45  51 55 53 20 22 37 20 3a  | 0:.cm EQUS "7 :|
00005c70  20 22 3a 20 45 51 55 53  20 22 2d 2d 2d 2d 2d 2d  | ": EQUS "------|
00005c80  2d 2d 2d 2d 2d 2d 22 3a  45 51 55 53 20 22 20 20  |------":EQUS "  |
00005c90  32 30 30 30 30 22 3a 45  51 55 42 20 30 3a 2e 63  |20000":EQUB 0:.c|
00005ca0  6e 20 45 51 55 53 20 22  38 20 3a 20 22 3a 20 45  |n EQUS "8 : ": E|
00005cb0  51 55 53 20 22 4d 65 6c  72 6f 73 65 20 20 20 20  |QUS "Melrose    |
00005cc0  20 22 0d 47 9a fa 45 51  55 53 20 22 20 20 31 30  | ".G..EQUS "  10|
00005cd0  30 30 30 22 3a 45 51 55  42 20 30 3a 2e 63 6f 20  |000":EQUB 0:.co |
00005ce0  45 51 55 53 20 22 78 20  3a 20 22 3a 20 45 51 55  |EQUS "x : ": EQU|
00005cf0  53 20 22 78 78 78 78 78  78 78 78 78 78 78 78 22  |S "xxxxxxxxxxxx"|
00005d00  3a 45 51 55 53 20 22 78  78 78 78 78 78 78 22 3a  |:EQUS "xxxxxxx":|
00005d10  45 51 55 42 20 30 3a 2e  56 63 20 53 54 4d 46 44  |EQUB 0:.Vc STMFD|
00005d20  20 28 55 59 29 21 2c 7b  55 5a 7d 3a 41 44 52 20  | (UY)!,{UZ}:ADR |
00005d30  72 31 31 2c 62 76 3a 4d  4f 56 20 72 31 30 2c 23  |r11,bv:MOV r10,#|
00005d40  30 3a 2e 63 70 20 41 44  44 20 72 31 2c 72 31 31  |0:.cp ADD r1,r11|
00005d50  2c 72 31 30 2c 41 53 4c  20 23 34 3a 41 44 44 20  |,r10,ASL #4:ADD |
00005d60  72 31 2c 72 31 2c 72 31  30 2c 41 53 4c 20 23 33  |r1,r1,r10,ASL #3|
00005d70  3a 2e 63 71 20 42 4c 20  58 6a 3a 4d 4f 56 20 72  |:.cq BL Xj:MOV r|
00005d80  32 2c 72 31 32 3a 20 80  20 72 32 2c 20 72 32 2c  |2,r12: . r2, r2,|
00005d90  20 23 37 3a 43 4d 50 20  72 32 2c 23 30 3a 43 4d  | #7:CMP r2,#0:CM|
00005da0  50 4e 45 20 72 32 2c 23  34 3a 42 45 51 20 63 71  |PNE r2,#4:BEQ cq|
00005db0  3a 4d 4f 56 20 72 33 2c  23 34 2a 34 0d 48 44 ff  |:MOV r3,#4*4.HD.|
00005dc0  4d 4f 56 20 72 34 2c 23  31 31 2a 38 3a 41 44 44  |MOV r4,#11*8:ADD|
00005dd0  20 72 34 2c 72 34 2c 72  31 30 2c 4c 53 4c 20 23  | r4,r4,r10,LSL #|
00005de0  33 3a 41 44 44 20 72 34  2c 72 34 2c 72 31 30 3a  |3:ADD r4,r4,r10:|
00005df0  4c 44 52 20 72 30 2c 63  64 3a 4c 44 52 20 72 30  |LDR r0,cd:LDR r0|
00005e00  2c 5b 72 30 5d 3a 53 54  4d 46 44 20 28 55 59 29  |,[r0]:STMFD (UY)|
00005e10  21 2c 7b 72 31 30 2c 72  31 31 7d 3a 42 4c 20 57  |!,{r10,r11}:BL W|
00005e20  6e 3a 4c 44 4d 46 44 20  28 55 59 29 21 2c 7b 72  |n:LDMFD (UY)!,{r|
00005e30  31 30 2c 72 31 31 7d 3a  2e 63 72 20 41 44 44 20  |10,r11}:.cr ADD |
00005e40  72 31 30 2c 72 31 30 2c  23 31 3a 43 4d 50 20 72  |r10,r10,#1:CMP r|
00005e50  31 30 2c 23 38 3a 42 4e  45 20 63 70 3a 4c 44 4d  |10,#8:BNE cp:LDM|
00005e60  46 44 20 28 55 59 29 21  2c 7b 50 43 7d 3a 2e 57  |FD (UY)!,{PC}:.W|
00005e70  63 20 53 54 4d 46 44 20  28 55 59 29 21 2c 7b 55  |c STMFD (UY)!,{U|
00005e80  5a 7d 3a 4c 44 52 20 72  34 2c 63 73 3a 41 44 44  |Z}:LDR r4,cs:ADD|
00005e90  20 72 34 2c 72 34 2c 23  31 3a 20 80 20 72 34 2c  | r4,r4,#1: . r4,|
00005ea0  20 72 34 2c 20 23 33 3a  53 54 52 20 72 34 2c 63  | r4, #3:STR r4,c|
00005eb0  73 3a 4d 4f 56 20 72 31  2c 72 30 0d 49 0c fe 41  |s:MOV r1,r0.I..A|
00005ec0  44 44 20 72 30 2c 72 34  2c 23 31 3a 53 57 49 20  |DD r0,r4,#1:SWI |
00005ed0  22 4f 70 75 73 2d 53 6f  75 6e 64 5f 53 6f 75 6e  |"Opus-Sound_Soun|
00005ee0  64 49 6e 73 74 72 75 6d  65 6e 74 22 3a 4c 44 4d  |dInstrument":LDM|
00005ef0  46 44 20 28 55 59 29 21  2c 7b 50 43 7d 3a 2e 63  |FD (UY)!,{PC}:.c|
00005f00  73 20 45 51 55 44 20 30  3a 2e 63 74 20 a4 63 75  |s EQUD 0:.ct .cu|
00005f10  28 22 47 61 6d 65 2d 44  61 74 61 22 29 3a 5d 3a  |("Game-Data"):]:|
00005f20  55 6b 3d 63 74 2b 30 3a  55 6c 3d 55 6b 2b 31 39  |Uk=ct+0:Ul=Uk+19|
00005f30  33 35 3a 55 6d 3d 55 6b  2b 32 34 34 37 3a 55 6e  |35:Um=Uk+2447:Un|
00005f40  3d 55 6d 2b 35 37 38 38  3a 55 6f 3d 55 6d 2b 36  |=Um+5788:Uo=Um+6|
00005f50  33 30 30 3a 55 70 3d 55  6f 2b 35 31 35 30 3a 55  |300:Up=Uo+5150:U|
00005f60  71 3d 55 6f 2b 35 36 36  32 3a 55 72 3d 55 71 2b  |q=Uo+5662:Ur=Uq+|
00005f70  32 38 34 31 3a 55 74 3d  55 71 2b 33 33 35 33 3a  |2841:Ut=Uq+3353:|
00005f80  62 5a 3d 55 74 2b 36 33  33 30 3a 61 71 3d 62 5a  |bZ=Ut+6330:aq=bZ|
00005f90  2b 32 35 36 3a 58 63 3d  61 71 2b 33 30 30 38 3a  |+256:Xc=aq+3008:|
00005fa0  56 7a 3d 58 63 2b 34 33  35 32 3a 57 56 3d 56 7a  |Vz=Xc+4352:WV=Vz|
00005fb0  2b 31 30 32 34 3a ed 57  6f 0d 4a 2e 05 e1 0d 4a  |+1024:.Wo.J....J|
00005fc0  42 4f dd a4 63 75 28 63  76 24 29 3a 63 76 24 3d  |BO..cu(cv$):cv$=|
00005fd0  22 3c 4f 70 75 73 24 44  69 72 3e 2e 22 2b 63 76  |"<Opus$Dir>."+cv|
00005fe0  24 3a 44 3d 8e 63 76 24  3a 4c 3d a2 23 44 3a d9  |$:D=.cv$:L=.#D:.|
00005ff0  23 44 3a e7 57 6f 3d 32  ff 22 4c 4f 41 44 20 22  |#D:.Wo=2."LOAD "|
00006000  2b 63 76 24 2b 22 20 22  2b c3 7e 50 25 0d 4a 6a  |+cv$+" "+.~P%.Jj|
00006010  1d 50 25 2b 3d 4c 3a 5b  4f 50 54 20 57 6f 3a 41  |.P%+=L:[OPT Wo:A|
00006020  4c 49 47 4e 3a 5d 3a 3d  57 6f 0d 4a 88 3a dd a4  |LIGN:]:=Wo.J.:..|
00006030  63 77 28 63 78 24 29 3a  e3 63 79 3d 31 20 b8 31  |cw(cx$):.cy=1 .1|
00006040  36 3a 3f 50 25 3d 97 28  c1 63 78 24 2c 63 79 2c  |6:?P%=.(.cx$,cy,|
00006050  31 29 29 2d 34 38 3a 50  25 2b 3d 31 3a ed 63 79  |1))-48:P%+=1:.cy|
00006060  3a 3d 57 6f 0d 4a ce 2a  dd a4 62 58 28 63 7a 29  |:=Wo.J.*..bX(cz)|
00006070  3a e3 69 3d 30 20 b8 63  7a 2d 31 3a 3f 50 25 3d  |:.i=0 .cz-1:?P%=|
00006080  30 3a 50 25 2b 3d 31 3a  ed 69 3a 3d 57 6f 0d ff  |0:P%+=1:.i:=Wo..|
00006090