home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1994-09-03 | 16.9 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| gt2
| Kopftext: ';*****************************************'
| default (weak)
| |
| 100%
| ffprobeID
| raw H.263 (h263)
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 2a 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 00 3b 2a 20 20 20 |********|**.;* |
|00000030| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000040| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000050| 20 20 20 20 2a 00 3b 2a | 20 50 41 4c 45 54 54 45 | *.;*| PALETTE|
|00000060| 4c 49 42 20 2d 20 68 6f | 6c 64 73 20 63 6f 6c 6f |LIB - ho|lds colo|
|00000070| 75 72 20 61 6e 64 20 63 | 79 63 6c 69 6e 67 20 2a |ur and c|ycling *|
|00000080| 00 3b 2a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.;* | |
|00000090| 20 69 6e 66 6f 72 6d 61 | 74 69 6f 6e 20 20 20 20 | informa|tion |
|000000a0| 20 20 20 20 20 20 20 20 | 20 20 2a 00 3b 2a 20 20 | | *.;* |
|000000b0| 20 20 20 20 20 20 20 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 2a 00 3b | 2a 2a 2a 2a 2a 2a 2a 2a | *.;|********|
|000000e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000100| 2a 00 00 21 6c 69 62 68 | 65 61 64 65 72 7b 23 70 |*..!libh|eader{#p|
|00000110| 61 6c 65 74 74 65 6c 69 | 62 2c 69 6e 69 74 2c 31 |aletteli|b,init,1|
|00000120| 2c 66 69 6e 69 74 2c 65 | 72 72 6f 72 73 7d 00 00 |,finit,e|rrors}..|
|00000130| 21 61 73 74 61 74 65 6d | 65 6e 74 00 21 61 72 67 |!astatem|ent.!arg|
|00000140| 73 7b 32 2c 37 7d 00 21 | 6c 69 62 73 7b 23 70 61 |s{2,7}.!|libs{#pa|
|00000150| 6c 65 74 74 65 6c 69 62 | 2c 23 69 61 31 7c 23 70 |lettelib|,#ia1|#p|
|00000160| 64 30 7d 00 21 73 75 62 | 73 7b 64 6f 70 61 6c 6c |d0}.!sub|s{dopall|
|00000170| 6f 61 64 2b 31 2c 30 2c | 30 7d 00 21 61 72 67 73 |oad+1,0,|0}.!args|
|00000180| 7b 32 2c 37 2c 32 7d 00 | 21 6c 69 62 73 7b 23 70 |{2,7,2}.|!libs{#p|
|00000190| 61 6c 65 74 74 65 6c 69 | 62 2c 23 69 61 31 7c 23 |aletteli|b,#ia1|#|
|000001a0| 70 64 30 7d 00 21 73 75 | 62 73 7b 64 6f 70 61 6c |pd0}.!su|bs{dopal|
|000001b0| 6c 6f 61 64 32 2b 31 2c | 30 2c 30 7d 20 3b 2a 2a |load2+1,|0,0} ;**|
|000001c0| 2a 2a 2a 00 21 6e 61 6d | 65 7b 22 4c 6f 61 64 50 |***.!nam|e{"LoadP|
|000001d0| 61 6c 65 74 74 65 22 2c | 22 50 61 6c 65 74 74 65 |alette",|"Palette|
|000001e0| 23 2c 46 69 6c 65 6e 61 | 6d 65 24 5b 2c 50 61 6c |#,Filena|me$[,Pal|
|000001f0| 65 74 74 65 20 4f 66 66 | 73 65 74 5d 22 7d 00 00 |ette Off|set]"}..|
|00000200| 21 61 73 74 61 74 65 6d | 65 6e 74 00 21 61 72 67 |!astatem|ent.!arg|
|00000210| 73 7b 32 7d 00 21 6c 69 | 62 73 7b 23 70 61 6c 65 |s{2}.!li|bs{#pale|
|00000220| 74 74 65 6c 69 62 2c 24 | 31 33 38 30 2c 23 73 63 |ttelib,$|1380,#sc|
|00000230| 72 65 65 6e 73 6c 69 62 | 2c 24 31 32 30 32 7d 00 |reenslib|,$1202}.|
|00000240| 21 73 75 62 73 7b 64 6f | 63 79 63 6c 65 2b 31 2c |!subs{do|cycle+1,|
|00000250| 64 6f 63 79 63 6c 65 63 | 68 6b 2c 30 7d 00 21 6e |docyclec|hk,0}.!n|
|00000260| 61 6d 65 7b 22 43 79 63 | 6c 65 22 2c 22 50 61 6c |ame{"Cyc|le","Pal|
|00000270| 65 74 74 65 23 22 7d 20 | 20 20 3b 2a 2a 2a 2a 2a |ette#"} | ;*****|
|00000280| 00 00 21 6e 75 6c 6c 73 | 75 62 7b 67 65 74 70 61 |..!nulls|ub{getpa|
|00000290| 6c 2c 30 2c 30 7d 00 00 | 21 6e 75 6c 6c 73 75 62 |l,0,0}..|!nullsub|
|000002a0| 7b 67 65 74 70 61 6c 32 | 2c 30 2c 30 7d 00 00 21 |{getpal2|,0,0}..!|
|000002b0| 61 73 74 61 74 65 6d 65 | 6e 74 00 21 61 72 67 73 |astateme|nt.!args|
|000002c0| 7b 32 2c 32 2c 32 2c 32 | 7d 00 21 6c 69 62 73 7b |{2,2,2,2|}.!libs{|
|000002d0| 23 67 72 61 70 68 69 63 | 73 6c 69 62 2c 24 35 36 |#graphic|slib,$56|
|000002e0| 30 30 2c 23 73 63 72 65 | 65 6e 73 6c 69 62 2c 24 |00,#scre|enslib,$|
|000002f0| 35 30 30 32 2c 23 62 6c | 69 74 7a 63 6f 70 6c 69 |5002,#bl|itzcopli|
|00000300| 62 2c 24 39 30 30 32 7d | 00 21 73 75 62 73 7b 64 |b,$9002}|.!subs{d|
|00000310| 6f 72 67 62 2c 72 67 62 | 63 68 6b 2c 30 7d 20 20 |orgb,rgb|chk,0} |
|00000320| 20 3b 2a 2a 2a 2a 2a 00 | 21 6e 61 6d 65 7b 22 52 | ;*****.|!name{"R|
|00000330| 47 42 22 2c 22 43 6f 6c | 6f 75 72 20 52 65 67 69 |GB","Col|our Regi|
|00000340| 73 74 65 72 2c 52 65 64 | 2c 47 72 65 65 6e 2c 42 |ster,Red|,Green,B|
|00000350| 6c 75 65 22 7d 00 00 21 | 61 66 75 6e 63 74 69 6f |lue"}..!|afunctio|
|00000360| 6e 7b 32 7d 00 21 61 72 | 67 73 7b 32 7d 00 21 6c |n{2}.!ar|gs{2}.!l|
|00000370| 69 62 73 7b 23 67 72 61 | 70 68 69 63 73 6c 69 62 |ibs{#gra|phicslib|
|00000380| 2c 24 35 36 30 30 2c 23 | 73 63 72 65 65 6e 73 6c |,$5600,#|screensl|
|00000390| 69 62 2c 24 35 30 30 32 | 2c 23 62 6c 69 74 7a 63 |ib,$5002|,#blitzc|
|000003a0| 6f 70 6c 69 62 2c 24 39 | 30 30 32 7d 00 21 73 75 |oplib,$9|002}.!su|
|000003b0| 62 73 7b 64 6f 72 65 64 | 2c 63 6f 6c 63 68 6b 2c |bs{dored|,colchk,|
|000003c0| 30 7d 00 21 6e 61 6d 65 | 7b 22 52 65 64 22 2c 22 |0}.!name|{"Red","|
|000003d0| 28 43 6f 6c 6f 75 72 20 | 52 65 67 69 73 74 65 72 |(Colour |Register|
|000003e0| 29 22 7d 20 20 20 20 3b | 2a 2a 2a 2a 2a 00 00 21 |)"} ;|*****..!|
|000003f0| 61 66 75 6e 63 74 69 6f | 6e 7b 32 7d 00 21 61 72 |afunctio|n{2}.!ar|
|00000400| 67 73 7b 32 7d 00 21 6c | 69 62 73 7b 23 67 72 61 |gs{2}.!l|ibs{#gra|
|00000410| 70 68 69 63 73 6c 69 62 | 2c 24 35 36 30 30 2c 23 |phicslib|,$5600,#|
|00000420| 73 63 72 65 65 6e 73 6c | 69 62 2c 24 35 30 30 32 |screensl|ib,$5002|
|00000430| 2c 23 62 6c 69 74 7a 63 | 6f 70 6c 69 62 2c 24 39 |,#blitzc|oplib,$9|
|00000440| 30 30 32 7d 00 21 73 75 | 62 73 7b 64 6f 67 72 65 |002}.!su|bs{dogre|
|00000450| 65 6e 2c 63 6f 6c 63 68 | 6b 2c 30 7d 00 21 6e 61 |en,colch|k,0}.!na|
|00000460| 6d 65 7b 22 47 72 65 65 | 6e 22 2c 22 28 43 6f 6c |me{"Gree|n","(Col|
|00000470| 6f 75 72 20 52 65 67 69 | 73 74 65 72 29 22 7d 20 |our Regi|ster)"} |
|00000480| 20 3b 2a 2a 2a 2a 2a 00 | 00 21 61 66 75 6e 63 74 | ;*****.|.!afunct|
|00000490| 69 6f 6e 7b 32 7d 00 21 | 61 72 67 73 7b 32 7d 00 |ion{2}.!|args{2}.|
|000004a0| 21 6c 69 62 73 7b 23 67 | 72 61 70 68 69 63 73 6c |!libs{#g|raphicsl|
|000004b0| 69 62 2c 24 35 36 30 30 | 2c 23 73 63 72 65 65 6e |ib,$5600|,#screen|
|000004c0| 73 6c 69 62 2c 24 35 30 | 30 32 2c 23 62 6c 69 74 |slib,$50|02,#blit|
|000004d0| 7a 63 6f 70 6c 69 62 2c | 24 39 30 30 32 7d 00 21 |zcoplib,|$9002}.!|
|000004e0| 73 75 62 73 7b 64 6f 62 | 6c 75 65 2c 63 6f 6c 63 |subs{dob|lue,colc|
|000004f0| 68 6b 2c 30 7d 00 21 6e | 61 6d 65 7b 22 42 6c 75 |hk,0}.!n|ame{"Blu|
|00000500| 65 22 2c 22 28 43 6f 6c | 6f 75 72 20 52 65 67 69 |e","(Col|our Regi|
|00000510| 73 74 65 72 29 22 7d 20 | 20 20 3b 2a 2a 2a 2a 2a |ster)"} | ;*****|
|00000520| 00 00 21 64 75 6d 74 6f | 6b 65 7b 22 50 61 6c 65 |..!dumto|ke{"Pale|
|00000530| 74 74 65 22 2c 22 63 6f | 6c 6f 75 72 20 61 6e 64 |tte","co|lour and|
|00000540| 20 63 79 63 6c 69 6e 67 | 20 69 6e 66 6f 72 6d 61 | cycling| informa|
|00000550| 74 69 6f 6e 22 2c 5f 74 | 6f 6b 65 7d 00 00 21 61 |tion",_t|oke}..!a|
|00000560| 73 74 61 74 65 6d 65 6e | 74 00 21 61 72 67 73 7b |statemen|t.!args{|
|00000570| 32 2c 32 2c 32 2c 32 2c | 32 7d 00 21 6c 69 62 73 |2,2,2,2,|2}.!libs|
|00000580| 7b 23 70 61 6c 65 74 74 | 65 6c 69 62 2c 24 31 30 |{#palett|elib,$10|
|00000590| 38 30 7d 00 21 73 75 62 | 73 7b 64 6f 34 62 69 74 |80}.!sub|s{do4bit|
|000005a0| 70 61 6c 72 67 62 2c 70 | 72 67 62 63 68 6b 2c 30 |palrgb,p|rgbchk,0|
|000005b0| 7d 20 20 20 3b 2a 2a 2a | 2a 2a 00 21 6e 61 6d 65 |} ;***|**.!name|
|000005c0| 7b 22 50 61 6c 52 47 42 | 22 2c 22 50 61 6c 65 74 |{"PalRGB|","Palet|
|000005d0| 74 65 23 2c 43 6f 6c 6f | 75 72 20 52 65 67 69 73 |te#,Colo|ur Regis|
|000005e0| 74 65 72 2c 52 65 64 2c | 47 72 65 65 6e 2c 42 6c |ter,Red,|Green,Bl|
|000005f0| 75 65 22 7d 00 00 21 61 | 73 74 61 74 65 6d 65 6e |ue"}..!a|statemen|
|00000600| 74 00 3b 00 21 61 72 67 | 73 7b 32 2c 32 2c 32 2c |t.;.!arg|s{2,2,2,|
|00000610| 32 7d 00 21 6c 69 62 73 | 7b 23 70 61 6c 65 74 74 |2}.!libs|{#palett|
|00000620| 65 6c 69 62 2c 24 31 30 | 38 30 7d 00 21 73 75 62 |elib,$10|80}.!sub|
|00000630| 73 7b 64 6f 73 65 74 63 | 79 63 6c 65 31 2c 73 65 |s{dosetc|ycle1,se|
|00000640| 74 63 79 63 6c 65 63 68 | 6b 2c 30 7d 00 3b 00 21 |tcyclech|k,0}.;.!|
|00000650| 61 72 67 73 7b 32 2c 32 | 2c 32 2c 32 2c 34 7d 00 |args{2,2|,2,2,4}.|
|00000660| 21 6c 69 62 73 7b 23 70 | 61 6c 65 74 74 65 6c 69 |!libs{#p|aletteli|
|00000670| 62 2c 24 31 30 38 30 7d | 00 21 73 75 62 73 7b 64 |b,$1080}|.!subs{d|
|00000680| 6f 73 65 74 63 79 63 6c | 65 32 2c 73 65 74 63 79 |osetcycl|e2,setcy|
|00000690| 63 6c 65 63 68 6b 32 2c | 30 7d 00 3b 00 21 6e 61 |clechk2,|0}.;.!na|
|000006a0| 6d 65 7b 22 53 65 74 43 | 79 63 6c 65 22 2c 22 50 |me{"SetC|ycle","P|
|000006b0| 61 6c 65 74 74 65 23 2c | 43 79 63 6c 65 2c 4c 6f |alette#,|Cycle,Lo|
|000006c0| 77 20 43 6f 6c 6f 75 72 | 2c 48 69 67 68 20 43 6f |w Colour|,High Co|
|000006d0| 6c 6f 75 72 5b 2c 53 70 | 65 65 64 5d 22 7d 00 00 |lour[,Sp|eed]"}..|
|000006e0| 21 61 73 74 61 74 65 6d | 65 6e 74 00 21 61 72 67 |!astatem|ent.!arg|
|000006f0| 73 00 21 6c 69 62 73 00 | 21 73 75 62 73 7b 64 6f |s.!libs.|!subs{do|
|00000700| 73 74 6f 70 63 79 63 6c | 65 2c 30 2c 30 7d 00 21 |stopcycl|e,0,0}.!|
|00000710| 6e 61 6d 65 7b 22 53 74 | 6f 70 43 79 63 6c 65 22 |name{"St|opCycle"|
|00000720| 2c 22 22 7d 00 00 21 61 | 73 74 61 74 65 6d 65 6e |,""}..!a|statemen|
|00000730| 74 00 21 61 72 67 73 7b | 32 2c 32 2c 32 2c 32 7d |t.!args{|2,2,2,2}|
|00000740| 00 21 6c 69 62 73 7b 23 | 73 63 72 65 65 6e 73 6c |.!libs{#|screensl|
|00000750| 69 62 2c 23 75 61 30 2c | 23 67 72 61 70 68 69 63 |ib,#ua0,|#graphic|
|00000760| 73 6c 69 62 2c 23 6c 61 | 36 7d 00 21 73 75 62 73 |slib,#la|6}.!subs|
|00000770| 7b 64 6f 61 61 72 67 62 | 2b 31 2c 61 61 72 67 62 |{doaargb|+1,aargb|
|00000780| 63 68 6b 2c 30 7d 20 20 | 20 3b 2a 2a 2a 2a 2a 00 |chk,0} | ;*****.|
|00000790| 21 6e 61 6d 65 7b 22 41 | 47 41 52 47 42 22 2c 22 |!name{"A|GARGB","|
|000007a0| 43 6f 6c 6f 75 72 20 52 | 65 67 69 73 74 65 72 2c |Colour R|egister,|
|000007b0| 52 65 64 2c 47 72 65 65 | 6e 2c 42 6c 75 65 22 7d |Red,Gree|n,Blue"}|
|000007c0| 00 00 21 61 73 74 61 74 | 65 6d 65 6e 74 00 21 61 |..!astat|ement.!a|
|000007d0| 72 67 73 7b 32 2c 32 2c | 32 2c 32 2c 32 7d 00 21 |rgs{2,2,|2,2,2}.!|
|000007e0| 6c 69 62 73 7b 23 70 61 | 6c 65 74 74 65 6c 69 62 |libs{#pa|lettelib|
|000007f0| 2c 24 31 30 38 30 7d 00 | 21 73 75 62 73 7b 64 6f |,$1080}.|!subs{do|
|00000800| 70 61 6c 72 67 62 2c 61 | 61 70 72 67 62 63 68 6b |palrgb,a|aprgbchk|
|00000810| 2c 30 7d 20 20 20 3b 2a | 2a 2a 2a 2a 00 21 6e 61 |,0} ;*|****.!na|
|00000820| 6d 65 7b 22 41 47 41 50 | 61 6c 52 47 42 22 2c 22 |me{"AGAP|alRGB","|
|00000830| 50 61 6c 65 74 74 65 23 | 2c 43 6f 6c 6f 75 72 20 |Palette#|,Colour |
|00000840| 52 65 67 69 73 74 65 72 | 2c 52 65 64 2c 47 72 65 |Register|,Red,Gre|
|00000850| 65 6e 2c 42 6c 75 65 22 | 7d 00 00 21 6e 75 6c 6c |en,Blue"|}..!null|
|00000860| 73 75 62 7b 6d 61 6b 65 | 34 62 69 74 72 67 62 73 |sub{make|4bitrgbs|
|00000870| 2c 30 2c 30 7d 00 00 21 | 61 66 75 6e 63 74 69 6f |,0,0}..!|afunctio|
|00000880| 6e 7b 32 7d 00 21 61 72 | 67 73 7b 32 7d 00 21 6c |n{2}.!ar|gs{2}.!l|
|00000890| 69 62 73 7b 23 73 63 72 | 65 65 6e 73 6c 69 62 2c |ibs{#scr|eenslib,|
|000008a0| 23 75 61 30 2c 23 67 72 | 61 70 68 69 63 73 6c 69 |#ua0,#gr|aphicsli|
|000008b0| 62 2c 23 6c 61 36 7d 00 | 21 73 75 62 73 7b 64 6f |b,#la6}.|!subs{do|
|000008c0| 61 67 61 72 65 64 2c 61 | 67 61 63 6f 6c 63 68 6b |agared,a|gacolchk|
|000008d0| 2c 30 7d 00 21 6e 61 6d | 65 7b 22 41 47 41 52 65 |,0}.!nam|e{"AGARe|
|000008e0| 64 22 2c 22 28 43 6f 6c | 6f 75 72 20 52 65 67 69 |d","(Col|our Regi|
|000008f0| 73 74 65 72 29 22 7d 20 | 20 20 20 3b 2a 2a 2a 2a |ster)"} | ;****|
|00000900| 2a 00 00 21 61 66 75 6e | 63 74 69 6f 6e 7b 32 7d |*..!afun|ction{2}|
|00000910| 00 21 61 72 67 73 7b 32 | 7d 00 21 6c 69 62 73 7b |.!args{2|}.!libs{|
|00000920| 23 73 63 72 65 65 6e 73 | 6c 69 62 2c 23 75 61 30 |#screens|lib,#ua0|
|00000930| 2c 23 67 72 61 70 68 69 | 63 73 6c 69 62 2c 23 6c |,#graphi|cslib,#l|
|00000940| 61 36 7d 00 21 73 75 62 | 73 7b 64 6f 61 67 61 67 |a6}.!sub|s{doagag|
|00000950| 72 65 65 6e 2c 61 67 61 | 63 6f 6c 63 68 6b 2c 30 |reen,aga|colchk,0|
|00000960| 7d 00 21 6e 61 6d 65 7b | 22 41 47 41 47 72 65 65 |}.!name{|"AGAGree|
|00000970| 6e 22 2c 22 28 43 6f 6c | 6f 75 72 20 52 65 67 69 |n","(Col|our Regi|
|00000980| 73 74 65 72 29 22 7d 20 | 20 3b 2a 2a 2a 2a 2a 00 |ster)"} | ;*****.|
|00000990| 00 21 61 66 75 6e 63 74 | 69 6f 6e 7b 32 7d 00 21 |.!afunct|ion{2}.!|
|000009a0| 61 72 67 73 7b 32 7d 00 | 21 6c 69 62 73 7b 23 73 |args{2}.|!libs{#s|
|000009b0| 63 72 65 65 6e 73 6c 69 | 62 2c 23 75 61 30 2c 23 |creensli|b,#ua0,#|
|000009c0| 67 72 61 70 68 69 63 73 | 6c 69 62 2c 23 6c 61 36 |graphics|lib,#la6|
|000009d0| 7d 00 21 73 75 62 73 7b | 64 6f 61 67 61 62 6c 75 |}.!subs{|doagablu|
|000009e0| 65 2c 61 67 61 63 6f 6c | 63 68 6b 2c 30 7d 00 21 |e,agacol|chk,0}.!|
|000009f0| 6e 61 6d 65 7b 22 41 47 | 41 42 6c 75 65 22 2c 22 |name{"AG|ABlue","|
|00000a00| 28 43 6f 6c 6f 75 72 20 | 52 65 67 69 73 74 65 72 |(Colour |Register|
|00000a10| 29 22 7d 20 20 20 3b 2a | 2a 2a 2a 2a 00 00 21 61 |)"} ;*|****..!a|
|00000a20| 73 74 61 74 65 6d 65 6e | 74 00 21 61 72 67 73 7b |statemen|t.!args{|
|00000a30| 32 7d 00 21 6c 69 62 73 | 7b 23 70 61 6c 65 74 74 |2}.!libs|{#palett|
|00000a40| 65 6c 69 62 2c 24 31 33 | 38 30 2c 23 73 63 72 65 |elib,$13|80,#scre|
|00000a50| 65 6e 73 6c 69 62 2c 24 | 35 32 30 32 2c 23 67 72 |enslib,$|5202,#gr|
|00000a60| 61 70 68 69 63 73 6c 69 | 62 2c 24 35 36 30 30 2c |aphicsli|b,$5600,|
|00000a70| 23 62 6c 69 74 7a 63 6f | 70 6c 69 62 2c 24 39 30 |#blitzco|plib,$90|
|00000a80| 30 32 7d 20 3b 2c 23 69 | 61 31 7c 23 70 64 30 00 |02} ;,#i|a1|#pd0.|
|00000a90| 21 73 75 62 73 7b 73 68 | 6f 77 70 61 6c 2c 73 68 |!subs{sh|owpal,sh|
|00000aa0| 6f 77 70 61 6c 63 68 6b | 2c 30 7d 00 21 6e 61 6d |owpalchk|,0}.!nam|
|00000ab0| 65 7b 22 53 68 6f 77 50 | 61 6c 65 74 74 65 22 2c |e{"ShowP|alette",|
|00000ac0| 22 50 61 6c 65 74 74 65 | 23 22 7d 20 20 20 3b 2a |"Palette|#"} ;*|
|00000ad0| 2a 2a 2a 2a 00 00 21 61 | 73 74 61 74 65 6d 65 6e |****..!a|statemen|
|00000ae0| 74 00 21 61 72 67 73 7b | 32 7d 00 21 6c 69 62 73 |t.!args{|2}.!libs|
|00000af0| 00 21 73 75 62 73 7b 6e | 65 77 70 61 6c 6d 6f 64 |.!subs{n|ewpalmod|
|00000b00| 65 2c 30 2c 30 7d 00 21 | 6e 61 6d 65 7b 22 4e 65 |e,0,0}.!|name{"Ne|
|00000b10| 77 50 61 6c 65 74 74 65 | 4d 6f 64 65 22 2c 22 4f |wPalette|Mode","O|
|00000b20| 6e 7c 4f 66 66 22 7d 00 | 00 21 61 73 74 61 74 65 |n|Off"}.|.!astate|
|00000b30| 6d 65 6e 74 00 21 61 72 | 67 73 7b 32 7d 00 21 6c |ment.!ar|gs{2}.!l|
|00000b40| 69 62 73 7b 23 70 61 6c | 65 74 74 65 6c 69 62 2c |ibs{#pal|ettelib,|
|00000b50| 24 31 32 38 30 7d 00 21 | 73 75 62 73 7b 5f 63 79 |$1280}.!|subs{_cy|
|00000b60| 63 6c 65 70 61 6c 65 74 | 74 65 2c 30 2c 30 7d 00 |clepalet|te,0,0}.|
|00000b70| 21 6e 61 6d 65 7b 22 43 | 79 63 6c 65 50 61 6c 65 |!name{"C|yclePale|
|00000b80| 74 74 65 22 2c 22 50 61 | 6c 65 74 74 65 23 22 7d |tte","Pa|lette#"}|
|00000b90| 00 00 21 61 73 74 61 74 | 65 6d 65 6e 74 00 21 61 |..!astat|ement.!a|
|00000ba0| 72 67 73 7b 23 77 6f 72 | 64 2c 23 77 6f 72 64 2c |rgs{#wor|d,#word,|
|00000bb0| 23 71 75 69 63 6b 7d 00 | 21 6c 69 62 73 7b 23 70 |#quick}.|!libs{#p|
|00000bc0| 61 6c 65 74 74 65 6c 69 | 62 2c 24 31 30 38 30 2c |aletteli|b,$1080,|
|00000bd0| 23 70 61 6c 65 74 74 65 | 6c 69 62 2c 24 31 31 38 |#palette|lib,$118|
|00000be0| 31 7d 00 21 73 75 62 73 | 7b 5f 66 61 64 65 70 61 |1}.!subs|{_fadepa|
|00000bf0| 6c 65 74 74 65 2c 30 2c | 30 7d 00 21 6e 61 6d 65 |lette,0,|0}.!name|
|00000c00| 7b 22 46 61 64 65 50 61 | 6c 65 74 74 65 22 2c 22 |{"FadePa|lette","|
|00000c10| 53 72 63 50 61 6c 65 74 | 74 65 23 2c 44 65 73 74 |SrcPalet|te#,Dest|
|00000c20| 50 61 6c 65 74 74 65 23 | 2c 42 72 69 67 68 74 6e |Palette#|,Brightn|
|00000c30| 65 73 73 2e 71 22 7d 00 | 00 21 61 73 74 61 74 65 |ess.q"}.|.!astate|
|00000c40| 6d 65 6e 74 00 21 61 72 | 67 73 7b 32 2c 32 7d 00 |ment.!ar|gs{2,2}.|
|00000c50| 21 6c 69 62 73 7b 23 70 | 61 6c 65 74 74 65 6c 69 |!libs{#p|aletteli|
|00000c60| 62 2c 24 31 33 38 30 7d | 00 21 73 75 62 73 7b 5f |b,$1380}|.!subs{_|
|00000c70| 69 6e 69 74 70 61 6c 65 | 74 74 65 2c 30 2c 30 7d |initpale|tte,0,0}|
|00000c80| 00 21 6e 61 6d 65 7b 22 | 49 6e 69 74 50 61 6c 65 |.!name{"|InitPale|
|00000c90| 74 74 65 22 2c 22 50 61 | 6c 65 74 74 65 23 2c 4e |tte","Pa|lette#,N|
|00000ca0| 75 6d 43 6f 6c 6f 72 73 | 22 7d 00 00 21 61 73 74 |umColors|"}..!ast|
|00000cb0| 61 74 65 6d 65 6e 74 00 | 21 61 72 67 73 7b 32 2c |atement.|!args{2,|
|00000cc0| 32 2c 32 2c 32 2c 32 2c | 32 2c 32 2c 32 2c 32 7d |2,2,2,2,|2,2,2,2}|
|00000cd0| 00 21 6c 69 62 73 7b 23 | 70 61 6c 65 74 74 65 6c |.!libs{#|palettel|
|00000ce0| 69 62 2c 24 31 33 38 30 | 7d 00 21 73 75 62 73 7b |ib,$1380|}.!subs{|
|00000cf0| 5f 70 61 6c 65 74 74 65 | 72 61 6e 67 65 2c 30 2c |_palette|range,0,|
|00000d00| 30 7d 00 21 6e 61 6d 65 | 7b 22 50 61 6c 65 74 74 |0}.!name|{"Palett|
|00000d10| 65 52 61 6e 67 65 22 2c | 22 50 61 6c 65 74 74 65 |eRange",|"Palette|
|00000d20| 23 2c 53 74 61 72 74 43 | 6f 6c 2c 45 6e 64 43 6f |#,StartC|ol,EndCo|
|00000d30| 6c 2c 72 30 2c 67 30 2c | 62 30 2c 72 31 2c 67 31 |l,r0,g0,|b0,r1,g1|
|00000d40| 2c 62 31 22 7d 00 00 21 | 61 73 74 61 74 65 6d 65 |,b1"}..!|astateme|
|00000d50| 6e 74 00 21 61 72 67 73 | 7b 32 2c 32 7d 00 21 6c |nt.!args|{2,2}.!l|
|00000d60| 69 62 73 7b 23 70 61 6c | 65 74 74 65 6c 69 62 2c |ibs{#pal|ettelib,|
|00000d70| 24 31 32 38 30 2c 23 70 | 61 6c 65 74 74 65 6c 69 |$1280,#p|aletteli|
|00000d80| 62 2c 24 31 33 38 31 7d | 00 21 73 75 62 73 7b 5f |b,$1381}|.!subs{_|
|00000d90| 64 75 70 6c 69 63 61 74 | 65 70 61 6c 65 74 74 65 |duplicat|epalette|
|00000da0| 2c 30 2c 30 7d 00 21 6e | 61 6d 65 7b 22 44 75 70 |,0,0}.!n|ame{"Dup|
|00000db0| 6c 69 63 61 74 65 50 61 | 6c 65 74 74 65 22 2c 22 |licatePa|lette","|
|00000dc0| 53 72 63 50 61 6c 65 74 | 74 65 23 2c 44 65 73 74 |SrcPalet|te#,Dest|
|00000dd0| 50 61 6c 65 74 74 65 23 | 22 7d 00 00 21 61 73 74 |Palette#|"}..!ast|
|00000de0| 61 74 65 6d 65 6e 74 00 | 21 61 72 67 73 7b 23 77 |atement.|!args{#w|
|00000df0| 6f 72 64 2c 23 6c 6f 6e | 67 2c 23 77 6f 72 64 7d |ord,#lon|g,#word}|
|00000e00| 00 21 6c 69 62 73 7b 23 | 70 61 6c 65 74 74 65 6c |.!libs{#|palettel|
|00000e10| 69 62 2c 24 31 33 38 30 | 7d 00 21 73 75 62 73 7b |ib,$1380|}.!subs{|
|00000e20| 5f 63 6c 75 64 67 65 70 | 61 6c 65 74 74 65 2c 30 |_cludgep|alette,0|
|00000e30| 2c 30 7d 00 21 61 72 67 | 73 7b 23 77 6f 72 64 2c |,0}.!arg|s{#word,|
|00000e40| 23 6c 6f 6e 67 7d 00 21 | 6c 69 62 73 7b 23 70 61 |#long}.!|libs{#pa|
|00000e50| 6c 65 74 74 65 6c 69 62 | 2c 24 31 33 38 30 7d 00 |lettelib|,$1380}.|
|00000e60| 21 73 75 62 73 7b 5f 63 | 6c 75 64 67 65 70 61 6c |!subs{_c|ludgepal|
|00000e70| 65 74 74 65 32 2c 30 2c | 30 7d 00 21 6e 61 6d 65 |ette2,0,|0}.!name|
|00000e80| 7b 22 44 65 63 6f 64 65 | 50 61 6c 65 74 74 65 22 |{"Decode|Palette"|
|00000e90| 2c 22 50 61 6c 65 74 74 | 65 23 2c 4d 65 6d 6f 72 |,"Palett|e#,Memor|
|00000ea0| 79 4c 6f 63 61 74 69 6f | 6e 5b 2c 50 61 6c 65 74 |yLocatio|n[,Palet|
|00000eb0| 74 65 20 4f 66 66 73 65 | 74 5d 22 7d 00 00 5f 6c |te Offse|t]"}.._l|
|00000ec0| 6f 61 64 3a 21 6e 75 6c | 6c 73 75 62 7b 30 2c 30 |oad:!nul|lsub{0,0|
|00000ed0| 2c 30 7d 00 00 5f 73 61 | 76 65 3a 21 6e 75 6c 6c |,0}.._sa|ve:!null|
|00000ee0| 73 75 62 7b 30 2c 30 2c | 30 7d 00 00 5f 75 73 65 |sub{0,0,|0}.._use|
|00000ef0| 3a 21 6e 75 6c 6c 73 75 | 62 7b 75 73 65 70 61 6c |:!nullsu|b{usepal|
|00000f00| 2c 75 73 65 70 61 6c 63 | 68 6b 2c 30 2c 23 73 63 |,usepalc|hk,0,#sc|
|00000f10| 72 65 65 6e 73 6c 69 62 | 2c 24 35 32 30 32 2c 23 |reenslib|,$5202,#|
|00000f20| 67 72 61 70 68 69 63 73 | 6c 69 62 2c 24 35 36 30 |graphics|lib,$560|
|00000f30| 30 2c 23 62 6c 69 74 7a | 63 6f 70 6c 69 62 2c 24 |0,#blitz|coplib,$|
|00000f40| 39 30 30 32 7d 00 3b 61 | 33 3d 50 61 6c 65 74 74 |9002}.;a|3=Palett|
|00000f50| 65 20 23 2c 20 61 32 3d | 53 63 72 65 65 6e 2c 20 |e #, a2=|Screen, |
|00000f60| 61 36 3d 67 72 2e 6c 69 | 62 2c 20 61 31 3d 69 6e |a6=gr.li|b, a1=in|
|00000f70| 74 75 69 6c 69 62 00 3b | 21 6e 75 6c 6c 73 75 62 |tuilib.;|!nullsub|
|00000f80| 7b 30 2c 30 2c 30 7d 00 | 00 5f 66 72 65 65 3a 21 |{0,0,0}.|._free:!|
|00000f90| 6e 75 6c 6c 73 75 62 7b | 66 72 65 65 70 61 6c 2c |nullsub{|freepal,|
|00000fa0| 30 2c 30 7d 00 00 69 6e | 69 74 3a 21 6e 75 6c 6c |0,0}..in|it:!null|
|00000fb0| 73 75 62 7b 63 6f 64 65 | 69 6e 69 74 2c 30 2c 30 |sub{code|init,0,0|
|00000fc0| 2c 23 67 72 61 70 68 69 | 63 73 6c 69 62 2c 23 6c |,#graphi|cslib,#l|
|00000fd0| 61 30 7d 00 00 66 69 6e | 69 74 3a 21 6e 75 6c 6c |a0}..fin|it:!null|
|00000fe0| 73 75 62 7b 63 6f 64 65 | 66 69 6e 69 74 2c 30 2c |sub{code|finit,0,|
|00000ff0| 30 7d 00 00 21 6c 69 62 | 66 69 6e 7b 5f 74 6f 6b |0}..!lib|fin{_tok|
|00001000| 65 2c 5f 6c 6f 61 64 2c | 5f 73 61 76 65 2c 5f 75 |e,_load,|_save,_u|
|00001010| 73 65 2c 5f 66 72 65 65 | 2c 34 2c 37 7d 00 00 3b |se,_free|,4,7}..;|
|00001020| 00 3b 70 61 6c 65 74 74 | 65 20 73 74 72 75 63 74 |.;palett|e struct|
|00001030| 3a 00 3b 00 3b 30 2e 6c | 20 3a 20 70 61 6c 65 74 |:.;.;0.l| : palet|
|00001040| 74 65 20 52 47 42 53 20 | 2d 20 72 65 64 30 2e 6c |te RGBS |- red0.l|
|00001050| 2c 67 72 65 65 6e 30 2e | 6c 2c 62 6c 75 65 30 2c |,green0.|l,blue0,|
|00001060| 6c 2c 72 65 64 31 2e 6c | 2e 2e 2e 00 3b 34 2e 77 |l,red1.l|....;4.w|
|00001070| 20 3a 20 6e 75 6d 62 65 | 72 20 6f 66 20 61 62 6f | : numbe|r of abo|
|00001080| 76 65 00 3b 00 3b 36 2e | 77 20 20 3a 20 6c 6f 77 |ve.;.;6.|w : low|
|00001090| 20 63 6f 6c 6f 75 72 20 | 6f 66 20 63 79 63 6c 65 | colour |of cycle|
|000010a0| 20 2d 20 30 20 66 6f 72 | 20 65 6e 64 00 3b 38 2e | - 0 for| end.;8.|
|000010b0| 77 20 20 3a 20 68 69 67 | 68 20 63 6f 6c 6f 75 72 |w : hig|h colour|
|000010c0| 20 6f 66 20 63 79 63 6c | 65 00 3b 31 30 2e 77 20 | of cycl|e.;10.w |
|000010d0| 3a 20 73 70 65 65 64 00 | 3b 31 32 2e 77 20 3a 20 |: speed.|;12.w : |
|000010e0| 76 61 72 00 3b 00 3b 2e | 2e 2e 2e 00 3b 00 00 3b |var.;.;.|....;..;|
|000010f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 20 43 |********|****** C|
|00001100| 4f 44 45 20 42 45 4c 4f | 57 20 2a 2a 2a 2a 2a 2a |ODE BELO|W ******|
|00001110| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 00 00 67 66 78 62 61 |********|*..gfxba|
|00001120| 73 65 3a 80 25 2e 6c 20 | 30 00 63 79 63 6f 6e 3a |se:.%.l |0.cycon:|
|00001130| 80 25 20 30 00 63 79 63 | 6c 65 6c 69 73 74 3a 80 |.% 0.cyc|lelist:.|
|00001140| 25 2e 6c 20 30 3a 3b 20 | 61 20 6c 69 73 74 20 6f |%.l 0:; |a list o|
|00001150| 66 20 61 6c 6c 20 73 74 | 75 66 66 20 74 6f 20 62 |f all st|uff to b|
|00001160| 65 20 63 79 63 6c 65 64 | 2e 00 20 20 20 20 20 20 |e cycled|.. |
|00001170| 20 20 20 20 20 20 20 20 | 20 20 20 3b 30 2e 6c 20 | | ;0.l |
|00001180| 3d 20 6e 65 78 74 00 20 | 20 20 20 20 20 20 20 20 |= next. | |
|00001190| 20 20 20 20 20 20 20 20 | 3b 34 2e 6c 20 3d 20 70 | |;4.l = p|
|000011a0| 61 6c 65 74 74 65 00 20 | 20 20 20 20 20 20 20 20 |alette. | |
|000011b0| 20 20 20 20 20 20 20 20 | 3b 38 2e 6c 20 3d 20 76 | |;8.l = v|
|000011c0| 69 65 77 70 6f 72 74 2e | 00 61 67 61 6d 6f 64 65 |iewport.|.agamode|
|000011d0| 3a 80 25 20 30 00 72 67 | 62 73 34 62 69 74 3a 80 |:.% 0.rg|bs4bit:.|
|000011e0| 26 20 33 32 20 20 20 3b | 33 32 20 34 20 62 69 74 |& 32 ;|32 4 bit|
|000011f0| 20 52 47 42 20 76 61 6c | 73 2e 00 00 64 6f 34 62 | RGB val|s...do4b|
|00001200| 69 74 70 61 6c 72 67 62 | 00 3b 00 80 7e 20 64 35 |itpalrgb|.;..~ d5|
|00001210| 2c 2d 28 61 37 29 00 80 | 7e 20 64 32 2c 64 35 3a |,-(a7)..|~ d2,d5:|
|00001220| 80 7c 20 23 34 2c 64 32 | 3a 80 8a 20 64 35 2c 64 |.| #4,d2|:.. d5,d|
|00001230| 32 20 3b 66 72 6f 6d 20 | 6e 79 62 20 74 6f 20 62 |2 ;from |nyb to b|
|00001240| 79 74 65 2e 2e 2e 00 80 | 7e 20 64 33 2c 64 35 3a |yte.....|~ d3,d5:|
|00001250| 80 7c 20 23 34 2c 64 33 | 3a 80 8a 20 64 35 2c 64 |.| #4,d3|:.. d5,d|
|00001260| 33 00 80 7e 20 64 34 2c | 64 35 3a 80 7c 20 23 34 |3..~ d4,|d5:.| #4|
|00001270| 2c 64 34 3a 80 8a 20 64 | 35 2c 64 34 00 80 7e 20 |,d4:.. d|5,d4..~ |
|00001280| 28 61 37 29 2b 2c 64 35 | 00 3b 00 2e 64 6f 70 61 |(a7)+,d5|.;..dopa|
|00001290| 6c 72 67 62 20 20 3b 61 | 30 3d 70 61 6c 65 74 74 |lrgb ;a|0=palett|
|000012a0| 65 00 3b 00 3b 64 31 3d | 63 6f 6c 6f 75 72 20 72 |e.;.;d1=|colour r|
|000012b0| 65 67 2c 20 64 32 2e 62 | 3d 72 65 64 2c 20 64 33 |eg, d2.b|=red, d3|
|000012c0| 2e 62 3d 67 72 65 65 6e | 2c 20 64 34 2e 62 3d 62 |.b=green|, d4.b=b|
|000012d0| 6c 75 65 2e 00 3b 00 80 | 82 2e 6c 20 64 30 2d 64 |lue..;..|..l d0-d|
|000012e0| 35 2f 61 30 2d 61 32 2c | 2d 28 61 37 29 00 3b 00 |5/a0-a2,|-(a7).;.|
|000012f0| 80 7e 20 64 32 2c 64 35 | 3a 80 7c 20 23 38 2c 64 |.~ d2,d5|:.| #8,d|
|00001300| 32 3a 80 8a 20 64 35 2c | 64 32 00 80 7e 20 64 32 |2:.. d5,|d2..~ d2|
|00001310| 2c 64 35 3a 80 ac 20 64 | 32 3a 80 7e 20 64 35 2c |,d5:.. d|2:.~ d5,|
|00001320| 64 32 00 3b 00 80 7e 20 | 64 33 2c 64 35 3a 80 7c |d2.;..~ |d3,d5:.||
|00001330| 20 23 38 2c 64 33 3a 80 | 8a 20 64 35 2c 64 33 00 | #8,d3:.|. d5,d3.|
|00001340| 80 7e 20 64 33 2c 64 35 | 3a 80 ac 20 64 33 3a 80 |.~ d3,d5|:.. d3:.|
|00001350| 7e 20 64 35 2c 64 33 00 | 3b 00 80 7e 20 64 34 2c |~ d5,d3.|;..~ d4,|
|00001360| 64 35 3a 80 7c 20 23 38 | 2c 64 34 3a 80 8a 20 64 |d5:.| #8|,d4:.. d|
|00001370| 35 2c 64 34 00 80 7e 20 | 64 34 2c 64 35 3a 80 ac |5,d4..~ |d4,d5:..|
|00001380| 20 64 34 3a 80 7e 20 64 | 35 2c 64 34 00 3b 00 80 | d4:.~ d|5,d4.;..|
|00001390| 7e 2e 6c 20 61 30 2c 61 | 32 3a 80 7e 2e 6c 20 28 |~.l a0,a|2:.~.l (|
|000013a0| 61 32 29 2c 61 30 3a 80 | 5c 20 34 28 61 32 29 2c |a2),a0:.|\ 4(a2),|
|000013b0| 64 31 3a 80 4e 20 27 6e | 6f 67 72 6f 77 00 3b 00 |d1:.N 'n|ogrow.;.|
|000013c0| 3b 67 6f 74 74 61 20 65 | 78 70 61 6e 64 20 70 61 |;gotta e|xpand pa|
|000013d0| 6c 65 74 74 65 20 6f 62 | 6a 65 63 74 2e 00 3b 00 |lette ob|ject..;.|
|000013e0| 80 7e 20 64 31 2c 2d 28 | 61 37 29 00 3b 00 80 7e |.~ d1,-(|a7).;..~|
|000013f0| 20 64 31 2c 64 30 3a 80 | 40 20 23 31 2c 64 30 3a | d1,d0:.|@ #1,d0:|
|00001400| 80 84 20 23 31 32 2c 64 | 30 3a 80 40 2e 6c 20 23 |.. #12,d|0:.@.l #|
|00001410| 38 2c 64 30 00 80 7e 2e | 6c 20 23 24 31 30 30 30 |8,d0..~.|l #$1000|
|00001420| 31 2c 64 31 3a 80 38 20 | 24 63 30 30 32 3a 80 7e |1,d1:.8 |$c002:.~|
|00001430| 2e 6c 20 64 30 2c 61 30 | 20 20 3b 6e 65 77 20 70 |.l d0,a0| ;new p|
|00001440| 61 6c 65 74 74 65 00 3b | 00 80 7e 2e 6c 20 28 61 |alette.;|..~.l (a|
|00001450| 32 29 2c 64 30 3a 80 48 | 20 27 6e 6f 6f 6c 64 3a |2),d0:.H| 'noold:|
|00001460| 80 7e 2e 6c 20 61 30 2c | 2d 28 61 37 29 00 80 7e |.~.l a0,|-(a7)..~|
|00001470| 2e 6c 20 64 30 2c 61 31 | 3a 80 7e 20 34 28 61 32 |.l d0,a1|:.~ 4(a2|
|00001480| 29 2c 64 30 3a 80 84 20 | 23 33 2c 64 30 3a 80 40 |),d0:.. |#3,d0:.@|
|00001490| 20 23 31 2c 64 30 00 27 | 6c 6f 6f 70 3a 80 7e 2e | #1,d0.'|loop:.~.|
|000014a0| 6c 20 28 61 31 29 2b 2c | 28 61 30 29 2b 3a 80 6e |l (a1)+,|(a0)+:.n|
|000014b0| 20 64 30 2c 27 6c 6f 6f | 70 00 80 7e 2e 6c 20 28 | d0,'loo|p..~.l (|
|000014c0| 61 32 29 2c 61 31 3a 80 | 7e 20 34 28 61 32 29 2c |a2),a1:.|~ 4(a2),|
|000014d0| 64 30 3a 80 84 20 23 31 | 32 2c 64 30 3a 80 40 2e |d0:.. #1|2,d0:.@.|
|000014e0| 6c 20 23 38 2c 64 30 00 | 80 38 20 24 63 30 30 33 |l #8,d0.|.8 $c003|
|000014f0| 3a 80 7e 2e 6c 20 28 61 | 37 29 2b 2c 61 30 00 3b |:.~.l (a|7)+,a0.;|
|00001500| 00 27 6e 6f 6f 6c 64 00 | 80 7e 2e 6c 20 61 30 2c |.'noold.|.~.l a0,|
|00001510| 28 61 32 29 3a 80 7e 20 | 28 61 37 29 2b 2c 64 31 |(a2):.~ |(a7)+,d1|
|00001520| 00 80 7e 20 64 31 2c 34 | 28 61 32 29 3a 80 40 20 |..~ d1,4|(a2):.@ |
|00001530| 23 31 2c 34 28 61 32 29 | 00 80 7e 20 64 31 2c 28 |#1,4(a2)|..~ d1,(|
|00001540| 61 30 29 3a 80 40 20 23 | 31 2c 28 61 30 29 00 3b |a0):.@ #|1,(a0).;|
|00001550| 00 27 6e 6f 67 72 6f 77 | 00 3b 00 80 84 20 23 31 |.'nogrow|.;... #1|
|00001560| 32 2c 64 31 3a 80 7a 20 | 34 28 61 30 2c 64 31 29 |2,d1:.z |4(a0,d1)|
|00001570| 2c 61 30 00 80 7e 2e 6c | 20 64 32 2c 28 61 30 29 |,a0..~.l| d2,(a0)|
|00001580| 2b 3a 80 7e 2e 6c 20 64 | 33 2c 28 61 30 29 2b 3a |+:.~.l d|3,(a0)+:|
|00001590| 80 7e 2e 6c 20 64 34 2c | 28 61 30 29 2b 00 3b 00 |.~.l d4,|(a0)+.;.|
|000015a0| 80 82 2e 6c 20 28 61 37 | 29 2b 2c 64 30 2d 64 35 |...l (a7|)+,d0-d5|
|000015b0| 2f 61 30 2d 61 32 3a 80 | 94 00 00 6d 61 6b 65 34 |/a0-a2:.|...make4|
|000015c0| 62 69 74 72 67 62 73 20 | 20 3b 61 30 3d 70 61 6c |bitrgbs | ;a0=pal|
|000015d0| 65 74 74 65 20 6f 62 6a | 65 63 74 00 20 20 20 20 |ette obj|ect. |
|000015e0| 20 20 20 20 20 20 20 20 | 20 20 3b 52 65 74 75 72 | | ;Retur|
|000015f0| 6e 20 61 31 2e 2e 2e 34 | 20 62 69 74 20 52 47 42 |n a1...4| bit RGB|
|00001600| 20 74 61 62 6c 65 2c 20 | 64 30 20 3a 20 6e 75 6d | table, |d0 : num|
|00001610| 62 65 72 20 6f 66 20 63 | 6f 6c 6f 72 73 00 20 20 |ber of c|olors. |
|00001620| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 00 80 7a | | ;..z|
|00001630| 20 72 67 62 73 34 62 69 | 74 28 70 63 29 2c 61 31 | rgbs4bi|t(pc),a1|
|00001640| 3a 80 7e 20 34 28 61 30 | 29 2c 64 30 3a 80 48 20 |:.~ 4(a0|),d0:.H |
|00001650| 27 64 6f 6e 65 00 80 5c | 20 23 33 32 2c 64 30 3a |'done..\| #32,d0:|
|00001660| 80 4d 20 27 73 6b 69 70 | 3a 80 7e 20 23 33 32 2c |.M 'skip|:.~ #32,|
|00001670| 64 30 00 27 73 6b 69 70 | 3a 80 82 2e 6c 20 64 30 |d0.'skip|:...l d0|
|00001680| 2f 61 32 2c 2d 28 61 37 | 29 3a 80 7e 2e 6c 20 28 |/a2,-(a7|):.~.l (|
|00001690| 61 30 29 2c 61 32 3a 80 | 40 20 23 34 2c 61 32 3a |a0),a2:.|@ #4,a2:|
|000016a0| 80 aa 20 23 31 2c 64 30 | 00 27 6c 6f 6f 70 00 80 |.. #1,d0|.'loop..|
|000016b0| 7e 2e 6c 20 28 61 32 29 | 2b 2c 64 31 3a 80 8e 2e |~.l (a2)|+,d1:...|
|000016c0| 6c 20 23 38 2c 64 31 3a | 80 8e 20 23 34 2c 64 31 |l #8,d1:|.. #4,d1|
|000016d0| 3a 80 42 20 23 24 66 30 | 30 2c 64 31 00 80 7e 2e |:.B #$f0|0,d1..~.|
|000016e0| 6c 20 28 61 32 29 2b 2c | 64 32 3a 80 8e 2e 6c 20 |l (a2)+,|d2:...l |
|000016f0| 23 38 2c 64 32 3a 80 7e | 2e 62 20 64 32 2c 64 31 |#8,d2:.~|.b d2,d1|
|00001700| 00 80 7e 2e 6c 20 28 61 | 32 29 2b 2c 64 32 3a 80 |..~.l (a|2)+,d2:.|
|00001710| 8e 2e 6c 20 23 34 2c 64 | 32 3a 80 42 20 23 31 35 |..l #4,d|2:.B #15|
|00001720| 2c 64 32 3a 80 8a 20 64 | 32 2c 64 31 00 80 7e 20 |,d2:.. d|2,d1..~ |
|00001730| 64 31 2c 28 61 31 29 2b | 3a 80 6e 20 64 30 2c 27 |d1,(a1)+|:.n d0,'|
|00001740| 6c 6f 6f 70 3a 80 7a 20 | 72 67 62 73 34 62 69 74 |loop:.z |rgbs4bit|
|00001750| 28 70 63 29 2c 61 31 00 | 80 82 2e 6c 20 28 61 37 |(pc),a1.|...l (a7|
|00001760| 29 2b 2c 64 30 2f 61 32 | 00 27 64 6f 6e 65 3a 80 |)+,d0/a2|.'done:.|
|00001770| 94 00 00 2e 63 6f 64 65 | 69 6e 69 74 00 80 7e 2e |....code|init..~.|
|00001780| 6c 20 61 30 2c 67 66 78 | 62 61 73 65 3a 80 5b 2e |l a0,gfx|base:.[.|
|00001790| 6c 20 63 79 63 6c 65 6c | 69 73 74 3a 80 5b 20 63 |l cyclel|ist:.[ c|
|000017a0| 79 63 6f 6e 00 80 38 20 | 23 65 6e 76 69 72 6f 6e |ycon..8 |#environ|
|000017b0| 6c 69 62 20 80 7c 20 37 | 2b 37 00 80 5c 20 23 33 |lib .| 7|+7..\ #3|
|000017c0| 39 2c 64 30 3a 80 99 20 | 64 30 3a 80 76 2e 77 20 |9,d0:.. |d0:.v.w |
|000017d0| 64 30 3a 80 7e 20 64 30 | 2c 61 67 61 6d 6f 64 65 |d0:.~ d0|,agamode|
|000017e0| 00 80 94 00 00 63 6f 64 | 65 66 69 6e 69 74 00 3b |.....cod|efinit.;|
|000017f0| 00 2e 63 79 63 6f 66 66 | 00 80 7e 20 63 79 63 6f |..cycoff|..~ cyco|
|00001800| 6e 28 70 63 29 2c 64 30 | 3a 80 48 20 27 73 6b 69 |n(pc),d0|:.H 'ski|
|00001810| 70 3a 80 89 20 63 79 63 | 6f 6e 00 80 7e 20 23 24 |p:.. cyc|on..~ #$|
|00001820| 38 30 30 35 2c 64 30 3a | 80 38 20 24 63 31 30 31 |8005,d0:|.8 $c101|
|00001830| 00 27 73 6b 69 70 3a 80 | 7e 2e 6c 20 63 79 63 6c |.'skip:.|~.l cycl|
|00001840| 65 6c 69 73 74 28 70 63 | 29 2c 61 32 00 27 6c 6f |elist(pc|),a2.'lo|
|00001850| 6f 70 3a 80 5c 20 23 30 | 2c 61 32 3a 80 48 20 27 |op:.\ #0|,a2:.H '|
|00001860| 64 6f 6e 65 00 80 7e 2e | 6c 20 61 32 2c 61 31 3a |done..~.|l a2,a1:|
|00001870| 80 81 20 23 31 32 2c 64 | 30 3a 80 7e 2e 6c 20 28 |.. #12,d|0:.~.l (|
|00001880| 61 32 29 2c 61 32 3a 80 | 38 20 24 63 30 30 33 00 |a2),a2:.|8 $c003.|
|00001890| 80 58 20 27 6c 6f 6f 70 | 00 27 64 6f 6e 65 3a 80 |.X 'loop|.'done:.|
|000018a0| 94 00 00 64 6f 70 61 6c | 6c 6f 61 64 3a 20 20 20 |...dopal|load: |
|000018b0| 20 20 20 20 20 20 20 20 | 3b 64 30 3d 66 69 6c 65 | |;d0=file|
|000018c0| 6e 61 6d 65 2c 20 61 31 | 3d 70 61 6c 65 74 74 65 |name, a1|=palette|
|000018d0| 20 69 74 65 6d 00 80 7e | 2e 6c 20 64 31 2c 61 30 | item..~|.l d1,a0|
|000018e0| 00 3b 00 67 65 74 70 61 | 6c 3a 3b 70 61 6c 65 74 |.;.getpa|l:;palet|
|000018f0| 74 65 20 6e 61 6d 65 20 | 69 6e 20 61 30 2c 20 69 |te name |in a0, i|
|00001900| 74 65 6d 20 69 6e 20 61 | 31 00 80 82 2e 6c 20 64 |tem in a|1....l d|
|00001910| 30 2d 64 35 2c 2d 28 61 | 37 29 3a 80 81 20 23 30 |0-d5,-(a|7):.. #0|
|00001920| 2c 64 32 3a 80 59 20 6c | 6f 61 64 74 68 65 70 61 |,d2:.Y l|oadthepa|
|00001930| 6c 00 80 82 2e 6c 20 28 | 61 37 29 2b 2c 64 30 2d |l....l (|a7)+,d0-|
|00001940| 64 35 3a 80 94 00 00 64 | 6f 70 61 6c 6c 6f 61 64 |d5:....d|opalload|
|00001950| 32 3a 3b 64 30 3d 66 69 | 6c 65 6e 61 6d 65 2c 20 |2:;d0=fi|lename, |
|00001960| 61 31 3d 70 61 6c 65 74 | 74 65 20 69 74 65 6d 2c |a1=palet|te item,|
|00001970| 20 64 32 3d 6f 66 66 73 | 65 74 00 3b 00 80 7e 2e | d2=offs|et.;..~.|
|00001980| 6c 20 64 31 2c 61 30 3a | 80 7e 2e 6c 20 64 32 2c |l d1,a0:|.~.l d2,|
|00001990| 64 30 00 3b 00 67 65 74 | 70 61 6c 32 3a 3b 70 61 |d0.;.get|pal2:;pa|
|000019a0| 6c 65 74 74 65 20 6e 61 | 6d 65 20 69 6e 20 61 30 |lette na|me in a0|
|000019b0| 2c 69 74 65 6d 20 69 6e | 20 61 31 2c 20 6f 66 66 |,item in| a1, off|
|000019c0| 73 65 74 20 69 6e 20 64 | 30 00 80 82 2e 6c 20 64 |set in d|0....l d|
|000019d0| 30 2d 64 35 2c 2d 28 61 | 37 29 3a 80 7e 2e 6c 20 |0-d5,-(a|7):.~.l |
|000019e0| 64 30 2c 64 32 3a 80 59 | 20 6c 6f 61 64 74 68 65 |d0,d2:.Y| loadthe|
|000019f0| 70 61 6c 00 80 82 2e 6c | 20 28 61 37 29 2b 2c 64 |pal....l| (a7)+,d|
|00001a00| 30 2d 64 35 3a 80 94 00 | 00 2e 5f 63 6c 75 64 67 |0-d5:...|.._cludg|
|00001a10| 65 70 61 6c 65 74 74 65 | 32 3a 00 20 20 80 81 23 |epalette|2:. ..#|
|00001a20| 30 2c 64 32 00 00 2e 5f | 63 6c 75 64 67 65 70 61 |0,d2..._|cludgepa|
|00001a30| 6c 65 74 74 65 3a 00 20 | 20 80 7e 20 64 32 2c 6d |lette:. | .~ d2,m|
|00001a40| 79 6f 66 66 3a 80 7e 2e | 6c 20 64 31 2c 61 30 3a |yoff:.~.|l d1,a0:|
|00001a50| 80 82 2e 6c 20 28 61 30 | 29 2b 2c 64 30 2d 64 31 |...l (a0|)+,d0-d1|
|00001a60| 3a 80 5c 2e 6c 23 22 46 | 4f 52 4d 22 2c 64 30 3a |:.\.l#"F|ORM",d0:|
|00001a70| 80 50 20 65 72 72 30 00 | 20 20 80 7a 20 30 28 61 |.P err0.| .z 0(a|
|00001a80| 30 2c 64 31 2e 6c 29 2c | 61 31 3a 80 5c 2e 6c 20 |0,d1.l),|a1:.\.l |
|00001a90| 23 22 49 4c 42 4d 22 2c | 28 61 30 29 2b 3a 80 50 |#"ILBM",|(a0)+:.P|
|00001aa0| 20 65 72 72 30 00 63 76 | 3a 00 20 20 80 82 2e 6c | err0.cv|:. ...l|
|00001ab0| 28 61 30 29 2b 2c 64 30 | 2d 64 31 3a 80 5c 2e 6c |(a0)+,d0|-d1:.\.l|
|00001ac0| 20 23 22 43 4d 41 50 22 | 2c 64 30 3a 80 48 20 66 | #"CMAP"|,d0:.H f|
|00001ad0| 63 00 20 20 80 3d 2e 6c | 20 64 31 2c 61 30 3a 80 |c. .=.l| d1,a0:.|
|00001ae0| 5c 2e 6c 20 61 30 2c 61 | 31 3a 80 4c 20 65 72 72 |\.l a0,a|1:.L err|
|00001af0| 31 3a 80 58 20 63 76 00 | 66 63 3a 00 20 20 80 72 |1:.X cv.|fc:. .r|
|00001b00| 23 33 2c 64 31 3a 80 82 | 2e 6c 20 64 31 2f 61 30 |#3,d1:..|.l d1/a0|
|00001b10| 2d 61 31 2c 2d 28 61 37 | 29 3a 80 3d 20 6d 79 6f |-a1,-(a7|):.= myo|
|00001b20| 66 66 28 70 63 29 2c 64 | 31 3a 80 59 20 5f 69 6e |ff(pc),d|1:.Y _in|
|00001b30| 69 74 70 61 6c 65 74 74 | 65 00 20 20 80 82 2e 6c |itpalett|e. ...l|
|00001b40| 20 28 61 37 29 2b 2c 64 | 31 2f 61 30 2d 61 31 3a | (a7)+,d|1/a0-a1:|
|00001b50| 80 7e 2e 6c 20 28 61 33 | 29 2c 61 32 3a 80 7e 20 |.~.l (a3|),a2:.~ |
|00001b60| 6d 79 6f 66 66 28 70 63 | 29 2c 64 37 3a 80 84 20 |myoff(pc|),d7:.. |
|00001b70| 23 31 32 2c 64 37 00 20 | 20 80 7a 20 34 28 61 32 |#12,d7. | .z 4(a2|
|00001b80| 2c 64 37 29 2c 61 32 3a | 80 aa 23 31 2c 64 31 00 |,d7),a2:|..#1,d1.|
|00001b90| 6e 78 63 3a 00 20 20 80 | 7e 2e 62 20 28 61 30 29 |nxc:. .|~.b (a0)|
|00001ba0| 2b 2c 28 61 32 29 3a 80 | 7e 2e 62 20 28 61 30 29 |+,(a2):.|~.b (a0)|
|00001bb0| 2b 2c 34 28 61 32 29 3a | 80 7e 2e 62 20 28 61 30 |+,4(a2):|.~.b (a0|
|00001bc0| 29 2b 2c 38 28 61 32 29 | 3a 80 3d 23 31 32 2c 61 |)+,8(a2)|:.=#12,a|
|00001bd0| 32 00 20 20 80 6f 20 64 | 31 2c 6e 78 63 3a 80 40 |2. .o d|1,nxc:.@|
|00001be0| 23 36 2c 61 33 00 79 76 | 3a 00 20 20 80 82 2e 6c |#6,a3.yv|:. ...l|
|00001bf0| 28 61 30 29 2b 2c 64 30 | 2d 64 31 3a 80 5c 2e 6c |(a0)+,d0|-d1:.\.l|
|00001c00| 20 23 22 43 52 4e 47 22 | 2c 64 30 3a 80 48 20 79 | #"CRNG"|,d0:.H y|
|00001c10| 63 00 20 20 80 3d 2e 6c | 20 64 31 2c 61 30 3a 80 |c. .=.l| d1,a0:.|
|00001c20| 5c 2e 6c 20 61 30 2c 61 | 31 3a 80 4c 20 64 75 6e |\.l a0,a|1:.L dun|
|00001c30| 63 70 3a 80 58 20 79 76 | 20 20 3b 6c 6f 20 68 69 |cp:.X yv| ;lo hi|
|00001c40| 20 73 70 65 65 64 20 76 | 61 72 00 79 63 3a 00 20 | speed v|ar.yc:. |
|00001c50| 20 80 82 20 32 28 61 30 | 29 2c 64 34 2d 64 35 3a | .. 2(a0|),d4-d5:|
|00001c60| 80 5c 23 31 2c 64 35 3a | 80 48 20 27 73 6b 69 70 |.\#1,d5:|.H 'skip|
|00001c70| 3a 80 86 20 64 34 3a 80 | 81 23 30 2c 64 35 3a 27 |:.. d4:.|.#0,d5:'|
|00001c80| 73 6b 69 70 00 20 20 80 | 7e 2e 62 20 36 28 61 30 |skip. .|~.b 6(a0|
|00001c90| 29 2c 64 32 3a 80 7e 2e | 62 20 37 28 61 30 29 2c |),d2:.~.|b 7(a0),|
|00001ca0| 64 33 3a 80 76 2e 77 20 | 64 32 3a 80 76 2e 77 20 |d3:.v.w |d2:.v.w |
|00001cb0| 64 33 3a 80 40 23 38 2c | 61 30 00 20 20 80 5c 20 |d3:.@#8,|a0. .\ |
|00001cc0| 64 32 2c 64 33 3a 80 48 | 20 79 76 3a 80 82 20 64 |d2,d3:.H| yv:.. d|
|00001cd0| 32 2d 64 35 2c 28 61 33 | 29 3a 80 40 23 38 2c 61 |2-d5,(a3|):.@#8,a|
|00001ce0| 33 3a 80 58 20 79 76 00 | 64 75 6e 63 70 3a 00 20 |3:.X yv.|duncp:. |
|00001cf0| 20 80 7e 23 2d 31 2c 28 | 61 33 29 3a 80 94 00 00 | .~#-1,(|a3):....|
|00001d00| 6d 79 6f 66 66 3a 80 25 | 20 30 00 00 2e 6c 6f 61 |myoff:.%| 0...loa|
|00001d10| 64 74 68 65 70 61 6c 00 | 3b 70 61 6c 65 74 74 65 |dthepal.|;palette|
|00001d20| 20 6e 61 6d 65 20 69 6e | 20 61 30 2c 20 70 61 6c | name in| a0, pal|
|00001d30| 65 74 74 65 20 69 74 65 | 6d 20 69 6e 20 61 31 2c |ette ite|m in a1,|
|00001d40| 20 70 61 6c 65 74 74 65 | 20 6f 66 66 73 65 74 20 | palette| offset |
|00001d50| 69 6e 20 64 32 00 3b 00 | 80 38 20 23 69 66 66 69 |in d2.;.|.8 #iffi|
|00001d60| 6f 6c 69 62 20 80 7c 20 | 37 2b 31 3a 80 50 20 65 |olib .| |7+1:.P e|
|00001d70| 72 72 30 3a 3b 6f 70 65 | 6e 20 49 46 46 00 80 7e |rr0:;ope|n IFF..~|
|00001d80| 2e 6c 20 23 22 43 4d 41 | 50 22 2c 64 30 3a 80 38 |.l #"CMA|P",d0:.8|
|00001d90| 20 23 69 66 66 69 6f 6c | 69 62 20 80 7c 20 37 2b | #iffiol|ib .| 7+|
|00001da0| 36 3a 80 50 20 65 72 72 | 31 3a 3b 66 69 6e 64 20 |6:.P err|1:;find |
|00001db0| 43 4d 41 50 00 80 7e 20 | 64 30 2c 64 35 3a 80 76 |CMAP..~ |d0,d5:.v|
|00001dc0| 2e 6c 20 64 35 3a 80 72 | 20 23 33 2c 64 35 3a 80 |.l d5:.r| #3,d5:.|
|00001dd0| aa 20 23 31 2c 64 35 3a | 80 4f 20 27 6e 6f 6e 65 |. #1,d5:|.O 'none|
|00001de0| 3a 80 7e 2e 6c 20 61 31 | 2c 61 30 3a 80 7e 2e 6c |:.~.l a1|,a0:.~.l|
|00001df0| 20 61 30 2c 2d 28 61 37 | 29 00 80 7e 20 64 32 2c | a0,-(a7|)..~ d2,|
|00001e00| 64 31 3a 80 3d 20 64 35 | 2c 64 31 3a 80 59 20 64 |d1:.= d5|,d1:.Y d|
|00001e10| 6f 70 61 6c 72 67 62 3a | 80 7e 20 64 32 2c 64 31 |opalrgb:|.~ d2,d1|
|00001e20| 00 3b 00 27 6c 6f 6f 70 | 00 80 81 20 23 30 2c 64 |.;.'loop|... #0,d|
|00001e30| 32 3a 80 38 20 23 69 66 | 66 69 6f 6c 69 62 20 80 |2:.8 #if|fiolib .|
|00001e40| 7c 20 37 2b 33 3a 80 7e | 2e 62 20 64 30 2c 64 32 || 7+3:.~|.b d0,d2|
|00001e50| 00 80 81 20 23 30 2c 64 | 33 3a 80 38 20 23 69 66 |... #0,d|3:.8 #if|
|00001e60| 66 69 6f 6c 69 62 20 80 | 7c 20 37 2b 33 3a 80 7e |fiolib .|| 7+3:.~|
|00001e70| 2e 62 20 64 30 2c 64 33 | 00 80 81 20 23 30 2c 64 |.b d0,d3|... #0,d|
|00001e80| 34 3a 80 38 20 23 69 66 | 66 69 6f 6c 69 62 20 80 |4:.8 #if|fiolib .|
|00001e90| 7c 20 37 2b 33 3a 80 7e | 2e 62 20 64 30 2c 64 34 || 7+3:.~|.b d0,d4|
|00001ea0| 00 3b 00 80 59 20 64 6f | 70 61 6c 72 67 62 00 3b |.;..Y do|palrgb.;|
|00001eb0| 00 80 40 20 23 31 2c 64 | 31 3a 80 6e 20 64 35 2c |..@ #1,d|1:.n d5,|
|00001ec0| 27 6c 6f 6f 70 3a 80 7e | 2e 6c 20 28 61 37 29 2b |'loop:.~|.l (a7)+|
|00001ed0| 2c 61 31 3a 80 40 20 23 | 36 2c 61 31 00 3b 00 3b |,a1:.@ #|6,a1.;.;|
|00001ee0| 6c 6f 61 64 20 63 79 63 | 6c 65 20 69 6e 66 6f 2e |load cyc|le info.|
|00001ef0| 2e 2e 00 3b 00 27 63 6c | 6f 6f 70 3a 80 7e 2e 6c |...;.'cl|oop:.~.l|
|00001f00| 20 23 22 43 52 4e 47 22 | 2c 64 30 3a 80 38 20 23 | #"CRNG"|,d0:.8 #|
|00001f10| 69 66 66 69 6f 6c 69 62 | 20 80 7c 20 37 2b 36 3a |iffiolib| .| 7+6:|
|00001f20| 80 50 20 27 64 6f 6e 65 | 3a 3b 69 66 66 66 69 6e |.P 'done|:;ifffin|
|00001f30| 64 00 80 38 20 23 69 66 | 66 69 6f 6c 69 62 20 80 |d..8 #if|fiolib .|
|00001f40| 7c 20 37 2b 35 3a 80 7e | 20 64 30 2c 64 32 00 80 || 7+5:.~| d0,d2..|
|00001f50| 38 20 23 69 66 66 69 6f | 6c 69 62 20 80 7c 20 37 |8 #iffio|lib .| 7|
|00001f60| 2b 34 3a 80 5c 20 23 31 | 2c 64 30 3a 80 48 20 27 |+4:.\ #1|,d0:.H '|
|00001f70| 73 6b 69 70 32 3a 80 86 | 20 64 32 00 27 73 6b 69 |skip2:..| d2.'ski|
|00001f80| 70 32 3a 80 38 20 23 69 | 66 66 69 6f 6c 69 62 20 |p2:.8 #i|ffiolib |
|00001f90| 80 7c 20 37 2b 33 3a 80 | 76 20 64 30 3a 80 7e 20 |.| 7+3:.|v d0:.~ |
|00001fa0| 64 30 2c 28 61 31 29 00 | 80 38 20 23 69 66 66 69 |d0,(a1).|.8 #iffi|
|00001fb0| 6f 6c 69 62 20 80 7c 20 | 37 2b 33 3a 80 76 20 64 |olib .| |7+3:.v d|
|00001fc0| 30 3a 80 5c 20 28 61 31 | 29 2c 64 30 3a 80 48 20 |0:.\ (a1|),d0:.H |
|00001fd0| 27 63 6c 6f 6f 70 00 80 | 40 20 23 32 2c 61 31 3a |'cloop..|@ #2,a1:|
|00001fe0| 80 7e 20 64 30 2c 28 61 | 31 29 2b 3a 80 7e 20 64 |.~ d0,(a|1)+:.~ d|
|00001ff0| 32 2c 28 61 31 29 2b 3a | 80 5b 20 28 61 31 29 2b |2,(a1)+:|.[ (a1)+|
|00002000| 3a 80 58 20 27 63 6c 6f | 6f 70 00 27 64 6f 6e 65 |:.X 'clo|op.'done|
|00002010| 3a 80 7e 20 23 2d 31 2c | 28 61 31 29 00 3b 00 27 |:.~ #-1,|(a1).;.'|
|00002020| 6e 6f 6e 65 3a 80 38 20 | 23 69 66 66 69 6f 6c 69 |none:.8 |#iffioli|
|00002030| 62 20 80 7c 20 37 2b 32 | 3a 80 94 00 00 2e 64 6f |b .| 7+2|:.....do|
|00002040| 73 65 74 63 79 63 6c 65 | 31 3a 80 7e 2e 6c 20 23 |setcycle|1:.~.l #|
|00002050| 24 31 30 30 30 30 2c 64 | 34 00 3b 00 2e 64 6f 73 |$10000,d|4.;..dos|
|00002060| 65 74 63 79 63 6c 65 32 | 00 3b 00 3b 66 69 6e 64 |etcycle2|.;.;find|
|00002070| 20 6c 61 73 74 20 63 79 | 63 6c 65 00 3b 00 80 7a | last cy|cle.;..z|
|00002080| 20 34 28 61 30 29 2c 61 | 31 3a 80 7e 20 28 61 31 | 4(a0),a|1:.~ (a1|
|00002090| 29 2b 2c 64 35 3a 80 48 | 20 27 6b 6e 6f 62 00 3b |)+,d5:.H| 'knob.;|
|000020a0| 00 27 6c 6f 6f 70 3a 80 | b0 20 28 61 31 29 3a 80 |.'loop:.|. (a1):.|
|000020b0| 4f 20 27 6b 6e 6f 62 3a | 80 40 20 23 38 2c 61 31 |O 'knob:|.@ #8,a1|
|000020c0| 3a 80 58 20 27 6c 6f 6f | 70 00 27 6b 6e 6f 62 00 |:.X 'loo|p.'knob.|
|000020d0| 3b 00 80 7c 20 23 33 2c | 64 31 3a 80 7a 20 36 28 |;..| #3,|d1:.z 6(|
|000020e0| 61 30 2c 64 31 29 2c 61 | 32 00 3b 00 80 81 20 23 |a0,d1),a|2.;... #|
|000020f0| 30 2c 64 35 3a 80 5c 2e | 6c 20 61 31 2c 61 32 3a |0,d5:.\.|l a1,a2:|
|00002100| 80 47 20 27 6b 6e 6f 62 | 32 3a 80 50 20 65 72 72 |.G 'knob|2:.P err|
|00002110| 64 3a 80 81 20 23 2d 31 | 2c 64 35 00 27 6b 6e 6f |d:.. #-1|,d5.'kno|
|00002120| 62 32 00 3b 00 80 5c 20 | 64 32 2c 64 33 3a 80 46 |b2.;..\ |d2,d3:.F|
|00002130| 20 27 73 6b 69 70 3a 80 | 75 20 64 32 2c 64 33 00 | 'skip:.|u d2,d3.|
|00002140| 3b 00 27 73 6b 69 70 3a | 80 7e 20 64 32 2c 28 61 |;.'skip:|.~ d2,(a|
|00002150| 32 29 2b 3a 80 7e 20 64 | 33 2c 28 61 32 29 2b 00 |2)+:.~ d|3,(a2)+.|
|00002160| 80 45 2e 6c 20 23 32 2c | 64 34 3a 80 7e 20 64 34 |.E.l #2,|d4:.~ d4|
|00002170| 2c 28 61 32 29 2b 3a 80 | 5b 20 28 61 32 29 2b 00 |,(a2)+:.|[ (a2)+.|
|00002180| 3b 00 80 b0 20 64 35 3a | 80 51 20 27 73 6b 69 70 |;... d5:|.Q 'skip|
|00002190| 32 3a 80 7e 20 64 35 2c | 28 61 32 29 00 3b 00 27 |2:.~ d5,|(a2).;.'|
|000021a0| 73 6b 69 70 32 3a 80 94 | 00 00 2e 66 72 65 65 70 |skip2:..|...freep|
|000021b0| 61 6c 00 80 7e 20 34 28 | 61 33 29 2c 64 30 3a 80 |al..~ 4(|a3),d0:.|
|000021c0| 48 20 27 64 6f 6e 65 3a | 80 5b 20 34 28 61 33 29 |H 'done:|.[ 4(a3)|
|000021d0| 3a 80 7e 2e 6c 20 28 61 | 33 29 2c 61 31 3a 80 5b |:.~.l (a|3),a1:.[|
|000021e0| 2e 6c 20 28 61 33 29 00 | 80 7e 20 23 2d 31 2c 36 |.l (a3).|.~ #-1,6|
|000021f0| 28 61 33 29 3a 80 84 20 | 23 31 32 2c 64 30 3a 80 |(a3):.. |#12,d0:.|
|00002200| 40 2e 6c 20 23 38 2c 64 | 30 3a 80 38 20 24 63 30 |@.l #8,d|0:.8 $c0|
|00002210| 30 33 00 27 64 6f 6e 65 | 3a 80 94 00 00 2e 6e 65 |03.'done|:.....ne|
|00002220| 77 70 61 6c 6d 6f 64 65 | 00 3b 00 80 7e 20 64 30 |wpalmode|.;..~ d0|
|00002230| 2c 70 61 6c 6d 6f 64 65 | 3a 80 94 00 3b 00 70 61 |,palmode|:...;.pa|
|00002240| 6c 6d 6f 64 65 3a 80 25 | 20 30 00 00 2e 75 73 65 |lmode:.%| 0...use|
|00002250| 70 61 6c 00 3b 00 80 25 | 20 24 61 30 30 31 3a 80 |pal.;..%| $a001:.|
|00002260| 25 2e 6c 20 62 5f 75 73 | 65 70 61 6c 00 3b 00 80 |%.l b_us|epal.;..|
|00002270| b0 20 70 61 6c 6d 6f 64 | 65 3a 80 48 20 64 6f 69 |. palmod|e:.H doi|
|00002280| 74 31 3a 80 94 00 3b 00 | 62 5f 75 73 65 70 61 6c |t1:...;.|b_usepal|
|00002290| 00 3a 00 80 b0 20 70 61 | 6c 6d 6f 64 65 3a 80 48 |.:... pa|lmode:.H|
|000022a0| 20 64 6f 69 74 32 3a 80 | 94 00 00 2e 73 68 6f 77 | doit2:.|....show|
|000022b0| 70 61 6c 3a 3b 61 33 3d | 50 61 6c 65 74 74 65 20 |pal:;a3=|Palette |
|000022c0| 23 2c 20 61 32 3d 55 73 | 65 64 20 53 63 72 65 65 |#, a2=Us|ed Scree|
|000022d0| 6e 2c 20 61 36 3d 67 72 | 2e 6c 69 62 00 3b 00 80 |n, a6=gr|.lib.;..|
|000022e0| 25 20 24 61 30 30 31 3a | 80 25 2e 6c 20 62 5f 73 |% $a001:|.%.l b_s|
|000022f0| 68 6f 77 70 61 6c 00 3b | 00 64 6f 69 74 31 3a 80 |howpal.;|.doit1:.|
|00002300| b0 20 61 67 61 6d 6f 64 | 65 3a 80 48 20 27 64 6f |. agamod|e:.H 'do|
|00002310| 34 62 69 74 00 3b 00 80 | 7e 20 34 28 61 33 29 2c |4bit.;..|~ 4(a3),|
|00002320| 64 34 3a 80 48 20 27 73 | 6b 69 70 3a 80 7e 2e 6c |d4:.H 's|kip:.~.l|
|00002330| 20 28 61 32 29 2c 61 30 | 3a 80 7a 20 34 34 28 61 | (a2),a0|:.z 44(a|
|00002340| 30 29 2c 61 30 00 80 7e | 2e 6c 20 28 61 33 29 2c |0),a0..~|.l (a3),|
|00002350| 61 31 3a 80 78 20 2d 24 | 33 37 32 28 61 36 29 00 |a1:.x -$|372(a6).|
|00002360| 3b 00 27 64 6f 34 62 69 | 74 00 3b 00 80 7e 2e 6c |;.'do4bi|t.;..~.l|
|00002370| 20 61 33 2c 61 30 3a 80 | 59 20 6d 61 6b 65 34 62 | a3,a0:.|Y make4b|
|00002380| 69 74 72 67 62 73 3a 80 | b0 20 64 30 3a 80 48 20 |itrgbs:.|. d0:.H |
|00002390| 27 73 6b 69 70 00 80 7e | 2e 6c 20 28 61 32 29 2c |'skip..~|.l (a2),|
|000023a0| 61 30 3a 80 7a 20 34 34 | 28 61 30 29 2c 61 30 3a |a0:.z 44|(a0),a0:|
|000023b0| 80 78 20 5f 4c 6f 61 64 | 52 47 42 34 28 61 36 29 |.x _Load|RGB4(a6)|
|000023c0| 00 3b 00 27 73 6b 69 70 | 00 00 62 5f 73 68 6f 77 |.;.'skip|..b_show|
|000023d0| 70 61 6c 00 3b 00 64 6f | 69 74 32 3a 80 7e 2e 6c |pal.;.do|it2:.~.l|
|000023e0| 20 31 38 28 61 30 29 2c | 61 31 3a 3b 63 6f 6c 6f | 18(a0),|a1:;colo|
|000023f0| 75 72 20 70 6f 6b 65 73 | 00 80 7e 20 38 28 61 30 |ur pokes|..~ 8(a0|
|00002400| 29 2c 64 32 3a 80 5c 20 | 34 28 61 33 29 2c 64 32 |),d2:.\ |4(a3),d2|
|00002410| 3a 80 4d 20 27 73 6b 69 | 70 3a 80 7e 20 34 28 61 |:.M 'ski|p:.~ 4(a|
|00002420| 33 29 2c 64 32 00 27 73 | 6b 69 70 3a 80 aa 20 23 |3),d2.'s|kip:.. #|
|00002430| 31 2c 64 32 3a 80 4f 20 | 27 73 6b 69 70 32 3a 80 |1,d2:.O |'skip2:.|
|00002440| 40 20 23 32 2c 61 31 3a | 80 7e 2e 6c 20 28 61 33 |@ #2,a1:|.~.l (a3|
|00002450| 29 2c 61 33 3a 80 40 20 | 23 34 2c 61 33 00 27 6c |),a3:.@ |#4,a3.'l|
|00002460| 6f 6f 70 00 3b 00 80 81 | 20 23 30 2c 64 30 00 80 |oop.;...| #0,d0..|
|00002470| 7e 2e 6c 20 28 61 33 29 | 2b 2c 64 30 3a 80 8e 2e |~.l (a3)|+,d0:...|
|00002480| 6c 20 23 38 2c 64 30 3a | 80 7c 20 23 34 2c 64 30 |l #8,d0:|.| #4,d0|
|00002490| 00 80 7e 2e 6c 20 28 61 | 33 29 2b 2c 64 31 3a 80 |..~.l (a|3)+,d1:.|
|000024a0| 8e 2e 6c 20 23 38 2c 64 | 31 3a 80 7e 2e 62 20 64 |..l #8,d|1:.~.b d|
|000024b0| 31 2c 64 30 3a 80 42 20 | 23 24 66 66 30 2c 64 30 |1,d0:.B |#$ff0,d0|
|000024c0| 00 80 7e 2e 6c 20 28 61 | 33 29 2b 2c 64 31 3a 80 |..~.l (a|3)+,d1:.|
|000024d0| 8e 2e 6c 20 23 34 2c 64 | 31 3a 80 42 20 23 31 35 |..l #4,d|1:.B #15|
|000024e0| 2c 64 31 3a 80 8a 20 64 | 31 2c 64 30 00 3b 00 80 |,d1:.. d|1,d0.;..|
|000024f0| 7e 20 64 30 2c 28 61 31 | 29 3a 80 40 20 23 34 2c |~ d0,(a1|):.@ #4,|
|00002500| 61 31 3a 80 6e 20 64 32 | 2c 27 6c 6f 6f 70 3a 80 |a1:.n d2|,'loop:.|
|00002510| 94 00 27 73 6b 69 70 32 | 3a 80 94 00 00 2e 64 6f |..'skip2|:.....do|
|00002520| 63 79 63 6c 65 3a 3b 61 | 33 3d 50 61 6c 65 74 74 |cycle:;a|3=Palett|
|00002530| 65 20 69 74 65 6d 2c 20 | 61 32 3d 55 73 65 64 20 |e item, |a2=Used |
|00002540| 53 63 72 65 65 6e 00 3b | 00 80 81 20 23 31 32 2c |Screen.;|... #12,|
|00002550| 64 30 3a 80 81 20 23 31 | 2c 64 31 3a 80 38 20 24 |d0:.. #1|,d1:.8 $|
|00002560| 63 30 30 32 3a 80 7e 2e | 6c 20 64 30 2c 61 30 00 |c002:.~.|l d0,a0.|
|00002570| 3b 00 80 7e 2e 6c 20 61 | 33 2c 34 28 61 30 29 00 |;..~.l a|3,4(a0).|
|00002580| 80 7e 2e 6c 20 28 61 32 | 29 2c 61 32 3a 80 7a 20 |.~.l (a2|),a2:.z |
|00002590| 34 34 28 61 32 29 2c 61 | 32 3a 80 7e 2e 6c 20 61 |44(a2),a|2:.~.l a|
|000025a0| 32 2c 38 28 61 30 29 00 | 80 7e 2e 6c 20 63 79 63 |2,8(a0).|.~.l cyc|
|000025b0| 6c 65 6c 69 73 74 28 70 | 63 29 2c 28 61 30 29 3a |lelist(p|c),(a0):|
|000025c0| 80 7e 2e 6c 20 61 30 2c | 63 79 63 6c 65 6c 69 73 |.~.l a0,|cyclelis|
|000025d0| 74 00 80 7e 20 63 79 63 | 6f 6e 28 70 63 29 2c 64 |t..~ cyc|on(pc),d|
|000025e0| 30 3a 80 50 20 27 64 6f | 6e 65 3a 80 89 20 63 79 |0:.P 'do|ne:.. cy|
|000025f0| 63 6f 6e 00 80 7e 20 23 | 24 38 30 30 35 2c 64 30 |con..~ #|$8005,d0|
|00002600| 3a 80 7e 2e 6c 20 23 63 | 79 63 6c 65 65 6d 2c 64 |:.~.l #c|ycleem,d|
|00002610| 31 00 80 38 20 24 63 31 | 30 30 3a 3b 73 65 74 20 |1..8 $c1|00:;set |
|00002620| 69 6e 74 2c 20 64 31 3d | 63 6f 64 65 2c 20 64 30 |int, d1=|code, d0|
|00002630| 3d 6c 65 76 65 6c 00 27 | 64 6f 6e 65 3a 80 94 00 |=level.'|done:...|
|00002640| 00 2e 64 6f 73 74 6f 70 | 63 79 63 6c 65 00 3b 00 |..dostop|cycle.;.|
|00002650| 80 7e 20 23 24 38 30 30 | 35 2c 64 30 3a 80 38 20 |.~ #$800|5,d0:.8 |
|00002660| 24 63 31 30 31 3a 80 94 | 00 00 2e 64 6f 61 67 61 |$c101:..|...doaga|
|00002670| 72 65 64 3a 80 81 20 23 | 30 2c 64 37 00 3b 00 64 |red:.. #|0,d7.;.d|
|00002680| 6f 61 67 61 63 6f 6c 3a | 80 7e 2e 6c 20 28 61 30 |oagacol:|.~.l (a0|
|00002690| 29 2c 61 30 3a 80 7a 20 | 34 34 28 61 30 29 2c 61 |),a0:.z |44(a0),a|
|000026a0| 30 3a 80 7e 2e 6c 20 34 | 28 61 30 29 2c 61 30 00 |0:.~.l 4|(a0),a0.|
|000026b0| 80 81 20 23 31 2c 64 31 | 3a 80 7a 20 61 67 61 74 |.. #1,d1|:.z agat|
|000026c0| 61 62 6c 65 28 70 63 29 | 2c 61 31 3a 80 79 20 2d |able(pc)|,a1:.y -|
|000026d0| 24 33 38 34 28 61 36 29 | 20 3b 67 65 74 72 67 62 |$384(a6)| ;getrgb|
|000026e0| 33 32 5f 00 80 7e 2e 6c | 20 61 67 61 74 61 62 6c |32_..~.l| agatabl|
|000026f0| 65 28 70 63 2c 64 37 29 | 2c 64 30 3a 80 8e 2e 6c |e(pc,d7)|,d0:...l|
|00002700| 20 23 38 2c 64 30 3a 80 | 42 20 23 32 35 35 2c 64 | #8,d0:.|B #255,d|
|00002710| 30 3a 80 94 00 3b 00 61 | 67 61 74 61 62 6c 65 3a |0:...;.a|gatable:|
|00002720| 80 26 2e 6c 20 33 00 00 | 2e 64 6f 61 67 61 67 72 |.&.l 3..|.doagagr|
|00002730| 65 65 6e 3a 80 81 20 23 | 34 2c 64 37 3a 80 58 20 |een:.. #|4,d7:.X |
|00002740| 64 6f 61 67 61 63 6f 6c | 00 00 2e 64 6f 61 67 61 |doagacol|...doaga|
|00002750| 62 6c 75 65 3a 80 81 20 | 23 38 2c 64 37 3a 80 58 |blue:.. |#8,d7:.X|
|00002760| 20 64 6f 61 67 61 63 6f | 6c 00 00 2e 64 6f 72 65 | doagaco|l...dore|
|00002770| 64 3a 80 25 20 24 61 30 | 30 31 3a 80 25 2e 6c 20 |d:.% $a0|01:.%.l |
|00002780| 62 5f 64 6f 72 65 64 00 | 80 81 20 23 38 2c 64 37 |b_dored.|.. #8,d7|
|00002790| 00 3b 00 61 5f 64 6f 67 | 63 6f 6c 3a 80 7e 2e 6c |.;.a_dog|col:.~.l|
|000027a0| 20 28 61 30 29 2c 61 30 | 3a 80 7a 20 34 34 28 61 | (a0),a0|:.z 44(a|
|000027b0| 30 29 2c 61 30 3a 80 7e | 2e 6c 20 34 28 61 30 29 |0),a0:.~|.l 4(a0)|
|000027c0| 2c 61 30 00 80 79 20 5f | 47 65 74 52 47 42 34 28 |,a0..y _|GetRGB4(|
|000027d0| 61 36 29 3a 80 7d 20 64 | 37 2c 64 30 3a 80 42 20 |a6):.} d|7,d0:.B |
|000027e0| 23 31 35 2c 64 30 3a 80 | 94 00 00 62 5f 64 6f 72 |#15,d0:.|...b_dor|
|000027f0| 65 64 3a 3b 62 6c 69 74 | 7a 20 66 6f 72 6d 20 6f |ed:;blit|z form o|
|00002800| 66 20 72 65 64 00 80 81 | 20 23 38 2c 64 37 00 3b |f red...| #8,d7.;|
|00002810| 00 62 5f 64 6f 67 63 6f | 6c 3a 80 7e 2e 6c 20 31 |.b_dogco|l:.~.l 1|
|00002820| 38 28 61 30 29 2c 61 30 | 3a 80 7c 20 23 32 2c 64 |8(a0),a0|:.| #2,d|
|00002830| 30 3a 80 7e 20 32 28 61 | 30 2c 64 30 29 2c 64 30 |0:.~ 2(a|0,d0),d0|
|00002840| 00 80 7d 20 64 37 2c 64 | 30 3a 80 42 20 23 31 35 |..} d7,d|0:.B #15|
|00002850| 2c 64 30 3a 80 94 00 00 | 2e 64 6f 67 72 65 65 6e |,d0:....|.dogreen|
|00002860| 3a 80 25 20 24 61 30 30 | 31 3a 80 25 2e 6c 20 62 |:.% $a00|1:.%.l b|
|00002870| 5f 64 6f 67 72 65 65 6e | 00 80 81 20 23 34 2c 64 |_dogreen|... #4,d|
|00002880| 37 3a 80 58 20 61 5f 64 | 6f 67 63 6f 6c 00 62 5f |7:.X a_d|ogcol.b_|
|00002890| 64 6f 67 72 65 65 6e 3a | 80 81 20 23 34 2c 64 37 |dogreen:|.. #4,d7|
|000028a0| 3a 80 58 20 62 5f 64 6f | 67 63 6f 6c 00 00 2e 64 |:.X b_do|gcol...d|
|000028b0| 6f 62 6c 75 65 3a 80 25 | 20 24 61 30 30 31 3a 80 |oblue:.%| $a001:.|
|000028c0| 25 2e 6c 20 62 5f 64 6f | 62 6c 75 65 00 80 81 20 |%.l b_do|blue... |
|000028d0| 23 30 2c 64 37 3a 80 58 | 20 61 5f 64 6f 67 63 6f |#0,d7:.X| a_dogco|
|000028e0| 6c 00 62 5f 64 6f 62 6c | 75 65 3a 80 81 20 23 30 |l.b_dobl|ue:.. #0|
|000028f0| 2c 64 37 3a 80 58 20 62 | 5f 64 6f 67 63 6f 6c 00 |,d7:.X b|_dogcol.|
|00002900| 00 2e 64 6f 61 61 72 67 | 62 20 20 3b 64 30 3d 72 |..doaarg|b ;d0=r|
|00002910| 65 67 2c 20 64 31 3d 72 | 65 64 2c 20 64 32 3d 67 |eg, d1=r|ed, d2=g|
|00002920| 72 65 65 6e 2c 20 64 33 | 3d 62 6c 75 65 2c 20 61 |reen, d3|=blue, a|
|00002930| 36 3d 67 72 61 70 68 69 | 63 73 2c 20 61 30 3d 73 |6=graphi|cs, a0=s|
|00002940| 63 72 65 65 6e 00 3b 00 | 80 7e 20 64 31 2c 64 34 |creen.;.|.~ d1,d4|
|00002950| 3a 80 7c 20 23 38 2c 64 | 31 3a 80 7e 2e 62 20 64 |:.| #8,d|1:.~.b d|
|00002960| 34 2c 64 31 3a 80 7e 20 | 64 31 2c 64 34 3a 80 ac |4,d1:.~ |d1,d4:..|
|00002970| 20 64 31 3a 80 7e 20 64 | 34 2c 64 31 00 80 7e 20 | d1:.~ d|4,d1..~ |
|00002980| 64 32 2c 64 34 3a 80 7c | 20 23 38 2c 64 32 3a 80 |d2,d4:.|| #8,d2:.|
|00002990| 7e 2e 62 20 64 34 2c 64 | 32 3a 80 7e 20 64 32 2c |~.b d4,d|2:.~ d2,|
|000029a0| 64 34 3a 80 ac 20 64 32 | 3a 80 7e 20 64 34 2c 64 |d4:.. d2|:.~ d4,d|
|000029b0| 32 00 80 7e 20 64 33 2c | 64 34 3a 80 7c 20 23 38 |2..~ d3,|d4:.| #8|
|000029c0| 2c 64 33 3a 80 7e 2e 62 | 20 64 34 2c 64 33 3a 80 |,d3:.~.b| d4,d3:.|
|000029d0| 7e 20 64 33 2c 64 34 3a | 80 ac 20 64 33 3a 80 7e |~ d3,d4:|.. d3:.~|
|000029e0| 20 64 34 2c 64 33 00 3b | 45 58 54 2e 6c 20 64 30 | d4,d3.;|EXT.l d0|
|000029f0| 3a 4d 4f 56 45 2e 6c 20 | 28 61 30 29 2c 61 30 3a |:MOVE.l |(a0),a0:|
|00002a00| 4c 45 41 20 34 34 28 61 | 30 29 2c 61 30 3a 4a 4d |LEA 44(a|0),a0:JM|
|00002a10| 50 20 2d 24 33 35 34 28 | 61 36 29 00 80 7a 20 74 |P -$354(|a6)..z t|
|00002a20| 61 62 6c 65 28 70 63 29 | 2c 61 31 3a 80 7e 2e 62 |able(pc)|,a1:.~.b|
|00002a30| 20 64 30 2c 33 28 61 31 | 29 3a 80 82 2e 6c 20 64 | d0,3(a1|):...l d|
|00002a40| 31 2d 64 33 2c 34 28 61 | 31 29 00 80 7e 2e 6c 20 |1-d3,4(a|1)..~.l |
|00002a50| 28 61 30 29 2c 61 30 3a | 80 7a 20 34 34 28 61 30 |(a0),a0:|.z 44(a0|
|00002a60| 29 2c 61 30 3a 80 78 20 | 2d 24 33 37 32 28 61 36 |),a0:.x |-$372(a6|
|00002a70| 29 00 00 74 61 62 6c 65 | 3a 80 25 2e 6c 20 24 31 |)..table|:.%.l $1|
|00002a80| 30 30 30 30 2c 30 2c 30 | 2c 30 2c 30 00 00 2e 64 |0000,0,0|,0,0...d|
|00002a90| 6f 72 67 62 3a 3b 64 30 | 3d 72 65 67 2c 20 64 31 |orgb:;d0|=reg, d1|
|00002aa0| 3d 72 65 64 2c 20 64 32 | 3d 67 72 65 65 6e 2c 20 |=red, d2|=green, |
|00002ab0| 64 33 3d 62 6c 75 65 00 | 3b 00 80 25 20 24 61 30 |d3=blue.|;..% $a0|
|00002ac0| 30 31 3a 80 25 2e 6c 20 | 62 5f 64 6f 72 67 62 00 |01:.%.l |b_dorgb.|
|00002ad0| 80 7e 2e 6c 20 28 61 30 | 29 2c 61 30 3a 80 7a 20 |.~.l (a0|),a0:.z |
|00002ae0| 34 34 28 61 30 29 2c 61 | 30 00 80 78 20 5f 53 65 |44(a0),a|0..x _Se|
|00002af0| 74 52 47 42 34 28 61 36 | 29 00 00 62 5f 64 6f 72 |tRGB4(a6|)..b_dor|
|00002b00| 67 62 3a 3b 62 6c 69 74 | 7a 20 66 6f 72 6d 20 6f |gb:;blit|z form o|
|00002b10| 66 20 52 47 42 20 63 6f | 6d 6d 61 6e 64 00 3b 00 |f RGB co|mmand.;.|
|00002b20| 80 7e 2e 6c 20 31 38 28 | 61 30 29 2c 61 30 3a 80 |.~.l 18(|a0),a0:.|
|00002b30| 7c 20 23 32 2c 64 30 00 | 80 7c 20 23 38 2c 64 31 || #2,d0.|.| #8,d1|
|00002b40| 3a 80 7c 20 23 34 2c 64 | 32 3a 80 8a 20 64 32 2c |:.| #4,d|2:.. d2,|
|00002b50| 64 31 3a 80 8a 20 64 33 | 2c 64 31 00 80 7e 20 64 |d1:.. d3|,d1..~ d|
|00002b60| 31 2c 32 28 61 30 2c 64 | 30 29 3a 80 94 00 00 2e |1,2(a0,d|0):.....|
|00002b70| 63 79 63 6c 65 65 6d 3a | 20 3b 63 6f 64 65 20 74 |cycleem:| ;code t|
|00002b80| 6f 20 67 65 74 20 65 78 | 65 63 75 74 65 64 20 6f |o get ex|ecuted o|
|00002b90| 6e 20 76 62 6c 61 6e 6b | 20 69 6e 74 65 72 75 70 |n vblank| interup|
|00002ba0| 74 20 66 6f 72 00 20 20 | 20 20 20 20 20 20 20 20 |t for. | |
|00002bb0| 3b 73 6f 6d 65 20 70 72 | 65 74 74 79 20 63 6f 6c |;some pr|etty col|
|00002bc0| 6f 75 72 20 63 79 63 6c | 69 6e 67 00 20 20 20 20 |our cycl|ing. |
|00002bd0| 20 20 20 20 20 20 3b 50 | 43 20 72 65 6c 61 74 69 | ;P|C relati|
|00002be0| 76 65 20 66 6f 72 20 65 | 61 73 79 20 64 75 70 6c |ve for e|asy dupl|
|00002bf0| 69 63 61 74 69 6f 6e 00 | 00 80 82 2e 6c 20 64 32 |ication.|....l d2|
|00002c00| 2d 64 34 2f 61 32 2d 61 | 33 2c 2d 28 61 37 29 3a |-d4/a2-a|3,-(a7):|
|00002c10| 80 7e 2e 6c 20 67 66 78 | 62 61 73 65 28 70 63 29 |.~.l gfx|base(pc)|
|00002c20| 2c 61 36 00 80 7a 20 63 | 79 63 6c 65 6c 69 73 74 |,a6..z c|yclelist|
|00002c30| 28 70 63 29 2c 61 32 00 | 00 27 62 69 67 6c 6f 6f |(pc),a2.|.'bigloo|
|00002c40| 70 00 80 7e 2e 6c 20 28 | 61 32 29 2c 64 30 3a 80 |p..~.l (|a2),d0:.|
|00002c50| 48 20 27 61 6c 6c 64 6f | 6e 65 3a 80 7e 2e 6c 20 |H 'alldo|ne:.~.l |
|00002c60| 64 30 2c 61 32 00 80 7e | 2e 6c 20 34 28 61 32 29 |d0,a2..~|.l 4(a2)|
|00002c70| 2c 61 31 3a 80 7a 20 34 | 28 61 31 29 2c 61 30 3a |,a1:.z 4|(a1),a0:|
|00002c80| 80 81 20 23 30 2c 64 34 | 00 3b 00 27 63 6c 6f 6f |.. #0,d4|.;.'cloo|
|00002c90| 70 3a 80 40 20 23 32 2c | 61 30 3a 80 7e 20 28 61 |p:.@ #2,|a0:.~ (a|
|00002ca0| 30 29 2b 2c 64 30 3a 80 | 4f 20 27 64 6f 6e 65 3a |0)+,d0:.|O 'done:|
|00002cb0| 80 7e 20 28 61 30 29 2b | 2c 64 31 00 80 81 20 23 |.~ (a0)+|,d1... #|
|00002cc0| 30 2c 64 33 3a 80 7e 20 | 28 61 30 29 2b 2c 64 32 |0,d3:.~ |(a0)+,d2|
|00002cd0| 3a 80 51 20 27 73 6b 69 | 70 3a 80 86 20 64 32 3a |:.Q 'ski|p:.. d2:|
|00002ce0| 80 81 20 23 2d 31 2c 64 | 33 00 27 73 6b 69 70 3a |.. #-1,d|3.'skip:|
|00002cf0| 80 3d 20 28 61 30 29 2c | 64 32 3a 80 7e 20 64 32 |.= (a0),|d2:.~ d2|
|00002d00| 2c 28 61 30 29 3a 80 5c | 20 23 31 36 33 38 34 2c |,(a0):.\| #16384,|
|00002d10| 64 32 00 80 47 20 27 63 | 6c 6f 6f 70 3a 80 a7 20 |d2..G 'c|loop:.. |
|00002d20| 23 31 36 33 38 34 2c 64 | 32 3a 80 7e 20 64 32 2c |#16384,d|2:.~ d2,|
|00002d30| 28 61 30 29 3a 80 81 20 | 23 2d 31 2c 64 34 00 80 |(a0):.. |#-1,d4..|
|00002d40| 84 20 23 31 32 2c 64 30 | 3a 80 84 20 23 31 32 2c |. #12,d0|:.. #12,|
|00002d50| 64 31 3a 80 7e 2e 6c 20 | 28 61 31 29 2c 61 33 3a |d1:.~.l |(a1),a3:|
|00002d60| 80 40 20 23 34 2c 61 33 | 3a 80 b0 20 64 33 3a 80 |.@ #4,a3|:.. d3:.|
|00002d70| 48 20 27 64 6f 77 6e 00 | 3b 00 3b 48 65 72 65 2c |H 'down.|;.;Here,|
|00002d80| 20 74 68 65 20 70 61 6c | 65 74 74 65 20 69 73 20 | the pal|ette is |
|00002d90| 73 63 72 6f 6c 6c 69 6e | 67 20 55 50 57 41 52 44 |scrollin|g UPWARD|
|00002da0| 53 21 00 3b 00 80 7e 2e | 6c 20 30 28 61 33 2c 64 |S!.;..~.|l 0(a3,d|
|00002db0| 30 29 2c 2d 28 61 37 29 | 00 80 7e 2e 6c 20 34 28 |0),-(a7)|..~.l 4(|
|00002dc0| 61 33 2c 64 30 29 2c 2d | 28 61 37 29 00 80 7e 2e |a3,d0),-|(a7)..~.|
|00002dd0| 6c 20 38 28 61 33 2c 64 | 30 29 2c 2d 28 61 37 29 |l 8(a3,d|0),-(a7)|
|00002de0| 00 27 75 6c 6f 6f 70 00 | 80 5c 20 64 31 2c 64 30 |.'uloop.|.\ d1,d0|
|00002df0| 3a 80 46 20 27 75 64 6f | 6e 65 00 80 7e 2e 6c 20 |:.F 'udo|ne..~.l |
|00002e00| 31 32 28 61 33 2c 64 30 | 29 2c 30 28 61 33 2c 64 |12(a3,d0|),0(a3,d|
|00002e10| 30 29 00 80 7e 2e 6c 20 | 31 36 28 61 33 2c 64 30 |0)..~.l |16(a3,d0|
|00002e20| 29 2c 34 28 61 33 2c 64 | 30 29 00 80 7e 2e 6c 20 |),4(a3,d|0)..~.l |
|00002e30| 32 30 28 61 33 2c 64 30 | 29 2c 38 28 61 33 2c 64 |20(a3,d0|),8(a3,d|
|00002e40| 30 29 00 80 3d 20 23 31 | 32 2c 64 30 3a 80 58 20 |0)..= #1|2,d0:.X |
|00002e50| 27 75 6c 6f 6f 70 00 27 | 75 64 6f 6e 65 00 80 7e |'uloop.'|udone..~|
|00002e60| 2e 6c 20 28 61 37 29 2b | 2c 38 28 61 33 2c 64 30 |.l (a7)+|,8(a3,d0|
|00002e70| 29 00 80 7e 2e 6c 20 28 | 61 37 29 2b 2c 34 28 61 |)..~.l (|a7)+,4(a|
|00002e80| 33 2c 64 30 29 00 80 7e | 2e 6c 20 28 61 37 29 2b |3,d0)..~|.l (a7)+|
|00002e90| 2c 30 28 61 33 2c 64 30 | 29 00 80 58 20 27 63 6c |,0(a3,d0|)..X 'cl|
|00002ea0| 6f 6f 70 00 3b 00 3b 48 | 65 72 65 2c 20 74 68 65 |oop.;.;H|ere, the|
|00002eb0| 20 70 61 6c 65 74 74 65 | 20 69 73 20 73 63 72 6f | palette| is scro|
|00002ec0| 6c 6c 69 6e 67 20 44 4f | 57 4e 57 41 52 44 53 21 |lling DO|WNWARDS!|
|00002ed0| 00 3b 00 27 64 6f 77 6e | 3a 00 80 7e 2e 6c 20 30 |.;.'down|:..~.l 0|
|00002ee0| 28 61 33 2c 64 31 29 2c | 2d 28 61 37 29 00 80 7e |(a3,d1),|-(a7)..~|
|00002ef0| 2e 6c 20 34 28 61 33 2c | 64 31 29 2c 2d 28 61 37 |.l 4(a3,|d1),-(a7|
|00002f00| 29 00 80 7e 2e 6c 20 38 | 28 61 33 2c 64 31 29 2c |)..~.l 8|(a3,d1),|
|00002f10| 2d 28 61 37 29 00 27 64 | 6c 6f 6f 70 00 80 5c 20 |-(a7).'d|loop..\ |
|00002f20| 64 30 2c 64 31 3a 80 4d | 20 27 64 64 6f 6e 65 3a |d0,d1:.M| 'ddone:|
|00002f30| 80 a7 20 23 31 32 2c 64 | 31 00 80 7e 2e 6c 20 30 |.. #12,d|1..~.l 0|
|00002f40| 28 61 33 2c 64 31 29 2c | 31 32 28 61 33 2c 64 31 |(a3,d1),|12(a3,d1|
|00002f50| 29 00 80 7e 2e 6c 20 34 | 28 61 33 2c 64 31 29 2c |)..~.l 4|(a3,d1),|
|00002f60| 31 36 28 61 33 2c 64 31 | 29 00 80 7e 2e 6c 20 38 |16(a3,d1|)..~.l 8|
|00002f70| 28 61 33 2c 64 31 29 2c | 32 30 28 61 33 2c 64 31 |(a3,d1),|20(a3,d1|
|00002f80| 29 00 80 58 20 27 64 6c | 6f 6f 70 00 27 64 64 6f |)..X 'dl|oop.'ddo|
|00002f90| 6e 65 00 80 7e 2e 6c 20 | 28 61 37 29 2b 2c 38 28 |ne..~.l |(a7)+,8(|
|00002fa0| 61 33 2c 64 31 29 00 80 | 7e 2e 6c 20 28 61 37 29 |a3,d1)..|~.l (a7)|
|00002fb0| 2b 2c 34 28 61 33 2c 64 | 31 29 00 80 7e 2e 6c 20 |+,4(a3,d|1)..~.l |
|00002fc0| 28 61 37 29 2b 2c 30 28 | 61 33 2c 64 31 29 00 80 |(a7)+,0(|a3,d1)..|
|00002fd0| 58 20 27 63 6c 6f 6f 70 | 00 3b 00 27 64 6f 6e 65 |X 'cloop|.;.'done|
|00002fe0| 00 3b 00 80 b0 20 64 34 | 3a 80 48 20 27 62 69 67 |.;... d4|:.H 'big|
|00002ff0| 6c 6f 6f 70 00 3b 00 80 | b0 20 61 67 61 6d 6f 64 |loop.;..|. agamod|
|00003000| 65 3a 80 48 20 27 64 6f | 34 62 69 74 00 80 7e 2e |e:.H 'do|4bit..~.|
|00003010| 6c 20 38 28 61 32 29 2c | 61 30 3a 80 7e 2e 6c 20 |l 8(a2),|a0:.~.l |
|00003020| 28 61 31 29 2c 61 31 3a | 80 79 20 2d 24 33 37 32 |(a1),a1:|.y -$372|
|00003030| 28 61 36 29 3a 80 58 20 | 27 62 69 67 6c 6f 6f 70 |(a6):.X |'bigloop|
|00003040| 20 20 3b 6c 6f 61 64 72 | 67 62 33 32 00 27 64 6f | ;loadr|gb32.'do|
|00003050| 34 62 69 74 00 80 7e 2e | 6c 20 61 31 2c 61 30 3a |4bit..~.|l a1,a0:|
|00003060| 80 59 20 6d 61 6b 65 34 | 62 69 74 72 67 62 73 00 |.Y make4|bitrgbs.|
|00003070| 80 7e 2e 6c 20 38 28 61 | 32 29 2c 61 30 3a 80 79 |.~.l 8(a|2),a0:.y|
|00003080| 20 5f 4c 6f 61 64 52 47 | 42 34 28 61 36 29 3a 80 | _LoadRG|B4(a6):.|
|00003090| 58 20 27 62 69 67 6c 6f | 6f 70 00 3b 00 27 61 6c |X 'biglo|op.;.'al|
|000030a0| 6c 64 6f 6e 65 00 3b 00 | 80 82 2e 6c 20 28 61 37 |ldone.;.|...l (a7|
|000030b0| 29 2b 2c 64 32 2d 64 34 | 2f 61 32 2d 61 33 3a 80 |)+,d2-d4|/a2-a3:.|
|000030c0| 81 20 23 30 2c 64 30 3a | 80 94 00 00 3b 2d 2d 2d |. #0,d0:|....;---|
|000030d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000030e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000030f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003100| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 00 3b 20 6e 65 77 |--------|--.; new|
|00003110| 20 70 61 6c 65 74 74 65 | 20 63 6f 6d 6d 61 6e 64 | palette| command|
|00003120| 73 20 61 64 64 65 64 20 | 62 79 20 73 69 6d 6f 6e |s added |by simon|
|00003130| 20 61 75 67 75 73 74 20 | 31 39 39 34 00 3b 2d 2d | august |1994.;--|
|00003140| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003150| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003160| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 00 00 2e 5f 63 |--------|---..._c|
|00003180| 79 63 6c 65 70 61 6c 65 | 74 74 65 3a 20 20 20 20 |yclepale|tte: |
|00003190| 20 20 3b 61 32 3d 63 6f | 6c 6f 72 20 70 61 6c 65 | ;a2=co|lor pale|
|000031a0| 74 74 65 00 20 20 80 b0 | 20 34 28 61 32 29 3a 80 |tte. ..| 4(a2):.|
|000031b0| 48 20 27 64 6f 6e 65 3a | 80 7e 2e 6c 20 61 32 2c |H 'done:|.~.l a2,|
|000031c0| 61 31 3a 80 7a 20 34 28 | 61 31 29 2c 61 30 3a 80 |a1:.z 4(|a1),a0:.|
|000031d0| 81 20 23 30 2c 64 34 00 | 20 20 27 63 6c 6f 6f 70 |. #0,d4.| 'cloop|
|000031e0| 3a 80 40 20 23 32 2c 61 | 30 3a 80 7e 20 28 61 30 |:.@ #2,a|0:.~ (a0|
|000031f0| 29 2b 2c 64 30 3a 80 4f | 20 27 64 6f 6e 65 3a 80 |)+,d0:.O| 'done:.|
|00003200| 7e 20 28 61 30 29 2b 2c | 64 31 00 20 20 80 81 20 |~ (a0)+,|d1. .. |
|00003210| 23 30 2c 64 33 3a 80 7e | 20 28 61 30 29 2b 2c 64 |#0,d3:.~| (a0)+,d|
|00003220| 32 3a 80 51 20 27 73 6b | 69 70 3a 80 86 20 64 32 |2:.Q 'sk|ip:.. d2|
|00003230| 3a 80 81 20 23 2d 31 2c | 64 33 00 20 20 27 73 6b |:.. #-1,|d3. 'sk|
|00003240| 69 70 3a 80 3d 20 28 61 | 30 29 2c 64 32 3a 80 7e |ip:.= (a|0),d2:.~|
|00003250| 20 64 32 2c 28 61 30 29 | 3a 80 5c 20 23 31 36 33 | d2,(a0)|:.\ #163|
|00003260| 38 34 2c 64 32 00 20 20 | 80 47 20 27 63 6c 6f 6f |84,d2. |.G 'cloo|
|00003270| 70 3a 80 a7 20 23 31 36 | 33 38 34 2c 64 32 3a 80 |p:.. #16|384,d2:.|
|00003280| 7e 20 64 32 2c 28 61 30 | 29 3a 80 81 20 23 2d 31 |~ d2,(a0|):.. #-1|
|00003290| 2c 64 34 00 20 20 80 84 | 20 23 31 32 2c 64 30 3a |,d4. ..| #12,d0:|
|000032a0| 80 84 20 23 31 32 2c 64 | 31 3a 80 7e 2e 6c 20 28 |.. #12,d|1:.~.l (|
|000032b0| 61 31 29 2c 61 33 3a 80 | 40 20 23 34 2c 61 33 3a |a1),a3:.|@ #4,a3:|
|000032c0| 80 b0 20 64 33 3a 80 48 | 20 27 64 6f 77 6e 00 20 |.. d3:.H| 'down. |
|000032d0| 20 80 7e 2e 6c 20 30 28 | 61 33 2c 64 30 29 2c 2d | .~.l 0(|a3,d0),-|
|000032e0| 28 61 37 29 3a 80 7e 2e | 6c 20 34 28 61 33 2c 64 |(a7):.~.|l 4(a3,d|
|000032f0| 30 29 2c 2d 28 61 37 29 | 3a 80 7e 2e 6c 20 38 28 |0),-(a7)|:.~.l 8(|
|00003300| 61 33 2c 64 30 29 2c 2d | 28 61 37 29 00 20 20 27 |a3,d0),-|(a7). '|
|00003310| 75 6c 6f 6f 70 3a 80 5c | 20 64 31 2c 64 30 3a 80 |uloop:.\| d1,d0:.|
|00003320| 46 20 27 75 64 6f 6e 65 | 00 20 20 80 7e 2e 6c 20 |F 'udone|. .~.l |
|00003330| 31 32 28 61 33 2c 64 30 | 29 2c 30 28 61 33 2c 64 |12(a3,d0|),0(a3,d|
|00003340| 30 29 3a 80 7e 2e 6c 20 | 31 36 28 61 33 2c 64 30 |0):.~.l |16(a3,d0|
|00003350| 29 2c 34 28 61 33 2c 64 | 30 29 3a 80 7e 2e 6c 20 |),4(a3,d|0):.~.l |
|00003360| 32 30 28 61 33 2c 64 30 | 29 2c 38 28 61 33 2c 64 |20(a3,d0|),8(a3,d|
|00003370| 30 29 00 20 20 80 3d 20 | 23 31 32 2c 64 30 3a 80 |0). .= |#12,d0:.|
|00003380| 58 20 27 75 6c 6f 6f 70 | 00 20 20 27 75 64 6f 6e |X 'uloop|. 'udon|
|00003390| 65 3a 80 7e 2e 6c 20 28 | 61 37 29 2b 2c 38 28 61 |e:.~.l (|a7)+,8(a|
|000033a0| 33 2c 64 30 29 3a 80 7e | 2e 6c 20 28 61 37 29 2b |3,d0):.~|.l (a7)+|
|000033b0| 2c 34 28 61 33 2c 64 30 | 29 3a 80 7e 2e 6c 20 28 |,4(a3,d0|):.~.l (|
|000033c0| 61 37 29 2b 2c 30 28 61 | 33 2c 64 30 29 00 20 20 |a7)+,0(a|3,d0). |
|000033d0| 80 58 20 27 63 6c 6f 6f | 70 00 20 20 27 64 6f 77 |.X 'cloo|p. 'dow|
|000033e0| 6e 3a 80 7e 2e 6c 20 30 | 28 61 33 2c 64 31 29 2c |n:.~.l 0|(a3,d1),|
|000033f0| 2d 28 61 37 29 3a 80 7e | 2e 6c 20 34 28 61 33 2c |-(a7):.~|.l 4(a3,|
|00003400| 64 31 29 2c 2d 28 61 37 | 29 3a 80 7e 2e 6c 20 38 |d1),-(a7|):.~.l 8|
|00003410| 28 61 33 2c 64 31 29 2c | 2d 28 61 37 29 00 20 20 |(a3,d1),|-(a7). |
|00003420| 27 64 6c 6f 6f 70 3a 80 | 5c 20 64 30 2c 64 31 3a |'dloop:.|\ d0,d1:|
|00003430| 80 4d 20 27 64 64 6f 6e | 65 3a 80 a7 20 23 31 32 |.M 'ddon|e:.. #12|
|00003440| 2c 64 31 00 20 20 80 7e | 2e 6c 20 30 28 61 33 2c |,d1. .~|.l 0(a3,|
|00003450| 64 31 29 2c 31 32 28 61 | 33 2c 64 31 29 3a 80 7e |d1),12(a|3,d1):.~|
|00003460| 2e 6c 20 34 28 61 33 2c | 64 31 29 2c 31 36 28 61 |.l 4(a3,|d1),16(a|
|00003470| 33 2c 64 31 29 3a 80 7e | 2e 6c 20 38 28 61 33 2c |3,d1):.~|.l 8(a3,|
|00003480| 64 31 29 2c 32 30 28 61 | 33 2c 64 31 29 00 20 20 |d1),20(a|3,d1). |
|00003490| 80 58 20 27 64 6c 6f 6f | 70 00 20 20 27 64 64 6f |.X 'dloo|p. 'ddo|
|000034a0| 6e 65 3a 80 7e 2e 6c 20 | 28 61 37 29 2b 2c 38 28 |ne:.~.l |(a7)+,8(|
|000034b0| 61 33 2c 64 31 29 3a 80 | 7e 2e 6c 20 28 61 37 29 |a3,d1):.|~.l (a7)|
|000034c0| 2b 2c 34 28 61 33 2c 64 | 31 29 3a 80 7e 2e 6c 20 |+,4(a3,d|1):.~.l |
|000034d0| 28 61 37 29 2b 2c 30 28 | 61 33 2c 64 31 29 00 20 |(a7)+,0(|a3,d1). |
|000034e0| 20 80 58 20 27 63 6c 6f | 6f 70 00 20 20 27 64 6f | .X 'clo|op. 'do|
|000034f0| 6e 65 3a 80 94 00 00 2e | 5f 66 61 64 65 70 61 6c |ne:.....|_fadepal|
|00003500| 65 74 74 65 3a 20 20 20 | 20 20 20 3b 61 30 3d 73 |ette: | ;a0=s|
|00003510| 72 63 20 61 31 3d 64 65 | 73 74 20 64 32 3d 62 72 |rc a1=de|st d2=br|
|00003520| 69 67 68 74 6e 65 73 73 | 2e 71 00 20 20 80 7e 20 |ightness|.q. .~ |
|00003530| 34 28 61 30 29 2c 64 30 | 3a 80 48 20 6e 6f 63 6f |4(a0),d0|:.H noco|
|00003540| 6c 73 3a 80 5c 20 34 28 | 61 31 29 2c 64 30 3a 80 |ls:.\ 4(|a1),d0:.|
|00003550| 4a 20 6e 6f 63 6f 6c 73 | 3a 80 7d 2e 6c 23 38 2c |J nocols|:.}.l#8,|
|00003560| 64 32 00 20 20 80 7e 2e | 6c 20 28 61 30 29 2c 61 |d2. .~.|l (a0),a|
|00003570| 30 3a 80 40 23 32 2c 61 | 30 3a 80 7e 2e 6c 28 61 |0:.@#2,a|0:.~.l(a|
|00003580| 31 29 2c 61 31 3a 80 40 | 23 34 2c 61 31 3a 80 aa |1),a1:.@|#4,a1:..|
|00003590| 23 31 2c 64 30 00 20 20 | 80 7e 2e 6c 20 23 24 31 |#1,d0. |.~.l #$1|
|000035a0| 30 30 30 30 30 30 2c 64 | 37 20 3b 6d 61 78 21 00 |000000,d|7 ;max!.|
|000035b0| 6e 78 63 6f 6c 3a 00 20 | 20 80 82 2e 6c 20 28 61 |nxcol:. | ...l (a|
|000035c0| 30 29 2b 2c 64 33 2d 64 | 35 00 20 20 80 84 20 64 |0)+,d3-d|5. .. d|
|000035d0| 32 2c 64 33 3a 80 5c 2e | 6c 20 64 37 2c 64 33 3a |2,d3:.\.|l d7,d3:|
|000035e0| 80 47 20 6f 6b 31 3a 80 | 81 23 2d 31 2c 64 33 3a |.G ok1:.|.#-1,d3:|
|000035f0| 6f 6b 31 3a 80 44 2e 6c | 23 38 2c 64 33 00 20 20 |ok1:.D.l|#8,d3. |
|00003600| 80 84 20 64 32 2c 64 34 | 3a 80 5c 2e 6c 20 64 37 |.. d2,d4|:.\.l d7|
|00003610| 2c 64 34 3a 80 47 20 6f | 6b 32 3a 80 81 23 2d 31 |,d4:.G o|k2:..#-1|
|00003620| 2c 64 34 3a 6f 6b 32 3a | 80 44 2e 6c 23 38 2c 64 |,d4:ok2:|.D.l#8,d|
|00003630| 34 00 20 20 80 84 20 64 | 32 2c 64 35 3a 80 5c 2e |4. .. d|2,d5:.\.|
|00003640| 6c 20 64 37 2c 64 35 3a | 80 47 20 6f 6b 33 3a 80 |l d7,d5:|.G ok3:.|
|00003650| 81 23 2d 31 2c 64 35 3a | 6f 6b 33 3a 80 44 2e 6c |.#-1,d5:|ok3:.D.l|
|00003660| 23 38 2c 64 35 00 20 20 | 80 82 2e 6c 20 64 33 2d |#8,d5. |...l d3-|
|00003670| 64 35 2c 28 61 31 29 3a | 80 3d 23 31 32 2c 61 31 |d5,(a1):|.=#12,a1|
|00003680| 3a 80 6f 20 64 30 2c 6e | 78 63 6f 6c 00 20 20 6e |:.o d0,n|xcol. n|
|00003690| 6f 63 6f 6c 73 3a 80 94 | 00 00 2e 5f 69 6e 69 74 |ocols:..|..._init|
|000036a0| 70 61 6c 65 74 74 65 3a | 20 20 20 3b 61 33 2c 64 |palette:| ;a3,d|
|000036b0| 31 20 70 61 6c 65 74 74 | 65 3d 61 33 20 64 31 3d |1 palett|e=a3 d1=|
|000036c0| 6e 75 6d 63 6f 6c 73 00 | 20 20 80 7e 20 64 31 2c |numcols.| .~ d1,|
|000036d0| 64 37 3a 80 7e 2e 6c 20 | 28 61 33 29 2c 64 30 3a |d7:.~.l |(a3),d0:|
|000036e0| 80 48 20 6e 6f 6f 6c 64 | 3a 80 7e 2e 6c 20 64 30 |.H noold|:.~.l d0|
|000036f0| 2c 61 31 3a 80 7e 20 34 | 28 61 33 29 2c 64 30 00 |,a1:.~ 4|(a3),d0.|
|00003700| 20 20 80 84 20 23 31 32 | 2c 64 30 3a 80 40 23 38 | .. #12|,d0:.@#8|
|00003710| 2c 64 30 3a 80 38 24 63 | 30 30 33 00 6e 6f 6f 6c |,d0:.8$c|003.nool|
|00003720| 64 3a 80 7e 20 64 37 2c | 64 30 3a 80 84 20 23 31 |d:.~ d7,|d0:.. #1|
|00003730| 32 2c 64 30 3a 80 40 23 | 38 2c 64 30 3a 80 7e 2e |2,d0:.@#|8,d0:.~.|
|00003740| 6c 20 23 24 31 30 30 30 | 31 2c 64 31 3a 80 38 20 |l #$1000|1,d1:.8 |
|00003750| 24 63 30 30 32 00 20 20 | 80 7e 2e 6c 20 64 30 2c |$c002. |.~.l d0,|
|00003760| 28 61 33 29 3a 80 7e 20 | 64 37 2c 34 28 61 33 29 |(a3):.~ |d7,4(a3)|
|00003770| 3a 80 94 00 00 2e 5f 70 | 61 6c 65 74 74 65 72 61 |:....._p|alettera|
|00003780| 6e 67 65 3a 20 20 20 3b | 64 31 3d 73 74 61 72 74 |nge: ;|d1=start|
|00003790| 20 64 32 3d 65 6e 64 20 | 64 33 2d 64 35 20 2d 28 | d2=end |d3-d5 -(|
|000037a0| 61 32 29 2e 2e 2e 00 20 | 20 80 a7 20 64 31 2c 64 |a2).... | .. d1,d|
|000037b0| 32 3a 80 4f 20 6e 6f 70 | 72 3a 80 40 23 31 2c 64 |2:.O nop|r:.@#1,d|
|000037c0| 32 3a 80 5c 20 34 28 61 | 33 29 2c 64 32 3a 80 4a |2:.\ 4(a|3),d2:.J|
|000037d0| 20 6e 6f 70 72 00 20 20 | 80 7e 2e 6c 20 28 61 33 | nopr. |.~.l (a3|
|000037e0| 29 2c 61 30 3a 80 44 23 | 32 2c 64 31 3a 80 7a 20 |),a0:.D#|2,d1:.z |
|000037f0| 34 28 61 30 2c 64 31 29 | 2c 61 30 00 20 20 80 82 |4(a0,d1)|,a0. ..|
|00003800| 20 2d 36 28 61 32 29 2c | 64 30 2f 64 36 2d 64 37 | -6(a2),|d0/d6-d7|
|00003810| 3a 80 a7 20 64 33 2c 64 | 37 3a 80 a7 20 64 34 2c |:.. d3,d|7:.. d4,|
|00003820| 64 36 3a 80 a7 20 64 35 | 2c 64 30 00 20 20 80 76 |d6:.. d5|,d0. .v|
|00003830| 2e 6c 20 64 30 3a 80 44 | 2e 6c 23 38 2c 64 30 3a |.l d0:.D|.l#8,d0:|
|00003840| 80 71 20 64 32 2c 64 30 | 3a 80 ac 20 64 30 00 20 |.q d2,d0|:.. d0. |
|00003850| 20 80 76 2e 6c 20 64 36 | 3a 80 44 2e 6c 23 38 2c | .v.l d6|:.D.l#8,|
|00003860| 64 36 3a 80 71 20 64 32 | 2c 64 36 3a 80 ac 20 64 |d6:.q d2|,d6:.. d|
|00003870| 36 00 20 20 80 76 2e 6c | 20 64 37 3a 80 44 2e 6c |6. .v.l| d7:.D.l|
|00003880| 23 38 2c 64 37 3a 80 71 | 20 64 32 2c 64 37 3a 80 |#8,d7:.q| d2,d7:.|
|00003890| ac 20 64 37 00 20 20 80 | 76 2e 6c 20 64 33 3a 80 |. d7. .|v.l d3:.|
|000038a0| ac 20 64 33 3a 80 44 2e | 6c 23 38 2c 64 33 3a 80 |. d3:.D.|l#8,d3:.|
|000038b0| 76 2e 6c 20 64 34 3a 80 | ac 20 64 34 3a 80 44 2e |v.l d4:.|. d4:.D.|
|000038c0| 6c 23 38 2c 64 34 00 20 | 20 80 76 2e 6c 20 64 35 |l#8,d4. | .v.l d5|
|000038d0| 3a 80 ac 20 64 35 3a 80 | 44 2e 6c 23 38 2c 64 35 |:.. d5:.|D.l#8,d5|
|000038e0| 3a 80 81 23 31 32 2c 64 | 31 3a 80 aa 23 31 2c 64 |:..#12,d|1:..#1,d|
|000038f0| 32 00 20 20 6e 78 63 70 | 3a 80 82 2e 6c 20 64 33 |2. nxcp|:...l d3|
|00003900| 2d 64 35 2c 28 61 30 29 | 3a 80 3d 20 64 31 2c 61 |-d5,(a0)|:.= d1,a|
|00003910| 30 3a 80 3d 2e 6c 20 64 | 37 2c 64 33 3a 80 3d 2e |0:.=.l d|7,d3:.=.|
|00003920| 6c 20 64 36 2c 64 34 3a | 80 3d 2e 6c 20 64 30 2c |l d6,d4:|.=.l d0,|
|00003930| 64 35 00 20 20 80 6f 20 | 64 32 2c 6e 78 63 70 3a |d5. .o |d2,nxcp:|
|00003940| 6e 6f 70 72 3a 80 94 00 | 00 2e 5f 64 75 70 6c 69 |nopr:...|.._dupli|
|00003950| 63 61 74 65 70 61 6c 65 | 74 74 65 3a 20 20 20 20 |catepale|tte: |
|00003960| 3b 61 32 3d 73 72 63 20 | 61 33 3d 64 65 73 74 00 |;a2=src |a3=dest.|
|00003970| 20 20 80 7e 20 34 28 61 | 32 29 2c 64 31 3a 80 48 | .~ 4(a|2),d1:.H|
|00003980| 20 73 74 75 66 66 65 64 | 00 20 20 80 59 20 5f 69 | stuffed|. .Y _i|
|00003990| 6e 69 74 70 61 6c 65 74 | 74 65 3a 80 7e 20 34 28 |nitpalet|te:.~ 4(|
|000039a0| 61 32 29 2c 64 30 3a 80 | 84 20 23 33 2c 64 30 3a |a2),d0:.|. #3,d0:|
|000039b0| 80 aa 23 31 2c 64 30 00 | 20 20 80 7e 2e 6c 20 28 |..#1,d0.| .~.l (|
|000039c0| 61 32 29 2c 61 30 3a 80 | 40 23 34 2c 61 30 3a 80 |a2),a0:.|@#4,a0:.|
|000039d0| 7e 2e 6c 20 28 61 33 29 | 2c 61 31 3a 80 40 23 34 |~.l (a3)|,a1:.@#4|
|000039e0| 2c 61 31 00 20 20 6e 78 | 63 64 70 3a 80 7e 2e 6c |,a1. nx|cdp:.~.l|
|000039f0| 20 28 61 30 29 2b 2c 28 | 61 31 29 2b 3a 80 6f 20 | (a0)+,(|a1)+:.o |
|00003a00| 64 30 2c 6e 78 63 64 70 | 3a 73 74 75 66 66 65 64 |d0,nxcdp|:stuffed|
|00003a10| 3a 80 94 00 00 2e 5f 73 | 61 76 65 70 61 6c 65 74 |:....._s|avepalet|
|00003a20| 74 65 3a 20 20 20 20 20 | 20 20 20 20 3b 61 31 3d |te: | ;a1=|
|00003a30| 70 61 6c 65 74 74 65 20 | 64 31 3d 73 74 72 69 6e |palette |d1=strin|
|00003a40| 67 00 20 20 80 94 00 00 | 3b 2d 2d 2d 2d 2d 2d 2d |g. ....|;-------|
|00003a50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a80| 2d 2d 2d 2d 2d 2d 00 3b | 2d 2d 2d 2d 2d 2d 2d 2d |------.;|--------|
|00003a90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003aa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003ab0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003ac0| 2d 2d 2d 2d 2d 00 00 00 | 65 72 72 30 3a 80 7e 2e |-----...|err0:.~.|
|00003ad0| 6c 20 23 6d 65 73 73 30 | 2c 64 30 3a 80 ae 20 23 |l #mess0|,d0:.. #|
|00003ae0| 30 00 65 72 72 31 3a 80 | 7e 2e 6c 20 23 6d 65 73 |0.err1:.|~.l #mes|
|00003af0| 73 31 2c 64 30 3a 80 ae | 20 23 30 00 65 72 72 64 |s1,d0:..| #0.errd|
|00003b00| 3a 80 7e 2e 6c 20 23 6d | 65 73 73 64 2c 64 30 3a |:.~.l #m|essd,d0:|
|00003b10| 80 ae 20 23 30 00 00 3b | 2a 2a 2a 2a 2a 2a 2a 2a |.. #0..;|********|
|00003b20| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 20 45 52 52 4f 52 53 |********|* ERRORS|
|00003b30| 20 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a | *******|********|
|00003b40| 2a 2a 2a 2a 2a 00 00 65 | 72 72 6f 72 73 00 65 72 |*****..e|rrors.er|
|00003b50| 72 32 3a 80 7e 2e 6c 20 | 23 6d 65 73 73 32 2c 64 |r2:.~.l |#mess2,d|
|00003b60| 30 3a 80 ae 20 23 30 00 | 65 72 72 33 3a 80 7e 2e |0:.. #0.|err3:.~.|
|00003b70| 6c 20 23 6d 65 73 73 33 | 2c 64 30 3a 80 ae 20 23 |l #mess3|,d0:.. #|
|00003b80| 30 00 65 72 72 34 3a 80 | 7e 2e 6c 20 23 6d 65 73 |0.err4:.|~.l #mes|
|00003b90| 73 34 2c 64 30 3a 80 ae | 20 23 30 00 65 72 72 35 |s4,d0:..| #0.err5|
|00003ba0| 3a 80 7e 2e 6c 20 23 6d | 65 73 73 35 2c 64 30 3a |:.~.l #m|ess5,d0:|
|00003bb0| 80 ae 20 23 30 00 65 72 | 72 36 3a 80 7e 2e 6c 20 |.. #0.er|r6:.~.l |
|00003bc0| 23 6d 65 73 73 36 2c 64 | 30 3a 80 ae 20 23 30 00 |#mess6,d|0:.. #0.|
|00003bd0| 65 72 72 37 3a 80 7e 2e | 6c 20 23 6d 65 73 73 37 |err7:.~.|l #mess7|
|00003be0| 2c 64 30 3a 80 ae 20 23 | 30 00 65 72 72 38 3a 80 |,d0:.. #|0.err8:.|
|00003bf0| 7e 2e 6c 20 23 6d 65 73 | 73 38 2c 64 30 3a 80 ae |~.l #mes|s8,d0:..|
|00003c00| 20 23 30 00 65 72 72 39 | 3a 80 7e 2e 6c 20 23 6d | #0.err9|:.~.l #m|
|00003c10| 65 73 73 39 2c 64 30 3a | 80 ae 20 23 30 00 65 72 |ess9,d0:|.. #0.er|
|00003c20| 72 61 3a 80 7e 2e 6c 20 | 23 6d 65 73 73 61 2c 64 |ra:.~.l |#messa,d|
|00003c30| 30 3a 80 ae 20 23 30 00 | 65 72 72 62 3a 80 7e 2e |0:.. #0.|errb:.~.|
|00003c40| 6c 20 23 6d 65 73 73 62 | 2c 64 30 3a 80 ae 20 23 |l #messb|,d0:.. #|
|00003c50| 30 00 65 72 72 63 3a 80 | 7e 2e 6c 20 23 6d 65 73 |0.errc:.|~.l #mes|
|00003c60| 73 63 2c 64 30 3a 80 ae | 20 23 30 00 3b 65 72 72 |sc,d0:..| #0.;err|
|00003c70| 64 00 65 72 72 65 3a 80 | 7e 2e 6c 20 23 6d 65 73 |d.erre:.|~.l #mes|
|00003c80| 73 65 2c 64 30 3a 80 ae | 20 23 30 00 00 6d 65 73 |se,d0:..| #0..mes|
|00003c90| 73 30 3a 80 25 2e 62 20 | 22 43 61 6e 27 74 20 4f |s0:.%.b |"Can't O|
|00003ca0| 70 65 6e 20 49 46 46 22 | 2c 30 00 6d 65 73 73 31 |pen IFF"|,0.mess1|
|00003cb0| 3a 80 25 2e 62 20 22 43 | 61 6e 27 74 20 66 69 6e |:.%.b "C|an't fin|
|00003cc0| 64 20 49 46 46 20 27 43 | 4d 41 50 27 22 2c 30 00 |d IFF 'C|MAP'",0.|
|00003cd0| 6d 65 73 73 32 3a 80 25 | 2e 62 20 22 43 61 6e 27 |mess2:.%|.b "Can'|
|00003ce0| 74 20 52 65 61 64 20 46 | 69 6c 65 22 2c 30 00 6d |t Read F|ile",0.m|
|00003cf0| 65 73 73 33 3a 80 25 2e | 62 20 22 55 6e 69 6e 69 |ess3:.%.|b "Unini|
|00003d00| 74 69 61 6c 69 7a 65 64 | 20 53 63 72 65 65 6e 22 |tialized| Screen"|
|00003d10| 2c 30 00 6d 65 73 73 34 | 3a 80 25 2e 62 20 22 55 |,0.mess4|:.%.b "U|
|00003d20| 6e 69 6e 69 74 69 61 6c | 69 7a 65 64 20 50 61 6c |ninitial|ized Pal|
|00003d30| 65 74 74 65 22 2c 30 00 | 6d 65 73 73 35 3a 80 25 |ette",0.|mess5:.%|
|00003d40| 2e 62 20 22 52 47 42 20 | 63 6f 6d 70 6f 6e 65 6e |.b "RGB |componen|
|00003d50| 74 20 6f 75 74 20 6f 66 | 20 72 61 6e 67 65 22 2c |t out of| range",|
|00003d60| 30 00 6d 65 73 73 36 3a | 80 25 2e 62 20 22 55 6e |0.mess6:|.%.b "Un|
|00003d70| 69 6e 69 74 69 61 6c 69 | 7a 65 64 20 53 6c 69 63 |initiali|zed Slic|
|00003d80| 65 22 2c 30 00 6d 65 73 | 73 37 3a 80 25 2e 62 20 |e",0.mes|s7:.%.b |
|00003d90| 22 4e 6f 74 20 65 6e 6f | 75 67 68 20 63 6f 6c 6f |"Not eno|ugh colo|
|00003da0| 75 72 73 20 69 6e 20 53 | 6c 69 63 65 22 2c 30 00 |urs in S|lice",0.|
|00003db0| 6d 65 73 73 38 3a 80 25 | 2e 62 20 22 43 6f 6c 6f |mess8:.%|.b "Colo|
|00003dc0| 75 72 20 6d 75 73 74 20 | 62 65 20 69 6e 20 74 68 |ur must |be in th|
|00003dd0| 65 20 72 61 6e 67 65 20 | 30 2d 33 31 22 2c 30 00 |e range |0-31",0.|
|00003de0| 6d 65 73 73 39 3a 80 25 | 2e 62 20 22 43 79 63 6c |mess9:.%|.b "Cycl|
|00003df0| 65 20 63 6f 6c 6f 75 72 | 73 20 6f 75 74 20 6f 66 |e colour|s out of|
|00003e00| 20 72 61 6e 67 65 22 2c | 30 00 6d 65 73 73 61 3a | range",|0.messa:|
|00003e10| 80 25 2e 62 20 22 43 79 | 63 6c 65 20 73 70 65 65 |.%.b "Cy|cle spee|
|00003e20| 64 20 4d 55 53 54 20 62 | 65 20 3e 3d 2d 31 20 41 |d MUST b|e >=-1 A|
|00003e30| 4e 44 20 3c 3d 31 22 2c | 30 00 6d 65 73 73 62 3a |ND <=1",|0.messb:|
|00003e40| 80 25 2e 62 20 22 43 79 | 63 6c 65 20 4d 55 53 54 |.%.b "Cy|cle MUST|
|00003e50| 20 62 65 20 3e 3d 30 20 | 41 4e 44 20 3c 3d 36 22 | be >=0 |AND <=6"|
|00003e60| 2c 30 00 6d 65 73 73 63 | 3a 80 25 2e 62 20 22 55 |,0.messc|:.%.b "U|
|00003e70| 6e 69 6e 69 74 69 61 6c | 69 7a 65 64 20 63 79 63 |ninitial|ized cyc|
|00003e80| 6c 65 20 69 6e 66 6f 72 | 6d 61 74 69 6f 6e 22 2c |le infor|mation",|
|00003e90| 30 00 6d 65 73 73 64 3a | 80 25 2e 62 20 22 43 79 |0.messd:|.%.b "Cy|
|00003ea0| 63 6c 65 73 20 6d 75 73 | 74 20 62 65 20 61 64 64 |cles mus|t be add|
|00003eb0| 65 64 20 69 6e 20 6f 72 | 64 65 72 2c 20 79 6f 75 |ed in or|der, you|
|00003ec0| 20 73 69 6c 6c 79 20 73 | 61 75 73 61 67 65 21 22 | silly s|ausage!"|
|00003ed0| 2c 30 00 6d 65 73 73 65 | 3a 80 25 2e 62 20 22 4e |,0.messe|:.%.b "N|
|00003ee0| 6f 74 20 61 6e 20 41 47 | 41 20 6d 61 63 68 69 6e |ot an AG|A machin|
|00003ef0| 65 21 22 2c 30 00 80 27 | 00 00 72 67 62 63 68 6b |e!",0..'|..rgbchk|
|00003f00| 00 80 25 20 24 61 30 30 | 31 3a 80 25 2e 6c 20 62 |..% $a00|1:.%.l b|
|00003f10| 5f 72 67 62 63 68 6b 00 | 80 b0 2e 6c 20 28 61 30 |_rgbchk.|...l (a0|
|00003f20| 29 3a 80 48 20 65 72 72 | 33 3a 80 5c 20 23 32 35 |):.H err|3:.\ #25|
|00003f30| 35 2c 64 30 3a 80 4b 20 | 65 72 72 38 3a 80 b0 20 |5,d0:.K |err8:.. |
|00003f40| 61 67 61 6d 6f 64 65 3a | 80 50 20 27 61 67 61 00 |agamode:|.P 'aga.|
|00003f50| 80 5c 20 23 33 31 2c 64 | 30 3a 80 4b 20 65 72 72 |.\ #31,d|0:.K err|
|00003f60| 38 3a 27 61 67 61 00 72 | 67 62 63 68 6b 32 3a 80 |8:'aga.r|gbchk2:.|
|00003f70| 5c 20 23 31 35 2c 64 31 | 3a 80 4b 20 65 72 72 35 |\ #15,d1|:.K err5|
|00003f80| 00 80 5c 20 23 31 35 2c | 64 32 3a 80 4b 20 65 72 |..\ #15,|d2:.K er|
|00003f90| 72 35 3a 80 5c 20 23 31 | 35 2c 64 33 3a 80 4b 20 |r5:.\ #1|5,d3:.K |
|00003fa0| 65 72 72 35 00 80 94 00 | 62 5f 72 67 62 63 68 6b |err5....|b_rgbchk|
|00003fb0| 00 80 b0 20 28 61 30 29 | 3a 80 48 20 65 72 72 36 |... (a0)|:.H err6|
|00003fc0| 3a 80 5c 20 23 33 31 2c | 64 30 3a 80 4b 20 65 72 |:.\ #31,|d0:.K er|
|00003fd0| 72 38 00 80 5c 20 38 28 | 61 30 29 2c 64 30 3a 80 |r8..\ 8(|a0),d0:.|
|00003fe0| 46 20 65 72 72 37 00 80 | 58 20 72 67 62 63 68 6b |F err7..|X rgbchk|
|00003ff0| 32 00 00 61 61 72 67 62 | 63 68 6b 00 80 b0 20 61 |2..aargb|chk... a|
|00004000| 67 61 6d 6f 64 65 3a 80 | 48 20 65 72 72 65 00 3b |gamode:.|H erre.;|
|00004010| 00 80 b0 2e 6c 20 28 61 | 30 29 3a 80 48 20 65 72 |....l (a|0):.H er|
|00004020| 72 33 3a 80 5c 20 23 32 | 35 35 2c 64 30 3a 80 4b |r3:.\ #2|55,d0:.K|
|00004030| 20 65 72 72 38 00 80 5c | 20 23 32 35 35 2c 64 31 | err8..\| #255,d1|
|00004040| 3a 80 4b 20 65 72 72 35 | 3a 80 5c 20 23 32 35 35 |:.K err5|:.\ #255|
|00004050| 2c 64 32 3a 80 4b 20 65 | 72 72 35 3a 80 5c 20 23 |,d2:.K e|rr5:.\ #|
|00004060| 32 35 35 2c 64 33 3a 80 | 4b 20 65 72 72 35 00 80 |255,d3:.|K err5..|
|00004070| 94 00 00 75 73 65 70 61 | 6c 63 68 6b 00 80 25 20 |...usepa|lchk..% |
|00004080| 24 61 30 30 31 3a 80 25 | 2e 6c 20 62 5f 75 73 65 |$a001:.%|.l b_use|
|00004090| 70 61 6c 63 68 6b 00 3b | 00 80 b0 20 70 61 6c 6d |palchk.;|... palm|
|000040a0| 6f 64 65 3a 80 48 20 64 | 6f 69 74 33 3a 80 94 00 |ode:.H d|oit3:...|
|000040b0| 3b 00 62 5f 75 73 65 70 | 61 6c 63 68 6b 00 3b 00 |;.b_usep|alchk.;.|
|000040c0| 80 b0 20 70 61 6c 6d 6f | 64 65 3a 80 48 20 64 6f |.. palmo|de:.H do|
|000040d0| 69 74 34 3a 80 94 00 00 | 73 68 6f 77 70 61 6c 63 |it4:....|showpalc|
|000040e0| 68 6b 00 80 25 20 24 61 | 30 30 31 3a 80 25 2e 6c |hk..% $a|001:.%.l|
|000040f0| 20 62 5f 73 68 6f 77 70 | 61 6c 63 68 6b 00 64 6f | b_showp|alchk.do|
|00004100| 69 74 33 3a 80 b0 2e 6c | 20 28 61 32 29 3a 80 48 |it3:...l| (a2):.H|
|00004110| 20 65 72 72 33 3a 80 94 | 00 00 62 5f 73 68 6f 77 | err3:..|..b_show|
|00004120| 70 61 6c 63 68 6b 00 64 | 6f 69 74 34 3a 80 b0 20 |palchk.d|oit4:.. |
|00004130| 28 61 30 29 3a 80 48 20 | 65 72 72 36 3a 80 b0 20 |(a0):.H |err6:.. |
|00004140| 38 28 61 30 29 3a 80 48 | 20 65 72 72 37 3a 80 94 |8(a0):.H| err7:..|
|00004150| 00 00 64 6f 63 79 63 6c | 65 63 68 6b 00 80 b0 20 |..docycl|echk... |
|00004160| 34 28 61 33 29 3a 80 48 | 20 65 72 72 63 3a 80 94 |4(a3):.H| errc:..|
|00004170| 00 00 63 6f 6c 63 68 6b | 3a 80 25 20 24 61 30 30 |..colchk|:.% $a00|
|00004180| 31 3a 80 25 2e 6c 20 62 | 5f 63 6f 6c 63 68 6b 00 |1:.%.l b|_colchk.|
|00004190| 80 b0 2e 6c 20 28 61 30 | 29 3a 80 48 20 65 72 72 |...l (a0|):.H err|
|000041a0| 33 3a 80 94 00 62 5f 63 | 6f 6c 63 68 6b 3a 80 b0 |3:...b_c|olchk:..|
|000041b0| 20 28 61 30 29 3a 80 48 | 20 65 72 72 36 3a 80 94 | (a0):.H| err6:..|
|000041c0| 00 00 61 67 61 63 6f 6c | 63 68 6b 3a 80 b0 20 61 |..agacol|chk:.. a|
|000041d0| 67 61 6d 6f 64 65 3a 80 | 48 20 65 72 72 65 3a 80 |gamode:.|H erre:.|
|000041e0| b0 2e 6c 20 28 61 30 29 | 3a 80 48 20 65 72 72 33 |..l (a0)|:.H err3|
|000041f0| 3a 80 94 00 00 70 72 67 | 62 63 68 6b 00 3b 00 80 |:....prg|bchk.;..|
|00004200| 5c 20 23 32 35 35 2c 64 | 31 3a 80 4b 20 65 72 72 |\ #255,d|1:.K err|
|00004210| 38 00 80 b0 20 61 67 61 | 6d 6f 64 65 3a 80 50 20 |8... aga|mode:.P |
|00004220| 27 61 67 61 00 80 5c 20 | 23 33 31 2c 64 31 3a 80 |'aga..\ |#31,d1:.|
|00004230| 4b 20 65 72 72 38 00 27 | 61 67 61 3a 80 5c 20 23 |K err8.'|aga:.\ #|
|00004240| 31 35 2c 64 32 3a 80 4b | 20 65 72 72 35 00 80 5c |15,d2:.K| err5..\|
|00004250| 20 23 31 35 2c 64 33 3a | 80 4b 20 65 72 72 35 00 | #15,d3:|.K err5.|
|00004260| 80 5c 20 23 31 35 2c 64 | 34 3a 80 4b 20 65 72 72 |.\ #15,d|4:.K err|
|00004270| 35 00 80 94 00 00 61 61 | 70 72 67 62 63 68 6b 00 |5.....aa|prgbchk.|
|00004280| 3b 00 80 b0 20 61 67 61 | 6d 6f 64 65 3a 80 48 20 |;... aga|mode:.H |
|00004290| 65 72 72 65 00 3b 00 80 | 5c 20 23 32 35 35 2c 64 |erre.;..|\ #255,d|
|000042a0| 31 3a 80 4b 20 65 72 72 | 38 00 80 5c 20 23 32 35 |1:.K err|8..\ #25|
|000042b0| 35 2c 64 32 3a 80 4b 20 | 65 72 72 35 00 80 5c 20 |5,d2:.K |err5..\ |
|000042c0| 23 32 35 35 2c 64 33 3a | 80 4b 20 65 72 72 35 00 |#255,d3:|.K err5.|
|000042d0| 80 5c 20 23 32 35 35 2c | 64 34 3a 80 4b 20 65 72 |.\ #255,|d4:.K er|
|000042e0| 72 35 00 80 94 00 00 73 | 65 74 63 79 63 6c 65 63 |r5.....s|etcyclec|
|000042f0| 68 6b 32 00 80 5c 2e 6c | 20 23 2d 24 31 30 30 30 |hk2..\.l| #-$1000|
|00004300| 30 2c 64 34 3a 80 4e 20 | 65 72 72 61 00 80 5c 2e |0,d4:.N |erra..\.|
|00004310| 6c 20 23 24 31 30 30 30 | 30 2c 64 34 3a 80 4a 20 |l #$1000|0,d4:.J |
|00004320| 65 72 72 61 00 3b 00 73 | 65 74 63 79 63 6c 65 63 |erra.;.s|etcyclec|
|00004330| 68 6b 00 80 5c 20 23 37 | 2c 64 31 3a 80 46 20 65 |hk..\ #7|,d1:.F e|
|00004340| 72 72 62 00 80 5c 20 23 | 33 32 2c 64 32 3a 80 46 |rrb..\ #|32,d2:.F|
|00004350| 20 65 72 72 39 00 80 5c | 20 23 33 32 2c 64 33 3a | err9..\| #32,d3:|
|00004360| 80 46 20 65 72 72 39 00 | 80 94 00 00 |.F err9.|.... |
+--------+-------------------------+-------------------------+--------+--------+
