home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 3 / PDCD_3.iso / utilities / utilst / wt_070 / Documents / Examples / FileLoad / RLE / RLESupprt! < prev   
Unknown  |  1995-04-04  |  2.4 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



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 01 18 c8 9b 22 47 | 4c 69 62 3a 47 4c 69 62 |......"G|Lib:GLib|
|00000010| 22 3a f2 65 72 72 6f 72 | 0d 00 02 04 0d 00 03 0e |":.error|........|
|00000020| 73 61 76 65 25 20 20 20 | 3d 31 0d 00 04 19 74 69 |save% |=1....ti|
|00000030| 74 6c 65 24 20 20 3d 22 | 52 4c 45 53 75 70 70 6f |tle$ ="|RLESuppo|
|00000040| 72 74 22 0d 00 05 13 66 | 69 6c 65 24 20 20 20 3d |rt"....f|ile$ =|
|00000050| 74 69 74 6c 65 24 0d 00 | 06 27 70 61 74 68 24 20 |title$..|.'path$ |
|00000060| 20 20 3d 22 57 54 45 78 | 61 6d 70 6c 65 73 3a 46 | ="WTEx|amples:F|
|00000070| 69 6c 65 4c 6f 61 64 2e | 52 4c 45 2e 22 0d 00 07 |ileLoad.|RLE."...|
|00000080| 13 76 65 72 73 69 6f 6e | 24 3d 22 30 2e 30 33 22 |.version|$="0.03"|
|00000090| 0d 00 08 4c 68 65 6c 70 | 24 20 20 20 3d 22 53 75 |...Lhelp|$ ="Su|
|000000a0| 70 70 6f 72 74 73 20 63 | 6f 6d 70 72 65 73 73 65 |pports c|ompresse|
|000000b0| 64 20 57 54 20 6d 6f 64 | 75 6c 65 73 20 77 69 74 |d WT mod|ules wit|
|000000c0| 68 20 69 6e 74 65 72 6e | 61 6c 20 66 69 6c 65 74 |h intern|al filet|
|000000d0| 79 70 65 20 27 52 4c 45 | 6d 27 2e 22 0d 00 09 0f |ype 'RLE|m'."....|
|000000e0| 68 65 6c 70 24 20 20 2b | 3d 22 22 0d 00 0a 0f 68 |help$ +|=""....h|
|000000f0| 65 6c 70 24 20 20 2b 3d | 22 22 0d 00 0b 04 0d 00 |elp$ +=|""......|
|00000100| 0c 11 64 6c 72 63 68 75 | 6e 6b 25 3d 26 34 30 0d |..dlrchu|nk%=&40.|
|00000110| 00 0d 0d 70 6d 5f 77 6f | 72 64 3d 30 0d 00 0e 04 |...pm_wo|rd=0....|
|00000120| 0d 00 0f 15 f2 63 6f 64 | 65 28 35 30 2a 31 30 32 |.....cod|e(50*102|
|00000130| 34 2c 31 32 29 0d 00 10 | 04 0d 00 11 18 c8 99 22 |4,12)...|......."|
|00000140| 57 54 5f 49 6e 73 74 61 | 6c 6c 22 2c 63 6f 64 65 |WT_Insta|ll",code|
|00000150| 25 0d 00 12 2d f4 49 46 | 73 61 76 65 25 50 52 4f |%...-.IF|save%PRO|
|00000160| 43 73 61 76 65 63 6f 64 | 65 28 66 69 6c 65 24 2c |Csavecod|e(file$,|
|00000170| 26 62 36 66 2c 63 6f 64 | 65 25 2c 4f 25 29 0d 00 |&b6f,cod|e%,O%)..|
|00000180| 13 2b e7 73 61 76 65 25 | c8 99 38 2c 31 30 2c 70 |.+.save%|..8,10,p|
|00000190| 61 74 68 24 2b 66 69 6c | 65 24 2c 26 62 36 66 2c |ath$+fil|e$,&b6f,|
|000001a0| 2c 63 6f 64 65 25 2c 4f | 25 0d 00 14 04 0d 00 15 |,code%,O|%.......|
|000001b0| 05 e0 0d 00 16 48 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |.....H__|________|
|000001c0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000001d0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000001e0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000001f0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 0d 00 17 04 0d 00 |________|__......|
|00000200| 18 0f dd a4 6d 63 3a 5b | 6f 70 74 70 25 0d 00 19 |....mc:[|optp%...|
|00000210| 04 0d 00 1a 2c 20 20 20 | 20 20 20 20 20 20 20 20 |...., | |
|00000220| 20 20 20 20 a4 77 74 6d | 5f 68 65 61 64 65 72 28 | .wtm|_header(|
|00000230| 6c 61 73 74 5f 69 73 5f | 63 6c 69 25 29 0d 00 1b |last_is_|cli%)...|
|00000240| 48 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |H_______|________|
|00000250| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000260| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000270| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000280| 5f 5f 5f 5f 5f 0d 00 1c | 04 0d 00 1d 1b 2e 66 69 |_____...|......fi|
|00000290| 6c 65 74 79 70 65 20 20 | 20 20 20 20 3a 3d 22 52 |letype | :="R|
|000002a0| 4c 45 6d 22 0d 00 1e 45 | 5f 5f 5f 5f 5f 5f 5f 5f |LEm"...E|________|
|000002b0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000002c0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000002d0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000002e0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 0d 00 1f 04 0d 00 20 |________|_...... |
|000002f0| 3c 2e 77 74 73 68 20 20 | 20 20 20 20 20 20 20 20 |<.wtsh | |
|00000300| 74 65 71 20 20 20 20 20 | 31 2c 23 a4 69 64 28 22 |teq |1,#.id("|
|00000310| 57 54 53 65 72 76 69 63 | 65 5f 46 69 6c 65 42 6c |WTServic|e_FileBl|
|00000320| 6f 63 6b 49 6e 66 6f 22 | 29 0d 00 21 3e 20 20 20 |ockInfo"|)..!> |
|00000330| 20 20 20 20 20 20 20 20 | 20 20 20 20 74 65 71 6e | | teqn|
|00000340| 65 20 20 20 31 2c 23 a4 | 69 64 28 22 57 54 53 65 |e 1,#.|id("WTSe|
|00000350| 72 76 69 63 65 5f 4d 65 | 6d 6f 72 79 42 6c 6f 63 |rvice_Me|moryBloc|
|00000360| 6b 49 6e 66 6f 22 29 0d | 00 22 20 20 20 20 20 20 |kInfo").|." |
|00000370| 20 20 20 20 20 20 20 20 | 20 20 6d 6f 76 6e 65 73 | | movnes|
|00000380| 20 20 31 35 2c 31 34 0d | 00 23 04 0d 00 24 3a 20 | 15,14.|.#...$: |
|00000390| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 6c 64 | | ld|
|000003a0| 72 20 39 2c 66 69 6c 65 | 74 79 70 65 20 20 20 20 |r 9,file|type |
|000003b0| 20 20 3b 20 67 65 74 20 | 77 6f 72 64 20 74 6f 20 | ; get |word to |
|000003c0| 63 68 65 63 6b 0d 00 25 | 4d 20 20 20 20 20 20 20 |check..%|M |
|000003d0| 20 20 20 20 20 20 20 20 | 74 65 71 20 39 2c 33 20 | |teq 9,3 |
|000003e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 20 69 73 | | ; is|
|000003f0| 20 74 68 65 20 31 73 74 | 20 77 6f 72 64 20 6f 66 | the 1st| word of|
|00000400| 20 62 6c 6f 63 6b 20 6c | 69 6b 65 20 6d 69 6e 65 | block l|ike mine|
|00000410| 20 3f 0d 00 26 41 20 20 | 20 20 20 20 20 20 20 20 | ?..&A | |
|00000420| 20 20 20 20 20 6d 6f 76 | 65 71 20 33 2c 34 20 20 | mov|eq 3,4 |
|00000430| 20 20 20 20 20 20 20 20 | 20 3b 20 20 20 72 65 74 | | ; ret|
|00000440| 75 72 6e 20 72 65 61 6c | 20 62 6c 6f 63 6b 20 73 |urn real| block s|
|00000450| 69 7a 65 0d 00 27 3e 20 | 20 20 20 20 20 20 20 20 |ize..'> | |
|00000460| 20 20 20 20 20 20 6d 6f | 76 65 71 20 34 2c 31 20 | mo|veq 4,1 |
|00000470| 20 20 20 20 20 20 20 20 | 20 20 3b 20 20 20 6b 65 | | ; ke|
|00000480| 65 70 20 74 68 65 20 6d | 65 73 73 61 67 65 20 49 |ep the m|essage I|
|00000490| 64 0d 00 28 38 20 20 20 | 20 20 20 20 20 20 20 20 |d..(8 | |
|000004a0| 20 20 20 20 6d 6f 76 65 | 71 20 31 2c 23 30 20 20 | move|q 1,#0 |
|000004b0| 20 20 20 20 20 20 20 20 | 3b 20 20 20 63 6c 61 69 | |; clai|
|000004c0| 6d 20 6d 65 73 73 61 67 | 65 0d 00 29 4a 20 20 20 |m messag|e..)J |
|000004d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 6d 6f 76 65 | | move|
|000004e0| 71 20 32 2c 31 32 20 20 | 20 20 20 20 20 20 20 20 |q 2,12 | |
|000004f0| 3b 20 20 20 70 72 69 76 | 61 74 65 20 77 6f 72 64 |; priv|ate word|
|00000500| 20 6f 66 20 63 6f 6e 76 | 65 72 74 20 72 6f 75 74 | of conv|ert rout|
|00000510| 69 6e 65 0d 00 2a 45 20 | 20 20 20 20 20 20 20 20 |ine..*E | |
|00000520| 20 20 20 20 20 20 6d 6f | 76 65 71 20 30 2c 31 35 | mo|veq 0,15|
|00000530| 20 20 20 20 20 20 20 20 | 20 20 3b 20 20 20 61 64 | | ; ad|
|00000540| 64 72 65 73 73 20 6f 66 | 20 63 6f 6e 76 65 72 74 |dress of| convert|
|00000550| 20 72 6f 75 74 69 6e 65 | 0d 00 2b 1d 20 20 20 20 | routine|..+. |
|00000560| 20 20 20 20 20 20 20 20 | 20 20 20 6d 6f 76 73 20 | | movs |
|00000570| 31 35 2c 31 34 0d 00 2c | 04 0d 00 2d 1c 3b 20 54 |15,14..,|...-.; T|
|00000580| 68 65 20 63 6f 6e 76 65 | 72 74 20 72 6f 75 74 69 |he conve|rt routi|
|00000590| 6e 65 2e 2e 2e 0d 00 2e | 04 0d 00 2f 1e 20 20 20 |ne......|.../. |
|000005a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 70 75 73 68 | | push|
|000005b0| 20 32 2c 34 2c 31 34 0d | 00 30 04 0d 00 31 53 20 | 2,4,14.|.0...1S |
|000005c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 74 65 | | te|
|000005d0| 71 20 34 2c 23 a4 69 64 | 28 22 57 54 53 65 72 76 |q 4,#.id|("WTServ|
|000005e0| 69 63 65 5f 4d 65 6d 6f | 72 79 42 6c 6f 63 6b 49 |ice_Memo|ryBlockI|
|000005f0| 6e 66 6f 22 29 20 3b 20 | 77 61 73 20 6d 65 73 73 |nfo") ; |was mess|
|00000600| 61 67 65 20 77 61 73 20 | 74 68 61 74 20 3f 0d 00 |age was |that ?..|
|00000610| 32 53 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |2S | |
|00000620| 20 20 20 61 64 64 65 71 | 20 31 2c 31 2c 23 38 20 | addeq| 1,1,#8 |
|00000630| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000640| 20 20 20 20 20 20 20 20 | 20 20 3b 20 75 70 64 61 | | ; upda|
|00000650| 74 65 20 6d 65 6d 6f 72 | 79 20 70 6f 69 6e 74 65 |te memor|y pointe|
|00000660| 72 0d 00 33 1e 20 20 20 | 20 20 20 20 20 20 20 20 |r..3. | |
|00000670| 20 20 20 20 20 20 62 65 | 71 20 5f 6c 6f 6f 70 0d | be|q _loop.|
|00000680| 00 34 04 0d 00 35 51 20 | 20 20 20 20 20 20 20 20 |.4...5Q | |
|00000690| 20 20 20 20 20 20 6d 6f | 76 20 30 2c 23 34 3a 61 | mo|v 0,#4:a|
|000006a0| 64 64 20 32 2c 31 32 2c | 23 34 3a 6d 6f 76 20 33 |dd 2,12,|#4:mov 3|
|000006b0| 2c 23 38 3a 73 77 69 20 | 26 32 30 30 30 63 20 3b |,#8:swi |&2000c ;|
|000006c0| 20 75 70 64 61 74 65 20 | 66 69 6c 65 20 70 6f 69 | update |file poi|
|000006d0| 6e 74 65 72 0d 00 36 3d | 20 20 20 20 20 20 20 20 |nter..6=| |
|000006e0| 20 20 20 20 20 20 20 6c | 64 6d 69 61 20 31 33 2c | l|dmia 13,|
|000006f0| 7b 32 2c 34 7d 20 20 20 | 20 20 20 20 20 20 20 20 |{2,4} | |
|00000700| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000710| 3b 0d 00 37 04 0d 00 38 | 1b 3b 20 44 65 63 6f 6d |;..7...8|.; Decom|
|00000720| 70 72 65 73 73 20 72 6f | 75 74 69 6e 65 2e 2e 2e |press ro|utine...|
|00000730| 0d 00 39 04 0d 00 3a 2d | 5f 6c 6f 6f 70 20 20 20 |..9...:-|_loop |
|00000740| 20 20 20 20 20 20 20 62 | 6c 20 67 65 74 62 79 74 | b|l getbyt|
|00000750| 65 3a 63 6d 70 20 30 2c | 23 30 3a 70 6f 70 65 71 |e:cmp 0,|#0:popeq|
|00000760| 5e 0d 00 3b 31 20 20 20 | 20 20 20 20 20 20 20 20 |^..;1 | |
|00000770| 20 20 20 20 6d 6f 76 20 | 33 2c 30 2c 6c 73 6c 23 | mov |3,0,lsl#|
|00000780| 32 34 3a 6d 6f 76 73 20 | 33 2c 33 2c 61 73 72 23 |24:movs |3,3,asr#|
|00000790| 32 34 0d 00 3c 1d 20 20 | 20 20 20 20 20 20 20 20 |24..<. | |
|000007a0| 20 20 20 20 20 62 6c 20 | 67 65 74 62 79 74 65 0d | bl |getbyte.|
|000007b0| 00 3d 1e 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.=. | |
|000007c0| 20 20 62 6c 74 20 5f 65 | 78 70 61 6e 64 0d 00 3e | blt _e|xpand..>|
|000007d0| 43 5f 63 6f 70 79 20 20 | 20 20 20 20 20 20 20 20 |C_copy | |
|000007e0| 73 74 72 62 20 30 2c 5b | 32 5d 2c 23 31 3a 73 75 |strb 0,[|2],#1:su|
|000007f0| 62 73 20 33 2c 33 2c 23 | 31 3a 62 6c 67 74 20 67 |bs 3,3,#|1:blgt g|
|00000800| 65 74 62 79 74 65 3a 62 | 67 74 20 5f 63 6f 70 79 |etbyte:b|gt _copy|
|00000810| 0d 00 3f 1a 20 20 20 20 | 20 20 20 20 20 20 20 20 |..?. | |
|00000820| 20 20 20 62 20 5f 6c 6f | 6f 70 0d 00 40 04 0d 00 | b _lo|op..@...|
|00000830| 41 38 5f 65 78 70 61 6e | 64 20 20 20 20 20 20 20 |A8_expan|d |
|00000840| 20 73 74 72 62 20 30 2c | 5b 32 5d 2c 23 31 3a 61 | strb 0,|[2],#1:a|
|00000850| 64 64 73 20 33 2c 33 2c | 23 31 3a 62 6c 74 20 5f |dds 3,3,|#1:blt _|
|00000860| 65 78 70 61 6e 64 0d 00 | 42 1a 20 20 20 20 20 20 |expand..|B. |
|00000870| 20 20 20 20 20 20 20 20 | 20 62 20 5f 6c 6f 6f 70 | | b _loop|
|00000880| 0d 00 43 49 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |..CI____|________|
|00000890| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000008a0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000008b0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000008c0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 0d 00 44 04 0d 00 45 |________|_..D...E|
|000008d0| 3a 2e 67 65 74 62 79 74 | 65 20 20 20 20 20 20 20 |:.getbyt|e |
|000008e0| 74 65 71 20 34 2c 23 a4 | 69 64 28 22 57 54 53 65 |teq 4,#.|id("WTSe|
|000008f0| 72 76 69 63 65 5f 4d 65 | 6d 6f 72 79 42 6c 6f 63 |rvice_Me|moryBloc|
|00000900| 6b 49 6e 66 6f 22 29 0d | 00 46 24 20 20 20 20 20 |kInfo").|.F$ |
|00000910| 20 20 20 20 20 20 20 20 | 20 20 20 20 6c 64 72 65 | | ldre|
|00000920| 71 62 20 30 2c 5b 31 5d | 2c 23 31 0d 00 47 21 20 |qb 0,[1]|,#1..G! |
|00000930| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000940| 6d 6f 76 65 71 73 20 31 | 35 2c 31 34 0d 00 48 15 |moveqs 1|5,14..H.|
|00000950| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000960| 20 0d 00 49 1a 20 20 20 | 20 20 20 20 20 20 20 20 | ..I. | |
|00000970| 20 20 20 20 70 75 73 68 | 20 31 34 0d 00 4a 1d 20 | push| 14..J. |
|00000980| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 73 77 | | sw|
|00000990| 69 20 26 32 30 30 30 61 | 0d 00 4b 17 20 20 20 20 |i &2000a|..K. |
|000009a0| 20 20 20 20 20 20 20 20 | 20 20 20 70 6f 70 5e 0d | | pop^.|
|000009b0| 00 4c 08 5d 3a 3d 30 0d | ff |.L.]:=0.|. |
+--------+-------------------------+-------------------------+--------+--------+