home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilst / useful / ModConv / SprToData < prev   
Unknown  |  1995-09-07  |  4.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% xdgMime image/x-tga default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 29 f4 20 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 0d 00 14 29 f4 20 2a |********|*...). *|
|00000030| 20 53 50 52 49 54 45 20 | 2d 3e 20 53 43 52 45 45 | SPRITE |-> SCREE|
|00000040| 4e 20 43 4f 4c 4f 55 52 | 20 50 52 4f 47 52 41 4d |N COLOUR| PROGRAM|
|00000050| 20 2a 0d 00 1e 29 f4 20 | 2a 2a 2a 2a 2a 2a 2a 2a | *...). |********|
|00000060| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000070| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0d 00 28 0b f4 |********|***..(..|
|00000080| 20 56 31 2e 30 31 0d 00 | 32 04 0d 00 3c 49 f4 20 | V1.01..|2...<I. |
|00000090| 2a 20 41 64 64 69 74 69 | 6f 6e 73 20 2d 20 41 6c |* Additi|ons - Al|
|000000a0| 6c 6f 77 20 73 70 72 69 | 74 65 73 20 75 70 20 74 |low spri|tes up t|
|000000b0| 6f 20 33 32 30 20 2a 20 | 32 35 36 20 28 57 72 69 |o 320 * |256 (Wri|
|000000c0| 74 65 20 73 69 7a 65 20 | 61 73 20 34 20 62 79 74 |te size |as 4 byt|
|000000d0| 65 73 29 0d 00 46 04 0d | 00 50 19 ee 20 85 20 f6 |es)..F..|.P.. . .|
|000000e0| 3a f1 22 20 41 74 20 6c | 69 6e 65 20 22 9e 3a e0 |:." At l|ine ".:.|
|000000f0| 0d 00 5a 04 0d 00 64 10 | f4 20 2a 20 41 52 52 41 |..Z...d.|. * ARRA|
|00000100| 59 53 20 2a 0d 00 6e 04 | 0d 00 78 18 50 52 4f 47 |YS *..n.|..x.PROG|
|00000110| 52 41 4d 24 3d 22 53 70 | 72 54 6f 44 61 74 61 22 |RAM$="Sp|rToData"|
|00000120| 0d 00 82 0d 4d 41 58 58 | 25 3d 33 32 30 0d 00 8c |....MAXX|%=320...|
|00000130| 2a 4d 41 58 59 25 3d 32 | 35 36 20 3a 20 f4 20 4d |*MAXY%=2|56 : . M|
|00000140| 61 78 69 6d 75 6d 20 69 | 74 20 63 61 6e 20 64 65 |aximum i|t can de|
|00000150| 61 6c 20 77 69 74 68 0d | 00 96 04 0d 00 a0 1b de |al with.|........|
|00000160| 20 73 25 20 32 35 36 2a | 31 30 32 34 2c 62 6c 6f | s% 256*|1024,blo|
|00000170| 63 6b 25 20 31 36 0d 00 | aa 04 0d 00 b4 13 f4 20 |ck% 16..|....... |
|00000180| 2a 20 56 61 72 69 61 62 | 6c 65 73 20 2a 0d 00 be |* Variab|les *...|
|00000190| 04 0d 00 c8 23 48 45 41 | 44 45 52 24 3d 22 53 50 |....#HEA|DER$="SP|
|000001a0| 52 22 20 3a 20 f4 20 53 | 70 72 69 74 65 20 68 65 |R" : . S|prite he|
|000001b0| 61 64 65 72 0d 00 d2 04 | 0d 00 dc 18 f4 20 2a 20 |ader....|..... * |
|000001c0| 53 65 74 20 75 70 20 73 | 70 72 69 74 65 73 20 2a |Set up s|prites *|
|000001d0| 0d 00 e6 04 0d 00 f0 0a | 73 25 21 34 3d 30 0d 00 |........|s%!4=0..|
|000001e0| fa 0b 73 25 21 38 3d 31 | 36 0d 01 04 1c c8 99 22 |..s%!8=1|6......"|
|000001f0| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 39 2b 32 |OS_Sprit|eOp",9+2|
|00000200| 35 36 2c 73 25 0d 01 0e | 04 0d 01 18 11 49 44 24 |56,s%...|.....ID$|
|00000210| 3d 22 22 3a 4f 44 24 3d | 22 22 0d 01 22 14 f2 47 |="":OD$=|"".."..G|
|00000220| 65 74 45 6e 76 28 49 44 | 24 2c 4f 44 24 29 0d 01 |etEnv(ID|$,OD$)..|
|00000230| 2c 08 eb 20 31 35 0d 01 | 36 05 87 0d 01 40 04 0d |,.. 15..|6....@..|
|00000240| 01 4a 1d f4 20 2a 20 47 | 65 74 20 61 64 64 72 65 |.J.. * G|et addre|
|00000250| 73 73 20 6f 66 20 73 63 | 72 65 65 6e 0d 01 54 10 |ss of sc|reen..T.|
|00000260| 62 6c 6f 63 6b 25 21 30 | 3d 31 34 39 0d 01 5e 0f |block%!0|=149..^.|
|00000270| 62 6c 6f 63 6b 25 21 34 | 3d 2d 31 0d 01 68 29 c8 |block%!4|=-1..h).|
|00000280| 99 22 4f 53 5f 52 65 61 | 64 56 64 75 56 61 72 69 |."OS_Rea|dVduVari|
|00000290| 61 62 6c 65 73 22 2c 62 | 6c 6f 63 6b 25 2c 62 6c |ables",b|lock%,bl|
|000002a0| 6f 63 6b 25 0d 01 72 0f | 73 63 72 3d 21 62 6c 6f |ock%..r.|scr=!blo|
|000002b0| 63 6b 25 0d 01 7c 04 0d | 01 86 12 f2 44 69 73 70 |ck%..|..|....Disp|
|000002c0| 6c 61 79 53 74 61 74 75 | 73 0d 01 90 29 6e 75 6d |layStatu|s...)num|
|000002d0| 62 65 72 25 3d a4 4c 6f | 61 64 53 70 72 69 74 65 |ber%=.Lo|adSprite|
|000002e0| 73 41 6e 64 47 65 74 4e | 75 6d 62 65 72 28 49 44 |sAndGetN|umber(ID|
|000002f0| 24 29 0d 01 9a 14 f2 4e | 75 6d 62 65 72 28 6e 75 |$).....N|umber(nu|
|00000300| 6d 62 65 72 25 29 0d 01 | a4 04 0d 01 ae 08 41 25 |mber%)..|......A%|
|00000310| 3d 30 0d 01 b8 21 f2 50 | 72 65 70 61 72 65 4f 75 |=0...!.P|repareOu|
|00000320| 74 70 75 74 28 4f 44 24 | 2c 41 25 2c 73 68 69 66 |tput(OD$|,A%,shif|
|00000330| 74 25 29 0d 01 c2 04 0d | 01 cc 15 63 75 72 72 65 |t%).....|...curre|
|00000340| 6e 74 25 3d 31 3a 43 53 | 24 3d 22 22 0d 01 d6 04 |nt%=1:CS|$=""....|
|00000350| 0d 01 e0 13 f4 20 2a 20 | 4d 61 69 6e 20 6c 6f 6f |..... * |Main loo|
|00000360| 70 20 2a 0d 01 ea 05 f5 | 0d 01 f4 3c 20 f2 47 65 |p *.....|...< .Ge|
|00000370| 74 43 75 72 72 65 6e 74 | 4e 61 6d 65 28 63 75 72 |tCurrent|Name(cur|
|00000380| 72 65 6e 74 25 2c 43 53 | 24 2c 77 69 64 74 68 25 |rent%,CS|$,width%|
|00000390| 2c 68 65 69 67 68 74 25 | 2c 6d 6f 64 65 25 2c 41 |,height%|,mode%,A|
|000003a0| 44 44 52 29 0d 01 fe 29 | 20 f2 44 61 74 61 28 43 |DDR)...)| .Data(C|
|000003b0| 53 24 2c 77 69 64 74 68 | 25 2c 68 65 69 67 68 74 |S$,width|%,height|
|000003c0| 25 2c 6d 6f 64 65 25 2c | 41 44 44 52 29 0d 02 08 |%,mode%,|ADDR)...|
|000003d0| 30 20 f2 57 72 69 74 65 | 57 69 64 74 68 41 6e 64 |0 .Write|WidthAnd|
|000003e0| 48 65 69 67 68 74 28 77 | 69 64 74 68 25 2c 68 65 |Height(w|idth%,he|
|000003f0| 69 67 68 74 25 2c 73 68 | 69 66 74 25 29 0d 02 12 |ight%,sh|ift%)...|
|00000400| 09 20 51 25 3d 30 0d 02 | 1c 06 20 f5 0d 02 26 33 |. Q%=0..|.. ...&3|
|00000410| 20 20 20 20 20 f2 50 6c | 6f 74 53 70 72 69 74 65 | .Pl|otSprite|
|00000420| 28 41 44 44 52 2c 77 69 | 64 74 68 25 2c 68 65 69 |(ADDR,wi|dth%,hei|
|00000430| 67 68 74 25 2c 51 25 2c | 73 68 69 66 74 25 29 0d |ght%,Q%,|shift%).|
|00000440| 02 30 0e 20 20 20 20 20 | 51 25 2b 3d 31 0d 02 3a |.0. |Q%+=1..:|
|00000450| 0b 20 20 20 20 20 c8 96 | 0d 02 44 0f 20 fd 51 25 |. ..|..D. .Q%|
|00000460| 3e 73 68 69 66 74 25 0d | 02 4e 09 e6 30 c8 9c 30 |>shift%.|.N..0..0|
|00000470| 0d 02 58 14 c8 93 c8 90 | 30 2c 30 2c 39 35 39 2c |..X.....|0,0,959,|
|00000480| 31 30 32 34 0d 02 62 04 | 0d 02 6c 0f 63 75 72 72 |1024..b.|..l.curr|
|00000490| 65 6e 74 25 2b 3d 31 0d | 02 76 16 fd 20 63 75 72 |ent%+=1.|.v.. cur|
|000004a0| 72 65 6e 74 25 3e 6e 75 | 6d 62 65 72 25 0d 02 80 |rent%>nu|mber%...|
|000004b0| 04 0d 02 8a 1a e7 73 68 | 69 66 74 25 3e 30 8c d5 |......sh|ift%>0..|
|000004c0| 23 41 25 2c 22 46 4e 53 | 48 22 3b 0d 02 94 0d e7 |#A%,"FNS|H";.....|
|000004d0| 41 25 3e 30 d9 23 41 25 | 0d 02 9e 05 e0 0d 02 a8 |A%>0.#A%|........|
|000004e0| 04 0d 02 b2 15 f4 20 2a | 20 50 6c 6f 74 20 73 70 |...... *| Plot sp|
|000004f0| 72 69 74 65 20 2a 0d 02 | bc 04 0d 02 c6 31 dd f2 |rite *..|.....1..|
|00000500| 50 6c 6f 74 53 70 72 69 | 74 65 28 41 44 44 52 2c |PlotSpri|te(ADDR,|
|00000510| 77 69 64 74 68 25 2c 68 | 65 69 67 68 74 25 2c 73 |width%,h|eight%,s|
|00000520| 68 69 66 74 25 2c 61 63 | 74 25 29 0d 02 d0 12 20 |hift%,ac|t%).... |
|00000530| 20 20 ea 20 58 2c 59 2c | 44 25 2c 53 25 0d 02 da | . X,Y,|D%,S%...|
|00000540| 04 0d 02 e4 0f 20 20 20 | e7 61 63 74 25 3e 30 8c |..... |.act%>0.|
|00000550| 0d 02 ee 21 20 20 20 20 | 20 d5 23 41 25 2c 22 45 |...! | .#A%,"E|
|00000560| 58 54 22 2b bd 28 34 38 | 2b 73 68 69 66 74 25 29 |XT"+.(48|+shift%)|
|00000570| 3b 0d 02 f8 2d 20 20 20 | 20 20 54 3d a2 23 41 25 |;...- | T=.#A%|
|00000580| 3a c8 95 20 54 20 83 20 | 34 3c 3e 30 3a d5 23 41 |:.. T . |4<>0:.#A|
|00000590| 25 2c 26 46 46 3a 54 3d | a2 23 41 25 3a ce 0d 03 |%,&FF:T=|.#A%:...|
|000005a0| 02 08 20 20 20 cd 0d 03 | 0c 04 0d 03 16 15 20 20 |.. ...|...... |
|000005b0| 20 e3 59 3d 30 b8 68 65 | 69 67 68 74 25 2d 31 0d | .Y=0.he|ight%-1.|
|000005c0| 03 20 13 20 20 20 20 20 | 20 53 25 3d 73 68 69 66 |. . | S%=shif|
|000005d0| 74 25 0d 03 2a 11 20 20 | 20 20 20 20 c8 95 20 53 |t%..*. | .. S|
|000005e0| 25 3e 30 0d 03 34 22 20 | 20 20 20 20 20 20 20 20 |%>0..4" | |
|000005f0| 20 20 3f 28 73 63 72 2b | 28 59 2a 36 34 30 29 2b | ?(scr+|(Y*640)+|
|00000600| 53 25 29 3d 30 0d 03 3e | 15 20 20 20 20 20 20 20 |S%)=0..>|. |
|00000610| 20 20 20 20 d5 23 41 25 | 2c 30 0d 03 48 14 20 20 | .#A%|,0..H. |
|00000620| 20 20 20 20 20 20 20 20 | 20 53 25 2d 3d 31 0d 03 | | S%-=1..|
|00000630| 52 0b 20 20 20 20 20 20 | ce 0d 03 5c 17 20 20 20 |R. |...\. |
|00000640| 20 20 20 e3 58 3d 30 b8 | 77 69 64 74 68 25 2d 31 | .X=0.|width%-1|
|00000650| 0d 03 66 24 20 20 20 20 | 20 20 20 20 20 44 25 3d |..f$ | D%=|
|00000660| 3f 28 41 44 44 52 2b 28 | 59 2a 77 69 64 74 68 25 |?(ADDR+(|Y*width%|
|00000670| 29 2b 58 29 0d 03 70 27 | 20 20 20 20 20 20 20 20 |)+X)..p'| |
|00000680| 20 3f 28 73 63 72 2b 28 | 59 2a 36 34 30 29 2b 58 | ?(scr+(|Y*640)+X|
|00000690| 2b 73 68 69 66 74 25 29 | 3d 44 25 0d 03 7a 04 0d |+shift%)|=D%..z..|
|000006a0| 03 84 14 20 20 20 20 20 | 20 20 20 20 d5 23 41 25 |... | .#A%|
|000006b0| 2c 44 25 0d 03 8e 0b 20 | 20 20 20 20 20 ed 0d 03 |,D%.... | ...|
|000006c0| 98 2e 20 20 20 20 20 20 | 54 3d a2 23 41 25 3a c8 |.. |T=.#A%:.|
|000006d0| 95 20 54 20 83 20 34 3c | 3e 30 3a d5 23 41 25 2c |. T . 4<|>0:.#A%,|
|000006e0| 26 46 46 3a 54 3d a2 23 | 41 25 3a ce 0d 03 a2 08 |&FF:T=.#|A%:.....|
|000006f0| 20 20 20 ed 0d 03 ac 04 | 0d 03 b6 05 e1 0d 03 c0 | .....|........|
|00000700| 04 0d 03 ca 1d f4 20 2a | 20 44 69 73 70 6c 61 79 |...... *| Display|
|00000710| 20 73 74 61 74 75 73 20 | 61 72 65 61 20 2a 0d 03 | status |area *..|
|00000720| d4 04 0d 03 de 13 dd f2 | 44 69 73 70 6c 61 79 53 |........|DisplayS|
|00000730| 74 61 74 75 73 0d 03 e8 | 0e 20 20 e6 33 31 c8 9c |tatus...|. .31..|
|00000740| 31 39 32 0d 03 f2 16 20 | 20 c8 93 39 36 30 2c 30 |192.... | ..960,0|
|00000750| 2c 33 31 38 2c 31 30 30 | 38 0d 03 fc 04 0d 04 06 |,318,100|8.......|
|00000760| 0e 20 20 fb 34 33 c8 9c | 31 39 32 0d 04 10 21 20 |. .43..|192...! |
|00000770| 20 f1 8a 36 31 2c 31 29 | 22 4e 75 6d 62 65 72 20 | ..61,1)|"Number |
|00000780| 6f 66 20 73 70 72 69 74 | 65 73 3a 22 0d 04 1a 1d |of sprit|es:"....|
|00000790| 20 20 f1 8a 36 31 2c 34 | 29 22 43 75 72 72 65 6e | ..61,4|)"Curren|
|000007a0| 74 20 6e 61 6d 65 20 3a | 22 0d 04 24 21 20 20 f1 |t name :|"..$! .|
|000007b0| 8a 36 31 2c 38 29 22 57 | 69 64 74 68 3a 20 20 20 |.61,8)"W|idth: |
|000007c0| 20 20 48 65 69 67 68 74 | 3a 22 0d 04 2e 20 20 20 | Height|:"... |
|000007d0| f1 8a 36 31 2c 31 32 29 | 22 43 72 65 61 74 65 64 |..61,12)|"Created|
|000007e0| 20 69 6e 20 4d 4f 44 45 | 3a 22 0d 04 38 21 20 20 | in MODE|:"..8! |
|000007f0| f1 8a 36 31 2c 31 36 29 | 22 43 75 72 72 65 6e 74 |..61,16)|"Current|
|00000800| 20 61 64 64 72 65 73 73 | 20 3a 22 0d 04 42 1c 20 | address| :"..B. |
|00000810| 20 f1 8a 36 31 2c 32 30 | 29 22 50 72 65 2d 73 68 | ..61,20|)"Pre-sh|
|00000820| 69 66 74 73 20 3a 22 0d | 04 4c 05 e1 0d 04 56 04 |ifts :".|.L....V.|
|00000830| 0d 04 60 2e f4 20 2a 20 | 4c 6f 61 64 20 73 70 72 |..`.. * |Load spr|
|00000840| 69 74 65 73 20 26 20 47 | 65 74 20 6e 75 6d 62 65 |ites & G|et numbe|
|00000850| 72 20 6f 66 20 73 70 72 | 69 74 65 73 20 2a 0d 04 |r of spr|ites *..|
|00000860| 6a 04 0d 04 74 28 dd a4 | 4c 6f 61 64 53 70 72 69 |j...t(..|LoadSpri|
|00000870| 74 65 73 41 6e 64 47 65 | 74 4e 75 6d 62 65 72 28 |tesAndGe|tNumber(|
|00000880| 66 69 6c 65 6e 61 6d 65 | 24 29 0d 04 7e 0a 20 20 |filename|$)..~. |
|00000890| ea 20 61 25 0d 04 88 04 | 0d 04 92 29 20 20 c8 99 |. a%....|...) ..|
|000008a0| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 31 30 |"OS_Spri|teOp",10|
|000008b0| 2b 32 35 36 2c 73 25 2c | 66 69 6c 65 6e 61 6d 65 |+256,s%,|filename|
|000008c0| 24 0d 04 9c 29 20 20 c8 | 99 22 4f 53 5f 53 70 72 |$...) .|."OS_Spr|
|000008d0| 69 74 65 4f 70 22 2c 38 | 2b 32 35 36 2c 73 25 20 |iteOp",8|+256,s% |
|000008e0| b8 20 5a 2c 5a 2c 5a 2c | 61 25 0d 04 a6 09 20 20 |. Z,Z,Z,|a%.... |
|000008f0| 3d 61 25 0d 04 b0 0a 45 | 4e 44 44 45 46 0d 04 ba |=a%....E|NDDEF...|
|00000900| 04 0d 04 c4 15 dd f2 4e | 75 6d 62 65 72 28 6e 75 |.......N|umber(nu|
|00000910| 6d 62 65 72 25 29 0d 04 | ce 0f 20 20 20 fb 36 33 |mber%)..|.. .63|
|00000920| c8 9c 31 39 32 0d 04 d8 | 27 20 20 20 f1 8a 36 38 |..192...|' ..68|
|00000930| 2c 32 29 c2 22 30 30 30 | 30 22 2b c1 c3 28 6e 75 |,2)."000|0"+..(nu|
|00000940| 6d 62 65 72 25 29 2c 31 | 29 2c 34 29 0d 04 e2 05 |mber%),1|),4)....|
|00000950| e1 0d 04 ec 04 0d 04 f6 | 29 dd f2 44 61 74 61 28 |........|)..Data(|
|00000960| 43 53 24 2c 77 69 64 74 | 68 25 2c 68 65 69 67 68 |CS$,widt|h%,heigh|
|00000970| 74 25 2c 6d 6f 64 65 25 | 2c 41 44 44 52 29 0d 05 |t%,mode%|,ADDR)..|
|00000980| 00 0f 20 20 20 fb 36 33 | c8 9c 31 39 32 0d 05 0a |.. .63|..192...|
|00000990| 1f 20 20 20 f1 8a 36 32 | 2c 35 29 c0 43 53 24 2b |. ..62|,5).CS$+|
|000009a0| c4 31 32 2c 22 20 22 29 | 2c 31 32 29 0d 05 14 04 |.12," ")|,12)....|
|000009b0| 0d 05 1e 26 20 20 20 f1 | 8a 36 32 2c 39 29 c2 22 |...& .|.62,9)."|
|000009c0| 30 30 30 30 22 2b c1 c3 | 28 77 69 64 74 68 25 29 |0000"+..|(width%)|
|000009d0| 2c 31 29 2c 34 29 0d 05 | 28 27 20 20 20 f1 8a 37 |,1),4)..|(' ..7|
|000009e0| 33 2c 39 29 c2 22 30 30 | 30 30 22 2b c1 c3 28 68 |3,9)."00|00"+..(h|
|000009f0| 65 69 67 68 74 25 29 2c | 31 29 2c 34 29 0d 05 32 |eight%),|1),4)..2|
|00000a00| 26 20 20 20 f1 8a 36 38 | 2c 31 33 29 c2 22 30 30 |& ..68|,13)."00|
|00000a10| 30 30 22 2b c1 c3 28 6d | 6f 64 65 25 29 2c 31 29 |00"+..(m|ode%),1)|
|00000a20| 2c 34 29 0d 05 3c 25 20 | 20 20 f1 8a 36 38 2c 31 |,4)..<% | ..68,1|
|00000a30| 37 29 c2 22 30 30 30 30 | 22 2b c1 c3 28 41 44 44 |7)."0000|"+..(ADD|
|00000a40| 52 29 2c 31 29 2c 36 29 | 0d 05 46 27 20 20 20 f1 |R),1),6)|..F' .|
|00000a50| 8a 36 38 2c 32 31 29 c2 | 22 30 30 30 30 22 2b c1 |.68,21).|"0000"+.|
|00000a60| c3 28 73 68 69 66 74 25 | 29 2c 31 29 2c 36 29 0d |.(shift%|),1),6).|
|00000a70| 05 50 05 e1 0d 05 5a 04 | 0d 05 64 48 dd f2 47 65 |.P....Z.|..dH..Ge|
|00000a80| 74 43 75 72 72 65 6e 74 | 4e 61 6d 65 28 63 75 72 |tCurrent|Name(cur|
|00000a90| 72 65 6e 74 25 2c f8 20 | 43 53 24 2c f8 20 77 69 |rent%,. |CS$,. wi|
|00000aa0| 64 74 68 25 2c 20 f8 20 | 68 65 69 67 68 74 25 2c |dth%, . |height%,|
|00000ab0| 20 f8 20 6d 6f 64 65 25 | 2c f8 20 41 44 44 52 29 | . mode%|,. ADDR)|
|00000ac0| 0d 05 6e 0a 20 20 ea 20 | 5a 25 0d 05 78 04 0d 05 |..n. . |Z%..x...|
|00000ad0| 82 20 20 20 e3 4c 25 3d | 30 b8 31 35 3a 3f 28 62 |. .L%=|0.15:?(b|
|00000ae0| 6c 6f 63 6b 25 2b 4c 25 | 29 3d 31 33 3a ed 0d 05 |lock%+L%|)=13:...|
|00000af0| 8c 32 20 20 c8 99 22 4f | 53 5f 53 70 72 69 74 65 |.2 .."O|S_Sprite|
|00000b00| 4f 70 22 2c 31 33 2b 32 | 35 36 2c 73 25 2c 62 6c |Op",13+2|56,s%,bl|
|00000b10| 6f 63 6b 25 2c 31 36 2c | 63 75 72 72 65 6e 74 25 |ock%,16,|current%|
|00000b20| 0d 05 96 11 20 20 43 53 | 24 3d 24 62 6c 6f 63 6b |.... CS|$=$block|
|00000b30| 25 0d 05 a0 46 20 20 c8 | 99 22 4f 53 5f 53 70 72 |%...F .|."OS_Spr|
|00000b40| 69 74 65 4f 70 22 2c 34 | 30 2b 32 35 36 2c 73 25 |iteOp",4|0+256,s%|
|00000b50| 2c 43 53 24 20 b8 20 5a | 25 2c 5a 25 2c 5a 25 2c |,CS$ . Z|%,Z%,Z%,|
|00000b60| 77 69 64 74 68 25 2c 68 | 65 69 67 68 74 25 2c 5a |width%,h|eight%,Z|
|00000b70| 25 2c 6d 6f 64 65 25 0d | 05 aa 30 20 20 c8 99 22 |%,mode%.|..0 .."|
|00000b80| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 32 34 2b |OS_Sprit|eOp",24+|
|00000b90| 32 35 36 2c 73 25 2c 43 | 53 24 20 b8 20 5a 25 2c |256,s%,C|S$ . Z%,|
|00000ba0| 5a 25 2c 41 44 44 52 0d | 05 b4 1c 20 20 5a 25 3d |Z%,ADDR.|... Z%=|
|00000bb0| 21 28 41 44 44 52 2b 33 | 32 29 3a 41 44 44 52 2b |!(ADDR+3|2):ADDR+|
|00000bc0| 3d 5a 25 0d 05 be 20 20 | 20 e7 77 69 64 74 68 25 |=Z%... | .width%|
|00000bd0| 3e 4d 41 58 58 25 8c 77 | 69 64 74 68 25 3d 4d 41 |>MAXX%.w|idth%=MA|
|00000be0| 58 58 25 0d 05 c8 22 20 | 20 e7 68 65 69 67 68 74 |XX%..." | .height|
|00000bf0| 25 3e 4d 41 58 59 25 8c | 68 65 69 67 68 74 25 3d |%>MAXY%.|height%=|
|00000c00| 4d 41 58 59 25 0d 05 d2 | 05 e1 0d 05 dc 04 0d 05 |MAXY%...|........|
|00000c10| e6 2a dd f2 50 72 65 70 | 61 72 65 4f 75 74 70 75 |.*..Prep|areOutpu|
|00000c20| 74 28 66 69 6c 65 6e 61 | 6d 65 24 2c f8 20 41 25 |t(filena|me$,. A%|
|00000c30| 2c 73 68 69 66 74 25 29 | 0d 05 f0 15 20 20 20 41 |,shift%)|.... A|
|00000c40| 25 3d ae 20 66 69 6c 65 | 6e 61 6d 65 24 0d 05 fa |%=. file|name$...|
|00000c50| 0e 20 20 20 e7 41 25 3e | 30 20 8c 0d 06 04 16 20 |. .A%>|0 ..... |
|00000c60| 20 20 20 20 d5 23 41 25 | 2c 48 45 41 44 45 52 24 | .#A%|,HEADER$|
|00000c70| 3b 0d 06 0e 2f 20 20 20 | 20 20 e7 20 73 68 69 66 |;.../ | . shif|
|00000c80| 74 25 3d 30 8c d5 23 41 | 25 2c bd 28 34 38 2b 31 |t%=0..#A|%,.(48+1|
|00000c90| 29 3b 8b d5 23 41 25 2c | bd 28 34 38 2b 32 29 3b |);..#A%,|.(48+2);|
|00000ca0| 0d 06 18 08 20 20 20 cd | 0d 06 22 05 e1 0d 06 2c |.... .|.."....,|
|00000cb0| 04 0d 06 36 2f f4 20 2a | 20 57 72 69 74 65 20 77 |...6/. *| Write w|
|00000cc0| 69 64 74 68 20 61 6e 64 | 20 68 65 69 67 68 74 20 |idth and| height |
|00000cd0| 61 73 20 61 20 34 20 62 | 79 74 65 20 77 6f 72 64 |as a 4 b|yte word|
|00000ce0| 0d 06 40 04 0d 06 4a 30 | dd f2 57 72 69 74 65 57 |..@...J0|..WriteW|
|00000cf0| 69 64 74 68 41 6e 64 48 | 65 69 67 68 74 28 77 69 |idthAndH|eight(wi|
|00000d00| 64 74 68 25 2c 68 65 69 | 67 68 74 25 2c 73 68 69 |dth%,hei|ght%,shi|
|00000d10| 66 74 25 29 0d 06 54 0d | 20 20 20 e7 41 25 3e 30 |ft%)..T.| .A%>0|
|00000d20| 8c 0d 06 5e 19 20 20 20 | 20 20 21 28 62 6c 6f 63 |...^. | !(bloc|
|00000d30| 6b 25 29 3d 77 69 64 74 | 68 25 0d 06 68 17 20 20 |k%)=widt|h%..h. |
|00000d40| 20 20 20 d5 23 41 25 2c | 3f 28 62 6c 6f 63 6b 25 | .#A%,|?(block%|
|00000d50| 29 0d 06 72 19 20 20 20 | 20 20 d5 23 41 25 2c 3f |)..r. | .#A%,?|
|00000d60| 28 62 6c 6f 63 6b 25 2b | 31 29 0d 06 7c 19 20 20 |(block%+|1)..|. |
|00000d70| 20 20 20 d5 23 41 25 2c | 3f 28 62 6c 6f 63 6b 25 | .#A%,|?(block%|
|00000d80| 2b 32 29 0d 06 86 19 20 | 20 20 20 20 d5 23 41 25 |+2).... | .#A%|
|00000d90| 2c 3f 28 62 6c 6f 63 6b | 25 2b 33 29 0d 06 90 1a |,?(block|%+3)....|
|00000da0| 20 20 20 20 20 21 28 62 | 6c 6f 63 6b 25 29 3d 68 | !(b|lock%)=h|
|00000db0| 65 69 67 68 74 25 0d 06 | 9a 17 20 20 20 20 20 d5 |eight%..|.. .|
|00000dc0| 23 41 25 2c 3f 28 62 6c | 6f 63 6b 25 29 0d 06 a4 |#A%,?(bl|ock%)...|
|00000dd0| 19 20 20 20 20 20 d5 23 | 41 25 2c 3f 28 62 6c 6f |. .#|A%,?(blo|
|00000de0| 63 6b 25 2b 31 29 0d 06 | ae 19 20 20 20 20 20 d5 |ck%+1)..|.. .|
|00000df0| 23 41 25 2c 3f 28 62 6c | 6f 63 6b 25 2b 32 29 0d |#A%,?(bl|ock%+2).|
|00000e00| 06 b8 19 20 20 20 20 20 | d5 23 41 25 2c 3f 28 62 |... |.#A%,?(b|
|00000e10| 6c 6f 63 6b 25 2b 33 29 | 0d 06 c2 39 20 20 20 20 |lock%+3)|...9 |
|00000e20| 20 e7 73 68 69 66 74 25 | 3e 30 8c d5 23 41 25 2c | .shift%|>0..#A%,|
|00000e30| 73 68 69 66 74 25 3a d5 | 23 41 25 2c 26 46 46 3a |shift%:.|#A%,&FF:|
|00000e40| d5 23 41 25 2c 26 46 46 | 3a d5 23 41 25 2c 26 46 |.#A%,&FF|:.#A%,&F|
|00000e50| 46 0d 06 cc 08 20 20 20 | cd 0d 06 d6 05 e1 0d 06 |F.... |........|
|00000e60| e0 04 0d 06 ea 19 dd f2 | 47 65 74 45 6e 76 28 f8 |........|GetEnv(.|
|00000e70| 20 49 44 24 2c f8 20 4f | 44 24 29 0d 06 f4 0b 20 | ID$,. O|D$).... |
|00000e80| 20 20 ea 20 4c 25 0d 06 | fe 04 0d 07 08 14 20 20 | . L%..|...... |
|00000e90| 20 49 44 24 3d 22 22 3a | 4f 44 24 3d 22 22 0d 07 | ID$="":|OD$=""..|
|00000ea0| 12 04 0d 07 1c 19 20 20 | 20 c8 99 22 4f 53 5f 47 |...... | .."OS_G|
|00000eb0| 65 74 45 6e 76 22 20 b8 | 20 52 30 0d 07 26 04 0d |etEnv" .| R0..&..|
|00000ec0| 07 30 26 20 20 20 f4 20 | 43 68 65 63 6b 20 66 6f |.0& . |Check fo|
|00000ed0| 72 20 73 74 61 72 74 20 | 6f 66 20 70 61 72 61 6d |r start |of param|
|00000ee0| 65 74 65 72 73 0d 07 3a | 04 0d 07 44 0b 20 20 20 |eters..:|...D. |
|00000ef0| 4c 25 3d 30 0d 07 4e 2a | 20 20 20 c8 95 20 28 3f |L%=0..N*| .. (?|
|00000f00| 28 4c 25 2b 52 30 29 3c | 3e 97 22 2b 22 29 20 80 |(L%+R0)<|>."+") .|
|00000f10| 20 28 3f 28 4c 25 2b 52 | 30 29 3c 3e 30 29 0d 07 | (?(L%+R|0)<>0)..|
|00000f20| 58 11 20 20 20 20 20 20 | 20 20 4c 25 2b 3d 31 0d |X. | L%+=1.|
|00000f30| 07 62 08 20 20 20 ce 0d | 07 6c 04 0d 07 76 4e 20 |.b. ..|.l...vN |
|00000f40| 20 20 e7 3f 28 4c 25 2b | 52 30 29 3d 30 8c f1 22 | .?(L%+|R0)=0.."|
|00000f50| 53 79 6e 74 61 78 20 3a | 20 22 50 52 4f 47 52 41 |Syntax :| "PROGRA|
|00000f60| 4d 24 22 20 2b 3c 73 70 | 72 69 74 65 6e 61 6d 65 |M$" +<sp|ritename|
|00000f70| 3e 20 3c 6f 75 74 70 75 | 74 6e 61 6d 65 3e 20 5b |> <outpu|tname> [|
|00000f80| 73 68 69 66 74 5d 22 3a | e0 0d 07 80 04 0d 07 8a |shift]":|........|
|00000f90| 0c 20 20 20 4c 25 2b 3d | 31 0d 07 94 18 20 20 20 |. L%+=|1.... |
|00000fa0| c8 95 20 3f 28 4c 25 2b | 52 30 29 3c 3e 97 22 20 |.. ?(L%+|R0)<>." |
|00000fb0| 22 0d 07 9e 1b 20 20 20 | 20 20 20 20 49 44 24 2b |".... | ID$+|
|00000fc0| 3d bd 28 3f 28 4c 25 2b | 52 30 29 29 0d 07 a8 10 |=.(?(L%+|R0))....|
|00000fd0| 20 20 20 20 20 20 20 4c | 25 2b 3d 31 0d 07 b2 08 | L|%+=1....|
|00000fe0| 20 20 20 ce 0d 07 bc 04 | 0d 07 c6 17 20 20 20 c8 | .....|.... .|
|00000ff0| 95 20 3f 28 4c 25 2b 52 | 30 29 3d 97 22 20 22 0d |. ?(L%+R|0)=." ".|
|00001000| 07 d0 11 20 20 20 20 20 | 20 20 20 4c 25 2b 3d 31 |... | L%+=1|
|00001010| 0d 07 da 08 20 20 20 ce | 0d 07 e4 2a 20 20 20 c8 |.... .|...* .|
|00001020| 95 20 28 3f 28 4c 25 2b | 52 30 29 3c 3e 30 29 20 |. (?(L%+|R0)<>0) |
|00001030| 80 20 28 3f 28 4c 25 2b | 52 30 29 3c 3e 97 22 20 |. (?(L%+|R0)<>." |
|00001040| 22 29 0d 07 ee 1b 20 20 | 20 20 20 20 20 4f 44 24 |").... | OD$|
|00001050| 2b 3d bd 28 3f 28 4c 25 | 2b 52 30 29 29 0d 07 f8 |+=.(?(L%|+R0))...|
|00001060| 10 20 20 20 20 20 20 20 | 4c 25 2b 3d 31 0d 08 02 |. |L%+=1...|
|00001070| 08 20 20 20 ce 0d 08 0c | 17 20 20 20 c8 95 20 3f |. ....|. .. ?|
|00001080| 28 4c 25 2b 52 30 29 3d | 97 22 20 22 0d 08 16 11 |(L%+R0)=|." "....|
|00001090| 20 20 20 20 20 20 20 20 | 4c 25 2b 3d 31 0d 08 20 | |L%+=1.. |
|000010a0| 08 20 20 20 ce 0d 08 2a | 2c 20 20 20 73 68 69 66 |. ...*|, shif|
|000010b0| 74 25 3d 3f 28 4c 25 2b | 52 30 29 2d 34 38 3a e7 |t%=?(L%+|R0)-48:.|
|000010c0| 73 68 69 66 74 25 3c 30 | 8c 73 68 69 66 74 25 3d |shift%<0|.shift%=|
|000010d0| 30 0d 08 34 19 20 20 20 | e7 73 68 69 66 74 25 3e |0..4. |.shift%>|
|000010e0| 38 8c 73 68 69 66 74 25 | 3d 38 0d 08 3e 05 e1 0d |8.shift%|=8..>...|
|000010f0| ff | |. | |
+--------+-------------------------+-------------------------+--------+--------+