/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / OTL-BBU1.DMS / in.adf / AcidSource / displaylib

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 20 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |; ******|********|
|00000010| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000020| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000030| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 00 3b 20 2a 20 |********|***.; * |
|00000040| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000050| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000060| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000070| 20 20 20 20 20 20 2a 00 | 3b 20 2a 20 20 20 20 20 |      *.|; *     |
|00000080| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 64 69 73 |        |     dis|
|00000090| 70 6c 61 79 20 6c 69 62 | 20 20 20 20 20 20 20 20 |play lib|        |
|000000a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000000b0| 20 20 2a 00 3b 20 2a 20 | 20 20 20 20 20 20 20 20 |  *.; * |        |
|000000c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000000d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000000e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 2a 00 |        |      *.|
|000000f0| 3b 20 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |; ******|********|
|00000100| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000110| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000120| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 00 00 3b 20 6e |********|***..; n|
|00000130| 65 77 20 66 6f 72 20 62 | 75 6d 35 00 3b 20 61 67 |ew for b|um5.; ag|
|00000140| 61 20 6d 6f 64 65 73 2c | 20 61 6c 6c 20 72 65 6c |a modes,| all rel|
|00000150| 61 74 69 76 65 20 70 6f | 73 69 74 69 6f 6e 00 3b |ative po|sition.;|
|00000160| 20 72 65 73 20 3d 20 66 | 6c 61 67 73 7c 6d 6f 64 | res = f|lags|mod|
|00000170| 65 7c 77 69 64 74 68 7c | 62 70 73 00 3b 20 20 20 |e|width||bps.;   |
|00000180| 20 20 20 20 28 66 6c 61 | 67 73 3d 73 6d 6f 6f 74 |    (fla|gs=smoot|
|00000190| 68 7c 68 61 6d 7c 64 70 | 66 7c 3f 3f 3f 29 00 3b |h|ham|dp|f|???).;|
|000001a0| 00 3b 20 66 6d 6f 64 65 | 20 7c 20 77 69 64 74 68 |.; fmode| | width|
|000001b0| 20 7c 20 72 65 73 6f 6c | 75 74 69 6f 6e 20 7c 20 | | resol|ution | |
|000001c0| 68 61 6d 20 65 68 62 20 | 64 70 66 20 73 6d 6f 6f |ham ehb |dpf smoo|
|000001d0| 74 68 20 7c 20 62 69 74 | 70 6c 61 6e 65 73 00 3b |th | bit|planes.;|
|000001e0| 00 00 21 6c 69 62 68 65 | 61 64 65 72 7b 23 64 69 |..!libhe|ader{#di|
|000001f0| 73 70 6c 61 79 6c 69 62 | 2c 69 6e 69 74 2c 30 2c |splaylib|,init,0,|
|00000200| 66 69 6e 69 74 2c 30 7d | 00 00 21 64 75 6d 74 6f |finit,0}|..!dumto|
|00000210| 6b 65 7b 22 43 6f 70 4c | 69 73 74 22 2c 22 22 2c |ke{"CopL|ist","",|
|00000220| 5f 74 6f 6b 65 7d 00 00 | 21 61 73 74 61 74 65 6d |_toke}..|!astatem|
|00000230| 65 6e 74 00 21 61 72 67 | 73 20 7b 23 77 6f 72 64 |ent.!arg|s {#word|
|00000240| 2c 23 77 6f 72 64 2c 23 | 77 6f 72 64 2c 23 6c 6f |,#word,#|word,#lo|
|00000250| 6e 67 2c 23 77 6f 72 64 | 2c 23 77 6f 72 64 2c 23 |ng,#word|,#word,#|
|00000260| 77 6f 72 64 7d 00 21 6c | 69 62 73 20 7b 23 64 69 |word}.!l|ibs {#di|
|00000270| 73 70 6c 61 79 6c 69 62 | 2c 24 31 33 38 30 2c 23 |splaylib|,$1380,#|
|00000280| 73 70 72 69 74 65 73 6c | 69 62 2c 23 6c 61 30 7d |spritesl|ib,#la0}|
|00000290| 00 21 73 75 62 73 20 7b | 5f 69 6e 69 74 63 6f 70 |.!subs {|_initcop|
|000002a0| 6c 69 73 74 2c 30 2c 30 | 7d 00 21 6e 61 6d 65 20 |list,0,0|}.!name |
|000002b0| 7b 22 49 6e 69 74 43 6f | 70 4c 69 73 74 22 2c 22 |{"InitCo|pList","|
|000002c0| 43 6f 70 4c 69 73 74 23 | 2c 79 70 6f 73 2c 68 65 |CopList#|,ypos,he|
|000002d0| 69 67 68 74 2c 74 79 70 | 65 2c 73 70 72 69 74 65 |ight,typ|e,sprite|
|000002e0| 73 2c 63 6f 6c 6f 72 73 | 2c 63 75 73 74 6f 6d 73 |s,colors|,customs|
|000002f0| 20 5b 2d 76 65 3d 63 62 | 6c 6f 77 5d 22 7d 00 00 | [-ve=cb|low]"}..|
|00000300| 21 61 73 74 61 74 65 6d | 65 6e 74 00 21 72 65 70 |!astatem|ent.!rep|
|00000310| 61 72 67 73 20 7b 30 2c | 31 2c 23 70 75 73 68 7c |args {0,|1,#push||
|00000320| 23 77 6f 72 64 7d 00 21 | 6c 69 62 73 20 7b 23 64 |#word}.!|libs {#d|
|00000330| 69 73 70 6c 61 79 6c 69 | 62 2c 23 62 61 30 7d 00 |isplayli|b,#ba0}.|
|00000340| 21 73 75 62 73 20 7b 5f | 63 72 65 61 74 65 64 69 |!subs {_|createdi|
|00000350| 73 70 6c 61 79 2c 31 2c | 30 7d 00 21 6e 61 6d 65 |splay,1,|0}.!name|
|00000360| 20 7b 22 43 72 65 61 74 | 65 44 69 73 70 6c 61 79 | {"Creat|eDisplay|
|00000370| 22 2c 22 43 6f 70 4c 69 | 73 74 23 5b 2c 43 6f 70 |","CopLi|st#[,Cop|
|00000380| 4c 69 73 74 23 2e 2e 5d | 22 7d 00 00 21 61 73 74 |List#..]|"}..!ast|
|00000390| 61 74 65 6d 65 6e 74 00 | 3b 00 21 61 72 67 73 20 |atement.|;.!args |
|000003a0| 7b 23 77 6f 72 64 2c 23 | 77 6f 72 64 7d 00 21 6c |{#word,#|word}.!l|
|000003b0| 69 62 73 20 7b 23 64 69 | 73 70 6c 61 79 6c 69 62 |ibs {#di|splaylib|
|000003c0| 2c 24 31 33 38 30 2c 23 | 62 69 74 6d 61 70 6c 69 |,$1380,#|bitmapli|
|000003d0| 62 2c 24 31 30 38 31 7d | 00 21 73 75 62 73 20 7b |b,$1081}|.!subs {|
|000003e0| 5f 64 69 73 70 6c 61 79 | 62 6d 61 70 2c 5f 63 68 |_display|bmap,_ch|
|000003f0| 65 63 6b 63 6f 70 6c 69 | 73 74 2c 30 7d 00 21 61 |eckcopli|st,0}.!a|
|00000400| 72 67 73 20 7b 23 77 6f | 72 64 2c 23 77 6f 72 64 |rgs {#wo|rd,#word|
|00000410| 2c 23 71 75 69 63 6b 2c | 23 77 6f 72 64 7d 00 21 |,#quick,|#word}.!|
|00000420| 6c 69 62 73 20 7b 23 64 | 69 73 70 6c 61 79 6c 69 |libs {#d|isplayli|
|00000430| 62 2c 24 31 33 38 30 2c | 23 62 69 74 6d 61 70 6c |b,$1380,|#bitmapl|
|00000440| 69 62 2c 24 31 30 38 31 | 7d 00 21 73 75 62 73 20 |ib,$1081|}.!subs |
|00000450| 7b 5f 64 69 73 70 6c 61 | 79 62 6d 61 70 32 2c 5f |{_displa|ybmap2,_|
|00000460| 63 68 65 63 6b 63 6f 70 | 6c 69 73 74 2c 30 7d 00 |checkcop|list,0}.|
|00000470| 3b 00 21 61 72 67 73 20 | 7b 23 77 6f 72 64 2c 23 |;.!args |{#word,#|
|00000480| 77 6f 72 64 2c 23 77 6f | 72 64 7d 00 21 6c 69 62 |word,#wo|rd}.!lib|
|00000490| 73 20 7b 23 64 69 73 70 | 6c 61 79 6c 69 62 2c 24 |s {#disp|laylib,$|
|000004a0| 31 33 38 30 2c 23 62 69 | 74 6d 61 70 6c 69 62 2c |1380,#bi|tmaplib,|
|000004b0| 24 31 30 38 31 2c 23 62 | 69 74 6d 61 70 6c 69 62 |$1081,#b|itmaplib|
|000004c0| 2c 24 31 31 38 32 7d 00 | 21 73 75 62 73 20 7b 5f |,$1182}.|!subs {_|
|000004d0| 64 69 73 70 6c 61 79 64 | 62 6d 61 70 2c 5f 63 68 |displayd|bmap,_ch|
|000004e0| 65 63 6b 63 6f 70 6c 69 | 73 74 2c 30 7d 00 21 61 |eckcopli|st,0}.!a|
|000004f0| 72 67 73 20 7b 23 77 6f | 72 64 2c 23 77 6f 72 64 |rgs {#wo|rd,#word|
|00000500| 2c 23 71 75 69 63 6b 2c | 23 77 6f 72 64 2c 23 77 |,#quick,|#word,#w|
|00000510| 6f 72 64 2c 23 71 75 69 | 63 6b 2c 23 77 6f 72 64 |ord,#qui|ck,#word|
|00000520| 7d 00 21 6c 69 62 73 20 | 7b 23 64 69 73 70 6c 61 |}.!libs |{#displa|
|00000530| 79 6c 69 62 2c 24 31 33 | 38 30 2c 23 62 69 74 6d |ylib,$13|80,#bitm|
|00000540| 61 70 6c 69 62 2c 24 31 | 30 38 31 2c 23 62 69 74 |aplib,$1|081,#bit|
|00000550| 6d 61 70 6c 69 62 2c 24 | 31 31 38 34 7d 00 21 73 |maplib,$|1184}.!s|
|00000560| 75 62 73 20 7b 5f 64 69 | 73 70 6c 61 79 64 62 6d |ubs {_di|splaydbm|
|00000570| 61 70 32 2c 5f 63 68 65 | 63 6b 63 6f 70 6c 69 73 |ap2,_che|ckcoplis|
|00000580| 74 2c 30 7d 00 3b 00 21 | 6e 61 6d 65 20 7b 22 44 |t,0}.;.!|name {"D|
|00000590| 69 73 70 6c 61 79 42 69 | 74 4d 61 70 22 2c 22 43 |isplayBi|tMap","C|
|000005a0| 6f 70 4c 69 73 74 23 2c | 62 6d 61 70 5b 2c 78 2c |opList#,|bmap[,x,|
|000005b0| 79 5d 20 5b 2c 62 6d 61 | 70 5b 2c 78 2c 79 5d 5d |y] [,bma|p[,x,y]]|
|000005c0| 22 7d 00 00 21 61 73 74 | 61 74 65 6d 65 6e 74 00 |"}..!ast|atement.|
|000005d0| 21 61 72 67 73 20 7b 23 | 77 6f 72 64 2c 23 77 6f |!args {#|word,#wo|
|000005e0| 72 64 2c 23 71 75 69 63 | 6b 2c 23 77 6f 72 64 2c |rd,#quic|k,#word,|
|000005f0| 23 77 6f 72 64 7d 00 21 | 6c 69 62 73 20 7b 23 73 |#word}.!|libs {#s|
|00000600| 70 72 69 74 65 73 6c 69 | 62 2c 24 31 31 38 31 2c |pritesli|b,$1181,|
|00000610| 23 64 69 73 70 6c 61 79 | 6c 69 62 2c 24 31 33 38 |#display|lib,$138|
|00000620| 30 7d 00 21 73 75 62 73 | 20 7b 5f 64 69 73 70 6c |0}.!subs| {_displ|
|00000630| 61 79 73 70 72 69 74 65 | 2c 5f 63 68 65 63 6b 63 |aysprite|,_checkc|
|00000640| 6f 70 6c 69 73 74 2c 30 | 7d 00 21 6e 61 6d 65 20 |oplist,0|}.!name |
|00000650| 7b 22 44 69 73 70 6c 61 | 79 53 70 72 69 74 65 22 |{"Displa|ySprite"|
|00000660| 2c 22 43 6f 70 4c 69 73 | 74 23 2c 53 70 72 69 74 |,"CopLis|t#,Sprit|
|00000670| 65 23 2c 58 2c 59 2c 53 | 70 72 69 74 65 20 43 68 |e#,X,Y,S|prite Ch|
|00000680| 61 6e 6e 65 6c 22 7d 00 | 00 21 61 73 74 61 74 65 |annel"}.|.!astate|
|00000690| 6d 65 6e 74 00 21 61 72 | 67 73 20 7b 23 77 6f 72 |ment.!ar|gs {#wor|
|000006a0| 64 2c 23 77 6f 72 64 7d | 00 21 6c 69 62 73 20 7b |d,#word}|.!libs {|
|000006b0| 23 64 69 73 70 6c 61 79 | 6c 69 62 2c 24 31 33 38 |#display|lib,$138|
|000006c0| 30 2c 23 70 61 6c 65 74 | 74 65 6c 69 62 2c 24 31 |0,#palet|telib,$1|
|000006d0| 30 38 31 7d 00 21 73 75 | 62 73 20 7b 5f 64 69 73 |081}.!su|bs {_dis|
|000006e0| 70 6c 61 79 70 61 6c 65 | 74 74 65 2c 5f 63 68 65 |playpale|tte,_che|
|000006f0| 63 6b 63 6f 70 6c 69 73 | 74 2c 30 7d 00 21 61 72 |ckcoplis|t,0}.!ar|
|00000700| 67 73 20 7b 23 77 6f 72 | 64 2c 23 77 6f 72 64 2c |gs {#wor|d,#word,|
|00000710| 23 77 6f 72 64 7d 00 21 | 6c 69 62 73 20 7b 23 64 |#word}.!|libs {#d|
|00000720| 69 73 70 6c 61 79 6c 69 | 62 2c 24 31 33 38 30 2c |isplayli|b,$1380,|
|00000730| 23 70 61 6c 65 74 74 65 | 6c 69 62 2c 24 31 30 38 |#palette|lib,$108|
|00000740| 31 7d 00 21 73 75 62 73 | 20 7b 5f 64 69 73 70 6c |1}.!subs| {_displ|
|00000750| 61 79 70 61 6c 65 74 74 | 65 32 2c 5f 63 68 65 63 |aypalett|e2,_chec|
|00000760| 6b 63 6f 70 6c 69 73 74 | 2c 30 7d 00 21 6e 61 6d |kcoplist|,0}.!nam|
|00000770| 65 20 7b 22 44 69 73 70 | 6c 61 79 50 61 6c 65 74 |e {"Disp|layPalet|
|00000780| 74 65 22 2c 22 43 6f 70 | 4c 69 73 74 23 2c 50 61 |te","Cop|List#,Pa|
|00000790| 6c 65 74 74 65 23 20 5b | 2c 63 6f 6c 6f 72 6f 66 |lette# [|,colorof|
|000007a0| 66 73 65 74 5d 22 7d 00 | 00 21 61 73 74 61 74 65 |fset]"}.|.!astate|
|000007b0| 6d 65 6e 74 00 21 61 72 | 67 73 20 7b 23 77 6f 72 |ment.!ar|gs {#wor|
|000007c0| 64 2c 23 6c 6f 6e 67 2c | 23 6c 6f 6e 67 2c 23 6c |d,#long,|#long,#l|
|000007d0| 6f 6e 67 7d 00 21 6c 69 | 62 73 20 7b 23 64 69 73 |ong}.!li|bs {#dis|
|000007e0| 70 6c 61 79 6c 69 62 2c | 24 31 33 38 30 7d 00 21 |playlib,|$1380}.!|
|000007f0| 73 75 62 73 20 7b 5f 64 | 6f 62 70 6c 63 6f 6e 73 |subs {_d|obplcons|
|00000800| 2c 5f 63 68 65 63 6b 63 | 6f 70 6c 69 73 74 2c 30 |,_checkc|oplist,0|
|00000810| 7d 00 21 6e 61 6d 65 20 | 7b 22 44 69 73 70 6c 61 |}.!name |{"Displa|
|00000820| 79 43 6f 6e 74 72 6f 6c | 73 22 2c 22 43 6f 70 4c |yControl|s","CopL|
|00000830| 69 73 74 23 2c 42 50 4c | 43 4f 4e 32 2c 42 50 4c |ist#,BPL|CON2,BPL|
|00000840| 43 4f 4e 33 2c 42 50 4c | 43 4f 4e 34 22 7d 00 00 |CON3,BPL|CON4"}..|
|00000850| 21 61 73 74 61 74 65 6d | 65 6e 74 00 21 61 72 67 |!astatem|ent.!arg|
|00000860| 73 20 7b 23 77 6f 72 64 | 2c 23 77 6f 72 64 2c 23 |s {#word|,#word,#|
|00000870| 77 6f 72 64 2c 23 77 6f | 72 64 2c 23 77 6f 72 64 |word,#wo|rd,#word|
|00000880| 2c 23 77 6f 72 64 7d 00 | 21 6c 69 62 73 20 7b 23 |,#word}.|!libs {#|
|00000890| 64 69 73 70 6c 61 79 6c | 69 62 2c 24 31 33 38 30 |displayl|ib,$1380|
|000008a0| 7d 00 21 73 75 62 73 20 | 7b 5f 64 6f 61 64 6a 75 |}.!subs |{_doadju|
|000008b0| 73 74 2c 5f 63 68 65 63 | 6b 63 6f 70 6c 69 73 74 |st,_chec|kcoplist|
|000008c0| 2c 30 7d 00 21 6e 61 6d | 65 20 7b 22 44 69 73 70 |,0}.!nam|e {"Disp|
|000008d0| 6c 61 79 41 64 6a 75 73 | 74 22 2c 22 43 6f 70 4c |layAdjus|t","CopL|
|000008e0| 69 73 74 23 2c 66 65 74 | 63 68 77 69 64 2c 64 64 |ist#,fet|chwid,dd|
|000008f0| 66 73 74 72 74 2c 64 64 | 66 73 74 6f 70 2c 64 69 |fstrt,dd|fstop,di|
|00000900| 77 73 74 72 74 2c 64 69 | 77 73 74 6f 70 22 7d 00 |wstrt,di|wstop"}.|
|00000910| 00 21 61 73 74 61 74 65 | 6d 65 6e 74 00 21 61 72 |.!astate|ment.!ar|
|00000920| 67 73 20 7b 23 77 6f 72 | 64 2c 23 77 6f 72 64 2c |gs {#wor|d,#word,|
|00000930| 23 77 6f 72 64 2c 23 77 | 6f 72 64 2c 23 77 6f 72 |#word,#w|ord,#wor|
|00000940| 64 2c 23 77 6f 72 64 7d | 00 21 6c 69 62 73 20 7b |d,#word}|.!libs {|
|00000950| 23 64 69 73 70 6c 61 79 | 6c 69 62 2c 24 31 33 38 |#display|lib,$138|
|00000960| 30 2c 23 70 61 6c 65 74 | 74 65 6c 69 62 2c 24 31 |0,#palet|telib,$1|
|00000970| 30 38 33 7d 00 21 73 75 | 62 73 20 7b 5f 63 75 73 |083}.!su|bs {_cus|
|00000980| 74 6f 6d 63 6f 6c 73 2c | 5f 63 68 65 63 6b 63 6f |tomcols,|_checkco|
|00000990| 70 6c 69 73 74 2c 30 7d | 00 21 6e 61 6d 65 20 7b |plist,0}|.!name {|
|000009a0| 22 43 75 73 74 6f 6d 43 | 6f 6c 6f 72 73 22 2c 22 |"CustomC|olors","|
|000009b0| 43 6f 70 4c 69 73 74 23 | 2c 43 43 4f 66 66 73 65 |CopList#|,CCOffse|
|000009c0| 74 2c 59 50 6f 73 2c 50 | 61 6c 65 74 74 65 2c 73 |t,YPos,P|alette,s|
|000009d0| 74 61 72 74 63 6f 6c 2c | 6e 75 6d 63 6f 6c 73 20 |tartcol,|numcols |
|000009e0| 3b 32 2b 6e 20 6f 72 20 | 32 2b 6e 2b 6e 2b 6e 2f |;2+n or |2+n+n+n/|
|000009f0| 31 36 22 7d 00 00 21 61 | 73 74 61 74 65 6d 65 6e |16"}..!a|statemen|
|00000a00| 74 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |t       |        |
|00000a10| 3b 63 72 65 61 74 65 20 | 64 6f 75 62 6c 65 20 73 |;create |double s|
|00000a20| 63 61 6e 20 6d 6f 64 75 | 6c 6f 00 21 61 72 67 73 |can modu|lo.!args|
|00000a30| 20 7b 23 77 6f 72 64 2c | 23 77 6f 72 64 2c 23 77 | {#word,|#word,#w|
|00000a40| 6f 72 64 7d 00 21 6c 69 | 62 73 20 7b 23 64 69 73 |ord}.!li|bs {#dis|
|00000a50| 70 6c 61 79 6c 69 62 2c | 24 31 33 38 30 7d 00 21 |playlib,|$1380}.!|
|00000a60| 73 75 62 73 20 7b 5f 63 | 75 73 74 6f 6d 64 62 6c |subs {_c|ustomdbl|
|00000a70| 73 63 61 6e 2c 5f 63 68 | 65 63 6b 63 6f 70 6c 69 |scan,_ch|eckcopli|
|00000a80| 73 74 2c 30 7d 00 21 6e | 61 6d 65 20 7b 22 43 75 |st,0}.!n|ame {"Cu|
|00000a90| 73 74 6f 6d 44 62 6c 53 | 63 61 6e 22 2c 22 43 6f |stomDblS|can","Co|
|00000aa0| 70 4c 69 73 74 23 2c 43 | 43 4f 66 66 73 65 74 2c |pList#,C|COffset,|
|00000ab0| 6d 6f 64 65 20 3b 63 75 | 73 74 6f 6d 73 3d 34 78 |mode ;cu|stoms=4x|
|00000ac0| 63 6f 70 6c 69 73 74 5f | 68 65 69 67 68 74 22 7d |coplist_|height"}|
|00000ad0| 00 00 5f 6c 6f 61 64 3a | 21 6e 75 6c 6c 73 75 62 |.._load:|!nullsub|
|00000ae0| 7b 30 2c 30 2c 30 7d 00 | 5f 73 61 76 65 3a 21 6e |{0,0,0}.|_save:!n|
|00000af0| 75 6c 6c 73 75 62 7b 30 | 2c 30 2c 30 7d 00 5f 75 |ullsub{0|,0,0}._u|
|00000b00| 73 65 3a 21 6e 75 6c 6c | 73 75 62 7b 30 2c 30 2c |se:!null|sub{0,0,|
|00000b10| 30 7d 00 5f 66 72 65 65 | 3a 21 6e 75 6c 6c 73 75 |0}._free|:!nullsu|
|00000b20| 62 7b 5f 66 72 65 65 63 | 6f 70 6c 69 73 74 2c 30 |b{_freec|oplist,0|
|00000b30| 2c 30 7d 00 00 69 6e 69 | 74 3a 21 6e 75 6c 6c 73 |,0}..ini|t:!nulls|
|00000b40| 75 62 7b 5f 63 6f 64 65 | 69 6e 69 74 2c 30 2c 30 |ub{_code|init,0,0|
|00000b50| 7d 00 66 69 6e 69 74 3a | 21 6e 75 6c 6c 73 75 62 |}.finit:|!nullsub|
|00000b60| 7b 5f 63 6f 64 65 66 69 | 6e 69 74 2c 30 2c 30 7d |{_codefi|nit,0,0}|
|00000b70| 00 00 21 6c 69 62 66 69 | 6e 7b 5f 74 6f 6b 65 2c |..!libfi|n{_toke,|
|00000b80| 5f 6c 6f 61 64 2c 5f 73 | 61 76 65 2c 5f 75 73 65 |_load,_s|ave,_use|
|00000b90| 2c 5f 66 72 65 65 2c 31 | 30 2c 37 7d 20 3b 31 32 |,_free,1|0,7} ;12|
|00000ba0| 38 20 62 79 74 65 73 20 | 66 6f 72 20 61 20 6d 79 |8 bytes |for a my|
|00000bb0| 63 6f 70 20 65 6e 74 72 | 79 00 00 3b 2d 2d 2d 2d |cop entr|y..;----|
|00000bc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000bd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000be0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000bf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c00| 2d 2d 2d 2d 2d 00 00 80 | 0d 20 42 6c 69 74 57 61 |-----...|. BlitWa|
|00000c10| 69 74 3a 80 57 2e 62 23 | 36 2c 32 28 61 32 29 3a |it:.W.b#|6,2(a2):|
|00000c20| 62 77 60 40 3a 80 57 2e | 62 23 36 2c 32 28 61 32 |bw`@:.W.|b#6,2(a2|
|00000c30| 29 3a 80 50 20 62 77 60 | 40 3a 80 02 20 80 0d 00 |):.P bw`|@:.. ...|
|00000c40| 00 3b 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.;------|--------|
|00000c50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 00 74 61 62 6c |--------|---.tabl|
|00000c90| 65 3a 20 20 20 3b 36 34 | 20 62 79 74 65 73 20 65 |e:   ;64| bytes e|
|00000ca0| 61 63 68 00 20 20 80 25 | 20 38 2c 34 30 2c 24 33 |ach.  .%| 8,40,$3|
|00000cb0| 66 2c 35 2c 32 2c 30 38 | 2c 24 31 66 63 2c 30 2c |f,5,2,08|,$1fc,0,|
|00000cc0| 24 38 65 2c 24 30 30 38 | 31 2c 24 39 30 2c 24 37 |$8e,$008|1,$90,$7|
|00000cd0| 30 63 31 2c 24 39 32 2c | 24 33 38 2c 24 39 34 2c |0c1,$92,|$38,$94,|
|00000ce0| 24 64 30 2c 24 31 30 30 | 2c 24 32 30 31 3a 80 26 |$d0,$100|,$201:.&|
|00000cf0| 20 31 34 00 20 20 80 25 | 20 38 2c 34 30 2c 24 37 | 14.  .%| 8,40,$7|
|00000d00| 66 2c 35 2c 34 2c 31 36 | 2c 24 31 66 63 2c 31 2c |f,5,4,16|,$1fc,1,|
|00000d10| 24 38 65 2c 24 30 30 38 | 31 2c 24 39 30 2c 24 37 |$8e,$008|1,$90,$7|
|00000d20| 30 63 31 2c 24 39 32 2c | 24 33 38 2c 24 39 34 2c |0c1,$92,|$38,$94,|
|00000d30| 24 63 30 2c 24 31 30 30 | 2c 24 32 30 31 3a 80 26 |$c0,$100|,$201:.&|
|00000d40| 20 31 34 00 20 20 80 25 | 20 38 2c 34 30 2c 24 37 | 14.  .%| 8,40,$7|
|00000d50| 66 2c 35 2c 34 2c 31 36 | 2c 24 31 66 63 2c 32 2c |f,5,4,16|,$1fc,2,|
|00000d60| 24 38 65 2c 24 30 30 38 | 31 2c 24 39 30 2c 24 37 |$8e,$008|1,$90,$7|
|00000d70| 30 63 31 2c 24 39 32 2c | 24 33 38 2c 24 39 34 2c |0c1,$92,|$38,$94,|
|00000d80| 24 63 30 2c 24 31 30 30 | 2c 24 32 30 31 3a 80 26 |$c0,$100|,$201:.&|
|00000d90| 20 31 34 00 20 20 80 25 | 20 38 2c 34 30 2c 24 66 | 14.  .%| 8,40,$f|
|00000da0| 66 2c 35 2c 38 2c 33 32 | 2c 24 31 66 63 2c 33 2c |f,5,8,32|,$1fc,3,|
|00000db0| 24 38 65 2c 24 30 30 38 | 31 2c 24 39 30 2c 24 37 |$8e,$008|1,$90,$7|
|00000dc0| 30 63 31 2c 24 39 32 2c | 24 33 38 2c 24 39 34 2c |0c1,$92,|$38,$94,|
|00000dd0| 24 62 38 2c 24 31 30 30 | 2c 24 32 30 31 3a 80 26 |$b8,$100|,$201:.&|
|00000de0| 20 31 34 00 00 20 20 80 | 25 20 38 2c 38 30 2c 24 | 14..  .|% 8,80,$|
|00000df0| 31 66 2c 34 2c 30 34 2c | 30 34 2c 24 31 66 63 2c |1f,4,04,|04,$1fc,|
|00000e00| 30 2c 24 38 65 2c 24 30 | 30 38 31 2c 24 39 30 2c |0,$8e,$0|081,$90,|
|00000e10| 24 37 30 63 31 2c 24 39 | 32 2c 24 33 63 2c 24 39 |$70c1,$9|2,$3c,$9|
|00000e20| 34 2c 24 64 34 2c 24 31 | 30 30 2c 24 38 32 30 31 |4,$d4,$1|00,$8201|
|00000e30| 3a 80 26 20 31 34 00 20 | 20 80 25 20 38 2c 38 30 |:.& 14. | .% 8,80|
|00000e40| 2c 24 33 66 2c 34 2c 30 | 34 2c 30 38 2c 24 31 66 |,$3f,4,0|4,08,$1f|
|00000e50| 63 2c 31 2c 24 38 65 2c | 24 30 30 38 31 2c 24 39 |c,1,$8e,|$0081,$9|
|00000e60| 30 2c 24 37 30 63 31 2c | 24 39 32 2c 24 33 38 2c |0,$70c1,|$92,$38,|
|00000e70| 24 39 34 2c 24 64 30 2c | 24 31 30 30 2c 24 38 32 |$94,$d0,|$100,$82|
|00000e80| 30 31 3a 80 26 20 31 34 | 00 20 20 80 25 20 38 2c |01:.& 14|.  .% 8,|
|00000e90| 38 30 2c 24 33 66 2c 34 | 2c 30 34 2c 30 38 2c 24 |80,$3f,4|,04,08,$|
|00000ea0| 31 66 63 2c 32 2c 24 38 | 65 2c 24 30 30 38 31 2c |1fc,2,$8|e,$0081,|
|00000eb0| 24 39 30 2c 24 37 30 63 | 31 2c 24 39 32 2c 24 33 |$90,$70c|1,$92,$3|
|00000ec0| 38 2c 24 39 34 2c 24 64 | 30 2c 24 31 30 30 2c 24 |8,$94,$d|0,$100,$|
|00000ed0| 38 32 30 31 3a 80 26 20 | 31 34 00 20 20 80 25 20 |8201:.& |14.  .% |
|00000ee0| 38 2c 38 30 2c 24 37 66 | 2c 34 2c 30 38 2c 31 36 |8,80,$7f|,4,08,16|
|00000ef0| 2c 24 31 66 63 2c 33 2c | 24 38 65 2c 24 30 30 38 |,$1fc,3,|$8e,$008|
|00000f00| 31 2c 24 39 30 2c 24 37 | 30 63 31 2c 24 39 32 2c |1,$90,$7|0c1,$92,|
|00000f10| 24 33 38 2c 24 39 34 2c | 24 63 30 2c 24 31 30 30 |$38,$94,|$c0,$100|
|00000f20| 2c 24 38 32 30 31 3a 80 | 26 20 31 34 00 00 20 20 |,$8201:.|& 14..  |
|00000f30| 80 25 20 38 2c 31 36 30 | 2c 24 30 66 2c 33 2c 30 |.% 8,160|,$0f,3,0|
|00000f40| 30 2c 30 30 2c 24 31 66 | 63 2c 30 2c 24 38 65 2c |0,00,$1f|c,0,$8e,|
|00000f50| 24 30 30 38 31 2c 24 39 | 30 2c 24 37 30 63 31 2c |$0081,$9|0,$70c1,|
|00000f60| 24 39 32 2c 24 33 65 2c | 24 39 34 2c 24 64 36 2c |$92,$3e,|$94,$d6,|
|00000f70| 24 31 30 30 2c 24 32 34 | 31 3a 80 26 20 31 34 00 |$100,$24|1:.& 14.|
|00000f80| 20 20 80 25 20 38 2c 31 | 36 30 2c 24 31 66 2c 33 |  .% 8,1|60,$1f,3|
|00000f90| 2c 30 34 2c 30 34 2c 24 | 31 66 63 2c 31 2c 24 38 |,04,04,$|1fc,1,$8|
|00000fa0| 65 2c 24 30 30 38 31 2c | 24 39 30 2c 24 37 30 63 |e,$0081,|$90,$70c|
|00000fb0| 31 2c 24 39 32 2c 24 33 | 38 2c 24 39 34 2c 24 64 |1,$92,$3|8,$94,$d|
|00000fc0| 30 2c 24 31 30 30 2c 24 | 32 34 31 3a 80 26 20 31 |0,$100,$|241:.& 1|
|00000fd0| 34 00 20 20 80 25 20 38 | 2c 31 36 30 2c 24 31 66 |4.  .% 8|,160,$1f|
|00000fe0| 2c 33 2c 30 34 2c 30 34 | 2c 24 31 66 63 2c 32 2c |,3,04,04|,$1fc,2,|
|00000ff0| 24 38 65 2c 24 30 30 38 | 31 2c 24 39 30 2c 24 37 |$8e,$008|1,$90,$7|
|00001000| 30 63 31 2c 24 39 32 2c | 24 33 38 2c 24 39 34 2c |0c1,$92,|$38,$94,|
|00001010| 24 64 30 2c 24 31 30 30 | 2c 24 32 34 31 3a 80 26 |$d0,$100|,$241:.&|
|00001020| 20 31 34 00 20 20 80 25 | 20 38 2c 31 36 30 2c 24 | 14.  .%| 8,160,$|
|00001030| 33 66 2c 33 2c 30 38 2c | 30 38 2c 24 31 66 63 2c |3f,3,08,|08,$1fc,|
|00001040| 33 2c 24 38 65 2c 24 30 | 30 38 31 2c 24 39 30 2c |3,$8e,$0|081,$90,|
|00001050| 24 37 30 63 31 2c 24 39 | 32 2c 24 33 38 2c 24 39 |$70c1,$9|2,$38,$9|
|00001060| 34 2c 24 64 30 2c 24 31 | 30 30 2c 24 32 34 31 3a |4,$d0,$1|00,$241:|
|00001070| 80 26 20 31 34 00 00 5f | 63 6f 64 65 69 6e 69 74 |.& 14.._|codeinit|
|00001080| 3a 00 20 20 80 7e 2e 6c | 23 33 32 2c 64 30 3a 80 |:.  .~.l|#32,d0:.|
|00001090| 7e 2e 6c 23 36 35 35 33 | 38 2c 64 31 3a 80 38 20 |~.l#6553|8,d1:.8 |
|000010a0| 24 63 30 30 32 3a 80 7e | 2e 6c 20 64 30 2c 6d 79 |$c002:.~|.l d0,my|
|000010b0| 73 70 72 69 74 65 00 20 | 20 80 7e 20 64 30 2c 73 |sprite. | .~ d0,s|
|000010c0| 70 70 2b 36 3a 80 ac 20 | 64 30 3a 80 7e 20 64 30 |pp+6:.. |d0:.~ d0|
|000010d0| 2c 73 70 70 2b 32 00 20 | 20 80 7e 20 24 64 66 66 |,spp+2. | .~ $dff|
|000010e0| 30 37 63 2c 64 30 3a 80 | 42 20 23 32 35 35 2c 64 |07c,d0:.|B #255,d|
|000010f0| 30 3a 80 5c 20 23 32 34 | 38 2c 64 30 3a 80 48 20 |0:.\ #24|8,d0:.H |
|00001100| 69 73 61 67 61 3a 80 5b | 20 61 67 61 6d 61 63 3a |isaga:.[| agamac:|
|00001110| 80 94 00 20 20 69 73 61 | 67 61 3a 80 7e 23 2d 31 |...  isa|ga:.~#-1|
|00001120| 2c 61 67 61 6d 61 63 3a | 80 94 00 00 5f 63 6f 64 |,agamac:|...._cod|
|00001130| 65 66 69 6e 69 74 3a 00 | 20 20 80 94 00 00 6d 79 |efinit:.|  ....my|
|00001140| 73 70 72 69 74 65 3a 80 | 25 2e 6c 20 30 00 61 67 |sprite:.|%.l 0.ag|
|00001150| 61 6d 61 63 3a 80 25 20 | 30 00 00 23 73 74 64 63 |amac:.% |0..#stdc|
|00001160| 6f 70 73 3d 31 30 2b 38 | 2b 36 2b 33 2b 33 2b 31 |ops=10+8|+6+3+3+1|
|00001170| 2b 31 2b 32 2b 31 2b 33 | 2b 36 20 3b 73 70 72 69 |+1+2+1+3|+6 ;spri|
|00001180| 74 65 63 6c 75 64 67 65 | 2b 77 61 69 74 2b 63 74 |tecludge|+wait+ct|
|00001190| 72 6c 2b 63 6f 6e 73 2b | 73 68 6f 77 73 2b 77 61 |rl+cons+|shows+wa|
|000011a0| 69 74 65 6f 6c 2b 64 6d | 61 6f 6e 2b 77 61 69 74 |iteol+dm|aon+wait|
|000011b0| 2b 64 6d 61 6f 66 66 2b | 6a 75 6d 70 00 00 3b 72 |+dmaoff+|jump..;r|
|000011c0| 65 73 3d 20 68 61 6d 2f | 65 68 62 2f 64 70 66 2f |es= ham/|ehb/dpf/|
|000011d0| 73 6d 6f 6f 74 68 20 7c | 20 72 65 73 2f 66 65 74 |smooth || res/fet|
|000011e0| 63 68 20 7c 20 77 69 64 | 74 68 20 7c 20 62 69 74 |ch | wid|th | bit|
|000011f0| 70 6c 61 6e 65 73 00 00 | 3b 63 6f 70 6c 69 73 74 |planes..|;coplist|
|00001200| 20 3d 20 63 6f 70 63 74 | 72 6c 20 7c 20 62 70 73 | = copct|rl | bps|
|00001210| 20 7c 20 73 70 72 69 74 | 65 73 20 7c 20 63 6f 6c | | sprit|es | col|
|00001220| 73 20 7c 20 77 61 69 74 | 20 7c 20 64 6d 61 6f 6e |s | wait| | dmaon|
|00001230| 20 7c 20 63 75 73 74 6f | 6d 20 7c 20 77 61 69 74 | | custo|m | wait|
|00001240| 20 7c 20 64 6d 61 6f 66 | 66 00 00 80 01 20 2e 63 | | dmaof|f.... .c|
|00001250| 6f 70 63 74 72 6c 20 66 | 6d 6f 64 65 2e 6c 3a 64 |opctrl f|mode.l:d|
|00001260| 69 77 73 74 72 74 3a 64 | 69 77 73 74 6f 70 3a 64 |iwstrt:d|iwstop:d|
|00001270| 64 66 73 74 72 74 3a 64 | 64 66 73 74 6f 70 3a 62 |dfstrt:d|dfstop:b|
|00001280| 70 63 6f 6e 30 3a 80 02 | 20 80 01 00 00 80 01 20 |pcon0:..| ...... |
|00001290| 2e 74 61 62 6c 65 20 6d | 61 78 62 70 2e 77 3a 66 |.table m|axbp.w:f|
|000012a0| 65 74 63 68 77 69 64 3a | 78 6d 61 73 6b 3a 78 72 |etchwid:|xmask:xr|
|000012b0| 73 68 69 66 74 3a 61 64 | 6a 77 69 64 3a 61 64 6a |shift:ad|jwid:adj|
|000012c0| 73 74 6f 70 3a 63 74 72 | 6c 2e 63 6f 70 63 74 72 |stop:ctr|l.copctr|
|000012d0| 6c 3a 80 02 20 80 01 00 | 00 80 01 20 2e 6d 79 63 |l:.. ...|... .myc|
|000012e0| 6f 70 00 20 20 73 69 7a | 65 2e 6c 20 20 20 20 20 |op.  siz|e.l     |
|000012f0| 20 20 20 20 20 20 20 3b | 30 20 3d 20 6e 6f 74 20 |       ;|0 = not |
|00001300| 69 6e 69 74 69 61 6c 69 | 73 65 64 00 20 20 63 6f |initiali|sed.  co|
|00001310| 70 70 6f 73 2e 6c 20 20 | 20 20 20 20 20 20 20 20 |ppos.l  |        |
|00001320| 3b 6c 6f 63 61 74 69 6f | 6e 20 69 6e 20 63 68 69 |;locatio|n in chi|
|00001330| 70 6d 65 6d 00 20 20 63 | 6f 6c 6f 72 73 2e 6c 00 |pmem.  c|olors.l.|
|00001340| 20 20 73 70 72 69 74 65 | 73 2e 6c 00 20 20 62 70 |  sprite|s.l.  bp|
|00001350| 63 6f 6e 73 2e 6c 00 20 | 20 62 70 6c 61 6e 65 73 |cons.l. | bplanes|
|00001360| 2e 6c 00 20 20 64 6f 74 | 2e 6c 00 20 20 63 75 73 |.l.  dot|.l.  cus|
|00001370| 74 6f 6d 73 2e 6c 00 20 | 20 64 6f 62 2e 6c 00 20 |toms.l. | dob.l. |
|00001380| 20 6e 75 6d 62 70 2e 77 | 3a 63 6f 6c 70 6f 6b 65 | numbp.w|:colpoke|
|00001390| 73 2e 77 20 20 20 20 20 | 20 20 20 20 20 20 3b 6c |s.w     |      ;l|
|000013a0| 69 6d 69 74 73 00 20 20 | 66 65 74 63 68 77 69 64 |imits.  |fetchwid|
|000013b0| 2e 77 3a 78 61 6e 64 3a | 78 73 68 69 66 74 20 20 |.w:xand:|xshift  |
|000013c0| 20 20 20 20 20 3b 66 6f | 72 20 73 68 6f 77 20 63 |     ;fo|r show c|
|000013d0| 61 6c 63 75 6c 61 74 69 | 6f 6e 73 20 28 33 20 77 |alculati|ons (3 w|
|000013e0| 6f 72 64 73 29 00 20 20 | 79 70 6f 73 2e 77 3a 68 |ords).  |ypos.w:h|
|000013f0| 65 69 67 68 74 3a 72 65 | 73 00 20 20 6e 75 6d 73 |eight:re|s.  nums|
|00001400| 70 72 69 74 65 73 2e 77 | 3a 6e 75 6d 63 6f 6c 73 |prites.w|:numcols|
|00001410| 3a 6e 75 6d 63 75 73 74 | 6f 6d 73 00 20 20 61 67 |:numcust|oms.  ag|
|00001420| 61 2e 77 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |a.w     |        |
|00001430| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001440| 20 20 3b 32 34 62 69 74 | 3d 24 38 30 30 30 20 66 |  ;24bit|=$8000 f|
|00001450| 65 74 63 68 20 3d 20 24 | 30 30 2c 24 31 30 2c 24 |etch = $|00,$10,$|
|00001460| 32 30 2c 24 33 30 00 20 | 20 72 65 73 73 68 69 66 |20,$30. | resshif|
|00001470| 74 2e 77 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |t.w     |        |
|00001480| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 6c 6f |        |     ;lo|
|00001490| 2c 68 69 2c 73 68 69 20 | 3d 20 32 20 31 20 30 00 |,hi,shi |= 2 1 0.|
|000014a0| 20 20 73 65 74 75 70 2e | 77 20 20 20 20 20 20 20 |  setup.|w       |
|000014b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000014c0| 20 20 20 20 20 20 3b 6c | 69 6e 65 73 20 74 61 6b |      ;l|ines tak|
|000014d0| 65 6e 20 66 6f 72 20 73 | 65 74 75 70 00 20 20 63 |en for s|etup.  c|
|000014e0| 62 6c 6f 77 2e 77 20 20 | 20 20 20 20 20 20 20 20 |blow.w  |        |
|000014f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001500| 20 20 20 3b 69 66 20 63 | 75 73 74 6f 6d 20 67 6f |   ;if c|ustom go|
|00001510| 65 73 20 62 65 6c 6f 77 | 20 32 35 36 00 20 20 73 |es below| 256.  s|
|00001520| 66 65 74 63 68 2e 77 3a | 73 70 72 65 73 3a 73 70 |fetch.w:|spres:sp|
|00001530| 69 66 3a 73 70 77 69 64 | 3a 73 73 70 77 69 64 20 |if:spwid|:sspwid |
|00001540| 20 20 20 3b 73 70 72 69 | 74 65 20 6d 6f 64 65 20 |   ;spri|te mode |
|00001550| 66 6f 72 20 64 69 73 70 | 6c 61 79 00 80 02 20 80 |for disp|lay... .|
|00001560| 01 00 00 23 64 6d 61 6f | 66 66 3d 24 30 39 36 30 |...#dmao|ff=$0960|
|00001570| 31 32 30 20 20 3b 77 61 | 73 20 31 32 30 00 23 64 |120  ;wa|s 120.#d|
|00001580| 6d 61 6f 6e 3d 24 30 39 | 36 38 31 32 30 20 20 20 |maon=$09|68120   |
|00001590| 3b 77 61 73 20 38 31 32 | 30 00 00 23 73 70 72 6f |;was 812|0..#spro|
|000015a0| 66 66 3d 24 30 39 36 30 | 30 32 30 20 20 3b 77 61 |ff=$0960|020  ;wa|
|000015b0| 73 20 30 30 32 30 00 23 | 73 70 72 6f 6e 3d 24 30 |s 0020.#|spron=$0|
|000015c0| 39 36 38 30 32 30 20 20 | 20 3b 77 61 73 20 30 30 |968020  | ;was 00|
|000015d0| 32 30 00 00 23 77 61 69 | 74 62 68 3d 24 66 66 65 |20..#wai|tbh=$ffe|
|000015e0| 31 66 66 66 65 20 20 20 | 20 20 20 3b 77 61 73 20 |1fffe   |   ;was |
|000015f0| 65 31 00 23 6e 6f 77 63 | 6f 70 3d 24 30 31 66 65 |e1.#nowc|op=$01fe|
|00001600| 30 30 30 30 20 20 20 20 | 20 20 3b 24 30 30 30 31 |0000    |  ;$0001|
|00001610| 66 66 66 65 00 23 63 6f | 70 6e 6f 70 3d 24 30 31 |fffe.#co|pnop=$01|
|00001620| 66 65 30 30 30 30 00 23 | 77 61 69 74 65 6e 64 3d |fe0000.#|waitend=|
|00001630| 24 66 66 66 66 66 66 66 | 65 00 23 73 74 72 6f 62 |$fffffff|e.#strob|
|00001640| 65 31 3d 24 38 61 30 30 | 30 31 00 00 80 0d 20 74 |e1=$8a00|01.... t|
|00001650| 20 7b 80 2f 2e 74 61 62 | 6c 65 5c 60 31 7d 28 61 | {./.tab|le\`1}(a|
|00001660| 30 29 3a 80 02 20 80 0d | 00 80 0d 20 63 20 7b 80 |0):.. ..|... c {.|
|00001670| 2f 2e 63 6f 70 63 74 72 | 6c 5c 60 31 7d 28 61 31 |/.copctr|l\`1}(a1|
|00001680| 29 3a 80 02 20 80 0d 00 | 80 0d 20 6d 20 7b 80 2f |):.. ...|.. m {./|
|00001690| 2e 6d 79 63 6f 70 5c 60 | 31 7d 28 61 33 29 3a 80 |.mycop\`|1}(a3):.|
|000016a0| 02 20 80 0d 00 00 61 67 | 61 66 6c 61 67 3a 80 25 |. ....ag|aflag:.%|
|000016b0| 20 30 00 00 3b 73 66 65 | 74 63 68 3a 44 63 20 30 | 0..;sfe|tch:Dc 0|
|000016c0| 00 3b 73 70 72 65 73 3a | 44 63 20 30 00 3b 73 70 |.;spres:|Dc 0.;sp|
|000016d0| 69 66 3a 44 63 20 30 00 | 3b 73 70 77 69 64 3a 44 |if:Dc 0.|;spwid:D|
|000016e0| 63 20 30 00 00 73 6c 75 | 70 3a 80 25 20 30 2c 34 |c 0..slu|p:.% 0,4|
|000016f0| 2c 31 32 00 73 68 75 70 | 3a 80 25 20 32 2c 31 2c |,12.shup|:.% 2,1,|
|00001700| 30 00 73 77 75 70 3a 80 | 25 20 38 2c 31 36 2c 33 |0.swup:.|% 8,16,3|
|00001710| 32 00 00 5f 64 6f 61 64 | 6a 75 73 74 3a 00 20 20 |2.._doad|just:.  |
|00001720| 80 7e 2e 6c 20 21 6d 7b | 63 6f 70 70 6f 73 7d 2c |.~.l !m{|coppos},|
|00001730| 61 31 3a 80 40 23 38 2c | 61 31 20 20 20 3b 31 32 |a1:.@#8,|a1   ;12|
|00001740| 2c 61 31 20 3b 73 70 72 | 6f 66 66 2b 77 61 69 74 |,a1 ;spr|off+wait|
|00001750| 00 20 20 80 3d 20 64 31 | 2c 21 6d 7b 66 65 74 63 |.  .= d1|,!m{fetc|
|00001760| 68 77 69 64 7d 00 20 20 | 80 3d 20 64 32 2c 21 63 |hwid}.  |.= d2,!c|
|00001770| 7b 64 64 66 73 74 72 74 | 2b 32 7d 00 20 20 80 3d |{ddfstrt|+2}.  .=|
|00001780| 20 64 33 2c 21 63 7b 64 | 64 66 73 74 6f 70 2b 32 | d3,!c{d|dfstop+2|
|00001790| 7d 00 20 20 80 3d 20 64 | 34 2c 21 63 7b 64 69 77 |}.  .= d|4,!c{diw|
|000017a0| 73 74 72 74 2b 32 7d 00 | 20 20 80 3d 20 64 35 2c |strt+2}.|  .= d5,|
|000017b0| 21 63 7b 64 69 77 73 74 | 6f 70 2b 32 7d 00 20 20 |!c{diwst|op+2}.  |
|000017c0| 80 94 00 00 5f 64 6f 62 | 70 6c 63 6f 6e 73 3a 00 |...._dob|plcons:.|
|000017d0| 20 20 80 7e 2e 6c 20 21 | 6d 7b 62 70 63 6f 6e 73 |  .~.l !|m{bpcons|
|000017e0| 7d 2c 61 30 3a 80 82 2e | 6c 20 28 61 30 29 2c 64 |},a0:...|l (a0),d|
|000017f0| 34 2d 64 36 00 20 20 80 | 73 20 64 31 2c 64 34 3a |4-d6.  .|s d1,d4:|
|00001800| 80 73 20 64 32 2c 64 35 | 3a 80 73 20 64 33 2c 64 |.s d2,d5|:.s d3,d|
|00001810| 36 00 20 20 80 82 2e 6c | 20 64 34 2d 64 36 2c 28 |6.  ...l| d4-d6,(|
|00001820| 61 30 29 3a 80 94 00 00 | 5f 69 6e 69 74 63 6f 70 |a0):....|_initcop|
|00001830| 6c 69 73 74 3a 00 20 20 | 80 7e 20 28 61 30 29 2c |list:.  |.~ (a0),|
|00001840| 64 30 3a 80 7e 20 64 30 | 2c 21 6d 7b 73 70 69 66 |d0:.~ d0|,!m{spif|
|00001850| 7d 3a 80 3d 20 23 32 2c | 21 6d 7b 73 70 69 66 7d |}:.= #2,|!m{spif}|
|00001860| 3a 80 3d 20 64 30 2c 64 | 30 00 20 20 80 7e 20 73 |:.= d0,d|0.  .~ s|
|00001870| 6c 75 70 28 70 63 2c 64 | 30 29 2c 21 6d 7b 73 66 |lup(pc,d|0),!m{sf|
|00001880| 65 74 63 68 7d 3a 80 7e | 20 73 68 75 70 28 70 63 |etch}:.~| shup(pc|
|00001890| 2c 64 30 29 2c 21 6d 7b | 73 70 72 65 73 7d 00 20 |,d0),!m{|spres}. |
|000018a0| 20 80 7e 20 73 77 75 70 | 28 70 63 2c 64 30 29 2c | .~ swup|(pc,d0),|
|000018b0| 21 6d 7b 73 70 77 69 64 | 7d 00 00 20 20 80 7e 20 |!m{spwid|}..  .~ |
|000018c0| 2d 28 61 32 29 2c 64 36 | 3a 80 82 20 64 31 2d 64 |-(a2),d6|:.. d1-d|
|000018d0| 36 2c 21 6d 7b 79 70 6f | 73 7d 3a 80 59 20 5f 66 |6,!m{ypo|s}:.Y _f|
|000018e0| 72 65 65 63 6f 70 6c 69 | 73 74 00 20 20 80 b0 20 |reecopli|st.  .. |
|000018f0| 64 36 3a 80 51 20 6b 6f | 6c 3a 80 86 20 64 36 3a |d6:.Q ko|l:.. d6:|
|00001900| 6b 6f 6c 00 20 20 80 7e | 2e 6c 20 64 33 2c 64 30 |kol.  .~|.l d3,d0|
|00001910| 3a 80 7d 23 35 2c 64 30 | 3a 80 7d 2e 6c 23 31 2c |:.}#5,d0|:.}.l#1,|
|00001920| 64 30 3a 80 42 20 23 24 | 38 30 63 30 2c 64 30 3a |d0:.B #$|80c0,d0:|
|00001930| 80 7e 20 64 30 2c 21 6d | 7b 61 67 61 7d 00 20 20 |.~ d0,!m|{aga}.  |
|00001940| 80 51 20 63 61 6c 63 73 | 69 7a 65 3a 80 b0 20 64 |.Q calcs|ize:.. d|
|00001950| 35 3a 80 48 20 63 61 6c | 63 73 69 7a 65 00 20 20 |5:.H cal|csize.  |
|00001960| 80 7e 20 64 35 2c 64 37 | 3a 80 aa 23 31 2c 64 37 |.~ d5,d7|:..#1,d7|
|00001970| 3a 80 7d 23 35 2c 64 37 | 3a 80 40 23 31 2c 64 37 |:.}#5,d7|:.@#1,d7|
|00001980| 3a 80 3d 20 64 37 2c 64 | 37 3a 80 3d 20 64 35 2c |:.= d7,d|7:.= d5,|
|00001990| 64 35 3a 80 3d 20 64 37 | 2c 64 35 00 63 61 6c 63 |d5:.= d7|,d5.calc|
|000019a0| 73 69 7a 65 3a 00 20 20 | 80 7e 20 64 35 2c 21 6d |size:.  |.~ d5,!m|
|000019b0| 7b 63 6f 6c 70 6f 6b 65 | 73 7d 3a 80 42 23 31 35 |{colpoke|s}:.B#15|
|000019c0| 2c 64 33 3a 80 7e 20 64 | 33 2c 21 6d 7b 6e 75 6d |,d3:.~ d|3,!m{num|
|000019d0| 62 70 7d 3a 80 3d 20 64 | 33 2c 64 33 00 20 20 80 |bp}:.= d|3,d3.  .|
|000019e0| 81 23 30 2c 64 30 3a 80 | 7e 20 64 33 2c 64 30 3a |.#0,d0:.|~ d3,d0:|
|000019f0| 80 44 23 32 2c 64 34 3a | 80 3d 20 64 34 2c 64 30 |.D#2,d4:|.= d4,d0|
|00001a00| 3a 80 3d 20 64 35 2c 64 | 30 3a 80 3d 20 64 36 2c |:.= d5,d|0:.= d6,|
|00001a10| 64 30 00 20 20 80 3d 20 | 23 73 74 64 63 6f 70 73 |d0.  .= |#stdcops|
|00001a20| 2c 64 30 3a 80 44 2e 6c | 23 32 2c 64 30 3a 80 7e |,d0:.D.l|#2,d0:.~|
|00001a30| 2e 6c 20 64 30 2c 21 6d | 7b 73 69 7a 65 7d 3a 80 |.l d0,!m|{size}:.|
|00001a40| 81 23 32 2c 64 31 3a 80 | 38 24 63 30 30 32 00 20 |.#2,d1:.|8$c002. |
|00001a50| 20 80 7e 2e 6c 20 64 30 | 2c 21 6d 7b 63 6f 70 70 | .~.l d0|,!m{copp|
|00001a60| 6f 73 7d 3a 80 7e 2e 6c | 20 64 30 2c 61 31 3a 80 |os}:.~.l| d0,a1:.|
|00001a70| 7e 20 21 6d 7b 72 65 73 | 7d 2c 64 30 00 66 69 72 |~ !m{res|},d0.fir|
|00001a80| 73 74 77 61 69 74 3a 00 | 20 20 80 7e 2e 6c 20 23 |stwait:.|  .~.l #|
|00001a90| 63 6f 70 6e 6f 70 2c 64 | 37 3a 80 7e 2e 6c 20 64 |copnop,d|7:.~.l d|
|00001aa0| 37 2c 28 61 31 29 2b 3a | 80 7e 2e 6c 20 64 37 2c |7,(a1)+:|.~.l d7,|
|00001ab0| 28 61 31 29 2b 00 63 74 | 72 6c 31 3a 00 20 20 80 |(a1)+.ct|rl1:.  .|
|00001ac0| 7a 20 74 61 62 6c 65 28 | 70 63 29 2c 61 30 3a 80 |z table(|pc),a0:.|
|00001ad0| 7e 20 64 30 2c 64 31 3a | 80 42 20 23 24 33 30 30 |~ d0,d1:|.B #$300|
|00001ae0| 2c 64 31 3a 80 7e 2e 62 | 20 21 6d 7b 61 67 61 2b |,d1:.~.b| !m{aga+|
|00001af0| 31 7d 2c 64 31 00 20 20 | 80 3d 20 64 31 2c 61 30 |1},d1.  |.= d1,a0|
|00001b00| 3a 80 7d 23 38 2c 64 31 | 3a 80 81 23 32 2c 64 32 |:.}#8,d1|:..#2,d2|
|00001b10| 3a 80 a7 20 64 31 2c 64 | 32 3a 80 7e 20 64 32 2c |:.. d1,d|2:.~ d2,|
|00001b20| 21 6d 7b 72 65 73 73 68 | 69 66 74 7d 00 20 20 3b |!m{ressh|ift}.  ;|
|00001b30| 00 20 20 80 82 2e 6c 20 | 21 74 7b 63 74 72 6c 7d |.  ...l |!t{ctrl}|
|00001b40| 2c 64 32 2d 64 37 3a 80 | 8a 20 21 6d 7b 73 66 65 |,d2-d7:.|. !m{sfe|
|00001b50| 74 63 68 7d 2c 64 32 3a | 80 82 2e 6c 20 64 32 2d |tch},d2:|...l d2-|
|00001b60| 64 37 2c 28 61 31 29 20 | 20 20 3b 63 6f 70 79 20 |d7,(a1) |  ;copy |
|00001b70| 63 74 72 6c 00 20 20 3b | 00 20 20 80 82 20 21 74 |ctrl.  ;|.  .. !t|
|00001b80| 7b 66 65 74 63 68 77 69 | 64 7d 2c 64 31 2d 64 33 |{fetchwi|d},d1-d3|
|00001b90| 3a 80 82 20 64 31 2d 64 | 33 2c 21 6d 7b 66 65 74 |:.. d1-d|3,!m{fet|
|00001ba0| 63 68 77 69 64 7d 20 20 | 20 20 20 20 20 20 20 20 |chwid}  |        |
|00001bb0| 20 20 3b 63 6f 6e 73 74 | 61 6e 74 73 00 20 20 3b |  ;const|ants.  ;|
|00001bc0| 00 20 20 80 82 20 21 74 | 7b 61 64 6a 77 69 64 7d |.  .. !t|{adjwid}|
|00001bd0| 2c 64 31 2d 64 32 3a 80 | 57 20 23 34 2c 64 30 3a |,d1-d2:.|W #4,d0:|
|00001be0| 80 48 20 6e 6f 74 73 63 | 00 20 20 80 3d 20 64 31 |.H notsc|.  .= d1|
|00001bf0| 2c 21 6d 7b 66 65 74 63 | 68 77 69 64 7d 3a 80 a7 |,!m{fetc|hwid}:..|
|00001c00| 20 64 32 2c 21 63 7b 64 | 64 66 73 74 72 74 2b 32 | d2,!c{d|dfstrt+2|
|00001c10| 7d 3a 6e 6f 74 73 63 00 | 20 20 3b 00 20 20 80 7e |}:notsc.|  ;.  .~|
|00001c20| 21 6d 7b 6e 75 6d 62 70 | 7d 2c 64 31 3a 80 5c 21 |!m{numbp|},d1:.\!|
|00001c30| 74 7b 6d 61 78 62 70 7d | 2c 64 31 3a 80 4a 20 6d |t{maxbp}|,d1:.J m|
|00001c40| 61 78 62 70 65 72 72 3a | 80 3d 20 64 31 2c 64 31 |axbperr:|.= d1,d1|
|00001c50| 00 20 20 80 7a 20 62 70 | 62 28 70 63 29 2c 61 32 |.  .z bp|b(pc),a2|
|00001c60| 3a 80 7e 20 30 28 61 32 | 2c 64 31 29 2c 64 31 20 |:.~ 0(a2|,d1),d1 |
|00001c70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001c80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 62 |        |      ;b|
|00001c90| 70 63 6f 6e 30 00 20 20 | 80 57 20 23 37 2c 64 30 |pcon0.  |.W #7,d0|
|00001ca0| 3a 80 48 20 6e 6f 74 68 | 61 6d 3a 80 56 23 31 31 |:.H noth|am:.V#11|
|00001cb0| 2c 64 31 3a 6e 6f 74 68 | 61 6d 00 20 20 80 57 20 |,d1:noth|am.  .W |
|00001cc0| 23 35 2c 64 30 3a 80 48 | 20 6e 6f 74 64 70 66 3a |#5,d0:.H| notdpf:|
|00001cd0| 80 56 23 31 30 2c 64 31 | 3a 6e 6f 74 64 70 66 3a |.V#10,d1|:notdpf:|
|00001ce0| 80 8a 20 64 31 2c 21 63 | 7b 62 70 63 6f 6e 30 2b |.. d1,!c|{bpcon0+|
|00001cf0| 32 7d 00 20 20 80 7a 20 | 32 34 28 61 31 29 2c 61 |2}.  .z |24(a1),a|
|00001d00| 31 3a 80 7e 2e 6c 20 23 | 63 6f 70 6e 6f 70 2c 64 |1:.~.l #|copnop,d|
|00001d10| 37 00 00 63 6f 6c 73 3a | 00 20 20 80 7e 2e 6c 20 |7..cols:|.  .~.l |
|00001d20| 61 31 2c 21 6d 7b 63 6f | 6c 6f 72 73 7d 3a 80 7e |a1,!m{co|lors}:.~|
|00001d30| 20 21 6d 7b 63 6f 6c 70 | 6f 6b 65 73 7d 2c 64 31 | !m{colp|okes},d1|
|00001d40| 3a 80 48 20 73 70 72 69 | 74 65 73 3a 80 aa 23 31 |:.H spri|tes:..#1|
|00001d50| 2c 64 31 00 20 20 6e 78 | 63 6f 6c 3a 80 7e 2e 6c |,d1.  nx|col:.~.l|
|00001d60| 20 64 37 2c 28 61 31 29 | 2b 3a 80 6f 20 64 31 2c | d7,(a1)|+:.o d1,|
|00001d70| 6e 78 63 6f 6c 00 00 73 | 70 72 69 74 65 73 3a 00 |nxcol..s|prites:.|
|00001d80| 20 20 80 7e 2e 6c 20 61 | 31 2c 21 6d 7b 73 70 72 |  .~.l a|1,!m{spr|
|00001d90| 69 74 65 73 7d 3a 80 7e | 20 21 6d 7b 6e 75 6d 73 |ites}:.~| !m{nums|
|00001da0| 70 72 69 74 65 73 7d 2c | 64 31 3a 80 48 20 63 74 |prites},|d1:.H ct|
|00001db0| 72 6c 32 3a 80 aa 23 31 | 2c 64 31 3a 80 81 23 34 |rl2:..#1|,d1:..#4|
|00001dc0| 2c 64 32 00 20 20 80 ac | 20 64 32 3a 80 82 2e 6c |,d2.  ..| d2:...l|
|00001dd0| 20 73 70 70 28 70 63 29 | 2c 64 33 2d 64 36 3a 6e | spp(pc)|,d3-d6:n|
|00001de0| 78 73 70 72 69 3a 80 82 | 2e 6c 20 64 33 2d 64 36 |xspri:..|.l d3-d6|
|00001df0| 2c 28 61 31 29 3a 80 7a | 31 36 28 61 31 29 2c 61 |,(a1):.z|16(a1),a|
|00001e00| 31 00 20 20 80 3d 2e 6c | 20 64 32 2c 64 33 3a 80 |1.  .=.l| d2,d3:.|
|00001e10| 3d 2e 6c 20 64 32 2c 64 | 34 3a 80 3d 2e 6c 20 64 |=.l d2,d|4:.=.l d|
|00001e20| 32 2c 64 33 3a 80 3d 2e | 6c 20 64 32 2c 64 34 3a |2,d3:.=.|l d2,d4:|
|00001e30| 80 3d 2e 6c 20 64 32 2c | 64 35 3a 80 3d 2e 6c 20 |.=.l d2,|d5:.=.l |
|00001e40| 64 32 2c 64 36 00 20 20 | 80 6f 20 64 31 2c 6e 78 |d2,d6.  |.o d1,nx|
|00001e50| 73 70 72 69 20 20 20 20 | 20 3b 3a 4d 4f 56 45 2e |spri    | ;:MOVE.|
|00001e60| 6c 20 23 73 70 72 6f 6e | 2c 28 61 31 29 2b 00 00 |l #spron|,(a1)+..|
|00001e70| 63 74 72 6c 32 00 20 20 | 80 7e 2e 6c 61 31 2c 21 |ctrl2.  |.~.la1,!|
|00001e80| 6d 7b 62 70 63 6f 6e 73 | 7d 00 20 20 80 82 2e 6c |m{bpcons|}.  ...l|
|00001e90| 62 63 70 28 70 63 29 2c | 64 31 2d 64 36 3a 80 57 |bcp(pc),|d1-d6:.W|
|00001ea0| 23 36 2c 64 30 3a 80 50 | 20 6e 6f 74 65 68 62 3a |#6,d0:.P| notehb:|
|00001eb0| 80 55 20 23 39 2c 64 31 | 3a 6e 6f 74 65 68 62 00 |.U #9,d1|:notehb.|
|00001ec0| 20 20 80 42 23 24 63 30 | 30 2c 64 30 3a 80 7d 23 |  .B#$c0|0,d0:.}#|
|00001ed0| 34 2c 64 30 3a 80 8a 20 | 64 30 2c 64 32 3a 80 82 |4,d0:.. |d0,d2:..|
|00001ee0| 2e 6c 64 31 2d 64 36 2c | 28 61 31 29 3a 80 3d 23 |.ld1-d6,|(a1):.=#|
|00001ef0| 32 34 2c 61 31 00 20 20 | 80 7e 20 21 6d 7b 73 70 |24,a1.  |.~ !m{sp|
|00001f00| 77 69 64 7d 2c 64 31 3a | 80 7d 20 23 36 2c 64 30 |wid},d1:|.} #6,d0|
|00001f10| 3a 80 aa 23 31 2c 64 30 | 3a 80 4c 20 6b 6f 3a 80 |:..#1,d0|:.L ko:.|
|00001f20| 7d 20 64 30 2c 64 31 3a | 6b 6f 3a 80 7e 20 64 31 |} d0,d1:|ko:.~ d1|
|00001f30| 2c 21 6d 7b 73 73 70 77 | 69 64 7d 00 62 70 73 3a |,!m{sspw|id}.bps:|
|00001f40| 00 20 20 80 7e 2e 6c 20 | 61 31 2c 21 6d 7b 62 70 |.  .~.l |a1,!m{bp|
|00001f50| 6c 61 6e 65 73 7d 3a 80 | 7e 2e 6c 20 23 24 65 30 |lanes}:.|~.l #$e0|
|00001f60| 30 30 30 30 2c 64 30 3a | 80 7e 20 21 6d 7b 6e 75 |0000,d0:|.~ !m{nu|
|00001f70| 6d 62 70 7d 2c 64 31 3a | 80 48 20 64 6f 74 00 20 |mbp},d1:|.H dot. |
|00001f80| 20 80 3d 20 64 31 2c 64 | 31 3a 80 aa 23 31 2c 64 | .= d1,d|1:..#1,d|
|00001f90| 31 3a 80 81 23 32 2c 64 | 32 3a 80 ac 20 64 32 00 |1:..#2,d|2:.. d2.|
|00001fa0| 20 20 6e 78 62 70 3a 80 | 7e 2e 6c 20 64 30 2c 28 |  nxbp:.|~.l d0,(|
|00001fb0| 61 31 29 2b 3a 80 3d 2e | 6c 20 64 32 2c 64 30 3a |a1)+:.=.|l d2,d0:|
|00001fc0| 80 6f 20 64 31 2c 6e 78 | 62 70 00 64 6f 74 3a 00 |.o d1,nx|bp.dot:.|
|00001fd0| 20 20 80 7e 2e 6c 20 61 | 31 2c 64 30 3a 80 a7 2e |  .~.l a|1,d0:...|
|00001fe0| 6c 20 21 6d 7b 63 6f 70 | 70 6f 73 7d 2c 64 30 3a |l !m{cop|pos},d0:|
|00001ff0| 80 72 20 23 35 35 2a 34 | 2b 32 2c 64 30 3a 80 40 |.r #55*4|+2,d0:.@|
|00002000| 23 33 2c 64 30 3a 80 7e | 20 64 30 2c 21 6d 7b 73 |#3,d0:.~| d0,!m{s|
|00002010| 65 74 75 70 7d 20 3b 77 | 61 73 20 32 00 20 20 80 |etup} ;w|as 2.  .|
|00002020| 7e 2e 6c 20 61 31 2c 21 | 6d 7b 64 6f 74 7d 3a 80 |~.l a1,!|m{dot}:.|
|00002030| 7e 2e 6c 20 64 37 2c 28 | 61 31 29 2b 3a 80 7e 2e |~.l d7,(|a1)+:.~.|
|00002040| 6c 20 64 37 2c 28 61 31 | 29 2b 3a 80 7e 2e 6c 20 |l d7,(a1|)+:.~.l |
|00002050| 23 64 6d 61 6f 6e 2c 28 | 61 31 29 2b 00 63 75 73 |#dmaon,(|a1)+.cus|
|00002060| 74 6f 6d 73 3a 00 20 20 | 80 7e 2e 6c 20 61 31 2c |toms:.  |.~.l a1,|
|00002070| 21 6d 7b 63 75 73 74 6f | 6d 73 7d 3a 80 7e 21 6d |!m{custo|ms}:.~!m|
|00002080| 7b 6e 75 6d 63 75 73 74 | 6f 6d 73 7d 2c 64 31 3a |{numcust|oms},d1:|
|00002090| 80 48 20 64 6f 62 00 20 | 20 80 51 20 67 6f 62 3a |.H dob. | .Q gob:|
|000020a0| 80 86 20 64 31 3a 67 6f | 62 3a 80 aa 23 31 2c 64 |.. d1:go|b:..#1,d|
|000020b0| 31 00 20 20 6e 78 63 75 | 73 3a 80 7e 2e 6c 20 64 |1.  nxcu|s:.~.l d|
|000020c0| 37 2c 28 61 31 29 2b 3a | 80 6f 20 64 31 2c 6e 78 |7,(a1)+:|.o d1,nx|
|000020d0| 63 75 73 00 64 6f 62 3a | 00 20 20 80 7e 2e 6c 20 |cus.dob:|.  .~.l |
|000020e0| 61 31 2c 21 6d 7b 64 6f | 62 7d 3a 80 7e 2e 6c 20 |a1,!m{do|b}:.~.l |
|000020f0| 64 37 2c 28 61 31 29 2b | 3a 80 7e 2e 6c 20 64 37 |d7,(a1)+|:.~.l d7|
|00002100| 2c 28 61 31 29 2b 3a 80 | 7e 2e 6c 20 23 64 6d 61 |,(a1)+:.|~.l #dma|
|00002110| 6f 66 66 2c 28 61 31 29 | 2b 00 20 20 80 94 00 00 |off,(a1)|+.  ....|
|00002120| 62 70 62 3a 80 25 20 30 | 2c 24 31 30 30 30 2c 24 |bpb:.% 0|,$1000,$|
|00002130| 32 30 30 30 2c 24 33 30 | 30 30 2c 24 34 30 30 30 |2000,$30|00,$4000|
|00002140| 2c 24 35 30 30 30 2c 24 | 36 30 30 30 2c 24 37 30 |,$5000,$|6000,$70|
|00002150| 30 30 2c 24 31 30 2c 24 | 31 30 2c 24 31 30 2c 24 |00,$10,$|10,$10,$|
|00002160| 31 30 2c 24 31 30 2c 24 | 31 30 2c 24 31 30 2c 24 |10,$10,$|10,$10,$|
|00002170| 31 30 00 62 63 70 3a 80 | 25 20 24 31 30 34 2c 24 |10.bcp:.|% $104,$|
|00002180| 32 32 34 2c 24 31 30 36 | 2c 24 63 30 30 2c 24 31 |224,$106|,$c00,$1|
|00002190| 30 63 2c 24 31 31 2c 24 | 31 30 32 2c 30 2c 24 31 |0c,$11,$|102,0,$1|
|000021a0| 30 38 2c 30 2c 24 31 30 | 61 2c 30 20 3b 33 66 00 |08,0,$10|a,0 ;3f.|
|000021b0| 73 70 70 3a 80 25 20 24 | 31 34 30 2c 30 2c 24 31 |spp:.% $|140,0,$1|
|000021c0| 34 32 2c 30 2c 24 31 32 | 30 2c 30 2c 24 31 32 32 |42,0,$12|0,0,$122|
|000021d0| 2c 30 20 20 3b 33 30 30 | 36 20 34 30 30 36 00 00 |,0  ;300|6 4006..|
|000021e0| 5f 66 72 65 65 63 6f 70 | 6c 69 73 74 3a 00 20 20 |_freecop|list:.  |
|000021f0| 80 7e 2e 6c 20 28 61 33 | 29 2c 64 30 3a 80 48 20 |.~.l (a3|),d0:.H |
|00002200| 64 75 6e 3a 80 7e 2e 6c | 20 34 28 61 33 29 2c 61 |dun:.~.l| 4(a3),a|
|00002210| 31 3a 80 38 20 24 63 30 | 30 33 3a 80 5b 2e 6c 20 |1:.8 $c0|03:.[.l |
|00002220| 28 61 33 29 3a 64 75 6e | 3a 80 94 00 00 3b 2d 2d |(a3):dun|:....;--|
|00002230| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002240| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002250| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002260| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002270| 2d 2d 2d 2d 2d 2d 2d 00 | 00 5f 63 72 65 61 74 65 |-------.|._create|
|00002280| 64 69 73 70 6c 61 79 3a | 00 20 20 80 aa 23 31 2c |display:|.  ..#1,|
|00002290| 64 37 3a 80 51 20 63 6f | 6f 6c 3a 80 94 3a 63 6f |d7:.Q co|ol:..:co|
|000022a0| 6f 6c 3a 80 7e 20 2d 28 | 61 32 29 2c 64 30 00 20 |ol:.~ -(|a2),d0. |
|000022b0| 20 80 44 23 37 2c 64 30 | 3a 80 7a 20 30 28 61 30 | .D#7,d0|:.z 0(a0|
|000022c0| 2c 64 30 29 2c 61 33 3a | 80 b0 2e 6c 20 28 61 33 |,d0),a3:|...l (a3|
|000022d0| 29 3a 80 48 20 75 6e 69 | 6e 69 74 65 72 72 3a 80 |):.H uni|niterr:.|
|000022e0| 7e 2e 6c 20 21 6d 7b 63 | 6f 70 70 6f 73 7d 2c 74 |~.l !m{c|oppos},t|
|000022f0| 6f 70 63 6f 70 00 20 20 | 80 7e 20 23 30 2c 6c 61 |opcop.  |.~ #0,la|
|00002300| 73 74 77 61 69 74 00 6e | 78 6c 69 6e 6b 3a 00 20 |stwait.n|xlink:. |
|00002310| 20 80 82 20 21 6d 7b 79 | 70 6f 73 7d 2c 64 31 2d | .. !m{y|pos},d1-|
|00002320| 64 32 3a 80 a7 20 21 6d | 7b 73 65 74 75 70 7d 2c |d2:.. !m|{setup},|
|00002330| 64 31 20 20 3a 3b 54 53 | 54 2e 62 20 64 31 3a 42 |d1  :;TS|T.b d1:B|
|00002340| 50 4c 20 63 6f 6f 6c 32 | 3a 53 55 42 51 23 31 2c |PL cool2|:SUBQ#1,|
|00002350| 64 32 3a 63 6f 6f 6c 32 | 00 20 20 80 7e 2e 6c 20 |d2:cool2|.  .~.l |
|00002360| 21 6d 7b 63 6f 70 70 6f | 73 7d 2c 61 31 3b 3a 4d |!m{coppo|s},a1;:M|
|00002370| 4f 56 45 23 30 2c 32 28 | 61 31 29 00 3b 20 20 41 |OVE#0,2(|a1).;  A|
|00002380| 44 44 23 33 32 2c 61 31 | 3a 00 20 20 80 7e 2e 6c |DD#32,a1|:.  .~.l|
|00002390| 20 23 6e 6f 77 63 6f 70 | 2c 64 30 3a 80 57 20 23 | #nowcop|,d0:.W #|
|000023a0| 38 2c 64 31 3a 80 48 20 | 6e 6f 6c 6f 20 3b 42 45 |8,d1:.H |nolo ;BE|
|000023b0| 51 20 6e 6f 6c 6f 00 20 | 20 80 57 20 23 30 2c 6c |Q nolo. | .W #0,l|
|000023c0| 61 73 74 77 61 69 74 3a | 80 50 20 6e 6f 6c 6f 3a |astwait:|.P nolo:|
|000023d0| 80 7e 2e 6c 23 77 61 69 | 74 62 68 2c 64 30 00 20 |.~.l#wai|tbh,d0. |
|000023e0| 20 6e 6f 6c 6f 3a 80 7e | 2e 6c 20 64 30 2c 28 61 | nolo:.~|.l d0,(a|
|000023f0| 31 29 2b 3a 80 7e 2e 62 | 64 31 2c 28 61 31 29 2b |1)+:.~.b|d1,(a1)+|
|00002400| 3a 80 7e 2e 62 23 24 65 | 31 2c 28 61 31 29 2b 3a |:.~.b#$e|1,(a1)+:|
|00002410| 80 7e 20 23 24 66 66 66 | 65 2c 28 61 31 29 2b 20 |.~ #$fff|e,(a1)+ |
|00002420| 3b 62 69 67 77 61 69 74 | 20 2b 38 00 20 20 80 7e |;bigwait| +8.  .~|
|00002430| 20 64 31 2c 6c 61 73 74 | 77 61 69 74 3a 80 3d 20 | d1,last|wait:.= |
|00002440| 21 6d 7b 73 65 74 75 70 | 7d 2c 64 31 3a 80 7e 2e |!m{setup|},d1:.~.|
|00002450| 6c 20 21 6d 7b 64 6f 74 | 7d 2c 61 31 20 3b 77 61 |l !m{dot|},a1 ;wa|
|00002460| 73 20 73 75 62 31 20 64 | 31 00 20 20 80 7e 2e 6c |s sub1 d|1.  .~.l|
|00002470| 20 23 6e 6f 77 63 6f 70 | 2c 64 30 3a 80 57 20 23 | #nowcop|,d0:.W #|
|00002480| 38 2c 64 31 3a 80 48 20 | 6e 6f 6c 6f 31 3a 80 57 |8,d1:.H |nolo1:.W|
|00002490| 20 23 30 2c 6c 61 73 74 | 77 61 69 74 3a 80 50 20 | #0,last|wait:.P |
|000024a0| 6e 6f 6c 6f 31 3a 80 7e | 2e 6c 23 77 61 69 74 62 |nolo1:.~|.l#waitb|
|000024b0| 68 2c 64 30 00 20 20 6e | 6f 6c 6f 31 3a 80 7e 2e |h,d0.  n|olo1:.~.|
|000024c0| 6c 20 64 30 2c 28 61 31 | 29 2b 3a 80 7e 2e 62 64 |l d0,(a1|)+:.~.bd|
|000024d0| 31 2c 28 61 31 29 2b 3a | 80 7e 2e 62 23 24 30 31 |1,(a1)+:|.~.b#$01|
|000024e0| 2c 28 61 31 29 2b 3a 80 | 7e 20 23 24 66 66 66 65 |,(a1)+:.|~ #$fffe|
|000024f0| 2c 28 61 31 29 2b 20 3b | 62 69 67 77 61 69 74 20 |,(a1)+ ;|bigwait |
|00002500| 2b 38 00 20 20 80 3d 20 | 64 32 2c 64 31 3a 80 7e |+8.  .= |d2,d1:.~|
|00002510| 2e 6c 20 21 6d 7b 64 6f | 62 7d 2c 61 31 00 20 20 |.l !m{do|b},a1.  |
|00002520| 80 7e 2e 6c 20 23 6e 6f | 77 63 6f 70 2c 64 30 3a |.~.l #no|wcop,d0:|
|00002530| 80 57 20 23 38 2c 64 31 | 3a 80 48 20 6e 6f 6c 6f |.W #8,d1|:.H nolo|
|00002540| 32 3a 80 57 20 23 30 2c | 6c 61 73 74 77 61 69 74 |2:.W #0,|lastwait|
|00002550| 3a 80 50 20 6e 6f 6c 6f | 32 00 20 20 80 b0 20 21 |:.P nolo|2.  .. !|
|00002560| 6d 7b 6e 75 6d 63 75 73 | 74 6f 6d 73 7d 3a 80 4f |m{numcus|toms}:.O|
|00002570| 20 6e 6f 6c 6f 32 3a 80 | 7e 2e 6c 23 77 61 69 74 | nolo2:.|~.l#wait|
|00002580| 62 68 2c 64 30 00 20 20 | 6e 6f 6c 6f 32 3a 80 7e |bh,d0.  |nolo2:.~|
|00002590| 2e 6c 20 64 30 2c 28 61 | 31 29 2b 3a 80 7e 2e 62 |.l d0,(a|1)+:.~.b|
|000025a0| 64 31 2c 28 61 31 29 2b | 3a 80 7e 2e 62 23 24 31 |d1,(a1)+|:.~.b#$1|
|000025b0| 2c 28 61 31 29 2b 3a 80 | 7e 20 23 24 66 66 66 65 |,(a1)+:.|~ #$fffe|
|000025c0| 2c 28 61 31 29 2b 20 3b | 62 69 67 77 61 69 74 20 |,(a1)+ ;|bigwait |
|000025d0| 2b 38 00 20 20 80 7e 20 | 64 31 2c 6c 61 73 74 77 |+8.  .~ |d1,lastw|
|000025e0| 61 69 74 00 64 6f 6c 69 | 6e 6b 3a 00 20 20 80 40 |ait.doli|nk:.  .@|
|000025f0| 23 34 2c 61 31 3a 80 6f | 20 64 37 2c 61 6e 6f 74 |#4,a1:.o| d7,anot|
|00002600| 68 65 72 3a 80 7e 2e 6c | 20 23 77 61 69 74 65 6e |her:.~.l| #waiten|
|00002610| 64 2c 28 61 31 29 00 20 | 20 80 7e 2e 6c 20 74 6f |d,(a1). | .~.l to|
|00002620| 70 63 6f 70 28 70 63 29 | 2c 61 30 3a 3b 4d 4f 56 |pcop(pc)|,a0:;MOV|
|00002630| 45 20 23 24 30 30 32 30 | 2c 32 28 61 30 29 00 20 |E #$0020|,2(a0). |
|00002640| 20 80 7a 20 24 64 66 66 | 30 30 30 2c 61 32 3a 21 | .z $dff|000,a2:!|
|00002650| 42 6c 69 74 57 61 69 74 | 3a 80 7e 2e 6c 20 61 30 |BlitWait|:.~.l a0|
|00002660| 2c 24 38 30 28 61 32 29 | 3a 80 94 00 61 6e 6f 74 |,$80(a2)|:...anot|
|00002670| 68 65 72 3a 00 20 20 80 | 7e 20 2d 28 61 32 29 2c |her:.  .|~ -(a2),|
|00002680| 64 30 3a 80 44 23 37 2c | 64 30 3a 80 7a 20 30 28 |d0:.D#7,|d0:.z 0(|
|00002690| 61 30 2c 64 30 29 2c 61 | 33 3a 80 b0 2e 6c 20 28 |a0,d0),a|3:...l (|
|000026a0| 61 33 29 3a 80 48 20 75 | 6e 69 6e 69 74 65 72 72 |a3):.H u|niniterr|
|000026b0| 00 20 20 80 7e 2e 6c 20 | 21 6d 7b 63 6f 70 70 6f |.  .~.l |!m{coppo|
|000026c0| 73 7d 2c 64 30 00 20 20 | 80 7e 20 23 24 38 36 2c |s},d0.  |.~ #$86,|
|000026d0| 28 61 31 29 2b 3a 80 7e | 20 64 30 2c 28 61 31 29 |(a1)+:.~| d0,(a1)|
|000026e0| 2b 3a 80 7e 23 24 38 34 | 2c 28 61 31 29 2b 3a 80 |+:.~#$84|,(a1)+:.|
|000026f0| ac 20 64 30 3a 80 7e 20 | 64 30 2c 28 61 31 29 2b |. d0:.~ |d0,(a1)+|
|00002700| 00 20 20 80 7e 2e 6c 20 | 23 73 74 72 6f 62 65 31 |.  .~.l |#strobe1|
|00002710| 2c 28 61 31 29 3a 80 58 | 20 6e 78 6c 69 6e 6b 00 |,(a1):.X| nxlink.|
|00002720| 00 6c 61 73 74 77 61 69 | 74 3a 80 25 20 30 00 74 |.lastwai|t:.% 0.t|
|00002730| 6f 70 63 6f 70 3a 80 25 | 2e 6c 20 30 00 00 5f 64 |opcop:.%|.l 0.._d|
|00002740| 69 73 70 6c 61 79 62 6d | 61 70 32 3a 20 20 3b 78 |isplaybm|ap2:  ;x|
|00002750| 2c 79 3d 64 32 2c 64 33 | 00 20 20 80 7e 20 21 6d |,y=d2,d3|.  .~ !m|
|00002760| 7b 72 65 73 73 68 69 66 | 74 7d 2c 64 37 3a 80 44 |{resshif|t},d7:.D|
|00002770| 2e 6c 64 37 2c 64 32 3a | 80 ac 20 64 32 00 20 20 |.ld7,d2:|.. d2.  |
|00002780| 80 7e 2e 6c 20 21 6d 7b | 62 70 6c 61 6e 65 73 7d |.~.l !m{|bplanes}|
|00002790| 2c 61 32 3a 80 7e 20 21 | 6d 7b 6e 75 6d 62 70 7d |,a2:.~ !|m{numbp}|
|000027a0| 2c 64 30 3a 80 48 20 6e | 6f 62 6f 32 3a 80 aa 23 |,d0:.H n|obo2:..#|
|000027b0| 31 2c 64 30 00 20 20 80 | 82 20 21 6d 7b 66 65 74 |1,d0.  .|. !m{fet|
|000027c0| 63 68 77 69 64 7d 2c 64 | 35 2d 64 37 3a 80 7e 20 |chwid},d|5-d7:.~ |
|000027d0| 28 61 30 29 2c 64 31 3a | 80 a7 20 64 35 2c 64 31 |(a0),d1:|.. d5,d1|
|000027e0| 3a 80 7e 20 64 31 2c 2d | 36 28 61 32 29 3a 80 7e |:.~ d1,-|6(a2):.~|
|000027f0| 20 64 31 2c 2d 32 28 61 | 32 29 00 20 20 3b 00 20 | d1,-2(a|2).  ;. |
|00002800| 20 80 7e 20 64 32 2c 64 | 34 3a 80 89 20 64 34 3a | .~ d2,d|4:.. d4:|
|00002810| 80 42 20 64 36 2c 64 34 | 20 20 20 20 20 20 20 20 |.B d6,d4|        |
|00002820| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 3a |        |      ;:|
|00002830| 42 53 45 54 23 37 2c 64 | 34 00 20 20 80 3d 20 64 |BSET#7,d|4.  .= d|
|00002840| 34 2c 64 34 3a 80 7a 20 | 62 70 31 28 70 63 29 2c |4,d4:.z |bp1(pc),|
|00002850| 61 33 3a 80 7e 20 30 28 | 61 33 2c 64 34 29 2c 2d |a3:.~ 0(|a3,d4),-|
|00002860| 31 30 28 61 32 29 00 20 | 20 80 89 20 64 36 3a 80 |10(a2). | .. d6:.|
|00002870| 42 20 64 36 2c 64 32 3a | 80 76 2e 6c 20 64 32 3a |B d6,d2:|.v.l d2:|
|00002880| 80 45 20 64 37 2c 64 32 | 3a 80 84 20 28 61 30 29 |.E d7,d2|:.. (a0)|
|00002890| 2c 64 33 3a 80 3d 2e 6c | 20 64 33 2c 64 32 20 3b |,d3:.=.l| d3,d2 ;|
|000028a0| 6f 66 66 73 65 74 00 20 | 20 3b 00 20 20 80 7a 20 |offset. | ;.  .z |
|000028b0| 38 28 61 30 29 2c 61 30 | 3a 80 40 23 32 2c 61 32 |8(a0),a0|:.@#2,a2|
|000028c0| 00 20 20 77 6f 62 70 32 | 3a 80 7e 2e 6c 20 28 61 |.  wobp2|:.~.l (a|
|000028d0| 30 29 2b 2c 64 31 3a 80 | 3d 2e 6c 20 64 32 2c 64 |0)+,d1:.|=.l d2,d|
|000028e0| 31 3a 80 7e 20 64 31 2c | 34 28 61 32 29 3a 80 ac |1:.~ d1,|4(a2):..|
|000028f0| 20 64 31 3a 80 7e 20 64 | 31 2c 28 61 32 29 00 20 | d1:.~ d|1,(a2). |
|00002900| 20 80 40 23 38 2c 61 32 | 3a 80 6f 20 64 30 2c 77 | .@#8,a2|:.o d0,w|
|00002910| 6f 62 70 32 3a 6e 6f 62 | 6f 32 3a 80 94 00 00 5f |obp2:nob|o2:...._|
|00002920| 64 69 73 70 6c 61 79 62 | 6d 61 70 3a 00 20 20 80 |displayb|map:.  .|
|00002930| 7e 2e 6c 20 21 6d 7b 62 | 70 6c 61 6e 65 73 7d 2c |~.l !m{b|planes},|
|00002940| 61 32 3a 80 7e 20 21 6d | 7b 6e 75 6d 62 70 7d 2c |a2:.~ !m|{numbp},|
|00002950| 64 30 3a 80 48 20 6e 6f | 62 6f 3a 80 aa 23 31 2c |d0:.H no|bo:..#1,|
|00002960| 64 30 00 20 20 80 7e 20 | 28 61 30 29 2c 64 31 3a |d0.  .~ |(a0),d1:|
|00002970| 80 a7 20 21 6d 7b 66 65 | 74 63 68 77 69 64 7d 2c |.. !m{fe|tchwid},|
|00002980| 64 31 3a 80 7e 20 64 31 | 2c 2d 36 28 61 32 29 3a |d1:.~ d1|,-6(a2):|
|00002990| 80 7e 20 64 31 2c 2d 32 | 28 61 32 29 00 20 20 80 |.~ d1,-2|(a2).  .|
|000029a0| 7a 20 38 28 61 30 29 2c | 61 30 3a 80 40 23 32 2c |z 8(a0),|a0:.@#2,|
|000029b0| 61 32 00 20 20 77 6f 62 | 70 3a 80 7e 20 28 61 30 |a2.  wob|p:.~ (a0|
|000029c0| 29 2b 2c 28 61 32 29 3a | 80 40 23 34 2c 61 32 3a |)+,(a2):|.@#4,a2:|
|000029d0| 80 7e 20 28 61 30 29 2b | 2c 28 61 32 29 3a 80 40 |.~ (a0)+|,(a2):.@|
|000029e0| 23 34 2c 61 32 3a 80 6f | 20 64 30 2c 77 6f 62 70 |#4,a2:.o| d0,wobp|
|000029f0| 00 20 20 6e 6f 62 6f 3a | 80 94 00 00 5f 64 69 73 |.  nobo:|...._dis|
|00002a00| 70 6c 61 79 64 62 6d 61 | 70 32 3a 20 20 20 20 3b |playdbma|p2:    ;|
|00002a10| 78 79 31 3d 64 32 64 33 | 20 78 79 32 3d 64 35 64 |xy1=d2d3| xy2=d5d|
|00002a20| 36 00 20 20 80 7e 20 21 | 6d 7b 72 65 73 73 68 69 |6.  .~ !|m{resshi|
|00002a30| 66 74 7d 2c 64 37 3a 80 | 44 2e 6c 64 37 2c 64 32 |ft},d7:.|D.ld7,d2|
|00002a40| 3a 80 ac 20 64 32 3a 80 | 44 2e 6c 64 37 2c 64 35 |:.. d2:.|D.ld7,d5|
|00002a50| 3a 80 ac 20 64 35 00 20 | 20 80 7e 20 2d 28 61 32 |:.. d5. | .~ -(a2|
|00002a60| 29 2c 64 36 3a 80 7e 2e | 6c 20 21 6d 7b 62 70 6c |),d6:.~.|l !m{bpl|
|00002a70| 61 6e 65 73 7d 2c 61 32 | 3a 80 7e 20 21 6d 7b 6e |anes},a2|:.~ !m{n|
|00002a80| 75 6d 62 70 7d 2c 64 30 | 3a 80 48 20 6e 6f 6a 6f |umbp},d0|:.H nojo|
|00002a90| 32 3a 80 7e 20 64 30 2c | 2d 28 61 37 29 00 20 20 |2:.~ d0,|-(a7).  |
|00002aa0| 80 82 20 21 6d 7b 66 65 | 74 63 68 77 69 64 7d 2c |.. !m{fe|tchwid},|
|00002ab0| 64 30 2f 64 34 2f 64 37 | 3a 80 7a 20 62 70 31 28 |d0/d4/d7|:.z bp1(|
|00002ac0| 70 63 29 2c 61 33 00 20 | 20 80 7e 20 28 61 30 29 |pc),a3. | .~ (a0)|
|00002ad0| 2c 64 31 3a 80 84 20 64 | 31 2c 64 33 3a 80 a7 20 |,d1:.. d|1,d3:.. |
|00002ae0| 64 30 2c 64 31 3a 80 7e | 20 64 31 2c 2d 36 28 61 |d0,d1:.~| d1,-6(a|
|00002af0| 32 29 00 20 20 80 7e 20 | 28 61 31 29 2c 64 31 3a |2).  .~ |(a1),d1:|
|00002b00| 80 84 20 64 31 2c 64 36 | 3a 80 a7 20 64 30 2c 64 |.. d1,d6|:.. d0,d|
|00002b10| 31 3a 80 7e 20 64 31 2c | 2d 32 28 61 32 29 00 20 |1:.~ d1,|-2(a2). |
|00002b20| 20 80 7e 20 64 32 2c 64 | 30 3a 80 89 20 64 30 3a | .~ d2,d|0:.. d0:|
|00002b30| 80 42 20 64 34 2c 64 30 | 3a 80 3d 20 64 30 2c 64 |.B d4,d0|:.= d0,d|
|00002b40| 30 3a 80 7e 20 30 28 61 | 33 2c 64 30 29 2c 64 30 |0:.~ 0(a|3,d0),d0|
|00002b50| 00 20 20 80 7e 20 64 35 | 2c 64 31 3a 80 89 20 64 |.  .~ d5|,d1:.. d|
|00002b60| 31 3a 80 42 20 64 34 2c | 64 31 3a 80 3d 20 64 31 |1:.B d4,|d1:.= d1|
|00002b70| 2c 64 31 3a 80 7e 20 30 | 28 61 33 2c 64 31 29 2c |,d1:.~ 0|(a3,d1),|
|00002b80| 64 31 00 20 20 80 42 20 | 23 24 66 30 66 30 2c 64 |d1.  .B |#$f0f0,d|
|00002b90| 31 3a 80 42 20 23 24 30 | 66 30 66 2c 64 30 3a 80 |1:.B #$0|f0f,d0:.|
|00002ba0| 8a 20 64 31 2c 64 30 3a | 80 7e 20 64 30 2c 2d 31 |. d1,d0:|.~ d0,-1|
|00002bb0| 30 28 61 32 29 3a 80 89 | 20 64 34 00 20 20 80 42 |0(a2):..| d4.  .B|
|00002bc0| 20 64 34 2c 64 32 3a 80 | 76 2e 6c 20 64 32 3a 80 | d4,d2:.|v.l d2:.|
|00002bd0| 45 20 64 37 2c 64 32 3a | 80 3d 2e 6c 20 64 33 2c |E d7,d2:|.=.l d3,|
|00002be0| 64 32 3a 80 42 20 64 34 | 2c 64 35 3a 80 76 2e 6c |d2:.B d4|,d5:.v.l|
|00002bf0| 20 64 35 3a 80 45 20 64 | 37 2c 64 35 3a 80 3d 2e | d5:.E d|7,d5:.=.|
|00002c00| 6c 20 64 36 2c 64 35 00 | 20 20 80 7e 20 28 61 37 |l d6,d5.|  .~ (a7|
|00002c10| 29 2b 2c 64 30 3a 80 aa | 23 31 2c 64 30 3a 80 7a |)+,d0:..|#1,d0:.z|
|00002c20| 20 38 28 61 30 29 2c 61 | 30 3a 80 7a 20 38 28 61 | 8(a0),a|0:.z 8(a|
|00002c30| 31 29 2c 61 31 3a 80 40 | 23 32 2c 61 32 00 67 6f |1),a1:.@|#2,a2.go|
|00002c40| 62 70 32 3a 80 7e 2e 6c | 20 28 61 30 29 2b 2c 64 |bp2:.~.l| (a0)+,d|
|00002c50| 31 3a 80 3d 2e 6c 20 64 | 32 2c 64 31 3a 80 7e 20 |1:.=.l d|2,d1:.~ |
|00002c60| 64 31 2c 34 28 61 32 29 | 3a 80 ac 20 64 31 3a 80 |d1,4(a2)|:.. d1:.|
|00002c70| 7e 20 64 31 2c 28 61 32 | 29 00 20 20 80 40 23 38 |~ d1,(a2|).  .@#8|
|00002c80| 2c 61 32 3a 80 6f 20 64 | 30 2c 67 6f 67 70 32 3a |,a2:.o d|0,gogp2:|
|00002c90| 80 94 3a 67 6f 67 70 32 | 00 20 20 80 7e 2e 6c 20 |..:gogp2|.  .~.l |
|00002ca0| 28 61 31 29 2b 2c 64 31 | 3a 80 3d 2e 6c 20 64 35 |(a1)+,d1|:.=.l d5|
|00002cb0| 2c 64 31 3a 80 7e 20 64 | 31 2c 34 28 61 32 29 3a |,d1:.~ d|1,4(a2):|
|00002cc0| 80 ac 20 64 31 3a 80 7e | 20 64 31 2c 28 61 32 29 |.. d1:.~| d1,(a2)|
|00002cd0| 00 20 20 80 40 23 38 2c | 61 32 3a 80 6f 20 64 30 |.  .@#8,|a2:.o d0|
|00002ce0| 2c 67 6f 62 70 32 3a 6e | 6f 6a 6f 32 3a 80 94 00 |,gobp2:n|ojo2:...|
|00002cf0| 00 5f 64 69 73 70 6c 61 | 79 64 62 6d 61 70 3a 00 |._displa|ydbmap:.|
|00002d00| 20 20 80 7e 2e 6c 20 21 | 6d 7b 62 70 6c 61 6e 65 |  .~.l !|m{bplane|
|00002d10| 73 7d 2c 61 32 3a 80 7e | 20 21 6d 7b 6e 75 6d 62 |s},a2:.~| !m{numb|
|00002d20| 70 7d 2c 64 30 3a 80 48 | 20 6e 6f 6a 6f 3a 80 aa |p},d0:.H| nojo:..|
|00002d30| 23 31 2c 64 30 00 20 20 | 80 7e 20 28 61 30 29 2c |#1,d0.  |.~ (a0),|
|00002d40| 64 31 3a 80 a7 20 21 6d | 7b 66 65 74 63 68 77 69 |d1:.. !m|{fetchwi|
|00002d50| 64 7d 2c 64 31 3a 80 7e | 20 64 31 2c 2d 36 28 61 |d},d1:.~| d1,-6(a|
|00002d60| 32 29 00 20 20 80 7e 20 | 28 61 31 29 2c 64 31 3a |2).  .~ |(a1),d1:|
|00002d70| 80 a7 20 21 6d 7b 66 65 | 74 63 68 77 69 64 7d 2c |.. !m{fe|tchwid},|
|00002d80| 64 31 3a 80 7e 20 64 31 | 2c 2d 32 28 61 32 29 00 |d1:.~ d1|,-2(a2).|
|00002d90| 20 20 80 7a 20 38 28 61 | 30 29 2c 61 30 3a 80 7a |  .z 8(a|0),a0:.z|
|00002da0| 20 38 28 61 31 29 2c 61 | 31 3a 80 40 23 32 2c 61 | 8(a1),a|1:.@#2,a|
|00002db0| 32 00 67 6f 62 70 3a 80 | 7e 2e 6c 20 28 61 30 29 |2.gobp:.|~.l (a0)|
|00002dc0| 2b 2c 64 31 3a 80 7e 20 | 64 31 2c 34 28 61 32 29 |+,d1:.~ |d1,4(a2)|
|00002dd0| 3a 80 ac 20 64 31 3a 80 | 7e 20 64 31 2c 28 61 32 |:.. d1:.|~ d1,(a2|
|00002de0| 29 3a 80 40 23 38 2c 61 | 32 00 20 20 80 6f 20 64 |):.@#8,a|2.  .o d|
|00002df0| 30 2c 67 6f 67 70 3a 80 | 94 3a 67 6f 67 70 3a 80 |0,gogp:.|.:gogp:.|
|00002e00| 7e 2e 6c 20 28 61 31 29 | 2b 2c 64 31 3a 80 7e 20 |~.l (a1)|+,d1:.~ |
|00002e10| 64 31 2c 34 28 61 32 29 | 3a 80 ac 20 64 31 3a 80 |d1,4(a2)|:.. d1:.|
|00002e20| 7e 20 64 31 2c 28 61 32 | 29 00 20 20 80 40 23 38 |~ d1,(a2|).  .@#8|
|00002e30| 2c 61 32 3a 80 6f 20 64 | 30 2c 67 6f 62 70 3a 6e |,a2:.o d|0,gobp:n|
|00002e40| 6f 6a 6f 3a 80 94 00 00 | 62 70 31 3a 00 20 20 80 |ojo:....|bp1:.  .|
|00002e50| 25 2e 77 20 24 30 30 30 | 30 2c 24 31 31 30 30 2c |%.w $000|0,$1100,|
|00002e60| 24 32 32 30 30 2c 24 33 | 33 30 30 2c 24 30 30 31 |$2200,$3|300,$001|
|00002e70| 31 2c 24 31 31 31 31 2c | 24 32 32 31 31 2c 24 33 |1,$1111,|$2211,$3|
|00002e80| 33 31 31 00 20 20 80 25 | 2e 77 20 24 30 30 32 32 |311.  .%|.w $0022|
|00002e90| 2c 24 31 31 32 32 2c 24 | 32 32 32 32 2c 24 33 33 |,$1122,$|2222,$33|
|00002ea0| 32 32 2c 24 30 30 33 33 | 2c 24 31 31 33 33 2c 24 |22,$0033|,$1133,$|
|00002eb0| 32 32 33 33 2c 24 33 33 | 33 33 00 20 20 80 25 2e |2233,$33|33.  .%.|
|00002ec0| 77 20 24 30 30 34 34 2c | 24 31 31 34 34 2c 24 32 |w $0044,|$1144,$2|
|00002ed0| 32 34 34 2c 24 33 33 34 | 34 2c 24 30 30 35 35 2c |244,$334|4,$0055,|
|00002ee0| 24 31 31 35 35 2c 24 32 | 32 35 35 2c 24 33 33 35 |$1155,$2|255,$335|
|00002ef0| 35 00 20 20 80 25 2e 77 | 20 24 30 30 36 36 2c 24 |5.  .%.w| $0066,$|
|00002f00| 31 31 36 36 2c 24 32 32 | 36 36 2c 24 33 33 36 36 |1166,$22|66,$3366|
|00002f10| 2c 24 30 30 37 37 2c 24 | 31 31 37 37 2c 24 32 32 |,$0077,$|1177,$22|
|00002f20| 37 37 2c 24 33 33 37 37 | 00 20 20 80 25 2e 77 20 |77,$3377|.  .%.w |
|00002f30| 24 30 30 38 38 2c 24 31 | 31 38 38 2c 24 32 32 38 |$0088,$1|188,$228|
|00002f40| 38 2c 24 33 33 38 38 2c | 24 30 30 39 39 2c 24 31 |8,$3388,|$0099,$1|
|00002f50| 31 39 39 2c 24 32 32 39 | 39 2c 24 33 33 39 39 00 |199,$229|9,$3399.|
|00002f60| 20 20 80 25 2e 77 20 24 | 30 30 61 61 2c 24 31 31 |  .%.w $|00aa,$11|
|00002f70| 61 61 2c 24 32 32 61 61 | 2c 24 33 33 61 61 2c 24 |aa,$22aa|,$33aa,$|
|00002f80| 30 30 62 62 2c 24 31 31 | 62 62 2c 24 32 32 62 62 |00bb,$11|bb,$22bb|
|00002f90| 2c 24 33 33 62 62 00 20 | 20 80 25 2e 77 20 24 30 |,$33bb. | .%.w $0|
|00002fa0| 30 63 63 2c 24 31 31 63 | 63 2c 24 32 32 63 63 2c |0cc,$11c|c,$22cc,|
|00002fb0| 24 33 33 63 63 2c 24 30 | 30 64 64 2c 24 31 31 64 |$33cc,$0|0dd,$11d|
|00002fc0| 64 2c 24 32 32 64 64 2c | 24 33 33 64 64 00 20 20 |d,$22dd,|$33dd.  |
|00002fd0| 80 25 2e 77 20 24 30 30 | 65 65 2c 24 31 31 65 65 |.%.w $00|ee,$11ee|
|00002fe0| 2c 24 32 32 65 65 2c 24 | 33 33 65 65 2c 24 30 30 |,$22ee,$|33ee,$00|
|00002ff0| 66 66 2c 24 31 31 66 66 | 2c 24 32 32 66 66 2c 24 |ff,$11ff|,$22ff,$|
|00003000| 33 33 66 66 00 00 20 20 | 80 25 2e 77 20 24 34 34 |33ff..  |.%.w $44|
|00003010| 30 30 2c 24 35 35 30 30 | 2c 24 36 36 30 30 2c 24 |00,$5500|,$6600,$|
|00003020| 37 37 30 30 2c 24 34 34 | 31 31 2c 24 35 35 31 31 |7700,$44|11,$5511|
|00003030| 2c 24 36 36 31 31 2c 24 | 37 37 31 31 00 20 20 80 |,$6611,$|7711.  .|
|00003040| 25 2e 77 20 24 34 34 32 | 32 2c 24 35 35 32 32 2c |%.w $442|2,$5522,|
|00003050| 24 36 36 32 32 2c 24 37 | 37 32 32 2c 24 34 34 33 |$6622,$7|722,$443|
|00003060| 33 2c 24 35 35 33 33 2c | 24 36 36 33 33 2c 24 37 |3,$5533,|$6633,$7|
|00003070| 37 33 33 00 20 20 80 25 | 2e 77 20 24 34 34 34 34 |733.  .%|.w $4444|
|00003080| 2c 24 35 35 34 34 2c 24 | 36 36 34 34 2c 24 37 37 |,$5544,$|6644,$77|
|00003090| 34 34 2c 24 34 34 35 35 | 2c 24 35 35 35 35 2c 24 |44,$4455|,$5555,$|
|000030a0| 36 36 35 35 2c 24 37 37 | 35 35 00 20 20 80 25 2e |6655,$77|55.  .%.|
|000030b0| 77 20 24 34 34 36 36 2c | 24 35 35 36 36 2c 24 36 |w $4466,|$5566,$6|
|000030c0| 36 36 36 2c 24 37 37 36 | 36 2c 24 34 34 37 37 2c |666,$776|6,$4477,|
|000030d0| 24 35 35 37 37 2c 24 36 | 36 37 37 2c 24 37 37 37 |$5577,$6|677,$777|
|000030e0| 37 00 20 20 80 25 2e 77 | 20 24 34 34 38 38 2c 24 |7.  .%.w| $4488,$|
|000030f0| 35 35 38 38 2c 24 36 36 | 38 38 2c 24 37 37 38 38 |5588,$66|88,$7788|
|00003100| 2c 24 34 34 39 39 2c 24 | 35 35 39 39 2c 24 36 36 |,$4499,$|5599,$66|
|00003110| 39 39 2c 24 37 37 39 39 | 00 20 20 80 25 2e 77 20 |99,$7799|.  .%.w |
|00003120| 24 34 34 61 61 2c 24 35 | 35 61 61 2c 24 36 36 61 |$44aa,$5|5aa,$66a|
|00003130| 61 2c 24 37 37 61 61 2c | 24 34 34 62 62 2c 24 35 |a,$77aa,|$44bb,$5|
|00003140| 35 62 62 2c 24 36 36 62 | 62 2c 24 37 37 62 62 00 |5bb,$66b|b,$77bb.|
|00003150| 20 20 80 25 2e 77 20 24 | 34 34 63 63 2c 24 35 35 |  .%.w $|44cc,$55|
|00003160| 63 63 2c 24 36 36 63 63 | 2c 24 37 37 63 63 2c 24 |cc,$66cc|,$77cc,$|
|00003170| 34 34 64 64 2c 24 35 35 | 64 64 2c 24 36 36 64 64 |44dd,$55|dd,$66dd|
|00003180| 2c 24 37 37 64 64 00 20 | 20 80 25 2e 77 20 24 34 |,$77dd. | .%.w $4|
|00003190| 34 65 65 2c 24 35 35 65 | 65 2c 24 36 36 65 65 2c |4ee,$55e|e,$66ee,|
|000031a0| 24 37 37 65 65 2c 24 34 | 34 66 66 2c 24 35 35 66 |$77ee,$4|4ff,$55f|
|000031b0| 66 2c 24 36 36 66 66 2c | 24 37 37 66 66 00 00 20 |f,$66ff,|$77ff.. |
|000031c0| 20 80 25 2e 77 20 24 38 | 38 30 30 2c 24 39 39 30 | .%.w $8|800,$990|
|000031d0| 30 2c 24 61 61 30 30 2c | 24 62 62 30 30 2c 24 38 |0,$aa00,|$bb00,$8|
|000031e0| 38 31 31 2c 24 39 39 31 | 31 2c 24 61 61 31 31 2c |811,$991|1,$aa11,|
|000031f0| 24 62 62 31 31 00 20 20 | 80 25 2e 77 20 24 38 38 |$bb11.  |.%.w $88|
|00003200| 32 32 2c 24 39 39 32 32 | 2c 24 61 61 32 32 2c 24 |22,$9922|,$aa22,$|
|00003210| 62 62 32 32 2c 24 38 38 | 33 33 2c 24 39 39 33 33 |bb22,$88|33,$9933|
|00003220| 2c 24 61 61 33 33 2c 24 | 62 62 33 33 00 20 20 80 |,$aa33,$|bb33.  .|
|00003230| 25 2e 77 20 24 38 38 34 | 34 2c 24 39 39 34 34 2c |%.w $884|4,$9944,|
|00003240| 24 61 61 34 34 2c 24 62 | 62 34 34 2c 24 38 38 35 |$aa44,$b|b44,$885|
|00003250| 35 2c 24 39 39 35 35 2c | 24 61 61 35 35 2c 24 62 |5,$9955,|$aa55,$b|
|00003260| 62 35 35 00 20 20 80 25 | 2e 77 20 24 38 38 36 36 |b55.  .%|.w $8866|
|00003270| 2c 24 39 39 36 36 2c 24 | 61 61 36 36 2c 24 62 62 |,$9966,$|aa66,$bb|
|00003280| 36 36 2c 24 38 38 37 37 | 2c 24 39 39 37 37 2c 24 |66,$8877|,$9977,$|
|00003290| 61 61 37 37 2c 24 62 62 | 37 37 00 20 20 80 25 2e |aa77,$bb|77.  .%.|
|000032a0| 77 20 24 38 38 38 38 2c | 24 39 39 38 38 2c 24 61 |w $8888,|$9988,$a|
|000032b0| 61 38 38 2c 24 62 62 38 | 38 2c 24 38 38 39 39 2c |a88,$bb8|8,$8899,|
|000032c0| 24 39 39 39 39 2c 24 61 | 61 39 39 2c 24 62 62 39 |$9999,$a|a99,$bb9|
|000032d0| 39 00 20 20 80 25 2e 77 | 20 24 38 38 61 61 2c 24 |9.  .%.w| $88aa,$|
|000032e0| 39 39 61 61 2c 24 61 61 | 61 61 2c 24 62 62 61 61 |99aa,$aa|aa,$bbaa|
|000032f0| 2c 24 38 38 62 62 2c 24 | 39 39 62 62 2c 24 61 61 |,$88bb,$|99bb,$aa|
|00003300| 62 62 2c 24 62 62 62 62 | 00 20 20 80 25 2e 77 20 |bb,$bbbb|.  .%.w |
|00003310| 24 38 38 63 63 2c 24 39 | 39 63 63 2c 24 61 61 63 |$88cc,$9|9cc,$aac|
|00003320| 63 2c 24 62 62 63 63 2c | 24 38 38 64 64 2c 24 39 |c,$bbcc,|$88dd,$9|
|00003330| 39 64 64 2c 24 61 61 64 | 64 2c 24 62 62 64 64 00 |9dd,$aad|d,$bbdd.|
|00003340| 20 20 80 25 2e 77 20 24 | 38 38 65 65 2c 24 39 39 |  .%.w $|88ee,$99|
|00003350| 65 65 2c 24 61 61 65 65 | 2c 24 62 62 65 65 2c 24 |ee,$aaee|,$bbee,$|
|00003360| 38 38 66 66 2c 24 39 39 | 66 66 2c 24 61 61 66 66 |88ff,$99|ff,$aaff|
|00003370| 2c 24 62 62 66 66 00 00 | 20 20 80 25 2e 77 20 24 |,$bbff..|  .%.w $|
|00003380| 63 63 30 30 2c 24 64 64 | 30 30 2c 24 65 65 30 30 |cc00,$dd|00,$ee00|
|00003390| 2c 24 66 66 30 30 2c 24 | 63 63 31 31 2c 24 64 64 |,$ff00,$|cc11,$dd|
|000033a0| 31 31 2c 24 65 65 31 31 | 2c 24 66 66 31 31 00 20 |11,$ee11|,$ff11. |
|000033b0| 20 80 25 2e 77 20 24 63 | 63 32 32 2c 24 64 64 32 | .%.w $c|c22,$dd2|
|000033c0| 32 2c 24 65 65 32 32 2c | 24 66 66 32 32 2c 24 63 |2,$ee22,|$ff22,$c|
|000033d0| 63 33 33 2c 24 64 64 33 | 33 2c 24 65 65 33 33 2c |c33,$dd3|3,$ee33,|
|000033e0| 24 66 66 33 33 00 20 20 | 80 25 2e 77 20 24 63 63 |$ff33.  |.%.w $cc|
|000033f0| 34 34 2c 24 64 64 34 34 | 2c 24 65 65 34 34 2c 24 |44,$dd44|,$ee44,$|
|00003400| 66 66 34 34 2c 24 63 63 | 35 35 2c 24 64 64 35 35 |ff44,$cc|55,$dd55|
|00003410| 2c 24 65 65 35 35 2c 24 | 66 66 35 35 00 20 20 80 |,$ee55,$|ff55.  .|
|00003420| 25 2e 77 20 24 63 63 36 | 36 2c 24 64 64 36 36 2c |%.w $cc6|6,$dd66,|
|00003430| 24 65 65 36 36 2c 24 66 | 66 36 36 2c 24 63 63 37 |$ee66,$f|f66,$cc7|
|00003440| 37 2c 24 64 64 37 37 2c | 24 65 65 37 37 2c 24 66 |7,$dd77,|$ee77,$f|
|00003450| 66 37 37 00 20 20 80 25 | 2e 77 20 24 63 63 38 38 |f77.  .%|.w $cc88|
|00003460| 2c 24 64 64 38 38 2c 24 | 65 65 38 38 2c 24 66 66 |,$dd88,$|ee88,$ff|
|00003470| 38 38 2c 24 63 63 39 39 | 2c 24 64 64 39 39 2c 24 |88,$cc99|,$dd99,$|
|00003480| 65 65 39 39 2c 24 66 66 | 39 39 00 20 20 80 25 2e |ee99,$ff|99.  .%.|
|00003490| 77 20 24 63 63 61 61 2c | 24 64 64 61 61 2c 24 65 |w $ccaa,|$ddaa,$e|
|000034a0| 65 61 61 2c 24 66 66 61 | 61 2c 24 63 63 62 62 2c |eaa,$ffa|a,$ccbb,|
|000034b0| 24 64 64 62 62 2c 24 65 | 65 62 62 2c 24 66 66 62 |$ddbb,$e|ebb,$ffb|
|000034c0| 62 00 20 20 80 25 2e 77 | 20 24 63 63 63 63 2c 24 |b.  .%.w| $cccc,$|
|000034d0| 64 64 63 63 2c 24 65 65 | 63 63 2c 24 66 66 63 63 |ddcc,$ee|cc,$ffcc|
|000034e0| 2c 24 63 63 64 64 2c 24 | 64 64 64 64 2c 24 65 65 |,$ccdd,$|dddd,$ee|
|000034f0| 64 64 2c 24 66 66 64 64 | 00 20 20 80 25 2e 77 20 |dd,$ffdd|.  .%.w |
|00003500| 24 63 63 65 65 2c 24 64 | 64 65 65 2c 24 65 65 65 |$ccee,$d|dee,$eee|
|00003510| 65 2c 24 66 66 65 65 2c | 24 63 63 66 66 2c 24 64 |e,$ffee,|$ccff,$d|
|00003520| 64 66 66 2c 24 65 65 66 | 66 2c 24 66 66 66 66 00 |dff,$eef|f,$ffff.|
|00003530| 00 00 5f 64 69 73 70 6c | 61 79 73 70 72 69 74 65 |.._displ|aysprite|
|00003540| 3a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |:       |        |
|00003550| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 78 |        |      ;x|
|00003560| 2c 79 2c 63 68 20 3d 20 | 64 32 2c 64 33 2c 64 34 |,y,ch = |d2,d3,d4|
|00003570| 00 20 20 80 b0 2e 6c 20 | 28 61 31 29 3a 80 48 20 |.  ...l |(a1):.H |
|00003580| 6e 6f 73 70 72 69 65 72 | 72 00 20 20 80 7e 2e 6c |nosprier|r.  .~.l|
|00003590| 20 64 32 2c 64 31 3a 80 | 7e 20 64 33 2c 64 32 3a | d2,d1:.|~ d3,d2:|
|000035a0| 80 7e 20 64 34 2c 64 33 | 00 20 20 80 82 20 31 32 |.~ d4,d3|.  .. 12|
|000035b0| 28 61 31 29 2c 64 34 2d | 64 35 3a 80 7e 20 21 6d |(a1),d4-|d5:.~ !m|
|000035c0| 7b 73 70 72 65 73 7d 2c | 64 36 3a 80 44 20 64 36 |{spres},|d6:.D d6|
|000035d0| 2c 64 34 3a 80 ac 20 64 | 31 00 20 20 80 7e 20 21 |,d4:.. d|1.  .~ !|
|000035e0| 6d 7b 72 65 73 73 68 69 | 66 74 7d 2c 64 36 3a 80 |m{resshi|ft},d6:.|
|000035f0| 8e 2e 6c 20 64 36 2c 64 | 31 3a 80 a7 20 64 34 2c |..l d6,d|1:.. d4,|
|00003600| 64 31 3a 80 3d 23 31 32 | 38 2a 34 2c 64 31 00 00 |d1:.=#12|8*4,d1..|
|00003610| 20 20 80 a7 20 64 35 2c | 64 32 3a 80 7e 20 21 6d |  .. d5,|d2:.~ !m|
|00003620| 7b 68 65 69 67 68 74 7d | 2c 64 30 3a 80 40 23 31 |{height}|,d0:.@#1|
|00003630| 2c 64 30 20 3b 77 61 73 | 20 31 00 20 20 80 a7 20 |,d0 ;was| 1.  .. |
|00003640| 64 32 2c 64 30 3a 80 4c | 20 73 70 72 69 74 65 6f |d2,d0:.L| spriteo|
|00003650| 66 66 20 20 20 20 20 20 | 20 20 20 3b 3a 41 44 44 |ff      |   ;:ADD|
|00003660| 51 23 31 2c 64 30 20 20 | 20 20 20 20 20 20 3b 6f |Q#1,d0  |      ;o|
|00003670| 66 66 20 62 6f 74 74 6f | 6d 20 77 61 73 20 61 64 |ff botto|m was ad|
|00003680| 64 71 32 00 00 20 20 80 | 81 23 30 2c 64 34 3a 80 |dq2..  .|.#0,d4:.|
|00003690| 7e 34 28 61 31 29 2c 64 | 35 3a 80 b0 20 64 32 3a |~4(a1),d|5:.. d2:|
|000036a0| 80 51 27 73 6b 69 70 79 | 30 3a 80 3d 20 64 32 2c |.Q'skipy|0:.= d2,|
|000036b0| 64 35 3a 80 4c 20 73 70 | 72 69 74 65 6f 66 66 20 |d5:.L sp|riteoff |
|000036c0| 20 20 3b 77 61 73 62 70 | 6c 6f 66 66 20 74 6f 70 |  ;wasbp|loff top|
|000036d0| 00 20 20 80 75 20 64 32 | 2c 64 34 3a 80 86 20 64 |.  .u d2|,d4:.. d|
|000036e0| 34 3a 80 7e 20 21 6d 7b | 73 70 69 66 7d 2c 64 37 |4:.~ !m{|spif},d7|
|000036f0| 3a 80 76 2e 6c 20 64 34 | 3a 80 44 2e 6c 20 64 37 |:.v.l d4|:.D.l d7|
|00003700| 2c 64 34 00 00 20 20 27 | 73 6b 69 70 79 30 3a 80 |,d4..  '|skipy0:.|
|00003710| 5c 20 64 35 2c 64 30 3a | 80 51 20 27 73 6b 69 70 |\ d5,d0:|.Q 'skip|
|00003720| 79 31 3a 80 7e 20 64 30 | 2c 64 35 3a 27 73 6b 69 |y1:.~ d0|,d5:'ski|
|00003730| 70 79 31 00 00 20 20 80 | 3d 20 21 6d 7b 79 70 6f |py1..  .|= !m{ypo|
|00003740| 73 7d 2c 64 32 20 20 20 | 3b 64 32 3d 79 73 74 61 |s},d2   |;d2=ysta|
|00003750| 72 74 20 64 35 3d 68 65 | 69 67 68 74 00 20 20 3b |rt d5=he|ight.  ;|
|00003760| 64 31 3d 78 00 20 20 80 | 81 20 23 30 2c 64 37 3a |d1=x.  .|. #0,d7:|
|00003770| 80 7e 20 64 32 2c 64 36 | 00 20 20 80 44 20 23 38 |.~ d2,d6|.  .D #8|
|00003780| 2c 64 36 3a 80 46 20 27 | 73 6b 69 70 3a 80 56 23 |,d6:.F '|skip:.V#|
|00003790| 32 2c 64 37 3a 27 73 6b | 69 70 20 20 20 20 20 3b |2,d7:'sk|ip     ;|
|000037a0| 70 6f 73 2f 63 74 72 6c | 20 69 6e 20 64 36 64 37 |pos/ctrl| in d6d7|
|000037b0| 00 20 20 80 b0 20 61 67 | 61 6d 61 63 3a 80 50 20 |.  .. ag|amac:.P |
|000037c0| 73 73 73 70 72 69 74 65 | 3a 80 42 20 23 24 66 66 |sssprite|:.B #$ff|
|000037d0| 66 63 2c 64 31 3a 73 73 | 73 70 72 69 74 65 00 20 |fc,d1:ss|sprite. |
|000037e0| 20 80 7d 20 23 31 2c 64 | 31 3a 80 46 20 27 73 6b | .} #1,d|1:.F 'sk|
|000037f0| 69 70 61 3a 80 56 20 23 | 33 2c 64 37 3a 27 73 6b |ipa:.V #|3,d7:'sk|
|00003800| 69 70 61 00 20 20 80 7d | 20 23 31 2c 64 31 3a 80 |ipa.  .}| #1,d1:.|
|00003810| 46 20 27 73 6b 69 70 62 | 3a 80 56 20 23 34 2c 64 |F 'skipb|:.V #4,d|
|00003820| 37 3a 27 73 6b 69 70 62 | 00 20 20 80 7d 20 23 31 |7:'skipb|.  .} #1|
|00003830| 2c 64 31 3a 80 46 20 27 | 73 6b 69 70 63 3a 80 56 |,d1:.F '|skipc:.V|
|00003840| 20 23 30 2c 64 37 3a 27 | 73 6b 69 70 63 00 00 20 | #0,d7:'|skipc.. |
|00003850| 20 80 7e 2e 62 20 64 31 | 2c 64 36 3a 80 3d 20 64 | .~.b d1|,d6:.= d|
|00003860| 35 2c 64 32 3a 80 aa 20 | 23 31 2c 64 32 3a 20 3b |5,d2:.. |#1,d2: ;|
|00003870| 73 70 72 69 74 65 20 65 | 6e 64 20 2d 31 00 00 20 |sprite e|nd -1.. |
|00003880| 20 80 7c 20 23 38 2c 64 | 32 3a 80 46 20 27 73 6b | .| #8,d|2:.F 'sk|
|00003890| 69 70 33 3a 80 56 20 23 | 31 2c 64 37 20 3b 41 44 |ip3:.V #|1,d7 ;AD|
|000038a0| 44 51 20 23 32 2c 64 37 | 00 20 20 27 73 6b 69 70 |DQ #2,d7|.  'skip|
|000038b0| 33 3a 80 8a 20 64 32 2c | 64 37 3a 80 b0 20 38 28 |3:.. d2,|d7:.. 8(|
|000038c0| 61 31 29 3a 80 51 20 27 | 73 6b 69 70 34 3a 80 56 |a1):.Q '|skip4:.V|
|000038d0| 20 23 37 2c 64 37 3a 27 | 73 6b 69 70 34 00 00 20 | #7,d7:'|skip4.. |
|000038e0| 20 80 7c 20 23 34 2c 64 | 33 3a 80 7e 2e 6c 20 21 | .| #4,d|3:.~.l !|
|000038f0| 6d 7b 73 70 72 69 74 65 | 73 7d 2c 61 30 3a 80 3d |m{sprite|s},a0:.=|
|00003900| 20 64 33 2c 61 30 3a 80 | 7e 2e 6c 20 28 61 31 29 | d3,a0:.|~.l (a1)|
|00003910| 2c 64 30 3a 80 3d 2e 6c | 20 64 34 2c 64 30 00 00 |,d0:.=.l| d4,d0..|
|00003920| 20 20 80 7e 20 31 30 28 | 61 31 29 2c 64 31 3a 80 |  .~ 10(|a1),d1:.|
|00003930| 76 2e 6c 20 64 31 3a 80 | 7e 20 36 28 61 31 29 2c |v.l d1:.|~ 6(a1),|
|00003940| 64 32 3a 80 aa 20 23 31 | 2c 64 32 00 00 20 20 27 |d2:.. #1|,d2..  '|
|00003950| 6c 6f 6f 70 3a 80 7e 20 | 64 36 2c 32 28 61 30 29 |loop:.~ |d6,2(a0)|
|00003960| 3a 80 7e 20 64 37 2c 36 | 28 61 30 29 3a 80 7e 20 |:.~ d7,6|(a0):.~ |
|00003970| 64 30 2c 31 34 28 61 30 | 29 3a 80 ac 20 64 30 3a |d0,14(a0|):.. d0:|
|00003980| 80 7e 20 64 30 2c 31 30 | 28 61 30 29 3a 80 ac 20 |.~ d0,10|(a0):.. |
|00003990| 64 30 00 20 20 80 3d 2e | 6c 20 64 31 2c 64 30 3a |d0.  .=.|l d1,d0:|
|000039a0| 80 7a 20 31 36 28 61 30 | 29 2c 61 30 3a 80 b0 20 |.z 16(a0|),a0:.. |
|000039b0| 38 28 61 31 29 3a 80 51 | 20 27 6f 6e 6c 79 33 00 |8(a1):.Q| 'only3.|
|000039c0| 20 20 80 7e 20 64 36 2c | 32 28 61 30 29 3a 80 7e |  .~ d6,|2(a0):.~|
|000039d0| 20 64 37 2c 36 28 61 30 | 29 3a 80 7e 20 64 30 2c | d7,6(a0|):.~ d0,|
|000039e0| 31 34 28 61 30 29 3a 80 | ac 20 64 30 3a 80 7e 20 |14(a0):.|. d0:.~ |
|000039f0| 64 30 2c 31 30 28 61 30 | 29 3a 80 ac 20 64 30 00 |d0,10(a0|):.. d0.|
|00003a00| 20 20 80 3d 2e 6c 20 64 | 31 2c 64 30 3a 80 7a 20 |  .=.l d|1,d0:.z |
|00003a10| 31 36 28 61 30 29 2c 61 | 30 3a 80 aa 20 23 31 2c |16(a0),a|0:.. #1,|
|00003a20| 64 32 00 20 20 27 6f 6e | 6c 79 33 3a 80 3d 20 21 |d2.  'on|ly3:.= !|
|00003a30| 6d 7b 73 73 70 77 69 64 | 7d 2c 64 36 3a 80 6e 20 |m{sspwid|},d6:.n |
|00003a40| 64 32 2c 27 6c 6f 6f 70 | 3a 80 94 00 00 73 70 72 |d2,'loop|:....spr|
|00003a50| 69 74 65 6f 66 66 3a 00 | 20 20 80 7e 20 36 28 61 |iteoff:.|  .~ 6(a|
|00003a60| 31 29 2c 64 32 3a 80 aa | 20 23 31 2c 64 32 3a 80 |1),d2:..| #1,d2:.|
|00003a70| 7c 20 23 34 2c 64 33 3a | 80 7e 2e 6c 20 21 6d 7b || #4,d3:|.~.l !m{|
|00003a80| 73 70 72 69 74 65 73 7d | 2c 61 30 3a 80 3d 20 64 |sprites}|,a0:.= d|
|00003a90| 33 2c 61 30 00 20 20 27 | 6c 6f 6f 70 32 3a 80 7e |3,a0.  '|loop2:.~|
|00003aa0| 23 30 2c 32 28 61 30 29 | 3a 80 7e 23 30 2c 36 28 |#0,2(a0)|:.~#0,6(|
|00003ab0| 61 30 29 00 20 20 80 7e | 20 6d 79 73 70 72 69 74 |a0).  .~| mysprit|
|00003ac0| 65 28 70 63 29 2c 31 30 | 28 61 30 29 3a 80 7e 20 |e(pc),10|(a0):.~ |
|00003ad0| 6d 79 73 70 72 69 74 65 | 2b 32 28 70 63 29 2c 31 |mysprite|+2(pc),1|
|00003ae0| 34 28 61 30 29 3a 00 20 | 20 80 7a 31 36 28 61 30 |4(a0):. | .z16(a0|
|00003af0| 29 2c 61 30 3a 80 b0 20 | 38 28 61 31 29 3a 80 51 |),a0:.. |8(a1):.Q|
|00003b00| 20 27 6f 6e 6c 79 34 3a | 00 20 20 80 7e 23 30 2c | 'only4:|.  .~#0,|
|00003b10| 32 28 61 30 29 3a 80 7e | 23 30 2c 36 28 61 30 29 |2(a0):.~|#0,6(a0)|
|00003b20| 3a 00 20 20 80 7e 20 6d | 79 73 70 72 69 74 65 28 |:.  .~ m|ysprite(|
|00003b30| 70 63 29 2c 31 30 28 61 | 30 29 3a 80 7e 20 6d 79 |pc),10(a|0):.~ my|
|00003b40| 73 70 72 69 74 65 2b 32 | 28 70 63 29 2c 31 34 28 |sprite+2|(pc),14(|
|00003b50| 61 30 29 00 20 20 80 7a | 31 36 28 61 30 29 2c 61 |a0).  .z|16(a0),a|
|00003b60| 30 3a 80 aa 23 31 2c 64 | 32 3a 27 6f 6e 6c 79 34 |0:..#1,d|2:'only4|
|00003b70| 3a 80 6e 20 64 32 2c 27 | 6c 6f 6f 70 32 3a 80 94 |:.n d2,'|loop2:..|
|00003b80| 00 00 5f 63 75 73 74 6f | 6d 64 62 6c 73 63 61 6e |.._custo|mdblscan|
|00003b90| 3a 20 20 20 20 3b 64 31 | 3d 63 63 6f 66 66 73 65 |:    ;d1|=ccoffse|
|00003ba0| 74 00 20 20 80 7e 2e 6c | 20 21 6d 7b 63 75 73 74 |t.  .~.l| !m{cust|
|00003bb0| 6f 6d 73 7d 2c 61 31 3a | 80 3d 20 64 31 2c 61 31 |oms},a1:|.= d1,a1|
|00003bc0| 3a 80 7e 20 21 6d 7b 68 | 65 69 67 68 74 7d 2c 64 |:.~ !m{h|eight},d|
|00003bd0| 37 3a 80 aa 23 32 2c 64 | 37 3a 80 7e 20 64 32 2c |7:..#2,d|7:.~ d2,|
|00003be0| 64 36 00 20 20 80 7e 2e | 6c 20 21 6d 7b 62 70 6c |d6.  .~.|l !m{bpl|
|00003bf0| 61 6e 65 73 7d 2c 61 32 | 3a 80 82 2e 6c 20 2d 38 |anes},a2|:...l -8|
|00003c00| 28 61 32 29 2c 64 31 2d | 64 32 20 20 20 20 20 3b |(a2),d1-|d2     ;|
|00003c10| 63 6f 72 72 65 63 74 20 | 6d 6f 64 75 6c 6f 73 00 |correct |modulos.|
|00003c20| 20 20 80 7e 2e 6c 20 64 | 31 2c 64 33 3a 80 7e 2e |  .~.l d|1,d3:.~.|
|00003c30| 6c 20 64 32 2c 64 34 3a | 80 7e 20 21 6d 7b 66 65 |l d2,d4:|.~ !m{fe|
|00003c40| 74 63 68 77 69 64 7d 2c | 64 31 3a 80 86 20 64 31 |tchwid},|d1:.. d1|
|00003c50| 3a 80 7e 20 64 31 2c 64 | 32 00 20 20 80 7e 2e 6c |:.~ d1,d|2.  .~.l|
|00003c60| 20 23 6e 6f 77 63 6f 70 | 2c 64 35 3a 80 7e 20 21 | #nowcop|,d5:.~ !|
|00003c70| 6d 7b 79 70 6f 73 7d 2c | 64 30 3a 80 aa 23 31 2c |m{ypos},|d0:..#1,|
|00003c80| 64 30 3a 80 b0 20 64 36 | 3a 80 50 20 64 62 6c 64 |d0:.. d6|:.P dbld|
|00003c90| 62 6c 00 6e 78 6c 69 6e | 65 3a 00 20 20 80 7e 2e |bl.nxlin|e:.  .~.|
|00003ca0| 6c 20 64 35 2c 28 61 31 | 29 2b 3a 80 7e 2e 62 20 |l d5,(a1|)+:.~.b |
|00003cb0| 64 30 2c 28 61 31 29 2b | 3a 80 7e 2e 62 23 24 65 |d0,(a1)+|:.~.b#$e|
|00003cc0| 31 2c 28 61 31 29 2b 3a | 80 7e 20 23 24 66 66 66 |1,(a1)+:|.~ #$fff|
|00003cd0| 65 2c 28 61 31 29 2b 00 | 20 20 80 82 2e 6c 20 64 |e,(a1)+.|  ...l d|
|00003ce0| 31 2d 64 32 2c 28 61 31 | 29 3a 80 40 23 38 2c 61 |1-d2,(a1|):.@#8,a|
|00003cf0| 31 3a 80 75 20 64 31 2c | 64 33 3a 80 75 20 64 32 |1:.u d1,|d3:.u d2|
|00003d00| 2c 64 34 3a 80 40 23 31 | 2c 64 30 3a 80 6f 20 64 |,d4:.@#1|,d0:.o d|
|00003d10| 37 2c 6e 78 6c 69 6e 65 | 3a 80 94 00 00 64 62 6c |7,nxline|:....dbl|
|00003d20| 64 62 6c 3a 00 20 20 80 | 3d 20 64 36 2c 64 36 3a |dbl:.  .|= d6,d6:|
|00003d30| 80 7e 20 64 6c 6f 6f 70 | 28 70 63 2c 64 36 29 2c |.~ dloop|(pc,d6),|
|00003d40| 64 36 3a 80 7e 20 64 36 | 2c 6c 6f 6f 70 64 3a 80 |d6:.~ d6|,loopd:.|
|00003d50| 58 20 6e 75 78 31 00 00 | 64 6c 6f 6f 70 3a 80 25 |X nux1..|dloop:.%|
|00003d60| 20 30 2c 31 2c 35 2c 31 | 33 2c 32 39 00 6c 6f 6f | 0,1,5,1|3,29.loo|
|00003d70| 70 64 3a 80 25 20 30 00 | 00 6e 75 78 31 3a 00 20 |pd:.% 0.|.nux1:. |
|00003d80| 20 80 7e 20 6c 6f 6f 70 | 64 28 70 63 29 2c 64 36 | .~ loop|d(pc),d6|
|00003d90| 00 6c 62 75 62 3a 00 20 | 20 80 7e 2e 6c 20 64 35 |.lbub:. | .~.l d5|
|00003da0| 2c 28 61 31 29 2b 3a 80 | 7e 2e 62 20 64 30 2c 28 |,(a1)+:.|~.b d0,(|
|00003db0| 61 31 29 2b 3a 80 7e 2e | 62 23 24 65 31 2c 28 61 |a1)+:.~.|b#$e1,(a|
|00003dc0| 31 29 2b 3a 80 7e 20 23 | 24 66 66 66 65 2c 28 61 |1)+:.~ #|$fffe,(a|
|00003dd0| 31 29 2b 00 20 20 80 82 | 2e 6c 20 64 31 2d 64 32 |1)+.  ..|.l d1-d2|
|00003de0| 2c 28 61 31 29 3a 80 40 | 23 38 2c 61 31 3a 80 40 |,(a1):.@|#8,a1:.@|
|00003df0| 23 31 2c 64 30 3a 80 6f | 20 64 37 2c 6e 75 78 32 |#1,d0:.o| d7,nux2|
|00003e00| 3a 80 94 00 6e 75 78 32 | 3a 00 20 20 80 6f 20 64 |:...nux2|:.  .o d|
|00003e10| 36 2c 6c 62 75 62 00 3b | 74 68 65 6e 20 66 6c 69 |6,lbub.;|then fli|
|00003e20| 70 20 74 6f 20 6e 65 78 | 74 20 6c 69 6e 65 00 20 |p to nex|t line. |
|00003e30| 20 80 7e 2e 6c 20 64 35 | 2c 28 61 31 29 2b 3a 80 | .~.l d5|,(a1)+:.|
|00003e40| 7e 2e 62 20 64 30 2c 28 | 61 31 29 2b 3a 80 7e 2e |~.b d0,(|a1)+:.~.|
|00003e50| 62 23 24 65 31 2c 28 61 | 31 29 2b 3a 80 7e 20 23 |b#$e1,(a|1)+:.~ #|
|00003e60| 24 66 66 66 65 2c 28 61 | 31 29 2b 00 20 20 80 82 |$fffe,(a|1)+.  ..|
|00003e70| 2e 6c 20 64 31 2d 64 32 | 2c 28 61 31 29 3a 80 40 |.l d1-d2|,(a1):.@|
|00003e80| 23 38 2c 61 31 3a 80 40 | 23 31 2c 64 30 3a 80 75 |#8,a1:.@|#1,d0:.u|
|00003e90| 20 64 31 2c 64 33 3a 80 | 75 20 64 32 2c 64 34 3a | d1,d3:.|u d2,d4:|
|00003ea0| 80 6f 20 64 37 2c 6e 75 | 78 34 3a 80 94 00 6e 75 |.o d7,nu|x4:...nu|
|00003eb0| 78 34 3a 00 20 20 80 7e | 2e 6c 20 64 35 2c 28 61 |x4:.  .~|.l d5,(a|
|00003ec0| 31 29 2b 3a 80 7e 2e 62 | 20 64 30 2c 28 61 31 29 |1)+:.~.b| d0,(a1)|
|00003ed0| 2b 3a 80 7e 2e 62 23 24 | 65 31 2c 28 61 31 29 2b |+:.~.b#$|e1,(a1)+|
|00003ee0| 3a 80 7e 20 23 24 66 66 | 66 65 2c 28 61 31 29 2b |:.~ #$ff|fe,(a1)+|
|00003ef0| 00 20 20 80 82 2e 6c 20 | 64 31 2d 64 32 2c 28 61 |.  ...l |d1-d2,(a|
|00003f00| 31 29 3a 80 40 23 38 2c | 61 31 3a 80 40 23 31 2c |1):.@#8,|a1:.@#1,|
|00003f10| 64 30 3a 80 75 20 64 31 | 2c 64 33 3a 80 75 20 64 |d0:.u d1|,d3:.u d|
|00003f20| 32 2c 64 34 3a 80 6f 20 | 64 37 2c 6e 75 78 31 3a |2,d4:.o |d7,nux1:|
|00003f30| 80 94 00 00 5f 63 75 73 | 74 6f 6d 63 6f 6c 73 3a |...._cus|tomcols:|
|00003f40| 20 20 20 20 20 3b 64 31 | 2d 64 35 20 43 43 4f 66 |     ;d1|-d5 CCOf|
|00003f50| 66 73 65 74 2c 59 50 6f | 73 2c 50 61 6c 65 74 74 |fset,YPo|s,Palett|
|00003f60| 65 2c 73 74 61 72 74 63 | 6f 6c 2c 6e 75 6d 63 6f |e,startc|ol,numco|
|00003f70| 6c 73 00 20 20 80 7e 2e | 6c 20 21 6d 7b 63 75 73 |ls.  .~.|l !m{cus|
|00003f80| 74 6f 6d 73 7d 2c 61 31 | 3a 80 44 23 32 2c 64 31 |toms},a1|:.D#2,d1|
|00003f90| 3a 80 3d 20 64 31 2c 61 | 31 3a 80 7e 20 64 32 2c |:.= d1,a|1:.~ d2,|
|00003fa0| 64 31 3a 80 3d 20 21 6d | 7b 79 70 6f 73 7d 2c 64 |d1:.= !m|{ypos},d|
|00003fb0| 31 00 20 20 80 7e 2e 6c | 20 23 6e 6f 77 63 6f 70 |1.  .~.l| #nowcop|
|00003fc0| 2c 64 30 3a 80 57 20 23 | 38 2c 64 31 3a 80 48 20 |,d0:.W #|8,d1:.H |
|00003fd0| 6e 6f 6c 6f 33 00 3b 20 | 20 42 54 53 54 20 23 30 |nolo3.; | BTST #0|
|00003fe0| 2c 6c 61 73 74 77 61 69 | 74 3a 42 4e 45 20 6e 6f |,lastwai|t:BNE no|
|00003ff0| 6c 6f 33 3a 4d 4f 56 45 | 2e 6c 23 77 61 69 74 62 |lo3:MOVE|.l#waitb|
|00004000| 68 2c 64 30 00 20 20 6e | 6f 6c 6f 33 3a 80 7e 2e |h,d0.  n|olo3:.~.|
|00004010| 6c 20 64 30 2c 28 61 31 | 29 2b 3a 80 7e 2e 62 64 |l d0,(a1|)+:.~.bd|
|00004020| 31 2c 28 61 31 29 2b 3a | 80 7e 2e 62 23 24 65 31 |1,(a1)+:|.~.b#$e1|
|00004030| 2c 28 61 31 29 2b 3a 80 | 7e 20 23 24 66 66 66 65 |,(a1)+:.|~ #$fffe|
|00004040| 2c 28 61 31 29 2b 00 20 | 20 80 7e 2e 6c 20 28 61 |,(a1)+. | .~.l (a|
|00004050| 30 29 2c 64 30 3a 80 48 | 20 6e 6f 70 61 6c 65 72 |0),d0:.H| nopaler|
|00004060| 72 3a 80 7e 2e 6c 64 30 | 2c 61 30 3a 80 40 23 34 |r:.~.ld0|,a0:.@#4|
|00004070| 2c 61 30 00 20 20 80 7e | 20 64 34 2c 64 30 3a 80 |,a0.  .~| d4,d0:.|
|00004080| 84 20 23 31 32 2c 64 30 | 3a 80 3d 20 64 30 2c 61 |. #12,d0|:.= d0,a|
|00004090| 30 00 20 20 80 7e 20 64 | 35 2c 64 37 3a 80 48 20 |0.  .~ d|5,d7:.H |
|000040a0| 64 75 6e 70 3a 80 b0 20 | 21 6d 7b 61 67 61 7d 3a |dunp:.. |!m{aga}:|
|000040b0| 80 51 20 73 69 6d 70 6c | 65 00 20 20 80 42 23 24 |.Q simpl|e.  .B#$|
|000040c0| 65 30 2c 64 34 3a 80 44 | 23 38 2c 64 34 3a 80 7e |e0,d4:.D|#8,d4:.~|
|000040d0| 2e 6c 20 23 24 31 30 36 | 30 63 30 30 2c 64 30 3a |.l #$106|0c00,d0:|
|000040e0| 80 8a 20 64 34 2c 64 30 | 3a 80 58 20 63 6f 6d 70 |.. d4,d0|:.X comp|
|000040f0| 6c 65 78 32 00 00 5f 64 | 69 73 70 6c 61 79 70 61 |lex2.._d|isplaypa|
|00004100| 6c 65 74 74 65 32 3a 00 | 20 20 80 7e 2e 6c 20 28 |lette2:.|  .~.l (|
|00004110| 61 30 29 2c 64 30 3a 80 | 48 20 6e 6f 70 61 6c 65 |a0),d0:.|H nopale|
|00004120| 72 72 3a 80 7e 2e 6c 64 | 30 2c 61 30 3a 80 40 23 |rr:.~.ld|0,a0:.@#|
|00004130| 34 2c 61 30 20 3b 61 31 | 3d 72 67 62 00 20 20 80 |4,a0 ;a1|=rgb.  .|
|00004140| 84 20 23 31 32 2c 64 32 | 3a 80 3d 20 64 32 2c 61 |. #12,d2|:.= d2,a|
|00004150| 30 00 20 20 80 7e 2e 6c | 20 21 6d 7b 63 6f 6c 6f |0.  .~.l| !m{colo|
|00004160| 72 73 7d 2c 61 31 3a 80 | 7e 20 21 6d 7b 6e 75 6d |rs},a1:.|~ !m{num|
|00004170| 63 6f 6c 73 7d 2c 64 37 | 3a 80 48 20 64 75 6e 70 |cols},d7|:.H dunp|
|00004180| 00 20 20 80 b0 20 21 6d | 7b 61 67 61 7d 3a 80 51 |.  .. !m|{aga}:.Q|
|00004190| 20 73 69 6d 70 6c 65 3a | 80 4f 20 63 6f 6d 70 6c | simple:|.O compl|
|000041a0| 65 78 00 00 5f 64 69 73 | 70 6c 61 79 70 61 6c 65 |ex.._dis|playpale|
|000041b0| 74 74 65 3a 00 20 20 80 | 7e 2e 6c 20 28 61 30 29 |tte:.  .|~.l (a0)|
|000041c0| 2c 64 30 3a 80 48 20 6e | 6f 70 61 6c 65 72 72 3a |,d0:.H n|opalerr:|
|000041d0| 80 7e 2e 6c 64 30 2c 61 | 30 3a 80 40 23 34 2c 61 |.~.ld0,a|0:.@#4,a|
|000041e0| 30 20 3b 61 31 3d 72 67 | 62 00 20 20 80 7e 2e 6c |0 ;a1=rg|b.  .~.l|
|000041f0| 20 21 6d 7b 63 6f 6c 6f | 72 73 7d 2c 61 31 3a 80 | !m{colo|rs},a1:.|
|00004200| 7e 20 21 6d 7b 6e 75 6d | 63 6f 6c 73 7d 2c 64 37 |~ !m{num|cols},d7|
|00004210| 3a 80 48 20 64 75 6e 70 | 3a 80 b0 20 21 6d 7b 61 |:.H dunp|:.. !m{a|
|00004220| 67 61 7d 3a 80 51 20 73 | 69 6d 70 6c 65 00 00 63 |ga}:.Q s|imple..c|
|00004230| 6f 6d 70 6c 65 78 3a 00 | 20 20 80 7e 2e 6c 20 23 |omplex:.|  .~.l #|
|00004240| 24 31 30 36 30 63 30 30 | 2c 64 30 00 63 6f 6d 70 |$1060c00|,d0.comp|
|00004250| 6c 65 78 32 3a 00 20 20 | 80 7e 2e 6c 20 21 6d 7b |lex2:.  |.~.l !m{|
|00004260| 62 70 63 6f 6e 73 7d 2c | 61 32 3a 80 7e 2e 62 20 |bpcons},|a2:.~.b |
|00004270| 37 28 61 32 29 2c 64 30 | 00 20 20 80 81 23 32 2c |7(a2),d0|.  ..#2,|
|00004280| 64 32 3a 80 ac 20 64 32 | 3a 80 81 23 31 32 2c 64 |d2:.. d2|:..#12,d|
|00004290| 33 3a 80 aa 23 31 2c 64 | 37 00 6e 78 62 61 6e 6b |3:..#1,d|7.nxbank|
|000042a0| 3a 00 20 20 80 81 20 23 | 33 31 2c 64 36 3a 80 5c |:.  .. #|31,d6:.\|
|000042b0| 20 64 36 2c 64 37 3a 80 | 51 20 6e 6f 6b 3a 80 7e | d6,d7:.|Q nok:.~|
|000042c0| 20 64 37 2c 64 36 3a 6e | 6f 6b 00 20 20 80 7e 2e | d7,d6:n|ok.  .~.|
|000042d0| 6c 20 64 30 2c 28 61 31 | 29 2b 3a 80 7e 20 64 36 |l d0,(a1|)+:.~ d6|
|000042e0| 2c 64 35 3a 80 7e 23 24 | 31 38 30 2c 64 31 3a 80 |,d5:.~#$|180,d1:.|
|000042f0| ac 20 64 31 3a 80 7e 2e | 6c 20 61 30 2c 61 32 00 |. d1:.~.|l a0,a2.|
|00004300| 6e 78 63 62 31 3a 00 20 | 20 80 7e 20 28 61 30 29 |nxcb1:. | .~ (a0)|
|00004310| 2c 64 31 3a 80 7d 23 34 | 2c 64 31 3a 80 7e 2e 62 |,d1:.}#4|,d1:.~.b|
|00004320| 34 28 61 30 29 2c 64 31 | 3a 80 44 23 34 2c 64 31 |4(a0),d1|:.D#4,d1|
|00004330| 3a 80 7e 2e 62 38 28 61 | 30 29 2c 64 31 3a 80 7d |:.~.b8(a|0),d1:.}|
|00004340| 23 34 2c 64 31 00 20 20 | 80 7e 2e 6c 20 64 31 2c |#4,d1.  |.~.l d1,|
|00004350| 28 61 31 29 2b 3a 80 3d | 2e 6c 20 64 32 2c 64 31 |(a1)+:.=|.l d2,d1|
|00004360| 3a 80 3d 20 64 33 2c 61 | 30 3a 80 6f 20 64 35 2c |:.= d3,a|0:.o d5,|
|00004370| 6e 78 63 62 31 3a 80 54 | 23 39 2c 64 30 00 20 20 |nxcb1:.T|#9,d0.  |
|00004380| 80 7e 2e 6c 20 64 30 2c | 28 61 31 29 2b 3a 80 7e |.~.l d0,|(a1)+:.~|
|00004390| 20 64 36 2c 64 35 3a 80 | 7e 23 24 31 38 30 2c 64 | d6,d5:.|~#$180,d|
|000043a0| 31 3a 80 ac 20 64 31 3a | 80 7e 2e 6c 20 61 32 2c |1:.. d1:|.~.l a2,|
|000043b0| 61 30 00 6e 78 63 62 32 | 3a 00 20 20 80 7e 20 28 |a0.nxcb2|:.  .~ (|
|000043c0| 61 30 29 2c 64 31 3a 80 | 7e 2e 62 38 28 61 30 29 |a0),d1:.|~.b8(a0)|
|000043d0| 2c 64 31 3a 80 42 2e 62 | 23 31 35 2c 64 31 3a 80 |,d1:.B.b|#15,d1:.|
|000043e0| 7e 2e 62 34 28 61 30 29 | 2c 64 34 3a 80 44 2e 62 |~.b4(a0)|,d4:.D.b|
|000043f0| 23 34 2c 64 34 3a 80 8a | 2e 62 20 64 34 2c 64 31 |#4,d4:..|.b d4,d1|
|00004400| 00 20 20 80 7e 2e 6c 20 | 64 31 2c 28 61 31 29 2b |.  .~.l |d1,(a1)+|
|00004410| 3a 80 3d 2e 6c 20 64 32 | 2c 64 31 3a 80 3d 20 64 |:.=.l d2|,d1:.= d|
|00004420| 33 2c 61 30 3a 80 6f 20 | 64 35 2c 6e 78 63 62 32 |3,a0:.o |d5,nxcb2|
|00004430| 3a 80 54 23 39 2c 64 30 | 00 20 20 80 3d 20 23 24 |:.T#9,d0|.  .= #$|
|00004440| 32 30 30 30 2c 64 30 3a | 80 a7 23 33 32 2c 64 37 |2000,d0:|..#32,d7|
|00004450| 3a 80 51 20 6e 78 62 61 | 6e 6b 3a 64 75 6e 70 3a |:.Q nxba|nk:dunp:|
|00004460| 80 94 00 00 73 69 6d 70 | 6c 65 3a 00 20 20 80 7e |....simp|le:.  .~|
|00004470| 23 24 31 38 30 2c 64 30 | 3a 80 ac 20 64 30 3a 80 |#$180,d0|:.. d0:.|
|00004480| 81 23 32 2c 64 31 3a 80 | ac 20 64 31 3a 80 81 23 |.#2,d1:.|. d1:..#|
|00004490| 31 32 2c 64 32 3a 80 aa | 23 31 2c 64 37 00 73 6c |12,d2:..|#1,d7.sl|
|000044a0| 6f 6f 70 3a 00 20 20 80 | 7e 20 28 61 30 29 2c 64 |oop:.  .|~ (a0),d|
|000044b0| 30 3a 80 7d 23 34 2c 64 | 30 3a 80 7e 2e 62 34 28 |0:.}#4,d|0:.~.b4(|
|000044c0| 61 30 29 2c 64 30 3a 80 | 44 23 34 2c 64 30 3a 80 |a0),d0:.|D#4,d0:.|
|000044d0| 7e 2e 62 38 28 61 30 29 | 2c 64 30 3a 80 7d 23 34 |~.b8(a0)|,d0:.}#4|
|000044e0| 2c 64 30 00 20 20 80 7e | 2e 6c 20 64 30 2c 28 61 |,d0.  .~|.l d0,(a|
|000044f0| 31 29 2b 3a 80 3d 2e 6c | 20 64 31 2c 64 30 3a 80 |1)+:.=.l| d1,d0:.|
|00004500| 3d 20 64 32 2c 61 30 3a | 80 6f 20 64 37 2c 73 6c |= d2,a0:|.o d7,sl|
|00004510| 6f 6f 70 3a 80 94 00 00 | 6d 61 78 62 70 65 72 72 |oop:....|maxbperr|
|00004520| 3a 80 7e 2e 6c 20 23 6d | 65 73 73 31 2c 64 30 3a |:.~.l #m|ess1,d0:|
|00004530| 80 ae 23 30 00 75 6e 69 | 6e 69 74 65 72 72 3a 80 |..#0.uni|niterr:.|
|00004540| 7e 2e 6c 20 23 6d 65 73 | 73 32 2c 64 30 3a 80 ae |~.l #mes|s2,d0:..|
|00004550| 23 30 00 6e 6f 70 61 6c | 65 72 72 3a 80 7e 2e 6c |#0.nopal|err:.~.l|
|00004560| 20 23 6d 65 73 73 33 2c | 64 30 3a 80 ae 23 30 00 | #mess3,|d0:..#0.|
|00004570| 6e 6f 73 70 72 69 65 72 | 72 3a 80 7e 2e 6c 20 23 |nosprier|r:.~.l #|
|00004580| 6d 65 73 73 34 2c 64 30 | 3a 80 ae 23 30 00 6d 65 |mess4,d0|:..#0.me|
|00004590| 73 73 31 3a 80 25 2e 62 | 20 22 49 6c 6c 65 67 61 |ss1:.%.b| "Illega|
|000045a0| 6c 20 4e 75 6d 62 65 72 | 20 6f 66 20 42 69 74 50 |l Number| of BitP|
|000045b0| 6c 61 6e 65 73 20 66 6f | 72 20 52 65 73 6f 6c 75 |lanes fo|r Resolu|
|000045c0| 74 69 6f 6e 22 2c 30 3a | 80 27 00 6d 65 73 73 32 |tion",0:|.'.mess2|
|000045d0| 3a 80 25 2e 62 20 22 55 | 6e 69 6e 69 74 69 61 6c |:.%.b "U|ninitial|
|000045e0| 69 73 65 64 20 43 6f 70 | 4c 69 73 74 22 2c 30 3a |ised Cop|List",0:|
|000045f0| 80 27 00 6d 65 73 73 33 | 3a 80 25 2e 62 20 22 55 |.'.mess3|:.%.b "U|
|00004600| 6e 69 6e 69 74 69 61 6c | 69 73 65 64 20 50 61 6c |ninitial|ised Pal|
|00004610| 65 74 74 65 22 2c 30 3a | 80 27 00 6d 65 73 73 34 |ette",0:|.'.mess4|
|00004620| 3a 80 25 2e 62 20 22 55 | 6e 69 6e 69 74 69 61 6c |:.%.b "U|ninitial|
|00004630| 69 73 65 64 20 53 70 72 | 69 74 65 22 2c 30 3a 80 |ised Spr|ite",0:.|
|00004640| 27 00 00 5f 63 68 65 63 | 6b 63 6f 70 6c 69 73 74 |'.._chec|kcoplist|
|00004650| 3a 80 b0 2e 6c 20 21 6d | 7b 73 69 7a 65 7d 3a 80 |:...l !m|{size}:.|
|00004660| 48 20 75 6e 69 6e 69 74 | 65 72 72 3a 80 94 00 00 |H uninit|err:....|
+--------+-------------------------+-------------------------+--------+--------+