home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1998-09-08 | 19.6 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 34 f4 20 42 69 | 74 20 74 6f 20 62 72 69 |...4. Bi|t to bri|
|00000010| 6e 67 20 74 68 65 20 66 | 69 72 73 74 20 73 63 72 |ng the f|irst scr|
|00000020| 65 65 6e 20 6f 6e 74 6f | 20 74 68 65 20 73 63 72 |een onto| the scr|
|00000030| 65 65 6e 3a 0d 00 14 19 | f4 20 54 68 75 20 32 37 |een:....|. Thu 27|
|00000040| 74 68 20 4d 61 72 63 68 | 20 31 39 39 37 0d 00 1e |th March| 1997...|
|00000050| 13 2a 4b 45 59 20 31 20 | 51 55 49 54 7c 4d 7c 4d |.*KEY 1 |QUIT|M|M|
|00000060| 0d 00 28 2e ee 20 85 20 | 3a ee 20 85 20 87 3a f1 |..(.. . |:. . .:.|
|00000070| 20 f6 24 3b 22 20 61 74 | 20 6c 69 6e 65 20 22 3b | .$;" at| line ";|
|00000080| 9e 3a ff 28 22 44 45 42 | 55 47 22 29 3a e0 0d 00 |.:.("DEB|UG"):...|
|00000090| 32 08 eb 20 34 39 0d 00 | 3c 0b 6d 6f 64 65 25 3d |2.. 49..|<.mode%=|
|000000a0| 31 0d 00 46 19 e7 20 eb | 3c 3e 34 39 20 8c 20 eb |1..F.. .|<>49 . .|
|000000b0| 31 33 3a 6d 6f 64 65 25 | 3d 30 0d 00 50 05 87 0d |13:mode%|=0..P...|
|000000c0| 00 5a 04 0d 00 64 12 72 | 6e 64 70 69 63 63 79 25 |.Z...d.r|ndpiccy%|
|000000d0| 3d b3 28 32 29 0d 00 6e | 04 0d 00 6f 1d 63 6f 64 |=.(2)..n|...o.cod|
|000000e0| 65 6c 65 6e 25 3d 32 30 | 2a 31 30 32 34 2b 33 30 |elen%=20|*1024+30|
|000000f0| 30 2a 31 30 32 34 0d 00 | 78 14 de 20 63 6f 64 65 |0*1024..|x.. code|
|00000100| 25 20 63 6f 64 65 6c 65 | 6e 25 0d 00 82 19 e3 20 |% codele|n%..... |
|00000110| 70 61 73 73 25 3d 38 2b | 30 20 b8 20 38 2b 32 20 |pass%=8+|0 . 8+2 |
|00000120| 88 20 32 0d 00 8c 0c 50 | 25 3d 63 6f 64 65 25 0d |. 2....P|%=code%.|
|00000130| 00 8d 0f 4c 25 3d 63 6f | 64 65 6c 65 6e 25 0d 00 |...L%=co|delen%..|
|00000140| 96 0e 5b 4f 50 54 20 70 | 61 73 73 25 0d 00 a0 04 |..[OPT p|ass%....|
|00000150| 0d 00 aa 0e 2e 62 72 69 | 6e 67 69 74 6f 6e 0d 00 |.....bri|ngiton..|
|00000160| b4 1b 53 54 4d 46 44 20 | 52 31 33 21 2c 7b 52 30 |..STMFD |R13!,{R0|
|00000170| 2d 52 31 32 2c 52 31 34 | 7d 0d 00 be 11 a4 61 64 |-R12,R14|}.....ad|
|00000180| 72 28 30 2c 76 64 75 69 | 6e 29 0d 00 c8 12 a4 61 |r(0,vdui|n).....a|
|00000190| 64 72 28 31 2c 76 64 75 | 6f 75 74 29 0d 00 d2 1d |dr(1,vdu|out)....|
|000001a0| 53 57 49 20 22 4f 53 5f | 52 65 61 64 56 64 75 56 |SWI "OS_|ReadVduV|
|000001b0| 61 72 69 61 62 6c 65 73 | 22 0d 00 dc 1c 4c 44 52 |ariables|"....LDR|
|000001c0| 20 52 30 2c 5b 52 31 5d | 20 20 20 20 20 20 3b 20 | R0,[R1]| ; |
|000001d0| 53 74 61 72 54 0d 00 e6 | 1c 4c 44 52 20 52 31 2c |StarT...|.LDR R1,|
|000001e0| 61 64 64 6f 6e 74 6f 62 | 6f 74 74 6f 6d 6c 69 6e |addontob|ottomlin|
|000001f0| 65 0d 00 f0 11 41 44 44 | 20 52 31 2c 52 30 2c 52 |e....ADD| R1,R0,R|
|00000200| 31 20 0d 00 fa 04 0d 01 | 04 2c 4d 4f 56 20 52 32 |1 ......|.,MOV R2|
|00000210| 2c 23 30 20 20 20 20 20 | 20 3b 20 50 6c 6f 74 20 |,#0 | ; Plot |
|00000220| 74 68 69 73 20 6d 61 6e | 79 20 6c 69 6e 65 73 21 |this man|y lines!|
|00000230| 21 21 0d 01 0e 13 2e 6d | 6f 76 65 64 6f 77 6e 75 |!!.....m|ovedownu|
|00000240| 70 6c 6f 6f 70 0d 01 18 | 16 73 74 6d 66 64 20 72 |ploop...|.stmfd r|
|00000250| 31 33 21 2c 7b 72 30 2d | 52 32 7d 0d 01 22 1c 53 |13!,{r0-|R2}..".S|
|00000260| 57 49 20 22 4f 53 5f 52 | 65 61 64 45 73 63 61 70 |WI "OS_R|eadEscap|
|00000270| 65 53 74 61 74 65 22 0d | 01 2c 04 0d 01 36 18 4c |eState".|.,...6.L|
|00000280| 44 4d 43 53 46 44 20 52 | 31 33 21 2c 7b 52 30 2d |DMCSFD R|13!,{R0-|
|00000290| 72 32 7d 0d 01 40 36 4c | 44 4d 43 53 46 44 20 52 |r2}..@6L|DMCSFD R|
|000002a0| 31 33 21 2c 7b 52 30 2d | 52 31 32 2c 52 31 35 7d |13!,{R0-|R12,R15}|
|000002b0| 20 20 20 20 3b 20 51 75 | 69 74 20 69 66 20 65 73 | ; Qu|it if es|
|000002c0| 63 61 70 65 20 68 65 6c | 64 0d 01 4a 04 0d 01 54 |cape hel|d..J...T|
|000002d0| 0e 4d 4f 56 20 52 30 2c | 23 31 39 0d 01 5e 11 53 |.MOV R0,|#19..^.S|
|000002e0| 57 49 20 22 4f 53 5f 42 | 79 74 65 22 0d 01 68 16 |WI "OS_B|yte"..h.|
|000002f0| 4c 44 4d 46 44 20 52 31 | 33 21 2c 7b 52 30 2d 52 |LDMFD R1|3!,{R0-R|
|00000300| 32 7d 0d 01 72 10 42 4c | 20 70 6c 6f 74 6c 69 6e |2}..r.BL| plotlin|
|00000310| 65 73 0d 01 7c 10 41 44 | 44 20 52 32 2c 52 32 2c |es..|.AD|D R2,R2,|
|00000320| 23 31 0d 01 86 3e 43 4d | 50 20 52 32 2c 23 31 32 |#1...>CM|P R2,#12|
|00000330| 30 20 20 20 20 3b 20 42 | 65 63 61 75 73 65 20 79 |0 ; B|ecause y|
|00000340| 6f 75 20 6f 6e 6c 79 20 | 6e 65 65 64 20 70 6c 6f |ou only |need plo|
|00000350| 74 20 68 61 6c 66 20 74 | 68 65 20 6c 69 6e 65 73 |t half t|he lines|
|00000360| 0d 01 90 16 42 4c 54 20 | 6d 6f 76 65 64 6f 77 6e |....BLT |movedown|
|00000370| 75 70 6c 6f 6f 70 0d 01 | 9a 1c 4c 44 4d 46 44 20 |uploop..|..LDMFD |
|00000380| 52 31 33 21 2c 7b 52 30 | 2d 52 31 32 2c 52 31 35 |R13!,{R0|-R12,R15|
|00000390| 7d 5e 0d 01 a4 04 0d 01 | ae 27 3b 20 52 30 3d 20 |}^......|.'; R0= |
|000003a0| 53 74 61 72 74 20 6f 66 | 20 66 69 72 73 74 20 6c |Start of| first l|
|000003b0| 69 6e 65 20 6f 6e 20 73 | 63 72 65 65 6e 0d 01 b8 |ine on s|creen...|
|000003c0| 26 3b 20 72 31 3d 20 53 | 74 61 72 74 20 6f 66 20 |&; r1= S|tart of |
|000003d0| 6c 61 73 74 20 6c 69 6e | 65 20 6f 6e 20 73 63 72 |last lin|e on scr|
|000003e0| 65 65 6e 0d 01 c2 1f 3b | 20 72 32 20 3d 20 6e 75 |een....;| r2 = nu|
|000003f0| 6d 20 6f 66 20 6c 69 6e | 65 73 20 74 6f 20 70 6c |m of lin|es to pl|
|00000400| 6f 74 0d 01 cc 0e 2e 70 | 6c 6f 74 6c 69 6e 65 73 |ot.....p|lotlines|
|00000410| 0d 01 d6 1b 53 54 4d 46 | 44 20 52 31 33 21 2c 7b |....STMF|D R13!,{|
|00000420| 52 30 2d 52 31 32 2c 52 | 31 34 7d 0d 01 e0 24 4d |R0-R12,R|14}...$M|
|00000430| 4f 56 20 52 31 32 2c 52 | 31 20 20 20 20 20 20 20 |OV R12,R|1 |
|00000440| 20 20 20 20 20 20 3b 20 | 4b 65 65 70 20 72 31 0d | ; |Keep r1.|
|00000450| 01 ea 0e 4d 4f 56 20 52 | 31 31 2c 52 32 0d 01 f4 |...MOV R|11,R2...|
|00000460| 1d a4 61 64 72 28 31 2c | 65 6e 64 6f 66 66 69 72 |..adr(1,|endoffir|
|00000470| 73 74 70 69 63 74 75 72 | 65 29 0d 01 fe 3e 53 55 |stpictur|e)...>SU|
|00000480| 42 20 52 31 2c 52 31 2c | 23 33 32 30 2a 32 20 20 |B R1,R1,|#320*2 |
|00000490| 20 20 20 20 20 20 20 20 | 20 20 3b 20 46 69 6e 64 | | ; Find|
|000004a0| 20 73 74 61 72 74 20 6f | 66 20 32 27 4e 44 20 6c | start o|f 2'ND l|
|000004b0| 61 73 74 20 6c 69 6e 65 | 0d 02 08 30 4d 4f 56 20 |ast line|...0MOV |
|000004c0| 52 34 2c 52 32 2c 4c 53 | 4c 23 28 31 2b 6d 6f 64 |R4,R2,LS|L#(1+mod|
|000004d0| 65 25 29 20 20 20 3b 20 | 44 6f 75 62 6c 65 20 6c |e%) ; |Double l|
|000004e0| 69 6e 65 20 73 69 7a 65 | 0d 02 12 1e 41 44 44 20 |ine size|....ADD |
|000004f0| 52 30 2c 52 30 2c 52 34 | 2c 4c 53 4c 23 38 20 20 |R0,R0,R4|,LSL#8 |
|00000500| 20 20 20 20 20 20 0d 02 | 1c 46 41 44 44 20 52 30 | ..|.FADD R0|
|00000510| 2c 52 30 2c 52 34 2c 4c | 53 4c 23 36 20 20 20 20 |,R0,R4,L|SL#6 |
|00000520| 20 20 20 20 3b 20 47 65 | 74 20 61 64 64 72 65 73 | ; Ge|t addres|
|00000530| 73 20 6f 66 20 77 68 65 | 72 65 20 74 6f 20 73 74 |s of whe|re to st|
|00000540| 61 72 74 20 70 6c 6f 74 | 74 69 6e 67 0d 02 26 15 |art plot|ting..&.|
|00000550| 2e 70 6c 6f 74 74 6f 70 | 6c 69 6e 65 73 6c 6f 6f |.plottop|linesloo|
|00000560| 70 0d 02 30 10 42 4c 20 | 70 6c 6f 74 61 6c 69 6e |p..0.BL |plotalin|
|00000570| 65 0d 02 3a 14 53 55 42 | 20 52 31 2c 52 31 2c 23 |e..:.SUB| R1,R1,#|
|00000580| 33 32 30 2a 32 0d 02 44 | 30 53 55 42 20 52 30 2c |320*2..D|0SUB R0,|
|00000590| 52 30 2c 23 33 32 30 3c | 3c 28 6d 6f 64 65 25 2b |R0,#320<|<(mode%+|
|000005a0| 31 29 20 3b 20 4d 6f 76 | 65 20 64 6f 77 6e 20 61 |1) ; Mov|e down a|
|000005b0| 20 6c 69 6e 65 0d 02 4e | 11 53 55 42 53 20 52 32 | line..N|.SUBS R2|
|000005c0| 2c 52 32 2c 23 31 0d 02 | 58 18 42 47 65 20 70 6c |,R2,#1..|X.BGe pl|
|000005d0| 6f 74 74 6f 70 6c 69 6e | 65 73 6c 6f 6f 70 0d 02 |ottoplin|esloop..|
|000005e0| 62 04 0d 02 6c 32 3b 20 | 4e 6f 77 20 70 6c 6f 74 |b...l2; |Now plot|
|000005f0| 20 6c 69 6e 65 73 20 66 | 72 6f 6d 20 74 68 65 20 | lines f|rom the |
|00000600| 62 6f 74 74 6f 6d 20 6f | 66 20 74 68 65 20 73 63 |bottom o|f the sc|
|00000610| 72 65 65 6e 0d 02 76 35 | 4d 4f 56 20 52 30 2c 52 |reen..v5|MOV R0,R|
|00000620| 31 32 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |12 | |
|00000630| 20 3b 20 52 65 73 74 6f | 72 65 20 73 63 72 65 65 | ; Resto|re scree|
|00000640| 6e 20 61 64 64 72 65 73 | 73 0d 02 80 34 4d 4f 56 |n addres|s...4MOV|
|00000650| 20 52 32 2c 52 31 31 20 | 20 20 20 20 20 20 20 20 | R2,R11 | |
|00000660| 20 20 20 20 20 20 3b 20 | 52 65 73 74 6f 72 65 20 | ; |Restore |
|00000670| 6c 69 6e 65 73 20 74 6f | 20 70 6c 6f 74 0d 02 8a |lines to| plot...|
|00000680| 1f a4 61 64 72 28 31 2c | 73 74 61 72 74 6f 66 66 |..adr(1,|startoff|
|00000690| 69 72 73 74 70 69 63 74 | 75 72 65 29 0d 02 94 12 |irstpict|ure)....|
|000006a0| 41 44 44 20 52 31 2c 52 | 31 2c 23 33 32 30 0d 02 |ADD R1,R|1,#320..|
|000006b0| 9e 1e 53 55 42 20 52 30 | 2c 52 30 2c 52 34 2c 4c |..SUB R0|,R0,R4,L|
|000006c0| 53 4c 23 38 20 20 20 20 | 20 20 20 20 0d 02 a8 46 |SL#8 | ...F|
|000006d0| 53 55 42 20 52 30 2c 52 | 30 2c 52 34 2c 4c 53 4c |SUB R0,R|0,R4,LSL|
|000006e0| 23 36 20 20 20 20 20 20 | 20 20 3b 20 47 65 74 20 |#6 | ; Get |
|000006f0| 61 64 64 72 65 73 73 20 | 6f 66 20 77 68 65 72 65 |address |of where|
|00000700| 20 74 6f 20 73 74 61 72 | 74 20 70 6c 6f 74 74 69 | to star|t plotti|
|00000710| 6e 67 0d 02 b2 18 2e 70 | 6c 6f 74 62 6f 74 74 6f |ng.....p|lotbotto|
|00000720| 6d 6c 69 6e 65 73 6c 6f | 6f 70 0d 02 bc 10 42 4c |mlineslo|op....BL|
|00000730| 20 70 6c 6f 74 61 6c 69 | 6e 65 0d 02 c6 14 41 44 | plotali|ne....AD|
|00000740| 44 20 52 31 2c 52 31 2c | 23 33 32 30 2a 32 0d 02 |D R1,R1,|#320*2..|
|00000750| d0 30 41 44 44 20 52 30 | 2c 52 30 2c 23 33 32 30 |.0ADD R0|,R0,#320|
|00000760| 3c 3c 28 6d 6f 64 65 25 | 2b 31 29 20 3b 20 4d 6f |<<(mode%|+1) ; Mo|
|00000770| 76 65 20 64 6f 77 6e 20 | 61 20 6c 69 6e 65 0d 02 |ve down |a line..|
|00000780| da 11 53 55 42 53 20 52 | 32 2c 52 32 2c 23 31 0d |..SUBS R|2,R2,#1.|
|00000790| 02 e4 1b 42 47 65 20 70 | 6c 6f 74 62 6f 74 74 6f |...BGe p|lotbotto|
|000007a0| 6d 6c 69 6e 65 73 6c 6f | 6f 70 0d 02 ee 1c 4c 44 |mlineslo|op....LD|
|000007b0| 4d 46 44 20 52 31 33 21 | 2c 7b 52 30 2d 52 31 32 |MFD R13!|,{R0-R12|
|000007c0| 2c 52 31 35 7d 5e 0d 02 | f8 04 0d 03 02 15 3b 20 |,R15}^..|......; |
|000007d0| 2a 2a 2a 20 f0 20 41 20 | 86 20 2a 2a 2a 2a 2a 0d |*** . A |. *****.|
|000007e0| 03 0c 1c 3b 20 49 6e 20 | 72 30 20 3d 20 53 63 72 |...; In |r0 = Scr|
|000007f0| 65 65 6e 20 61 64 64 72 | 65 73 73 0d 03 16 34 3b |een addr|ess...4;|
|00000800| 20 20 20 20 72 31 20 3d | 20 50 6f 69 6e 74 65 72 | r1 =| Pointer|
|00000810| 20 74 6f 20 77 68 65 72 | 65 20 74 6f 20 73 74 61 | to wher|e to sta|
|00000820| 72 74 20 69 6e 20 74 68 | 65 20 70 69 63 63 79 0d |rt in th|e piccy.|
|00000830| 03 20 37 3b 20 4e 42 20 | 50 6c 6f 74 73 20 74 77 |. 7; NB |Plots tw|
|00000840| 6f 20 6c 69 6e 65 73 20 | 69 66 20 69 6e 20 61 20 |o lines |if in a |
|00000850| 68 69 20 72 65 73 20 6d | 6f 64 65 20 69 65 20 6d |hi res m|ode ie m|
|00000860| 6f 64 65 25 3d 31 0d 03 | 2a 0e 2e 70 6c 6f 74 61 |ode%=1..|*..plota|
|00000870| 6c 69 6e 65 0d 03 34 1b | 53 54 4d 46 44 20 52 31 |line..4.|STMFD R1|
|00000880| 33 21 2c 7b 52 30 2d 52 | 31 32 2c 52 31 34 7d 0d |3!,{R0-R|12,R14}.|
|00000890| 03 3e 2a 4d 4f 56 20 52 | 31 34 2c 23 38 20 20 20 |.>*MOV R|14,#8 |
|000008a0| 20 20 20 20 20 20 20 20 | 20 20 3b 20 54 68 69 6e | | ; Thin|
|000008b0| 67 79 73 20 74 6f 20 64 | 6f 0d 03 48 13 41 44 44 |gys to d|o..H.ADD|
|000008c0| 20 52 31 32 2c 52 30 2c | 23 33 32 30 0d 03 52 12 | R12,R0,|#320..R.|
|000008d0| 2e 70 6c 6f 74 61 6c 69 | 6e 65 6c 6f 6f 70 0d 03 |.plotali|neloop..|
|000008e0| 5c 16 4c 44 4d 49 41 20 | 52 31 21 2c 7b 52 32 2d |\.LDMIA |R1!,{R2-|
|000008f0| 52 31 31 7d 0d 03 66 16 | 53 54 4d 49 41 20 52 30 |R11}..f.|STMIA R0|
|00000900| 21 2c 7b 52 32 2d 52 31 | 31 7d 0d 03 70 32 5d 3a |!,{R2-R1|1}..p2]:|
|00000910| e7 20 6d 6f 64 65 25 3d | 31 20 8c 20 5b 4f 50 54 |. mode%=|1 . [OPT|
|00000920| 20 70 61 73 73 25 3a 53 | 54 4d 49 41 20 52 31 32 | pass%:S|TMIA R12|
|00000930| 21 2c 7b 52 32 2d 52 31 | 31 7d 3a 5d 0d 03 7a 0e |!,{R2-R1|1}:]..z.|
|00000940| 5b 4f 50 54 20 70 61 73 | 73 25 0d 03 84 13 53 55 |[OPT pas|s%....SU|
|00000950| 42 53 20 52 31 34 2c 52 | 31 34 2c 23 31 0d 03 8e |BS R14,R|14,#1...|
|00000960| 15 42 47 54 20 70 6c 6f | 74 61 6c 69 6e 65 6c 6f |.BGT plo|talinelo|
|00000970| 6f 70 0d 03 98 1c 4c 44 | 4d 46 44 20 52 31 33 21 |op....LD|MFD R13!|
|00000980| 2c 7b 52 30 2d 52 31 32 | 2c 52 31 35 7d 5e 0d 03 |,{R0-R12|,R15}^..|
|00000990| a2 16 2e 61 64 64 6f 6e | 74 6f 62 6f 74 74 6f 6d |...addon|tobottom|
|000009a0| 6c 69 6e 65 0d 03 ac 17 | 45 51 55 44 20 33 32 30 |line....|EQUD 320|
|000009b0| 2a 32 33 39 3c 3c 6d 6f | 64 65 25 0d 03 b6 04 0d |*239<<mo|de%.....|
|000009c0| 03 c0 04 0d 03 ca 3b 3b | 20 2a 2a 2a 2a 2a 2a 2a |......;;| *******|
|000009d0| 2a 2a 2a 2a 2a 2a 20 df | 53 20 41 20 53 43 52 45 |****** .|S A SCRE|
|000009e0| 45 4e 20 49 4e 20 46 55 | 4c 4c 59 20 46 4c 49 50 |EN IN FU|LLY FLIP|
|000009f0| 50 59 20 4d 4f 54 49 4f | 4e 20 2a 2a 2a 2a 0d 03 |PY MOTIO|N ****..|
|00000a00| d4 16 2e 64 72 61 77 61 | 66 6c 69 70 65 64 73 63 |...drawa|flipedsc|
|00000a10| 72 65 65 6e 0d 03 de 1b | 53 54 4d 46 44 20 52 31 |reen....|STMFD R1|
|00000a20| 33 21 2c 7b 52 30 2d 52 | 31 32 2c 52 31 34 7d 0d |3!,{R0-R|12,R14}.|
|00000a30| 03 e8 18 a4 61 64 72 28 | 33 2c 66 6c 69 70 65 64 |....adr(|3,fliped|
|00000a40| 73 74 61 74 65 73 29 0d | 03 f2 43 4c 44 52 20 52 |states).|..CLDR R|
|00000a50| 30 2c 76 64 75 6f 75 74 | 20 20 20 20 20 20 20 20 |0,vduout| |
|00000a60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000a70| 20 3b 20 4c 6f 61 64 20 | 74 68 65 20 73 63 72 65 | ; Load |the scre|
|00000a80| 65 6e 20 70 6f 69 6e 74 | 65 72 0d 03 fc 0f 4d 4f |en point|er....MO|
|00000a90| 56 20 52 31 32 2c 23 31 | 30 0d 04 06 38 a4 61 64 |V R12,#1|0...8.ad|
|00000aa0| 72 28 34 2c 73 74 61 72 | 74 6f 66 66 69 72 73 74 |r(4,star|toffirst|
|00000ab0| 70 69 63 74 75 72 65 29 | 20 20 20 20 20 20 20 20 |picture)| |
|00000ac0| 20 20 3b 20 46 69 72 73 | 74 20 70 69 63 74 75 72 | ; Firs|t pictur|
|00000ad0| 65 0d 04 10 39 a4 61 64 | 72 28 35 2c 73 74 61 72 |e...9.ad|r(5,star|
|00000ae0| 74 6f 66 73 65 63 6f 6e | 64 70 69 63 74 75 72 65 |tofsecon|dpicture|
|00000af0| 29 20 20 20 20 20 20 20 | 20 20 3b 20 53 65 63 6f |) | ; Seco|
|00000b00| 6e 64 20 70 69 63 74 75 | 72 65 0d 04 1a 1a a4 61 |nd pictu|re.....a|
|00000b10| 64 72 28 31 31 2c 70 6f | 73 69 74 69 6f 6e 74 61 |dr(11,po|sitionta|
|00000b20| 62 6c 65 29 0d 04 24 12 | a4 61 64 72 28 31 30 2c |ble)..$.|.adr(10,|
|00000b30| 7a 65 72 6f 73 29 0d 04 | 2e 04 0d 04 38 15 2e 66 |zeros)..|....8..f|
|00000b40| 6c 69 70 70 79 73 63 72 | 65 65 6e 6c 6f 6f 70 0d |lippyscr|eenloop.|
|00000b50| 04 42 12 4c 44 52 20 52 | 36 2c 5b 52 33 5d 2c 23 |.B.LDR R|6,[R3],#|
|00000b60| 34 0d 04 4c 0d 43 4d 50 | 20 52 36 2c 23 30 0d 04 |4..L.CMP| R6,#0..|
|00000b70| 56 17 42 4c 54 20 64 6f | 6e 74 70 6c 6f 74 74 68 |V.BLT do|ntplotth|
|00000b80| 69 73 6f 6e 65 0d 04 60 | 11 43 4d 50 20 52 36 2c |isone..`|.CMP R6,|
|00000b90| 23 31 39 2b 33 36 0d 04 | 6a 17 42 4c 4c 54 20 64 |#19+36..|j.BLLT d|
|00000ba0| 72 61 77 61 66 6c 69 70 | 70 79 62 69 74 0d 04 74 |rawaflip|pybit..t|
|00000bb0| 14 2e 64 6f 6e 74 70 6c | 6f 74 74 68 69 73 6f 6e |..dontpl|otthison|
|00000bc0| 65 0d 04 7e 15 41 44 44 | 20 52 34 2c 52 34 2c 23 |e..~.ADD| R4,R4,#|
|00000bd0| 33 32 30 2a 32 34 0d 04 | 88 15 41 44 44 20 52 35 |320*24..|..ADD R5|
|00000be0| 2c 52 35 2c 23 33 32 30 | 2a 32 34 0d 04 92 1c 41 |,R5,#320|*24....A|
|00000bf0| 44 44 20 52 30 2c 52 30 | 2c 23 33 32 30 2a 32 34 |DD R0,R0|,#320*24|
|00000c00| 3c 3c 6d 6f 64 65 25 0d | 04 9c 04 0d 04 a6 13 53 |<<mode%.|.......S|
|00000c10| 55 42 53 20 52 31 32 2c | 52 31 32 2c 23 31 0d 04 |UBS R12,|R12,#1..|
|00000c20| b0 18 42 47 54 20 66 6c | 69 70 70 79 73 63 72 65 |..BGT fl|ippyscre|
|00000c30| 65 6e 6c 6f 6f 70 0d 04 | ba 1c 4c 44 4d 46 44 20 |enloop..|..LDMFD |
|00000c40| 52 31 33 21 2c 7b 52 30 | 2d 52 31 32 2c 52 31 35 |R13!,{R0|-R12,R15|
|00000c50| 7d 5e 0d 04 c4 04 0d 04 | ce 24 3b 20 2a 2a 2a 2a |}^......|.$; ****|
|00000c60| 2a 2a 2a 20 df 20 41 20 | 46 4c 49 49 50 59 20 42 |*** . A |FLIIPY B|
|00000c70| 49 54 20 2a 2a 2a 2a 2a | 2a 2a 0d 04 d8 1f 3b 20 |IT *****|**....; |
|00000c80| 52 30 20 3d 20 53 43 52 | 45 45 4e 20 41 44 52 45 |R0 = SCR|EEN ADRE|
|00000c90| 53 20 ca 20 53 54 41 52 | 54 0d 04 e2 23 3b 20 52 |S . STAR|T...#; R|
|00000ca0| 34 20 3d 20 53 74 61 72 | 74 20 6f 66 20 70 69 63 |4 = Star|t of pic|
|00000cb0| 74 75 72 65 20 31 20 73 | 6c 69 63 65 0d 04 ec 23 |ture 1 s|lice...#|
|00000cc0| 3b 20 52 35 20 3d 20 73 | 74 61 72 74 20 6f 66 20 |; R5 = s|tart of |
|00000cd0| 70 69 63 74 75 72 65 20 | 32 20 73 6c 69 63 65 0d |picture |2 slice.|
|00000ce0| 04 f6 31 3b 20 52 36 20 | 3d 20 70 6f 73 69 74 69 |..1; R6 |= positi|
|00000cf0| 6f 6e 20 69 6e 20 74 61 | 62 6c 65 20 28 6e 6f 74 |on in ta|ble (not|
|00000d00| 20 27 6d 6f 64 27 65 64 | 20 77 69 74 68 20 33 36 | 'mod'ed| with 36|
|00000d10| 0d 05 00 11 3b 20 52 31 | 30 20 3d 20 5a 65 72 6f |....; R1|0 = Zero|
|00000d20| 73 0d 05 0a 2f 3b 20 52 | 31 31 20 3d 20 50 6f 69 |s.../; R|11 = Poi|
|00000d30| 6e 74 65 72 20 74 6f 20 | 73 74 61 72 74 20 6f 66 |nter to |start of|
|00000d40| 20 70 6f 69 73 74 69 6f | 6e 73 20 74 61 62 6c 65 | poistio|ns table|
|00000d50| 0d 05 14 13 2e 64 72 61 | 77 61 66 6c 69 70 70 79 |.....dra|waflippy|
|00000d60| 62 69 74 0d 05 1e 1b 53 | 54 4d 46 44 20 52 31 33 |bit....S|TMFD R13|
|00000d70| 21 2c 7b 52 30 2d 52 31 | 32 2c 52 31 34 7d 0d 05 |!,{R0-R1|2,R14}..|
|00000d80| 28 12 2e 6d 61 6b 65 73 | 75 72 65 6d 6f 64 33 36 |(..makes|uremod36|
|00000d90| 0d 05 32 0e 43 4d 50 20 | 52 36 2c 23 33 36 0d 05 |..2.CMP |R6,#36..|
|00000da0| 3c 13 53 55 42 47 45 20 | 52 36 2c 52 36 2c 23 33 |<.SUBGE |R6,R6,#3|
|00000db0| 36 0d 05 46 15 42 47 45 | 20 6d 61 6b 65 73 75 72 |6..F.BGE| makesur|
|00000dc0| 65 6d 6f 64 33 36 0d 05 | 50 0f 4d 4f 56 20 52 31 |emod36..|P.MOV R1|
|00000dd0| 32 2c 23 32 34 0d 05 5a | 16 4d 4c 41 20 52 31 31 |2,#24..Z|.MLA R11|
|00000de0| 2c 52 31 32 2c 52 36 2c | 52 31 31 0d 05 64 12 41 |,R12,R6,|R11..d.A|
|00000df0| 44 44 20 52 37 2c 52 31 | 31 2c 23 32 34 0d 05 6e |DD R7,R1|1,#24..n|
|00000e00| 16 2e 64 72 61 77 66 6c | 69 70 79 6c 69 6e 65 6c |..drawfl|ipylinel|
|00000e10| 6f 6f 70 0d 05 78 27 4c | 44 52 42 20 52 38 2c 5b |oop..x'L|DRB R8,[|
|00000e20| 52 31 31 5d 2c 23 31 20 | 20 20 20 20 20 20 20 3b |R11],#1 | ;|
|00000e30| 20 4c 6f 61 64 20 6c 69 | 6e 65 0d 05 82 27 54 53 | Load li|ne...'TS|
|00000e40| 54 20 52 38 2c 23 31 32 | 38 20 20 20 20 20 20 20 |T R8,#12|8 |
|00000e50| 20 20 20 20 20 20 3b 20 | 43 68 65 63 6b 20 62 69 | ; |Check bi|
|00000e60| 74 0d 05 8c 0f 4d 4f 56 | 4e 45 20 52 31 2c 52 35 |t....MOV|NE R1,R5|
|00000e70| 0d 05 96 2e ec 51 20 52 | 31 2c 52 34 20 20 20 20 |.....Q R|1,R4 |
|00000e80| 20 20 20 20 20 20 20 20 | 20 3b 20 50 69 63 20 63 | | ; Pic c|
|00000e90| 6f 72 72 65 78 74 20 70 | 69 63 74 75 72 65 0d 05 |orrext p|icture..|
|00000ea0| a0 30 74 65 71 20 52 38 | 2c 23 31 32 38 20 20 20 |.0teq R8|,#128 |
|00000eb0| 20 20 20 20 20 20 20 20 | 20 20 3b 20 49 73 20 69 | | ; Is i|
|00000ec0| 74 20 61 20 62 6c 61 6e | 6b 20 6c 69 6e 65 0d 05 |t a blan|k line..|
|00000ed0| aa 27 ec 51 20 52 31 2c | 52 31 30 20 20 20 20 20 |.'.Q R1,|R10 |
|00000ee0| 20 20 20 20 20 20 20 3b | 20 49 66 20 73 6f 2c 20 | ;| If so, |
|00000ef0| 62 6c 61 6e 6b 0d 05 b4 | 37 80 4e 45 20 52 38 2c |blank...|7.NE R8,|
|00000f00| 52 38 2c 23 31 32 37 20 | 20 20 20 20 20 20 20 20 |R8,#127 | |
|00000f10| 3b 20 49 66 20 6e 6f 74 | 2c 20 72 65 6d 6f 76 65 |; If not|, remove|
|00000f20| 20 74 68 65 20 74 6f 70 | 20 62 69 74 0d 05 be 2f | the top| bit.../|
|00000f30| 53 55 42 4e 45 20 52 38 | 2c 52 38 2c 23 31 20 20 |SUBNE R8|,R8,#1 |
|00000f40| 20 20 20 20 20 20 20 20 | 20 3b 20 43 6f 73 20 69 | | ; Cos i|
|00000f50| 74 27 73 20 6c 6f 6f 70 | 32 2b 31 0d 05 c8 3e 41 |t's loop|2+1...>A|
|00000f60| 44 44 4e 45 20 52 31 2c | 52 31 2c 52 38 2c 4c 53 |DDNE R1,|R1,R8,LS|
|00000f70| 4c 23 38 20 20 20 20 3b | 20 61 6e 64 20 6d 6f 76 |L#8 ;| and mov|
|00000f80| 65 20 74 6f 20 63 6f 72 | 72 65 63 74 20 62 69 74 |e to cor|rect bit|
|00000f90| 20 69 6e 20 70 69 63 63 | 79 0d 05 d2 18 41 44 44 | in picc|y....ADD|
|00000fa0| 4e 45 20 52 31 2c 52 31 | 2c 52 38 2c 4c 53 4c 23 |NE R1,R1|,R8,LSL#|
|00000fb0| 36 0d 05 dc 10 42 4c 20 | 70 6c 6f 74 61 6c 69 6e |6....BL |plotalin|
|00000fc0| 65 0d 05 e6 04 0d 05 f0 | 19 41 44 44 20 52 30 2c |e.......|.ADD R0,|
|00000fd0| 52 30 2c 23 33 32 30 3c | 3c 6d 6f 64 65 25 0d 05 |R0,#320<|<mode%..|
|00000fe0| fa 0e 43 4d 50 20 52 31 | 31 2c 52 37 0d 06 04 19 |..CMP R1|1,R7....|
|00000ff0| 42 4c 54 20 64 72 61 77 | 66 6c 69 70 79 6c 69 6e |BLT draw|flipylin|
|00001000| 65 6c 6f 6f 70 0d 06 0e | 1c 4c 44 4d 46 44 20 52 |eloop...|.LDMFD R|
|00001010| 31 33 21 2c 7b 52 30 2d | 52 31 32 2c 52 31 35 7d |13!,{R0-|R12,R15}|
|00001020| 5e 0d 06 18 04 0d 06 22 | 04 0d 06 2c 2c 3b 20 2a |^......"|...,,; *|
|00001030| 2a 2a 2a 2a 2a 2a 2a 2a | 20 43 52 45 41 54 45 20 |********| CREATE |
|00001040| 4d 41 53 4b 20 28 e3 20 | 53 42 54 45 58 54 29 20 |MASK (. |SBTEXT) |
|00001050| 2a 2a 2a 2a 2a 0d 06 36 | 0f 2e 63 72 65 61 74 65 |*****..6|..create|
|00001060| 6d 61 73 6b 0d 06 40 1b | 53 54 4d 46 44 20 52 31 |mask..@.|STMFD R1|
|00001070| 33 21 2c 7b 52 30 2d 52 | 31 32 2c 52 31 34 7d 0d |3!,{R0-R|12,R14}.|
|00001080| 06 4a 12 a4 61 64 72 28 | 30 2c 73 62 74 65 78 74 |.J..adr(|0,sbtext|
|00001090| 29 0d 06 54 17 a4 61 64 | 72 28 31 2c 65 6e 64 6f |)..T..ad|r(1,endo|
|000010a0| 66 73 62 74 65 78 74 29 | 0d 06 5e 14 a4 61 64 72 |fsbtext)|..^..adr|
|000010b0| 28 32 2c 74 65 78 74 6d | 61 73 6b 29 0d 06 68 0d |(2,textm|ask)..h.|
|000010c0| 4d 4f 56 20 52 34 2c 23 | 30 0d 06 72 0f 4d 4f 56 |MOV R4,#|0..r.MOV|
|000010d0| 20 52 35 2c 23 26 46 46 | 0d 06 7c 13 2e 63 72 65 | R5,#&FF|..|..cre|
|000010e0| 61 74 65 6d 61 73 6b 6c | 6f 6f 70 0d 06 86 12 4c |atemaskl|oop....L|
|000010f0| 44 52 42 20 52 33 2c 5b | 30 5d 2c 23 31 0d 06 90 |DRB R3,[|0],#1...|
|00001100| 0d 54 45 51 20 52 33 2c | 23 30 0d 06 9a 15 53 54 |.TEQ R3,|#0....ST|
|00001110| 52 45 51 42 20 52 34 2c | 5b 52 32 5d 2c 23 31 0d |REQB R4,|[R2],#1.|
|00001120| 06 a4 15 53 54 52 4e 45 | 42 20 52 35 2c 5b 52 32 |...STRNE|B R5,[R2|
|00001130| 5d 2c 23 31 0d 06 ae 0d | 43 4d 50 20 52 30 2c 52 |],#1....|CMP R0,R|
|00001140| 31 0d 06 b8 16 42 4c 45 | 20 63 72 65 61 74 65 6d |1....BLE| createm|
|00001150| 61 73 6b 6c 6f 6f 70 0d | 06 c2 1c 4c 44 4d 46 44 |askloop.|...LDMFD|
|00001160| 20 52 31 33 21 2c 7b 52 | 30 2d 52 31 32 2c 52 31 | R13!,{R|0-R12,R1|
|00001170| 35 7d 5e 0d 06 cc 04 0d | 06 d6 04 0d 06 e0 20 2e |5}^.....|...... .|
|00001180| 79 6f 66 66 73 65 74 20 | 45 51 55 44 20 31 33 38 |yoffset |EQUD 138|
|00001190| 2a 33 32 30 3c 3c 6d 6f | 64 65 25 0d 06 ea 32 3b |*320<<mo|de%...2;|
|000011a0| 20 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a | *******|********|
|000011b0| 2a 2a 2a 2a 20 f0 20 53 | 42 20 54 45 58 54 20 2a |**** . S|B TEXT *|
|000011c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0d 06 f4 |********|*****...|
|000011d0| 2f 3b 20 49 4e 20 52 30 | 20 3d 20 53 74 72 65 6e |/; IN R0| = Stren|
|000011e0| 67 74 68 20 6f 66 20 77 | 68 69 74 65 20 74 6f 20 |gth of w|hite to |
|000011f0| 6f 72 72 20 69 6e 20 77 | 6f 72 64 29 0d 06 fe 3b |orr in w|ord)...;|
|00001200| 3b 20 20 20 20 52 31 20 | 3d 20 30 20 74 6f 20 6e |; R1 |= 0 to n|
|00001210| 6f 74 20 69 6e 63 6c 75 | 64 20 74 65 78 74 20 64 |ot inclu|d text d|
|00001220| 61 74 61 20 6f 72 20 31 | 20 74 6f 20 69 6e 63 6c |ata or 1| to incl|
|00001230| 75 64 65 20 69 74 2e 0d | 07 08 0f 2e 70 6c 6f 74 |ude it..|....plot|
|00001240| 73 62 74 65 78 74 0d 07 | 12 1b 53 54 4d 46 44 20 |sbtext..|..STMFD |
|00001250| 52 31 33 21 2c 7b 52 30 | 2d 52 31 32 2c 52 31 34 |R13!,{R0|-R12,R14|
|00001260| 7d 0d 07 1c 12 a4 61 64 | 72 28 32 2c 73 62 74 65 |}.....ad|r(2,sbte|
|00001270| 78 74 29 0d 07 26 14 a4 | 61 64 72 28 33 2c 74 65 |xt)..&..|adr(3,te|
|00001280| 78 74 6d 61 73 6b 29 0d | 07 30 04 0d 07 3a 25 4c |xtmask).|.0...:%L|
|00001290| 44 52 20 52 34 2c 76 64 | 75 6f 75 74 20 20 20 20 |DR R4,vd|uout |
|000012a0| 20 3b 20 4c 6f 61 64 20 | 54 65 78 74 20 70 6f 73 | ; Load |Text pos|
|000012b0| 0d 07 44 2d 41 44 44 20 | 52 34 2c 52 34 2c 23 36 |..D-ADD |R4,R4,#6|
|000012c0| 34 20 20 20 20 20 3b 20 | 4d 6f 76 65 20 74 6f 20 |4 ; |Move to |
|000012d0| 63 6f 72 72 65 63 74 20 | 58 20 70 6f 73 0d 07 4e |correct |X pos..N|
|000012e0| 12 4c 44 52 20 52 35 2c | 79 6f 66 66 73 65 74 0d |.LDR R5,|yoffset.|
|000012f0| 07 58 34 41 44 44 20 52 | 34 2c 52 34 2c 52 35 20 |.X4ADD R|4,R4,R5 |
|00001300| 20 20 20 20 20 20 3b 20 | 4d 69 76 65 20 74 6f 20 | ; |Mive to |
|00001310| 63 6f 72 72 65 63 74 20 | 68 65 69 67 68 74 20 64 |correct |height d|
|00001320| 6f 77 6e 0d 07 62 28 4d | 4f 56 20 52 35 2c 23 34 |own..b(M|OV R5,#4|
|00001330| 30 20 20 20 20 20 20 20 | 20 3b 20 34 30 20 6c 69 |0 | ; 40 li|
|00001340| 6e 65 73 20 74 6f 20 70 | 6c 6f 74 0d 07 6c 13 2e |nes to p|lot..l..|
|00001350| 70 6c 6f 74 73 62 74 65 | 78 74 6c 6f 6f 70 0d 07 |plotsbte|xtloop..|
|00001360| 76 24 4d 4f 56 20 52 31 | 32 2c 23 32 36 20 20 20 |v$MOV R1|2,#26 |
|00001370| 20 20 20 20 20 20 3b 20 | 32 36 2a 32 20 57 4f 52 | ; |26*2 WOR|
|00001380| 44 53 0d 07 80 14 2e 70 | 6c 6f 74 73 62 74 65 78 |DS.....p|lotsbtex|
|00001390| 74 78 6c 6f 6f 70 0d 07 | 8a 2a 4c 44 4d 49 41 20 |txloop..|.*LDMIA |
|000013a0| 52 33 21 2c 7b 52 36 2c | 52 37 7d 20 20 20 20 20 |R3!,{R6,|R7} |
|000013b0| 3b 20 6c 6f 61 64 20 66 | 72 6f 6d 20 6d 61 73 6b |; load f|rom mask|
|000013c0| 0d 07 94 2b 4c 44 4d 49 | 41 20 52 34 2c 7b 52 38 |...+LDMI|A R4,{R8|
|000013d0| 2c 52 39 7d 20 20 20 20 | 20 20 3b 20 4c 6f 61 64 |,R9} | ; Load|
|000013e0| 20 66 72 6f 6d 20 73 63 | 72 65 6e 0d 07 9e 10 42 | from sc|ren....B|
|000013f0| 49 43 20 52 38 2c 52 38 | 2c 52 36 0d 07 a8 48 42 |IC R8,R8|,R6...HB|
|00001400| 49 43 20 52 39 2c 52 39 | 2c 52 37 20 20 20 20 20 |IC R9,R9|,R7 |
|00001410| 20 20 20 20 20 3b 20 43 | 6c 65 61 72 20 73 65 74 | ; C|lear set|
|00001420| 20 62 69 74 73 20 28 26 | 66 66 20 69 6e 20 6d 61 | bits (&|ff in ma|
|00001430| 73 6b 20 6d 65 61 6e 73 | 20 69 74 27 73 20 74 68 |sk means| it's th|
|00001440| 65 72 65 0d 07 b2 23 80 | 20 52 36 2c 52 36 2c 52 |ere...#.| R6,R6,R|
|00001450| 30 20 20 20 20 20 20 20 | 20 20 20 3b 20 4d 61 6b |0 | ; Mak|
|00001460| 65 20 67 72 65 79 0d 07 | bc 0e 80 20 52 37 2c 52 |e grey..|... R7,R|
|00001470| 37 2c 52 30 0d 07 c6 0f | 84 52 20 52 38 2c 52 38 |7,R0....|.R R8,R8|
|00001480| 2c 52 36 0d 07 d0 31 84 | 52 20 52 39 2c 52 39 2c |,R6...1.|R R9,R9,|
|00001490| 52 37 20 20 20 20 20 20 | 20 20 20 20 20 3b 20 50 |R7 | ; P|
|000014a0| 6c 6f 74 20 67 72 65 79 | 20 6f 6e 74 6f 20 73 63 |lot grey| onto sc|
|000014b0| 72 65 65 6e 0d 07 da 0d | 54 45 51 20 52 31 2c 23 |reen....|TEQ R1,#|
|000014c0| 30 0d 07 e4 17 4c 44 4d | 4e 45 49 41 20 52 32 21 |0....LDM|NEIA R2!|
|000014d0| 2c 7b 52 36 2c 52 37 7d | 0d 07 ee 11 84 52 4e 45 |,{R6,R7}|.....RNE|
|000014e0| 20 52 38 2c 52 38 2c 52 | 36 0d 07 f8 11 84 52 4e | R8,R8,R|6.....RN|
|000014f0| 45 20 52 39 2c 52 39 2c | 52 37 0d 08 02 11 5d 3a |E R9,R9,|R7....]:|
|00001500| e7 20 6d 6f 64 65 25 3d | 30 20 8c 0d 08 0c 0e 5b |. mode%=|0 .....[|
|00001510| 4f 50 54 20 70 61 73 73 | 25 0d 08 16 31 53 54 4d |OPT pass|%...1STM|
|00001520| 49 41 20 52 34 21 2c 7b | 52 38 2c 52 39 7d 20 20 |IA R4!,{|R8,R9} |
|00001530| 20 20 20 3b 20 53 74 6f | 72 65 20 62 61 63 6b 20 | ; Sto|re back |
|00001540| 6e 65 77 20 73 63 72 65 | 65 6e 0d 08 20 05 5d 0d |new scre|en.. .].|
|00001550| 08 2a 05 cc 0d 08 34 0e | 5b 4f 50 54 20 70 61 73 |.*....4.|[OPT pas|
|00001560| 73 25 0d 08 3e 14 53 54 | 4d 49 41 20 52 34 2c 7b |s%..>.ST|MIA R4,{|
|00001570| 52 38 2c 52 39 7d 0d 08 | 48 12 41 44 44 20 52 34 |R8,R9}..|H.ADD R4|
|00001580| 2c 52 34 2c 23 33 32 30 | 0d 08 52 15 53 54 4d 49 |,R4,#320|..R.STMI|
|00001590| 41 20 52 34 21 2c 7b 52 | 38 2c 52 39 7d 0d 08 5c |A R4!,{R|8,R9}..\|
|000015a0| 12 53 55 42 20 52 34 2c | 52 34 2c 23 33 32 30 0d |.SUB R4,|R4,#320.|
|000015b0| 08 66 05 5d 0d 08 70 05 | cd 0d 08 7a 0e 5b 4f 50 |.f.]..p.|...z.[OP|
|000015c0| 54 20 70 61 73 73 25 0d | 08 84 13 53 55 42 53 20 |T pass%.|...SUBS |
|000015d0| 52 31 32 2c 52 31 32 2c | 23 31 0d 08 8e 17 42 47 |R12,R12,|#1....BG|
|000015e0| 54 20 70 6c 6f 74 73 62 | 74 65 78 74 78 6c 6f 6f |T plotsb|textxloo|
|000015f0| 70 0d 08 98 36 41 44 44 | 20 52 34 2c 52 34 2c 23 |p...6ADD| R4,R4,#|
|00001600| 33 32 30 2d 32 30 38 2b | 33 32 30 2a 6d 6f 64 65 |320-208+|320*mode|
|00001610| 25 20 20 20 20 3b 20 4d | 6f 76 65 20 64 6f 77 6e |% ; M|ove down|
|00001620| 20 61 20 6c 69 6e 65 0d | 08 a2 11 53 55 42 53 20 | a line.|...SUBS |
|00001630| 52 35 2c 52 35 2c 23 31 | 0d 08 ac 16 42 47 54 20 |R5,R5,#1|....BGT |
|00001640| 70 6c 6f 74 73 62 74 65 | 78 74 6c 6f 6f 70 0d 08 |plotsbte|xtloop..|
|00001650| b6 1c 4c 44 4d 46 44 20 | 52 31 33 21 2c 7b 52 30 |..LDMFD |R13!,{R0|
|00001660| 2d 52 31 32 2c 52 31 35 | 7d 5e 0d 08 c0 04 0d 08 |-R12,R15|}^......|
|00001670| ca 04 0d 08 d4 4a 3b 20 | 2a 2a 2a 2a 2a 2a 2a 2a |.....J; |********|
|00001680| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001690| 2a 2a 2a 2a 2a 2a 20 47 | 72 65 79 20 69 74 20 64 |****** G|rey it d|
|000016a0| 6f 77 6e 20 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |own ****|********|
|000016b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 38 2d 29 0d 08 de 16 |********|*8-)....|
|000016c0| 3b 20 49 6e 20 72 30 20 | 3d 20 67 72 65 79 77 6f |; In r0 |= greywo|
|000016d0| 72 64 0d 08 e8 0f 2e 67 | 72 65 79 69 74 64 6f 77 |rd.....g|reyitdow|
|000016e0| 6e 0d 08 f2 1b 73 74 6d | 66 64 20 72 31 33 21 2c |n....stm|fd r13!,|
|000016f0| 7b 72 30 2d 72 31 32 2c | 72 31 34 7d 0d 08 fc 0d |{r0-r12,|r14}....|
|00001700| 4d 4f 56 20 52 31 2c 52 | 30 0d 09 06 11 4c 44 52 |MOV R1,R|0....LDR|
|00001710| 20 52 30 2c 76 64 75 6f | 75 74 0d 09 10 36 6d 6f | R0,vduo|ut...6mo|
|00001720| 76 20 52 31 32 2c 23 28 | 32 34 30 2a 33 32 30 2f |v R12,#(|240*320/|
|00001730| 38 30 29 3c 3c 6d 6f 64 | 65 25 20 20 20 20 20 3b |80)<<mod|e% ;|
|00001740| 20 4e 75 6d 62 65 72 20 | 6f 66 20 74 69 6d 65 73 | Number |of times|
|00001750| 0d 09 1a 0d 4d 4f 56 20 | 52 32 2c 52 31 0d 09 24 |....MOV |R2,R1..$|
|00001760| 0d 4d 4f 56 20 52 33 2c | 52 31 0d 09 2e 0d 4d 4f |.MOV R3,|R1....MO|
|00001770| 56 20 52 34 2c 52 31 0d | 09 38 0d 4d 4f 56 20 52 |V R4,R1.|.8.MOV R|
|00001780| 35 2c 52 31 0d 09 42 0d | 4d 4f 56 20 52 36 2c 52 |5,R1..B.|MOV R6,R|
|00001790| 31 0d 09 4c 0d 4d 4f 56 | 20 52 37 2c 52 31 0d 09 |1..L.MOV| R7,R1..|
|000017a0| 56 0d 4d 4f 56 20 52 38 | 2c 52 31 0d 09 60 0d 4d |V.MOV R8|,R1..`.M|
|000017b0| 4f 56 20 52 39 2c 52 31 | 0d 09 6a 38 4d 4f 56 20 |OV R9,R1|..j8MOV |
|000017c0| 52 31 30 2c 52 31 20 20 | 20 20 20 3b 20 31 30 20 |R10,R1 | ; 10 |
|000017d0| 52 65 67 73 69 73 74 65 | 72 73 21 21 21 20 3d 20 |Regsiste|rs!!! = |
|000017e0| 34 30 20 62 79 74 65 73 | 20 61 20 74 68 72 6f 77 |40 bytes| a throw|
|000017f0| 0d 09 74 0f 2e 67 72 65 | 79 75 70 6c 6f 6f 70 0d |..t..gre|yuploop.|
|00001800| 09 7e 16 53 54 4d 49 41 | 20 52 30 21 2c 7b 52 31 |.~.STMIA| R0!,{R1|
|00001810| 2d 52 31 30 7d 0d 09 88 | 16 53 54 4d 49 41 20 52 |-R10}...|.STMIA R|
|00001820| 30 21 2c 7b 52 31 2d 52 | 31 30 7d 0d 09 92 13 53 |0!,{R1-R|10}....S|
|00001830| 55 42 53 20 52 31 32 2c | 52 31 32 2c 23 31 0d 09 |UBS R12,|R12,#1..|
|00001840| 9c 12 42 47 54 20 67 72 | 65 79 75 70 6c 6f 6f 70 |..BGT gr|eyuploop|
|00001850| 0d 09 a6 1c 4c 44 4d 46 | 44 20 52 31 33 21 2c 7b |....LDMF|D R13!,{|
|00001860| 52 30 2d 52 31 32 2c 52 | 31 35 7d 5e 0d 09 b0 04 |R0-R12,R|15}^....|
|00001870| 0d 09 ba 34 3b 20 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |...4; **|********|
|00001880| 20 53 43 52 4f 4c 4c 20 | 53 43 52 45 45 4e 20 55 | SCROLL |SCREEN U|
|00001890| 50 20 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |P ******|********|
|000018a0| 2a 2a 2a 2a 0d 09 c4 13 | 2e 73 63 72 6f 6c 6c 73 |****....|.scrolls|
|000018b0| 63 72 65 65 6e 75 70 0d | 09 ce 1b 53 54 4d 46 44 |creenup.|...STMFD|
|000018c0| 20 52 31 33 21 2c 7b 52 | 30 2d 52 31 32 2c 52 31 | R13!,{R|0-R12,R1|
|000018d0| 34 7d 0d 09 d8 11 4c 44 | 52 20 52 30 2c 76 64 75 |4}....LD|R R0,vdu|
|000018e0| 6f 75 74 0d 09 e2 19 41 | 44 44 20 52 31 2c 52 30 |out....A|DD R1,R0|
|000018f0| 2c 23 33 32 30 3c 3c 6d | 6f 64 65 25 0d 09 ec 0f |,#320<<m|ode%....|
|00001900| 4d 4f 56 20 52 32 2c 23 | 32 33 39 0d 09 f6 17 2e |MOV R2,#|239.....|
|00001910| 73 63 72 6f 6c 6c 73 63 | 72 65 65 6e 75 70 6c 6f |scrollsc|reenuplo|
|00001920| 6f 70 0d 0a 00 10 42 4c | 20 70 6c 6f 74 61 6c 69 |op....BL| plotali|
|00001930| 6e 65 0d 0a 0a 19 41 44 | 44 20 52 30 2c 52 30 2c |ne....AD|D R0,R0,|
|00001940| 23 33 32 30 3c 3c 6d 6f | 64 65 25 0d 0a 14 19 41 |#320<<mo|de%....A|
|00001950| 44 44 20 52 31 2c 52 31 | 2c 23 33 32 30 3c 3c 6d |DD R1,R1|,#320<<m|
|00001960| 6f 64 65 25 0d 0a 1e 11 | 53 55 42 53 20 52 32 2c |ode%....|SUBS R2,|
|00001970| 52 32 2c 23 31 0d 0a 28 | 1a 42 47 54 20 73 63 72 |R2,#1..(|.BGT scr|
|00001980| 6f 6c 6c 73 63 72 65 65 | 6e 75 70 6c 6f 6f 70 0d |ollscree|nuploop.|
|00001990| 0a 32 11 a4 61 64 72 28 | 31 2c 7a 65 72 6f 73 29 |.2..adr(|1,zeros)|
|000019a0| 0d 0a 3c 10 42 4c 20 70 | 6c 6f 74 61 6c 69 6e 65 |..<.BL p|lotaline|
|000019b0| 0d 0a 46 04 0d 0a 50 31 | 3b 20 4e 4f 57 20 57 45 |..F...P1|; NOW WE|
|000019c0| 27 4c 4c 20 54 52 59 20 | 46 41 44 49 4e 47 20 54 |'LL TRY |FADING T|
|000019d0| 48 45 20 b8 50 20 ca 20 | 54 48 45 20 53 43 52 45 |HE .P . |THE SCRE|
|000019e0| 45 4e 3f 3f 3f 0d 0a 5a | 11 4c 44 52 20 52 30 2c |EN???..Z|.LDR R0,|
|000019f0| 76 64 75 6f 75 74 0d 0a | 64 1a a4 61 64 72 28 31 |vduout..|d..adr(1|
|00001a00| 2c 67 72 65 79 73 63 61 | 6c 65 77 6f 72 64 73 29 |,greysca|lewords)|
|00001a10| 0d 0a 6e 13 2e 67 72 65 | 79 6f 75 74 62 69 67 6c |..n..gre|youtbigl|
|00001a20| 6f 6f 70 0d 0a 78 2c 4c | 44 52 20 52 32 2c 5b 52 |oop..x,L|DR R2,[R|
|00001a30| 31 5d 2c 23 34 20 20 20 | 20 20 20 3b 20 4c 6f 61 |1],#4 | ; Loa|
|00001a40| 64 20 61 6e 64 20 69 6e | 63 72 65 6d 65 6e 74 0d |d and in|crement.|
|00001a50| 0a 82 23 4d 4f 56 20 52 | 31 34 2c 23 38 20 20 20 |..#MOV R|14,#8 |
|00001a60| 20 20 20 20 20 20 3b 20 | 38 20 70 65 72 20 6c 69 | ; |8 per li|
|00001a70| 6e 65 0d 0a 8c 15 2e 67 | 72 65 79 6f 75 74 73 6d |ne.....g|reyoutsm|
|00001a80| 61 6c 6c 6c 6f 6f 70 0d | 0a 96 15 4c 44 4d 49 41 |allloop.|...LDMIA|
|00001a90| 20 52 30 2c 7b 52 33 2d | 52 31 32 7d 0d 0a a0 0e | R0,{R3-|R12}....|
|00001aa0| 80 20 52 33 2c 52 33 2c | 52 32 0d 0a aa 0e 80 20 |. R3,R3,|R2..... |
|00001ab0| 52 34 2c 52 34 2c 52 32 | 0d 0a b4 0e 80 20 52 35 |R4,R4,R2|..... R5|
|00001ac0| 2c 52 35 2c 52 32 0d 0a | be 0e 80 20 52 36 2c 52 |,R5,R2..|... R6,R|
|00001ad0| 36 2c 52 32 0d 0a c8 0e | 80 20 52 37 2c 52 37 2c |6,R2....|. R7,R7,|
|00001ae0| 52 32 0d 0a d2 0e 80 20 | 52 38 2c 52 38 2c 52 32 |R2..... |R8,R8,R2|
|00001af0| 0d 0a dc 0e 80 20 52 39 | 2c 52 39 2c 52 32 0d 0a |..... R9|,R9,R2..|
|00001b00| e6 10 80 20 52 31 30 2c | 52 31 30 2c 52 32 0d 0a |... R10,|R10,R2..|
|00001b10| f0 10 80 20 52 31 31 2c | 52 31 31 2c 52 32 0d 0a |... R11,|R11,R2..|
|00001b20| fa 10 80 20 52 31 32 2c | 52 31 32 2c 52 32 0d 0b |... R12,|R12,R2..|
|00001b30| 04 11 5d 3a e7 20 6d 6f | 64 65 25 3d 31 20 8c 0d |..]:. mo|de%=1 ..|
|00001b40| 0b 0e 0e 5b 4f 50 54 20 | 70 61 73 73 25 0d 0b 18 |...[OPT |pass%...|
|00001b50| 12 41 44 44 20 52 30 2c | 52 30 2c 23 33 32 30 0d |.ADD R0,|R0,#320.|
|00001b60| 0b 22 15 53 54 4d 49 41 | 20 52 30 2c 7b 52 33 2d |.".STMIA| R0,{R3-|
|00001b70| 52 31 32 7d 0d 0b 2c 12 | 53 55 42 20 52 30 2c 52 |R12}..,.|SUB R0,R|
|00001b80| 30 2c 23 33 32 30 0d 0b | 36 05 5d 0d 0b 40 05 cd |0,#320..|6.]..@..|
|00001b90| 0d 0b 4a 0e 5b 4f 50 54 | 20 70 61 73 73 25 0d 0b |..J.[OPT| pass%..|
|00001ba0| 54 16 53 54 4d 49 41 20 | 52 30 21 2c 7b 52 33 2d |T.STMIA |R0!,{R3-|
|00001bb0| 52 31 32 7d 0d 0b 5e 04 | 0d 0b 68 13 53 55 42 53 |R12}..^.|..h.SUBS|
|00001bc0| 20 52 31 34 2c 52 31 34 | 2c 23 31 0d 0b 72 18 42 | R14,R14|,#1..r.B|
|00001bd0| 47 54 20 67 72 65 79 6f | 75 74 73 6d 61 6c 6c 6c |GT greyo|utsmalll|
|00001be0| 6f 6f 70 0d 0b 7c 3a 41 | 44 44 20 52 30 2c 52 30 |oop..|:A|DD R0,R0|
|00001bf0| 2c 23 33 32 30 2a 6d 6f | 64 65 25 20 20 20 20 20 |,#320*mo|de% |
|00001c00| 20 3b 20 42 69 74 20 64 | 75 62 69 6f 6f 73 20 62 | ; Bit d|ubioos b|
|00001c10| 75 74 20 6e 65 27 72 65 | 20 6d 69 6e 64 0d 0b 86 |ut ne're| mind...|
|00001c20| 16 4c 44 52 20 31 34 2c | 6c 61 73 74 67 72 65 79 |.LDR 14,|lastgrey|
|00001c30| 6f 75 74 0d 0b 90 0e 54 | 45 51 20 52 32 2c 52 31 |out....T|EQ R2,R1|
|00001c40| 34 0d 0b 9a 16 42 4e 45 | 20 67 72 65 79 6f 75 74 |4....BNE| greyout|
|00001c50| 62 69 67 6c 6f 6f 70 0d | 0b a4 04 0d 0b ae 1c 4c |bigloop.|.......L|
|00001c60| 44 4d 46 44 20 52 31 33 | 21 2c 7b 52 30 2d 52 31 |DMFD R13|!,{R0-R1|
|00001c70| 32 2c 52 31 35 7d 5e 0d | 0b b8 1f 2e 6c 61 73 74 |2,R15}^.|....last|
|00001c80| 67 72 65 79 6f 75 74 20 | 45 51 55 44 20 26 46 45 |greyout |EQUD &FE|
|00001c90| 46 45 46 45 46 45 0d 0b | c2 04 0d 0b cc 33 3b 20 |FEFEFE..|.....3; |
|00001ca0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001cb0| 2a 2a 2a 2a 20 f0 20 54 | 45 58 54 20 2a 2a 2a 2a |**** . T|EXT ****|
|00001cc0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0d 0b d6 |********|*****...|
|00001cd0| 38 3b 20 49 6e 20 20 72 | 30 20 3d 20 50 6f 69 6e |8; In r|0 = Poin|
|00001ce0| 74 65 72 20 74 6f 20 74 | 65 78 74 2e 20 28 30 2c |ter to t|ext. (0,|
|00001cf0| 20 31 33 20 6f 72 20 31 | 30 20 74 65 72 6d 69 6e | 13 or 1|0 termin|
|00001d00| 61 74 65 64 29 0d 0b e0 | 13 3b 20 20 20 20 20 72 |ated)...|.; r|
|00001d10| 31 20 3d 20 58 20 63 6f | 0d 0b ea 1d 3b 20 20 20 |1 = X co|....; |
|00001d20| 20 20 72 32 20 3d 20 59 | 20 63 6f 20 28 6c 6f 77 | r2 = Y| co (low|
|00001d30| 20 72 65 73 29 0d 0b f4 | 41 3b 20 4f 75 74 20 72 | res)...|A; Out r|
|00001d40| 30 20 3d 20 50 6f 69 6e | 74 65 72 20 74 6f 20 6e |0 = Poin|ter to n|
|00001d50| 65 78 74 20 43 68 61 72 | 61 63 74 65 72 20 28 61 |ext Char|acter (a|
|00001d60| 66 74 65 72 20 74 65 72 | 6d 69 6e 61 74 69 6f 6e |fter ter|mination|
|00001d70| 20 63 68 61 72 29 0d 0b | fe 21 3b 20 20 20 20 20 | char)..|.!; |
|00001d80| 20 72 31 20 3d 20 58 20 | 63 6f 20 6f 66 20 6e 65 | r1 = X |co of ne|
|00001d90| 78 74 20 63 68 61 72 0d | 0c 08 10 2e 63 6f 6c 6f |xt char.|....colo|
|00001da0| 75 72 77 6f 72 64 73 0d | 0c 12 24 2e 62 6c 61 63 |urwords.|..$.blac|
|00001db0| 6b 63 6f 6c 6f 75 72 20 | 45 51 55 44 20 26 30 30 |kcolour |EQUD &00|
|00001dc0| 30 30 30 30 30 30 20 20 | 3b 20 30 0d 0c 1c 24 2e |000000 |; 0...$.|
|00001dd0| 77 68 69 74 65 63 6f 6c | 6f 75 72 20 45 51 55 44 |whitecol|our EQUD|
|00001de0| 20 26 46 46 46 46 46 46 | 46 46 20 20 3b 20 31 0d | &FFFFFF|FF ; 1.|
|00001df0| 0c 26 24 2e 67 72 65 65 | 6e 63 6f 6c 6f 75 72 20 |.&$.gree|ncolour |
|00001e00| 45 51 55 44 20 26 36 37 | 36 37 36 37 36 37 20 20 |EQUD &67|676767 |
|00001e10| 3b 20 32 0d 0c 30 24 2e | 79 65 6c 6c 6f 63 6f 6c |; 2..0$.|yellocol|
|00001e20| 6f 75 72 20 45 51 55 44 | 20 26 37 37 37 37 37 37 |our EQUD| &777777|
|00001e30| 37 37 20 20 3b 20 33 0d | 0c 3a 24 2e 72 65 64 63 |77 ; 3.|.:$.redc|
|00001e40| 6f 6c 6f 75 72 20 20 20 | 45 51 55 44 20 26 31 37 |olour |EQUD &17|
|00001e50| 31 37 31 37 31 37 20 20 | 3b 20 34 0d 0c 44 24 2e |171717 |; 4..D$.|
|00001e60| 67 72 65 79 63 6f 6c 6f | 75 72 20 20 45 51 55 44 |greycolo|ur EQUD|
|00001e70| 20 26 44 30 44 30 44 30 | 44 30 20 20 3b 20 35 0d | &D0D0D0|D0 ; 5.|
|00001e80| 0c 4e 24 2e 62 6c 75 65 | 63 6f 6c 6f 75 72 20 20 |.N$.blue|colour |
|00001e90| 45 51 55 44 20 26 38 42 | 38 42 38 42 38 42 20 20 |EQUD &8B|8B8B8B |
|00001ea0| 3b 20 36 0d 0c 58 24 2e | 62 72 6f 77 6e 63 6f 6c |; 6..X$.|browncol|
|00001eb0| 6f 75 72 20 45 51 55 44 | 20 26 35 43 35 43 35 43 |our EQUD| &5C5C5C|
|00001ec0| 35 43 20 20 3b 20 37 0d | 0c 62 23 2e 6c 69 67 68 |5C ; 7.|.b#.ligh|
|00001ed0| 74 62 6c 75 65 20 20 20 | 45 51 55 44 20 26 46 42 |tblue |EQUD &FB|
|00001ee0| 46 42 46 42 46 42 20 3b | 20 38 0d 0c 6c 04 0d 0c |FBFBFB ;| 8..l...|
|00001ef0| 76 13 2e 67 72 65 79 73 | 63 61 6c 65 77 6f 72 64 |v..greys|caleword|
|00001f00| 73 0d 0c 80 0a 45 51 55 | 44 20 30 0d 0c 8a 12 45 |s....EQU|D 0....E|
|00001f10| 51 55 44 20 26 30 31 30 | 31 30 31 30 31 0d 0c 94 |QUD &010|10101...|
|00001f20| 12 45 51 55 44 20 26 30 | 32 30 32 30 32 30 32 0d |.EQUD &0|2020202.|
|00001f30| 0c 9e 12 45 51 55 44 20 | 26 30 33 30 33 30 33 30 |...EQUD |&0303030|
|00001f40| 33 0d 0c a8 12 45 51 55 | 44 20 26 32 43 32 43 32 |3....EQU|D &2C2C2|
|00001f50| 43 32 43 0d 0c b2 12 45 | 51 55 44 20 26 32 44 32 |C2C....E|QUD &2D2|
|00001f60| 44 32 44 32 44 0d 0c bc | 12 45 51 55 44 20 26 32 |D2D2D...|.EQUD &2|
|00001f70| 45 32 45 32 45 32 45 0d | 0c c6 12 45 51 55 44 20 |E2E2E2E.|...EQUD |
|00001f80| 26 32 46 32 46 32 46 32 | 46 0d 0c d0 12 45 51 55 |&2F2F2F2|F....EQU|
|00001f90| 44 20 26 44 30 44 30 44 | 30 44 30 0d 0c da 12 45 |D &D0D0D|0D0....E|
|00001fa0| 51 55 44 20 26 44 31 44 | 31 44 31 44 31 0d 0c e4 |QUD &D1D|1D1D1...|
|00001fb0| 12 45 51 55 44 20 26 44 | 32 44 32 44 32 44 32 0d |.EQUD &D|2D2D2D2.|
|00001fc0| 0c ee 12 45 51 55 44 20 | 26 44 33 44 33 44 33 44 |...EQUD |&D3D3D3D|
|00001fd0| 33 0d 0c f8 12 45 51 55 | 44 20 26 46 43 46 43 46 |3....EQU|D &FCFCF|
|00001fe0| 43 46 43 0d 0d 02 12 45 | 51 55 44 20 26 46 44 46 |CFC....E|QUD &FDF|
|00001ff0| 44 46 44 46 44 0d 0d 0c | 12 45 51 55 44 20 26 46 |DFDFD...|.EQUD &F|
|00002000| 45 46 45 46 45 46 45 0d | 0d 16 12 45 51 55 44 20 |EFEFEFE.|...EQUD |
|00002010| 26 46 46 46 46 46 46 46 | 46 0d 0d 20 04 0d 0d 2a |&FFFFFFF|F.. ...*|
|00002020| 27 2e 62 61 63 6b 67 72 | 6f 75 6e 64 63 6f 6c 6f |'.backgr|oundcolo|
|00002030| 75 72 20 45 51 55 44 20 | 21 62 6c 61 63 6b 63 6f |ur EQUD |!blackco|
|00002040| 6c 6f 75 72 0d 0d 34 52 | 2e 66 6f 72 67 72 6f 75 |lour..4R|.forgrou|
|00002050| 6e 64 63 6f 6c 6f 75 72 | 20 45 51 55 44 20 21 6c |ndcolour| EQUD !l|
|00002060| 69 67 68 74 62 6c 75 65 | 20 20 20 20 3b 20 54 48 |ightblue| ; TH|
|00002070| 45 53 45 20 57 49 4c 4c | 20 42 45 20 55 53 45 44 |ESE WILL| BE USED|
|00002080| 20 b8 20 41 4c 4c 4f 57 | 20 59 4f 55 20 b8 20 fb | . ALLOW| YOU . .|
|00002090| 20 b8 4b 45 4e 53 0d 0d | 3e 04 0d 0d 48 3b 2e 74 | .KENS..|>...H;.t|
|000020a0| 65 78 74 79 63 6f 20 45 | 51 55 44 20 30 20 20 20 |extyco E|QUD 0 |
|000020b0| 20 20 20 20 20 20 20 20 | 20 3b 20 46 6f 72 20 75 | | ; For u|
|000020c0| 73 65 20 77 68 65 6e 20 | 77 65 20 75 73 65 20 74 |se when |we use t|
|000020d0| 6f 6b 65 6e 73 0d 0d 52 | 0d 2e 70 6c 6f 74 74 65 |okens..R|..plotte|
|000020e0| 78 74 0d 0d 5c 1b 53 54 | 4d 46 44 20 52 31 33 21 |xt..\.ST|MFD R13!|
|000020f0| 2c 7b 52 32 2d 52 31 32 | 2c 52 31 34 7d 0d 0d 66 |,{R2-R12|,R14}..f|
|00002100| 2b 53 54 52 20 52 32 2c | 74 65 78 74 79 63 6f 20 |+STR R2,|textyco |
|00002110| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 20 54 | | ; T|
|00002120| 6f 6b 65 6e 73 21 21 21 | 0d 0d 70 04 0d 0d 7a 60 |okens!!!|..p...z`|
|00002130| 52 53 42 20 52 31 30 2c | 52 32 2c 23 32 34 30 20 |RSB R10,|R2,#240 |
|00002140| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 20 ac 45 | | ; .E|
|00002150| 20 54 48 45 52 45 20 49 | 53 20 41 20 43 48 45 43 | THERE I|S A CHEC|
|00002160| 4b 20 e3 20 30 20 6c 69 | 6e 65 73 20 6f 72 20 6c |K . 0 li|nes or l|
|00002170| 65 73 73 20 69 6e 20 74 | 68 65 20 63 68 61 72 20 |ess in t|he char |
|00002180| 70 6c 6f 74 74 69 6e 67 | 20 62 69 74 0d 0d 84 0e |plotting| bit....|
|00002190| 43 4d 50 20 52 31 30 2c | 23 35 0d 0d 8e 10 4d 4f |CMP R10,|#5....MO|
|000021a0| 56 47 54 20 52 31 30 2c | 23 35 0d 0d 98 04 0d 0d |VGT R10,|#5......|
|000021b0| a2 1b 53 54 52 20 52 31 | 30 2c 63 68 61 72 6c 69 |..STR R1|0,charli|
|000021c0| 6e 65 73 74 6f 70 6c 6f | 74 0d 0d ac 2b 4d 4f 56 |nestoplo|t...+MOV|
|000021d0| 20 52 39 2c 52 31 20 20 | 20 20 20 20 20 20 20 20 | R9,R1 | |
|000021e0| 20 20 20 20 20 20 20 20 | 3b 20 53 74 6f 72 65 20 | |; Store |
|000021f0| 58 20 63 6f 0d 0d b6 12 | a4 61 64 72 28 35 2c 76 |X co....|.adr(5,v|
|00002200| 64 75 6f 75 74 29 0d 0d | c0 27 4c 44 52 20 52 35 |duout)..|.'LDR R5|
|00002210| 2c 5b 52 35 5d 20 20 20 | 20 20 20 20 20 3b 20 4c |,[R5] | ; L|
|00002220| 6f 61 64 20 73 63 72 65 | 65 6e 20 63 6f 0d 0d ca |oad scre|en co...|
|00002230| 12 4d 4f 56 20 52 31 32 | 2c 23 6d 6f 64 65 25 0d |.MOV R12|,#mode%.|
|00002240| 0d d4 13 4d 4f 56 20 52 | 37 2c 52 32 2c 4c 53 4c |...MOV R|7,R2,LSL|
|00002250| 23 36 0d 0d de 30 41 44 | 44 20 52 37 2c 52 37 2c |#6...0AD|D R7,R7,|
|00002260| 52 32 2c 4c 53 4c 23 38 | 20 20 20 20 20 20 20 3b |R2,LSL#8| ;|
|00002270| 20 52 37 20 3d 20 4c 6f | 77 20 72 65 73 20 59 20 | R7 = Lo|w res Y |
|00002280| 63 6f 0d 0d e8 38 41 44 | 44 20 52 31 2c 52 35 2c |co...8AD|D R1,R5,|
|00002290| 52 31 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3b |R1 | ;|
|000022a0| 20 52 31 20 69 73 20 73 | 63 72 65 65 6e 20 70 6f | R1 is s|creen po|
|000022b0| 69 6e 74 65 72 20 2b 58 | 63 6f 0d 0d f2 30 41 44 |inter +X|co...0AD|
|000022c0| 44 20 52 31 2c 52 31 2c | 52 37 2c 4c 53 4c 20 52 |D R1,R1,|R7,LSL R|
|000022d0| 31 32 20 20 20 20 20 3b | 20 52 31 20 69 73 20 6e |12 ;| R1 is n|
|000022e0| 6f 77 20 70 6f 69 6e 74 | 65 72 0d 0d fc 04 0d 0e |ow point|er......|
|000022f0| 06 3e 4d 4f 56 20 52 37 | 2c 52 30 20 20 20 20 20 |.>MOV R7|,R0 |
|00002300| 20 20 20 20 20 20 20 20 | 20 20 3b 20 52 37 20 69 | | ; R7 i|
|00002310| 73 20 74 68 65 20 70 6f | 69 6e 74 65 72 20 74 6f |s the po|inter to|
|00002320| 20 74 68 65 20 6d 65 73 | 73 61 67 65 0d 0e 10 1b | the mes|sage....|
|00002330| 4c 44 52 20 52 32 2c 62 | 61 63 6b 67 72 6f 75 6e |LDR R2,b|ackgroun|
|00002340| 64 63 6f 6c 6f 75 72 0d | 0e 1a 36 4c 44 52 20 52 |dcolour.|..6LDR R|
|00002350| 33 2c 66 6f 72 67 72 6f | 75 6e 64 63 6f 6c 6f 75 |3,forgro|undcolou|
|00002360| 72 20 20 20 20 20 20 20 | 3b 20 4c 6f 61 64 20 64 |r |; Load d|
|00002370| 65 66 61 6c 74 20 63 6f | 6c 6f 75 72 73 0d 0e 24 |efalt co|lours..$|
|00002380| 4b 53 54 4d 46 44 20 52 | 31 33 21 2c 7b 52 32 2c |KSTMFD R|13!,{R2,|
|00002390| 52 33 7d 20 20 20 20 20 | 20 20 20 20 20 3b 20 4b |R3} | ; K|
|000023a0| 65 65 70 20 74 68 65 73 | 65 20 73 6f 20 77 65 20 |eep thes|e so we |
|000023b0| 63 61 6e 20 73 61 76 65 | 20 74 68 65 6d 20 62 61 |can save| them ba|
|000023c0| 63 6b 20 6c 61 74 65 72 | 0d 0e 2e 2c a4 61 64 72 |ck later|...,.adr|
|000023d0| 28 31 31 2c 61 6c 70 68 | 61 62 65 74 29 20 20 20 |(11,alph|abet) |
|000023e0| 20 20 20 20 3b 20 52 31 | 31 20 3d 20 41 6c 70 68 | ; R1|1 = Alph|
|000023f0| 61 62 65 74 0d 0e 38 29 | a4 61 64 72 28 38 2c 63 |abet..8)|.adr(8,c|
|00002400| 6f 6c 6f 75 72 77 6f 72 | 64 73 29 20 20 20 20 20 |olourwor|ds) |
|00002410| 3b 20 52 38 20 3d 20 43 | 6f 6c 6f 75 72 0d 0e 42 |; R8 = C|olour..B|
|00002420| 04 0d 0e 4c 11 2e 70 6c | 6f 74 74 65 78 74 6c 6f |...L..pl|ottextlo|
|00002430| 6f 70 0d 0e 56 26 4c 44 | 52 42 20 52 30 2c 5b 52 |op..V&LD|RB R0,[R|
|00002440| 37 5d 2c 23 31 20 20 20 | 20 20 20 20 20 3b 20 4c |7],#1 | ; L|
|00002450| 6f 61 64 20 63 68 61 72 | 0d 0e 60 0e 54 45 51 20 |oad char|..`.TEQ |
|00002460| 52 30 2c 23 31 33 0d 0e | 6a 3c 54 45 51 4e 45 20 |R0,#13..|j<TEQNE |
|00002470| 52 30 2c 23 31 30 20 20 | 20 20 20 20 20 20 20 20 |R0,#10 | |
|00002480| 20 20 3b 20 49 73 20 69 | 74 20 61 6e 20 65 78 69 | ; Is i|t an exi|
|00002490| 74 20 63 68 61 72 3f 20 | 20 28 31 33 2c 31 30 2c |t char? | (13,10,|
|000024a0| 30 29 0d 0e 74 0f 54 45 | 51 4e 45 20 52 30 2c 23 |0)..t.TE|QNE R0,#|
|000024b0| 30 0d 0e 7e 26 ec 51 20 | 52 31 2c 52 39 20 20 20 |0..~&.Q |R1,R9 |
|000024c0| 20 20 20 20 20 20 20 20 | 20 3b 20 52 65 73 74 6f | | ; Resto|
|000024d0| 72 65 20 58 20 63 6f 0d | 0e 88 45 ec 51 20 52 30 |re X co.|..E.Q R0|
|000024e0| 2c 52 37 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |,R7 | |
|000024f0| 20 3b 20 50 75 74 20 70 | 6f 69 6e 74 65 72 20 74 | ; Put p|ointer t|
|00002500| 6f 20 6e 65 78 74 20 63 | 68 61 72 20 69 6e 20 63 |o next c|har in c|
|00002510| 6f 72 72 65 63 74 20 70 | 6c 61 63 65 0d 0e 92 36 |orrect p|lace...6|
|00002520| 4c 44 4d 45 51 46 44 20 | 52 31 33 21 2c 7b 52 32 |LDMEQFD |R13!,{R2|
|00002530| 2c 52 33 7d 20 20 20 20 | 20 3b 20 4c 6f 61 64 20 |,R3} | ; Load |
|00002540| 62 61 63 6b 20 63 6f 6c | 6f 75 72 27 64 20 74 65 |back col|our'd te|
|00002550| 78 74 0d 0e 9c 1d 53 54 | 52 45 51 20 52 32 2c 62 |xt....ST|REQ R2,b|
|00002560| 61 63 6b 67 72 6f 75 6e | 64 63 6f 6c 6f 75 72 0d |ackgroun|dcolour.|
|00002570| 0e a6 3c 53 54 52 45 51 | 20 52 33 2c 66 6f 72 67 |..<STREQ| R3,forg|
|00002580| 72 6f 75 6e 64 63 6f 6c | 6f 75 72 20 20 20 3b 20 |roundcol|our ; |
|00002590| 80 20 52 65 73 74 6f 72 | 65 20 66 6f 72 20 74 68 |. Restor|e for th|
|000025a0| 65 20 6e 65 78 74 20 6f | 6e 65 73 0d 0e b0 1e 4c |e next o|nes....L|
|000025b0| 44 4d 45 51 46 44 20 52 | 31 33 21 2c 7b 52 32 2d |DMEQFD R|13!,{R2-|
|000025c0| 52 31 32 2c 52 31 35 7d | 5e 0d 0e ba 04 0d 0e c4 |R12,R15}|^.......|
|000025d0| 3b 54 45 51 20 52 30 2c | 23 31 20 20 20 20 20 20 |;TEQ R0,|#1 |
|000025e0| 20 20 20 20 20 20 20 20 | 20 3b 20 49 73 20 69 74 | | ; Is it|
|000025f0| 20 63 68 61 6e 67 65 20 | 66 6f 72 67 72 6f 75 6e | change |forgroun|
|00002600| 64 20 63 6f 6c 6f 75 72 | 0d 0e ce 36 4c 44 52 45 |d colour|...6LDRE|
|00002610| 51 62 20 52 30 2c 5b 52 | 37 5d 2c 23 31 20 20 20 |Qb R0,[R|7],#1 |
|00002620| 20 20 20 20 20 3b 20 49 | 66 20 73 6f 2c 20 6c 6f | ; I|f so, lo|
|00002630| 61 64 20 6e 65 78 74 20 | 63 6f 6c 6f 75 72 0d 0e |ad next |colour..|
|00002640| d8 32 4c 44 52 45 51 20 | 52 33 2c 5b 52 38 2c 52 |.2LDREQ |R3,[R8,R|
|00002650| 30 2c 4c 53 4c 23 32 5d | 20 20 3b 20 4c 6f 61 64 |0,LSL#2]| ; Load|
|00002660| 20 66 6f 72 67 6f 75 6e | 64 20 63 6f 6c 6f 75 72 | forgoun|d colour|
|00002670| 0d 0e e2 3e 53 54 52 45 | 51 20 52 33 2c 66 6f 72 |...>STRE|Q R3,for|
|00002680| 67 72 6f 75 6e 64 63 6f | 6c 6f 75 72 20 3b 20 41 |groundco|lour ; A|
|00002690| 6e 64 20 6d 61 6b 65 20 | 73 75 72 65 20 61 6e 79 |nd make |sure any|
|000026a0| 20 74 6f 6b 65 6e 73 20 | 75 73 65 20 69 74 0d 0e | tokens |use it..|
|000026b0| ec 30 42 45 51 20 70 6c | 6f 74 74 65 78 74 6c 6f |.0BEQ pl|ottextlo|
|000026c0| 6f 70 20 20 20 20 20 20 | 20 20 3b 20 41 6e 64 20 |op | ; And |
|000026d0| 72 65 61 64 20 6e 65 78 | 74 20 63 68 61 72 0d 0e |read nex|t char..|
|000026e0| f6 04 0d 0f 00 3b 54 45 | 51 20 52 30 2c 23 32 20 |.....;TE|Q R0,#2 |
|000026f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 20 | | ; |
|00002700| 49 73 20 69 74 20 63 68 | 61 6e 67 65 20 62 61 63 |Is it ch|ange bac|
|00002710| 6b 67 72 6f 75 64 20 63 | 6f 6c 6f 75 72 0d 0f 0a |kgroud c|olour...|
|00002720| 35 4c 44 52 45 51 42 20 | 52 30 2c 5b 52 37 5d 2c |5LDREQB |R0,[R7],|
|00002730| 23 31 20 20 20 20 20 20 | 20 3b 20 4c 6f 61 64 20 |#1 | ; Load |
|00002740| 6e 65 78 74 20 62 79 74 | 65 20 3d 20 63 6f 6c 6f |next byt|e = colo|
|00002750| 75 72 0d 0f 14 34 4c 44 | 52 45 51 20 52 32 2c 5b |ur...4LD|REQ R2,[|
|00002760| 52 38 2c 52 30 2c 4c 53 | 4c 23 32 5d 20 20 3b 20 |R8,R0,LS|L#2] ; |
|00002770| 4c 6f 61 64 20 62 61 63 | 6b 67 72 6f 75 6e 64 20 |Load bac|kground |
|00002780| 63 6f 6c 6f 75 72 0d 0f | 1e 2c 53 54 52 45 51 20 |colour..|.,STREQ |
|00002790| 52 32 2c 62 61 63 6b 67 | 72 6f 75 6e 64 63 6f 6c |R2,backg|roundcol|
|000027a0| 6f 75 72 20 3b 20 41 6e | 64 20 73 74 6f 72 65 20 |our ; An|d store |
|000027b0| 69 74 0d 0f 28 30 42 45 | 51 20 70 6c 6f 74 74 65 |it..(0BE|Q plotte|
|000027c0| 78 74 6c 6f 6f 70 20 20 | 20 20 20 20 20 20 3b 20 |xtloop | ; |
|000027d0| 41 6e 64 20 72 65 61 64 | 20 6e 65 78 74 20 63 68 |And read| next ch|
|000027e0| 61 72 0d 0f 32 04 0d 0f | 3c 2e 41 44 44 20 52 39 |ar..2...|<.ADD R9|
|000027f0| 2c 52 39 2c 23 34 20 20 | 20 20 20 20 20 20 20 20 |,R9,#4 | |
|00002800| 20 3b 20 49 6e 63 72 65 | 61 73 65 20 74 68 65 20 | ; Incre|ase the |
|00002810| 58 20 63 6f 0d 0f 46 04 | 0d 0f 50 14 42 4c 20 70 |X co..F.|..P.BL p|
|00002820| 6c 6f 74 63 68 61 72 61 | 63 74 65 72 0d 0f 5a 12 |lotchara|cter..Z.|
|00002830| 42 20 70 6c 6f 74 74 65 | 78 74 6c 6f 6f 70 0d 0f |B plotte|xtloop..|
|00002840| 64 04 0d 0f 6e 04 0d 0f | 78 04 0d 0f 82 34 3b 20 |d...n...|x....4; |
|00002850| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002860| 2a 2a 2a 20 f0 20 43 48 | 41 52 41 43 54 45 52 20 |*** . CH|ARACTER |
|00002870| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0d 0f |********|******..|
|00002880| 8c 20 3b 20 49 6e 20 72 | 30 20 3d 20 43 68 61 72 |. ; In r|0 = Char|
|00002890| 61 63 74 65 72 20 63 6f | 64 65 20 28 97 29 0d 0f |acter co|de (.)..|
|000028a0| 96 1c 3b 20 20 20 20 72 | 31 20 3d 20 73 63 72 65 |..; r|1 = scre|
|000028b0| 65 6e 20 70 6f 69 6e 74 | 65 72 0d 0f a0 3b 3b 20 |en point|er...;; |
|000028c0| 20 20 20 72 32 20 3d 20 | 42 61 63 6b 67 72 6f 75 | r2 = |Backgrou|
|000028d0| 6e 64 20 63 6f 6c 6f 75 | 72 20 77 6f 72 64 20 28 |nd colou|r word (|
|000028e0| 65 67 20 77 68 69 74 65 | 20 3d 20 26 66 66 66 66 |eg white| = &ffff|
|000028f0| 66 66 66 66 29 0d 0f aa | 3a 3b 20 20 20 20 72 33 |ffff)...|:; r3|
|00002900| 20 3d 20 46 6f 72 67 72 | 6f 75 6e 64 20 63 6f 6c | = Forgr|ound col|
|00002910| 6f 75 72 20 77 6f 72 64 | 20 28 65 67 20 77 68 69 |our word| (eg whi|
|00002920| 74 65 20 3d 20 26 66 66 | 66 66 66 66 66 66 29 0d |te = &ff|ffffff).|
|00002930| 0f b4 21 3b 20 20 20 20 | 72 31 31 3d 20 50 6f 69 |..!; |r11= Poi|
|00002940| 6e 74 65 72 20 74 6f 20 | 41 6c 70 68 61 62 65 74 |nter to |Alphabet|
|00002950| 0d 0f be 29 3b 20 20 20 | 20 72 31 32 3d 20 31 20 |...); | r12= 1 |
|00002960| 66 6f 72 20 68 69 20 72 | 65 73 2c 20 30 20 66 6f |for hi r|es, 0 fo|
|00002970| 72 20 6c 6f 77 20 72 65 | 73 0d 0f c8 22 3b 4f 75 |r low re|s...";Ou|
|00002980| 74 20 72 31 20 3d 20 50 | 6f 69 6e 74 65 72 20 74 |t r1 = P|ointer t|
|00002990| 6f 20 6e 65 78 74 20 63 | 68 61 72 0d 0f d2 1b 2e |o next c|har.....|
|000029a0| 63 68 61 72 6c 69 6e 65 | 73 74 6f 70 6c 6f 74 20 |charline|stoplot |
|000029b0| 45 51 55 44 20 35 0d 0f | dc 12 2e 70 6c 6f 74 63 |EQUD 5..|...plotc|
|000029c0| 68 61 72 61 63 74 65 72 | 0d 0f e6 1e 53 54 4d 46 |haracter|....STMF|
|000029d0| 44 20 52 31 33 21 2c 7b | 52 30 2c 52 32 2d 52 31 |D R13!,{|R0,R2-R1|
|000029e0| 32 2c 52 31 34 7d 0d 0f | f0 43 53 55 42 53 20 52 |2,R14}..|.CSUBS R|
|000029f0| 30 2c 52 30 2c 23 33 32 | 20 20 20 20 20 20 20 20 |0,R0,#32| |
|00002a00| 20 20 20 20 20 3b 20 54 | 61 6b 65 20 33 32 20 6f | ; T|ake 32 o|
|00002a10| 66 66 20 69 74 2c 20 74 | 6f 20 67 69 76 65 20 70 |ff it, t|o give p|
|00002a20| 6f 69 6e 74 65 72 20 69 | 6e 0d 0f fa 35 4c 44 4d |ointer i|n...5LDM|
|00002a30| 4c 54 46 44 20 52 31 33 | 21 2c 7b 52 30 2c 52 32 |LTFD R13|!,{R0,R2|
|00002a40| 2d 52 31 32 2c 52 31 35 | 7d 3b 20 45 58 49 54 20 |-R12,R15|}; EXIT |
|00002a50| e7 20 43 4f 4e 54 52 4f | 4c 20 43 4f 44 45 0d 10 |. CONTRO|L CODE..|
|00002a60| 04 04 0d 10 0e 30 4c 44 | 52 20 52 35 2c 63 68 61 |.....0LD|R R5,cha|
|00002a70| 72 6c 69 6e 65 73 74 6f | 70 6c 6f 74 20 20 20 20 |rlinesto|plot |
|00002a80| 20 20 20 20 20 3b 20 4e | 6d 20 6f 66 20 6c 69 6e | ; N|m of lin|
|00002a90| 65 73 0d 10 18 0d 43 4d | 50 20 52 35 2c 23 30 0d |es....CM|P R5,#0.|
|00002aa0| 10 22 63 4c 44 4d 4c 45 | 46 44 20 52 31 33 21 2c |."cLDMLE|FD R13!,|
|00002ab0| 7b 52 30 2c 52 32 2d 52 | 31 32 2c 52 31 35 7d 5e |{R0,R2-R|12,R15}^|
|00002ac0| 20 20 20 20 3b 20 45 78 | 69 74 20 69 66 20 6e 6f | ; Ex|it if no|
|00002ad0| 20 6c 69 6e 65 73 20 74 | 6f 20 70 6c 6f 74 20 28 | lines t|o plot (|
|00002ae0| 4d 61 6b 65 20 73 75 72 | 65 20 74 68 65 20 70 6f |Make sur|e the po|
|00002af0| 69 6e 74 65 72 20 6d 6f | 76 65 73 20 61 6c 6f 6e |inter mo|ves alon|
|00002b00| 67 29 0d 10 2c 4b 4d 4f | 56 20 52 39 2c 52 35 20 |g)..,KMO|V R9,R5 |
|00002b10| 20 20 20 20 3b 20 57 65 | 27 72 65 20 67 6f 69 6e | ; We|'re goin|
|00002b20| 67 20 74 6f 20 6e 65 65 | 64 20 69 74 20 6c 61 74 |g to nee|d it lat|
|00002b30| 65 72 20 74 6f 20 73 65 | 65 20 77 68 65 72 65 20 |er to se|e where |
|00002b40| 74 6f 20 6d 6f 76 65 20 | 75 70 20 74 6f 0d 10 36 |to move |up to..6|
|00002b50| 04 0d 10 40 37 43 4d 50 | 20 52 30 2c 23 36 35 20 |...@7CMP| R0,#65 |
|00002b60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002b70| 3b 20 49 66 20 69 6e 20 | 6c 6f 77 65 72 20 63 61 |; If in |lower ca|
|00002b80| 73 65 2c 20 74 68 65 6e | 0d 10 4a 31 53 55 42 47 |se, then|..J1SUBG|
|00002b90| 45 20 52 30 2c 52 30 2c | 23 33 32 20 20 20 20 20 |E R0,R0,|#32 |
|00002ba0| 20 20 20 20 20 20 20 3b | 20 46 6f 72 63 65 20 69 | ;| Force i|
|00002bb0| 6e 74 6f 20 75 70 70 65 | 72 0d 10 54 40 4d 4f 56 |nto uppe|r..T@MOV|
|00002bc0| 20 52 34 2c 52 30 2c 4c | 53 4c 23 34 20 20 20 20 | R4,R0,L|SL#4 |
|00002bd0| 20 20 20 20 20 20 20 20 | 3b 20 4d 75 6c 74 69 70 | |; Multip|
|00002be0| 6c 79 20 69 74 20 62 79 | 20 31 36 20 28 65 76 65 |ly it by| 16 (eve|
|00002bf0| 6e 74 61 6c 6c 79 32 30 | 29 0d 10 5e 2f 41 44 44 |ntally20|)..^/ADD|
|00002c00| 20 52 34 2c 52 34 2c 52 | 30 2c 4c 53 4c 23 32 20 | R4,R4,R|0,LSL#2 |
|00002c10| 20 20 20 20 20 20 20 20 | 3b 20 2b 20 2a 34 20 3d | |; + *4 =|
|00002c20| 20 2a 32 30 21 21 21 21 | 0d 10 68 36 41 44 44 20 | *20!!!!|..h6ADD |
|00002c30| 52 34 2c 52 31 31 2c 52 | 34 20 20 20 20 20 20 20 |R4,R11,R|4 |
|00002c40| 20 20 20 20 20 20 20 3b | 20 52 34 20 69 73 20 61 | ;| R4 is a|
|00002c50| 20 70 6f 69 6e 74 65 72 | 20 74 6f 20 69 74 0d 10 | pointer| to it..|
|00002c60| 72 11 2e 63 68 61 72 70 | 6c 6f 74 6c 6f 6f 70 0d |r..charp|lotloop.|
|00002c70| 10 7c 26 4c 44 52 20 52 | 36 2c 5b 52 34 5d 2c 23 |.|&LDR R|6,[R4],#|
|00002c80| 34 20 20 20 20 20 3b 20 | 4c 6f 61 64 20 31 73 74 |4 ; |Load 1st|
|00002c90| 20 77 6f 72 64 0d 10 86 | 36 80 20 52 37 2c 52 33 | word...|6. R7,R3|
|00002ca0| 2c 52 36 20 20 20 20 20 | 20 20 3b 20 52 37 20 69 |,R6 | ; R7 i|
|00002cb0| 73 20 6e 6f 77 20 74 68 | 65 20 66 6f 72 67 72 6f |s now th|e forgro|
|00002cc0| 75 6e 64 20 6c 65 74 74 | 65 72 73 0d 10 90 4d 42 |und lett|ers...MB|
|00002cd0| 49 43 20 52 38 2c 52 32 | 2c 52 36 20 20 20 20 20 |IC R8,R2|,R6 |
|00002ce0| 20 20 3b 20 52 38 20 69 | 73 20 6e 6f 77 20 74 68 | ; R8 i|s now th|
|00002cf0| 65 20 62 61 63 6b 67 72 | 6f 75 6e 64 20 28 77 69 |e backgr|ound (wi|
|00002d00| 74 68 20 62 6c 61 6e 6b | 73 20 66 6f 72 20 66 6f |th blank|s for fo|
|00002d10| 72 67 72 6f 75 6e 64 29 | 0d 10 9a 2f 84 52 20 52 |rground)|.../.R R|
|00002d20| 37 2c 52 37 2c 52 38 20 | 20 20 20 20 20 20 3b 20 |7,R7,R8 | ; |
|00002d30| 52 37 20 69 73 20 74 68 | 65 20 66 69 6e 69 73 68 |R7 is th|e finish|
|00002d40| 65 64 20 77 6f 72 64 0d | 10 a4 37 53 54 52 20 52 |ed word.|..7STR R|
|00002d50| 37 2c 5b 52 31 5d 2c 23 | 33 32 30 20 20 20 3b 20 |7,[R1],#|320 ; |
|00002d60| 53 74 6f 72 65 20 69 74 | 2c 20 61 6e 64 20 6d 6f |Store it|, and mo|
|00002d70| 76 65 20 64 6f 77 6e 20 | 61 20 6c 69 6e 65 0d 10 |ve down |a line..|
|00002d80| ae 0e 54 45 51 20 52 31 | 32 2c 23 31 0d 10 b8 34 |..TEQ R1|2,#1...4|
|00002d90| 53 54 52 45 51 20 52 37 | 2c 5b 52 31 5d 2c 23 33 |STREQ R7|,[R1],#3|
|00002da0| 32 30 20 3b 20 49 66 20 | 68 69 20 72 65 73 2c 20 |20 ; If |hi res, |
|00002db0| 74 68 65 6e 20 73 74 6f | 72 65 20 61 67 61 69 6e |then sto|re again|
|00002dc0| 0d 10 c2 11 53 55 42 53 | 20 52 35 2c 52 35 2c 23 |....SUBS| R5,R5,#|
|00002dd0| 31 0d 10 cc 14 42 47 54 | 20 63 68 61 72 70 6c 6f |1....BGT| charplo|
|00002de0| 74 6c 6f 6f 70 0d 10 d6 | 04 0d 10 e0 37 4d 4f 56 |tloop...|....7MOV|
|00002df0| 20 52 36 2c 52 39 2c 4c | 53 4c 23 36 20 20 20 20 | R6,R9,L|SL#6 |
|00002e00| 20 20 3b 20 4e 75 6d 20 | 6f 66 20 6c 69 6e 65 73 | ; Num |of lines|
|00002e10| 20 74 6f 20 6d 6f 76 65 | 20 75 70 20 2a 33 32 30 | to move| up *320|
|00002e20| 0d 10 ea 16 41 44 44 20 | 52 36 2c 52 36 2c 52 39 |....ADD |R6,R6,R9|
|00002e30| 2c 4c 53 4c 23 38 0d 10 | f4 04 0d 10 fe 44 53 55 |,LSL#8..|.....DSU|
|00002e40| 42 20 52 31 2c 52 31 2c | 52 36 2c 4c 53 4c 20 52 |B R1,R1,|R6,LSL R|
|00002e50| 31 32 20 3b 20 4d 6f 76 | 65 20 62 61 63 6b 20 75 |12 ; Mov|e back u|
|00002e60| 70 2c 20 28 74 61 6b 69 | 6e 67 20 68 69 20 72 65 |p, (taki|ng hi re|
|00002e70| 73 20 69 6e 74 6f 20 61 | 63 63 6f 75 6e 74 0d 11 |s into a|ccount..|
|00002e80| 08 28 41 44 44 20 52 31 | 2c 52 31 2c 23 34 20 20 |.(ADD R1|,R1,#4 |
|00002e90| 20 20 20 20 3b 20 4d 6f | 76 65 20 61 6c 6f 6e 67 | ; Mo|ve along|
|00002ea0| 20 61 20 62 69 74 0d 11 | 12 1e 4c 44 4d 46 44 20 | a bit..|..LDMFD |
|00002eb0| 52 31 33 21 2c 7b 52 30 | 2c 52 32 2d 52 31 32 2c |R13!,{R0|,R2-R12,|
|00002ec0| 52 31 35 7d 0d 11 1c 04 | 0d 11 26 22 3b 20 2a 2a |R15}....|..&"; **|
|00002ed0| 2a 2a 2a 2a 2a 2a 2a 2a | 20 43 45 4e 54 52 45 20 |********| CENTRE |
|00002ee0| 54 45 58 54 20 5c 2a 2a | 2a 2a 0d 11 30 1d 3b 20 |TEXT \**|**..0.; |
|00002ef0| 49 4e 20 72 30 20 3d 20 | 70 69 69 6e 74 65 72 20 |IN r0 = |piinter |
|00002f00| 74 6f 20 74 65 78 74 0d | 11 3a 2c 3b 20 6f 75 74 |to text.|.:,; out|
|00002f10| 20 72 30 20 3d 20 70 6f | 73 69 74 69 6f 6e 20 6f | r0 = po|sition o|
|00002f20| 66 20 73 74 61 72 74 20 | 74 6f 20 70 72 69 6e 74 |f start |to print|
|00002f30| 20 61 74 0d 11 44 0f 2e | 63 65 6e 74 72 65 74 65 | at..D..|centrete|
|00002f40| 78 74 0d 11 4e 1b 53 54 | 4d 46 44 20 52 31 33 21 |xt..N.ST|MFD R13!|
|00002f50| 2c 7b 52 31 2d 52 31 32 | 2c 52 31 34 7d 0d 11 58 |,{R1-R12|,R14}..X|
|00002f60| 0d 4d 4f 56 20 52 31 2c | 23 30 0d 11 62 32 4d 4f |.MOV R1,|#0..b2MO|
|00002f70| 56 20 52 32 2c 23 31 30 | 32 34 3b 20 4f 66 66 20 |V R2,#10|24; Off |
|00002f80| 73 63 72 65 65 6e 20 73 | 6f 20 64 6f 65 73 6e 27 |screen s|o doesn'|
|00002f90| 74 20 70 72 69 6e 74 20 | 6e 6f 77 74 0d 11 6c 0f |t print |nowt..l.|
|00002fa0| 42 4c 20 70 6c 6f 74 74 | 65 78 74 0d 11 76 2a 4d |BL plott|ext..v*M|
|00002fb0| 4f 56 20 52 31 2c 52 31 | 2c 41 53 52 23 31 20 20 |OV R1,R1|,ASR#1 |
|00002fc0| 20 3b 20 44 69 76 69 64 | 65 20 6c 65 6e 67 74 68 | ; Divid|e length|
|00002fd0| 20 62 79 20 32 0d 11 80 | 3a 52 53 42 20 52 30 2c | by 2...|:RSB R0,|
|00002fe0| 52 31 2c 23 31 36 30 20 | 20 20 20 3b 20 54 61 6b |R1,#160 | ; Tak|
|00002ff0| 65 20 69 74 20 6f 66 66 | 20 63 65 6e 74 72 61 6c |e it off| central|
|00003000| 20 70 6f 73 20 61 6e 64 | 20 72 65 74 75 72 6e 0d | pos and| return.|
|00003010| 11 8a 1b 4c 44 4d 46 44 | 20 52 31 33 21 2c 7b 52 |...LDMFD| R13!,{R|
|00003020| 31 2d 52 31 32 2c 52 31 | 35 7d 0d 11 94 04 0d 11 |1-R12,R1|5}......|
|00003030| 9e 35 3b 20 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.5; ****|********|
|00003040| 2a 2a 2a 20 57 49 50 45 | 20 53 54 41 52 53 20 4f |*** WIPE| STARS O|
|00003050| 55 54 20 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |UT *****|********|
|00003060| 2a 2a 2a 0d 11 a8 15 3b | 20 53 74 61 72 73 20 73 |***....;| Stars s|
|00003070| 74 72 75 63 74 75 72 65 | 0d 11 b2 1d 3b 20 2b 30 |tructure|....; +0|
|00003080| 20 3d 20 43 6f 6c 6f 75 | 72 20 74 6f 20 70 75 74 | = Colou|r to put|
|00003090| 20 62 61 63 6b 0d 11 bc | 18 3b 20 2b 31 2b 32 2b | back...|.; +1+2+|
|000030a0| 33 20 3d 20 4f 66 66 73 | 65 74 3c 3c 32 0d 11 c6 |3 = Offs|et<<2...|
|000030b0| 12 3b 20 2b 34 20 4e 65 | 78 74 20 73 74 61 72 0d |.; +4 Ne|xt star.|
|000030c0| 11 d0 25 2e 65 6e 64 6f | 66 73 74 61 72 73 70 6f |..%.endo|fstarspo|
|000030d0| 69 6e 74 65 72 20 45 51 | 55 44 20 26 46 46 46 46 |inter EQ|UD &FFFF|
|000030e0| 46 46 46 46 0d 11 da 11 | 2e 77 69 70 65 73 74 61 |FFFF....|.wipesta|
|000030f0| 72 73 6f 75 74 0d 11 e4 | 1b 53 54 4d 46 44 20 52 |rsout...|.STMFD R|
|00003100| 31 33 21 2c 7b 52 30 2d | 52 31 32 2c 52 31 34 7d |13!,{R0-|R12,R14}|
|00003110| 0d 11 ee 1c 4c 44 52 20 | 52 32 2c 65 6e 64 6f 66 |....LDR |R2,endof|
|00003120| 73 74 61 72 73 70 6f 69 | 6e 74 65 72 0d 11 f8 11 |starspoi|nter....|
|00003130| 4c 44 52 20 52 30 2c 76 | 64 75 6f 75 74 0d 12 02 |LDR R0,v|duout...|
|00003140| 11 a4 61 64 72 28 31 2c | 73 74 61 72 73 29 0d 12 |..adr(1,|stars)..|
|00003150| 0c 12 2e 77 69 70 65 73 | 74 61 72 73 6c 6f 6f 70 |...wipes|tarsloop|
|00003160| 0d 12 16 12 4c 44 52 20 | 52 33 2c 5b 52 31 5d 2c |....LDR |R3,[R1],|
|00003170| 23 34 0d 12 20 0d 54 45 | 51 20 52 33 2c 52 32 0d |#4.. .TE|Q R3,R2.|
|00003180| 12 2a 44 4c 44 4d 45 51 | 46 44 20 52 31 33 21 2c |.*DLDMEQ|FD R13!,|
|00003190| 7b 52 30 2d 52 31 32 2c | 52 31 35 7d 5e 20 20 3b |{R0-R12,|R15}^ ;|
|000031a0| 20 49 66 20 61 74 20 74 | 68 65 20 65 6e 64 2c 20 | If at t|he end, |
|000031b0| 74 68 65 6e 20 71 75 69 | 74 20 4d 65 20 74 68 69 |then qui|t Me thi|
|000031c0| 6e 6b 73 0d 12 34 10 80 | 20 52 34 2c 52 33 2c 23 |nks..4..| R4,R3,#|
|000031d0| 26 46 46 0d 12 3e 1b 53 | 54 52 42 20 52 34 2c 5b |&FF..>.S|TRB R4,[|
|000031e0| 52 30 2c 52 33 2c 4c 53 | 52 23 38 2b 32 5d 0d 12 |R0,R3,LS|R#8+2]..|
|000031f0| 48 13 42 20 77 69 70 65 | 73 74 61 72 73 6c 6f 6f |H.B wipe|starsloo|
|00003200| 70 0d 12 52 04 0d 12 5c | 2b 3b 20 2a 2a 2a 2a 2a |p..R...\|+; *****|
|00003210| 2a 2a 2a 2a 2a 2a 2a 2a | 20 ec 20 80 20 f0 20 53 |********| . . . S|
|00003220| 54 41 52 53 20 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |TARS ***|********|
|00003230| 0d 12 66 15 2e 6d 6f 76 | 65 61 6e 64 70 6c 6f 74 |..f..mov|eandplot|
|00003240| 73 74 61 72 73 0d 12 70 | 1b 53 54 4d 46 44 20 52 |stars..p|.STMFD R|
|00003250| 31 33 21 2c 7b 52 30 2d | 52 31 32 2c 52 31 34 7d |13!,{R0-|R12,R14}|
|00003260| 0d 12 7a 11 4c 44 52 20 | 52 30 2c 76 64 75 6f 75 |..z.LDR |R0,vduou|
|00003270| 74 0d 12 84 53 4d 4f 56 | 20 52 31 32 2c 23 28 32 |t...SMOV| R12,#(2|
|00003280| 34 30 2a 33 32 30 3c 3c | 6d 6f 64 65 25 29 3c 3c |40*320<<|mode%)<<|
|00003290| 32 20 20 20 3b 20 45 6e | 64 20 6f 66 20 73 63 72 |2 ; En|d of scr|
|000032a0| 65 65 6e 20 73 68 69 66 | 74 65 64 20 75 70 20 62 |een shif|ted up b|
|000032b0| 79 20 32 20 63 6f 73 20 | 73 6f 20 69 73 20 6f 66 |y 2 cos |so is of|
|000032c0| 66 73 65 74 0d 12 8e 11 | a4 61 64 72 28 31 2c 73 |fset....|.adr(1,s|
|000032d0| 74 61 72 73 29 0d 12 98 | 10 53 55 42 20 52 31 2c |tars)...|.SUB R1,|
|000032e0| 52 31 2c 23 34 0d 12 a2 | 1c 4c 44 52 20 52 32 2c |R1,#4...|.LDR R2,|
|000032f0| 65 6e 64 6f 66 73 74 61 | 72 73 70 6f 69 6e 74 65 |endofsta|rspointe|
|00003300| 72 0d 12 ac 04 0d 12 b6 | 40 4d 4f 56 20 52 33 2c |r.......|@MOV R3,|
|00003310| 23 38 20 20 20 20 20 20 | 20 20 3b 20 54 68 69 73 |#8 | ; This|
|00003320| 20 6d 61 6e 79 20 74 6f | 20 73 74 61 72 74 20 6f | many to| start o|
|00003330| 66 66 20 77 69 74 68 20 | 69 65 20 31 20 77 68 65 |ff with |ie 1 whe|
|00003340| 6e 20 3e 3e 33 0d 12 c0 | 12 2e 6d 6f 76 65 73 74 |n >>3...|..movest|
|00003350| 61 72 73 6c 6f 6f 70 0d | 12 ca 20 4c 44 52 20 52 |arsloop.|.. LDR R|
|00003360| 34 2c 5b 52 31 2c 23 34 | 5d 21 20 20 3b 20 4c 6f |4,[R1,#4|]! ; Lo|
|00003370| 61 64 20 73 74 61 72 0d | 12 d4 0d 54 45 51 20 52 |ad star.|...TEQ R|
|00003380| 34 2c 52 32 0d 12 de 14 | 42 45 51 20 6e 6f 77 70 |4,R2....|BEQ nowp|
|00003390| 6c 6f 74 73 74 61 72 73 | 0d 12 e8 04 0d 12 f2 25 |lotstars|.......%|
|000033a0| 4d 4f 56 20 52 34 2c 52 | 34 2c 4c 53 52 23 38 20 |MOV R4,R|4,LSR#8 |
|000033b0| 20 20 3b 20 52 65 6d 6f | 76 65 20 63 6f 6c 6f 75 | ; Remo|ve colou|
|000033c0| 72 0d 12 fc 27 53 55 42 | 53 20 52 34 2c 52 34 2c |r...'SUB|S R4,R4,|
|000033d0| 52 33 2c 41 53 52 23 32 | 20 3b 20 4d 6f 76 65 20 |R3,ASR#2| ; Move |
|000033e0| 6f 6e 20 61 20 62 69 74 | 0d 13 06 36 41 44 44 4c |on a bit|...6ADDL|
|000033f0| 54 20 52 34 2c 52 34 2c | 31 32 20 20 20 20 20 20 |T R4,R4,|12 |
|00003400| 3b 20 49 66 20 6f 66 66 | 20 65 6e 64 2c 20 74 68 |; If off| end, th|
|00003410| 65 6e 20 73 74 61 72 74 | 20 61 67 61 69 6e 0d 13 |en start| again..|
|00003420| 10 3a 4c 44 52 42 20 52 | 35 2c 5b 52 30 2c 52 34 |.:LDRB R|5,[R0,R4|
|00003430| 2c 41 53 52 23 32 5d 20 | 3b 20 41 6e 64 20 6c 6f |,ASR#2] |; And lo|
|00003440| 61 64 20 74 68 65 20 73 | 63 72 65 65 6e 20 66 72 |ad the s|creen fr|
|00003450| 6f 6d 20 74 68 65 72 65 | 0d 13 1a 15 84 52 20 52 |om there|.....R R|
|00003460| 34 2c 52 35 2c 52 34 2c | 4c 53 4c 23 38 0d 13 24 |4,R5,R4,|LSL#8..$|
|00003470| 28 53 54 52 20 52 34 2c | 5b 52 31 5d 20 20 20 20 |(STR R4,|[R1] |
|00003480| 20 20 20 3b 20 53 74 6f | 72 65 20 6e 65 77 20 73 | ; Sto|re new s|
|00003490| 74 61 72 21 21 0d 13 2e | 2f 41 44 44 20 52 33 2c |tar!!...|/ADD R3,|
|000034a0| 52 33 2c 23 31 20 20 20 | 20 20 20 3b 20 4e 65 78 |R3,#1 | ; Nex|
|000034b0| 74 20 73 74 61 72 20 6d | 6f 76 65 73 20 66 75 72 |t star m|oves fur|
|000034c0| 74 68 72 65 0d 13 38 10 | 43 4d 50 20 52 33 2c 23 |thre..8.|CMP R3,#|
|000034d0| 31 36 2a 34 0d 13 42 32 | 4d 4f 56 47 54 20 52 33 |16*4..B2|MOVGT R3|
|000034e0| 2c 23 31 36 2a 34 20 20 | 20 20 3b 20 49 66 20 74 |,#16*4 | ; If t|
|000034f0| 6f 6f 20 66 61 73 74 20 | 74 68 65 6e 20 73 6c 6f |oo fast |then slo|
|00003500| 77 20 69 74 21 21 0d 13 | 4c 13 42 20 6d 6f 76 65 |w it!!..|L.B move|
|00003510| 73 74 61 72 73 6c 6f 6f | 70 0d 13 56 04 0d 13 60 |starsloo|p..V...`|
|00003520| 11 2e 6e 6f 77 70 6c 6f | 74 73 74 61 72 73 0d 13 |..nowplo|tstars..|
|00003530| 6a 11 a4 61 64 72 28 31 | 2c 73 74 61 72 73 29 0d |j..adr(1|,stars).|
|00003540| 13 74 2e 4c 44 52 20 52 | 30 2c 76 64 75 6f 75 74 |.t.LDR R|0,vduout|
|00003550| 20 20 20 20 20 3b 20 72 | 32 20 3d 20 65 6e 64 20 | ; r|2 = end |
|00003560| 70 6f 69 6e 74 65 72 20 | 73 74 69 6c 6c 0d 13 7e |pointer |still..~|
|00003570| 1a a4 61 64 72 28 35 2c | 67 72 65 79 73 63 61 6c |..adr(5,|greyscal|
|00003580| 65 77 6f 72 64 73 29 0d | 13 88 0d 4d 4f 56 20 52 |ewords).|...MOV R|
|00003590| 33 2c 23 38 0d 13 92 12 | 2e 70 6c 6f 74 73 74 61 |3,#8....|.plotsta|
|000035a0| 72 73 6c 6f 6f 70 0d 13 | 9c 12 4c 44 52 20 52 34 |rsloop..|..LDR R4|
|000035b0| 2c 5b 52 31 5d 2c 23 34 | 0d 13 a6 0d 54 45 51 20 |,[R1],#4|....TEQ |
|000035c0| 52 34 2c 52 32 0d 13 b0 | 1e 4c 44 4d 45 51 46 44 |R4,R2...|.LDMEQFD|
|000035d0| 20 52 31 33 21 2c 7b 52 | 30 2d 52 31 32 2c 52 31 | R13!,{R|0-R12,R1|
|000035e0| 35 7d 5e 0d 13 ba 04 0d | 13 c4 40 4c 44 52 42 20 |5}^.....|..@LDRB |
|000035f0| 52 36 2c 5b 52 35 2c 52 | 33 5d 20 20 20 20 20 20 |R6,[R5,R|3] |
|00003600| 20 3b 20 42 65 63 61 75 | 73 65 20 74 68 65 20 77 | ; Becau|se the w|
|00003610| 6f 72 64 73 20 61 72 65 | 20 61 6c 72 65 61 64 79 |ords are| already|
|00003620| 20 34 20 6c 6f 6e 67 0d | 13 ce 1d 53 54 52 42 20 | 4 long.|...STRB |
|00003630| 52 36 2c 5b 52 30 2c 52 | 34 2c 41 53 52 23 28 38 |R6,[R0,R|4,ASR#(8|
|00003640| 2b 32 29 5d 0d 13 d8 10 | 41 44 44 20 52 33 2c 52 |+2)]....|ADD R3,R|
|00003650| 33 2c 23 31 0d 13 e2 10 | 43 4d 50 20 52 33 2c 23 |3,#1....|CMP R3,#|
|00003660| 31 36 2a 34 0d 13 ec 32 | 4d 4f 56 47 54 20 52 33 |16*4...2|MOVGT R3|
|00003670| 2c 23 31 36 2a 34 20 20 | 20 20 3b 20 49 66 20 74 |,#16*4 | ; If t|
|00003680| 6f 6f 20 66 61 73 74 20 | 74 68 65 6e 20 73 6c 6f |oo fast |then slo|
|00003690| 77 20 69 74 21 21 0d 13 | f6 13 42 20 70 6c 6f 74 |w it!!..|..B plot|
|000036a0| 73 74 61 72 73 6c 6f 6f | 70 0d 14 00 04 0d 14 0a |starsloo|p.......|
|000036b0| 22 3b 20 2a 2a 2a 2a 2a | 2a 2a 2a 20 70 6c 6f 74 |"; *****|*** plot|
|000036c0| 20 62 6c 75 65 20 7a 61 | 70 20 2a 2a 2a 2a 2a 0d | blue za|p *****.|
|000036d0| 14 14 11 2e 70 6f 73 69 | 6e 62 6c 75 65 7a 61 70 |....posi|nbluezap|
|000036e0| 0d 14 1e 0a 65 71 75 64 | 20 30 0d 14 28 10 2e 70 |....equd| 0..(..p|
|000036f0| 6c 6f 74 62 6c 75 65 7a | 61 70 0d 14 32 1b 53 54 |lotbluez|ap..2.ST|
|00003700| 4d 46 44 20 52 31 33 21 | 2c 7b 52 30 2d 52 31 32 |MFD R13!|,{R0-R12|
|00003710| 2c 52 31 34 7d 0d 14 3c | 26 4c 44 52 20 52 30 2c |,R14}..<|&LDR R0,|
|00003720| 76 64 75 6f 75 74 20 20 | 20 20 3b 20 4c 6f 61 64 |vduout | ; Load|
|00003730| 20 73 63 72 65 65 6e 20 | 61 64 72 0d 14 46 34 41 | screen |adr..F4A|
|00003740| 44 44 20 52 30 2c 52 30 | 2c 23 32 34 30 2a 33 32 |DD R0,R0|,#240*32|
|00003750| 30 3c 3c 6d 6f 64 65 25 | 20 20 20 20 20 20 20 20 |0<<mode%| |
|00003760| 20 20 20 3b 20 42 6f 74 | 74 6f 6d 20 72 6f 77 0d | ; Bot|tom row.|
|00003770| 14 50 41 53 55 42 20 52 | 30 2c 52 30 2c 23 33 32 |.PASUB R|0,R0,#32|
|00003780| 30 3c 3c 6d 6f 64 65 25 | 20 20 20 20 20 20 20 20 |0<<mode%| |
|00003790| 20 20 20 20 20 20 20 3b | 20 57 65 6c 6c 2c 20 74 | ;| Well, t|
|000037a0| 68 69 73 20 69 73 20 61 | 63 74 75 61 6c 6c 79 21 |his is a|ctually!|
|000037b0| 0d 14 5a 04 0d 14 64 13 | a4 61 64 72 28 31 2c 62 |..Z...d.|.adr(1,b|
|000037c0| 6c 75 65 7a 61 70 29 0d | 14 6e 18 a4 61 64 72 28 |luezap).|.n..adr(|
|000037d0| 32 2c 65 6e 64 6f 66 62 | 6c 75 65 7a 61 70 29 0d |2,endofb|luezap).|
|000037e0| 14 78 26 53 55 42 20 52 | 32 2c 52 32 2c 52 31 20 |.x&SUB R|2,R2,R1 |
|000037f0| 20 20 20 20 20 20 20 20 | 20 20 3b 20 52 32 20 49 | | ; R2 I|
|00003800| 73 20 6c 65 6e 0d 14 82 | 17 4c 44 52 20 52 33 2c |s len...|.LDR R3,|
|00003810| 70 6f 73 69 6e 62 6c 75 | 65 7a 61 70 0d 14 8c 24 |posinblu|ezap...$|
|00003820| 53 55 42 53 20 52 33 2c | 52 33 2c 23 32 30 20 20 |SUBS R3,|R3,#20 |
|00003830| 20 20 20 20 20 3b 20 32 | 30 20 6c 65 6e 67 74 68 | ; 2|0 length|
|00003840| 0d 14 96 32 41 44 44 4c | 54 20 52 33 2c 52 33 2c |...2ADDL|T R3,R3,|
|00003850| 52 32 20 20 20 20 20 20 | 20 3b 20 49 66 20 62 65 |R2 | ; If be|
|00003860| 6c 6f 77 20 74 68 65 6e | 20 69 6e 63 72 65 6d 65 |low then| increme|
|00003870| 6e 74 0d 14 a0 17 53 54 | 52 20 52 33 2c 70 6f 73 |nt....ST|R R3,pos|
|00003880| 69 6e 62 6c 75 65 7a 61 | 70 0d 14 aa 04 0d 14 b4 |inblueza|p.......|
|00003890| 10 41 44 44 20 52 33 2c | 52 33 2c 52 31 0d 14 be |.ADD R3,|R3,R1...|
|000038a0| 2e 4c 44 4d 49 41 20 52 | 33 21 2c 7b 52 34 2d 52 |.LDMIA R|3!,{R4-R|
|000038b0| 38 7d 20 20 20 20 3b 20 | 4c 6f 61 64 20 72 65 71 |8} ; |Load req|
|000038c0| 75 69 72 65 64 20 62 79 | 74 65 73 0d 14 c8 04 0d |uired by|tes.....|
|000038d0| 14 d2 61 73 74 6d 69 61 | 20 72 30 2c 7b 72 34 2d |..astmia| r0,{r4-|
|000038e0| 72 38 7d 20 20 20 20 20 | 20 3b 20 73 74 6f 72 65 |r8} | ; store|
|000038f0| 20 4e 42 20 6c 69 6e 65 | 20 63 6f 70 79 69 6e 67 | NB line| copying|
|00003900| 20 72 75 74 69 6e 65 20 | 74 61 6b 65 73 20 63 61 | rutine |takes ca|
|00003910| 72 65 20 6f 66 20 64 75 | 62 69 6f 75 73 20 64 6f |re of du|bious do|
|00003920| 75 62 6c 65 20 6c 69 6e | 65 20 70 72 69 6e 74 21 |uble lin|e print!|
|00003930| 0d 14 dc 04 0d 14 e6 04 | 0d 14 f0 15 41 44 44 20 |........|....ADD |
|00003940| 52 30 2c 52 30 2c 23 33 | 32 30 2d 32 30 0d 14 fa |R0,R0,#3|20-20...|
|00003950| 61 73 74 6d 69 61 20 72 | 30 2c 7b 72 34 2d 72 38 |astmia r|0,{r4-r8|
|00003960| 7d 20 20 20 20 20 20 3b | 20 73 74 6f 72 65 20 4e |} ;| store N|
|00003970| 42 20 6c 69 6e 65 20 63 | 6f 70 79 69 6e 67 20 72 |B line c|opying r|
|00003980| 75 74 69 6e 65 20 74 61 | 6b 65 73 20 63 61 72 65 |utine ta|kes care|
|00003990| 20 6f 66 20 64 75 62 69 | 6f 75 73 20 64 6f 75 62 | of dubi|ous doub|
|000039a0| 6c 65 20 6c 69 6e 65 20 | 70 72 69 6e 74 21 0d 15 |le line |print!..|
|000039b0| 04 1c 4c 44 4d 46 44 20 | 52 31 33 21 2c 7b 52 30 |..LDMFD |R13!,{R0|
|000039c0| 2d 52 31 32 2c 52 31 35 | 7d 5e 0d 15 0e 04 0d 15 |-R12,R15|}^......|
|000039d0| 18 04 0d 15 22 04 0d 15 | 2c 04 0d 15 36 0a 2e 76 |...."...|,...6..v|
|000039e0| 64 75 69 6e 0d 15 40 0c | 45 51 55 44 20 31 34 38 |duin..@.|EQUD 148|
|000039f0| 0d 15 4a 0b 45 51 55 44 | 20 2d 31 0d 15 54 0b 2e |..J.EQUD| -1..T..|
|00003a00| 76 64 75 6f 75 74 0d 15 | 5e 0a 45 51 55 44 20 30 |vduout..|^.EQUD 0|
|00003a10| 0d 15 68 0a 45 51 55 44 | 20 30 0d 15 72 0a 2e 7a |..h.EQUD| 0..r..z|
|00003a20| 65 72 6f 73 0d 15 7c 36 | 5d 3a e3 20 6c 6f 6f 70 |eros..|6|]:. loop|
|00003a30| 25 3d 30 b8 20 33 32 30 | 81 34 3a 5b 4f 50 54 20 |%=0. 320|.4:[OPT |
|00003a40| 70 61 73 73 25 3a 45 51 | 55 44 30 3a 5d 3a ed 3a |pass%:EQ|UD0:]:.:|
|00003a50| 5b 4f 50 54 20 70 61 73 | 73 25 0d 15 86 19 2e 73 |[OPT pas|s%.....s|
|00003a60| 74 61 72 74 6f 66 73 65 | 63 6f 6e 64 70 69 63 74 |tartofse|condpict|
|00003a70| 75 72 65 0d 15 90 1e a4 | 6c 6f 61 64 28 22 53 42 |ure.....|load("SB|
|00003a80| 49 6e 74 72 6f 3a 53 75 | 6e 42 75 72 73 74 44 22 |Intro:Su|nBurstD"|
|00003a90| 29 0d 15 9a 17 2e 65 6e | 64 6f 66 73 65 63 6f 6e |).....en|dofsecon|
|00003aa0| 64 70 69 63 74 75 72 65 | 0d 15 a4 04 0d 15 ae 38 |dpicture|.......8|
|00003ab0| 3b 20 41 73 73 75 6d 65 | 20 74 68 61 74 20 74 68 |; Assume| that th|
|00003ac0| 65 20 73 74 61 72 73 20 | 77 69 6c 6c 20 6e 6f 74 |e stars |will not|
|00003ad0| 20 6e 65 65 64 20 74 6f | 20 67 6f 20 6f 76 65 72 | need to| go over|
|00003ae0| 20 38 30 4b 0d 15 b8 09 | 41 4c 49 47 4e 0d 15 c2 | 80K....|ALIGN...|
|00003af0| 0a 2e 73 74 61 72 73 0d | 15 cc 18 2e 73 74 61 72 |..stars.|....star|
|00003b00| 74 6f 66 66 69 72 73 74 | 70 69 63 74 75 72 65 0d |toffirst|picture.|
|00003b10| 15 d6 2c a4 6c 6f 61 64 | 28 22 53 42 49 6e 74 72 |..,.load|("SBIntr|
|00003b20| 6f 3a 50 69 63 22 2b c3 | 28 72 6e 64 70 69 63 63 |o:Pic"+.|(rndpicc|
|00003b30| 79 25 29 2b 22 44 61 74 | 61 22 29 0d 15 e0 16 2e |y%)+"Dat|a").....|
|00003b40| 65 6e 64 6f 66 66 69 72 | 73 74 70 69 63 74 75 72 |endoffir|stpictur|
|00003b50| 65 0d 15 ea 04 0d 15 f4 | 0c 2e 62 6c 75 65 7a 61 |e.......|..blueza|
|00003b60| 70 0d 15 fe 1d a4 6c 6f | 61 64 28 22 53 42 49 6e |p.....lo|ad("SBIn|
|00003b70| 74 72 6f 3a 42 6c 75 65 | 5a 61 70 44 22 29 0d 16 |tro:Blue|ZapD")..|
|00003b80| 08 11 2e 65 6e 64 6f 66 | 62 6c 75 65 7a 61 70 0d |...endof|bluezap.|
|00003b90| 16 12 04 0d 16 1c 0f 2e | 73 63 72 6f 6c 6c 74 65 |........|scrollte|
|00003ba0| 78 74 0d 16 26 1b a4 6c | 6f 61 64 28 22 53 42 49 |xt..&..l|oad("SBI|
|00003bb0| 6e 74 72 6f 3a 53 43 54 | 65 78 74 22 29 0d 16 30 |ntro:SCT|ext")..0|
|00003bc0| 04 0d 16 3a 0b 2e 73 62 | 74 65 78 74 0d 16 44 1c |...:..sb|text..D.|
|00003bd0| a4 6c 6f 61 64 28 22 53 | 42 49 6e 74 72 6f 3a 53 |.load("S|BIntro:S|
|00003be0| 42 54 65 78 74 44 22 29 | 0d 16 4e 10 2e 65 6e 64 |BTextD")|..N..end|
|00003bf0| 6f 66 73 62 74 65 78 74 | 0d 16 58 0d 2e 74 65 78 |ofsbtext|..X..tex|
|00003c00| 74 6d 61 73 6b 0d 16 62 | 1e a4 73 70 61 63 65 28 |tmask..b|..space(|
|00003c10| 65 6e 64 6f 66 73 62 74 | 65 78 74 2d 73 62 74 65 |endofsbt|ext-sbte|
|00003c20| 78 74 29 0d 16 6c 04 0d | 16 76 0d 2e 61 6c 70 68 |xt)..l..|.v..alph|
|00003c30| 61 62 65 74 0d 16 80 1d | a4 6c 6f 61 64 28 22 53 |abet....|.load("S|
|00003c40| 42 49 6e 74 72 6f 3a 41 | 6c 70 68 61 62 74 44 22 |BIntro:A|lphabtD"|
|00003c50| 29 0d 16 8a 04 0d 16 94 | 11 2e 66 6c 69 70 65 64 |).......|..fliped|
|00003c60| 73 74 61 74 65 73 0d 16 | 9e 35 5d 3a e3 20 6c 6f |states..|.5]:. lo|
|00003c70| 6f 70 25 3d 30 20 b8 20 | 32 35 3a 5b 4f 50 54 20 |op%=0 . |25:[OPT |
|00003c80| 70 61 73 73 25 3a 45 51 | 55 44 20 30 3a 5d 3a ed |pass%:EQ|UD 0:]:.|
|00003c90| 3a 5b 4f 50 54 20 70 61 | 73 73 25 0d 16 a8 10 a4 |:[OPT pa|ss%.....|
|00003ca0| 73 70 61 63 65 28 32 34 | 2a 34 29 0d 16 b2 12 2e |space(24|*4).....|
|00003cb0| 70 6f 73 69 74 69 6f 6e | 74 61 62 6c 65 0d 16 bc |position|table...|
|00003cc0| 11 a4 73 70 61 63 65 28 | 32 35 2a 33 36 29 0d 16 |..space(|25*36)..|
|00003cd0| c6 04 0d 16 c7 13 a4 73 | 70 61 63 65 28 33 32 2a |.......s|pace(32*|
|00003ce0| 31 30 32 34 29 0d 16 d0 | 13 2e 65 6e 64 6f 66 63 |1024)...|..endofc|
|00003cf0| 6f 64 65 73 70 61 63 65 | 0d 16 da 04 0d 16 e4 05 |odespace|........|
|00003d00| 5d 0d 16 ee 05 ed 0d 16 | f8 04 0d 17 02 10 ee 20 |].......|....... |
|00003d10| 85 20 f2 65 72 72 6f 72 | 3a e0 0d 17 0c 04 0d 17 |. .error|:.......|
|00003d20| 16 14 74 25 3d 70 6f 73 | 69 74 69 6f 6e 74 61 62 |..t%=pos|itiontab|
|00003d30| 6c 65 0d 17 20 18 e3 20 | 6c 6f 6f 70 25 3d 30 20 |le.. .. |loop%=0 |
|00003d40| b8 20 33 36 30 20 88 20 | 31 30 0d 17 2a 14 e3 20 |. 360 . |10..*.. |
|00003d50| 63 6c 25 3d 74 25 20 b8 | 20 74 25 2b 32 33 0d 17 |cl%=t% .| t%+23..|
|00003d60| 34 27 3f 63 6c 25 3d 31 | 32 38 20 20 20 20 20 20 |4'?cl%=1|28 |
|00003d70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3a f4 20 | | :. |
|00003d80| 42 6c 61 6e 6b 0d 17 3e | 05 ed 0d 17 48 18 e3 20 |Blank..>|....H.. |
|00003d90| 6c 6f 6f 70 32 3d 2d 31 | 31 2e 35 20 b8 20 31 31 |loop2=-1|1.5 . 11|
|00003da0| 2e 35 0d 17 52 22 70 6f | 73 25 3d 94 28 6c 6f 6f |.5..R"po|s%=.(loo|
|00003db0| 70 32 2a 28 9b b2 28 6c | 6f 6f 70 25 29 29 2b 31 |p2*(..(l|oop%))+1|
|00003dc0| 31 2e 35 29 0d 17 5c 17 | e7 20 70 6f 73 25 3e 32 |1.5)..\.|. pos%>2|
|00003dd0| 33 20 8c 20 70 6f 73 25 | 3d 32 33 0d 17 66 4f 74 |3 . pos%|=23..fOt|
|00003de0| 25 3f 70 6f 73 25 3d 6c | 6f 6f 70 32 2b 31 33 20 |%?pos%=l|oop2+13 |
|00003df0| 20 3a f4 20 42 65 63 61 | 75 73 65 20 6f 74 68 65 | :. Beca|use othe|
|00003e00| 72 77 69 73 65 20 69 66 | 20 30 2c 20 74 68 65 6e |rwise if| 0, then|
|00003e10| 20 69 74 27 6c 6c 20 62 | 65 20 61 20 62 6c 61 6e | it'll b|e a blan|
|00003e20| 6b 20 6c 69 6e 65 3d 31 | 32 38 0d 17 70 39 e7 20 |k line=1|28..p9. |
|00003e30| 6c 6f 6f 70 25 3e 38 30 | 20 80 20 6c 6f 6f 70 25 |loop%>80| . loop%|
|00003e40| 3c 32 38 30 20 8c 20 74 | 25 3f 70 6f 73 25 3d 28 |<280 . t|%?pos%=(|
|00003e50| 32 35 2d 28 74 25 3f 70 | 6f 73 25 29 29 20 84 20 |25-(t%?p|os%)) . |
|00003e60| 31 32 38 0d 17 7a 05 ed | 0d 17 84 0a 74 25 2b 3d |128..z..|....t%+=|
|00003e70| 32 34 0d 17 8e 05 ed 0d | 17 98 04 0d 17 a2 10 d6 |24......|........|
|00003e80| 20 63 72 65 61 74 65 6d | 61 73 6b 0d 17 ac 04 0d | createm|ask.....|
|00003e90| 17 b6 26 c8 99 20 22 58 | 4f 53 5f 43 4c 49 22 2c |..&.. "X|OS_CLI",|
|00003ea0| 22 2a 51 54 4d 53 54 41 | 52 54 22 20 b8 20 3b 66 |"*QTMSTA|RT" . ;f|
|00003eb0| 6c 61 67 73 25 0d 17 c0 | 33 e7 20 28 66 6c 61 67 |lags%...|3. (flag|
|00003ec0| 73 25 20 80 20 31 29 3c | 3e 30 20 8c 20 71 74 6d |s% . 1)<|>0 . qtm|
|00003ed0| 6c 6f 61 64 65 64 25 3d | a3 20 8b 20 71 74 6d 6c |loaded%=|. . qtml|
|00003ee0| 6f 61 64 65 64 25 3d b9 | 0d 17 ca 1c c8 99 20 22 |oaded%=.|...... "|
|00003ef0| 58 4f 53 5f 43 4c 49 22 | 2c 22 2a 51 54 4d 53 54 |XOS_CLI"|,"*QTMST|
|00003f00| 41 52 54 22 0d 17 d4 09 | 73 73 25 3d 30 0d 17 de |ART"....|ss%=0...|
|00003f10| 2d e7 20 71 74 6d 6c 6f | 61 64 65 64 25 3d b9 20 |-. qtmlo|aded%=. |
|00003f20| 8c 20 c8 99 20 22 51 54 | 4d 5f 50 6f 73 22 2c 2d |. .. "QT|M_Pos",-|
|00003f30| 31 2c 2d 31 20 b8 20 73 | 73 25 0d 17 e8 0b 73 73 |1,-1 . s|s%....ss|
|00003f40| 25 3d 73 73 25 0d 17 f2 | 04 0d 17 fc 0d f2 71 74 |%=ss%...|......qt|
|00003f50| 6d 28 31 2c 30 29 0d 18 | 06 0f d6 20 62 72 69 6e |m(1,0)..|... brin|
|00003f60| 67 69 74 6f 6e 0d 18 10 | 04 0d 18 1a 0d f2 71 74 |giton...|......qt|
|00003f70| 6d 28 32 2c 30 29 0d 18 | 24 04 0d 18 2e 12 e3 20 |m(2,0)..|$...... |
|00003f80| 6c 6f 6f 70 32 25 3d 30 | 20 b8 20 39 0d 18 38 24 |loop2%=0| . 9..8$|
|00003f90| 66 6c 69 70 65 64 73 74 | 61 74 65 73 21 28 6c 6f |flipedst|ates!(lo|
|00003fa0| 6f 70 32 25 2a 34 29 3d | b3 28 32 30 29 2d 32 30 |op2%*4)=|.(20)-20|
|00003fb0| 0d 18 42 05 ed 0d 18 4c | 04 0d 18 56 12 e3 20 6c |..B....L|...V.. l|
|00003fc0| 6f 6f 70 25 3d 30 20 b8 | 20 38 30 0d 18 60 12 e3 |oop%=0 .| 80..`..|
|00003fd0| 20 6c 6f 6f 70 32 25 3d | 30 20 b8 20 39 0d 18 6a | loop2%=|0 . 9..j|
|00003fe0| 35 66 6c 69 70 65 64 73 | 74 61 74 65 73 21 28 6c |5flipeds|tates!(l|
|00003ff0| 6f 6f 70 32 25 2a 34 29 | 3d 66 6c 69 70 65 64 73 |oop2%*4)|=flipeds|
|00004000| 74 61 74 65 73 21 28 6c | 6f 6f 70 32 25 2a 34 29 |tates!(l|oop2%*4)|
|00004010| 2b 31 0d 18 74 05 ed 0d | 18 7e 09 54 3d 91 2b 33 |+1..t...|.~.T=.+3|
|00004020| 0d 18 88 05 f5 0d 18 92 | 27 e7 20 a6 28 2d 39 39 |........|'. .(-99|
|00004030| 29 20 8c 20 85 20 31 37 | 2c 22 44 6f 64 67 79 20 |) . . 17|,"Dodgy |
|00004040| 65 78 69 74 20 63 6f 64 | 65 21 21 22 0d 18 9c 09 |exit cod|e!!"....|
|00004050| fd 20 91 3e 54 0d 18 a6 | 06 c8 96 0d 18 b0 17 d6 |. .>T...|........|
|00004060| 20 64 72 61 77 61 66 6c | 69 70 65 64 73 63 72 65 | drawafl|ipedscre|
|00004070| 65 6e 0d 18 ba 05 ed 0d | 18 c4 04 0d 18 ce 08 42 |en......|.......B|
|00004080| 25 3d 30 0d 18 d8 12 e3 | 20 6c 6f 6f 70 25 3d 30 |%=0.....| loop%=0|
|00004090| 20 b8 20 31 35 0d 18 e2 | 06 c8 96 0d 18 ec 1f 41 | . 15...|.......A|
|000040a0| 25 3d 67 72 65 79 73 63 | 61 6c 65 77 6f 72 64 73 |%=greysc|alewords|
|000040b0| 21 28 6c 6f 6f 70 25 2a | 34 29 0d 18 f6 10 d6 20 |!(loop%*|4)..... |
|000040c0| 70 6c 6f 74 73 62 74 65 | 78 74 0d 19 00 05 ed 0d |plotsbte|xt......|
|000040d0| 19 0a 25 e7 20 a6 28 2d | 39 39 29 20 8c 20 85 20 |..%. .(-|99) . . |
|000040e0| 31 37 2c 22 44 6f 64 67 | 79 20 65 78 69 74 20 63 |17,"Dodg|y exit c|
|000040f0| 6f 64 65 22 0d 19 14 08 | 42 25 3d 31 0d 19 1e 17 |ode"....|B%=1....|
|00004100| e3 20 6c 6f 6f 70 25 3d | 31 34 20 b8 20 30 20 88 |. loop%=|14 . 0 .|
|00004110| 20 2d 31 0d 19 28 06 c8 | 96 0d 19 32 1f 41 25 3d | -1..(..|...2.A%=|
|00004120| 67 72 65 79 73 63 61 6c | 65 77 6f 72 64 73 21 28 |greyscal|ewords!(|
|00004130| 6c 6f 6f 70 25 2a 34 29 | 0d 19 3c 10 d6 20 70 6c |loop%*4)|..<.. pl|
|00004140| 6f 74 73 62 74 65 78 74 | 0d 19 46 05 ed 0d 19 50 |otsbtext|..F....P|
|00004150| 04 0d 19 5a 0d f2 71 74 | 6d 28 33 2c 30 29 0d 19 |...Z..qt|m(3,0)..|
|00004160| 64 04 0d 19 6e 04 0d 19 | 78 1a f4 20 47 72 65 79 |d...n...|x.. Grey|
|00004170| 20 64 6f 77 6e 20 62 61 | 63 6b 67 72 6f 75 6e 64 | down ba|ckground|
|00004180| 0d 19 82 08 42 25 3d 31 | 0d 19 8c 17 e3 20 6c 6f |....B%=1|..... lo|
|00004190| 6f 70 25 3d 31 35 20 b8 | 20 30 20 88 20 2d 31 0d |op%=15 .| 0 . -1.|
|000041a0| 19 96 1f 41 25 3d 67 72 | 65 79 73 63 61 6c 65 77 |...A%=gr|eyscalew|
|000041b0| 6f 72 64 73 21 28 6c 6f | 6f 70 25 2a 34 29 0d 19 |ords!(lo|op%*4)..|
|000041c0| a0 06 c8 96 0d 19 aa 10 | d6 20 67 72 65 79 69 74 |........|. greyit|
|000041d0| 64 6f 77 6e 0d 19 b4 08 | 41 25 3d 30 0d 19 be 10 |down....|A%=0....|
|000041e0| d6 20 70 6c 6f 74 73 62 | 74 65 78 74 0d 19 c8 05 |. plotsb|text....|
|000041f0| ed 0d 19 d2 04 0d 19 dc | 16 f4 20 53 65 74 20 75 |........|.. Set u|
|00004200| 70 20 74 68 65 20 73 74 | 61 72 73 0d 19 e6 0c 70 |p the st|ars....p|
|00004210| 25 3d 73 74 61 72 73 0d | 19 f0 12 e3 20 6c 6f 6f |%=stars.|.... loo|
|00004220| 70 25 3d 31 20 b8 20 35 | 30 0d 19 fa 19 63 6f 25 |p%=1 . 5|0....co%|
|00004230| 3d b3 28 32 34 30 2a 33 | 32 30 3c 3c 6d 6f 64 65 |=.(240*3|20<<mode|
|00004240| 25 29 0d 1a 04 04 0d 1a | 0e 22 21 70 25 3d 28 3f |%)......|."!p%=(?|
|00004250| 28 21 76 64 75 6f 75 74 | 2b 63 6f 25 29 29 2b 28 |(!vduout|+co%))+(|
|00004260| 63 6f 25 3c 3c 31 30 29 | 0d 1a 18 09 70 25 2b 3d |co%<<10)|....p%+=|
|00004270| 34 0d 1a 22 05 ed 0d 1a | 2c 11 21 70 25 3d 26 46 |4.."....|,.!p%=&F|
|00004280| 46 46 46 46 46 46 46 0d | 1a 36 04 0d 1a 40 21 f4 |FFFFFFF.|.6...@!.|
|00004290| 20 4e 6f 77 20 73 63 72 | 6f 6c 6c 20 74 68 61 74 | Now scr|oll that|
|000042a0| 20 74 65 78 74 21 21 21 | 21 21 21 21 0d 1a 4a 11 | text!!!|!!!!..J.|
|000042b0| 41 25 3d 73 63 72 6f 6c | 6c 74 65 78 74 0d 1a 54 |A%=scrol|ltext..T|
|000042c0| 05 f5 0d 1a 5e 14 42 25 | 3d ba 28 63 65 6e 74 72 |....^.B%|=.(centr|
|000042d0| 65 74 65 78 74 29 0d 1a | 68 11 e3 20 6c 6f 6f 70 |etext)..|h.. loop|
|000042e0| 25 3d 30 20 b8 20 35 0d | 1a 72 04 0d 1a 7c 09 54 |%=0 . 5.|.r...|.T|
|000042f0| 3d 91 2b 32 0d 1a 86 05 | f5 0d 1a 90 0d 6d 6f 76 |=.+2....|.....mov|
|00004300| 65 6f 6e 25 3d b9 0d 1a | 9a 06 c8 96 0d 1a a4 12 |eon%=...|........|
|00004310| d6 20 77 69 70 65 73 74 | 61 72 73 6f 75 74 0d 1a |. wipest|arsout..|
|00004320| ae 25 e7 20 a6 28 2d 39 | 39 29 20 8c 20 85 20 31 |.%. .(-9|9) . . 1|
|00004330| 37 2c 22 44 6f 64 67 79 | 20 65 78 69 74 20 63 6f |7,"Dodgy| exit co|
|00004340| 64 65 22 0d 1a b8 28 e7 | 20 91 3c 54 20 8c 20 d6 |de"...(.| .<T . .|
|00004350| 20 6d 6f 76 65 61 6e 64 | 70 6c 6f 74 73 74 61 72 | moveand|plotstar|
|00004360| 73 3a 6d 6f 76 65 6f 6e | 25 3d a3 0d 1a c2 0f fd |s:moveon|%=......|
|00004370| 20 6d 6f 76 65 6f 6e 25 | 3d b9 0d 1a cc 04 0d 1a | moveon%|=.......|
|00004380| d6 14 d6 20 73 63 72 6f | 6c 6c 73 63 72 65 65 6e |... scro|llscreen|
|00004390| 75 70 0d 1a e0 10 43 25 | 3d 32 34 30 2d 6c 6f 6f |up....C%|=240-loo|
|000043a0| 70 25 0d 1a ea 18 6e 65 | 77 6c 69 6e 65 25 3d ba |p%....ne|wline%=.|
|000043b0| 28 70 6c 6f 74 74 65 78 | 74 29 0d 1a f4 11 d6 20 |(plottex|t)..... |
|000043c0| 70 6c 6f 74 62 6c 75 65 | 7a 61 70 0d 1a fe 16 d6 |plotblue|zap.....|
|000043d0| 20 6d 6f 76 65 61 6e 64 | 70 6c 6f 74 73 74 61 72 | moveand|plotstar|
|000043e0| 73 0d 1b 08 05 ed 0d 1b | 12 0f 41 25 3d 6e 65 77 |s.......|..A%=new|
|000043f0| 6c 69 6e 65 25 0d 1b 1c | 0d fd 20 3f 41 25 3d 26 |line%...|.. ?A%=&|
|00004400| 46 46 0d 1b 26 04 0d 1b | 30 20 f4 20 4e 6f 77 20 |FF..&...|0 . Now |
|00004410| 73 63 72 6f 6c 6c 20 69 | 75 74 20 6f 66 66 20 74 |scroll i|ut off t|
|00004420| 68 65 20 74 6f 70 0d 1b | 3a 12 e3 20 6c 6f 6f 70 |he top..|:.. loop|
|00004430| 25 3d 30 20 b8 20 37 30 | 0d 1b 44 09 54 3d 91 2b |%=0 . 70|..D.T=.+|
|00004440| 32 0d 1b 4e 05 f5 0d 1b | 58 0d 6d 6f 76 65 6f 6e |2..N....|X.moveon|
|00004450| 25 3d b9 0d 1b 62 06 c8 | 96 0d 1b 6c 12 d6 20 77 |%=...b..|...l.. w|
|00004460| 69 70 65 73 74 61 72 73 | 6f 75 74 0d 1b 76 25 e7 |ipestars|out..v%.|
|00004470| 20 a6 28 2d 39 39 29 20 | 8c 20 85 20 31 37 2c 22 | .(-99) |. . 17,"|
|00004480| 44 6f 64 67 79 20 65 78 | 69 74 20 63 6f 64 65 22 |Dodgy ex|it code"|
|00004490| 0d 1b 80 28 e7 20 91 3c | 54 20 8c 20 d6 20 6d 6f |...(. .<|T . . mo|
|000044a0| 76 65 61 6e 64 70 6c 6f | 74 73 74 61 72 73 3a 6d |veandplo|tstars:m|
|000044b0| 6f 76 65 6f 6e 25 3d a3 | 0d 1b 8a 0f fd 20 6d 6f |oveon%=.|..... mo|
|000044c0| 76 65 6f 6e 25 3d b9 0d | 1b 94 14 d6 20 73 63 72 |veon%=..|.... scr|
|000044d0| 6f 6c 6c 73 63 72 65 65 | 6e 75 70 0d 1b 9e 11 d6 |ollscree|nup.....|
|000044e0| 20 70 6c 6f 74 62 6c 75 | 65 7a 61 70 0d 1b a8 16 | plotblu|ezap....|
|000044f0| d6 20 6d 6f 76 65 61 6e | 64 70 6c 6f 74 73 74 61 |. movean|dplotsta|
|00004500| 72 73 0d 1b b2 05 ed 0d | 1b bc 04 0d 1b c6 1a f4 |rs......|........|
|00004510| 20 44 65 6c 61 79 20 62 | 65 66 6f 72 65 20 74 68 | Delay b|efore th|
|00004520| 65 20 65 6e 64 0d 1b d0 | 0b 54 3d 91 2b 38 30 30 |e end...|.T=.+800|
|00004530| 0d 1b da 05 f5 0d 1b e4 | 0d 6d 6f 76 65 6f 6e 25 |........|.moveon%|
|00004540| 3d b9 0d 1b ee 06 c8 96 | 0d 1b f8 12 d6 20 77 69 |=.......|..... wi|
|00004550| 70 65 73 74 61 72 73 6f | 75 74 0d 1c 02 28 e7 20 |pestarso|ut...(. |
|00004560| a6 28 2d 39 39 29 20 8c | 20 85 20 31 37 2c 22 44 |.(-99) .| . 17,"D|
|00004570| 6f 64 67 79 20 65 78 69 | 74 6f 73 20 63 6f 64 6f |odgy exi|tos codo|
|00004580| 73 22 0d 1c 0c 28 e7 20 | 91 3c 54 20 8c 20 d6 20 |s"...(. |.<T . . |
|00004590| 6d 6f 76 65 61 6e 64 70 | 6c 6f 74 73 74 61 72 73 |moveandp|lotstars|
|000045a0| 3a 6d 6f 76 65 6f 6e 25 | 3d a3 0d 1c 16 0f fd 20 |:moveon%|=...... |
|000045b0| 6d 6f 76 65 6f 6e 25 3d | b9 0d 1c 20 04 0d 1c 2a |moveon%=|... ...*|
|000045c0| 1f f4 20 46 6c 61 73 68 | 20 77 68 69 74 65 20 66 |.. Flash| white f|
|000045d0| 61 64 65 20 74 6f 20 62 | 6c 61 63 6b 0d 1c 34 17 |ade to b|lack..4.|
|000045e0| e3 20 6c 6f 6f 70 25 3d | 31 35 20 b8 20 30 20 88 |. loop%=|15 . 0 .|
|000045f0| 20 2d 31 0d 1c 3e 1f 41 | 25 3d 67 72 65 79 73 63 | -1..>.A|%=greysc|
|00004600| 61 6c 65 77 6f 72 64 73 | 21 28 6c 6f 6f 70 25 2a |alewords|!(loop%*|
|00004610| 34 29 0d 1c 48 09 c8 96 | 3a c8 96 0d 1c 52 10 d6 |4)..H...|:....R..|
|00004620| 20 67 72 65 79 69 74 64 | 6f 77 6e 0d 1c 5c 05 ed | greyitd|own..\..|
|00004630| 0d 1c 66 04 0d 1c 70 04 | 0d 1c 7a 05 e0 0d 1c 84 |..f...p.|..z.....|
|00004640| 04 0d 1c 8e 04 0d 1c 98 | 05 3a 0d 1c a2 13 dd a4 |........|.:......|
|00004650| 61 64 72 28 72 65 67 2c | 61 64 64 72 29 0d 1c ac |adr(reg,|addr)...|
|00004660| 2d f4 20 52 65 70 6c 61 | 63 65 73 20 27 41 44 52 |-. Repla|ces 'ADR|
|00004670| 27 20 77 72 69 74 74 65 | 6e 20 62 79 20 43 68 72 |' writte|n by Chr|
|00004680| 69 73 20 57 79 6d 61 72 | 6b 2e 0d 1c b6 26 f4 20 |is Wymar|k....&. |
|00004690| a9 20 31 39 39 34 20 56 | 69 73 69 6f 6e 73 20 6f |. 1994 V|isions o|
|000046a0| 66 20 74 68 65 20 49 6d | 70 6f 73 73 69 62 6c 65 |f the Im|possible|
|000046b0| 0d 1c c0 31 e7 20 28 50 | 25 20 80 20 33 29 3c 3e |...1. (P|% . 3)<>|
|000046c0| 30 20 8c 20 f1 22 43 6f | 64 65 20 69 73 6e 27 74 |0 . ."Co|de isn't|
|000046d0| 20 77 6f 72 64 20 61 6c | 69 67 6e 65 64 21 22 3a | word al|igned!":|
|000046e0| e0 0d 1c ca 4a ea 20 61 | 25 2c 62 25 2c 63 25 2c |....J. a|%,b%,c%,|
|000046f0| 65 25 2c 6c 6f 6f 70 25 | 2c 6e 75 6d 25 3a 6e 75 |e%,loop%|,num%:nu|
|00004700| 6d 25 3d 32 3a f4 20 74 | 68 65 20 6e 75 6d 62 65 |m%=2:. t|he numbe|
|00004710| 72 20 6f 66 20 69 6e 73 | 74 72 75 63 74 69 6f 6e |r of ins|truction|
|00004720| 73 20 61 73 73 65 6d 62 | 6c 65 64 0d 1c d4 1e 3a |s assemb|led....:|
|00004730| 63 25 3d 61 64 64 72 2d | 28 50 25 2b 38 29 3a 61 |c%=addr-|(P%+8):a|
|00004740| 25 3d 30 3a 62 25 3d 31 | 35 0d 1c de 1a e3 6c 6f |%=0:b%=1|5.....lo|
|00004750| 6f 70 25 3d 31 b8 6e 75 | 6d 25 3a e7 20 63 25 3d |op%=1.nu|m%:. c%=|
|00004760| 30 20 8c 0d 1c e8 18 5b | 4f 50 54 20 65 25 3a 4d |0 .....[|OPT e%:M|
|00004770| 4f 56 20 72 65 67 2c 62 | 25 3a 5d 0d 1c f2 24 cc |OV reg,b|%:]...$.|
|00004780| 20 c8 95 20 28 63 25 20 | 80 20 33 29 3d 30 3a 63 | .. (c% |. 3)=0:c|
|00004790| 25 3d 63 25 3e 3e 32 3a | 61 25 2b 3d 32 3a ce 0d |%=c%>>2:|a%+=2:..|
|000047a0| 1c fc 14 e7 20 28 63 25 | 20 80 20 32 35 36 29 3d |.... (c%| . 256)=|
|000047b0| 30 20 8c 0d 1d 06 35 5b | 4f 50 54 20 65 25 3a 41 |0 ....5[|OPT e%:A|
|000047c0| 44 44 20 72 65 67 2c 62 | 25 2c 23 28 63 25 20 80 |DD reg,b|%,#(c% .|
|000047d0| 20 32 35 35 29 3c 3c 61 | 25 3a 5d 3a 63 25 2d 3d | 255)<<a|%:]:c%-=|
|000047e0| 63 25 20 80 20 32 35 35 | 0d 1d 10 3f cc 20 5b 4f |c% . 255|...?. [O|
|000047f0| 50 54 20 65 25 3a 53 55 | 42 20 72 65 67 2c 62 25 |PT e%:SU|B reg,b%|
|00004800| 2c 23 28 32 35 36 2d 63 | 25 20 80 20 32 35 35 29 |,#(256-c|% . 255)|
|00004810| 3c 3c 61 25 3a 5d 3a 63 | 25 2b 3d 32 35 36 2d 63 |<<a%:]:c|%+=256-c|
|00004820| 25 20 80 20 32 35 35 0d | 1d 1a 05 cd 0d 1d 24 0e |% . 255.|......$.|
|00004830| cd 3a 62 25 3d 72 65 67 | 3a ed 0d 1d 2e 53 e7 20 |.:b%=reg|:....S. |
|00004840| 63 25 3c 3e 30 20 8c 20 | f1 22 43 6f 75 6c 64 20 |c%<>0 . |."Could |
|00004850| 6e 6f 74 20 41 44 52 20 | 74 6f 20 22 3b 61 64 64 |not ADR |to ";add|
|00004860| 72 3b 22 20 69 6e 20 22 | 3b 6e 75 6d 25 3b 22 20 |r;" in "|;num%;" |
|00004870| 69 6e 73 74 72 75 63 74 | 69 6f 6e 73 20 28 72 65 |instruct|ions (re|
|00004880| 67 3d 22 3b 72 65 67 3b | 22 29 22 3a e0 0d 1d 38 |g=";reg;|")":...8|
|00004890| 07 3d 65 25 0d 1d 42 05 | 3a 0d 1d 4c 0f dd a4 73 |.=e%..B.|:..L...s|
|000048a0| 70 61 63 65 28 61 25 29 | 0d 1d 56 0a 50 25 2b 3d |pace(a%)|..V.P%+=|
|000048b0| 61 25 0d 1d 60 06 3d 30 | 0d 1d ec 05 3a 0d 1d f6 |a%..`.=0|....:...|
|000048c0| 11 dd a4 6c 6f 61 64 28 | 66 69 6c 65 24 29 0d 1e |...load(|file$)..|
|000048d0| 00 27 ea 20 6c 65 6e 25 | 2c 77 73 24 2c 73 70 61 |.'. len%|,ws$,spa|
|000048e0| 63 65 72 65 71 25 2c 74 | 65 6d 70 25 2c 70 6f 73 |cereq%,t|emp%,pos|
|000048f0| 25 2c 70 6c 25 0d 1e 0a | 26 e7 20 66 69 6c 65 24 |%,pl%...|&. file$|
|00004900| 3d 22 22 20 8c 20 3d 30 | 20 3a f4 20 45 78 69 74 |="" . =0| :. Exit|
|00004910| 20 69 66 20 6e 6f 20 66 | 69 6c 65 0d 1e 14 04 0d | if no f|ile.....|
|00004920| 1e 1e 0e 58 3d 8e 28 66 | 69 6c 65 24 29 0d 1e 28 |...X=.(f|ile$)..(|
|00004930| 2a e7 20 58 3d 30 20 8c | 20 85 20 31 2c 22 46 69 |*. X=0 .| . 1,"Fi|
|00004940| 6c 65 20 22 2b 66 69 6c | 65 24 2b 22 20 6e 6f 74 |le "+fil|e$+" not|
|00004950| 20 66 6f 75 6e 64 22 0d | 1f 2c 0c 6c 65 6e 25 3d | found".|.,.len%=|
|00004960| a2 23 58 0d 1f 36 07 d9 | 23 58 0d 1f 40 04 0d 1f |.#X..6..|#X..@...|
|00004970| 4a 20 c8 99 20 22 4f 53 | 5f 46 69 6c 65 22 2c 31 |J .. "OS|_File",1|
|00004980| 37 2c 66 69 6c 65 24 20 | b8 20 2c 2c 74 25 0d 1f |7,file$ |. ,,t%..|
|00004990| 54 15 74 25 3d 28 74 25 | 3e 3e 38 29 20 80 20 26 |T.t%=(t%|>>8) . &|
|000049a0| 46 46 46 0d 1f 5e 0f e7 | 20 74 25 3d 26 66 63 61 |FFF..^..| t%=&fca|
|000049b0| 20 8c 0d 1f 68 4a 20 20 | 20 20 20 20 20 20 70 6c | ...hJ | pl|
|000049c0| 25 3d 6c 65 6e 25 2d 32 | 30 20 20 3a f4 20 77 65 |%=len%-2|0 :. we|
|000049d0| 20 6e 65 65 64 20 74 68 | 65 20 70 72 65 76 69 6f | need th|e previo|
|000049e0| 75 73 20 6c 65 6e 67 74 | 68 20 28 6d 69 6e 75 73 |us lengt|h (minus|
|000049f0| 20 74 68 65 20 68 65 61 | 64 65 72 29 0d 1f 72 12 | the hea|der)..r.|
|00004a00| 20 20 20 20 20 20 20 20 | 6c 65 6e 25 3d 30 0d 1f | |len%=0..|
|00004a10| 7c 16 20 20 20 20 20 20 | 20 20 58 3d 8e 28 66 69 ||. | X=.(fi|
|00004a20| 6c 65 24 29 0d 1f 86 19 | 20 20 20 20 20 20 20 20 |le$)....| |
|00004a30| e3 20 6c 6f 6f 70 25 3d | 31 20 b8 20 34 0d 1f 90 |. loop%=|1 . 4...|
|00004a40| 15 20 20 20 20 20 20 20 | 20 74 65 6d 70 25 3d 9a |. | temp%=.|
|00004a50| 23 58 0d 1f 9a 0d 20 20 | 20 20 20 20 20 20 ed 0d |#X.... | ..|
|00004a60| 1f a4 19 20 20 20 20 20 | 20 20 20 e3 20 6c 6f 6f |... | . loo|
|00004a70| 70 25 3d 30 20 b8 20 33 | 0d 1f ae 22 20 20 20 20 |p%=0 . 3|..." |
|00004a80| 20 20 20 20 6c 65 6e 25 | 2b 3d 28 9a 23 58 29 3c | len%|+=(.#X)<|
|00004a90| 3c 28 38 2a 6c 6f 6f 70 | 25 29 0d 1f b8 0d 20 20 |<(8*loop|%).... |
|00004aa0| 20 20 20 20 20 20 ed 0d | 1f c2 0f 20 20 20 20 20 | ..|... |
|00004ab0| 20 20 20 d9 23 58 0d 1f | cc 0d 20 20 20 20 20 20 | .#X..|.. |
|00004ac0| 20 20 cd 0d 1f d6 04 0d | 1f e0 5e e7 20 50 25 2b | ......|..^. P%+|
|00004ad0| 6c 65 6e 25 3e 63 6f 64 | 65 25 2b 4c 25 20 8c 20 |len%>cod|e%+L% . |
|00004ae0| 85 20 31 2c 22 4c 6f 61 | 64 69 6e 67 20 66 69 6c |. 1,"Loa|ding fil|
|00004af0| 65 20 27 22 2b 66 69 6c | 65 24 2b 22 27 20 77 69 |e '"+fil|e$+"' wi|
|00004b00| 6c 6c 20 74 61 6b 65 20 | 74 68 65 20 61 73 73 65 |ll take |the asse|
|00004b10| 6d 62 6c 65 72 20 6f 76 | 65 72 20 74 68 65 20 6c |mbler ov|er the l|
|00004b20| 69 6d 69 74 22 0d 1f ea | 04 0d 1f f4 18 e7 20 28 |imit"...|...... (|
|00004b30| 70 61 73 73 25 20 80 20 | 25 31 30 29 3c 3e 30 20 |pass% . |%10)<>0 |
|00004b40| 8c 0d 1f fe 1a 20 20 20 | 20 20 20 20 20 20 20 e7 |..... | .|
|00004b50| 20 74 25 3c 3e 26 66 63 | 61 20 8c 0d 20 08 2e 20 | t%<>&fc|a .. .. |
|00004b60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 ff | | .|
|00004b70| 28 22 4c 6f 61 64 20 22 | 2b 66 69 6c 65 24 2b 22 |("Load "|+file$+"|
|00004b80| 20 26 22 2b c3 7e 50 25 | 29 0d 20 12 13 20 20 20 | &"+.~P%|). .. |
|00004b90| 20 20 20 20 20 20 20 20 | 20 20 20 cc 0d 20 26 2c | | .. &,|
|00004ba0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004bb0| 70 6f 73 25 3d 28 50 25 | 2b 6c 65 6e 25 2b 38 29 |pos%=(P%|+len%+8)|
|00004bc0| 80 20 28 ac 25 31 31 29 | 0d 20 30 54 20 20 20 20 |. (.%11)|. 0T |
|00004bd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 ff 28 22 4c | | .("L|
|00004be0| 6f 61 64 20 22 2b 66 69 | 6c 65 24 2b 22 20 26 22 |oad "+fi|le$+" &"|
|00004bf0| 2b c3 7e 28 70 6f 73 25 | 29 29 20 3a f4 20 4c 6f |+.~(pos%|)) :. Lo|
|00004c00| 61 64 20 69 6e 20 61 66 | 74 65 72 20 77 68 65 72 |ad in af|ter wher|
|00004c10| 65 20 77 65 20 77 61 6e | 74 20 69 74 0d 20 3a 3f |e we wan|t it. :?|
|00004c20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004c30| c8 99 20 22 53 71 75 61 | 73 68 5f 44 65 63 6f 6d |.. "Squa|sh_Decom|
|00004c40| 70 72 65 73 73 22 2c 31 | 3c 3c 33 2c 70 6c 25 20 |press",1|<<3,pl% |
|00004c50| b8 20 73 70 61 63 65 72 | 65 71 25 0d 20 44 35 20 |. spacer|eq%. D5 |
|00004c60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 77 | | w|
|00004c70| 73 25 3d 65 6e 64 6f 66 | 63 6f 64 65 73 70 61 63 |s%=endof|codespac|
|00004c80| 65 2d 28 73 70 61 63 65 | 72 65 71 25 2b 34 30 29 |e-(space|req%+40)|
|00004c90| 0d 20 4e 49 20 20 20 20 | 20 20 20 20 20 20 20 20 |. NI | |
|00004ca0| 20 20 20 20 c8 99 20 22 | 53 71 75 61 73 68 5f 44 | .. "|Squash_D|
|00004cb0| 65 63 6f 6d 70 72 65 73 | 73 22 2c 28 31 3c 3c 32 |ecompres|s",(1<<2|
|00004cc0| 29 2c 77 73 25 2c 70 6f | 73 25 2b 32 30 2c 70 6c |),ws%,po|s%+20,pl|
|00004cd0| 25 2c 50 25 2c 6c 65 6e | 25 0d 20 58 13 20 20 20 |%,P%,len|%. X. |
|00004ce0| 20 20 20 20 20 20 20 20 | 20 20 20 cd 0d 20 62 0d | | .. b.|
|00004cf0| 20 20 20 20 20 20 20 20 | cd 0d 20 6c 14 20 20 20 | |.. l. |
|00004d00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 0d 20 76 | | . v|
|00004d10| 0c 50 25 2b 3d 6c 65 6e | 25 0d 20 80 0e 5b 4f 50 |.P%+=len|%. ..[OP|
|00004d20| 54 20 70 61 73 73 25 0d | 20 8a 09 41 4c 49 47 4e |T pass%.| ..ALIGN|
|00004d30| 0d 20 94 05 5d 0d 20 9e | 06 3d 30 0d 20 a8 05 3a |. ..]. .|.=0. ..:|
|00004d40| 0d 20 b2 10 dd f2 71 74 | 6d 28 73 25 2c 65 25 29 |. ....qt|m(s%,e%)|
|00004d50| 0d 20 bc 16 e7 20 71 74 | 6d 6c 6f 61 64 65 64 25 |. ... qt|mloaded%|
|00004d60| 3d a3 20 8c 20 e1 0d 20 | c6 05 f5 0d 20 d0 29 e7 |=. . .. |.... .).|
|00004d70| 20 a6 28 2d 39 39 29 20 | 8c 20 85 20 31 37 2c 22 | .(-99) |. . 17,"|
|00004d80| 44 6f 64 67 79 20 65 73 | 63 61 70 65 20 63 6f 64 |Dodgy es|cape cod|
|00004d90| 65 21 21 22 0d 20 da 22 | c8 99 20 22 51 54 4d 5f |e!!". ."|.. "QTM_|
|00004da0| 50 6f 73 22 2c 2d 31 2c | 2d 31 20 b8 20 73 65 71 |Pos",-1,|-1 . seq|
|00004db0| 25 2c 65 76 74 25 0d 20 | e4 1d fd 20 73 65 71 25 |%,evt%. |... seq%|
|00004dc0| 3e 3d 73 25 2b 73 73 25 | 20 80 20 65 76 74 25 3e |>=s%+ss%| . evt%>|
|00004dd0| 3d 65 25 0d 20 ee 05 e1 | 0d 20 f8 05 3a 0d 21 02 |=e%. ...|. ..:.!.|
|00004de0| 0b dd f2 65 72 72 6f 72 | 0d 21 0c 25 e7 20 9f 3c |...error|.!.%. .<|
|00004df0| 3e 31 37 20 8c 20 eb 20 | 30 3a f1 f6 24 3b 22 20 |>17 . . |0:..$;" |
|00004e00| 61 74 20 6c 69 6e 65 20 | 22 3b 9e 3a e0 0d 21 16 |at line |";.:..!.|
|00004e10| 15 f4 20 47 72 65 79 20 | 66 6c 61 73 68 20 64 6f |.. Grey |flash do|
|00004e20| 77 6e 0d 21 20 17 e3 20 | 6c 6f 6f 70 25 3d 31 35 |wn.! .. |loop%=15|
|00004e30| 20 b8 20 30 20 88 20 2d | 31 0d 21 2a 1f 41 25 3d | . 0 . -|1.!*.A%=|
|00004e40| 67 72 65 79 73 63 61 6c | 65 77 6f 72 64 73 21 28 |greyscal|ewords!(|
|00004e50| 6c 6f 6f 70 25 2a 34 29 | 0d 21 34 09 c8 96 3a c8 |loop%*4)|.!4...:.|
|00004e60| 96 0d 21 3e 10 d6 20 67 | 72 65 79 69 74 64 6f 77 |..!>.. g|reyitdow|
|00004e70| 6e 0d 21 48 05 ed 0d 21 | 52 05 e0 0d ff |n.!H...!|R.... |
+--------+-------------------------+-------------------------+--------+--------+
