/ RISCWORLD 3 / RISCWORLD_VOL3.iso / SOFTWARE / AGM / ARMsprite

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 11 f4 20 3e 20 | 41 52 4d 73 70 72 69 74 |..... > |ARMsprit|
|00000010| 65 0d 00 14 05 3a 0d 00 | 1e 10 ee 20 85 20 f2 65 |e....:..|... . .e|
|00000020| 72 72 6f 72 3a e0 0d 00 | 28 0f f2 69 6e 69 74 69 |rror:...|(..initi|
|00000030| 61 6c 69 73 65 0d 00 32 | 09 f2 66 69 6c 6c 0d 00 |alise..2|..fill..|
|00000040| 3c 0d f2 61 73 73 65 6d | 62 6c 65 0d 00 46 0b d6 |<..assem|ble..F..|
|00000050| 20 63 6f 64 65 25 0d 00 | 50 05 e0 0d 00 5a 05 3a | code%..|P....Z.:|
|00000060| 0d 00 64 0c dd 20 f2 65 | 72 72 6f 72 0d 00 6e 08 |..d.. .e|rror..n.|
|00000070| eb 20 31 32 0d 00 78 18 | e7 20 9f 3c 3e 31 37 20 |. 12..x.|. .<>17 |
|00000080| f1 20 f6 24 20 22 20 40 | 20 22 3b 9e 0d 00 82 05 |. .$ " @| ";.....|
|00000090| e1 0d 00 8c 05 3a 0d 00 | 96 11 dd 20 f2 69 6e 69 |.....:..|... .ini|
|000000a0| 74 69 61 6c 69 73 65 0d | 00 a0 08 eb 20 31 35 0d |tialise.|.... 15.|
|000000b0| 00 aa 08 eb 20 31 33 0d | 00 b4 05 87 0d 00 be 33 |.... 13.|.......3|
|000000c0| f1 20 8a 31 32 2c 37 29 | 20 22 50 6c 65 61 73 65 |. .12,7)| "Please|
|000000d0| 20 77 61 69 74 22 20 8a | 31 31 2c 31 31 29 20 22 | wait" .|11,11) "|
|000000e0| 45 73 63 61 70 65 20 74 | 6f 20 73 74 6f 70 22 0d |Escape t|o stop".|
|000000f0| 00 c8 09 fb 20 31 33 30 | 0d 00 d2 12 6e 75 6d 73 |.... 130|....nums|
|00000100| 70 72 69 74 65 73 25 3d | 35 32 0d 00 dc 13 73 70 |prites%=|52....sp|
|00000110| 72 69 74 65 77 69 64 74 | 68 25 3d 33 32 0d 00 e6 |ritewidt|h%=32...|
|00000120| 14 73 70 72 69 74 65 68 | 65 69 67 68 74 25 3d 33 |.spriteh|eight%=3|
|00000130| 32 0d 00 f0 0e 63 6f 6c | 6f 75 72 73 25 3d 38 0d |2....col|ours%=8.|
|00000140| 00 fa 16 de 20 62 6c 6f | 63 6b 25 20 31 35 2c 62 |.... blo|ck% 15,b|
|00000150| 32 25 20 31 35 0d 01 04 | 2e 62 6c 6f 63 6b 25 21 |2% 15...|.block%!|
|00000160| 30 3d 31 34 39 3a 20 20 | 20 20 20 20 20 20 f4 20 |0=149:  |      . |
|00000170| 73 63 72 65 65 6e 20 62 | 61 73 65 20 61 64 64 72 |screen b|ase addr|
|00000180| 65 73 73 0d 01 0e 26 62 | 6c 6f 63 6b 25 21 34 3d |ess...&b|lock%!4=|
|00000190| 37 3a 20 20 20 20 20 20 | 20 20 20 20 f4 20 73 63 |7:      |    . sc|
|000001a0| 72 65 65 6e 20 73 69 7a | 65 0d 01 18 26 62 6c 6f |reen siz|e...&blo|
|000001b0| 63 6b 25 21 38 3d 36 3a | 20 20 20 20 20 20 20 20 |ck%!8=6:|        |
|000001c0| 20 20 f4 20 6c 69 6e 65 | 20 6c 65 6e 67 74 68 0d |  . line| length.|
|000001d0| 01 22 10 62 6c 6f 63 6b | 25 21 31 32 3d 2d 31 0d |.".block|%!12=-1.|
|000001e0| 01 2c 27 c8 99 20 22 4f | 53 5f 52 65 61 64 56 64 |.,'.. "O|S_ReadVd|
|000001f0| 75 56 61 72 69 61 62 6c | 65 73 22 2c 62 6c 6f 63 |uVariabl|es",bloc|
|00000200| 6b 25 2c 62 32 25 0d 01 | 36 11 73 63 72 65 65 6e |k%,b2%..|6.screen|
|00000210| 25 3d 62 32 25 21 30 0d | 01 40 0f 73 69 7a 65 25 |%=b2%!0.|.@.size%|
|00000220| 3d 62 32 25 21 34 0d 01 | 4a 0f 6c 69 6e 65 25 3d |=b2%!4..|J.line%=|
|00000230| 62 32 25 21 38 0d 01 54 | 19 68 65 69 67 68 74 25 |b2%!8..T|.height%|
|00000240| 3d 73 69 7a 65 25 20 81 | 20 6c 69 6e 65 25 0d 01 |=size% .| line%..|
|00000250| 5e 1b de 20 74 61 62 6c | 65 25 20 6e 75 6d 73 70 |^.. tabl|e% numsp|
|00000260| 72 69 74 65 73 25 2a 32 | 30 0d 01 68 35 de 20 73 |rites%*2|0..h5. s|
|00000270| 70 72 69 74 65 61 72 65 | 61 25 20 63 6f 6c 6f 75 |priteare|a% colou|
|00000280| 72 73 25 2a 73 70 72 69 | 74 65 77 69 64 74 68 25 |rs%*spri|tewidth%|
|00000290| 2a 73 70 72 69 74 65 68 | 65 69 67 68 74 25 0d 01 |*spriteh|eight%..|
|000002a0| 72 05 e1 0d 01 7c 05 3a | 0d 01 86 0b dd 20 f2 66 |r....|.:|..... .f|
|000002b0| 69 6c 6c 0d 01 90 17 e3 | 20 4b 25 3d 30 20 b8 20 |ill.....| K%=0 . |
|000002c0| 63 6f 6c 6f 75 72 73 25 | 2d 31 0d 01 9a 1c e3 20 |colours%|-1..... |
|000002d0| 4a 25 3d 30 20 b8 20 73 | 70 72 69 74 65 68 65 69 |J%=0 . s|pritehei|
|000002e0| 67 68 74 25 2d 31 0d 01 | a4 1f e3 20 49 25 3d 30 |ght%-1..|... I%=0|
|000002f0| 20 b8 20 73 70 72 69 74 | 65 77 69 64 74 68 25 2d | . sprit|ewidth%-|
|00000300| 31 20 88 20 34 0d 01 ae | 45 56 25 3d 73 70 72 69 |1 . 4...|EV%=spri|
|00000310| 74 65 61 72 65 61 25 2b | 28 4b 25 2a 73 70 72 69 |tearea%+|(K%*spri|
|00000320| 74 65 68 65 69 67 68 74 | 25 2a 73 70 72 69 74 65 |teheight|%*sprite|
|00000330| 77 69 64 74 68 25 2b 4a | 25 2a 73 70 72 69 74 65 |width%+J|%*sprite|
|00000340| 77 69 64 74 68 25 2b 49 | 25 29 0d 01 b8 14 62 25 |width%+I|%)....b%|
|00000350| 3d 4b 25 2a 33 32 2b b3 | 28 31 36 29 2b 38 0d 01 |=K%*32+.|(16)+8..|
|00000360| c2 4c e7 20 49 25 3e 31 | 35 20 80 20 4a 25 3c 31 |.L. I%>1|5 . J%<1|
|00000370| 35 20 84 20 49 25 3c 31 | 35 20 80 20 4a 25 3e 31 |5 . I%<1|5 . J%>1|
|00000380| 35 20 21 56 25 3d 62 25 | 2b 28 62 25 3c 3c 38 29 |5 !V%=b%|+(b%<<8)|
|00000390| 2b 28 62 25 3c 3c 31 36 | 29 2b 28 62 25 3c 3c 32 |+(b%<<16|)+(b%<<2|
|000003a0| 34 29 20 8b 20 21 56 25 | 3d 30 0d 01 cc 05 ed 0d |4) . !V%|=0......|
|000003b0| 01 d6 05 ed 0d 01 e0 05 | ed 0d 01 ea 1a e3 20 4b |........|...... K|
|000003c0| 25 3d 30 20 b8 20 6e 75 | 6d 73 70 72 69 74 65 73 |%=0 . nu|msprites|
|000003d0| 25 2d 31 0d 01 f4 1d 74 | 61 62 6c 65 25 21 28 4b |%-1....t|able%!(K|
|000003e0| 25 2a 32 30 29 3d 28 b3 | 28 33 29 2d 32 29 2a 34 |%*20)=(.|(3)-2)*4|
|000003f0| 0d 01 fe 23 74 61 62 6c | 65 25 21 28 4b 25 2a 32 |...#tabl|e%!(K%*2|
|00000400| 30 2b 34 29 3d 28 b3 28 | 33 29 2d 32 29 2a 6c 69 |0+4)=(.(|3)-2)*li|
|00000410| 6e 65 25 0d 02 08 33 74 | 61 62 6c 65 25 21 28 4b |ne%...3t|able%!(K|
|00000420| 25 2a 32 30 2b 38 29 3d | b3 28 28 6c 69 6e 65 25 |%*20+8)=|.((line%|
|00000430| 2d 73 70 72 69 74 65 77 | 69 64 74 68 25 29 81 20 |-spritew|idth%). |
|00000440| 34 2d 31 29 2a 34 0d 02 | 12 3c 74 61 62 6c 65 25 |4-1)*4..|.<table%|
|00000450| 21 28 4b 25 2a 32 30 2b | 31 32 29 3d b3 28 68 65 |!(K%*20+|12)=.(he|
|00000460| 69 67 68 74 25 2d 73 70 | 72 69 74 65 68 65 69 67 |ight%-sp|riteheig|
|00000470| 68 74 25 2d 33 29 2a 6c | 69 6e 65 25 2b 6c 69 6e |ht%-3)*l|ine%+lin|
|00000480| 65 25 0d 02 1c 4c 74 61 | 62 6c 65 25 21 28 4b 25 |e%...Lta|ble%!(K%|
|00000490| 2a 32 30 2b 31 36 29 3d | 28 4b 25 20 83 20 63 6f |*20+16)=|(K% . co|
|000004a0| 6c 6f 75 72 73 25 29 2a | 73 70 72 69 74 65 68 65 |lours%)*|spritehe|
|000004b0| 69 67 68 74 25 2a 73 70 | 72 69 74 65 77 69 64 74 |ight%*sp|ritewidt|
|000004c0| 68 25 2b 73 70 72 69 74 | 65 61 72 65 61 25 0d 02 |h%+sprit|earea%..|
|000004d0| 26 05 ed 0d 02 30 05 e1 | 0d 02 3a 05 3a 0d 02 44 |&....0..|..:.:..D|
|000004e0| 0f dd 20 f2 61 73 73 65 | 6d 62 6c 65 0d 02 4e 10 |.. .asse|mble..N.|
|000004f0| de 20 63 6f 64 65 25 20 | 26 31 30 30 0d 02 58 0a |. code% |&100..X.|
|00000500| 77 6f 72 6b 3d 30 0d 02 | 62 08 64 58 3d 32 0d 02 |work=0..|b.dX=2..|
|00000510| 6c 08 64 59 3d 33 0d 02 | 76 0a 58 70 6f 73 3d 34 |l.dY=3..|v.Xpos=4|
|00000520| 0d 02 80 0a 59 70 6f 73 | 3d 35 0d 02 8a 10 73 70 |....Ypos|=5....sp|
|00000530| 72 69 74 65 64 61 74 61 | 3d 36 0d 02 94 0f 64 61 |ritedata|=6....da|
|00000540| 74 61 62 6c 6f 63 6b 3d | 37 0d 02 9e 0e 64 61 74 |tablock=|7....dat|
|00000550| 61 6c 69 6e 65 3d 38 0d | 02 a8 12 74 61 62 6c 65 |aline=8.|...table|
|00000560| 70 6f 69 6e 74 65 72 3d | 39 0d 02 b2 11 73 63 72 |pointer=|9....scr|
|00000570| 65 65 6e 62 61 73 65 3d | 31 30 0d 02 bc 10 74 61 |eenbase=|10....ta|
|00000580| 62 6c 65 62 61 73 65 3d | 31 31 0d 02 c6 0b 62 61 |blebase=|11....ba|
|00000590| 6e 6b 3d 31 32 0d 02 d0 | 09 73 70 3d 31 33 0d 02 |nk=12...|.sp=13..|
|000005a0| da 0b 6c 69 6e 6b 3d 31 | 34 0d 02 e4 12 e3 20 49 |..link=1|4..... I|
|000005b0| 25 3d 30 20 b8 20 32 20 | 88 20 32 0d 02 ee 0c 50 |%=0 . 2 |. 2....P|
|000005c0| 25 3d 63 6f 64 65 25 0d | 02 f8 0c 5b 20 4f 50 54 |%=code%.|...[ OPT|
|000005d0| 20 49 25 0d 03 02 16 53 | 54 4d 46 44 20 28 73 70 | I%....S|TMFD (sp|
|000005e0| 29 21 2c 7b 6c 69 6e 6b | 7d 0d 03 0c 0f 4d 4f 56 |)!,{link|}....MOV|
|000005f0| 20 62 61 6e 6b 2c 23 31 | 0d 03 16 16 41 44 52 20 | bank,#1|....ADR |
|00000600| 77 6f 72 6b 2c 73 63 72 | 65 65 6e 61 64 64 0d 03 |work,scr|eenadd..|
|00000610| 20 28 4c 44 4d 49 41 20 | 28 77 6f 72 6b 29 21 2c | (LDMIA |(work)!,|
|00000620| 7b 73 63 72 65 65 6e 62 | 61 73 65 2c 74 61 62 6c |{screenb|ase,tabl|
|00000630| 65 62 61 73 65 7d 0d 03 | 2a 0d 2e 6d 61 69 6e 6c |ebase}..|*..mainl|
|00000640| 6f 6f 70 0d 03 34 2f 4d | 4f 56 20 52 30 2c 23 31 |oop..4/M|OV R0,#1|
|00000650| 39 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3b |9       |       ;|
|00000660| 20 75 73 75 61 6c 20 73 | 63 72 65 65 6e 20 62 61 | usual s|creen ba|
|00000670| 6e 6b 0d 03 3e 11 53 57 | 49 20 22 4f 53 5f 42 79 |nk..>.SW|I "OS_By|
|00000680| 74 65 22 0d 03 48 0f 4d | 4f 56 20 52 30 2c 23 31 |te"..H.M|OV R0,#1|
|00000690| 31 33 0d 03 52 0f 4d 4f | 56 20 52 31 2c 62 61 6e |13..R.MO|V R1,ban|
|000006a0| 6b 0d 03 5c 11 53 57 49 | 20 22 4f 53 5f 42 79 74 |k..\.SWI| "OS_Byt|
|000006b0| 65 22 0d 03 66 2d 82 20 | 62 61 6e 6b 2c 62 61 6e |e"..f-. |bank,ban|
|000006c0| 6b 2c 23 33 20 20 20 20 | 20 20 20 20 3b 20 64 69 |k,#3    |    ; di|
|000006d0| 73 70 6c 61 79 20 61 6e | 64 20 77 72 69 74 65 0d |splay an|d write.|
|000006e0| 03 70 0f 4d 4f 56 20 52 | 30 2c 23 31 31 32 0d 03 |.p.MOV R|0,#112..|
|000006f0| 7a 0f 4d 4f 56 20 52 31 | 2c 62 61 6e 6b 0d 03 84 |z.MOV R1|,bank...|
|00000700| 11 53 57 49 20 22 4f 53 | 5f 42 79 74 65 22 0d 03 |.SWI "OS|_Byte"..|
|00000710| 8e 2e 53 57 49 20 26 31 | 30 43 20 20 20 20 20 20 |..SWI &1|0C      |
|00000720| 20 20 20 20 20 20 20 20 | 20 20 3b 20 61 6e 64 20 |        |  ; and |
|00000730| 63 6c 65 61 72 20 73 63 | 72 65 65 6e 0d 03 98 0f |clear sc|reen....|
|00000740| 43 4d 50 20 62 61 6e 6b | 2c 23 32 0d 03 a2 39 41 |CMP bank|,#2...9A|
|00000750| 44 44 45 51 20 73 63 72 | 65 65 6e 62 61 73 65 2c |DDEQ scr|eenbase,|
|00000760| 73 63 72 65 65 6e 62 61 | 73 65 2c 23 73 69 7a 65 |screenba|se,#size|
|00000770| 25 20 20 3b 20 65 6e 73 | 75 72 65 20 77 65 20 77 |%  ; ens|ure we w|
|00000780| 72 69 74 65 0d 03 ac 39 | 53 55 42 4e 45 20 73 63 |rite...9|SUBNE sc|
|00000790| 72 65 65 6e 62 61 73 65 | 2c 73 63 72 65 65 6e 62 |reenbase|,screenb|
|000007a0| 61 73 65 2c 23 73 69 7a | 65 25 20 20 3b 20 74 6f |ase,#siz|e%  ; to|
|000007b0| 20 63 6f 72 72 65 63 74 | 20 62 61 6e 6b 0d 03 b6 | correct| bank...|
|000007c0| 3d 4d 4f 56 20 74 61 62 | 6c 65 70 6f 69 6e 74 65 |=MOV tab|lepointe|
|000007d0| 72 2c 23 6e 75 6d 73 70 | 72 69 74 65 73 25 2d 31 |r,#numsp|rites%-1|
|000007e0| 20 20 20 20 20 3b 20 67 | 65 74 20 63 6f 75 6e 74 |     ; g|et count|
|000007f0| 20 74 68 65 6e 20 78 20 | 32 30 0d 03 c0 35 41 44 | then x |20...5AD|
|00000800| 44 20 74 61 62 6c 65 70 | 6f 69 6e 74 65 72 2c 74 |D tablep|ointer,t|
|00000810| 61 62 6c 65 70 6f 69 6e | 74 65 72 2c 74 61 62 6c |ablepoin|ter,tabl|
|00000820| 65 70 6f 69 6e 74 65 72 | 2c 4c 53 4c 20 23 32 0d |epointer|,LSL #2.|
|00000830| 03 ca 32 41 44 44 20 74 | 61 62 6c 65 70 6f 69 6e |..2ADD t|ablepoin|
|00000840| 74 65 72 2c 74 61 62 6c | 65 62 61 73 65 2c 74 61 |ter,tabl|ebase,ta|
|00000850| 62 6c 65 70 6f 69 6e 74 | 65 72 2c 4c 53 4c 20 23 |blepoint|er,LSL #|
|00000860| 32 0d 03 d4 0f 2e 73 70 | 72 69 74 65 6c 6f 6f 70 |2.....sp|riteloop|
|00000870| 0d 03 de 0b 42 4c 20 70 | 6c 6f 74 0d 03 e8 25 53 |....BL p|lot...%S|
|00000880| 55 42 20 74 61 62 6c 65 | 70 6f 69 6e 74 65 72 2c |UB table|pointer,|
|00000890| 74 61 62 6c 65 70 6f 69 | 6e 74 65 72 2c 23 32 30 |tablepoi|nter,#20|
|000008a0| 0d 03 f2 1e 43 4d 50 20 | 74 61 62 6c 65 70 6f 69 |....CMP |tablepoi|
|000008b0| 6e 74 65 72 2c 74 61 62 | 6c 65 62 61 73 65 0d 03 |nter,tab|lebase..|
|000008c0| fc 12 42 47 45 20 73 70 | 72 69 74 65 6c 6f 6f 70 |..BGE sp|riteloop|
|000008d0| 0d 04 06 1c 53 57 49 20 | 22 4f 53 5f 52 65 61 64 |....SWI |"OS_Read|
|000008e0| 45 73 63 61 70 65 53 74 | 61 74 65 22 0d 04 10 10 |EscapeSt|ate"....|
|000008f0| 42 43 43 20 6d 61 69 6e | 6c 6f 6f 70 0d 04 1a 14 |BCC main|loop....|
|00000900| 4c 44 4d 46 44 20 28 73 | 70 29 21 2c 7b 50 43 7d |LDMFD (s|p)!,{PC}|
|00000910| 0d 04 24 05 3b 0d 04 2e | 09 2e 70 6c 6f 74 0d 04 |..$.;...|..plot..|
|00000920| 38 35 4c 44 4d 49 41 20 | 28 74 61 62 6c 65 70 6f |85LDMIA |(tablepo|
|00000930| 69 6e 74 65 72 29 2c 7b | 64 58 2c 64 59 2c 58 70 |inter),{|dX,dY,Xp|
|00000940| 6f 73 2c 59 70 6f 73 2c | 73 70 72 69 74 65 64 61 |os,Ypos,|spriteda|
|00000950| 74 61 7d 0d 04 42 05 3b | 0d 04 4c 0f 43 4d 50 20 |ta}..B.;|..L.CMP |
|00000960| 58 70 6f 73 2c 23 30 0d | 04 56 22 43 4d 50 4e 45 |Xpos,#0.|.V"CMPNE|
|00000970| 20 58 70 6f 73 2c 23 6c | 69 6e 65 25 2d 73 70 72 | Xpos,#l|ine%-spr|
|00000980| 69 74 65 77 69 64 74 68 | 25 0d 04 60 0f 4d 56 4e |itewidth|%..`.MVN|
|00000990| 45 51 20 64 58 2c 64 58 | 0d 04 6a 2c 41 44 44 45 |EQ dX,dX|..j,ADDE|
|000009a0| 51 20 64 58 2c 64 58 2c | 23 31 20 20 20 20 20 20 |Q dX,dX,|#1      |
|000009b0| 20 20 20 20 3b 20 63 68 | 65 63 6b 20 58 20 6c 69 |    ; ch|eck X li|
|000009c0| 6d 69 74 73 0d 04 74 05 | 3b 0d 04 7e 13 43 4d 50 |mits..t.|;..~.CMP|
|000009d0| 20 59 70 6f 73 2c 23 6c | 69 6e 65 25 0d 04 88 28 | Ypos,#l|ine%...(|
|000009e0| 41 44 44 20 77 6f 72 6b | 2c 59 70 6f 73 2c 23 6c |ADD work|,Ypos,#l|
|000009f0| 69 6e 65 25 2a 28 73 70 | 72 69 74 65 68 65 69 67 |ine%*(sp|riteheig|
|00000a00| 68 74 25 29 0d 04 92 15 | 43 4d 50 4e 45 20 77 6f |ht%)....|CMPNE wo|
|00000a10| 72 6b 2c 23 73 69 7a 65 | 25 0d 04 9c 0f 4d 56 4e |rk,#size|%....MVN|
|00000a20| 45 51 20 64 59 2c 64 59 | 0d 04 a6 2c 41 44 44 45 |EQ dY,dY|...,ADDE|
|00000a30| 51 20 64 59 2c 64 59 2c | 23 31 20 20 20 20 20 20 |Q dY,dY,|#1      |
|00000a40| 20 20 20 20 3b 20 63 68 | 65 63 6b 20 59 20 6c 69 |    ; ch|eck Y li|
|00000a50| 6d 69 74 73 0d 04 b0 05 | 3b 0d 04 ba 2e 41 44 44 |mits....|;....ADD|
|00000a60| 20 58 70 6f 73 2c 58 70 | 6f 73 2c 64 58 20 20 20 | Xpos,Xp|os,dX   |
|00000a70| 20 20 20 20 20 3b 20 75 | 70 64 61 74 65 20 70 6f |     ; u|pdate po|
|00000a80| 73 69 74 69 6f 6e 73 0d | 04 c4 27 41 44 44 20 59 |sitions.|..'ADD Y|
|00000a90| 70 6f 73 2c 59 70 6f 73 | 2c 64 59 20 20 20 20 20 |pos,Ypos|,dY     |
|00000aa0| 20 20 20 3b 20 61 6e 64 | 20 73 74 6f 72 65 0d 04 |   ; and| store..|
|00000ab0| ce 2a 53 54 4d 49 41 20 | 28 74 61 62 6c 65 70 6f |.*STMIA |(tablepo|
|00000ac0| 69 6e 74 65 72 29 2c 7b | 64 58 2c 64 59 2c 58 70 |inter),{|dX,dY,Xp|
|00000ad0| 6f 73 2c 59 70 6f 73 7d | 0d 04 d8 05 3b 0d 04 e2 |os,Ypos}|....;...|
|00000ae0| 1c 41 44 44 20 58 70 6f | 73 2c 58 70 6f 73 2c 73 |.ADD Xpo|s,Xpos,s|
|00000af0| 63 72 65 65 6e 62 61 73 | 65 0d 04 ec 16 41 44 44 |creenbas|e....ADD|
|00000b00| 20 58 70 6f 73 2c 58 70 | 6f 73 2c 59 70 6f 73 0d | Xpos,Xp|os,Ypos.|
|00000b10| 04 f6 38 41 44 44 20 64 | 61 74 61 62 6c 6f 63 6b |..8ADD d|atablock|
|00000b20| 2c 73 70 72 69 74 65 64 | 61 74 61 2c 23 73 70 72 |,sprited|ata,#spr|
|00000b30| 69 74 65 77 69 64 74 68 | 25 2a 73 70 72 69 74 65 |itewidth|%*sprite|
|00000b40| 68 65 69 67 68 74 25 0d | 05 00 05 3b 0d 05 0a 0a |height%.|...;....|
|00000b50| 2e 62 6c 6f 63 6b 0d 05 | 14 29 41 44 44 20 64 61 |.block..|.)ADD da|
|00000b60| 74 61 6c 69 6e 65 2c 73 | 70 72 69 74 65 64 61 74 |taline,s|pritedat|
|00000b70| 61 2c 23 73 70 72 69 74 | 65 77 69 64 74 68 25 0d |a,#sprit|ewidth%.|
|00000b80| 05 1e 09 2e 6c 69 6e 65 | 0d 05 28 31 4c 44 4d 49 |....line|..(1LDMI|
|00000b90| 41 20 28 73 70 72 69 74 | 65 64 61 74 61 29 21 2c |A (sprit|edata)!,|
|00000ba0| 7b 52 30 2d 52 33 7d 20 | 3b 20 73 6c 6f 70 20 69 |{R0-R3} |; slop i|
|00000bb0| 74 20 6f 76 65 72 20 69 | 6e 0d 05 32 31 53 54 4d |t over i|n..21STM|
|00000bc0| 49 41 20 28 58 70 6f 73 | 29 21 2c 7b 52 30 2d 52 |IA (Xpos|)!,{R0-R|
|00000bd0| 33 7d 20 20 20 20 20 20 | 20 3b 20 34 20 72 65 67 |3}      | ; 4 reg|
|00000be0| 69 73 65 72 20 6c 75 6d | 70 73 0d 05 3c 1b 43 4d |iser lum|ps..<.CM|
|00000bf0| 50 20 73 70 72 69 74 65 | 64 61 74 61 2c 64 61 74 |P sprite|data,dat|
|00000c00| 61 6c 69 6e 65 0d 05 46 | 0c 42 4c 54 20 6c 69 6e |aline..F|.BLT lin|
|00000c10| 65 0d 05 50 25 41 44 44 | 20 58 70 6f 73 2c 58 70 |e..P%ADD| Xpos,Xp|
|00000c20| 6f 73 2c 23 6c 69 6e 65 | 25 2d 73 70 72 69 74 65 |os,#line|%-sprite|
|00000c30| 77 69 64 74 68 25 0d 05 | 5a 1c 43 4d 50 20 73 70 |width%..|Z.CMP sp|
|00000c40| 72 69 74 65 64 61 74 61 | 2c 64 61 74 61 62 6c 6f |ritedata|,datablo|
|00000c50| 63 6b 0d 05 64 0d 42 4c | 54 20 62 6c 6f 63 6b 0d |ck..d.BL|T block.|
|00000c60| 05 6e 0f 4d 4f 56 20 50 | 43 2c 6c 69 6e 6b 0d 05 |.n.MOV P|C,link..|
|00000c70| 78 0e 2e 73 63 72 65 65 | 6e 61 64 64 0d 05 82 10 |x..scree|nadd....|
|00000c80| 45 51 55 44 20 73 63 72 | 65 65 6e 25 0d 05 8c 0f |EQUD scr|een%....|
|00000c90| 45 51 55 44 20 74 61 62 | 6c 65 25 0d 05 96 05 5d |EQUD tab|le%....]|
|00000ca0| 0d 05 a0 05 ed 0d 05 aa | 05 e1 0d ff             |........|....    |
+--------+-------------------------+-------------------------+--------+--------+