home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / wst!blz3.dms / in.adf / libsdev.lha / acidlibsrc / displaylib < prev    next >
Unknown  |  1994-09-03  |  26.2 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% gt2 Kopftext: '; *********************************************************' default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|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| 20 66 6d 6f 64 65 20 7c | 20 77 69 64 74 68 20 7c | fmode || width ||
|000001b0| 20 72 65 73 6f 6c 75 74 | 69 6f 6e 20 7c 20 68 61 | resolut|ion | ha|
|000001c0| 6d 20 65 68 62 20 64 70 | 66 20 73 6d 6f 6f 74 68 |m ehb dp|f smooth|
|000001d0| 20 7c 20 62 69 74 70 6c | 61 6e 65 73 00 00 3b 20 | | bitpl|anes..; |
|000001e0| 62 75 6d 37 00 3b 20 68 | 61 6d 38 20 6d 6f 64 65 |bum7.; h|am8 mode|
|000001f0| 20 77 6f 72 6b 69 6e 67 | 20 70 72 6f 70 65 72 6c | working| properl|
|00000200| 79 20 28 66 6c 69 70 73 | 20 62 69 74 70 6c 61 6e |y (flips| bitplan|
|00000210| 65 20 70 6f 69 6e 74 65 | 72 73 29 00 3b 20 65 68 |e pointe|rs).; eh|
|00000220| 62 20 65 6e 61 62 6c 65 | 20 6e 6f 77 20 73 77 69 |b enable| now swi|
|00000230| 74 63 68 65 64 20 28 77 | 61 73 20 64 69 73 61 62 |tched (w|as disab|
|00000240| 6c 65 29 00 3b 20 73 68 | 6f 72 74 20 76 65 72 73 |le).; sh|ort vers|
|00000250| 69 6f 6e 20 6f 66 20 69 | 6e 69 74 63 6f 70 6c 69 |ion of i|nitcopli|
|00000260| 73 74 20 61 64 64 65 64 | 00 3b 20 73 6d 6f 6f 74 |st added|.; smoot|
|00000270| 68 73 63 72 6f 6c 6c 20 | 73 65 74 20 61 6e 64 20 |hscroll |set and |
|00000280| 6e 6f 20 78 2c 79 20 69 | 6e 20 64 69 73 70 6c 61 |no x,y i|n displa|
|00000290| 79 62 69 74 6d 61 70 20 | 62 75 67 20 66 69 78 65 |ybitmap |bug fixe|
|000002a0| 64 00 3b 20 66 6f 72 63 | 65 20 6e 74 73 63 3f 00 |d.; forc|e ntsc?.|
|000002b0| 00 21 6c 69 62 68 65 61 | 64 65 72 7b 23 64 69 73 |.!libhea|der{#dis|
|000002c0| 70 6c 61 79 6c 69 62 2c | 69 6e 69 74 2c 30 2c 66 |playlib,|init,0,f|
|000002d0| 69 6e 69 74 2c 30 7d 00 | 00 21 64 75 6d 74 6f 6b |init,0}.|.!dumtok|
|000002e0| 65 7b 22 43 6f 70 4c 69 | 73 74 22 2c 22 22 2c 5f |e{"CopLi|st","",_|
|000002f0| 74 6f 6b 65 7d 00 00 21 | 61 73 74 61 74 65 6d 65 |toke}..!|astateme|
|00000300| 6e 74 00 21 61 72 67 73 | 20 7b 23 77 6f 72 64 2c |nt.!args| {#word,|
|00000310| 23 6c 6f 6e 67 7d 00 21 | 6c 69 62 73 20 7b 23 64 |#long}.!|libs {#d|
|00000320| 69 73 70 6c 61 79 6c 69 | 62 2c 24 31 33 38 30 2c |isplayli|b,$1380,|
|00000330| 23 73 70 72 69 74 65 73 | 6c 69 62 2c 23 6c 61 30 |#sprites|lib,#la0|
|00000340| 7d 00 21 73 75 62 73 20 | 7b 5f 69 6e 69 74 63 6f |}.!subs |{_initco|
|00000350| 70 6c 69 73 74 32 2c 30 | 2c 30 7d 00 21 61 72 67 |plist2,0|,0}.!arg|
|00000360| 73 20 7b 23 77 6f 72 64 | 2c 23 77 6f 72 64 2c 23 |s {#word|,#word,#|
|00000370| 77 6f 72 64 2c 23 6c 6f | 6e 67 2c 23 77 6f 72 64 |word,#lo|ng,#word|
|00000380| 2c 23 77 6f 72 64 2c 23 | 77 6f 72 64 7d 00 21 6c |,#word,#|word}.!l|
|00000390| 69 62 73 20 7b 23 64 69 | 73 70 6c 61 79 6c 69 62 |ibs {#di|splaylib|
|000003a0| 2c 24 31 33 38 30 2c 23 | 73 70 72 69 74 65 73 6c |,$1380,#|spritesl|
|000003b0| 69 62 2c 23 6c 61 30 7d | 00 21 73 75 62 73 20 7b |ib,#la0}|.!subs {|
|000003c0| 5f 69 6e 69 74 63 6f 70 | 6c 69 73 74 2c 30 2c 30 |_initcop|list,0,0|
|000003d0| 7d 00 21 6e 61 6d 65 20 | 7b 22 49 6e 69 74 43 6f |}.!name |{"InitCo|
|000003e0| 70 4c 69 73 74 22 2c 22 | 43 6f 70 4c 69 73 74 23 |pList","|CopList#|
|000003f0| 5b 2c 74 79 70 65 5d 7c | 5b 2c 79 70 6f 73 2c 68 |[,type]||[,ypos,h|
|00000400| 65 69 67 68 74 2c 74 79 | 70 65 2c 73 70 72 69 74 |eight,ty|pe,sprit|
|00000410| 65 73 2c 63 6f 6c 6f 72 | 73 2c 6e 75 6d 63 75 73 |es,color|s,numcus|
|00000420| 74 6f 6d 73 5d 22 7d 00 | 00 21 61 73 74 61 74 65 |toms]"}.|.!astate|
|00000430| 6d 65 6e 74 00 21 72 65 | 70 61 72 67 73 20 7b 30 |ment.!re|pargs {0|
|00000440| 2c 31 2c 23 70 75 73 68 | 7c 23 77 6f 72 64 7d 00 |,1,#push||#word}.|
|00000450| 21 6c 69 62 73 20 7b 23 | 64 69 73 70 6c 61 79 6c |!libs {#|displayl|
|00000460| 69 62 2c 23 62 61 30 7d | 00 21 73 75 62 73 20 7b |ib,#ba0}|.!subs {|
|00000470| 5f 63 72 65 61 74 65 64 | 69 73 70 6c 61 79 2c 31 |_created|isplay,1|
|00000480| 2c 30 7d 00 21 6e 61 6d | 65 20 7b 22 43 72 65 61 |,0}.!nam|e {"Crea|
|00000490| 74 65 44 69 73 70 6c 61 | 79 22 2c 22 43 6f 70 4c |teDispla|y","CopL|
|000004a0| 69 73 74 23 5b 2c 43 6f | 70 4c 69 73 74 23 2e 2e |ist#[,Co|pList#..|
|000004b0| 5d 22 7d 00 00 21 61 73 | 74 61 74 65 6d 65 6e 74 |]"}..!as|tatement|
|000004c0| 00 3b 00 21 61 72 67 73 | 20 7b 23 77 6f 72 64 2c |.;.!args| {#word,|
|000004d0| 23 77 6f 72 64 7d 00 21 | 6c 69 62 73 20 7b 23 64 |#word}.!|libs {#d|
|000004e0| 69 73 70 6c 61 79 6c 69 | 62 2c 24 31 33 38 30 2c |isplayli|b,$1380,|
|000004f0| 23 62 69 74 6d 61 70 6c | 69 62 2c 24 31 30 38 31 |#bitmapl|ib,$1081|
|00000500| 7d 00 21 73 75 62 73 20 | 7b 5f 64 69 73 70 6c 61 |}.!subs |{_displa|
|00000510| 79 62 6d 61 70 2c 5f 63 | 68 65 63 6b 63 6f 70 6c |ybmap,_c|heckcopl|
|00000520| 69 73 74 2c 30 7d 00 21 | 61 72 67 73 20 7b 23 77 |ist,0}.!|args {#w|
|00000530| 6f 72 64 2c 23 77 6f 72 | 64 2c 23 71 75 69 63 6b |ord,#wor|d,#quick|
|00000540| 2c 23 77 6f 72 64 7d 00 | 21 6c 69 62 73 20 7b 23 |,#word}.|!libs {#|
|00000550| 64 69 73 70 6c 61 79 6c | 69 62 2c 24 31 33 38 30 |displayl|ib,$1380|
|00000560| 2c 23 62 69 74 6d 61 70 | 6c 69 62 2c 24 31 30 38 |,#bitmap|lib,$108|
|00000570| 31 7d 00 21 73 75 62 73 | 20 7b 5f 64 69 73 70 6c |1}.!subs| {_displ|
|00000580| 61 79 62 6d 61 70 32 2c | 5f 63 68 65 63 6b 63 6f |aybmap2,|_checkco|
|00000590| 70 6c 69 73 74 2c 30 7d | 00 3b 00 21 61 72 67 73 |plist,0}|.;.!args|
|000005a0| 20 7b 23 77 6f 72 64 2c | 23 77 6f 72 64 2c 23 77 | {#word,|#word,#w|
|000005b0| 6f 72 64 7d 00 21 6c 69 | 62 73 20 7b 23 64 69 73 |ord}.!li|bs {#dis|
|000005c0| 70 6c 61 79 6c 69 62 2c | 24 31 33 38 30 2c 23 62 |playlib,|$1380,#b|
|000005d0| 69 74 6d 61 70 6c 69 62 | 2c 24 31 30 38 31 2c 23 |itmaplib|,$1081,#|
|000005e0| 62 69 74 6d 61 70 6c 69 | 62 2c 24 31 31 38 32 7d |bitmapli|b,$1182}|
|000005f0| 00 21 73 75 62 73 20 7b | 5f 64 69 73 70 6c 61 79 |.!subs {|_display|
|00000600| 64 62 6d 61 70 2c 5f 63 | 68 65 63 6b 63 6f 70 6c |dbmap,_c|heckcopl|
|00000610| 69 73 74 2c 30 7d 00 21 | 61 72 67 73 20 7b 23 77 |ist,0}.!|args {#w|
|00000620| 6f 72 64 2c 23 77 6f 72 | 64 2c 23 71 75 69 63 6b |ord,#wor|d,#quick|
|00000630| 2c 23 77 6f 72 64 2c 23 | 77 6f 72 64 2c 23 71 75 |,#word,#|word,#qu|
|00000640| 69 63 6b 2c 23 77 6f 72 | 64 7d 00 21 6c 69 62 73 |ick,#wor|d}.!libs|
|00000650| 20 7b 23 64 69 73 70 6c | 61 79 6c 69 62 2c 24 31 | {#displ|aylib,$1|
|00000660| 33 38 30 2c 23 62 69 74 | 6d 61 70 6c 69 62 2c 24 |380,#bit|maplib,$|
|00000670| 31 30 38 31 2c 23 62 69 | 74 6d 61 70 6c 69 62 2c |1081,#bi|tmaplib,|
|00000680| 24 31 31 38 34 7d 00 21 | 73 75 62 73 20 7b 5f 64 |$1184}.!|subs {_d|
|00000690| 69 73 70 6c 61 79 64 62 | 6d 61 70 32 2c 5f 63 68 |isplaydb|map2,_ch|
|000006a0| 65 63 6b 63 6f 70 6c 69 | 73 74 2c 30 7d 00 3b 00 |eckcopli|st,0}.;.|
|000006b0| 21 6e 61 6d 65 20 7b 22 | 44 69 73 70 6c 61 79 42 |!name {"|DisplayB|
|000006c0| 69 74 4d 61 70 22 2c 22 | 43 6f 70 4c 69 73 74 23 |itMap","|CopList#|
|000006d0| 2c 62 6d 61 70 5b 2c 78 | 2c 79 5d 20 5b 2c 62 6d |,bmap[,x|,y] [,bm|
|000006e0| 61 70 5b 2c 78 2c 79 5d | 5d 22 7d 00 00 21 61 73 |ap[,x,y]|]"}..!as|
|000006f0| 74 61 74 65 6d 65 6e 74 | 00 21 61 72 67 73 20 7b |tatement|.!args {|
|00000700| 23 77 6f 72 64 2c 23 77 | 6f 72 64 2c 23 71 75 69 |#word,#w|ord,#qui|
|00000710| 63 6b 2c 23 77 6f 72 64 | 2c 23 77 6f 72 64 7d 00 |ck,#word|,#word}.|
|00000720| 21 6c 69 62 73 20 7b 23 | 73 70 72 69 74 65 73 6c |!libs {#|spritesl|
|00000730| 69 62 2c 24 31 31 38 31 | 2c 23 64 69 73 70 6c 61 |ib,$1181|,#displa|
|00000740| 79 6c 69 62 2c 24 31 33 | 38 30 7d 00 21 73 75 62 |ylib,$13|80}.!sub|
|00000750| 73 20 7b 5f 64 69 73 70 | 6c 61 79 73 70 72 69 74 |s {_disp|laysprit|
|00000760| 65 2c 5f 63 68 65 63 6b | 63 6f 70 6c 69 73 74 2c |e,_check|coplist,|
|00000770| 30 7d 00 21 6e 61 6d 65 | 20 7b 22 44 69 73 70 6c |0}.!name| {"Displ|
|00000780| 61 79 53 70 72 69 74 65 | 22 2c 22 43 6f 70 4c 69 |aySprite|","CopLi|
|00000790| 73 74 23 2c 53 70 72 69 | 74 65 23 2c 58 2c 59 2c |st#,Spri|te#,X,Y,|
|000007a0| 53 70 72 69 74 65 20 43 | 68 61 6e 6e 65 6c 22 7d |Sprite C|hannel"}|
|000007b0| 00 00 21 61 73 74 61 74 | 65 6d 65 6e 74 00 21 61 |..!astat|ement.!a|
|000007c0| 72 67 73 20 7b 23 77 6f | 72 64 2c 23 77 6f 72 64 |rgs {#wo|rd,#word|
|000007d0| 7d 00 21 6c 69 62 73 20 | 7b 23 64 69 73 70 6c 61 |}.!libs |{#displa|
|000007e0| 79 6c 69 62 2c 24 31 33 | 38 30 2c 23 70 61 6c 65 |ylib,$13|80,#pale|
|000007f0| 74 74 65 6c 69 62 2c 24 | 31 30 38 31 7d 00 21 73 |ttelib,$|1081}.!s|
|00000800| 75 62 73 20 7b 5f 64 69 | 73 70 6c 61 79 70 61 6c |ubs {_di|splaypal|
|00000810| 65 74 74 65 2c 5f 63 68 | 65 63 6b 63 6f 70 6c 69 |ette,_ch|eckcopli|
|00000820| 73 74 2c 30 7d 00 21 61 | 72 67 73 20 7b 23 77 6f |st,0}.!a|rgs {#wo|
|00000830| 72 64 2c 23 77 6f 72 64 | 2c 23 77 6f 72 64 7d 00 |rd,#word|,#word}.|
|00000840| 21 6c 69 62 73 20 7b 23 | 64 69 73 70 6c 61 79 6c |!libs {#|displayl|
|00000850| 69 62 2c 24 31 33 38 30 | 2c 23 70 61 6c 65 74 74 |ib,$1380|,#palett|
|00000860| 65 6c 69 62 2c 24 31 30 | 38 31 7d 00 21 73 75 62 |elib,$10|81}.!sub|
|00000870| 73 20 7b 5f 64 69 73 70 | 6c 61 79 70 61 6c 65 74 |s {_disp|laypalet|
|00000880| 74 65 32 2c 5f 63 68 65 | 63 6b 63 6f 70 6c 69 73 |te2,_che|ckcoplis|
|00000890| 74 2c 30 7d 00 21 6e 61 | 6d 65 20 7b 22 44 69 73 |t,0}.!na|me {"Dis|
|000008a0| 70 6c 61 79 50 61 6c 65 | 74 74 65 22 2c 22 43 6f |playPale|tte","Co|
|000008b0| 70 4c 69 73 74 23 2c 50 | 61 6c 65 74 74 65 23 20 |pList#,P|alette# |
|000008c0| 5b 2c 63 6f 6c 6f 72 6f | 66 66 73 65 74 5d 22 7d |[,coloro|ffset]"}|
|000008d0| 00 00 21 61 73 74 61 74 | 65 6d 65 6e 74 00 21 61 |..!astat|ement.!a|
|000008e0| 72 67 73 20 7b 23 77 6f | 72 64 2c 23 6c 6f 6e 67 |rgs {#wo|rd,#long|
|000008f0| 2c 23 6c 6f 6e 67 2c 23 | 6c 6f 6e 67 7d 00 21 6c |,#long,#|long}.!l|
|00000900| 69 62 73 20 7b 23 64 69 | 73 70 6c 61 79 6c 69 62 |ibs {#di|splaylib|
|00000910| 2c 24 31 33 38 30 7d 00 | 21 73 75 62 73 20 7b 5f |,$1380}.|!subs {_|
|00000920| 64 6f 62 70 6c 63 6f 6e | 73 2c 5f 63 68 65 63 6b |dobplcon|s,_check|
|00000930| 63 6f 70 6c 69 73 74 2c | 30 7d 00 21 6e 61 6d 65 |coplist,|0}.!name|
|00000940| 20 7b 22 44 69 73 70 6c | 61 79 43 6f 6e 74 72 6f | {"Displ|ayContro|
|00000950| 6c 73 22 2c 22 43 6f 70 | 4c 69 73 74 23 2c 42 50 |ls","Cop|List#,BP|
|00000960| 4c 43 4f 4e 32 2c 42 50 | 4c 43 4f 4e 33 2c 42 50 |LCON2,BP|LCON3,BP|
|00000970| 4c 43 4f 4e 34 22 7d 00 | 00 21 61 73 74 61 74 65 |LCON4"}.|.!astate|
|00000980| 6d 65 6e 74 00 21 61 72 | 67 73 20 7b 23 77 6f 72 |ment.!ar|gs {#wor|
|00000990| 64 2c 23 77 6f 72 64 2c | 23 77 6f 72 64 2c 23 77 |d,#word,|#word,#w|
|000009a0| 6f 72 64 2c 23 77 6f 72 | 64 2c 23 77 6f 72 64 7d |ord,#wor|d,#word}|
|000009b0| 00 21 6c 69 62 73 20 7b | 23 64 69 73 70 6c 61 79 |.!libs {|#display|
|000009c0| 6c 69 62 2c 24 31 33 38 | 30 7d 00 21 73 75 62 73 |lib,$138|0}.!subs|
|000009d0| 20 7b 5f 64 6f 61 64 6a | 75 73 74 2c 5f 63 68 65 | {_doadj|ust,_che|
|000009e0| 63 6b 63 6f 70 6c 69 73 | 74 2c 30 7d 00 21 6e 61 |ckcoplis|t,0}.!na|
|000009f0| 6d 65 20 7b 22 44 69 73 | 70 6c 61 79 41 64 6a 75 |me {"Dis|playAdju|
|00000a00| 73 74 22 2c 22 43 6f 70 | 4c 69 73 74 23 2c 66 65 |st","Cop|List#,fe|
|00000a10| 74 63 68 77 69 64 2c 64 | 64 66 73 74 72 74 2c 64 |tchwid,d|dfstrt,d|
|00000a20| 64 66 73 74 6f 70 2c 64 | 69 77 73 74 72 74 2c 64 |dfstop,d|iwstrt,d|
|00000a30| 69 77 73 74 6f 70 22 7d | 00 00 21 61 73 74 61 74 |iwstop"}|..!astat|
|00000a40| 65 6d 65 6e 74 00 21 61 | 72 67 73 20 7b 23 77 6f |ement.!a|rgs {#wo|
|00000a50| 72 64 2c 23 77 6f 72 64 | 2c 23 77 6f 72 64 2c 23 |rd,#word|,#word,#|
|00000a60| 77 6f 72 64 2c 23 77 6f | 72 64 2c 23 77 6f 72 64 |word,#wo|rd,#word|
|00000a70| 2c 77 6f 72 64 7d 00 21 | 6c 69 62 73 20 7b 23 64 |,word}.!|libs {#d|
|00000a80| 69 73 70 6c 61 79 6c 69 | 62 2c 24 31 33 38 30 2c |isplayli|b,$1380,|
|00000a90| 23 70 61 6c 65 74 74 65 | 6c 69 62 2c 24 31 30 38 |#palette|lib,$108|
|00000aa0| 33 7d 00 21 73 75 62 73 | 20 7b 5f 63 75 73 74 6f |3}.!subs| {_custo|
|00000ab0| 6d 63 6f 6c 73 32 2c 5f | 63 68 65 63 6b 63 6f 70 |mcols2,_|checkcop|
|00000ac0| 6c 69 73 74 2c 30 7d 00 | 21 61 72 67 73 20 7b 23 |list,0}.|!args {#|
|00000ad0| 77 6f 72 64 2c 23 77 6f | 72 64 2c 23 77 6f 72 64 |word,#wo|rd,#word|
|00000ae0| 2c 23 77 6f 72 64 2c 23 | 77 6f 72 64 2c 23 77 6f |,#word,#|word,#wo|
|00000af0| 72 64 7d 00 21 6c 69 62 | 73 20 7b 23 64 69 73 70 |rd}.!lib|s {#disp|
|00000b00| 6c 61 79 6c 69 62 2c 24 | 31 33 38 30 2c 23 70 61 |laylib,$|1380,#pa|
|00000b10| 6c 65 74 74 65 6c 69 62 | 2c 24 31 30 38 33 7d 00 |lettelib|,$1083}.|
|00000b20| 21 73 75 62 73 20 7b 5f | 63 75 73 74 6f 6d 63 6f |!subs {_|customco|
|00000b30| 6c 73 2c 5f 63 68 65 63 | 6b 63 6f 70 6c 69 73 74 |ls,_chec|kcoplist|
|00000b40| 2c 30 7d 00 21 6e 61 6d | 65 20 7b 22 43 75 73 74 |,0}.!nam|e {"Cust|
|00000b50| 6f 6d 43 6f 6c 6f 72 73 | 22 2c 22 43 6f 70 4c 69 |omColors|","CopLi|
|00000b60| 73 74 23 2c 43 43 4f 66 | 66 73 65 74 2c 59 50 6f |st#,CCOf|fset,YPo|
|00000b70| 73 2c 50 61 6c 65 74 74 | 65 2c 73 74 61 72 74 63 |s,Palett|e,startc|
|00000b80| 6f 6c 2c 6e 75 6d 63 6f | 6c 73 5b 2c 74 68 72 75 |ol,numco|ls[,thru|
|00000b90| 32 35 36 66 6c 61 67 5d | 20 20 3b 65 63 73 3d 32 |256flag]| ;ecs=2|
|00000ba0| 2b 6e 20 61 67 61 3d 32 | 2b 6e 2b 6e 2b 6e 2f 31 |+n aga=2|+n+n+n/1|
|00000bb0| 36 22 7d 00 00 21 61 73 | 74 61 74 65 6d 65 6e 74 |6"}..!as|tatement|
|00000bc0| 00 21 61 72 67 73 20 7b | 23 77 6f 72 64 2c 23 77 |.!args {|#word,#w|
|00000bd0| 6f 72 64 2c 23 77 6f 72 | 64 2c 23 73 74 72 69 6e |ord,#wor|d,#strin|
|00000be0| 67 7d 00 21 6c 69 62 73 | 20 7b 23 64 69 73 70 6c |g}.!libs| {#displ|
|00000bf0| 61 79 6c 69 62 2c 24 31 | 33 38 30 7d 00 21 73 75 |aylib,$1|380}.!su|
|00000c00| 62 73 20 7b 5f 63 75 73 | 74 6f 6d 73 74 72 69 6e |bs {_cus|tomstrin|
|00000c10| 67 2c 5f 63 68 65 63 6b | 63 6f 70 6c 69 73 74 2c |g,_check|coplist,|
|00000c20| 30 7d 00 21 6e 61 6d 65 | 20 7b 22 43 75 73 74 6f |0}.!name| {"Custo|
|00000c30| 6d 53 74 72 69 6e 67 22 | 2c 22 43 6f 70 4c 69 73 |mString"|,"CopLis|
|00000c40| 74 23 2c 43 43 4f 66 66 | 73 65 74 2c 59 50 6f 73 |t#,CCOff|set,YPos|
|00000c50| 2c 43 6f 70 70 65 72 24 | 20 20 3b 32 2b 6e 20 7b |,Copper$| ;2+n {|
|00000c60| 6e 3d 6c 65 6e 28 61 24 | 29 2f 34 7d 22 7d 00 00 |n=len(a$|)/4}"}..|
|00000c70| 21 61 73 74 61 74 65 6d | 65 6e 74 20 20 20 20 20 |!astatem|ent |
|00000c80| 20 20 20 20 20 20 20 20 | 20 20 3b 63 72 65 61 74 | | ;creat|
|00000c90| 65 20 64 6f 75 62 6c 65 | 20 73 63 61 6e 20 6d 6f |e double| scan mo|
|00000ca0| 64 75 6c 6f 00 21 61 72 | 67 73 20 7b 23 77 6f 72 |dulo.!ar|gs {#wor|
|00000cb0| 64 2c 23 77 6f 72 64 7d | 00 21 6c 69 62 73 20 7b |d,#word}|.!libs {|
|00000cc0| 23 64 69 73 70 6c 61 79 | 6c 69 62 2c 24 31 33 38 |#display|lib,$138|
|00000cd0| 30 7d 00 21 73 75 62 73 | 20 7b 5f 64 69 73 70 6c |0}.!subs| {_displ|
|00000ce0| 61 79 64 62 6c 73 63 61 | 6e 30 2c 5f 63 68 65 63 |aydblsca|n0,_chec|
|00000cf0| 6b 63 6f 70 6c 69 73 74 | 2c 30 7d 00 21 61 72 67 |kcoplist|,0}.!arg|
|00000d00| 73 20 7b 23 77 6f 72 64 | 2c 23 77 6f 72 64 2c 23 |s {#word|,#word,#|
|00000d10| 77 6f 72 64 7d 00 21 6c | 69 62 73 20 7b 23 64 69 |word}.!l|ibs {#di|
|00000d20| 73 70 6c 61 79 6c 69 62 | 2c 24 31 33 38 30 7d 00 |splaylib|,$1380}.|
|00000d30| 21 73 75 62 73 20 7b 5f | 64 69 73 70 6c 61 79 64 |!subs {_|displayd|
|00000d40| 62 6c 73 63 61 6e 2c 5f | 63 68 65 63 6b 63 6f 70 |blscan,_|checkcop|
|00000d50| 6c 69 73 74 2c 30 7d 00 | 21 6e 61 6d 65 20 7b 22 |list,0}.|!name {"|
|00000d60| 44 69 73 70 6c 61 79 44 | 62 6c 53 63 61 6e 22 2c |DisplayD|blScan",|
|00000d70| 22 43 6f 70 4c 69 73 74 | 23 2c 4d 6f 64 65 5b 2c |"CopList|#,Mode[,|
|00000d80| 63 6f 70 6f 66 66 73 65 | 74 5d 20 20 20 3b 32 22 |copoffse|t] ;2"|
|00000d90| 7d 00 00 21 61 73 74 61 | 74 65 6d 65 6e 74 00 21 |}..!asta|tement.!|
|00000da0| 61 72 67 73 20 7b 23 77 | 6f 72 64 2c 23 77 6f 72 |args {#w|ord,#wor|
|00000db0| 64 2c 23 77 6f 72 64 7d | 00 21 6c 69 62 73 20 7b |d,#word}|.!libs {|
|00000dc0| 23 64 69 73 70 6c 61 79 | 6c 69 62 2c 24 31 33 38 |#display|lib,$138|
|00000dd0| 30 2c 23 70 61 6c 65 74 | 74 65 6c 69 62 2c 24 31 |0,#palet|telib,$1|
|00000de0| 32 38 32 7d 00 21 73 75 | 62 73 20 7b 5f 64 69 73 |282}.!su|bs {_dis|
|00000df0| 70 6c 61 79 72 61 69 6e | 62 6f 77 30 2c 5f 63 68 |playrain|bow0,_ch|
|00000e00| 65 63 6b 63 6f 70 6c 69 | 73 74 2c 30 7d 00 21 61 |eckcopli|st,0}.!a|
|00000e10| 72 67 73 20 7b 23 77 6f | 72 64 2c 23 77 6f 72 64 |rgs {#wo|rd,#word|
|00000e20| 2c 23 77 6f 72 64 2c 23 | 77 6f 72 64 7d 00 21 6c |,#word,#|word}.!l|
|00000e30| 69 62 73 20 7b 23 64 69 | 73 70 6c 61 79 6c 69 62 |ibs {#di|splaylib|
|00000e40| 2c 24 31 33 38 30 2c 23 | 70 61 6c 65 74 74 65 6c |,$1380,#|palettel|
|00000e50| 69 62 2c 24 31 32 38 32 | 7d 00 21 73 75 62 73 20 |ib,$1282|}.!subs |
|00000e60| 7b 5f 64 69 73 70 6c 61 | 79 72 61 69 6e 62 6f 77 |{_displa|yrainbow|
|00000e70| 2c 5f 63 68 65 63 6b 63 | 6f 70 6c 69 73 74 2c 30 |,_checkc|oplist,0|
|00000e80| 7d 00 21 6e 61 6d 65 20 | 7b 22 44 69 73 70 6c 61 |}.!name |{"Displa|
|00000e90| 79 52 61 69 6e 62 6f 77 | 22 2c 22 43 6f 70 4c 69 |yRainbow|","CopLi|
|00000ea0| 73 74 23 2c 52 65 67 69 | 73 74 65 72 2c 50 61 6c |st#,Regi|ster,Pal|
|00000eb0| 65 74 74 65 5b 2c 63 6f | 70 6f 66 66 73 65 74 5d |ette[,co|poffset]|
|00000ec0| 20 3b 65 63 73 3d 31 20 | 61 67 61 3d 34 22 7d 00 | ;ecs=1 |aga=4"}.|
|00000ed0| 00 21 61 73 74 61 74 65 | 6d 65 6e 74 00 21 61 72 |.!astate|ment.!ar|
|00000ee0| 67 73 20 7b 23 77 6f 72 | 64 2c 23 77 6f 72 64 2c |gs {#wor|d,#word,|
|00000ef0| 23 77 6f 72 64 2c 23 77 | 6f 72 64 2c 23 77 6f 72 |#word,#w|ord,#wor|
|00000f00| 64 2c 23 77 6f 72 64 7d | 00 21 6c 69 62 73 20 7b |d,#word}|.!libs {|
|00000f10| 23 64 69 73 70 6c 61 79 | 6c 69 62 2c 24 31 33 38 |#display|lib,$138|
|00000f20| 30 7d 00 21 73 75 62 73 | 20 7b 5f 64 69 73 70 6c |0}.!subs| {_displ|
|00000f30| 61 79 72 67 62 30 2c 5f | 63 68 65 63 6b 63 6f 70 |ayrgb0,_|checkcop|
|00000f40| 6c 69 73 74 2c 30 7d 00 | 21 61 72 67 73 20 7b 23 |list,0}.|!args {#|
|00000f50| 77 6f 72 64 2c 23 77 6f | 72 64 2c 23 77 6f 72 64 |word,#wo|rd,#word|
|00000f60| 2c 23 77 6f 72 64 2c 23 | 77 6f 72 64 2c 23 77 6f |,#word,#|word,#wo|
|00000f70| 72 64 2c 23 77 6f 72 64 | 7d 00 21 6c 69 62 73 20 |rd,#word|}.!libs |
|00000f80| 7b 23 64 69 73 70 6c 61 | 79 6c 69 62 2c 24 31 33 |{#displa|ylib,$13|
|00000f90| 38 30 7d 00 21 73 75 62 | 73 20 7b 5f 64 69 73 70 |80}.!sub|s {_disp|
|00000fa0| 6c 61 79 72 67 62 2c 5f | 63 68 65 63 6b 63 6f 70 |layrgb,_|checkcop|
|00000fb0| 6c 69 73 74 2c 30 7d 00 | 21 6e 61 6d 65 20 7b 22 |list,0}.|!name {"|
|00000fc0| 44 69 73 70 6c 61 79 52 | 47 42 22 2c 22 43 6f 70 |DisplayR|GB","Cop|
|00000fd0| 4c 69 73 74 23 2c 52 65 | 67 69 73 74 65 72 2c 6c |List#,Re|gister,l|
|00000fe0| 69 6e 65 2c 72 2c 67 2c | 62 5b 2c 63 6f 70 6f 66 |ine,r,g,|b[,copof|
|00000ff0| 66 73 65 74 5d 20 3b 65 | 63 73 3d 31 20 61 67 61 |fset] ;e|cs=1 aga|
|00001000| 3d 34 22 7d 00 00 21 61 | 73 74 61 74 65 6d 65 6e |=4"}..!a|statemen|
|00001010| 74 00 21 61 72 67 73 20 | 7b 23 77 6f 72 64 2c 23 |t.!args |{#word,#|
|00001020| 77 6f 72 64 2c 23 73 74 | 72 69 6e 67 7d 00 21 6c |word,#st|ring}.!l|
|00001030| 69 62 73 20 7b 23 64 69 | 73 70 6c 61 79 6c 69 62 |ibs {#di|splaylib|
|00001040| 2c 24 31 33 38 30 7d 00 | 21 73 75 62 73 20 7b 5f |,$1380}.|!subs {_|
|00001050| 64 69 73 70 6c 61 79 75 | 73 65 72 30 2c 5f 63 68 |displayu|ser0,_ch|
|00001060| 65 63 6b 63 6f 70 6c 69 | 73 74 2c 30 7d 00 21 61 |eckcopli|st,0}.!a|
|00001070| 72 67 73 20 7b 23 77 6f | 72 64 2c 23 77 6f 72 64 |rgs {#wo|rd,#word|
|00001080| 2c 23 73 74 72 69 6e 67 | 2c 23 77 6f 72 64 7d 00 |,#string|,#word}.|
|00001090| 21 6c 69 62 73 20 7b 23 | 64 69 73 70 6c 61 79 6c |!libs {#|displayl|
|000010a0| 69 62 2c 24 31 33 38 30 | 7d 00 21 73 75 62 73 20 |ib,$1380|}.!subs |
|000010b0| 7b 5f 64 69 73 70 6c 61 | 79 75 73 65 72 2c 5f 63 |{_displa|yuser,_c|
|000010c0| 68 65 63 6b 63 6f 70 6c | 69 73 74 2c 30 7d 00 21 |heckcopl|ist,0}.!|
|000010d0| 6e 61 6d 65 20 7b 22 44 | 69 73 70 6c 61 79 55 73 |name {"D|isplayUs|
|000010e0| 65 72 22 2c 22 43 6f 70 | 4c 69 73 74 23 2c 4c 69 |er","Cop|List#,Li|
|000010f0| 6e 65 2c 53 74 72 69 6e | 67 5b 2c 4f 66 66 73 65 |ne,Strin|g[,Offse|
|00001100| 74 5d 22 7d 00 00 21 61 | 73 74 61 74 65 6d 65 6e |t]"}..!a|statemen|
|00001110| 74 00 21 61 72 67 73 20 | 7b 23 77 6f 72 64 2c 23 |t.!args |{#word,#|
|00001120| 6c 6f 6e 67 2c 23 6c 6f | 6e 67 7d 00 21 6c 69 62 |long,#lo|ng}.!lib|
|00001130| 73 20 7b 23 64 69 73 70 | 6c 61 79 6c 69 62 2c 24 |s {#disp|laylib,$|
|00001140| 31 33 38 30 7d 00 21 73 | 75 62 73 20 7b 5f 64 69 |1380}.!s|ubs {_di|
|00001150| 73 70 6c 61 79 73 63 72 | 6f 6c 6c 30 2c 5f 63 68 |splayscr|oll0,_ch|
|00001160| 65 63 6b 63 6f 70 6c 69 | 73 74 2c 30 7d 00 21 61 |eckcopli|st,0}.!a|
|00001170| 72 67 73 20 7b 23 77 6f | 72 64 2c 23 6c 6f 6e 67 |rgs {#wo|rd,#long|
|00001180| 2c 23 6c 6f 6e 67 2c 23 | 77 6f 72 64 7d 00 21 6c |,#long,#|word}.!l|
|00001190| 69 62 73 20 7b 23 64 69 | 73 70 6c 61 79 6c 69 62 |ibs {#di|splaylib|
|000011a0| 2c 24 31 33 38 30 7d 00 | 21 73 75 62 73 20 7b 5f |,$1380}.|!subs {_|
|000011b0| 64 69 73 70 6c 61 79 73 | 63 72 6f 6c 6c 2c 5f 63 |displays|croll,_c|
|000011c0| 68 65 63 6b 63 6f 70 6c | 69 73 74 2c 30 7d 00 21 |heckcopl|ist,0}.!|
|000011d0| 6e 61 6d 65 20 7b 22 44 | 69 73 70 6c 61 79 53 63 |name {"D|isplaySc|
|000011e0| 72 6f 6c 6c 22 2c 22 43 | 6f 70 4c 69 73 74 23 2c |roll","C|opList#,|
|000011f0| 26 78 70 6f 73 2e 71 28 | 6e 29 2c 26 78 70 6f 73 |&xpos.q(|n),&xpos|
|00001200| 2e 71 28 6e 29 5b 2c 4f | 66 66 73 65 74 5d 20 20 |.q(n)[,O|ffset] |
|00001210| 20 3b 33 22 7d 00 00 5f | 6c 6f 61 64 3a 21 6e 75 | ;3"}.._|load:!nu|
|00001220| 6c 6c 73 75 62 7b 30 2c | 30 2c 30 7d 00 5f 73 61 |llsub{0,|0,0}._sa|
|00001230| 76 65 3a 21 6e 75 6c 6c | 73 75 62 7b 30 2c 30 2c |ve:!null|sub{0,0,|
|00001240| 30 7d 00 5f 75 73 65 3a | 21 6e 75 6c 6c 73 75 62 |0}._use:|!nullsub|
|00001250| 7b 30 2c 30 2c 30 7d 00 | 5f 66 72 65 65 3a 21 6e |{0,0,0}.|_free:!n|
|00001260| 75 6c 6c 73 75 62 7b 5f | 66 72 65 65 63 6f 70 6c |ullsub{_|freecopl|
|00001270| 69 73 74 2c 30 2c 30 7d | 00 00 69 6e 69 74 3a 21 |ist,0,0}|..init:!|
|00001280| 6e 75 6c 6c 73 75 62 7b | 5f 63 6f 64 65 69 6e 69 |nullsub{|_codeini|
|00001290| 74 2c 30 2c 30 7d 00 66 | 69 6e 69 74 3a 21 6e 75 |t,0,0}.f|init:!nu|
|000012a0| 6c 6c 73 75 62 7b 5f 63 | 6f 64 65 66 69 6e 69 74 |llsub{_c|odefinit|
|000012b0| 2c 30 2c 30 7d 00 00 21 | 6c 69 62 66 69 6e 7b 5f |,0,0}..!|libfin{_|
|000012c0| 74 6f 6b 65 2c 5f 6c 6f | 61 64 2c 5f 73 61 76 65 |toke,_lo|ad,_save|
|000012d0| 2c 5f 75 73 65 2c 5f 66 | 72 65 65 2c 31 30 2c 37 |,_use,_f|ree,10,7|
|000012e0| 7d 20 3b 31 32 38 20 62 | 79 74 65 73 20 66 6f 72 |} ;128 b|ytes for|
|000012f0| 20 61 20 6d 79 63 6f 70 | 20 65 6e 74 72 79 00 00 | a mycop| entry..|
|00001300| 3b 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |;-------|--------|
|00001310| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001320| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001330| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001340| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001350| 2d 2d 2d 00 3b 20 6d 61 | 63 72 6f 73 20 63 6f 6e |---.; ma|cros con|
|00001360| 73 74 61 6e 74 73 20 61 | 6e 64 20 73 74 72 75 63 |stants a|nd struc|
|00001370| 74 75 72 65 73 00 3b 2d | 2d 2d 2d 2d 2d 2d 2d 2d |tures.;-|--------|
|00001380| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001390| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000013a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000013b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000013c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 00 00 80 0d 20 42 6c |--------|-.... Bl|
|000013d0| 69 74 57 61 69 74 3a 80 | 57 2e 62 23 36 2c 32 28 |itWait:.|W.b#6,2(|
|000013e0| 61 32 29 3a 62 77 60 40 | 3a 80 57 2e 62 23 36 2c |a2):bw`@|:.W.b#6,|
|000013f0| 32 28 61 32 29 3a 80 50 | 20 62 77 60 40 3a 80 02 |2(a2):.P| bw`@:..|
|00001400| 20 80 0d 00 00 23 73 74 | 64 63 6f 70 73 3d 31 30 | ....#st|dcops=10|
|00001410| 2b 38 2b 36 2b 33 2b 33 | 2b 31 2b 31 2b 32 2b 31 |+8+6+3+3|+1+1+2+1|
|00001420| 2b 33 2b 36 20 3b 73 70 | 72 69 74 65 63 6c 75 64 |+3+6 ;sp|riteclud|
|00001430| 67 65 2b 77 61 69 74 2b | 63 74 72 6c 2b 63 6f 6e |ge+wait+|ctrl+con|
|00001440| 73 2b 73 68 6f 77 73 2b | 77 61 69 74 65 6f 6c 2b |s+shows+|waiteol+|
|00001450| 64 6d 61 6f 6e 2b 77 61 | 69 74 2b 64 6d 61 6f 66 |dmaon+wa|it+dmaof|
|00001460| 66 2b 6a 75 6d 70 00 00 | 3b 72 65 73 3d 20 68 61 |f+jump..|;res= ha|
|00001470| 6d 2f 65 68 62 2f 64 70 | 66 2f 73 6d 6f 6f 74 68 |m/ehb/dp|f/smooth|
|00001480| 20 7c 20 72 65 73 2f 66 | 65 74 63 68 20 7c 20 77 | | res/f|etch | w|
|00001490| 69 64 74 68 20 7c 20 62 | 69 74 70 6c 61 6e 65 73 |idth | b|itplanes|
|000014a0| 00 00 3b 63 6f 70 6c 69 | 73 74 20 3d 20 63 6f 70 |..;copli|st = cop|
|000014b0| 63 74 72 6c 20 7c 20 62 | 70 73 20 7c 20 73 70 72 |ctrl | b|ps | spr|
|000014c0| 69 74 65 73 20 7c 20 63 | 6f 6c 73 20 7c 20 77 61 |ites | c|ols | wa|
|000014d0| 69 74 20 7c 20 64 6d 61 | 6f 6e 20 7c 20 63 75 73 |it | dma|on | cus|
|000014e0| 74 6f 6d 20 7c 20 77 61 | 69 74 20 7c 20 64 6d 61 |tom | wa|it | dma|
|000014f0| 6f 66 66 00 00 80 01 20 | 2e 63 6f 70 63 74 72 6c |off.... |.copctrl|
|00001500| 20 66 6d 6f 64 65 2e 6c | 3a 64 69 77 73 74 72 74 | fmode.l|:diwstrt|
|00001510| 3a 64 69 77 73 74 6f 70 | 3a 64 64 66 73 74 72 74 |:diwstop|:ddfstrt|
|00001520| 3a 64 64 66 73 74 6f 70 | 3a 62 70 63 6f 6e 30 3a |:ddfstop|:bpcon0:|
|00001530| 80 02 20 80 01 00 00 80 | 01 20 2e 74 61 62 6c 65 |.. .....|. .table|
|00001540| 20 6d 61 78 62 70 2e 77 | 3a 66 65 74 63 68 77 69 | maxbp.w|:fetchwi|
|00001550| 64 3a 78 6d 61 73 6b 3a | 78 72 73 68 69 66 74 3a |d:xmask:|xrshift:|
|00001560| 61 64 6a 77 69 64 3a 61 | 64 6a 73 74 6f 70 3a 63 |adjwid:a|djstop:c|
|00001570| 74 72 6c 2e 63 6f 70 63 | 74 72 6c 3a 80 02 20 80 |trl.copc|trl:.. .|
|00001580| 01 00 00 80 01 20 2e 6d | 79 63 6f 70 00 20 20 73 |..... .m|ycop. s|
|00001590| 69 7a 65 2e 6c 20 20 20 | 20 20 20 20 20 20 20 20 |ize.l | |
|000015a0| 20 3b 30 20 3d 20 6e 6f | 74 20 69 6e 69 74 69 61 | ;0 = no|t initia|
|000015b0| 6c 69 73 65 64 00 20 20 | 63 6f 70 70 6f 73 2e 6c |lised. |coppos.l|
|000015c0| 20 20 20 20 20 20 20 20 | 20 20 3b 6c 6f 63 61 74 | | ;locat|
|000015d0| 69 6f 6e 20 69 6e 20 63 | 68 69 70 6d 65 6d 00 20 |ion in c|hipmem. |
|000015e0| 20 63 6f 6c 6f 72 73 2e | 6c 00 20 20 73 70 72 69 | colors.|l. spri|
|000015f0| 74 65 73 2e 6c 00 20 20 | 62 70 63 6f 6e 73 2e 6c |tes.l. |bpcons.l|
|00001600| 00 20 20 62 70 6c 61 6e | 65 73 2e 6c 00 20 20 64 |. bplan|es.l. d|
|00001610| 6f 74 2e 6c 00 20 20 63 | 75 73 74 6f 6d 73 2e 6c |ot.l. c|ustoms.l|
|00001620| 00 20 20 64 6f 62 2e 6c | 00 20 20 62 6f 74 2e 77 |. dob.l|. bot.w|
|00001630| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001640| 3b 79 70 6f 73 20 6f 66 | 20 6c 61 73 74 20 63 6f |;ypos of| last co|
|00001650| 70 70 65 72 20 62 65 66 | 6f 72 65 20 62 6f 74 74 |pper bef|ore bott|
|00001660| 6f 6d 20 6f 66 20 64 69 | 73 70 6c 61 79 00 20 20 |om of di|splay. |
|00001670| 6e 75 6d 62 70 2e 77 3a | 63 6f 6c 70 6f 6b 65 73 |numbp.w:|colpokes|
|00001680| 2e 77 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 6c |.w | ;l|
|00001690| 69 6d 69 74 73 00 20 20 | 66 65 74 63 68 77 69 64 |imits. |fetchwid|
|000016a0| 2e 77 3a 78 61 6e 64 3a | 78 73 68 69 66 74 20 20 |.w:xand:|xshift |
|000016b0| 20 20 20 20 20 20 3b 66 | 6f 72 20 73 68 6f 77 20 | ;f|or show |
|000016c0| 63 61 6c 63 75 6c 61 74 | 69 6f 6e 73 20 28 33 20 |calculat|ions (3 |
|000016d0| 77 6f 72 64 73 29 00 20 | 20 79 70 6f 73 2e 77 3a |words). | ypos.w:|
|000016e0| 68 65 69 67 68 74 3a 72 | 65 73 00 20 20 6e 75 6d |height:r|es. num|
|000016f0| 73 70 72 69 74 65 73 2e | 77 3a 6e 75 6d 63 6f 6c |sprites.|w:numcol|
|00001700| 73 00 20 20 3b 00 20 20 | 6e 75 6d 63 75 73 74 6f |s. ;. |numcusto|
|00001710| 6d 73 2e 77 3a 63 70 6c | 69 6e 65 00 20 20 3b 00 |ms.w:cpl|ine. ;.|
|00001720| 20 20 78 30 2e 71 3a 78 | 31 2e 71 20 20 20 20 20 | x0.q:x|1.q |
|00001730| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001740| 20 20 20 20 20 20 3b 64 | 69 73 70 6c 61 79 62 69 | ;d|isplaybi|
|00001750| 74 6d 61 70 20 78 20 70 | 6f 73 69 74 69 6f 6e 73 |tmap x p|ositions|
|00001760| 00 20 20 3b 00 20 20 62 | 70 6c 63 6f 6e 33 2e 77 |. ;. b|plcon3.w|
|00001770| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001780| 20 20 20 20 20 20 20 20 | 20 20 20 3b 6d 61 69 6e | | ;main|
|00001790| 20 63 6f 6c 6f 72 20 62 | 61 6e 6b 20 72 65 67 69 | color b|ank regi|
|000017a0| 73 74 65 72 00 20 20 61 | 67 61 2e 77 20 20 20 20 |ster. a|ga.w |
|000017b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000017c0| 20 20 20 20 20 20 20 20 | 20 20 20 3b 32 34 62 69 | | ;24bi|
|000017d0| 74 3d 24 38 30 30 30 20 | 66 65 74 63 68 20 3d 20 |t=$8000 |fetch = |
|000017e0| 24 30 30 2c 24 31 30 2c | 24 32 30 2c 24 33 30 00 |$00,$10,|$20,$30.|
|000017f0| 20 20 72 65 73 73 68 69 | 66 74 2e 77 20 20 20 20 | resshi|ft.w |
|00001800| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001810| 20 20 20 20 20 20 3b 6c | 6f 2c 68 69 2c 73 68 69 | ;l|o,hi,shi|
|00001820| 20 3d 20 32 20 31 20 30 | 00 20 20 73 65 74 75 70 | = 2 1 0|. setup|
|00001830| 2e 77 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.w | |
|00001840| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3b | | ;|
|00001850| 6c 69 6e 65 73 20 74 61 | 6b 65 6e 20 66 6f 72 20 |lines ta|ken for |
|00001860| 73 65 74 75 70 00 20 20 | 63 62 6c 6f 77 2e 77 20 |setup. |cblow.w |
|00001870| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001880| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 69 66 20 | | ;if |
|00001890| 63 75 73 74 6f 6d 20 67 | 6f 65 73 20 62 65 6c 6f |custom g|oes belo|
|000018a0| 77 20 32 35 36 00 20 20 | 73 66 65 74 63 68 2e 77 |w 256. |sfetch.w|
|000018b0| 3a 73 70 72 65 73 3a 73 | 70 69 66 3a 73 70 77 69 |:spres:s|pif:spwi|
|000018c0| 64 3a 73 73 70 77 69 64 | 20 20 20 20 3b 73 70 72 |d:sspwid| ;spr|
|000018d0| 69 74 65 20 6d 6f 64 65 | 20 66 6f 72 20 64 69 73 |ite mode| for dis|
|000018e0| 70 6c 61 79 00 20 20 68 | 61 6d 38 2e 77 20 20 20 |play. h|am8.w |
|000018f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001900| 20 20 20 20 20 20 20 20 | 20 20 20 3b 73 74 75 70 | | ;stup|
|00001910| 69 64 20 66 75 63 6b 69 | 6e 67 20 63 6c 75 64 67 |id fucki|ng cludg|
|00001920| 65 00 80 02 20 80 01 00 | 00 23 64 6d 61 6f 66 66 |e... ...|.#dmaoff|
|00001930| 3d 24 30 39 36 30 31 32 | 30 20 20 3b 77 61 73 20 |=$096012|0 ;was |
|00001940| 31 32 30 00 23 64 6d 61 | 6f 6e 3d 24 30 39 36 38 |120.#dma|on=$0968|
|00001950| 31 32 30 20 20 20 3b 77 | 61 73 20 38 31 32 30 00 |120 ;w|as 8120.|
|00001960| 00 23 73 70 72 6f 66 66 | 3d 24 30 39 36 30 30 32 |.#sproff|=$096002|
|00001970| 30 20 20 3b 77 61 73 20 | 30 30 32 30 00 23 73 70 |0 ;was |0020.#sp|
|00001980| 72 6f 6e 3d 24 30 39 36 | 38 30 32 30 20 20 20 3b |ron=$096|8020 ;|
|00001990| 77 61 73 20 30 30 32 30 | 00 00 23 77 61 69 74 62 |was 0020|..#waitb|
|000019a0| 68 3d 24 66 66 65 31 66 | 66 66 65 20 20 20 20 20 |h=$ffe1f|ffe |
|000019b0| 20 3b 77 61 73 20 65 31 | 00 23 6e 6f 77 63 6f 70 | ;was e1|.#nowcop|
|000019c0| 3d 24 30 31 66 65 30 30 | 30 30 20 20 20 20 20 20 |=$01fe00|00 |
|000019d0| 3b 24 30 30 30 31 66 66 | 66 65 00 23 63 6f 70 6e |;$0001ff|fe.#copn|
|000019e0| 6f 70 3d 24 30 31 66 65 | 30 30 30 30 00 23 77 61 |op=$01fe|0000.#wa|
|000019f0| 69 74 65 6e 64 3d 24 66 | 66 66 66 66 66 66 65 00 |itend=$f|ffffffe.|
|00001a00| 23 73 74 72 6f 62 65 31 | 3d 24 38 61 30 30 30 31 |#strobe1|=$8a0001|
|00001a10| 00 00 80 0d 20 74 20 7b | 80 2f 2e 74 61 62 6c 65 |.... t {|./.table|
|00001a20| 5c 60 31 7d 28 61 30 29 | 3a 80 02 20 80 0d 00 80 |\`1}(a0)|:.. ....|
|00001a30| 0d 20 63 20 7b 80 2f 2e | 63 6f 70 63 74 72 6c 5c |. c {./.|copctrl\|
|00001a40| 60 31 7d 28 61 31 29 3a | 80 02 20 80 0d 00 80 0d |`1}(a1):|.. .....|
|00001a50| 20 6d 20 7b 80 2f 2e 6d | 79 63 6f 70 5c 60 31 7d | m {./.m|ycop\`1}|
|00001a60| 28 61 33 29 3a 80 02 20 | 80 0d 00 00 3b 2d 2d 2d |(a3):.. |....;---|
|00001a70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001a80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001a90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001aa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001ab0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 00 |--------|-------.|
|00001ac0| 3b 20 6d 61 69 6e 20 69 | 6e 69 74 69 6c 69 73 61 |; main i|nitilisa|
|00001ad0| 74 69 6f 6e 20 63 6f 64 | 65 00 3b 2d 2d 2d 2d 2d |tion cod|e.;-----|
|00001ae0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001af0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001b00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001b10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001b20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 00 00 5f |--------|-----.._|
|00001b30| 63 6f 64 65 69 6e 69 74 | 3a 00 20 20 80 7e 2e 6c |codeinit|:. .~.l|
|00001b40| 23 33 32 2c 64 30 3a 80 | 7e 2e 6c 23 36 35 35 33 |#32,d0:.|~.l#6553|
|00001b50| 38 2c 64 31 3a 80 38 20 | 24 63 30 30 32 3a 80 7e |8,d1:.8 |$c002:.~|
|00001b60| 2e 6c 20 64 30 2c 6d 79 | 73 70 72 69 74 65 00 20 |.l d0,my|sprite. |
|00001b70| 20 80 7e 20 64 30 2c 73 | 70 70 2b 36 3a 80 ac 20 | .~ d0,s|pp+6:.. |
|00001b80| 64 30 3a 80 7e 20 64 30 | 2c 73 70 70 2b 32 00 20 |d0:.~ d0|,spp+2. |
|00001b90| 20 80 7e 20 24 64 66 66 | 30 37 63 2c 64 30 3a 80 | .~ $dff|07c,d0:.|
|00001ba0| 42 20 23 32 35 35 2c 64 | 30 3a 80 5c 20 23 32 34 |B #255,d|0:.\ #24|
|00001bb0| 38 2c 64 30 3a 80 48 20 | 69 73 61 67 61 3a 80 5b |8,d0:.H |isaga:.[|
|00001bc0| 20 61 67 61 6d 61 63 3a | 80 94 00 20 20 69 73 61 | agamac:|... isa|
|00001bd0| 67 61 3a 80 7e 23 2d 31 | 2c 61 67 61 6d 61 63 3a |ga:.~#-1|,agamac:|
|00001be0| 80 94 00 00 5f 63 6f 64 | 65 66 69 6e 69 74 3a 00 |...._cod|efinit:.|
|00001bf0| 20 20 80 94 00 00 5f 64 | 6f 61 64 6a 75 73 74 3a | ...._d|oadjust:|
|00001c00| 00 20 20 80 7e 2e 6c 20 | 21 6d 7b 63 6f 70 70 6f |. .~.l |!m{coppo|
|00001c10| 73 7d 2c 61 31 3a 80 40 | 23 38 2c 61 31 20 20 20 |s},a1:.@|#8,a1 |
|00001c20| 3b 31 32 2c 61 31 20 3b | 73 70 72 6f 66 66 2b 77 |;12,a1 ;|sproff+w|
|00001c30| 61 69 74 00 20 20 80 3d | 20 64 31 2c 21 6d 7b 66 |ait. .=| d1,!m{f|
|00001c40| 65 74 63 68 77 69 64 7d | 00 20 20 80 3d 20 64 32 |etchwid}|. .= d2|
|00001c50| 2c 21 63 7b 64 64 66 73 | 74 72 74 2b 32 7d 00 20 |,!c{ddfs|trt+2}. |
|00001c60| 20 80 3d 20 64 33 2c 21 | 63 7b 64 64 66 73 74 6f | .= d3,!|c{ddfsto|
|00001c70| 70 2b 32 7d 00 20 20 80 | 3d 20 64 34 2c 21 63 7b |p+2}. .|= d4,!c{|
|00001c80| 64 69 77 73 74 72 74 2b | 32 7d 00 20 20 80 3d 20 |diwstrt+|2}. .= |
|00001c90| 64 35 2c 21 63 7b 64 69 | 77 73 74 6f 70 2b 32 7d |d5,!c{di|wstop+2}|
|00001ca0| 00 20 20 80 94 00 00 5f | 64 6f 62 70 6c 63 6f 6e |. ...._|dobplcon|
|00001cb0| 73 3a 00 20 20 80 7e 2e | 6c 20 21 6d 7b 62 70 63 |s:. .~.|l !m{bpc|
|00001cc0| 6f 6e 73 7d 2c 61 30 3a | 80 82 2e 6c 20 28 61 30 |ons},a0:|...l (a0|
|00001cd0| 29 2c 64 34 2d 64 36 00 | 20 20 80 73 20 64 31 2c |),d4-d6.| .s d1,|
|00001ce0| 64 34 3a 80 73 20 64 32 | 2c 64 35 3a 80 73 20 64 |d4:.s d2|,d5:.s d|
|00001cf0| 33 2c 64 36 3a 80 73 20 | 64 32 2c 21 6d 7b 62 70 |3,d6:.s |d2,!m{bp|
|00001d00| 6c 63 6f 6e 33 7d 00 20 | 20 80 82 2e 6c 20 64 34 |lcon3}. | ...l d4|
|00001d10| 2d 64 36 2c 28 61 30 29 | 3a 80 94 00 00 63 6f 6c |-d6,(a0)|:....col|
|00001d20| 75 70 3a 80 25 2e 77 20 | 30 2c 32 2c 34 2c 38 2c |up:.%.w |0,2,4,8,|
|00001d30| 31 36 2c 33 32 2c 36 34 | 2c 31 32 38 2c 32 35 36 |16,32,64|,128,256|
|00001d40| 2c 32 35 36 2c 32 35 36 | 2c 32 35 36 2c 32 35 36 |,256,256|,256,256|
|00001d50| 2c 32 35 36 2c 32 35 36 | 2c 32 35 36 00 00 73 6c |,256,256|,256..sl|
|00001d60| 75 70 3a 80 25 20 30 2c | 34 2c 31 32 00 73 68 75 |up:.% 0,|4,12.shu|
|00001d70| 70 3a 80 25 20 32 2c 31 | 2c 30 00 73 77 75 70 3a |p:.% 2,1|,0.swup:|
|00001d80| 80 25 20 38 2c 31 36 2c | 33 32 00 00 61 67 61 66 |.% 8,16,|32..agaf|
|00001d90| 6c 61 67 3a 80 25 20 30 | 00 6d 79 73 70 72 69 74 |lag:.% 0|.mysprit|
|00001da0| 65 3a 80 25 2e 6c 20 30 | 00 61 67 61 6d 61 63 3a |e:.%.l 0|.agamac:|
|00001db0| 80 25 20 30 00 00 5f 69 | 6e 69 74 63 6f 70 6c 69 |.% 0.._i|nitcopli|
|00001dc0| 73 74 32 3a 20 20 20 20 | 20 3b 71 75 69 63 6b 20 |st2: | ;quick |
|00001dd0| 76 65 72 73 69 6f 6e 00 | 20 20 80 7e 2e 6c 20 64 |version.| .~.l d|
|00001de0| 31 2c 64 33 3a 80 7e 23 | 34 34 2c 64 31 3a 80 7e |1,d3:.~#|44,d1:.~|
|00001df0| 20 23 32 35 36 2c 64 32 | 00 20 20 80 7e 20 64 33 | #256,d2|. .~ d3|
|00001e00| 2c 64 35 3a 80 42 23 31 | 35 2c 64 35 3a 80 3d 20 |,d5:.B#1|5,d5:.= |
|00001e10| 64 35 2c 64 35 3a 80 7e | 20 63 6f 6c 75 70 28 70 |d5,d5:.~| colup(p|
|00001e20| 63 2c 64 35 29 2c 64 35 | 00 20 20 80 57 20 23 35 |c,d5),d5|. .W #5|
|00001e30| 2c 64 33 3a 80 48 20 6e | 6f 64 70 66 3a 80 7d 23 |,d3:.H n|odpf:.}#|
|00001e40| 31 2c 64 35 3a 6e 6f 64 | 70 66 00 20 20 80 57 20 |1,d5:nod|pf. .W |
|00001e50| 23 36 2c 64 33 3a 80 48 | 20 6e 6f 65 68 62 3a 80 |#6,d3:.H| noehb:.|
|00001e60| 7e 20 23 33 32 2c 64 35 | 3a 6e 6f 65 68 62 00 20 |~ #32,d5|:noehb. |
|00001e70| 20 80 81 20 23 38 2c 64 | 34 3a 80 7a 20 63 6f 6c | .. #8,d|4:.z col|
|00001e80| 75 70 2b 32 28 70 63 29 | 2c 61 32 00 00 5f 69 6e |up+2(pc)|,a2.._in|
|00001e90| 69 74 63 6f 70 6c 69 73 | 74 3a 00 20 20 3b 00 20 |itcoplis|t:. ;. |
|00001ea0| 20 80 7e 20 28 61 30 29 | 2c 64 30 3a 80 7e 20 64 | .~ (a0)|,d0:.~ d|
|00001eb0| 30 2c 21 6d 7b 73 70 69 | 66 7d 3a 80 3d 20 23 32 |0,!m{spi|f}:.= #2|
|00001ec0| 2c 21 6d 7b 73 70 69 66 | 7d 3a 80 3d 20 64 30 2c |,!m{spif|}:.= d0,|
|00001ed0| 64 30 00 20 20 80 7e 20 | 73 6c 75 70 28 70 63 2c |d0. .~ |slup(pc,|
|00001ee0| 64 30 29 2c 21 6d 7b 73 | 66 65 74 63 68 7d 3a 80 |d0),!m{s|fetch}:.|
|00001ef0| 7e 20 73 68 75 70 28 70 | 63 2c 64 30 29 2c 21 6d |~ shup(p|c,d0),!m|
|00001f00| 7b 73 70 72 65 73 7d 00 | 20 20 80 7e 20 73 77 75 |{spres}.| .~ swu|
|00001f10| 70 28 70 63 2c 64 30 29 | 2c 21 6d 7b 73 70 77 69 |p(pc,d0)|,!m{spwi|
|00001f20| 64 7d 00 20 20 3b 00 20 | 20 80 5b 20 21 6d 7b 68 |d}. ;. | .[ !m{h|
|00001f30| 61 6d 38 7d 3a 80 7e 20 | 64 33 2c 64 36 3a 80 42 |am8}:.~ |d3,d6:.B|
|00001f40| 20 23 24 38 66 2c 64 36 | 3a 80 5c 2e 62 20 23 24 | #$8f,d6|:.\.b #$|
|00001f50| 38 38 2c 64 36 3a 80 50 | 20 6e 6d 65 3a 80 7e 23 |88,d6:.P| nme:.~#|
|00001f60| 2d 31 2c 21 6d 7b 68 61 | 6d 38 7d 3a 6e 6d 65 00 |-1,!m{ha|m8}:nme.|
|00001f70| 20 20 3b 00 20 20 80 82 | 20 64 31 2d 64 35 2c 21 | ;. ..| d1-d5,!|
|00001f80| 6d 7b 79 70 6f 73 7d 3a | 80 7e 20 64 31 2c 21 6d |m{ypos}:|.~ d1,!m|
|00001f90| 7b 62 6f 74 7d 3a 80 59 | 20 5f 66 72 65 65 63 6f |{bot}:.Y| _freeco|
|00001fa0| 70 6c 69 73 74 00 20 20 | 3b 00 63 61 6c 63 63 75 |plist. |;.calccu|
|00001fb0| 73 74 6f 6d 73 3a 00 20 | 20 80 7e 20 2d 28 61 32 |stoms:. | .~ -(a2|
|00001fc0| 29 2c 64 36 3a 80 7e 20 | 64 36 2c 21 6d 7b 6e 75 |),d6:.~ |d6,!m{nu|
|00001fd0| 6d 63 75 73 74 6f 6d 73 | 7d 3a 80 51 20 63 68 65 |mcustoms|}:.Q che|
|00001fe0| 63 6b 61 67 61 00 20 20 | 80 86 20 64 36 3a 80 40 |ckaga. |.. d6:.@|
|00001ff0| 23 31 2c 64 36 3a 80 44 | 23 32 2c 64 36 3a 80 7e |#1,d6:.D|#2,d6:.~|
|00002000| 20 64 36 2c 21 6d 7b 63 | 70 6c 69 6e 65 7d 3a 80 | d6,!m{c|pline}:.|
|00002010| 7d 23 32 2c 64 36 00 20 | 20 80 aa 23 31 2c 64 32 |}#2,d6. | ..#1,d2|
|00002020| 3a 80 84 20 64 32 2c 64 | 36 3a 80 7e 20 64 36 2c |:.. d2,d|6:.~ d6,|
|00002030| 21 6d 7b 6e 75 6d 63 75 | 73 74 6f 6d 73 7d 00 63 |!m{numcu|stoms}.c|
|00002040| 68 65 63 6b 61 67 61 3a | 00 20 20 80 7e 2e 6c 20 |heckaga:|. .~.l |
|00002050| 64 33 2c 64 30 3a 80 7d | 23 35 2c 64 30 3a 80 7d |d3,d0:.}|#5,d0:.}|
|00002060| 2e 6c 23 31 2c 64 30 3a | 80 42 20 23 24 38 30 63 |.l#1,d0:|.B #$80c|
|00002070| 30 2c 64 30 3a 80 7e 20 | 64 30 2c 21 6d 7b 61 67 |0,d0:.~ |d0,!m{ag|
|00002080| 61 7d 00 20 20 80 51 20 | 63 61 6c 63 73 69 7a 65 |a}. .Q |calcsize|
|00002090| 3a 80 b0 20 64 35 3a 80 | 48 20 63 61 6c 63 73 69 |:.. d5:.|H calcsi|
|000020a0| 7a 65 00 20 20 80 7e 20 | 64 35 2c 64 37 3a 80 aa |ze. .~ |d5,d7:..|
|000020b0| 23 31 2c 64 37 3a 80 7d | 23 35 2c 64 37 3a 80 40 |#1,d7:.}|#5,d7:.@|
|000020c0| 23 31 2c 64 37 3a 80 3d | 20 64 37 2c 64 37 3a 80 |#1,d7:.=| d7,d7:.|
|000020d0| 3d 20 64 35 2c 64 35 3a | 80 3d 20 64 37 2c 64 35 |= d5,d5:|.= d7,d5|
|000020e0| 00 63 61 6c 63 73 69 7a | 65 3a 00 20 20 80 7e 20 |.calcsiz|e:. .~ |
|000020f0| 64 35 2c 21 6d 7b 63 6f | 6c 70 6f 6b 65 73 7d 3a |d5,!m{co|lpokes}:|
|00002100| 80 42 23 31 35 2c 64 33 | 3a 80 7e 20 64 33 2c 21 |.B#15,d3|:.~ d3,!|
|00002110| 6d 7b 6e 75 6d 62 70 7d | 3a 80 3d 20 64 33 2c 64 |m{numbp}|:.= d3,d|
|00002120| 33 00 20 20 80 81 23 30 | 2c 64 30 3a 80 7e 20 64 |3. ..#0|,d0:.~ d|
|00002130| 33 2c 64 30 3a 80 44 23 | 32 2c 64 34 3a 80 3d 20 |3,d0:.D#|2,d4:.= |
|00002140| 64 34 2c 64 30 3a 80 3d | 20 64 35 2c 64 30 3a 80 |d4,d0:.=| d5,d0:.|
|00002150| 3d 20 64 36 2c 64 30 00 | 20 20 80 3d 20 23 73 74 |= d6,d0.| .= #st|
|00002160| 64 63 6f 70 73 2c 64 30 | 3a 80 44 2e 6c 23 32 2c |dcops,d0|:.D.l#2,|
|00002170| 64 30 3a 80 7e 2e 6c 20 | 64 30 2c 21 6d 7b 73 69 |d0:.~.l |d0,!m{si|
|00002180| 7a 65 7d 3a 80 81 23 32 | 2c 64 31 3a 80 38 24 63 |ze}:..#2|,d1:.8$c|
|00002190| 30 30 32 00 20 20 80 7e | 2e 6c 20 64 30 2c 21 6d |002. .~|.l d0,!m|
|000021a0| 7b 63 6f 70 70 6f 73 7d | 3a 80 7e 2e 6c 20 64 30 |{coppos}|:.~.l d0|
|000021b0| 2c 61 31 3a 80 7e 20 21 | 6d 7b 72 65 73 7d 2c 64 |,a1:.~ !|m{res},d|
|000021c0| 30 00 66 69 72 73 74 77 | 61 69 74 3a 00 20 20 80 |0.firstw|ait:. .|
|000021d0| 7e 2e 6c 20 23 63 6f 70 | 6e 6f 70 2c 64 37 3a 80 |~.l #cop|nop,d7:.|
|000021e0| 7e 2e 6c 20 64 37 2c 28 | 61 31 29 2b 3a 80 7e 2e |~.l d7,(|a1)+:.~.|
|000021f0| 6c 20 64 37 2c 28 61 31 | 29 2b 00 63 74 72 6c 31 |l d7,(a1|)+.ctrl1|
|00002200| 3a 00 20 20 80 7a 20 74 | 61 62 6c 65 28 70 63 29 |:. .z t|able(pc)|
|00002210| 2c 61 30 3a 80 7e 20 64 | 30 2c 64 31 3a 80 42 20 |,a0:.~ d|0,d1:.B |
|00002220| 23 24 33 30 30 2c 64 31 | 3a 80 7e 2e 62 20 21 6d |#$300,d1|:.~.b !m|
|00002230| 7b 61 67 61 2b 31 7d 2c | 64 31 00 20 20 80 3d 20 |{aga+1},|d1. .= |
|00002240| 64 31 2c 61 30 3a 80 7d | 23 38 2c 64 31 3a 80 81 |d1,a0:.}|#8,d1:..|
|00002250| 23 32 2c 64 32 3a 80 a7 | 20 64 31 2c 64 32 3a 80 |#2,d2:..| d1,d2:.|
|00002260| 7e 20 64 32 2c 21 6d 7b | 72 65 73 73 68 69 66 74 |~ d2,!m{|resshift|
|00002270| 7d 00 20 20 3b 00 20 20 | 80 82 2e 6c 20 21 74 7b |}. ;. |...l !t{|
|00002280| 63 74 72 6c 7d 2c 64 32 | 2d 64 37 3a 80 8a 20 21 |ctrl},d2|-d7:.. !|
|00002290| 6d 7b 73 66 65 74 63 68 | 7d 2c 64 32 3a 80 82 2e |m{sfetch|},d2:...|
|000022a0| 6c 20 64 32 2d 64 37 2c | 28 61 31 29 20 20 20 3b |l d2-d7,|(a1) ;|
|000022b0| 63 6f 70 79 20 63 74 72 | 6c 00 20 20 3b 00 20 20 |copy ctr|l. ;. |
|000022c0| 80 82 20 21 74 7b 66 65 | 74 63 68 77 69 64 7d 2c |.. !t{fe|tchwid},|
|000022d0| 64 31 2d 64 33 3a 80 82 | 20 64 31 2d 64 33 2c 21 |d1-d3:..| d1-d3,!|
|000022e0| 6d 7b 66 65 74 63 68 77 | 69 64 7d 20 20 20 20 20 |m{fetchw|id} |
|000022f0| 20 20 20 20 20 20 20 3b | 63 6f 6e 73 74 61 6e 74 | ;|constant|
|00002300| 73 00 20 20 3b 00 20 20 | 80 82 20 21 74 7b 61 64 |s. ;. |.. !t{ad|
|00002310| 6a 77 69 64 7d 2c 64 31 | 2d 64 32 3a 80 57 20 23 |jwid},d1|-d2:.W #|
|00002320| 34 2c 64 30 3a 80 48 20 | 6e 6f 74 73 63 00 20 20 |4,d0:.H |notsc. |
|00002330| 80 3d 20 64 31 2c 21 6d | 7b 66 65 74 63 68 77 69 |.= d1,!m|{fetchwi|
|00002340| 64 7d 3a 80 a7 20 64 32 | 2c 21 63 7b 64 64 66 73 |d}:.. d2|,!c{ddfs|
|00002350| 74 72 74 2b 32 7d 3a 6e | 6f 74 73 63 00 20 20 3b |trt+2}:n|otsc. ;|
|00002360| 00 20 20 80 7e 21 6d 7b | 6e 75 6d 62 70 7d 2c 64 |. .~!m{|numbp},d|
|00002370| 31 3a 80 5c 21 74 7b 6d | 61 78 62 70 7d 2c 64 31 |1:.\!t{m|axbp},d1|
|00002380| 3a 80 4a 20 6d 61 78 62 | 70 65 72 72 3a 80 3d 20 |:.J maxb|perr:.= |
|00002390| 64 31 2c 64 31 00 20 20 | 80 7a 20 62 70 62 28 70 |d1,d1. |.z bpb(p|
|000023a0| 63 29 2c 61 32 3a 80 7e | 20 30 28 61 32 2c 64 31 |c),a2:.~| 0(a2,d1|
|000023b0| 29 2c 64 31 20 20 20 20 | 20 20 20 20 20 20 20 20 |),d1 | |
|000023c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000023d0| 20 20 20 3b 62 70 63 6f | 6e 30 00 20 20 80 57 20 | ;bpco|n0. .W |
|000023e0| 23 37 2c 64 30 3a 80 48 | 20 6e 6f 74 68 61 6d 3a |#7,d0:.H| notham:|
|000023f0| 80 56 23 31 31 2c 64 31 | 3a 6e 6f 74 68 61 6d 00 |.V#11,d1|:notham.|
|00002400| 20 20 80 57 20 23 35 2c | 64 30 3a 80 48 20 6e 6f | .W #5,|d0:.H no|
|00002410| 74 64 70 66 3a 80 56 23 | 31 30 2c 64 31 3a 6e 6f |tdpf:.V#|10,d1:no|
|00002420| 74 64 70 66 3a 80 8a 20 | 64 31 2c 21 63 7b 62 70 |tdpf:.. |d1,!c{bp|
|00002430| 63 6f 6e 30 2b 32 7d 00 | 20 20 80 7a 20 32 34 28 |con0+2}.| .z 24(|
|00002440| 61 31 29 2c 61 31 3a 80 | 7e 2e 6c 20 23 63 6f 70 |a1),a1:.|~.l #cop|
|00002450| 6e 6f 70 2c 64 37 00 00 | 63 6f 6c 73 3a 00 20 20 |nop,d7..|cols:. |
|00002460| 80 7e 2e 6c 20 61 31 2c | 21 6d 7b 63 6f 6c 6f 72 |.~.l a1,|!m{color|
|00002470| 73 7d 3a 80 7e 20 21 6d | 7b 63 6f 6c 70 6f 6b 65 |s}:.~ !m|{colpoke|
|00002480| 73 7d 2c 64 31 3a 80 48 | 20 73 70 72 69 74 65 73 |s},d1:.H| sprites|
|00002490| 3a 80 aa 23 31 2c 64 31 | 00 20 20 6e 78 63 6f 6c |:..#1,d1|. nxcol|
|000024a0| 3a 80 7e 2e 6c 20 64 37 | 2c 28 61 31 29 2b 3a 80 |:.~.l d7|,(a1)+:.|
|000024b0| 6f 20 64 31 2c 6e 78 63 | 6f 6c 00 00 73 70 72 69 |o d1,nxc|ol..spri|
|000024c0| 74 65 73 3a 00 20 20 80 | 7e 2e 6c 20 61 31 2c 21 |tes:. .|~.l a1,!|
|000024d0| 6d 7b 73 70 72 69 74 65 | 73 7d 3a 80 7e 20 21 6d |m{sprite|s}:.~ !m|
|000024e0| 7b 6e 75 6d 73 70 72 69 | 74 65 73 7d 2c 64 31 3a |{numspri|tes},d1:|
|000024f0| 80 48 20 63 74 72 6c 32 | 3a 80 aa 23 31 2c 64 31 |.H ctrl2|:..#1,d1|
|00002500| 3a 80 81 23 34 2c 64 32 | 00 20 20 80 ac 20 64 32 |:..#4,d2|. .. d2|
|00002510| 3a 80 82 2e 6c 20 73 70 | 70 28 70 63 29 2c 64 33 |:...l sp|p(pc),d3|
|00002520| 2d 64 36 3a 6e 78 73 70 | 72 69 3a 80 82 2e 6c 20 |-d6:nxsp|ri:...l |
|00002530| 64 33 2d 64 36 2c 28 61 | 31 29 3a 80 7a 31 36 28 |d3-d6,(a|1):.z16(|
|00002540| 61 31 29 2c 61 31 00 20 | 20 80 3d 2e 6c 20 64 32 |a1),a1. | .=.l d2|
|00002550| 2c 64 33 3a 80 3d 2e 6c | 20 64 32 2c 64 34 3a 80 |,d3:.=.l| d2,d4:.|
|00002560| 3d 2e 6c 20 64 32 2c 64 | 33 3a 80 3d 2e 6c 20 64 |=.l d2,d|3:.=.l d|
|00002570| 32 2c 64 34 3a 80 3d 2e | 6c 20 64 32 2c 64 35 3a |2,d4:.=.|l d2,d5:|
|00002580| 80 3d 2e 6c 20 64 32 2c | 64 36 00 20 20 80 6f 20 |.=.l d2,|d6. .o |
|00002590| 64 31 2c 6e 78 73 70 72 | 69 20 20 20 20 20 3b 3a |d1,nxspr|i ;:|
|000025a0| 4d 4f 56 45 2e 6c 20 23 | 73 70 72 6f 6e 2c 28 61 |MOVE.l #|spron,(a|
|000025b0| 31 29 2b 00 00 63 74 72 | 6c 32 00 20 20 80 7e 2e |1)+..ctr|l2. .~.|
|000025c0| 6c 61 31 2c 21 6d 7b 62 | 70 63 6f 6e 73 7d 00 20 |la1,!m{b|pcons}. |
|000025d0| 20 80 82 2e 6c 62 63 70 | 28 70 63 29 2c 64 31 2d | ...lbcp|(pc),d1-|
|000025e0| 64 36 3a 80 57 23 36 2c | 64 30 3a 80 48 20 6e 6f |d6:.W#6,|d0:.H no|
|000025f0| 74 65 68 62 3a 80 55 20 | 23 39 2c 64 31 3a 6e 6f |tehb:.U |#9,d1:no|
|00002600| 74 65 68 62 00 20 20 80 | 42 23 24 63 30 30 2c 64 |tehb. .|B#$c00,d|
|00002610| 30 3a 80 7d 23 34 2c 64 | 30 3a 80 8a 20 64 30 2c |0:.}#4,d|0:.. d0,|
|00002620| 64 32 3a 80 82 2e 6c 64 | 31 2d 64 36 2c 28 61 31 |d2:...ld|1-d6,(a1|
|00002630| 29 3a 80 3d 23 32 34 2c | 61 31 3a 80 7e 20 64 32 |):.=#24,|a1:.~ d2|
|00002640| 2c 21 6d 7b 62 70 6c 63 | 6f 6e 33 7d 00 20 20 80 |,!m{bplc|on3}. .|
|00002650| 7e 20 21 6d 7b 73 70 77 | 69 64 7d 2c 64 31 3a 80 |~ !m{spw|id},d1:.|
|00002660| 7d 20 23 36 2c 64 30 3a | 80 aa 23 31 2c 64 30 3a |} #6,d0:|..#1,d0:|
|00002670| 80 4c 20 6b 6f 3a 80 7d | 20 64 30 2c 64 31 3a 6b |.L ko:.}| d0,d1:k|
|00002680| 6f 3a 80 7e 20 64 31 2c | 21 6d 7b 73 73 70 77 69 |o:.~ d1,|!m{sspwi|
|00002690| 64 7d 00 62 70 73 3a 00 | 20 20 80 7e 2e 6c 20 61 |d}.bps:.| .~.l a|
|000026a0| 31 2c 21 6d 7b 62 70 6c | 61 6e 65 73 7d 3a 80 7e |1,!m{bpl|anes}:.~|
|000026b0| 2e 6c 20 23 24 65 30 30 | 30 30 30 2c 64 30 3a 80 |.l #$e00|000,d0:.|
|000026c0| 7e 20 21 6d 7b 6e 75 6d | 62 70 7d 2c 64 31 3a 80 |~ !m{num|bp},d1:.|
|000026d0| 48 20 64 6f 74 00 20 20 | 80 3d 20 64 31 2c 64 31 |H dot. |.= d1,d1|
|000026e0| 3a 80 aa 23 31 2c 64 31 | 3a 80 81 23 32 2c 64 32 |:..#1,d1|:..#2,d2|
|000026f0| 3a 80 ac 20 64 32 00 20 | 20 6e 78 62 70 3a 80 7e |:.. d2. | nxbp:.~|
|00002700| 2e 6c 20 64 30 2c 28 61 | 31 29 2b 3a 80 3d 2e 6c |.l d0,(a|1)+:.=.l|
|00002710| 20 64 32 2c 64 30 3a 80 | 6f 20 64 31 2c 6e 78 62 | d2,d0:.|o d1,nxb|
|00002720| 70 00 64 6f 74 3a 00 20 | 20 80 7e 2e 6c 20 61 31 |p.dot:. | .~.l a1|
|00002730| 2c 64 30 3a 80 a7 2e 6c | 20 21 6d 7b 63 6f 70 70 |,d0:...l| !m{copp|
|00002740| 6f 73 7d 2c 64 30 3a 80 | 72 20 23 35 35 2a 34 2b |os},d0:.|r #55*4+|
|00002750| 32 2c 64 30 3a 80 40 23 | 33 2c 64 30 3a 80 7e 20 |2,d0:.@#|3,d0:.~ |
|00002760| 64 30 2c 21 6d 7b 73 65 | 74 75 70 7d 20 3b 77 61 |d0,!m{se|tup} ;wa|
|00002770| 73 20 32 00 20 20 80 7e | 2e 6c 20 61 31 2c 21 6d |s 2. .~|.l a1,!m|
|00002780| 7b 64 6f 74 7d 3a 80 7e | 2e 6c 20 64 37 2c 28 61 |{dot}:.~|.l d7,(a|
|00002790| 31 29 2b 3a 80 7e 2e 6c | 20 64 37 2c 28 61 31 29 |1)+:.~.l| d7,(a1)|
|000027a0| 2b 3a 80 7e 2e 6c 20 23 | 64 6d 61 6f 6e 2c 28 61 |+:.~.l #|dmaon,(a|
|000027b0| 31 29 2b 00 63 75 73 74 | 6f 6d 73 3a 00 20 20 80 |1)+.cust|oms:. .|
|000027c0| 7e 2e 6c 20 61 31 2c 21 | 6d 7b 63 75 73 74 6f 6d |~.l a1,!|m{custom|
|000027d0| 73 7d 3a 80 7e 20 21 6d | 7b 63 70 6c 69 6e 65 7d |s}:.~ !m|{cpline}|
|000027e0| 2c 64 32 3a 80 50 20 6c | 69 6e 6f 00 20 20 80 7e |,d2:.P l|ino. .~|
|000027f0| 21 6d 7b 6e 75 6d 63 75 | 73 74 6f 6d 73 7d 2c 64 |!m{numcu|stoms},d|
|00002800| 31 3a 80 48 20 64 6f 62 | 3a 80 aa 23 31 2c 64 31 |1:.H dob|:..#1,d1|
|00002810| 3a 6e 78 63 75 73 3a 80 | 7e 2e 6c 20 64 37 2c 28 |:nxcus:.|~.l d7,(|
|00002820| 61 31 29 2b 3a 80 6f 20 | 64 31 2c 6e 78 63 75 73 |a1)+:.o |d1,nxcus|
|00002830| 3a 80 58 20 64 6f 62 00 | 6c 69 6e 6f 3a 00 20 20 |:.X dob.|lino:. |
|00002840| 80 7d 23 32 2c 64 32 3a | 80 aa 23 32 2c 64 32 00 |.}#2,d2:|..#2,d2.|
|00002850| 20 20 80 7e 2e 6c 20 23 | 6e 6f 77 63 6f 70 2c 64 | .~.l #|nowcop,d|
|00002860| 35 3a 80 7e 20 21 6d 7b | 79 70 6f 73 7d 2c 64 30 |5:.~ !m{|ypos},d0|
|00002870| 3a 80 aa 23 31 2c 64 30 | 3a 80 7e 20 21 6d 7b 68 |:..#1,d0|:.~ !m{h|
|00002880| 65 69 67 68 74 7d 2c 64 | 31 3a 80 aa 23 32 2c 64 |eight},d|1:..#2,d|
|00002890| 31 00 6e 78 6c 69 6e 6f | 3a 00 20 20 80 7e 2e 62 |1.nxlino|:. .~.b|
|000028a0| 20 64 30 2c 28 61 31 29 | 2b 3a 80 7e 2e 62 23 24 | d0,(a1)|+:.~.b#$|
|000028b0| 65 31 2c 28 61 31 29 2b | 3a 80 7e 20 23 24 66 66 |e1,(a1)+|:.~ #$ff|
|000028c0| 66 65 2c 28 61 31 29 2b | 20 20 20 20 20 20 3b 77 |fe,(a1)+| ;w|
|000028d0| 61 69 74 20 65 6f 6c 00 | 20 20 80 7e 20 64 32 2c |ait eol.| .~ d2,|
|000028e0| 64 33 3a 6e 78 63 70 3a | 80 7e 2e 6c 20 64 37 2c |d3:nxcp:|.~.l d7,|
|000028f0| 28 61 31 29 2b 3a 80 6f | 20 64 33 2c 6e 78 63 70 |(a1)+:.o| d3,nxcp|
|00002900| 00 20 20 80 40 23 31 2c | 64 30 3a 80 6f 20 64 31 |. .@#1,|d0:.o d1|
|00002910| 2c 6e 78 6c 69 6e 6f 3a | 80 aa 23 31 2c 64 30 3a |,nxlino:|..#1,d0:|
|00002920| 80 7e 20 64 30 2c 21 6d | 7b 62 6f 74 7d 00 64 6f |.~ d0,!m|{bot}.do|
|00002930| 62 3a 00 20 20 80 7e 2e | 6c 20 61 31 2c 21 6d 7b |b:. .~.|l a1,!m{|
|00002940| 64 6f 62 7d 3a 80 7e 2e | 6c 20 64 37 2c 28 61 31 |dob}:.~.|l d7,(a1|
|00002950| 29 2b 3a 80 7e 2e 6c 20 | 64 37 2c 28 61 31 29 2b |)+:.~.l |d7,(a1)+|
|00002960| 3a 80 7e 2e 6c 20 23 64 | 6d 61 6f 66 66 2c 28 61 |:.~.l #d|maoff,(a|
|00002970| 31 29 2b 00 20 20 80 94 | 00 00 62 70 62 3a 80 25 |1)+. ..|..bpb:.%|
|00002980| 20 30 2c 24 31 30 30 30 | 2c 24 32 30 30 30 2c 24 | 0,$1000|,$2000,$|
|00002990| 33 30 30 30 2c 24 34 30 | 30 30 2c 24 35 30 30 30 |3000,$40|00,$5000|
|000029a0| 2c 24 36 30 30 30 2c 24 | 37 30 30 30 2c 24 31 30 |,$6000,$|7000,$10|
|000029b0| 2c 24 31 30 2c 24 31 30 | 2c 24 31 30 2c 24 31 30 |,$10,$10|,$10,$10|
|000029c0| 2c 24 31 30 2c 24 31 30 | 2c 24 31 30 00 62 63 70 |,$10,$10|,$10.bcp|
|000029d0| 3a 80 25 20 24 31 30 34 | 2c 24 32 32 34 2c 24 31 |:.% $104|,$224,$1|
|000029e0| 30 36 2c 24 63 30 30 2c | 24 31 30 63 2c 24 31 31 |06,$c00,|$10c,$11|
|000029f0| 2c 24 31 30 32 2c 30 2c | 24 31 30 38 2c 30 2c 24 |,$102,0,|$108,0,$|
|00002a00| 31 30 61 2c 30 20 3b 33 | 66 00 73 70 70 3a 80 25 |10a,0 ;3|f.spp:.%|
|00002a10| 20 24 31 34 30 2c 30 2c | 24 31 34 32 2c 30 2c 24 | $140,0,|$142,0,$|
|00002a20| 31 32 30 2c 30 2c 24 31 | 32 32 2c 30 20 20 3b 33 |120,0,$1|22,0 ;3|
|00002a30| 30 30 36 20 34 30 30 36 | 00 00 5f 66 72 65 65 63 |006 4006|.._freec|
|00002a40| 6f 70 6c 69 73 74 3a 00 | 20 20 80 7e 2e 6c 20 21 |oplist:.| .~.l !|
|00002a50| 6d 7b 73 69 7a 65 7d 2c | 64 30 3a 80 48 20 64 75 |m{size},|d0:.H du|
|00002a60| 6e 3a 80 7e 2e 6c 20 21 | 6d 7b 63 6f 70 70 6f 73 |n:.~.l !|m{coppos|
|00002a70| 7d 2c 61 31 3a 80 38 20 | 24 63 30 30 33 00 20 20 |},a1:.8 |$c003. |
|00002a80| 80 81 23 30 2c 64 30 3a | 80 7e 2e 6c 20 64 30 2c |..#0,d0:|.~.l d0,|
|00002a90| 21 6d 7b 73 69 7a 65 7d | 3a 80 7e 2e 77 20 64 30 |!m{size}|:.~.w d0|
|00002aa0| 2c 21 6d 7b 63 70 6c 69 | 6e 65 7d 3a 64 75 6e 3a |,!m{cpli|ne}:dun:|
|00002ab0| 80 94 00 00 74 61 62 6c | 65 3a 20 20 20 3b 36 34 |....tabl|e: ;64|
|00002ac0| 20 62 79 74 65 73 20 65 | 61 63 68 20 6d 61 78 62 | bytes e|ach maxb|
|00002ad0| 70 2e 77 3a 66 65 74 63 | 68 77 69 64 3a 78 6d 61 |p.w:fetc|hwid:xma|
|00002ae0| 73 6b 3a 78 72 73 68 69 | 66 74 3a 61 64 6a 77 69 |sk:xrshi|ft:adjwi|
|00002af0| 64 3a 61 64 6a 73 74 6f | 70 3a 63 74 72 6c 2e 63 |d:adjsto|p:ctrl.c|
|00002b00| 6f 70 63 74 72 6c 00 20 | 20 80 25 20 38 2c 34 30 |opctrl. | .% 8,40|
|00002b10| 2c 24 33 66 2c 35 2c 32 | 2c 30 38 2c 24 31 66 63 |,$3f,5,2|,08,$1fc|
|00002b20| 2c 30 2c 24 38 65 2c 24 | 30 30 38 31 2c 24 39 30 |,0,$8e,$|0081,$90|
|00002b30| 2c 24 37 30 63 31 2c 24 | 39 32 2c 24 33 38 2c 24 |,$70c1,$|92,$38,$|
|00002b40| 39 34 2c 24 64 30 2c 24 | 31 30 30 2c 24 32 30 31 |94,$d0,$|100,$201|
|00002b50| 3a 80 26 20 31 34 00 20 | 20 80 25 20 38 2c 34 30 |:.& 14. | .% 8,40|
|00002b60| 2c 24 37 66 2c 35 2c 34 | 2c 31 36 2c 24 31 66 63 |,$7f,5,4|,16,$1fc|
|00002b70| 2c 31 2c 24 38 65 2c 24 | 30 30 38 31 2c 24 39 30 |,1,$8e,$|0081,$90|
|00002b80| 2c 24 37 30 63 31 2c 24 | 39 32 2c 24 33 38 2c 24 |,$70c1,$|92,$38,$|
|00002b90| 39 34 2c 24 63 30 2c 24 | 31 30 30 2c 24 32 30 31 |94,$c0,$|100,$201|
|00002ba0| 3a 80 26 20 31 34 00 20 | 20 80 25 20 38 2c 34 30 |:.& 14. | .% 8,40|
|00002bb0| 2c 24 37 66 2c 35 2c 34 | 2c 31 36 2c 24 31 66 63 |,$7f,5,4|,16,$1fc|
|00002bc0| 2c 32 2c 24 38 65 2c 24 | 30 30 38 31 2c 24 39 30 |,2,$8e,$|0081,$90|
|00002bd0| 2c 24 37 30 63 31 2c 24 | 39 32 2c 24 33 38 2c 24 |,$70c1,$|92,$38,$|
|00002be0| 39 34 2c 24 63 30 2c 24 | 31 30 30 2c 24 32 30 31 |94,$c0,$|100,$201|
|00002bf0| 3a 80 26 20 31 34 00 20 | 20 80 25 20 38 2c 34 30 |:.& 14. | .% 8,40|
|00002c00| 2c 24 66 66 2c 35 2c 38 | 2c 33 32 2c 24 31 66 63 |,$ff,5,8|,32,$1fc|
|00002c10| 2c 33 2c 24 38 65 2c 24 | 30 30 38 31 2c 24 39 30 |,3,$8e,$|0081,$90|
|00002c20| 2c 24 37 30 63 31 2c 24 | 39 32 2c 24 33 38 2c 24 |,$70c1,$|92,$38,$|
|00002c30| 39 34 2c 24 62 38 2c 24 | 31 30 30 2c 24 32 30 31 |94,$b8,$|100,$201|
|00002c40| 3a 80 26 20 31 34 00 00 | 20 20 80 25 20 38 2c 38 |:.& 14..| .% 8,8|
|00002c50| 30 2c 24 31 66 2c 34 2c | 30 34 2c 30 34 2c 24 31 |0,$1f,4,|04,04,$1|
|00002c60| 66 63 2c 30 2c 24 38 65 | 2c 24 30 30 38 31 2c 24 |fc,0,$8e|,$0081,$|
|00002c70| 39 30 2c 24 37 30 63 31 | 2c 24 39 32 2c 24 33 63 |90,$70c1|,$92,$3c|
|00002c80| 2c 24 39 34 2c 24 64 34 | 2c 24 31 30 30 2c 24 38 |,$94,$d4|,$100,$8|
|00002c90| 32 30 31 3a 80 26 20 31 | 34 00 20 20 80 25 20 38 |201:.& 1|4. .% 8|
|00002ca0| 2c 38 30 2c 24 33 66 2c | 34 2c 30 34 2c 30 38 2c |,80,$3f,|4,04,08,|
|00002cb0| 24 31 66 63 2c 31 2c 24 | 38 65 2c 24 30 30 38 31 |$1fc,1,$|8e,$0081|
|00002cc0| 2c 24 39 30 2c 24 37 30 | 63 31 2c 24 39 32 2c 24 |,$90,$70|c1,$92,$|
|00002cd0| 33 38 2c 24 39 34 2c 24 | 64 30 2c 24 31 30 30 2c |38,$94,$|d0,$100,|
|00002ce0| 24 38 32 30 31 3a 80 26 | 20 31 34 00 20 20 80 25 |$8201:.&| 14. .%|
|00002cf0| 20 38 2c 38 30 2c 24 33 | 66 2c 34 2c 30 34 2c 30 | 8,80,$3|f,4,04,0|
|00002d00| 38 2c 24 31 66 63 2c 32 | 2c 24 38 65 2c 24 30 30 |8,$1fc,2|,$8e,$00|
|00002d10| 38 31 2c 24 39 30 2c 24 | 37 30 63 31 2c 24 39 32 |81,$90,$|70c1,$92|
|00002d20| 2c 24 33 38 2c 24 39 34 | 2c 24 64 30 2c 24 31 30 |,$38,$94|,$d0,$10|
|00002d30| 30 2c 24 38 32 30 31 3a | 80 26 20 31 34 00 20 20 |0,$8201:|.& 14. |
|00002d40| 80 25 20 38 2c 38 30 2c | 24 37 66 2c 34 2c 30 38 |.% 8,80,|$7f,4,08|
|00002d50| 2c 31 36 2c 24 31 66 63 | 2c 33 2c 24 38 65 2c 24 |,16,$1fc|,3,$8e,$|
|00002d60| 30 30 38 31 2c 24 39 30 | 2c 24 37 30 63 31 2c 24 |0081,$90|,$70c1,$|
|00002d70| 39 32 2c 24 33 38 2c 24 | 39 34 2c 24 63 30 2c 24 |92,$38,$|94,$c0,$|
|00002d80| 31 30 30 2c 24 38 32 30 | 31 3a 80 26 20 31 34 00 |100,$820|1:.& 14.|
|00002d90| 00 20 20 80 25 20 38 2c | 31 36 30 2c 24 30 66 2c |. .% 8,|160,$0f,|
|00002da0| 33 2c 30 30 2c 30 30 2c | 24 31 66 63 2c 30 2c 24 |3,00,00,|$1fc,0,$|
|00002db0| 38 65 2c 24 30 30 38 31 | 2c 24 39 30 2c 24 37 30 |8e,$0081|,$90,$70|
|00002dc0| 63 31 2c 24 39 32 2c 24 | 33 65 2c 24 39 34 2c 24 |c1,$92,$|3e,$94,$|
|00002dd0| 64 36 2c 24 31 30 30 2c | 24 32 34 31 3a 80 26 20 |d6,$100,|$241:.& |
|00002de0| 31 34 00 20 20 80 25 20 | 38 2c 31 36 30 2c 24 31 |14. .% |8,160,$1|
|00002df0| 66 2c 33 2c 30 34 2c 30 | 34 2c 24 31 66 63 2c 31 |f,3,04,0|4,$1fc,1|
|00002e00| 2c 24 38 65 2c 24 30 30 | 38 31 2c 24 39 30 2c 24 |,$8e,$00|81,$90,$|
|00002e10| 37 30 63 31 2c 24 39 32 | 2c 24 33 38 2c 24 39 34 |70c1,$92|,$38,$94|
|00002e20| 2c 24 64 30 2c 24 31 30 | 30 2c 24 32 34 31 3a 80 |,$d0,$10|0,$241:.|
|00002e30| 26 20 31 34 00 20 20 80 | 25 20 38 2c 31 36 30 2c |& 14. .|% 8,160,|
|00002e40| 24 31 66 2c 33 2c 30 34 | 2c 30 34 2c 24 31 66 63 |$1f,3,04|,04,$1fc|
|00002e50| 2c 32 2c 24 38 65 2c 24 | 30 30 38 31 2c 24 39 30 |,2,$8e,$|0081,$90|
|00002e60| 2c 24 37 30 63 31 2c 24 | 39 32 2c 24 33 38 2c 24 |,$70c1,$|92,$38,$|
|00002e70| 39 34 2c 24 64 30 2c 24 | 31 30 30 2c 24 32 34 31 |94,$d0,$|100,$241|
|00002e80| 3a 80 26 20 31 34 00 20 | 20 80 25 20 38 2c 31 36 |:.& 14. | .% 8,16|
|00002e90| 30 2c 24 33 66 2c 33 2c | 30 38 2c 30 38 2c 24 31 |0,$3f,3,|08,08,$1|
|00002ea0| 66 63 2c 33 2c 24 38 65 | 2c 24 30 30 38 31 2c 24 |fc,3,$8e|,$0081,$|
|00002eb0| 39 30 2c 24 37 30 63 31 | 2c 24 39 32 2c 24 33 38 |90,$70c1|,$92,$38|
|00002ec0| 2c 24 39 34 2c 24 64 30 | 2c 24 31 30 30 2c 24 32 |,$94,$d0|,$100,$2|
|00002ed0| 34 31 3a 80 26 20 31 34 | 00 00 3b 2d 2d 2d 2d 2d |41:.& 14|..;-----|
|00002ee0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002ef0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002f00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002f10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002f20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 00 3b 20 |--------|-----.; |
|00002f30| 63 72 65 61 74 65 64 69 | 73 70 6c 61 79 20 6c 69 |createdi|splay li|
|00002f40| 6e 6b 73 20 75 70 20 63 | 6f 70 6c 69 73 74 73 20 |nks up c|oplists |
|00002f50| 69 6e 74 6f 20 61 20 64 | 69 73 70 6c 61 79 00 3b |into a d|isplay.;|
|00002f60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002f70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002f80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002f90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002fa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002fb0| 2d 2d 00 00 5f 63 72 65 | 61 74 65 64 69 73 70 6c |--.._cre|atedispl|
|00002fc0| 61 79 3a 00 20 20 80 aa | 23 31 2c 64 37 3a 80 51 |ay:. ..|#1,d7:.Q|
|00002fd0| 20 63 6f 6f 6c 3a 80 94 | 3a 63 6f 6f 6c 3a 80 7e | cool:..|:cool:.~|
|00002fe0| 20 2d 28 61 32 29 2c 64 | 30 00 20 20 80 44 23 37 | -(a2),d|0. .D#7|
|00002ff0| 2c 64 30 3a 80 7a 20 30 | 28 61 30 2c 64 30 29 2c |,d0:.z 0|(a0,d0),|
|00003000| 61 33 3a 80 b0 2e 6c 20 | 28 61 33 29 3a 80 48 20 |a3:...l |(a3):.H |
|00003010| 75 6e 69 6e 69 74 65 72 | 72 3a 80 7e 2e 6c 20 21 |uniniter|r:.~.l !|
|00003020| 6d 7b 63 6f 70 70 6f 73 | 7d 2c 74 6f 70 63 6f 70 |m{coppos|},topcop|
|00003030| 00 20 20 80 7e 20 23 30 | 2c 6c 61 73 74 77 61 69 |. .~ #0|,lastwai|
|00003040| 74 00 6e 78 6c 69 6e 6b | 3a 00 20 20 80 82 20 21 |t.nxlink|:. .. !|
|00003050| 6d 7b 79 70 6f 73 7d 2c | 64 31 2d 64 32 3a 80 a7 |m{ypos},|d1-d2:..|
|00003060| 20 21 6d 7b 73 65 74 75 | 70 7d 2c 64 31 3a 80 7e | !m{setu|p},d1:.~|
|00003070| 2e 6c 20 21 6d 7b 63 6f | 70 70 6f 73 7d 2c 61 31 |.l !m{co|ppos},a1|
|00003080| 00 20 20 80 7e 2e 6c 20 | 23 6e 6f 77 63 6f 70 2c |. .~.l |#nowcop,|
|00003090| 64 30 3a 80 57 20 23 38 | 2c 64 31 3a 80 48 20 6e |d0:.W #8|,d1:.H n|
|000030a0| 6f 6c 6f 3a 80 57 20 23 | 30 2c 6c 61 73 74 77 61 |olo:.W #|0,lastwa|
|000030b0| 69 74 3a 80 50 20 6e 6f | 6c 6f 3a 80 7e 2e 6c 23 |it:.P no|lo:.~.l#|
|000030c0| 77 61 69 74 62 68 2c 64 | 30 00 20 20 6e 6f 6c 6f |waitbh,d|0. nolo|
|000030d0| 3a 80 7e 2e 6c 20 64 30 | 2c 28 61 31 29 2b 3a 80 |:.~.l d0|,(a1)+:.|
|000030e0| 7e 2e 62 64 31 2c 28 61 | 31 29 2b 3a 80 7e 2e 62 |~.bd1,(a|1)+:.~.b|
|000030f0| 23 24 65 31 2c 28 61 31 | 29 2b 3a 80 7e 20 23 24 |#$e1,(a1|)+:.~ #$|
|00003100| 66 66 66 65 2c 28 61 31 | 29 2b 20 3b 62 69 67 77 |fffe,(a1|)+ ;bigw|
|00003110| 61 69 74 20 2b 38 00 20 | 20 80 7e 20 64 31 2c 6c |ait +8. | .~ d1,l|
|00003120| 61 73 74 77 61 69 74 3a | 80 3d 20 21 6d 7b 73 65 |astwait:|.= !m{se|
|00003130| 74 75 70 7d 2c 64 31 3a | 80 7e 2e 6c 20 21 6d 7b |tup},d1:|.~.l !m{|
|00003140| 64 6f 74 7d 2c 61 31 00 | 20 20 80 7e 2e 6c 20 23 |dot},a1.| .~.l #|
|00003150| 6e 6f 77 63 6f 70 2c 64 | 30 3a 80 57 20 23 38 2c |nowcop,d|0:.W #8,|
|00003160| 64 31 3a 80 48 20 6e 6f | 6c 6f 31 3a 80 57 20 23 |d1:.H no|lo1:.W #|
|00003170| 30 2c 6c 61 73 74 77 61 | 69 74 3a 80 50 20 6e 6f |0,lastwa|it:.P no|
|00003180| 6c 6f 31 3a 80 7e 2e 6c | 23 77 61 69 74 62 68 2c |lo1:.~.l|#waitbh,|
|00003190| 64 30 00 20 20 6e 6f 6c | 6f 31 3a 80 7e 2e 6c 20 |d0. nol|o1:.~.l |
|000031a0| 64 30 2c 28 61 31 29 2b | 3a 80 7e 2e 62 64 31 2c |d0,(a1)+|:.~.bd1,|
|000031b0| 28 61 31 29 2b 3a 80 7e | 2e 62 23 24 30 31 2c 28 |(a1)+:.~|.b#$01,(|
|000031c0| 61 31 29 2b 3a 80 7e 20 | 23 24 66 66 66 65 2c 28 |a1)+:.~ |#$fffe,(|
|000031d0| 61 31 29 2b 20 3b 62 69 | 67 77 61 69 74 20 2b 38 |a1)+ ;bi|gwait +8|
|000031e0| 00 20 20 80 3d 20 64 32 | 2c 64 31 3a 80 7e 2e 6c |. .= d2|,d1:.~.l|
|000031f0| 20 21 6d 7b 64 6f 62 7d | 2c 61 31 00 20 20 80 7e | !m{dob}|,a1. .~|
|00003200| 2e 6c 20 23 6e 6f 77 63 | 6f 70 2c 64 30 3a 80 57 |.l #nowc|op,d0:.W|
|00003210| 20 23 38 2c 64 31 3a 80 | 48 20 6e 6f 6c 6f 32 3a | #8,d1:.|H nolo2:|
|00003220| 80 57 20 23 30 2c 21 6d | 7b 62 6f 74 7d 3a 80 50 |.W #0,!m|{bot}:.P|
|00003230| 20 6e 6f 6c 6f 32 3a 80 | 7e 2e 6c 23 77 61 69 74 | nolo2:.|~.l#wait|
|00003240| 62 68 2c 64 30 00 20 20 | 6e 6f 6c 6f 32 3a 80 7e |bh,d0. |nolo2:.~|
|00003250| 2e 6c 20 64 30 2c 28 61 | 31 29 2b 3a 80 7e 2e 62 |.l d0,(a|1)+:.~.b|
|00003260| 64 31 2c 28 61 31 29 2b | 3a 80 7e 2e 62 23 31 2c |d1,(a1)+|:.~.b#1,|
|00003270| 28 61 31 29 2b 3a 80 7e | 20 23 24 66 66 66 65 2c |(a1)+:.~| #$fffe,|
|00003280| 28 61 31 29 2b 20 3b 62 | 69 67 77 61 69 74 20 2b |(a1)+ ;b|igwait +|
|00003290| 38 00 20 20 80 7e 20 64 | 31 2c 6c 61 73 74 77 61 |8. .~ d|1,lastwa|
|000032a0| 69 74 00 64 6f 6c 69 6e | 6b 3a 00 20 20 80 40 23 |it.dolin|k:. .@#|
|000032b0| 34 2c 61 31 3a 80 6f 20 | 64 37 2c 61 6e 6f 74 68 |4,a1:.o |d7,anoth|
|000032c0| 65 72 3a 80 7e 2e 6c 20 | 23 77 61 69 74 65 6e 64 |er:.~.l |#waitend|
|000032d0| 2c 28 61 31 29 00 20 20 | 80 7e 2e 6c 20 74 6f 70 |,(a1). |.~.l top|
|000032e0| 63 6f 70 28 70 63 29 2c | 61 30 3a 3b 4d 4f 56 45 |cop(pc),|a0:;MOVE|
|000032f0| 20 23 24 30 30 32 30 2c | 32 28 61 30 29 00 20 20 | #$0020,|2(a0). |
|00003300| 80 7a 20 24 64 66 66 30 | 30 30 2c 61 32 3a 21 42 |.z $dff0|00,a2:!B|
|00003310| 6c 69 74 57 61 69 74 3a | 80 7e 2e 6c 20 61 30 2c |litWait:|.~.l a0,|
|00003320| 24 38 30 28 61 32 29 3a | 80 38 20 24 63 32 30 35 |$80(a2):|.8 $c205|
|00003330| 3a 80 94 00 61 6e 6f 74 | 68 65 72 3a 00 20 20 80 |:...anot|her:. .|
|00003340| 7e 20 2d 28 61 32 29 2c | 64 30 3a 80 44 23 37 2c |~ -(a2),|d0:.D#7,|
|00003350| 64 30 3a 80 7a 20 30 28 | 61 30 2c 64 30 29 2c 61 |d0:.z 0(|a0,d0),a|
|00003360| 33 3a 80 b0 2e 6c 20 28 | 61 33 29 3a 80 48 20 75 |3:...l (|a3):.H u|
|00003370| 6e 69 6e 69 74 65 72 72 | 00 20 20 80 7e 2e 6c 20 |niniterr|. .~.l |
|00003380| 21 6d 7b 63 6f 70 70 6f | 73 7d 2c 64 30 00 20 20 |!m{coppo|s},d0. |
|00003390| 80 7e 20 23 24 38 36 2c | 28 61 31 29 2b 3a 80 7e |.~ #$86,|(a1)+:.~|
|000033a0| 20 64 30 2c 28 61 31 29 | 2b 3a 80 7e 23 24 38 34 | d0,(a1)|+:.~#$84|
|000033b0| 2c 28 61 31 29 2b 3a 80 | ac 20 64 30 3a 80 7e 20 |,(a1)+:.|. d0:.~ |
|000033c0| 64 30 2c 28 61 31 29 2b | 00 20 20 80 7e 2e 6c 20 |d0,(a1)+|. .~.l |
|000033d0| 23 73 74 72 6f 62 65 31 | 2c 28 61 31 29 3a 80 58 |#strobe1|,(a1):.X|
|000033e0| 20 6e 78 6c 69 6e 6b 00 | 00 6c 61 73 74 77 61 69 | nxlink.|.lastwai|
|000033f0| 74 3a 80 25 20 30 00 74 | 6f 70 63 6f 70 3a 80 25 |t:.% 0.t|opcop:.%|
|00003400| 2e 6c 20 30 00 00 3b 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.l 0..;-|--------|
|00003410| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003420| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003430| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003440| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 00 3b 20 64 69 73 70 |--------|-.; disp|
|00003460| 6c 61 79 20 62 69 74 6d | 61 70 20 72 6f 75 74 69 |lay bitm|ap routi|
|00003470| 6e 65 73 00 3b 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |nes.;---|--------|
|00003480| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003490| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000034a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000034b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000034c0| 2d 2d 2d 2d 2d 2d 2d 00 | 00 5f 64 69 73 70 6c 61 |-------.|._displa|
|000034d0| 79 62 6d 61 70 32 3a 20 | 20 3b 78 2c 79 3d 64 32 |ybmap2: | ;x,y=d2|
|000034e0| 2c 64 33 00 20 20 80 7e | 2e 6c 20 64 32 2c 21 6d |,d3. .~|.l d2,!m|
|000034f0| 7b 78 30 7d 3a 80 7e 2e | 6c 20 64 32 2c 21 6d 7b |{x0}:.~.|l d2,!m{|
|00003500| 78 31 7d 00 20 20 80 7e | 20 21 6d 7b 72 65 73 73 |x1}. .~| !m{ress|
|00003510| 68 69 66 74 7d 2c 64 37 | 3a 80 44 2e 6c 64 37 2c |hift},d7|:.D.ld7,|
|00003520| 64 32 3a 80 ac 20 64 32 | 00 20 20 80 7e 2e 6c 20 |d2:.. d2|. .~.l |
|00003530| 21 6d 7b 62 70 6c 61 6e | 65 73 7d 2c 61 32 3a 80 |!m{bplan|es},a2:.|
|00003540| 7e 20 21 6d 7b 6e 75 6d | 62 70 7d 2c 64 30 3a 80 |~ !m{num|bp},d0:.|
|00003550| 48 20 6e 6f 62 6f 32 3a | 80 aa 23 31 2c 64 30 00 |H nobo2:|..#1,d0.|
|00003560| 20 20 80 82 20 21 6d 7b | 66 65 74 63 68 77 69 64 | .. !m{|fetchwid|
|00003570| 7d 2c 64 35 2d 64 37 3a | 80 7e 20 28 61 30 29 2c |},d5-d7:|.~ (a0),|
|00003580| 64 31 3a 80 a7 20 64 35 | 2c 64 31 3a 80 7e 20 64 |d1:.. d5|,d1:.~ d|
|00003590| 31 2c 2d 36 28 61 32 29 | 3a 80 7e 20 64 31 2c 2d |1,-6(a2)|:.~ d1,-|
|000035a0| 32 28 61 32 29 00 20 20 | 3b 00 20 20 80 7e 20 64 |2(a2). |;. .~ d|
|000035b0| 32 2c 64 34 3a 80 42 20 | 64 36 2c 64 34 3a 80 7e |2,d4:.B |d6,d4:.~|
|000035c0| 20 21 6d 7b 68 61 6d 38 | 7d 2c 64 35 20 20 20 20 | !m{ham8|},d5 |
|000035d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000035e0| 20 20 20 3b 3a 42 53 45 | 54 23 37 2c 64 34 00 20 | ;:BSE|T#7,d4. |
|000035f0| 20 80 3d 20 64 34 2c 64 | 34 3a 80 7a 20 62 70 31 | .= d4,d|4:.z bp1|
|00003600| 28 70 63 29 2c 61 33 3a | 80 7e 20 30 28 61 33 2c |(pc),a3:|.~ 0(a3,|
|00003610| 64 34 29 2c 2d 31 30 28 | 61 32 29 00 20 20 80 89 |d4),-10(|a2). ..|
|00003620| 20 64 36 3a 80 42 20 64 | 36 2c 64 32 3a 80 76 2e | d6:.B d|6,d2:.v.|
|00003630| 6c 20 64 32 3a 80 45 20 | 64 37 2c 64 32 00 20 20 |l d2:.E |d7,d2. |
|00003640| 80 84 20 28 61 30 29 2c | 64 33 3a 80 3d 2e 6c 20 |.. (a0),|d3:.=.l |
|00003650| 64 33 2c 64 32 20 3b 6f | 66 66 73 65 74 00 20 20 |d3,d2 ;o|ffset. |
|00003660| 80 7a 20 38 28 61 30 29 | 2c 61 30 3a 80 40 23 32 |.z 8(a0)|,a0:.@#2|
|00003670| 2c 61 32 3a 80 b0 20 64 | 35 3a 80 48 20 77 6f 62 |,a2:.. d|5:.H wob|
|00003680| 70 32 00 20 20 3b 00 20 | 20 80 7e 2e 6c 20 32 34 |p2. ;. | .~.l 24|
|00003690| 28 61 30 29 2c 64 31 3a | 80 3d 2e 6c 20 64 32 2c |(a0),d1:|.=.l d2,|
|000036a0| 64 31 3a 80 7e 20 64 31 | 2c 34 28 61 32 29 3a 80 |d1:.~ d1|,4(a2):.|
|000036b0| ac 20 64 31 3a 80 7e 20 | 64 31 2c 28 61 32 29 3a |. d1:.~ |d1,(a2):|
|000036c0| 80 40 23 38 2c 61 32 00 | 20 20 80 7e 2e 6c 20 32 |.@#8,a2.| .~.l 2|
|000036d0| 38 28 61 30 29 2c 64 31 | 3a 80 3d 2e 6c 20 64 32 |8(a0),d1|:.=.l d2|
|000036e0| 2c 64 31 3a 80 7e 20 64 | 31 2c 34 28 61 32 29 3a |,d1:.~ d|1,4(a2):|
|000036f0| 80 ac 20 64 31 3a 80 7e | 20 64 31 2c 28 61 32 29 |.. d1:.~| d1,(a2)|
|00003700| 3a 80 40 23 38 2c 61 32 | 00 20 20 80 aa 23 32 2c |:.@#8,a2|. ..#2,|
|00003710| 64 30 00 20 20 3b 00 20 | 20 77 6f 62 70 32 3a 80 |d0. ;. | wobp2:.|
|00003720| 7e 2e 6c 20 28 61 30 29 | 2b 2c 64 31 3a 80 3d 2e |~.l (a0)|+,d1:.=.|
|00003730| 6c 20 64 32 2c 64 31 3a | 80 7e 20 64 31 2c 34 28 |l d2,d1:|.~ d1,4(|
|00003740| 61 32 29 3a 80 ac 20 64 | 31 3a 80 7e 20 64 31 2c |a2):.. d|1:.~ d1,|
|00003750| 28 61 32 29 00 20 20 80 | 40 23 38 2c 61 32 3a 80 |(a2). .|@#8,a2:.|
|00003760| 6f 20 64 30 2c 77 6f 62 | 70 32 3a 6e 6f 62 6f 32 |o d0,wob|p2:nobo2|
|00003770| 3a 80 94 00 00 5f 64 69 | 73 70 6c 61 79 62 6d 61 |:...._di|splaybma|
|00003780| 70 3a 00 20 20 80 57 20 | 23 34 2c 21 6d 7b 72 65 |p:. .W |#4,!m{re|
|00003790| 73 2b 31 7d 3a 80 48 20 | 6e 6f 74 73 3a 80 81 23 |s+1}:.H |nots:..#|
|000037a0| 30 2c 64 32 3a 80 81 23 | 30 2c 64 33 3a 80 58 20 |0,d2:..#|0,d3:.X |
|000037b0| 5f 64 69 73 70 6c 61 79 | 62 6d 61 70 32 3a 6e 6f |_display|bmap2:no|
|000037c0| 74 73 00 20 20 80 82 2e | 6c 20 64 32 2d 64 33 2c |ts. ...|l d2-d3,|
|000037d0| 21 6d 7b 78 30 7d 00 20 | 20 80 7e 2e 6c 20 21 6d |!m{x0}. | .~.l !m|
|000037e0| 7b 62 70 6c 61 6e 65 73 | 7d 2c 61 32 3a 80 7e 20 |{bplanes|},a2:.~ |
|000037f0| 21 6d 7b 6e 75 6d 62 70 | 7d 2c 64 30 3a 80 48 20 |!m{numbp|},d0:.H |
|00003800| 6e 6f 62 6f 3a 80 aa 23 | 31 2c 64 30 00 20 20 80 |nobo:..#|1,d0. .|
|00003810| 7e 20 28 61 30 29 2c 64 | 31 3a 80 a7 20 21 6d 7b |~ (a0),d|1:.. !m{|
|00003820| 66 65 74 63 68 77 69 64 | 7d 2c 64 31 3a 80 7e 20 |fetchwid|},d1:.~ |
|00003830| 64 31 2c 2d 36 28 61 32 | 29 3a 80 7e 20 64 31 2c |d1,-6(a2|):.~ d1,|
|00003840| 2d 32 28 61 32 29 00 20 | 20 80 7a 20 38 28 61 30 |-2(a2). | .z 8(a0|
|00003850| 29 2c 61 30 3a 80 40 23 | 32 2c 61 32 3a 80 b0 20 |),a0:.@#|2,a2:.. |
|00003860| 21 6d 7b 68 61 6d 38 7d | 3a 80 48 20 77 6f 62 70 |!m{ham8}|:.H wobp|
|00003870| 00 20 20 3b 00 20 20 80 | 7e 20 32 34 28 61 30 29 |. ;. .|~ 24(a0)|
|00003880| 2c 28 61 32 29 3a 80 40 | 23 34 2c 61 32 3a 80 7e |,(a2):.@|#4,a2:.~|
|00003890| 20 32 36 28 61 30 29 2c | 28 61 32 29 3a 80 40 23 | 26(a0),|(a2):.@#|
|000038a0| 34 2c 61 32 00 20 20 80 | 7e 20 32 38 28 61 30 29 |4,a2. .|~ 28(a0)|
|000038b0| 2c 28 61 32 29 3a 80 40 | 23 34 2c 61 32 3a 80 7e |,(a2):.@|#4,a2:.~|
|000038c0| 20 33 30 28 61 30 29 2c | 28 61 32 29 3a 80 40 23 | 30(a0),|(a2):.@#|
|000038d0| 34 2c 61 32 3a 80 aa 23 | 32 2c 64 30 00 20 20 3b |4,a2:..#|2,d0. ;|
|000038e0| 00 20 20 77 6f 62 70 3a | 80 7e 20 28 61 30 29 2b |. wobp:|.~ (a0)+|
|000038f0| 2c 28 61 32 29 3a 80 40 | 23 34 2c 61 32 3a 80 7e |,(a2):.@|#4,a2:.~|
|00003900| 20 28 61 30 29 2b 2c 28 | 61 32 29 3a 80 40 23 34 | (a0)+,(|a2):.@#4|
|00003910| 2c 61 32 3a 80 6f 20 64 | 30 2c 77 6f 62 70 00 20 |,a2:.o d|0,wobp. |
|00003920| 20 6e 6f 62 6f 3a 80 94 | 00 00 5f 64 69 73 70 6c | nobo:..|.._displ|
|00003930| 61 79 64 62 6d 61 70 32 | 3a 20 20 20 20 3b 78 79 |aydbmap2|: ;xy|
|00003940| 31 3d 64 32 64 33 20 78 | 79 32 3d 64 35 64 36 00 |1=d2d3 x|y2=d5d6.|
|00003950| 20 20 80 7e 20 2d 28 61 | 32 29 2c 64 36 3a 73 63 | .~ -(a|2),d6:sc|
|00003960| 6c 75 64 67 65 3a 80 82 | 2e 6c 20 64 32 2f 64 35 |ludge:..|.l d2/d5|
|00003970| 2c 21 6d 7b 78 30 7d 00 | 20 20 80 7e 20 21 6d 7b |,!m{x0}.| .~ !m{|
|00003980| 72 65 73 73 68 69 66 74 | 7d 2c 64 37 3a 80 44 2e |resshift|},d7:.D.|
|00003990| 6c 64 37 2c 64 32 3a 80 | 44 2e 6c 20 64 37 2c 64 |ld7,d2:.|D.l d7,d|
|000039a0| 35 3a 80 ac 20 64 32 3a | 80 ac 20 64 35 00 20 20 |5:.. d2:|.. d5. |
|000039b0| 80 7e 2e 6c 20 21 6d 7b | 62 70 6c 61 6e 65 73 7d |.~.l !m{|bplanes}|
|000039c0| 2c 61 32 3a 80 7e 20 21 | 6d 7b 6e 75 6d 62 70 7d |,a2:.~ !|m{numbp}|
|000039d0| 2c 64 30 3a 80 48 20 6e | 6f 6a 6f 32 3a 80 7e 20 |,d0:.H n|ojo2:.~ |
|000039e0| 64 30 2c 2d 28 61 37 29 | 00 20 20 80 82 20 21 6d |d0,-(a7)|. .. !m|
|000039f0| 7b 66 65 74 63 68 77 69 | 64 7d 2c 64 30 2f 64 34 |{fetchwi|d},d0/d4|
|00003a00| 2f 64 37 3a 80 7a 20 62 | 70 31 28 70 63 29 2c 61 |/d7:.z b|p1(pc),a|
|00003a10| 33 00 20 20 80 7e 20 28 | 61 30 29 2c 64 31 3a 80 |3. .~ (|a0),d1:.|
|00003a20| 84 20 64 31 2c 64 33 3a | 80 a7 20 64 30 2c 64 31 |. d1,d3:|.. d0,d1|
|00003a30| 3a 80 7e 20 64 31 2c 2d | 36 28 61 32 29 00 20 20 |:.~ d1,-|6(a2). |
|00003a40| 80 7e 20 28 61 31 29 2c | 64 31 3a 80 84 20 64 31 |.~ (a1),|d1:.. d1|
|00003a50| 2c 64 36 3a 80 a7 20 64 | 30 2c 64 31 3a 80 7e 20 |,d6:.. d|0,d1:.~ |
|00003a60| 64 31 2c 2d 32 28 61 32 | 29 00 20 20 80 7e 20 64 |d1,-2(a2|). .~ d|
|00003a70| 32 2c 64 30 3a 80 42 20 | 64 34 2c 64 30 3a 80 3d |2,d0:.B |d4,d0:.=|
|00003a80| 20 64 30 2c 64 30 3a 80 | 7e 20 30 28 61 33 2c 64 | d0,d0:.|~ 0(a3,d|
|00003a90| 30 29 2c 64 30 00 20 20 | 80 7e 20 64 35 2c 64 31 |0),d0. |.~ d5,d1|
|00003aa0| 3a 80 42 20 64 34 2c 64 | 31 3a 80 3d 20 64 31 2c |:.B d4,d|1:.= d1,|
|00003ab0| 64 31 3a 80 7e 20 30 28 | 61 33 2c 64 31 29 2c 64 |d1:.~ 0(|a3,d1),d|
|00003ac0| 31 00 20 20 80 42 20 23 | 24 66 30 66 30 2c 64 31 |1. .B #|$f0f0,d1|
|00003ad0| 3a 80 42 20 23 24 30 66 | 30 66 2c 64 30 3a 80 8a |:.B #$0f|0f,d0:..|
|00003ae0| 20 64 31 2c 64 30 3a 80 | 7e 20 64 30 2c 2d 31 30 | d1,d0:.|~ d0,-10|
|00003af0| 28 61 32 29 3a 80 89 20 | 64 34 00 20 20 80 42 20 |(a2):.. |d4. .B |
|00003b00| 64 34 2c 64 32 3a 80 76 | 2e 6c 20 64 32 3a 80 45 |d4,d2:.v|.l d2:.E|
|00003b10| 20 64 37 2c 64 32 3a 80 | 3d 2e 6c 20 64 33 2c 64 | d7,d2:.|=.l d3,d|
|00003b20| 32 3a 80 42 20 64 34 2c | 64 35 3a 80 76 2e 6c 20 |2:.B d4,|d5:.v.l |
|00003b30| 64 35 3a 80 45 20 64 37 | 2c 64 35 3a 80 3d 2e 6c |d5:.E d7|,d5:.=.l|
|00003b40| 20 64 36 2c 64 35 00 20 | 20 80 7e 20 28 61 37 29 | d6,d5. | .~ (a7)|
|00003b50| 2b 2c 64 30 3a 80 aa 23 | 31 2c 64 30 3a 80 7a 20 |+,d0:..#|1,d0:.z |
|00003b60| 38 28 61 30 29 2c 61 30 | 3a 80 7a 20 38 28 61 31 |8(a0),a0|:.z 8(a1|
|00003b70| 29 2c 61 31 3a 80 40 23 | 32 2c 61 32 00 67 6f 62 |),a1:.@#|2,a2.gob|
|00003b80| 70 32 3a 80 7e 2e 6c 20 | 28 61 30 29 2b 2c 64 31 |p2:.~.l |(a0)+,d1|
|00003b90| 3a 80 3d 2e 6c 20 64 32 | 2c 64 31 3a 80 7e 20 64 |:.=.l d2|,d1:.~ d|
|00003ba0| 31 2c 34 28 61 32 29 3a | 80 ac 20 64 31 3a 80 7e |1,4(a2):|.. d1:.~|
|00003bb0| 20 64 31 2c 28 61 32 29 | 00 20 20 80 40 23 38 2c | d1,(a2)|. .@#8,|
|00003bc0| 61 32 3a 80 6f 20 64 30 | 2c 67 6f 67 70 32 3a 80 |a2:.o d0|,gogp2:.|
|00003bd0| 94 3a 67 6f 67 70 32 00 | 20 20 80 7e 2e 6c 20 28 |.:gogp2.| .~.l (|
|00003be0| 61 31 29 2b 2c 64 31 3a | 80 3d 2e 6c 20 64 35 2c |a1)+,d1:|.=.l d5,|
|00003bf0| 64 31 3a 80 7e 20 64 31 | 2c 34 28 61 32 29 3a 80 |d1:.~ d1|,4(a2):.|
|00003c00| ac 20 64 31 3a 80 7e 20 | 64 31 2c 28 61 32 29 00 |. d1:.~ |d1,(a2).|
|00003c10| 20 20 80 40 23 38 2c 61 | 32 3a 80 6f 20 64 30 2c | .@#8,a|2:.o d0,|
|00003c20| 67 6f 62 70 32 3a 6e 6f | 6a 6f 32 3a 80 94 00 00 |gobp2:no|jo2:....|
|00003c30| 5f 64 69 73 70 6c 61 79 | 64 62 6d 61 70 3a 00 20 |_display|dbmap:. |
|00003c40| 20 80 57 20 23 34 2c 21 | 6d 7b 72 65 73 2b 31 7d | .W #4,!|m{res+1}|
|00003c50| 3a 80 48 20 6e 6f 74 73 | 32 00 20 20 80 7e 20 64 |:.H nots|2. .~ d|
|00003c60| 32 2c 64 34 3a 80 81 23 | 30 2c 64 32 3a 80 81 23 |2,d4:..#|0,d2:..#|
|00003c70| 30 2c 64 33 3a 80 81 23 | 30 2c 64 35 3a 80 81 23 |0,d3:..#|0,d5:..#|
|00003c80| 30 2c 64 36 3a 80 58 20 | 73 63 6c 75 64 67 65 3a |0,d6:.X |scludge:|
|00003c90| 6e 6f 74 73 32 00 20 20 | 80 81 23 30 2c 64 32 3a |nots2. |..#0,d2:|
|00003ca0| 80 7e 2e 6c 20 64 32 2c | 21 6d 7b 78 30 7d 3a 80 |.~.l d2,|!m{x0}:.|
|00003cb0| 7e 2e 6c 20 64 32 2c 21 | 6d 7b 78 31 7d 00 20 20 |~.l d2,!|m{x1}. |
|00003cc0| 80 7e 2e 6c 20 21 6d 7b | 62 70 6c 61 6e 65 73 7d |.~.l !m{|bplanes}|
|00003cd0| 2c 61 32 3a 80 7e 20 21 | 6d 7b 6e 75 6d 62 70 7d |,a2:.~ !|m{numbp}|
|00003ce0| 2c 64 30 3a 80 48 20 6e | 6f 6a 6f 3a 80 aa 23 31 |,d0:.H n|ojo:..#1|
|00003cf0| 2c 64 30 00 20 20 80 7e | 20 28 61 30 29 2c 64 31 |,d0. .~| (a0),d1|
|00003d00| 3a 80 a7 20 21 6d 7b 66 | 65 74 63 68 77 69 64 7d |:.. !m{f|etchwid}|
|00003d10| 2c 64 31 3a 80 7e 20 64 | 31 2c 2d 36 28 61 32 29 |,d1:.~ d|1,-6(a2)|
|00003d20| 00 20 20 80 7e 20 28 61 | 31 29 2c 64 31 3a 80 a7 |. .~ (a|1),d1:..|
|00003d30| 20 21 6d 7b 66 65 74 63 | 68 77 69 64 7d 2c 64 31 | !m{fetc|hwid},d1|
|00003d40| 3a 80 7e 20 64 31 2c 2d | 32 28 61 32 29 00 20 20 |:.~ d1,-|2(a2). |
|00003d50| 80 7a 20 38 28 61 30 29 | 2c 61 30 3a 80 7a 20 38 |.z 8(a0)|,a0:.z 8|
|00003d60| 28 61 31 29 2c 61 31 3a | 80 40 23 32 2c 61 32 00 |(a1),a1:|.@#2,a2.|
|00003d70| 67 6f 62 70 3a 80 7e 2e | 6c 20 28 61 30 29 2b 2c |gobp:.~.|l (a0)+,|
|00003d80| 64 31 3a 80 7e 20 64 31 | 2c 34 28 61 32 29 3a 80 |d1:.~ d1|,4(a2):.|
|00003d90| ac 20 64 31 3a 80 7e 20 | 64 31 2c 28 61 32 29 3a |. d1:.~ |d1,(a2):|
|00003da0| 80 40 23 38 2c 61 32 00 | 20 20 80 6f 20 64 30 2c |.@#8,a2.| .o d0,|
|00003db0| 67 6f 67 70 3a 80 94 3a | 67 6f 67 70 3a 80 7e 2e |gogp:..:|gogp:.~.|
|00003dc0| 6c 20 28 61 31 29 2b 2c | 64 31 3a 80 7e 20 64 31 |l (a1)+,|d1:.~ d1|
|00003dd0| 2c 34 28 61 32 29 3a 80 | ac 20 64 31 3a 80 7e 20 |,4(a2):.|. d1:.~ |
|00003de0| 64 31 2c 28 61 32 29 00 | 20 20 80 40 23 38 2c 61 |d1,(a2).| .@#8,a|
|00003df0| 32 3a 80 6f 20 64 30 2c | 67 6f 62 70 3a 6e 6f 6a |2:.o d0,|gobp:noj|
|00003e00| 6f 3a 80 94 00 00 62 70 | 31 3a 00 20 20 80 25 2e |o:....bp|1:. .%.|
|00003e10| 77 20 24 46 46 46 46 2c | 24 45 45 46 46 2c 24 44 |w $FFFF,|$EEFF,$D|
|00003e20| 44 46 46 2c 24 43 43 46 | 46 2c 24 46 46 45 45 2c |DFF,$CCF|F,$FFEE,|
|00003e30| 24 45 45 45 45 2c 24 44 | 44 45 45 2c 24 43 43 45 |$EEEE,$D|DEE,$CCE|
|00003e40| 45 00 20 20 80 25 2e 77 | 20 24 46 46 44 44 2c 24 |E. .%.w| $FFDD,$|
|00003e50| 45 45 44 44 2c 24 44 44 | 44 44 2c 24 43 43 44 44 |EEDD,$DD|DD,$CCDD|
|00003e60| 2c 24 46 46 43 43 2c 24 | 45 45 43 43 2c 24 44 44 |,$FFCC,$|EECC,$DD|
|00003e70| 43 43 2c 24 43 43 43 43 | 00 20 20 80 25 2e 77 20 |CC,$CCCC|. .%.w |
|00003e80| 24 46 46 42 42 2c 24 45 | 45 42 42 2c 24 44 44 42 |$FFBB,$E|EBB,$DDB|
|00003e90| 42 2c 24 43 43 42 42 2c | 24 46 46 41 41 2c 24 45 |B,$CCBB,|$FFAA,$E|
|00003ea0| 45 41 41 2c 24 44 44 41 | 41 2c 24 43 43 41 41 00 |EAA,$DDA|A,$CCAA.|
|00003eb0| 20 20 80 25 2e 77 20 24 | 46 46 39 39 2c 24 45 45 | .%.w $|FF99,$EE|
|00003ec0| 39 39 2c 24 44 44 39 39 | 2c 24 43 43 39 39 2c 24 |99,$DD99|,$CC99,$|
|00003ed0| 46 46 38 38 2c 24 45 45 | 38 38 2c 24 44 44 38 38 |FF88,$EE|88,$DD88|
|00003ee0| 2c 24 43 43 38 38 00 20 | 20 80 25 2e 77 20 24 46 |,$CC88. | .%.w $F|
|00003ef0| 46 37 37 2c 24 45 45 37 | 37 2c 24 44 44 37 37 2c |F77,$EE7|7,$DD77,|
|00003f00| 24 43 43 37 37 2c 24 46 | 46 36 36 2c 24 45 45 36 |$CC77,$F|F66,$EE6|
|00003f10| 36 2c 24 44 44 36 36 2c | 24 43 43 36 36 00 20 20 |6,$DD66,|$CC66. |
|00003f20| 80 25 2e 77 20 24 46 46 | 35 35 2c 24 45 45 35 35 |.%.w $FF|55,$EE55|
|00003f30| 2c 24 44 44 35 35 2c 24 | 43 43 35 35 2c 24 46 46 |,$DD55,$|CC55,$FF|
|00003f40| 34 34 2c 24 45 45 34 34 | 2c 24 44 44 34 34 2c 24 |44,$EE44|,$DD44,$|
|00003f50| 43 43 34 34 00 20 20 80 | 25 2e 77 20 24 46 46 33 |CC44. .|%.w $FF3|
|00003f60| 33 2c 24 45 45 33 33 2c | 24 44 44 33 33 2c 24 43 |3,$EE33,|$DD33,$C|
|00003f70| 43 33 33 2c 24 46 46 32 | 32 2c 24 45 45 32 32 2c |C33,$FF2|2,$EE22,|
|00003f80| 24 44 44 32 32 2c 24 43 | 43 32 32 00 20 20 80 25 |$DD22,$C|C22. .%|
|00003f90| 2e 77 20 24 46 46 31 31 | 2c 24 45 45 31 31 2c 24 |.w $FF11|,$EE11,$|
|00003fa0| 44 44 31 31 2c 24 43 43 | 31 31 2c 24 46 46 30 30 |DD11,$CC|11,$FF00|
|00003fb0| 2c 24 45 45 30 30 2c 24 | 44 44 30 30 2c 24 43 43 |,$EE00,$|DD00,$CC|
|00003fc0| 30 30 00 20 20 80 25 2e | 77 20 24 42 42 46 46 2c |00. .%.|w $BBFF,|
|00003fd0| 24 41 41 46 46 2c 24 39 | 39 46 46 2c 24 38 38 46 |$AAFF,$9|9FF,$88F|
|00003fe0| 46 2c 24 42 42 45 45 2c | 24 41 41 45 45 2c 24 39 |F,$BBEE,|$AAEE,$9|
|00003ff0| 39 45 45 2c 24 38 38 45 | 45 00 20 20 80 25 2e 77 |9EE,$88E|E. .%.w|
|00004000| 20 24 42 42 44 44 2c 24 | 41 41 44 44 2c 24 39 39 | $BBDD,$|AADD,$99|
|00004010| 44 44 2c 24 38 38 44 44 | 2c 24 42 42 43 43 2c 24 |DD,$88DD|,$BBCC,$|
|00004020| 41 41 43 43 2c 24 39 39 | 43 43 2c 24 38 38 43 43 |AACC,$99|CC,$88CC|
|00004030| 00 20 20 80 25 2e 77 20 | 24 42 42 42 42 2c 24 41 |. .%.w |$BBBB,$A|
|00004040| 41 42 42 2c 24 39 39 42 | 42 2c 24 38 38 42 42 2c |ABB,$99B|B,$88BB,|
|00004050| 24 42 42 41 41 2c 24 41 | 41 41 41 2c 24 39 39 41 |$BBAA,$A|AAA,$99A|
|00004060| 41 2c 24 38 38 41 41 00 | 20 20 80 25 2e 77 20 24 |A,$88AA.| .%.w $|
|00004070| 42 42 39 39 2c 24 41 41 | 39 39 2c 24 39 39 39 39 |BB99,$AA|99,$9999|
|00004080| 2c 24 38 38 39 39 2c 24 | 42 42 38 38 2c 24 41 41 |,$8899,$|BB88,$AA|
|00004090| 38 38 2c 24 39 39 38 38 | 2c 24 38 38 38 38 00 20 |88,$9988|,$8888. |
|000040a0| 20 80 25 2e 77 20 24 42 | 42 37 37 2c 24 41 41 37 | .%.w $B|B77,$AA7|
|000040b0| 37 2c 24 39 39 37 37 2c | 24 38 38 37 37 2c 24 42 |7,$9977,|$8877,$B|
|000040c0| 42 36 36 2c 24 41 41 36 | 36 2c 24 39 39 36 36 2c |B66,$AA6|6,$9966,|
|000040d0| 24 38 38 36 36 00 20 20 | 80 25 2e 77 20 24 42 42 |$8866. |.%.w $BB|
|000040e0| 35 35 2c 24 41 41 35 35 | 2c 24 39 39 35 35 2c 24 |55,$AA55|,$9955,$|
|000040f0| 38 38 35 35 2c 24 42 42 | 34 34 2c 24 41 41 34 34 |8855,$BB|44,$AA44|
|00004100| 2c 24 39 39 34 34 2c 24 | 38 38 34 34 00 20 20 80 |,$9944,$|8844. .|
|00004110| 25 2e 77 20 24 42 42 33 | 33 2c 24 41 41 33 33 2c |%.w $BB3|3,$AA33,|
|00004120| 24 39 39 33 33 2c 24 38 | 38 33 33 2c 24 42 42 32 |$9933,$8|833,$BB2|
|00004130| 32 2c 24 41 41 32 32 2c | 24 39 39 32 32 2c 24 38 |2,$AA22,|$9922,$8|
|00004140| 38 32 32 00 20 20 80 25 | 2e 77 20 24 42 42 31 31 |822. .%|.w $BB11|
|00004150| 2c 24 41 41 31 31 2c 24 | 39 39 31 31 2c 24 38 38 |,$AA11,$|9911,$88|
|00004160| 31 31 2c 24 42 42 30 30 | 2c 24 41 41 30 30 2c 24 |11,$BB00|,$AA00,$|
|00004170| 39 39 30 30 2c 24 38 38 | 30 30 00 20 20 80 25 2e |9900,$88|00. .%.|
|00004180| 77 20 24 37 37 46 46 2c | 24 36 36 46 46 2c 24 35 |w $77FF,|$66FF,$5|
|00004190| 35 46 46 2c 24 34 34 46 | 46 2c 24 37 37 45 45 2c |5FF,$44F|F,$77EE,|
|000041a0| 24 36 36 45 45 2c 24 35 | 35 45 45 2c 24 34 34 45 |$66EE,$5|5EE,$44E|
|000041b0| 45 00 20 20 80 25 2e 77 | 20 24 37 37 44 44 2c 24 |E. .%.w| $77DD,$|
|000041c0| 36 36 44 44 2c 24 35 35 | 44 44 2c 24 34 34 44 44 |66DD,$55|DD,$44DD|
|000041d0| 2c 24 37 37 43 43 2c 24 | 36 36 43 43 2c 24 35 35 |,$77CC,$|66CC,$55|
|000041e0| 43 43 2c 24 34 34 43 43 | 00 20 20 80 25 2e 77 20 |CC,$44CC|. .%.w |
|000041f0| 24 37 37 42 42 2c 24 36 | 36 42 42 2c 24 35 35 42 |$77BB,$6|6BB,$55B|
|00004200| 42 2c 24 34 34 42 42 2c | 24 37 37 41 41 2c 24 36 |B,$44BB,|$77AA,$6|
|00004210| 36 41 41 2c 24 35 35 41 | 41 2c 24 34 34 41 41 00 |6AA,$55A|A,$44AA.|
|00004220| 20 20 80 25 2e 77 20 24 | 37 37 39 39 2c 24 36 36 | .%.w $|7799,$66|
|00004230| 39 39 2c 24 35 35 39 39 | 2c 24 34 34 39 39 2c 24 |99,$5599|,$4499,$|
|00004240| 37 37 38 38 2c 24 36 36 | 38 38 2c 24 35 35 38 38 |7788,$66|88,$5588|
|00004250| 2c 24 34 34 38 38 00 20 | 20 80 25 2e 77 20 24 37 |,$4488. | .%.w $7|
|00004260| 37 37 37 2c 24 36 36 37 | 37 2c 24 35 35 37 37 2c |777,$667|7,$5577,|
|00004270| 24 34 34 37 37 2c 24 37 | 37 36 36 2c 24 36 36 36 |$4477,$7|766,$666|
|00004280| 36 2c 24 35 35 36 36 2c | 24 34 34 36 36 00 20 20 |6,$5566,|$4466. |
|00004290| 80 25 2e 77 20 24 37 37 | 35 35 2c 24 36 36 35 35 |.%.w $77|55,$6655|
|000042a0| 2c 24 35 35 35 35 2c 24 | 34 34 35 35 2c 24 37 37 |,$5555,$|4455,$77|
|000042b0| 34 34 2c 24 36 36 34 34 | 2c 24 35 35 34 34 2c 24 |44,$6644|,$5544,$|
|000042c0| 34 34 34 34 00 20 20 80 | 25 2e 77 20 24 37 37 33 |4444. .|%.w $773|
|000042d0| 33 2c 24 36 36 33 33 2c | 24 35 35 33 33 2c 24 34 |3,$6633,|$5533,$4|
|000042e0| 34 33 33 2c 24 37 37 32 | 32 2c 24 36 36 32 32 2c |433,$772|2,$6622,|
|000042f0| 24 35 35 32 32 2c 24 34 | 34 32 32 00 20 20 80 25 |$5522,$4|422. .%|
|00004300| 2e 77 20 24 37 37 31 31 | 2c 24 36 36 31 31 2c 24 |.w $7711|,$6611,$|
|00004310| 35 35 31 31 2c 24 34 34 | 31 31 2c 24 37 37 30 30 |5511,$44|11,$7700|
|00004320| 2c 24 36 36 30 30 2c 24 | 35 35 30 30 2c 24 34 34 |,$6600,$|5500,$44|
|00004330| 30 30 00 20 20 80 25 2e | 77 20 24 33 33 46 46 2c |00. .%.|w $33FF,|
|00004340| 24 32 32 46 46 2c 24 31 | 31 46 46 2c 24 30 30 46 |$22FF,$1|1FF,$00F|
|00004350| 46 2c 24 33 33 45 45 2c | 24 32 32 45 45 2c 24 31 |F,$33EE,|$22EE,$1|
|00004360| 31 45 45 2c 24 30 30 45 | 45 00 20 20 80 25 2e 77 |1EE,$00E|E. .%.w|
|00004370| 20 24 33 33 44 44 2c 24 | 32 32 44 44 2c 24 31 31 | $33DD,$|22DD,$11|
|00004380| 44 44 2c 24 30 30 44 44 | 2c 24 33 33 43 43 2c 24 |DD,$00DD|,$33CC,$|
|00004390| 32 32 43 43 2c 24 31 31 | 43 43 2c 24 30 30 43 43 |22CC,$11|CC,$00CC|
|000043a0| 00 20 20 80 25 2e 77 20 | 24 33 33 42 42 2c 24 32 |. .%.w |$33BB,$2|
|000043b0| 32 42 42 2c 24 31 31 42 | 42 2c 24 30 30 42 42 2c |2BB,$11B|B,$00BB,|
|000043c0| 24 33 33 41 41 2c 24 32 | 32 41 41 2c 24 31 31 41 |$33AA,$2|2AA,$11A|
|000043d0| 41 2c 24 30 30 41 41 00 | 20 20 80 25 2e 77 20 24 |A,$00AA.| .%.w $|
|000043e0| 33 33 39 39 2c 24 32 32 | 39 39 2c 24 31 31 39 39 |3399,$22|99,$1199|
|000043f0| 2c 24 30 30 39 39 2c 24 | 33 33 38 38 2c 24 32 32 |,$0099,$|3388,$22|
|00004400| 38 38 2c 24 31 31 38 38 | 2c 24 30 30 38 38 00 20 |88,$1188|,$0088. |
|00004410| 20 80 25 2e 77 20 24 33 | 33 37 37 2c 24 32 32 37 | .%.w $3|377,$227|
|00004420| 37 2c 24 31 31 37 37 2c | 24 30 30 37 37 2c 24 33 |7,$1177,|$0077,$3|
|00004430| 33 36 36 2c 24 32 32 36 | 36 2c 24 31 31 36 36 2c |366,$226|6,$1166,|
|00004440| 24 30 30 36 36 00 20 20 | 80 25 2e 77 20 24 33 33 |$0066. |.%.w $33|
|00004450| 35 35 2c 24 32 32 35 35 | 2c 24 31 31 35 35 2c 24 |55,$2255|,$1155,$|
|00004460| 30 30 35 35 2c 24 33 33 | 34 34 2c 24 32 32 34 34 |0055,$33|44,$2244|
|00004470| 2c 24 31 31 34 34 2c 24 | 30 30 34 34 00 20 20 80 |,$1144,$|0044. .|
|00004480| 25 2e 77 20 24 33 33 33 | 33 2c 24 32 32 33 33 2c |%.w $333|3,$2233,|
|00004490| 24 31 31 33 33 2c 24 30 | 30 33 33 2c 24 33 33 32 |$1133,$0|033,$332|
|000044a0| 32 2c 24 32 32 32 32 2c | 24 31 31 32 32 2c 24 30 |2,$2222,|$1122,$0|
|000044b0| 30 32 32 00 20 20 80 25 | 2e 77 20 24 33 33 31 31 |022. .%|.w $3311|
|000044c0| 2c 24 32 32 31 31 2c 24 | 31 31 31 31 2c 24 30 30 |,$2211,$|1111,$00|
|000044d0| 31 31 2c 24 33 33 30 30 | 2c 24 32 32 30 30 2c 24 |11,$3300|,$2200,$|
|000044e0| 31 31 30 30 2c 24 30 30 | 30 30 00 00 3b 2d 2d 2d |1100,$00|00..;---|
|000044f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004500| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004510| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004520| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004530| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 00 |--------|-------.|
|00004540| 3b 20 73 70 72 69 74 65 | 20 72 6f 75 74 69 6e 65 |; sprite| routine|
|00004550| 73 2c 20 65 63 73 20 6f | 6e 20 61 67 61 20 73 74 |s, ecs o|n aga st|
|00004560| 69 6c 6c 20 67 6c 69 74 | 63 68 79 00 3b 2d 2d 2d |ill glit|chy.;---|
|00004570| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004580| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004590| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000045b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 00 |--------|-------.|
|000045c0| 00 5f 64 69 73 70 6c 61 | 79 73 70 72 69 74 65 3a |._displa|ysprite:|
|000045d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000045e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 78 2c | | ;x,|
|000045f0| 79 2c 63 68 20 3d 20 64 | 32 2c 64 33 2c 64 34 00 |y,ch = d|2,d3,d4.|
|00004600| 20 20 80 b0 2e 6c 20 28 | 61 31 29 3a 80 48 20 6e | ...l (|a1):.H n|
|00004610| 6f 73 70 72 69 65 72 72 | 00 20 20 80 7e 2e 6c 20 |osprierr|. .~.l |
|00004620| 64 32 2c 64 31 3a 80 7e | 20 64 33 2c 64 32 3a 80 |d2,d1:.~| d3,d2:.|
|00004630| 7e 20 64 34 2c 64 33 00 | 20 20 80 82 20 31 32 28 |~ d4,d3.| .. 12(|
|00004640| 61 31 29 2c 64 34 2d 64 | 35 3a 80 7e 20 21 6d 7b |a1),d4-d|5:.~ !m{|
|00004650| 73 70 72 65 73 7d 2c 64 | 36 3a 80 44 20 64 36 2c |spres},d|6:.D d6,|
|00004660| 64 34 3a 80 ac 20 64 31 | 00 20 20 80 7e 20 21 6d |d4:.. d1|. .~ !m|
|00004670| 7b 72 65 73 73 68 69 66 | 74 7d 2c 64 36 3a 80 8e |{resshif|t},d6:..|
|00004680| 2e 6c 20 64 36 2c 64 31 | 3a 80 a7 20 64 34 2c 64 |.l d6,d1|:.. d4,d|
|00004690| 31 3a 80 3d 23 31 32 38 | 2a 34 2c 64 31 00 00 20 |1:.=#128|*4,d1.. |
|000046a0| 20 80 a7 20 64 35 2c 64 | 32 3a 80 7e 20 21 6d 7b | .. d5,d|2:.~ !m{|
|000046b0| 68 65 69 67 68 74 7d 2c | 64 30 3a 80 40 23 31 2c |height},|d0:.@#1,|
|000046c0| 64 30 20 3b 77 61 73 20 | 31 00 20 20 80 a7 20 64 |d0 ;was |1. .. d|
|000046d0| 32 2c 64 30 3a 80 4c 20 | 73 70 72 69 74 65 6f 66 |2,d0:.L |spriteof|
|000046e0| 66 20 20 20 20 20 20 20 | 20 20 3b 3a 41 44 44 51 |f | ;:ADDQ|
|000046f0| 23 31 2c 64 30 20 3b 6f | 66 66 20 62 6f 74 74 6f |#1,d0 ;o|ff botto|
|00004700| 6d 20 77 61 73 20 61 64 | 64 71 32 00 00 20 20 80 |m was ad|dq2.. .|
|00004710| 81 23 30 2c 64 34 3a 80 | 7e 34 28 61 31 29 2c 64 |.#0,d4:.|~4(a1),d|
|00004720| 35 3a 80 b0 20 64 32 3a | 80 51 27 73 6b 69 70 79 |5:.. d2:|.Q'skipy|
|00004730| 30 3a 80 3d 20 64 32 2c | 64 35 3a 80 4c 20 73 70 |0:.= d2,|d5:.L sp|
|00004740| 72 69 74 65 6f 66 66 20 | 20 20 3b 77 61 73 62 70 |riteoff | ;wasbp|
|00004750| 6c 6f 66 66 20 74 6f 70 | 00 20 20 80 75 20 64 32 |loff top|. .u d2|
|00004760| 2c 64 34 3a 80 86 20 64 | 34 3a 80 7e 20 21 6d 7b |,d4:.. d|4:.~ !m{|
|00004770| 73 70 69 66 7d 2c 64 37 | 3a 80 76 2e 6c 20 64 34 |spif},d7|:.v.l d4|
|00004780| 3a 80 44 2e 6c 20 64 37 | 2c 64 34 00 00 20 20 27 |:.D.l d7|,d4.. '|
|00004790| 73 6b 69 70 79 30 3a 80 | 5c 20 64 35 2c 64 30 3a |skipy0:.|\ d5,d0:|
|000047a0| 80 51 20 27 73 6b 69 70 | 79 31 3a 80 7e 20 64 30 |.Q 'skip|y1:.~ d0|
|000047b0| 2c 64 35 3a 27 73 6b 69 | 70 79 31 00 00 20 20 80 |,d5:'ski|py1.. .|
|000047c0| 3d 20 21 6d 7b 79 70 6f | 73 7d 2c 64 32 20 20 20 |= !m{ypo|s},d2 |
|000047d0| 3b 64 32 3d 79 73 74 61 | 72 74 20 64 35 3d 68 65 |;d2=ysta|rt d5=he|
|000047e0| 69 67 68 74 00 20 20 3b | 64 31 3d 78 00 20 20 80 |ight. ;|d1=x. .|
|000047f0| 81 20 23 30 2c 64 37 3a | 80 7e 20 64 32 2c 64 36 |. #0,d7:|.~ d2,d6|
|00004800| 00 20 20 80 44 20 23 38 | 2c 64 36 3a 80 46 20 27 |. .D #8|,d6:.F '|
|00004810| 73 6b 69 70 3a 80 56 23 | 32 2c 64 37 3a 27 73 6b |skip:.V#|2,d7:'sk|
|00004820| 69 70 20 20 20 20 20 3b | 70 6f 73 2f 63 74 72 6c |ip ;|pos/ctrl|
|00004830| 20 69 6e 20 64 36 64 37 | 00 20 20 80 b0 20 61 67 | in d6d7|. .. ag|
|00004840| 61 6d 61 63 3a 80 50 20 | 73 73 73 70 72 69 74 65 |amac:.P |sssprite|
|00004850| 3a 80 42 20 23 24 66 66 | 66 63 2c 64 31 3a 73 73 |:.B #$ff|fc,d1:ss|
|00004860| 73 70 72 69 74 65 00 20 | 20 80 7d 20 23 31 2c 64 |sprite. | .} #1,d|
|00004870| 31 3a 80 46 20 27 73 6b | 69 70 61 3a 80 56 20 23 |1:.F 'sk|ipa:.V #|
|00004880| 33 2c 64 37 3a 27 73 6b | 69 70 61 00 20 20 80 7d |3,d7:'sk|ipa. .}|
|00004890| 20 23 31 2c 64 31 3a 80 | 46 20 27 73 6b 69 70 62 | #1,d1:.|F 'skipb|
|000048a0| 3a 80 56 20 23 34 2c 64 | 37 3a 27 73 6b 69 70 62 |:.V #4,d|7:'skipb|
|000048b0| 00 20 20 80 7d 20 23 31 | 2c 64 31 3a 80 46 20 27 |. .} #1|,d1:.F '|
|000048c0| 73 6b 69 70 63 3a 80 56 | 20 23 30 2c 64 37 3a 27 |skipc:.V| #0,d7:'|
|000048d0| 73 6b 69 70 63 00 00 20 | 20 80 7e 2e 62 20 64 31 |skipc.. | .~.b d1|
|000048e0| 2c 64 36 3a 80 3d 20 64 | 35 2c 64 32 3a 80 aa 20 |,d6:.= d|5,d2:.. |
|000048f0| 23 31 2c 64 32 3a 20 3b | 73 70 72 69 74 65 20 65 |#1,d2: ;|sprite e|
|00004900| 6e 64 20 2d 31 00 00 20 | 20 80 7c 20 23 38 2c 64 |nd -1.. | .| #8,d|
|00004910| 32 3a 80 46 20 27 73 6b | 69 70 33 3a 80 56 20 23 |2:.F 'sk|ip3:.V #|
|00004920| 31 2c 64 37 20 3b 41 44 | 44 51 20 23 32 2c 64 37 |1,d7 ;AD|DQ #2,d7|
|00004930| 00 20 20 27 73 6b 69 70 | 33 3a 80 8a 20 64 32 2c |. 'skip|3:.. d2,|
|00004940| 64 37 3a 80 b0 20 38 28 | 61 31 29 3a 80 51 20 27 |d7:.. 8(|a1):.Q '|
|00004950| 73 6b 69 70 34 3a 80 56 | 20 23 37 2c 64 37 3a 27 |skip4:.V| #7,d7:'|
|00004960| 73 6b 69 70 34 00 00 20 | 20 80 7c 20 23 34 2c 64 |skip4.. | .| #4,d|
|00004970| 33 3a 80 7e 2e 6c 20 21 | 6d 7b 73 70 72 69 74 65 |3:.~.l !|m{sprite|
|00004980| 73 7d 2c 61 30 3a 80 3d | 20 64 33 2c 61 30 3a 80 |s},a0:.=| d3,a0:.|
|00004990| 7e 2e 6c 20 28 61 31 29 | 2c 64 30 3a 80 3d 2e 6c |~.l (a1)|,d0:.=.l|
|000049a0| 20 64 34 2c 64 30 00 00 | 20 20 80 7e 20 31 30 28 | d4,d0..| .~ 10(|
|000049b0| 61 31 29 2c 64 31 3a 80 | 76 2e 6c 20 64 31 3a 80 |a1),d1:.|v.l d1:.|
|000049c0| 7e 20 36 28 61 31 29 2c | 64 32 3a 80 aa 20 23 31 |~ 6(a1),|d2:.. #1|
|000049d0| 2c 64 32 00 00 20 20 27 | 6c 6f 6f 70 3a 80 7e 20 |,d2.. '|loop:.~ |
|000049e0| 64 36 2c 32 28 61 30 29 | 3a 80 7e 20 64 37 2c 36 |d6,2(a0)|:.~ d7,6|
|000049f0| 28 61 30 29 3a 80 7e 20 | 64 30 2c 31 34 28 61 30 |(a0):.~ |d0,14(a0|
|00004a00| 29 3a 80 ac 20 64 30 3a | 80 7e 20 64 30 2c 31 30 |):.. d0:|.~ d0,10|
|00004a10| 28 61 30 29 3a 80 ac 20 | 64 30 00 20 20 80 3d 2e |(a0):.. |d0. .=.|
|00004a20| 6c 20 64 31 2c 64 30 3a | 80 7a 20 31 36 28 61 30 |l d1,d0:|.z 16(a0|
|00004a30| 29 2c 61 30 3a 80 b0 20 | 38 28 61 31 29 3a 80 51 |),a0:.. |8(a1):.Q|
|00004a40| 20 27 6f 6e 6c 79 33 00 | 20 20 80 7e 20 64 36 2c | 'only3.| .~ d6,|
|00004a50| 32 28 61 30 29 3a 80 7e | 20 64 37 2c 36 28 61 30 |2(a0):.~| d7,6(a0|
|00004a60| 29 3a 80 7e 20 64 30 2c | 31 34 28 61 30 29 3a 80 |):.~ d0,|14(a0):.|
|00004a70| ac 20 64 30 3a 80 7e 20 | 64 30 2c 31 30 28 61 30 |. d0:.~ |d0,10(a0|
|00004a80| 29 3a 80 ac 20 64 30 00 | 20 20 80 3d 2e 6c 20 64 |):.. d0.| .=.l d|
|00004a90| 31 2c 64 30 3a 80 7a 20 | 31 36 28 61 30 29 2c 61 |1,d0:.z |16(a0),a|
|00004aa0| 30 3a 80 aa 20 23 31 2c | 64 32 00 20 20 27 6f 6e |0:.. #1,|d2. 'on|
|00004ab0| 6c 79 33 3a 80 3d 20 21 | 6d 7b 73 73 70 77 69 64 |ly3:.= !|m{sspwid|
|00004ac0| 7d 2c 64 36 3a 80 6e 20 | 64 32 2c 27 6c 6f 6f 70 |},d6:.n |d2,'loop|
|00004ad0| 3a 80 94 00 00 73 70 72 | 69 74 65 6f 66 66 3a 00 |:....spr|iteoff:.|
|00004ae0| 20 20 80 7e 20 36 28 61 | 31 29 2c 64 32 3a 80 aa | .~ 6(a|1),d2:..|
|00004af0| 20 23 31 2c 64 32 3a 80 | 7c 20 23 34 2c 64 33 3a | #1,d2:.|| #4,d3:|
|00004b00| 80 7e 2e 6c 20 21 6d 7b | 73 70 72 69 74 65 73 7d |.~.l !m{|sprites}|
|00004b10| 2c 61 30 3a 80 3d 20 64 | 33 2c 61 30 00 20 20 27 |,a0:.= d|3,a0. '|
|00004b20| 6c 6f 6f 70 32 3a 80 7e | 23 30 2c 32 28 61 30 29 |loop2:.~|#0,2(a0)|
|00004b30| 3a 80 7e 23 30 2c 36 28 | 61 30 29 00 20 20 80 7e |:.~#0,6(|a0). .~|
|00004b40| 20 6d 79 73 70 72 69 74 | 65 28 70 63 29 2c 31 30 | mysprit|e(pc),10|
|00004b50| 28 61 30 29 3a 80 7e 20 | 6d 79 73 70 72 69 74 65 |(a0):.~ |mysprite|
|00004b60| 2b 32 28 70 63 29 2c 31 | 34 28 61 30 29 3a 00 20 |+2(pc),1|4(a0):. |
|00004b70| 20 80 7a 31 36 28 61 30 | 29 2c 61 30 3a 80 b0 20 | .z16(a0|),a0:.. |
|00004b80| 38 28 61 31 29 3a 80 51 | 20 27 6f 6e 6c 79 34 3a |8(a1):.Q| 'only4:|
|00004b90| 00 20 20 80 7e 23 30 2c | 32 28 61 30 29 3a 80 7e |. .~#0,|2(a0):.~|
|00004ba0| 23 30 2c 36 28 61 30 29 | 3a 00 20 20 80 7e 20 6d |#0,6(a0)|:. .~ m|
|00004bb0| 79 73 70 72 69 74 65 28 | 70 63 29 2c 31 30 28 61 |ysprite(|pc),10(a|
|00004bc0| 30 29 3a 80 7e 20 6d 79 | 73 70 72 69 74 65 2b 32 |0):.~ my|sprite+2|
|00004bd0| 28 70 63 29 2c 31 34 28 | 61 30 29 00 20 20 80 7a |(pc),14(|a0). .z|
|00004be0| 31 36 28 61 30 29 2c 61 | 30 3a 80 aa 23 31 2c 64 |16(a0),a|0:..#1,d|
|00004bf0| 32 3a 27 6f 6e 6c 79 34 | 3a 80 6e 20 64 32 2c 27 |2:'only4|:.n d2,'|
|00004c00| 6c 6f 6f 70 32 3a 80 94 | 00 00 3b 2d 2d 2d 2d 2d |loop2:..|..;-----|
|00004c10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 00 3b 20 |--------|-----.; |
|00004c60| 70 61 6c 65 74 74 65 20 | 68 61 6e 64 6c 69 6e 67 |palette |handling|
|00004c70| 20 72 6f 75 74 69 6e 65 | 73 20 69 6e 63 6c 75 64 | routine|s includ|
|00004c80| 69 6e 67 20 63 6c 75 64 | 67 79 20 32 34 62 69 74 |ing clud|gy 24bit|
|00004c90| 00 3b 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.;------|--------|
|00004ca0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004cb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004cc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004cd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004ce0| 2d 2d 2d 2d 00 00 5f 63 | 75 73 74 6f 6d 63 6f 6c |----.._c|ustomcol|
|00004cf0| 73 32 3a 00 20 20 80 59 | 20 5f 63 75 73 74 6f 6d |s2:. .Y| _custom|
|00004d00| 63 6f 6c 73 3a 80 7e 20 | 23 32 35 37 2c 21 6d 7b |cols:.~ |#257,!m{|
|00004d10| 62 6f 74 7d 3a 80 94 00 | 00 5f 63 75 73 74 6f 6d |bot}:...|._custom|
|00004d20| 63 6f 6c 73 3a 20 20 20 | 20 20 3b 64 31 2d 64 35 |cols: | ;d1-d5|
|00004d30| 20 43 43 4f 66 66 73 65 | 74 2c 59 50 6f 73 2c 50 | CCOffse|t,YPos,P|
|00004d40| 61 6c 65 74 74 65 2c 73 | 74 61 72 74 63 6f 6c 2c |alette,s|tartcol,|
|00004d50| 6e 75 6d 63 6f 6c 73 00 | 20 20 80 7e 2e 6c 20 21 |numcols.| .~.l !|
|00004d60| 6d 7b 63 75 73 74 6f 6d | 73 7d 2c 61 31 3a 80 44 |m{custom|s},a1:.D|
|00004d70| 23 32 2c 64 31 3a 80 3d | 20 64 31 2c 61 31 3a 80 |#2,d1:.=| d1,a1:.|
|00004d80| 7e 20 64 32 2c 64 31 3a | 80 3d 20 21 6d 7b 79 70 |~ d2,d1:|.= !m{yp|
|00004d90| 6f 73 7d 2c 64 31 00 20 | 20 80 7e 2e 6c 20 23 6e |os},d1. | .~.l #n|
|00004da0| 6f 77 63 6f 70 2c 64 30 | 3a 80 57 20 23 38 2c 64 |owcop,d0|:.W #8,d|
|00004db0| 31 3a 80 48 20 6e 6f 6c | 6f 33 3a 80 57 20 23 30 |1:.H nol|o3:.W #0|
|00004dc0| 2c 21 6d 7b 62 6f 74 7d | 3a 80 50 20 6e 6f 6c 6f |,!m{bot}|:.P nolo|
|00004dd0| 33 3a 80 7e 2e 6c 23 77 | 61 69 74 62 68 2c 64 30 |3:.~.l#w|aitbh,d0|
|00004de0| 00 20 20 6e 6f 6c 6f 33 | 3a 80 7e 2e 6c 20 64 30 |. nolo3|:.~.l d0|
|00004df0| 2c 28 61 31 29 2b 3a 80 | 7e 2e 62 64 31 2c 28 61 |,(a1)+:.|~.bd1,(a|
|00004e00| 31 29 2b 3a 80 7e 2e 62 | 23 24 65 31 2c 28 61 31 |1)+:.~.b|#$e1,(a1|
|00004e10| 29 2b 3a 80 7e 20 23 24 | 66 66 66 65 2c 28 61 31 |)+:.~ #$|fffe,(a1|
|00004e20| 29 2b 00 20 20 80 40 23 | 31 2c 64 31 3a 80 7e 20 |)+. .@#|1,d1:.~ |
|00004e30| 64 31 2c 21 6d 7b 62 6f | 74 7d 00 20 20 80 7e 2e |d1,!m{bo|t}. .~.|
|00004e40| 6c 20 28 61 30 29 2c 64 | 30 3a 80 48 20 6e 6f 70 |l (a0),d|0:.H nop|
|00004e50| 61 6c 65 72 72 3a 80 7e | 2e 6c 64 30 2c 61 30 3a |alerr:.~|.ld0,a0:|
|00004e60| 80 40 23 34 2c 61 30 00 | 20 20 80 7e 20 64 34 2c |.@#4,a0.| .~ d4,|
|00004e70| 64 30 3a 80 84 20 23 31 | 32 2c 64 30 3a 80 3d 20 |d0:.. #1|2,d0:.= |
|00004e80| 64 30 2c 61 30 00 20 20 | 80 7e 20 64 35 2c 64 37 |d0,a0. |.~ d5,d7|
|00004e90| 3a 80 48 20 64 75 6e 70 | 3a 80 b0 20 21 6d 7b 61 |:.H dunp|:.. !m{a|
|00004ea0| 67 61 7d 3a 80 51 20 73 | 69 6d 70 6c 65 00 20 20 |ga}:.Q s|imple. |
|00004eb0| 80 42 23 24 65 30 2c 64 | 34 3a 80 44 23 38 2c 64 |.B#$e0,d|4:.D#8,d|
|00004ec0| 34 3a 80 7e 2e 6c 23 24 | 31 30 36 30 30 30 30 2c |4:.~.l#$|1060000,|
|00004ed0| 64 30 3a 80 7e 21 6d 7b | 62 70 6c 63 6f 6e 33 7d |d0:.~!m{|bplcon3}|
|00004ee0| 2c 64 30 3a 80 8a 20 64 | 34 2c 64 30 3a 80 58 20 |,d0:.. d|4,d0:.X |
|00004ef0| 63 6f 6d 70 6c 65 78 32 | 00 00 5f 64 69 73 70 6c |complex2|.._displ|
|00004f00| 61 79 70 61 6c 65 74 74 | 65 32 3a 00 20 20 80 7e |aypalett|e2:. .~|
|00004f10| 2e 6c 20 28 61 30 29 2c | 64 30 3a 80 48 20 6e 6f |.l (a0),|d0:.H no|
|00004f20| 70 61 6c 65 72 72 3a 80 | 7e 2e 6c 64 30 2c 61 30 |palerr:.|~.ld0,a0|
|00004f30| 3a 80 40 23 34 2c 61 30 | 20 3b 61 31 3d 72 67 62 |:.@#4,a0| ;a1=rgb|
|00004f40| 00 20 20 80 84 20 23 31 | 32 2c 64 32 3a 80 3d 20 |. .. #1|2,d2:.= |
|00004f50| 64 32 2c 61 30 00 20 20 | 80 7e 2e 6c 20 21 6d 7b |d2,a0. |.~.l !m{|
|00004f60| 63 6f 6c 6f 72 73 7d 2c | 61 31 3a 80 7e 20 21 6d |colors},|a1:.~ !m|
|00004f70| 7b 6e 75 6d 63 6f 6c 73 | 7d 2c 64 37 3a 80 48 20 |{numcols|},d7:.H |
|00004f80| 64 75 6e 70 00 20 20 80 | b0 20 21 6d 7b 61 67 61 |dunp. .|. !m{aga|
|00004f90| 7d 3a 80 51 20 73 69 6d | 70 6c 65 3a 80 4f 20 63 |}:.Q sim|ple:.O c|
|00004fa0| 6f 6d 70 6c 65 78 00 00 | 5f 64 69 73 70 6c 61 79 |omplex..|_display|
|00004fb0| 70 61 6c 65 74 74 65 3a | 00 20 20 80 7e 2e 6c 20 |palette:|. .~.l |
|00004fc0| 28 61 30 29 2c 64 30 3a | 80 48 20 6e 6f 70 61 6c |(a0),d0:|.H nopal|
|00004fd0| 65 72 72 3a 80 7e 2e 6c | 64 30 2c 61 30 3a 80 40 |err:.~.l|d0,a0:.@|
|00004fe0| 23 34 2c 61 30 20 3b 61 | 31 3d 72 67 62 00 20 20 |#4,a0 ;a|1=rgb. |
|00004ff0| 80 7e 2e 6c 20 21 6d 7b | 63 6f 6c 6f 72 73 7d 2c |.~.l !m{|colors},|
|00005000| 61 31 3a 80 7e 20 21 6d | 7b 6e 75 6d 63 6f 6c 73 |a1:.~ !m|{numcols|
|00005010| 7d 2c 64 37 3a 80 48 20 | 64 75 6e 70 3a 80 b0 20 |},d7:.H |dunp:.. |
|00005020| 21 6d 7b 61 67 61 7d 3a | 80 51 20 73 69 6d 70 6c |!m{aga}:|.Q simpl|
|00005030| 65 00 00 63 6f 6d 70 6c | 65 78 3a 00 20 20 80 7e |e..compl|ex:. .~|
|00005040| 2e 6c 23 24 31 30 36 30 | 30 30 30 2c 64 30 3a 80 |.l#$1060|000,d0:.|
|00005050| 7e 21 6d 7b 62 70 6c 63 | 6f 6e 33 7d 2c 64 30 3a |~!m{bplc|on3},d0:|
|00005060| 00 63 6f 6d 70 6c 65 78 | 32 3a 00 20 20 80 81 23 |.complex|2:. ..#|
|00005070| 32 2c 64 32 3a 80 ac 20 | 64 32 3a 80 81 23 31 32 |2,d2:.. |d2:..#12|
|00005080| 2c 64 33 3a 80 aa 23 31 | 2c 64 37 00 6e 78 62 61 |,d3:..#1|,d7.nxba|
|00005090| 6e 6b 3a 00 20 20 80 81 | 20 23 33 31 2c 64 36 3a |nk:. ..| #31,d6:|
|000050a0| 80 5c 20 64 36 2c 64 37 | 3a 80 51 20 6e 6f 6b 3a |.\ d6,d7|:.Q nok:|
|000050b0| 80 7e 20 64 37 2c 64 36 | 3a 6e 6f 6b 00 20 20 80 |.~ d7,d6|:nok. .|
|000050c0| 7e 2e 6c 20 64 30 2c 28 | 61 31 29 2b 3a 80 7e 20 |~.l d0,(|a1)+:.~ |
|000050d0| 64 36 2c 64 35 3a 80 7e | 23 24 31 38 30 2c 64 31 |d6,d5:.~|#$180,d1|
|000050e0| 3a 80 ac 20 64 31 3a 80 | 7e 2e 6c 20 61 30 2c 61 |:.. d1:.|~.l a0,a|
|000050f0| 32 00 6e 78 63 62 31 3a | 00 20 20 80 7e 20 28 61 |2.nxcb1:|. .~ (a|
|00005100| 30 29 2c 64 31 3a 80 7d | 23 34 2c 64 31 3a 80 7e |0),d1:.}|#4,d1:.~|
|00005110| 2e 62 34 28 61 30 29 2c | 64 31 3a 80 44 23 34 2c |.b4(a0),|d1:.D#4,|
|00005120| 64 31 3a 80 7e 2e 62 38 | 28 61 30 29 2c 64 31 3a |d1:.~.b8|(a0),d1:|
|00005130| 80 7d 23 34 2c 64 31 00 | 20 20 80 7e 2e 6c 20 64 |.}#4,d1.| .~.l d|
|00005140| 31 2c 28 61 31 29 2b 3a | 80 3d 2e 6c 20 64 32 2c |1,(a1)+:|.=.l d2,|
|00005150| 64 31 3a 80 3d 20 64 33 | 2c 61 30 3a 80 6f 20 64 |d1:.= d3|,a0:.o d|
|00005160| 35 2c 6e 78 63 62 31 3a | 80 54 23 39 2c 64 30 00 |5,nxcb1:|.T#9,d0.|
|00005170| 20 20 80 7e 2e 6c 20 64 | 30 2c 28 61 31 29 2b 3a | .~.l d|0,(a1)+:|
|00005180| 80 7e 20 64 36 2c 64 35 | 3a 80 7e 23 24 31 38 30 |.~ d6,d5|:.~#$180|
|00005190| 2c 64 31 3a 80 ac 20 64 | 31 3a 80 7e 2e 6c 20 61 |,d1:.. d|1:.~.l a|
|000051a0| 32 2c 61 30 00 6e 78 63 | 62 32 3a 00 20 20 80 7e |2,a0.nxc|b2:. .~|
|000051b0| 20 28 61 30 29 2c 64 31 | 3a 80 7e 2e 62 38 28 61 | (a0),d1|:.~.b8(a|
|000051c0| 30 29 2c 64 31 3a 80 42 | 2e 62 23 31 35 2c 64 31 |0),d1:.B|.b#15,d1|
|000051d0| 3a 80 7e 2e 62 34 28 61 | 30 29 2c 64 34 3a 80 44 |:.~.b4(a|0),d4:.D|
|000051e0| 2e 62 23 34 2c 64 34 3a | 80 8a 2e 62 20 64 34 2c |.b#4,d4:|...b d4,|
|000051f0| 64 31 00 20 20 80 7e 2e | 6c 20 64 31 2c 28 61 31 |d1. .~.|l d1,(a1|
|00005200| 29 2b 3a 80 3d 2e 6c 20 | 64 32 2c 64 31 3a 80 3d |)+:.=.l |d2,d1:.=|
|00005210| 20 64 33 2c 61 30 3a 80 | 6f 20 64 35 2c 6e 78 63 | d3,a0:.|o d5,nxc|
|00005220| 62 32 3a 80 54 23 39 2c | 64 30 00 20 20 80 3d 20 |b2:.T#9,|d0. .= |
|00005230| 23 24 32 30 30 30 2c 64 | 30 3a 80 a7 23 33 32 2c |#$2000,d|0:..#32,|
|00005240| 64 37 3a 80 51 20 6e 78 | 62 61 6e 6b 3a 64 75 6e |d7:.Q nx|bank:dun|
|00005250| 70 3a 80 94 00 00 73 69 | 6d 70 6c 65 3a 00 20 20 |p:....si|mple:. |
|00005260| 80 5c 20 23 33 32 2c 64 | 37 3a 80 4a 20 61 67 61 |.\ #32,d|7:.J aga|
|00005270| 70 61 6c 65 72 72 00 20 | 20 80 7e 23 24 31 38 30 |palerr. | .~#$180|
|00005280| 2c 64 30 3a 80 ac 20 64 | 30 3a 80 81 23 32 2c 64 |,d0:.. d|0:..#2,d|
|00005290| 31 3a 80 ac 20 64 31 3a | 80 81 23 31 32 2c 64 32 |1:.. d1:|..#12,d2|
|000052a0| 3a 80 aa 23 31 2c 64 37 | 00 73 6c 6f 6f 70 3a 00 |:..#1,d7|.sloop:.|
|000052b0| 20 20 80 7e 20 28 61 30 | 29 2c 64 30 3a 80 7d 23 | .~ (a0|),d0:.}#|
|000052c0| 34 2c 64 30 3a 80 7e 2e | 62 34 28 61 30 29 2c 64 |4,d0:.~.|b4(a0),d|
|000052d0| 30 3a 80 44 23 34 2c 64 | 30 3a 80 7e 2e 62 38 28 |0:.D#4,d|0:.~.b8(|
|000052e0| 61 30 29 2c 64 30 3a 80 | 7d 23 34 2c 64 30 00 20 |a0),d0:.|}#4,d0. |
|000052f0| 20 80 7e 2e 6c 20 64 30 | 2c 28 61 31 29 2b 3a 80 | .~.l d0|,(a1)+:.|
|00005300| 3d 2e 6c 20 64 31 2c 64 | 30 3a 80 3d 20 64 32 2c |=.l d1,d|0:.= d2,|
|00005310| 61 30 3a 80 6f 20 64 37 | 2c 73 6c 6f 6f 70 3a 80 |a0:.o d7|,sloop:.|
|00005320| 94 00 00 3b 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...;----|--------|
|00005330| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005340| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005350| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005360| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005370| 2d 2d 2d 2d 2d 2d 00 3b | 20 63 75 73 74 6f 6d 20 |------.;| custom |
|00005380| 63 6f 70 70 65 72 20 72 | 6f 75 74 69 6e 65 73 20 |copper r|outines |
|00005390| 66 6f 72 20 65 66 66 65 | 63 74 73 00 3b 2d 2d 2d |for effe|cts.;---|
|000053a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000053b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000053c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000053d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000053e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 00 |--------|-------.|
|000053f0| 00 5f 63 75 73 74 6f 6d | 73 74 72 69 6e 67 3a 20 |._custom|string: |
|00005400| 20 20 3b 64 31 2d 64 33 | 20 43 43 4f 66 66 73 65 | ;d1-d3| CCOffse|
|00005410| 74 2c 59 50 6f 73 2c 61 | 24 00 20 20 80 7e 2e 6c |t,YPos,a|$. .~.l|
|00005420| 20 21 6d 7b 63 75 73 74 | 6f 6d 73 7d 2c 61 31 3a | !m{cust|oms},a1:|
|00005430| 80 44 23 32 2c 64 31 3a | 80 3d 20 64 31 2c 61 31 |.D#2,d1:|.= d1,a1|
|00005440| 3a 80 7e 20 64 32 2c 64 | 31 3a 80 3d 20 21 6d 7b |:.~ d2,d|1:.= !m{|
|00005450| 79 70 6f 73 7d 2c 64 31 | 00 20 20 80 7e 2e 6c 20 |ypos},d1|. .~.l |
|00005460| 23 6e 6f 77 63 6f 70 2c | 64 30 3a 80 57 20 23 38 |#nowcop,|d0:.W #8|
|00005470| 2c 64 31 3a 80 48 20 6e | 6f 6c 6f 34 3a 80 57 20 |,d1:.H n|olo4:.W |
|00005480| 23 30 2c 21 6d 7b 62 6f | 74 7d 3a 80 50 20 6e 6f |#0,!m{bo|t}:.P no|
|00005490| 6c 6f 34 3a 80 7e 2e 6c | 23 77 61 69 74 62 68 2c |lo4:.~.l|#waitbh,|
|000054a0| 64 30 00 20 20 6e 6f 6c | 6f 34 3a 80 7e 2e 6c 20 |d0. nol|o4:.~.l |
|000054b0| 64 30 2c 28 61 31 29 2b | 3a 80 7e 2e 62 64 31 2c |d0,(a1)+|:.~.bd1,|
|000054c0| 28 61 31 29 2b 3a 80 7e | 2e 62 23 24 65 31 2c 28 |(a1)+:.~|.b#$e1,(|
|000054d0| 61 31 29 2b 3a 80 7e 20 | 23 24 66 66 66 65 2c 28 |a1)+:.~ |#$fffe,(|
|000054e0| 61 31 29 2b 00 20 20 80 | 40 23 31 2c 64 31 3a 80 |a1)+. .|@#1,d1:.|
|000054f0| 7e 20 64 31 2c 21 6d 7b | 62 6f 74 7d 3a 20 20 20 |~ d1,!m{|bot}: |
|00005500| 3b 61 64 64 20 73 69 7a | 65 20 6f 66 20 6c 69 73 |;add siz|e of lis|
|00005510| 74 21 00 20 20 80 7e 2e | 6c 20 64 33 2c 61 30 3a |t!. .~.|l d3,a0:|
|00005520| 80 7e 2e 6c 20 2d 28 61 | 32 29 2c 64 30 3a 80 7d |.~.l -(a|2),d0:.}|
|00005530| 20 23 31 2c 64 30 3a 80 | 47 20 66 72 65 61 6b 65 | #1,d0:.|G freake|
|00005540| 72 72 3a 80 7d 20 23 31 | 2c 64 30 3a 80 47 20 66 |rr:.} #1|,d0:.G f|
|00005550| 72 65 61 6b 65 72 72 00 | 20 20 80 48 20 64 75 6e |reakerr.| .H dun|
|00005560| 63 75 73 3a 80 aa 23 31 | 2c 64 30 3a 70 6f 6b 65 |cus:..#1|,d0:poke|
|00005570| 6d 3a 80 7e 2e 6c 20 28 | 61 30 29 2b 2c 28 61 31 |m:.~.l (|a0)+,(a1|
|00005580| 29 2b 3a 80 6f 20 64 30 | 2c 70 6f 6b 65 6d 00 20 |)+:.o d0|,pokem. |
|00005590| 20 64 75 6e 63 75 73 3a | 80 94 00 00 5f 64 69 73 | duncus:|...._dis|
|000055a0| 70 6c 61 79 64 62 6c 73 | 63 61 6e 30 3a 20 20 20 |playdbls|can0: |
|000055b0| 20 3b 64 31 3d 6d 6f 64 | 65 20 64 32 3d 6f 66 66 | ;d1=mod|e d2=off|
|000055c0| 73 65 74 00 20 20 80 81 | 23 30 2c 64 32 00 5f 64 |set. ..|#0,d2._d|
|000055d0| 69 73 70 6c 61 79 64 62 | 6c 73 63 61 6e 3a 00 20 |isplaydb|lscan:. |
|000055e0| 20 80 7e 2e 6c 20 21 6d | 7b 63 75 73 74 6f 6d 73 | .~.l !m|{customs|
|000055f0| 7d 2c 61 31 3a 80 40 23 | 31 2c 64 32 3a 80 44 23 |},a1:.@#|1,d2:.D#|
|00005600| 32 2c 64 32 3a 80 3d 20 | 64 32 2c 61 31 3a 80 7e |2,d2:.= |d2,a1:.~|
|00005610| 20 21 6d 7b 63 70 6c 69 | 6e 65 7d 2c 64 35 00 20 | !m{cpli|ne},d5. |
|00005620| 20 80 40 23 38 2c 64 32 | 3a 80 5c 20 64 35 2c 64 | .@#8,d2|:.\ d5,d|
|00005630| 32 3a 80 4a 20 6c 69 6e | 65 72 72 3a 80 7e 20 21 |2:.J lin|err:.~ !|
|00005640| 6d 7b 68 65 69 67 68 74 | 7d 2c 64 37 3a 80 aa 23 |m{height|},d7:..#|
|00005650| 32 2c 64 37 3a 80 7e 20 | 64 31 2c 64 36 00 20 20 |2,d7:.~ |d1,d6. |
|00005660| 80 aa 23 31 2c 64 36 3a | 80 4f 20 63 6c 72 64 62 |..#1,d6:|.O clrdb|
|00005670| 6c 3a 80 7e 2e 6c 20 21 | 6d 7b 62 70 6c 61 6e 65 |l:.~.l !|m{bplane|
|00005680| 73 7d 2c 61 32 3a 80 82 | 2e 6c 20 2d 38 28 61 32 |s},a2:..|.l -8(a2|
|00005690| 29 2c 64 31 2d 64 32 3a | 80 7e 2e 6c 20 64 31 2c |),d1-d2:|.~.l d1,|
|000056a0| 64 33 00 20 20 80 7e 2e | 6c 20 64 32 2c 64 34 3a |d3. .~.|l d2,d4:|
|000056b0| 80 7e 20 21 6d 7b 66 65 | 74 63 68 77 69 64 7d 2c |.~ !m{fe|tchwid},|
|000056c0| 64 31 3a 80 86 20 64 31 | 3a 80 7e 20 64 31 2c 64 |d1:.. d1|:.~ d1,d|
|000056d0| 32 3a 80 b0 20 64 36 3a | 80 50 20 64 62 6c 64 62 |2:.. d6:|.P dbldb|
|000056e0| 6c 00 6e 78 6c 69 6e 65 | 3a 80 82 2e 6c 20 64 31 |l.nxline|:...l d1|
|000056f0| 2d 64 32 2c 28 61 31 29 | 3a 80 3d 20 64 35 2c 61 |-d2,(a1)|:.= d5,a|
|00005700| 31 3a 80 75 20 64 31 2c | 64 33 3a 80 75 20 64 32 |1:.u d1,|d3:.u d2|
|00005710| 2c 64 34 3a 80 6f 20 64 | 37 2c 6e 78 6c 69 6e 65 |,d4:.o d|7,nxline|
|00005720| 3a 80 94 00 63 6c 72 64 | 62 6c 3a 80 7e 2e 6c 23 |:...clrd|bl:.~.l#|
|00005730| 63 6f 70 6e 6f 70 2c 64 | 30 3a 80 7e 2e 6c 20 64 |copnop,d|0:.~.l d|
|00005740| 30 2c 64 31 3a 6e 78 63 | 62 3a 80 82 2e 6c 20 64 |0,d1:nxc|b:...l d|
|00005750| 30 2d 64 31 2c 28 61 31 | 29 3a 80 3d 20 64 35 2c |0-d1,(a1|):.= d5,|
|00005760| 61 31 3a 80 6f 20 64 37 | 2c 6e 78 63 62 3a 80 94 |a1:.o d7|,nxcb:..|
|00005770| 00 64 62 6c 64 62 6c 3a | 80 3d 20 64 36 2c 64 36 |.dbldbl:|.= d6,d6|
|00005780| 3a 80 7e 20 64 6c 6f 6f | 70 28 70 63 2c 64 36 29 |:.~ dloo|p(pc,d6)|
|00005790| 2c 64 36 3a 80 7e 20 64 | 36 2c 6c 6f 6f 70 64 3a |,d6:.~ d|6,loopd:|
|000057a0| 80 58 20 6e 75 78 31 00 | 6e 75 78 31 3a 80 7e 20 |.X nux1.|nux1:.~ |
|000057b0| 6c 6f 6f 70 64 28 70 63 | 29 2c 64 36 3a 6c 62 75 |loopd(pc|),d6:lbu|
|000057c0| 62 3a 80 82 2e 6c 20 64 | 31 2d 64 32 2c 28 61 31 |b:...l d|1-d2,(a1|
|000057d0| 29 3a 80 3d 20 64 35 2c | 61 31 3a 80 6f 20 64 37 |):.= d5,|a1:.o d7|
|000057e0| 2c 6e 75 78 32 3a 80 94 | 00 6e 75 78 32 3a 80 6f |,nux2:..|.nux2:.o|
|000057f0| 20 64 36 2c 6c 62 75 62 | 3a 80 82 2e 6c 20 64 31 | d6,lbub|:...l d1|
|00005800| 2d 64 32 2c 28 61 31 29 | 3a 80 3d 20 64 35 2c 61 |-d2,(a1)|:.= d5,a|
|00005810| 31 3a 80 75 20 64 31 2c | 64 33 3a 80 75 20 64 32 |1:.u d1,|d3:.u d2|
|00005820| 2c 64 34 3a 80 6f 20 64 | 37 2c 6e 75 78 34 3a 80 |,d4:.o d|7,nux4:.|
|00005830| 94 00 6e 75 78 34 3a 80 | 82 2e 6c 20 64 31 2d 64 |..nux4:.|..l d1-d|
|00005840| 32 2c 28 61 31 29 3a 80 | 3d 20 64 35 2c 61 31 3a |2,(a1):.|= d5,a1:|
|00005850| 80 75 20 64 31 2c 64 33 | 3a 80 75 20 64 32 2c 64 |.u d1,d3|:.u d2,d|
|00005860| 34 3a 80 6f 20 64 37 2c | 6e 75 78 31 3a 80 94 00 |4:.o d7,|nux1:...|
|00005870| 00 64 6c 6f 6f 70 3a 80 | 25 20 30 2c 31 2c 35 2c |.dloop:.|% 0,1,5,|
|00005880| 31 33 2c 32 39 00 6c 6f | 6f 70 64 3a 80 25 20 30 |13,29.lo|opd:.% 0|
|00005890| 00 00 3b 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..;-----|--------|
|000058a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000058b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000058c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000058d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000058e0| 2d 2d 2d 2d 2d 00 3b 20 | 6e 65 77 20 63 6f 6c 6f |-----.; |new colo|
|000058f0| 72 20 73 70 6c 69 74 20 | 72 6f 75 74 69 6e 65 73 |r split |routines|
|00005900| 20 66 6f 72 20 64 69 73 | 70 6c 61 79 73 00 3b 2d | for dis|plays.;-|
|00005910| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005920| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005930| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005940| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005950| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005960| 2d 00 00 5f 64 69 73 70 | 6c 61 79 72 61 69 6e 62 |-.._disp|layrainb|
|00005970| 6f 77 30 3a 20 20 20 20 | 20 20 3b 64 31 3d 72 65 |ow0: | ;d1=re|
|00005980| 67 69 73 74 65 72 20 61 | 32 3d 70 61 6c 65 74 74 |gister a|2=palett|
|00005990| 65 20 64 33 3d 6f 66 66 | 73 65 74 00 20 20 80 81 |e d3=off|set. ..|
|000059a0| 23 30 2c 64 33 00 5f 64 | 69 73 70 6c 61 79 72 61 |#0,d3._d|isplayra|
|000059b0| 69 6e 62 6f 77 3a 00 20 | 20 80 7e 2e 6c 20 28 61 |inbow:. | .~.l (a|
|000059c0| 32 29 2c 61 32 3a 80 40 | 23 34 2c 61 32 00 20 20 |2),a2:.@|#4,a2. |
|000059d0| 80 7e 2e 6c 20 21 6d 7b | 63 75 73 74 6f 6d 73 7d |.~.l !m{|customs}|
|000059e0| 2c 61 31 3a 80 40 23 31 | 2c 64 33 3a 80 44 23 32 |,a1:.@#1|,d3:.D#2|
|000059f0| 2c 64 33 3a 80 3d 20 64 | 33 2c 61 31 3a 80 7e 20 |,d3:.= d|3,a1:.~ |
|00005a00| 21 6d 7b 63 70 6c 69 6e | 65 7d 2c 64 35 00 20 20 |!m{cplin|e},d5. |
|00005a10| 80 b0 20 21 6d 7b 61 67 | 61 7d 3a 80 51 20 65 63 |.. !m{ag|a}:.Q ec|
|00005a20| 73 72 61 69 6e 62 6f 77 | 00 61 67 61 72 61 69 6e |srainbow|.agarain|
|00005a30| 62 6f 77 3a 00 20 20 80 | 3d 23 31 36 2c 64 33 3a |bow:. .|=#16,d3:|
|00005a40| 80 5c 20 64 35 2c 64 33 | 3a 80 4a 20 6c 69 6e 65 |.\ d5,d3|:.J line|
|00005a50| 72 72 00 20 20 80 7e 20 | 64 31 2c 64 36 3a 80 42 |rr. .~ |d1,d6:.B|
|00005a60| 23 24 65 30 2c 64 36 3a | 80 44 23 38 2c 64 36 3a |#$e0,d6:|.D#8,d6:|
|00005a70| 80 7e 2e 6c 23 24 31 30 | 36 30 30 30 30 2c 64 33 |.~.l#$10|60000,d3|
|00005a80| 3a 80 7e 21 6d 7b 62 70 | 6c 63 6f 6e 33 7d 2c 64 |:.~!m{bp|lcon3},d|
|00005a90| 33 3a 80 8a 20 64 36 2c | 64 33 00 20 20 80 7e 20 |3:.. d6,|d3. .~ |
|00005aa0| 64 31 2c 64 36 3a 80 42 | 23 24 31 66 2c 64 36 3a |d1,d6:.B|#$1f,d6:|
|00005ab0| 80 3d 20 64 36 2c 64 36 | 3a 80 3d 23 24 31 38 30 |.= d6,d6|:.=#$180|
|00005ac0| 2c 64 36 3a 80 ac 20 64 | 36 3a 80 7e 20 21 6d 7b |,d6:.. d|6:.~ !m{|
|00005ad0| 68 65 69 67 68 74 7d 2c | 64 37 3a 80 aa 23 32 2c |height},|d7:..#2,|
|00005ae0| 64 37 00 68 78 63 68 3a | 00 20 20 80 82 2e 6c 20 |d7.hxch:|. ...l |
|00005af0| 28 61 32 29 2b 2c 64 30 | 2d 64 32 00 20 20 80 8e |(a2)+,d0|-d2. ..|
|00005b00| 2e 6c 23 34 2c 64 30 3a | 80 7e 20 64 30 2c 64 31 |.l#4,d0:|.~ d0,d1|
|00005b10| 3a 80 8e 2e 6c 23 34 2c | 64 31 3a 80 7e 20 64 31 |:...l#4,|d1:.~ d1|
|00005b20| 2c 64 32 3a 80 8e 2e 6c | 23 34 2c 64 32 00 20 20 |,d2:...l|#4,d2. |
|00005b30| 80 7e 20 64 32 2c 64 36 | 3a 80 82 2e 6c 20 64 33 |.~ d2,d6|:...l d3|
|00005b40| 2f 64 36 2c 28 61 31 29 | 3a 80 54 20 23 39 2c 64 |/d6,(a1)|:.T #9,d|
|00005b50| 33 00 20 20 80 8e 2e 6c | 23 34 2c 64 30 3a 80 7e |3. ...l|#4,d0:.~|
|00005b60| 20 64 30 2c 64 31 3a 80 | 8e 2e 6c 23 34 2c 64 31 | d0,d1:.|..l#4,d1|
|00005b70| 3a 80 7e 20 64 31 2c 64 | 32 3a 80 8e 2e 6c 23 34 |:.~ d1,d|2:...l#4|
|00005b80| 2c 64 32 00 20 20 80 7e | 20 64 32 2c 64 36 3a 80 |,d2. .~| d2,d6:.|
|00005b90| 82 2e 6c 20 64 33 2f 64 | 36 2c 38 28 61 31 29 3a |..l d3/d|6,8(a1):|
|00005ba0| 80 54 20 23 39 2c 64 33 | 00 20 20 80 3d 20 64 35 |.T #9,d3|. .= d5|
|00005bb0| 2c 61 31 3a 80 6f 20 64 | 37 2c 68 78 63 68 3a 80 |,a1:.o d|7,hxch:.|
|00005bc0| 94 00 65 63 73 72 61 69 | 6e 62 6f 77 3a 00 20 20 |..ecsrai|nbow:. |
|00005bd0| 80 40 23 34 2c 64 33 3a | 80 5c 20 64 35 2c 64 33 |.@#4,d3:|.\ d5,d3|
|00005be0| 3a 80 4a 20 6c 69 6e 65 | 72 72 3a 80 3d 20 64 31 |:.J line|rr:.= d1|
|00005bf0| 2c 64 31 3a 80 3d 23 24 | 31 38 30 2c 64 31 3a 80 |,d1:.=#$|180,d1:.|
|00005c00| 7e 20 21 6d 7b 68 65 69 | 67 68 74 7d 2c 64 37 3a |~ !m{hei|ght},d7:|
|00005c10| 80 aa 23 32 2c 64 37 00 | 61 78 63 68 3a 00 20 20 |..#2,d7.|axch:. |
|00005c20| 80 82 2e 6c 20 28 61 32 | 29 2b 2c 64 32 2d 64 34 |...l (a2|)+,d2-d4|
|00005c30| 3a 80 8e 2e 6c 23 34 2c | 64 32 3a 80 7e 20 64 32 |:...l#4,|d2:.~ d2|
|00005c40| 2c 64 33 3a 80 8e 2e 6c | 23 34 2c 64 33 3a 80 7e |,d3:...l|#4,d3:.~|
|00005c50| 20 64 33 2c 64 34 3a 80 | 8e 2e 6c 23 34 2c 64 34 | d3,d4:.|..l#4,d4|
|00005c60| 00 20 20 80 82 20 64 31 | 2f 64 34 2c 28 61 31 29 |. .. d1|/d4,(a1)|
|00005c70| 3a 80 3d 20 64 35 2c 61 | 31 3a 80 6f 20 64 37 2c |:.= d5,a|1:.o d7,|
|00005c80| 61 78 63 68 3a 80 94 00 | 00 5f 64 69 73 70 6c 61 |axch:...|._displa|
|00005c90| 79 72 67 62 30 3a 20 20 | 20 20 20 20 20 20 20 20 |yrgb0: | |
|00005ca0| 3b 72 65 67 20 6c 69 6e | 65 20 72 20 67 20 62 20 |;reg lin|e r g b |
|00005cb0| 6f 66 66 00 20 20 80 7a | 20 62 6c 61 68 2b 32 28 |off. .z| blah+2(|
|00005cc0| 70 63 29 2c 61 32 00 5f | 64 69 73 70 6c 61 79 72 |pc),a2._|displayr|
|00005cd0| 67 62 3a 00 20 20 80 7e | 2e 6c 20 21 6d 7b 63 75 |gb:. .~|.l !m{cu|
|00005ce0| 73 74 6f 6d 73 7d 2c 61 | 31 3a 80 7e 20 2d 28 61 |stoms},a|1:.~ -(a|
|00005cf0| 32 29 2c 64 36 3a 80 40 | 23 31 2c 64 36 3a 80 44 |2),d6:.@|#1,d6:.D|
|00005d00| 23 32 2c 64 36 3a 80 3d | 20 64 36 2c 61 31 00 20 |#2,d6:.=| d6,a1. |
|00005d10| 20 80 7e 20 21 6d 7b 63 | 70 6c 69 6e 65 7d 2c 64 | .~ !m{c|pline},d|
|00005d20| 37 3a 80 84 20 64 37 2c | 64 32 3a 80 3d 2e 6c 20 |7:.. d7,|d2:.=.l |
|00005d30| 64 32 2c 61 31 3a 80 b0 | 20 21 6d 7b 61 67 61 7d |d2,a1:..| !m{aga}|
|00005d40| 3a 80 51 20 65 63 73 72 | 67 62 62 00 61 67 61 72 |:.Q ecsr|gbb.agar|
|00005d50| 67 62 62 3a 00 20 20 80 | 3d 23 31 36 2c 64 36 3a |gbb:. .|=#16,d6:|
|00005d60| 80 5c 20 64 37 2c 64 36 | 3a 80 4a 20 6c 69 6e 65 |.\ d7,d6|:.J line|
|00005d70| 72 72 00 20 20 80 7e 20 | 64 31 2c 64 36 3a 80 42 |rr. .~ |d1,d6:.B|
|00005d80| 23 24 65 30 2c 64 36 3a | 80 44 23 38 2c 64 36 3a |#$e0,d6:|.D#8,d6:|
|00005d90| 80 7e 2e 6c 23 24 31 30 | 36 30 30 30 30 2c 64 32 |.~.l#$10|60000,d2|
|00005da0| 3a 80 7e 21 6d 7b 62 70 | 6c 63 6f 6e 33 7d 2c 64 |:.~!m{bp|lcon3},d|
|00005db0| 32 3a 80 8a 20 64 36 2c | 64 32 00 20 20 80 7e 20 |2:.. d6,|d2. .~ |
|00005dc0| 64 31 2c 64 36 3a 80 42 | 23 24 31 66 2c 64 36 3a |d1,d6:.B|#$1f,d6:|
|00005dd0| 80 3d 20 64 36 2c 64 36 | 3a 80 3d 23 24 31 38 30 |.= d6,d6|:.=#$180|
|00005de0| 2c 64 36 3a 80 ac 20 64 | 36 00 20 20 80 7e 20 64 |,d6:.. d|6. .~ d|
|00005df0| 33 2c 64 36 3a 80 8e 23 | 34 2c 64 36 3a 80 7e 2e |3,d6:..#|4,d6:.~.|
|00005e00| 62 20 64 34 2c 64 36 3a | 80 8e 23 34 2c 64 36 3a |b d4,d6:|..#4,d6:|
|00005e10| 80 7e 2e 62 20 64 35 2c | 64 36 3a 80 7d 23 34 2c |.~.b d5,|d6:.}#4,|
|00005e20| 64 36 00 20 20 80 82 2e | 6c 20 64 32 2f 64 36 2c |d6. ...|l d2/d6,|
|00005e30| 28 61 31 29 3a 80 54 20 | 23 39 2c 64 32 3a 80 7e |(a1):.T |#9,d2:.~|
|00005e40| 20 64 35 2c 64 36 3a 80 | 8f 23 34 2c 64 36 3a 80 | d5,d6:.|.#4,d6:.|
|00005e50| 7e 2e 62 20 64 34 2c 64 | 36 3a 80 8f 23 34 2c 64 |~.b d4,d|6:..#4,d|
|00005e60| 36 00 20 20 80 7e 2e 62 | 20 64 33 2c 64 36 3a 80 |6. .~.b| d3,d6:.|
|00005e70| 8e 23 38 2c 64 36 3a 80 | 82 2e 6c 20 64 32 2f 64 |.#8,d6:.|..l d2/d|
|00005e80| 36 2c 38 28 61 31 29 3a | 80 94 00 65 63 73 72 67 |6,8(a1):|...ecsrg|
|00005e90| 62 62 3a 00 20 20 80 40 | 23 34 2c 64 36 3a 80 5c |bb:. .@|#4,d6:.\|
|00005ea0| 20 64 37 2c 64 36 3a 80 | 4a 20 6c 69 6e 65 72 72 | d7,d6:.|J linerr|
|00005eb0| 3a 80 3d 20 64 31 2c 64 | 31 3a 80 3d 23 24 31 38 |:.= d1,d|1:.=#$18|
|00005ec0| 30 2c 64 31 00 20 20 80 | 8f 23 34 2c 64 35 3a 80 |0,d1. .|.#4,d5:.|
|00005ed0| 7e 2e 62 20 64 34 2c 64 | 35 3a 80 8f 23 34 2c 64 |~.b d4,d|5:..#4,d|
|00005ee0| 35 3a 80 7e 2e 62 20 64 | 33 2c 64 35 3a 80 8e 23 |5:.~.b d|3,d5:..#|
|00005ef0| 38 2c 64 35 3a 80 82 20 | 64 31 2f 64 35 2c 28 61 |8,d5:.. |d1/d5,(a|
|00005f00| 31 29 3a 80 94 00 00 62 | 6c 61 68 3a 80 25 20 30 |1):....b|lah:.% 0|
|00005f10| 00 00 5f 64 69 73 70 6c | 61 79 75 73 65 72 30 3a |.._displ|ayuser0:|
|00005f20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 6c 69 | | ;li|
|00005f30| 6e 65 2c 73 74 72 69 6e | 67 2c 6f 66 66 73 65 74 |ne,strin|g,offset|
|00005f40| 00 20 20 80 81 23 30 2c | 64 33 00 5f 64 69 73 70 |. ..#0,|d3._disp|
|00005f50| 6c 61 79 75 73 65 72 3a | 00 20 20 80 7e 2e 6c 20 |layuser:|. .~.l |
|00005f60| 21 6d 7b 63 75 73 74 6f | 6d 73 7d 2c 61 31 3a 80 |!m{custo|ms},a1:.|
|00005f70| 40 23 31 2c 64 33 3a 80 | 44 23 32 2c 64 33 3a 80 |@#1,d3:.|D#2,d3:.|
|00005f80| 3d 20 64 33 2c 61 31 00 | 20 20 80 7e 20 21 6d 7b |= d3,a1.| .~ !m{|
|00005f90| 63 70 6c 69 6e 65 7d 2c | 64 37 3a 80 84 20 64 37 |cpline},|d7:.. d7|
|00005fa0| 2c 64 31 3a 80 3d 2e 6c | 20 64 31 2c 61 31 3a 80 |,d1:.=.l| d1,a1:.|
|00005fb0| 7e 2e 6c 20 2d 28 61 32 | 29 2c 64 30 00 20 20 80 |~.l -(a2|),d0. .|
|00005fc0| 3d 20 64 30 2c 64 33 3a | 80 5c 20 64 37 2c 64 33 |= d0,d3:|.\ d7,d3|
|00005fd0| 3a 80 4a 20 6c 69 6e 65 | 72 72 3a 80 7d 23 31 2c |:.J line|rr:.}#1,|
|00005fe0| 64 30 3a 80 47 20 66 72 | 65 61 6b 65 72 72 3a 80 |d0:.G fr|eakerr:.|
|00005ff0| 7d 23 31 2c 64 30 3a 80 | 47 20 66 72 65 61 6b 65 |}#1,d0:.|G freake|
|00006000| 72 72 00 20 20 80 48 20 | 64 75 6e 62 6f 3a 80 aa |rr. .H |dunbo:..|
|00006010| 23 31 2c 64 30 3a 80 7e | 2e 6c 20 64 32 2c 61 30 |#1,d0:.~|.l d2,a0|
|00006020| 3a 6e 78 6c 3a 80 7e 2e | 6c 20 28 61 30 29 2b 2c |:nxl:.~.|l (a0)+,|
|00006030| 28 61 31 29 2b 3a 80 6f | 20 64 30 2c 6e 78 6c 3a |(a1)+:.o| d0,nxl:|
|00006040| 64 75 6e 62 6f 3a 80 94 | 00 00 3b 2d 2d 2d 2d 2d |dunbo:..|..;-----|
|00006050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006070| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006080| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 00 3b 20 |--------|-----.; |
|000060a0| 6e 65 77 20 63 75 73 74 | 6f 6d 20 63 6f 70 70 65 |new cust|om coppe|
|000060b0| 72 20 72 6f 75 74 69 6e | 65 73 20 66 6f 72 20 65 |r routin|es for e|
|000060c0| 66 66 65 63 74 73 20 2a | 2a 2a 2a 2a 2a 2a 2a 2a |ffects *|********|
|000060d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000060e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 00 3b 2d 2d |********|****.;--|
|000060f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006100| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006110| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006120| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006130| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006140| 00 00 73 68 69 66 73 3a | 80 25 2e 77 20 31 2c 34 |..shifs:|.%.w 1,4|
|00006150| 2c 32 2c 35 2c 32 2c 35 | 2c 33 2c 36 00 66 6c 75 |,2,5,2,5|,3,6.flu|
|00006160| 70 73 3a 80 25 2e 62 20 | 30 2c 31 2c 31 2c 32 00 |ps:.%.b |0,1,1,2.|
|00006170| 00 5f 64 69 73 70 6c 61 | 79 73 63 72 6f 6c 6c 30 |._displa|yscroll0|
|00006180| 3a 20 20 20 20 20 3b 64 | 31 3d 26 64 65 6c 74 61 |: ;d|1=&delta|
|00006190| 73 30 20 64 32 3d 26 64 | 65 6c 74 61 73 31 20 64 |s0 d2=&d|eltas1 d|
|000061a0| 33 3d 63 63 6f 66 66 00 | 20 20 80 81 23 30 2c 64 |3=ccoff.| ..#0,d|
|000061b0| 33 00 00 5f 64 69 73 70 | 6c 61 79 73 63 72 6f 6c |3.._disp|layscrol|
|000061c0| 6c 3a 00 20 20 80 7e 2e | 6c 20 61 34 2c 2d 28 61 |l:. .~.|l a4,-(a|
|000061d0| 37 29 3a 80 7e 2e 62 20 | 21 6d 7b 72 65 73 7d 2c |7):.~.b |!m{res},|
|000061e0| 64 30 3a 80 7e 20 64 30 | 2c 64 36 3a 80 42 23 33 |d0:.~ d0|,d6:.B#3|
|000061f0| 2c 64 30 3a 80 7e 2e 6c | 23 24 66 66 66 66 66 2c |,d0:.~.l|#$fffff,|
|00006200| 64 34 00 20 20 80 42 23 | 24 33 30 2c 64 36 3a 80 |d4. .B#|$30,d6:.|
|00006210| 7d 23 32 2c 64 36 3a 80 | 7e 2e 6c 20 73 68 69 66 |}#2,d6:.|~.l shif|
|00006220| 73 28 70 63 2c 64 36 29 | 2c 64 35 00 20 20 80 7d |s(pc,d6)|,d5. .}|
|00006230| 23 32 2c 64 36 3a 80 7e | 2e 62 20 66 6c 75 70 73 |#2,d6:.~|.b flups|
|00006240| 28 70 63 2c 64 36 29 2c | 64 36 3a 80 44 2e 6c 20 |(pc,d6),|d6:.D.l |
|00006250| 64 36 2c 64 34 3a 80 40 | 23 36 2c 64 36 3a 80 a7 |d6,d4:.@|#6,d6:..|
|00006260| 20 64 30 2c 64 36 00 20 | 20 80 7e 2e 6c 20 21 6d | d0,d6. | .~.l !m|
|00006270| 7b 63 75 73 74 6f 6d 73 | 7d 2c 61 34 3a 80 40 23 |{customs|},a4:.@#|
|00006280| 31 2c 64 33 3a 80 44 23 | 32 2c 64 33 3a 80 3d 20 |1,d3:.D#|2,d3:.= |
|00006290| 64 33 2c 61 34 00 20 20 | 80 3d 23 31 32 2c 64 33 |d3,a4. |.=#12,d3|
|000062a0| 3a 80 5c 20 21 6d 7b 63 | 70 6c 69 6e 65 7d 2c 64 |:.\ !m{c|pline},d|
|000062b0| 33 3a 80 4a 20 6c 69 6e | 65 72 72 3a 80 7e 20 21 |3:.J lin|err:.~ !|
|000062c0| 6d 7b 68 65 69 67 68 74 | 7d 2c 64 37 3a 80 aa 23 |m{height|},d7:..#|
|000062d0| 32 2c 64 37 3a 80 7e 20 | 64 37 2c 79 63 6f 6e 74 |2,d7:.~ |d7,ycont|
|000062e0| 00 20 20 80 7e 2e 6c 20 | 64 31 2c 61 30 3a 80 7e |. .~.l |d1,a0:.~|
|000062f0| 2e 6c 20 64 32 2c 61 31 | 3a 80 82 2e 6c 20 21 6d |.l d2,a1|:...l !m|
|00006300| 7b 78 30 7d 2c 64 30 2d | 64 31 3a 80 42 2e 6c 20 |{x0},d0-|d1:.B.l |
|00006310| 64 34 2c 64 30 3a 80 42 | 2e 6c 20 64 34 2c 64 31 |d4,d0:.B|.l d4,d1|
|00006320| 00 20 20 80 7e 2e 6c 20 | 21 6d 7b 62 70 6c 61 6e |. .~.l |!m{bplan|
|00006330| 65 73 7d 2c 61 32 3a 80 | 82 2e 6c 20 2d 31 32 28 |es},a2:.|..l -12(|
|00006340| 61 32 29 2c 64 32 2d 64 | 34 3a 80 82 20 64 33 2f |a2),d2-d|4:.. d3/|
|00006350| 64 34 2c 6d 6f 64 73 3a | 80 7a 20 62 70 31 28 70 |d4,mods:|.z bp1(p|
|00006360| 63 29 2c 61 32 00 6e 78 | 6c 69 73 63 3a 00 20 20 |c),a2.nx|lisc:. |
|00006370| 80 7e 2e 6c 20 64 32 2c | 28 61 34 29 00 20 20 80 |.~.l d2,|(a4). .|
|00006380| 3d 2e 6c 20 28 61 30 29 | 2b 2c 64 30 3a 80 3d 2e |=.l (a0)|+,d0:.=.|
|00006390| 6c 20 28 61 31 29 2b 2c | 64 31 20 20 20 20 20 20 |l (a1)+,|d1 |
|000063a0| 20 20 20 20 20 3b 61 64 | 64 20 64 65 6c 74 61 00 | ;ad|d delta.|
|000063b0| 20 20 80 45 2e 6c 20 64 | 35 2c 64 30 3a 80 45 2e | .E.l d|5,d0:.E.|
|000063c0| 6c 20 64 35 2c 64 31 3a | 80 ac 20 64 35 20 20 20 |l d5,d1:|.. d5 |
|000063d0| 20 20 20 20 20 20 3b 73 | 68 69 66 74 20 74 6f 20 | ;s|hift to |
|000063e0| 66 65 74 63 68 20 77 69 | 64 74 68 00 20 20 80 ac |fetch wi|dth. ..|
|000063f0| 20 64 30 3a 80 ac 20 64 | 31 3a 80 7e 20 64 30 2c | d0:.. d|1:.~ d0,|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.