home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1989-02-27 | 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.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 10%
| dexvert
| Truevision Targa Graphic (image/tga)
| magic
| Supported |
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 38 f4 20 3e 24 | 2e 42 61 73 6c 69 62 2e |...8. >$|.Baslib.|
|00000010| 47 65 6e 4c 69 62 20 20 | 20 20 20 3a 20 50 52 4f |GenLib | : PRO|
|00000020| 43 68 65 6c 70 5f 67 65 | 6e 6c 69 62 20 66 6f 72 |Chelp_ge|nlib for|
|00000030| 20 64 65 74 61 69 6c 73 | 0d 00 1e 05 3a 0d 00 28 | details|....:..(|
|00000040| 1a f4 20 56 31 2e 30 30 | 20 31 34 31 30 38 38 20 |.. V1.00| 141088 |
|00000050| 43 72 65 61 74 65 64 0d | 00 32 2f f4 20 56 31 2e |Created.|.2/. V1.|
|00000060| 30 31 20 32 35 31 30 38 | 38 20 41 64 64 65 64 20 |01 25108|8 Added |
|00000070| 50 52 4f 43 6d 65 6d 5f | 6d 6f 76 65 28 61 25 2c |PROCmem_|move(a%,|
|00000080| 62 25 2c 6e 72 29 0d 00 | 3c 43 f4 20 56 31 2e 30 |b%,nr)..|<C. V1.0|
|00000090| 32 20 33 30 31 30 38 38 | 20 41 64 64 65 64 20 46 |2 301088| Added F|
|000000a0| 4e 6d 65 6d 5f 73 75 62 | 73 28 73 74 61 72 74 25 |Nmem_sub|s(start%|
|000000b0| 2c 6e 72 5f 62 79 74 65 | 73 25 2c 74 61 72 67 65 |,nr_byte|s%,targe|
|000000c0| 74 25 2c 73 75 62 73 25 | 29 0d 00 46 47 f4 20 56 |t%,subs%|)..FG. V|
|000000d0| 31 2e 30 33 20 30 35 31 | 31 38 38 20 43 6f 72 72 |1.03 051|188 Corr|
|000000e0| 65 63 74 65 64 20 50 52 | 4f 43 6d 65 6d 5f 6d 6f |ected PR|OCmem_mo|
|000000f0| 76 65 28 29 20 2d 20 6d | 6f 76 69 6e 67 20 6f 6e |ve() - m|oving on|
|00000100| 65 20 74 6f 6f 20 6d 61 | 6e 79 20 62 79 74 65 73 |e too ma|ny bytes|
|00000110| 0d 00 50 42 f4 20 56 31 | 2e 30 34 20 30 38 31 31 |..PB. V1|.04 0811|
|00000120| 38 38 20 52 65 6d 6f 76 | 65 64 20 46 4e 63 61 74 |88 Remov|ed FNcat|
|00000130| 5f 69 6e 66 6f 72 65 61 | 64 28 29 2c 20 50 52 4f |_inforea|d(), PRO|
|00000140| 43 64 65 6d 6f 5f 64 69 | 72 5f 72 65 61 64 20 61 |Cdemo_di|r_read a|
|00000150| 6e 64 0d 00 5a 2a f4 20 | 20 20 20 20 20 20 20 20 |nd..Z*. | |
|00000160| 20 20 20 20 20 46 4e 64 | 69 72 5f 72 65 61 64 28 | FNd|ir_read(|
|00000170| 29 20 74 6f 20 46 53 79 | 73 4c 69 62 0d 00 64 39 |) to FSy|sLib..d9|
|00000180| f4 20 56 31 2e 30 35 20 | 32 37 30 32 38 39 20 52 |. V1.05 |270289 R|
|00000190| 65 6d 6f 76 65 64 20 46 | 4e 6d 65 6d 5f 74 6f 5f |emoved F|Nmem_to_|
|000001a0| 73 74 72 69 6e 67 28 29 | 20 74 6f 20 53 74 72 69 |string()| to Stri|
|000001b0| 6e 67 4c 69 62 0d 00 6e | 05 3a 0d 00 78 14 dd f2 |ngLib..n|.:..x...|
|000001c0| 64 65 6c 61 79 28 73 65 | 63 6f 6e 64 73 29 0d 00 |delay(se|conds)..|
|000001d0| 82 0a ea 20 74 69 6d 65 | 0d 00 8c 1e 74 69 6d 65 |... time|....time|
|000001e0| 20 3d 20 91 20 2b 20 28 | 73 65 63 6f 6e 64 73 20 | = . + (|seconds |
|000001f0| 2a 20 31 30 30 29 0d 00 | 96 05 f5 0d 00 a0 0e fd |* 100)..|........|
|00000200| 20 91 20 3e 20 74 69 6d | 65 0d 00 aa 05 e1 0d 00 | . > tim|e.......|
|00000210| b4 05 3a 0d 00 be 18 dd | f2 77 61 69 74 5f 66 6f |..:.....|.wait_fo|
|00000220| 72 5f 6b 65 79 28 63 6f | 64 65 29 0d 00 c8 0a ea |r_key(co|de).....|
|00000230| 20 6b 65 79 25 0d 00 d2 | 05 f5 0d 00 dc 0e 20 20 | key%...|...... |
|00000240| 6b 65 79 25 20 3d 20 a5 | 0d 00 e6 11 fd 20 6b 65 |key% = .|..... ke|
|00000250| 79 25 20 3d 20 63 6f 64 | 65 0d 00 f0 05 e1 0d 00 |y% = cod|e.......|
|00000260| fa 05 3a 0d 01 04 1a dd | a4 77 6f 72 64 5f 61 6c |..:.....|.word_al|
|00000270| 69 67 6e 28 70 6f 69 6e | 74 65 72 25 29 0d 01 0e |ign(poin|ter%)...|
|00000280| 17 c8 95 20 70 6f 69 6e | 74 65 72 25 20 83 20 34 |... poin|ter% . 4|
|00000290| 20 3c 3e 30 0d 01 18 13 | 20 20 70 6f 69 6e 74 65 | <>0....| pointe|
|000002a0| 72 25 20 2b 3d 20 31 0d | 01 22 05 ce 0d 01 2c 0e |r% += 1.|."....,.|
|000002b0| 3d 20 70 6f 69 6e 74 65 | 72 25 0d 01 36 05 3a 0d |= pointe|r%..6.:.|
|000002c0| 01 40 1a dd a4 72 65 61 | 64 5f 73 63 72 65 65 6e |.@...rea|d_screen|
|000002d0| 73 74 61 72 74 28 42 25 | 29 0d 01 4a 13 42 25 3d |start(B%|)..J.B%=|
|000002e0| 28 28 42 25 2b 33 29 81 | 34 29 2a 34 0d 01 54 0b |((B%+3).|4)*4..T.|
|000002f0| 21 42 25 3d 31 34 38 0d | 01 5e 0e 21 28 42 25 2b |!B%=148.|.^.!(B%+|
|00000300| 34 29 3d 2d 31 0d 01 68 | 26 c8 99 20 22 4f 53 5f |4)=-1..h|&.. "OS_|
|00000310| 52 65 61 64 56 64 75 56 | 61 72 69 61 62 6c 65 73 |ReadVduV|ariables|
|00000320| 22 2c 42 25 2c 42 25 2b | 26 31 30 0d 01 72 0e 3d |",B%,B%+|&10..r.=|
|00000330| 21 28 42 25 2b 26 31 30 | 29 0d 01 7c 05 3a 0d 01 |!(B%+&10|)..|.:..|
|00000340| 86 19 dd a4 72 65 61 64 | 5f 73 63 72 65 65 6e 73 |....read|_screens|
|00000350| 69 7a 65 28 42 25 29 0d | 01 90 13 42 25 3d 28 28 |ize(B%).|...B%=((|
|00000360| 42 25 2b 33 29 81 34 29 | 2a 34 0d 01 9a 09 21 42 |B%+3).4)|*4....!B|
|00000370| 25 3d 37 0d 01 a4 0e 21 | 28 42 25 2b 34 29 3d 2d |%=7....!|(B%+4)=-|
|00000380| 31 0d 01 ae 26 c8 99 20 | 22 4f 53 5f 52 65 61 64 |1...&.. |"OS_Read|
|00000390| 56 64 75 56 61 72 69 61 | 62 6c 65 73 22 2c 42 25 |VduVaria|bles",B%|
|000003a0| 2c 42 25 2b 26 31 30 0d | 01 b8 0e 3d 21 28 42 25 |,B%+&10.|...=!(B%|
|000003b0| 2b 26 31 30 29 0d 01 c2 | 05 3a 0d 01 cc 3f dd a4 |+&10)...|.:...?..|
|000003c0| 6d 65 6e 75 28 6c 78 25 | 2c 74 79 25 2c 6e 72 5f |menu(lx%|,ty%,nr_|
|000003d0| 69 74 65 6d 73 25 2c 64 | 65 70 74 68 25 2c 66 6f |items%,d|epth%,fo|
|000003e0| 72 65 63 6f 6c 25 2c 62 | 61 63 6b 63 6f 6c 25 2c |recol%,b|ackcol%,|
|000003f0| 61 72 72 61 79 24 28 29 | 29 0d 01 d6 2f ea 20 63 |array$()|).../. c|
|00000400| 68 6f 69 63 65 25 2c 6e | 72 5f 63 6f 6c 73 25 2c |hoice%,n|r_cols%,|
|00000410| 6c 6f 6e 67 65 73 74 25 | 2c 6f 6c 64 79 25 2c 58 |longest%|,oldy%,X|
|00000420| 2c 59 2c 5a 2c 6b 65 79 | 0d 01 e0 0b 2a 46 58 31 |,Y,Z,key|....*FX1|
|00000430| 35 2c 30 0d 01 ea 2b 6c | 6f 6e 67 65 73 74 25 20 |5,0...+l|ongest% |
|00000440| 3d 20 a4 6c 6f 6e 67 65 | 73 74 28 61 72 72 61 79 |= .longe|st(array|
|00000450| 24 28 29 2c 6e 72 5f 69 | 74 65 6d 73 25 29 0d 01 |$(),nr_i|tems%)..|
|00000460| f4 21 6e 72 5f 63 6f 6c | 73 25 20 3d 20 6e 72 5f |.!nr_col|s% = nr_|
|00000470| 69 74 65 6d 73 25 20 81 | 20 64 65 70 74 68 25 0d |items% .| depth%.|
|00000480| 01 fe 32 e7 20 6e 72 5f | 69 74 65 6d 73 25 20 83 |..2. nr_|items% .|
|00000490| 20 64 65 70 74 68 25 20 | 8c 20 6e 72 5f 63 6f 6c | depth% |. nr_col|
|000004a0| 73 25 20 3d 20 6e 72 5f | 63 6f 6c 73 25 20 2b 20 |s% = nr_|cols% + |
|000004b0| 31 0d 02 08 0f 63 68 6f | 69 63 65 25 20 3d 20 30 |1....cho|ice% = 0|
|000004c0| 0d 02 12 4a e7 20 6e 72 | 5f 69 74 65 6d 73 25 20 |...J. nr|_items% |
|000004d0| 3c 3d 20 64 65 70 74 68 | 25 20 3a 20 ef 20 32 36 |<= depth|% : . 26|
|000004e0| 2c 32 38 2c 6c 78 25 2c | 74 79 25 2b 6e 72 5f 69 |,28,lx%,|ty%+nr_i|
|000004f0| 74 65 6d 73 25 2b 31 2c | 6c 78 25 2b 31 2b 6c 6f |tems%+1,|lx%+1+lo|
|00000500| 6e 67 65 73 74 25 2c 74 | 79 25 0d 02 1c 53 e7 20 |ngest%,t|y%...S. |
|00000510| 6e 72 5f 69 74 65 6d 73 | 25 20 3e 20 64 65 70 74 |nr_items|% > dept|
|00000520| 68 25 20 3a 20 ef 20 32 | 36 2c 32 38 2c 6c 78 25 |h% : . 2|6,28,lx%|
|00000530| 2c 74 79 25 2b 64 65 70 | 74 68 25 2b 31 2c 6c 78 |,ty%+dep|th%+1,lx|
|00000540| 25 2b 31 2b 28 6c 6f 6e | 67 65 73 74 25 2b 31 29 |%+1+(lon|gest%+1)|
|00000550| 2a 6e 72 5f 63 6f 6c 73 | 25 2c 74 79 25 0d 02 26 |*nr_cols|%,ty%..&|
|00000560| 1f fb 20 62 61 63 6b 63 | 6f 6c 25 20 3a 20 fb 20 |.. backc|ol% : . |
|00000570| 66 6f 72 65 63 6f 6c 25 | 20 3a 20 db 0d 02 30 17 |forecol%| : ...0.|
|00000580| 72 6f 77 25 20 3d 20 30 | 20 3a 20 63 6f 6c 25 20 |row% = 0| : col% |
|00000590| 3d 20 30 0d 02 3a 05 f5 | 0d 02 44 4d 20 20 f1 8a |= 0..:..|..DM ..|
|000005a0| 31 20 2b 20 28 28 6c 6f | 6e 67 65 73 74 25 20 2b |1 + ((lo|ngest% +|
|000005b0| 20 31 29 20 2a 20 63 6f | 6c 25 29 2c 72 6f 77 25 | 1) * co|l%),row%|
|000005c0| 20 2b 20 31 29 3b 61 72 | 72 61 79 24 28 28 63 6f | + 1);ar|ray$((co|
|000005d0| 6c 25 20 2a 20 64 65 70 | 74 68 25 29 20 2b 20 72 |l% * dep|th%) + r|
|000005e0| 6f 77 25 29 3b 0d 02 4e | 0f 20 20 72 6f 77 25 20 |ow%);..N|. row% |
|000005f0| 2b 3d 20 31 0d 02 58 2d | 20 20 e7 20 72 6f 77 25 |+= 1..X-| . row%|
|00000600| 20 3e 3d 20 64 65 70 74 | 68 25 20 8c 20 63 6f 6c | >= dept|h% . col|
|00000610| 25 20 2b 3d 20 31 20 3a | 20 72 6f 77 25 20 3d 20 |% += 1 :| row% = |
|00000620| 30 0d 02 62 29 fd 20 28 | 63 6f 6c 25 20 2a 20 64 |0..b). (|col% * d|
|00000630| 65 70 74 68 25 29 20 2b | 20 72 6f 77 25 20 3e 3d |epth%) +| row% >=|
|00000640| 20 6e 72 5f 69 74 65 6d | 73 25 0d 02 6c 0a 2a 46 | nr_item|s%..l.*F|
|00000650| 58 34 2c 31 0d 02 76 2c | f2 69 6e 76 65 72 73 65 |X4,1..v,|.inverse|
|00000660| 28 6c 78 25 2b 31 2c 74 | 79 25 2b 63 68 6f 69 63 |(lx%+1,t|y%+choic|
|00000670| 65 25 2b 31 2c 6c 6f 6e | 67 65 73 74 25 2c 31 29 |e%+1,lon|gest%,1)|
|00000680| 0d 02 80 10 c8 97 20 58 | 2c 6f 6c 64 79 25 2c 5a |...... X|,oldy%,Z|
|00000690| 0d 02 8a 16 6f 6c 64 79 | 25 20 3d 20 6f 6c 64 79 |....oldy|% = oldy|
|000006a0| 25 20 81 20 31 30 0d 02 | 94 0b 2a 46 58 31 35 2c |% . 10..|..*FX15,|
|000006b0| 39 0d 02 9e 3e e3 20 54 | 3d 31 20 b8 20 31 30 30 |9...>. T|=1 . 100|
|000006c0| 30 30 20 3a ed 20 3a 20 | f4 20 64 65 6c 61 79 20 |00 :. : |. delay |
|000006d0| 74 6f 20 61 6c 6c 6f 77 | 20 6d 6f 75 73 65 20 62 |to allow| mouse b|
|000006e0| 75 66 66 65 72 20 66 6c | 75 73 68 69 6e 67 21 0d |uffer fl|ushing!.|
|000006f0| 02 a8 05 f5 0d 02 b2 0e | 20 20 c8 97 20 58 2c 59 |........| .. X,Y|
|00000700| 2c 5a 0d 02 bc 13 20 20 | 59 20 3d 20 a8 28 59 20 |,Z.... |Y = .(Y |
|00000710| 81 20 31 30 29 0d 02 c6 | 14 20 20 e7 20 59 20 3c |. 10)...|. . Y <|
|00000720| 3e 20 6f 6c 64 79 25 20 | 8c 0d 02 d0 2d 20 20 20 |> oldy% |....- |
|00000730| 20 e7 20 59 20 3e 20 6f | 6c 64 79 25 20 8c 20 6b | . Y > o|ldy% . k|
|00000740| 65 79 20 3d 20 31 33 39 | 20 3a 20 8b 20 6b 65 79 |ey = 139| : . key|
|00000750| 20 3d 20 31 33 38 0d 02 | da 0f 20 20 20 20 f2 73 | = 138..|.. .s|
|00000760| 65 6c 65 63 74 0d 02 e4 | 11 20 20 20 20 6f 6c 64 |elect...|. old|
|00000770| 79 25 20 3d 20 59 0d 02 | ee 07 20 20 cd 0d 02 f8 |y% = Y..|.. ....|
|00000780| 0b fd 20 5a 20 3d 20 34 | 0d 03 02 08 2a 46 58 34 |.. Z = 4|....*FX4|
|00000790| 0d 03 0c 0c 3d 63 68 6f | 69 63 65 25 0d 03 16 05 |....=cho|ice%....|
|000007a0| 3a 0d 03 20 0c dd f2 73 | 65 6c 65 63 74 0d 03 2a |:.. ...s|elect..*|
|000007b0| 0b ea 20 63 25 2c 72 25 | 0d 03 34 21 e7 20 6b 65 |.. c%,r%|..4!. ke|
|000007c0| 79 20 3d 20 31 33 39 20 | 80 20 63 68 6f 69 63 65 |y = 139 |. choice|
|000007d0| 25 20 3d 20 30 20 3a 20 | e1 0d 03 3e 2c e7 20 6b |% = 0 : |...>,. k|
|000007e0| 65 79 20 3d 20 31 33 38 | 20 80 20 63 68 6f 69 63 |ey = 138| . choic|
|000007f0| 65 25 20 3d 20 6e 72 5f | 69 74 65 6d 73 25 20 2d |e% = nr_|items% -|
|00000800| 20 31 20 3a e1 0d 03 48 | 19 63 25 20 3d 20 63 68 | 1 :...H|.c% = ch|
|00000810| 6f 69 63 65 25 20 81 20 | 64 65 70 74 68 25 0d 03 |oice% . |depth%..|
|00000820| 52 1f 72 25 20 3d 20 63 | 68 6f 69 63 65 25 2d 20 |R.r% = c|hoice%- |
|00000830| 28 63 25 20 2a 20 64 65 | 70 74 68 25 29 0d 03 5c |(c% * de|pth%)..\|
|00000840| 48 f2 69 6e 76 65 72 73 | 65 28 6c 78 25 20 2b 20 |H.invers|e(lx% + |
|00000850| 31 20 2b 20 28 6c 6f 6e | 67 65 73 74 25 20 2a 20 |1 + (lon|gest% * |
|00000860| 63 25 29 20 2b 20 28 31 | 20 2a 20 63 25 29 2c 74 |c%) + (1| * c%),t|
|00000870| 79 25 20 2b 20 72 25 2b | 31 2c 6c 6f 6e 67 65 73 |y% + r%+|1,longes|
|00000880| 74 25 2c 31 29 0d 03 66 | 31 e7 20 6b 65 79 20 3d |t%,1)..f|1. key =|
|00000890| 20 31 33 39 20 3a 20 63 | 68 6f 69 63 65 25 20 2d | 139 : c|hoice% -|
|000008a0| 3d 20 31 20 3a 20 8b 20 | 3a 20 63 68 6f 69 63 65 |= 1 : . |: choice|
|000008b0| 25 20 2b 3d 20 31 0d 03 | 70 19 63 25 20 3d 20 63 |% += 1..|p.c% = c|
|000008c0| 68 6f 69 63 65 25 20 81 | 20 64 65 70 74 68 25 0d |hoice% .| depth%.|
|000008d0| 03 7a 20 72 25 20 3d 20 | 63 68 6f 69 63 65 25 20 |.z r% = |choice% |
|000008e0| 2d 20 28 63 25 20 2a 20 | 64 65 70 74 68 25 29 0d |- (c% * |depth%).|
|000008f0| 03 84 43 f2 69 6e 76 65 | 72 73 65 28 6c 78 25 20 |..C.inve|rse(lx% |
|00000900| 2b 20 31 20 2b 20 28 28 | 6c 6f 6e 67 65 73 74 25 |+ 1 + ((|longest%|
|00000910| 20 2b 20 31 29 20 2a 20 | 63 25 29 2c 72 25 20 2b | + 1) * |c%),r% +|
|00000920| 20 74 79 25 2b 31 2c 6c | 6f 6e 67 65 73 74 25 2c | ty%+1,l|ongest%,|
|00000930| 31 29 0d 03 8e 05 e1 0d | 03 98 05 3a 0d 03 a2 13 |1)......|...:....|
|00000940| dd f2 63 65 6e 74 72 65 | 28 74 65 78 74 24 29 0d |..centre|(text$).|
|00000950| 03 ac 1c ea 20 6c 65 6e | 2c 6d 6f 64 65 2c 78 63 |.... len|,mode,xc|
|00000960| 6f 6f 72 64 2c 79 63 6f | 6f 72 64 0d 03 b6 37 6c |oord,yco|ord...7l|
|00000970| 65 6e 3d a9 74 65 78 74 | 24 3a e7 20 6c 65 6e 3e |en=.text|$:. len>|
|00000980| 3d a4 6e 72 5f 63 6f 6c | 73 20 8c 20 f1 22 4d 65 |=.nr_col|s . ."Me|
|00000990| 73 73 61 67 65 20 74 6f | 6f 20 6c 6f 6e 67 21 22 |ssage to|o long!"|
|000009a0| 3a fa 0d 03 c0 21 f1 8a | 28 28 a4 6e 72 5f 63 6f |:....!..|((.nr_co|
|000009b0| 6c 73 2d 6c 65 6e 29 2f | 32 29 29 74 65 78 74 24 |ls-len)/|2))text$|
|000009c0| 3b 3a e1 0d 03 ca 05 3a | 0d 03 d4 1c dd f2 69 6e |;:.....:|......in|
|000009d0| 76 65 72 73 65 28 58 25 | 2c 59 25 2c 58 32 25 2c |verse(X%|,Y%,X2%,|
|000009e0| 59 32 25 29 0d 03 de 17 | ef 20 32 34 2c 30 3b 30 |Y2%)....|. 24,0;0|
|000009f0| 3b 31 32 37 39 3b 31 30 | 32 33 3b 0d 03 e8 11 ea |;1279;10|23;.....|
|00000a00| 20 41 25 2c 42 25 2c 43 | 25 2c 44 25 0d 03 f2 1d | A%,B%,C|%,D%....|
|00000a10| 41 25 3d 31 36 2a 58 25 | 2d 34 3a 43 25 3d 31 36 |A%=16*X%|-4:C%=16|
|00000a20| 2a 28 58 32 25 2b 58 25 | 29 0d 03 fc 11 42 25 3d |*(X2%+X%|)....B%=|
|00000a30| 31 30 32 34 2d 33 32 2a | 59 25 0d 04 06 17 44 25 |1024-32*|Y%....D%|
|00000a40| 3d 31 30 32 34 2d 33 32 | 2a 28 59 25 2b 59 32 25 |=1024-32|*(Y%+Y2%|
|00000a50| 29 0d 04 10 09 e6 20 33 | 2c 33 0d 04 1a 13 ec 20 |)..... 3|,3..... |
|00000a60| 41 25 2c 42 25 3a ec 20 | 43 25 2c 42 25 0d 04 24 |A%,B%:. |C%,B%..$|
|00000a70| 19 f0 20 38 35 2c 41 25 | 2c 44 25 3a f0 20 38 35 |.. 85,A%|,D%:. 85|
|00000a80| 2c 43 25 2c 44 25 0d 04 | 2e 13 ec 20 43 25 2c 42 |,C%,D%..|... C%,B|
|00000a90| 25 3a ec 20 41 25 2c 44 | 25 0d 04 38 0e f0 20 38 |%:. A%,D|%..8.. 8|
|00000aa0| 35 2c 43 25 2c 42 25 0d | 04 42 05 e1 0d 04 4c 05 |5,C%,B%.|.B....L.|
|00000ab0| 3a 0d 04 56 20 dd f2 64 | 61 74 61 5f 6c 61 62 65 |:..V ..d|ata_labe|
|00000ac0| 6c 5f 72 65 73 74 6f 72 | 65 28 6c 61 62 65 6c 24 |l_restor|e(label$|
|00000ad0| 29 0d 04 60 0d ea 20 73 | 74 72 69 6e 67 24 0d 04 |)..`.. s|tring$..|
|00000ae0| 6a 05 f7 0d 04 74 05 f5 | 0d 04 7e 0f 20 20 f3 20 |j....t..|..~. . |
|00000af0| 73 74 72 69 6e 67 24 0d | 04 88 14 fd 20 73 74 72 |string$.|.... str|
|00000b00| 69 6e 67 24 3d 6c 61 62 | 65 6c 24 0d 04 92 05 e1 |ing$=lab|el$.....|
|00000b10| 0d 04 9c 05 3a 0d 04 a6 | 12 dd f2 73 68 6f 77 5f |....:...|...show_|
|00000b20| 63 68 61 72 73 65 74 0d | 04 b0 0b ea 20 6c 6f 6f |charset.|.... loo|
|00000b30| 70 25 0d 04 ba 14 e3 20 | 6c 6f 6f 70 25 3d 33 32 |p%..... |loop%=32|
|00000b40| 20 b8 20 32 35 35 0d 04 | c4 2d 20 20 f1 20 a4 70 | . 255..|.- . .p|
|00000b50| 61 64 5f 6c 65 61 64 69 | 6e 67 28 c3 6c 6f 6f 70 |ad_leadi|ng(.loop|
|00000b60| 25 2c 22 20 22 2c 34 29 | 3b 22 20 22 3b bd 6c 6f |%," ",4)|;" ";.lo|
|00000b70| 6f 70 25 0d 04 ce 0e 20 | 20 f5 3a fd 20 a5 3d 33 |op%.... | .:. .=3|
|00000b80| 32 0d 04 d8 05 ed 0d 04 | e2 05 e1 0d 04 ec 05 3a |2.......|.......:|
|00000b90| 0d 04 f6 21 dd f2 6d 65 | 6d 5f 6d 6f 76 65 28 73 |...!..me|m_move(s|
|00000ba0| 6f 75 72 63 65 25 2c 64 | 65 73 74 25 2c 6e 72 25 |ource%,d|est%,nr%|
|00000bb0| 29 0d 05 00 0b ea 20 6c | 6f 6f 70 25 0d 05 0a 15 |)..... l|oop%....|
|00000bc0| e3 20 6c 6f 6f 70 25 3d | 30 20 b8 20 6e 72 25 2d |. loop%=|0 . nr%-|
|00000bd0| 31 0d 05 14 1f 20 20 64 | 65 73 74 25 3f 6c 6f 6f |1.... d|est%?loo|
|00000be0| 70 25 3d 73 6f 75 72 63 | 65 25 3f 6c 6f 6f 70 25 |p%=sourc|e%?loop%|
|00000bf0| 0d 05 1e 0b ed 20 6c 6f | 6f 70 25 0d 05 28 05 e1 |..... lo|op%..(..|
|00000c00| 0d 05 32 05 3a 0d 05 3c | 2e dd a4 6d 65 6d 5f 73 |..2.:..<|...mem_s|
|00000c10| 75 62 73 28 73 74 61 72 | 74 25 2c 6e 72 5f 62 79 |ubs(star|t%,nr_by|
|00000c20| 74 65 73 25 2c 74 61 72 | 67 65 74 25 2c 73 75 62 |tes%,tar|get%,sub|
|00000c30| 73 25 29 0d 05 46 0f ea | 20 6c 6f 6f 70 25 2c 6e |s%)..F..| loop%,n|
|00000c40| 72 25 0d 05 50 09 6e 72 | 25 3d 30 0d 05 5a 19 e3 |r%..P.nr|%=0..Z..|
|00000c50| 20 6c 6f 6f 70 25 3d 30 | 20 b8 20 6e 72 5f 62 79 | loop%=0| . nr_by|
|00000c60| 74 65 73 25 0d 05 64 38 | 20 20 e7 20 73 74 61 72 |tes%..d8| . star|
|00000c70| 74 25 3f 6c 6f 6f 70 25 | 3d 74 61 72 67 65 74 25 |t%?loop%|=target%|
|00000c80| 20 8c 20 73 74 61 72 74 | 25 3f 6c 6f 6f 70 25 3d | . start|%?loop%=|
|00000c90| 73 75 62 73 25 3a 6e 72 | 25 2b 3d 31 0d 05 6e 0b |subs%:nr|%+=1..n.|
|00000ca0| ed 20 6c 6f 6f 70 25 0d | 05 78 08 3d 6e 72 25 0d |. loop%.|.x.=nr%.|
|00000cb0| 05 82 05 3a 0d 05 8c 11 | dd f2 68 65 6c 70 5f 67 |...:....|..help_g|
|00000cc0| 65 6e 6c 69 62 0d 05 96 | 21 f1 22 20 31 29 2e 20 |enlib...|!." 1). |
|00000cd0| 44 45 46 50 52 4f 43 64 | 65 6c 61 79 28 73 65 63 |DEFPROCd|elay(sec|
|00000ce0| 6f 6e 64 73 29 22 0d 05 | a0 37 f1 22 20 20 20 20 |onds)"..|.7." |
|00000cf0| 20 20 20 77 61 69 74 73 | 20 66 6f 72 20 74 68 65 | waits| for the|
|00000d00| 20 73 70 65 63 69 66 69 | 65 64 20 6e 75 6d 62 65 | specifi|ed numbe|
|00000d10| 72 20 6f 66 20 73 65 63 | 6f 6e 64 73 22 0d 05 aa |r of sec|onds"...|
|00000d20| 25 f1 22 20 32 29 2e 20 | 44 45 46 50 52 4f 43 77 |%." 2). |DEFPROCw|
|00000d30| 61 69 74 5f 66 6f 72 5f | 6b 65 79 28 63 6f 64 65 |ait_for_|key(code|
|00000d40| 29 22 0d 05 b4 37 f1 22 | 20 20 20 20 20 20 20 77 |)"...7."| w|
|00000d50| 61 69 74 73 20 66 6f 72 | 20 74 68 65 20 73 70 65 |aits for| the spe|
|00000d60| 63 69 66 69 65 64 20 6b | 65 79 20 74 6f 20 62 65 |cified k|ey to be|
|00000d70| 20 70 72 65 73 73 65 64 | 22 0d 05 be 25 f1 22 20 | pressed|"...%." |
|00000d80| 33 29 2e 20 44 45 46 46 | 4e 77 6f 72 64 5f 61 6c |3). DEFF|Nword_al|
|00000d90| 69 67 6e 28 70 6f 69 6e | 74 65 72 25 29 22 0d 05 |ign(poin|ter%)"..|
|00000da0| c8 25 f1 22 20 34 29 2e | 20 44 45 46 46 4e 72 65 |.%." 4).| DEFFNre|
|00000db0| 61 64 5f 73 63 72 65 65 | 6e 73 74 61 72 74 28 42 |ad_scree|nstart(B|
|00000dc0| 25 29 22 0d 05 d2 3f f1 | 22 20 20 20 20 20 20 20 |%)"...?.|" |
|00000dd0| 72 65 74 75 72 6e 73 20 | 74 68 65 20 61 64 64 72 |returns |the addr|
|00000de0| 65 73 73 20 6f 66 20 74 | 68 65 20 73 74 61 72 74 |ess of t|he start|
|00000df0| 20 6f 66 20 73 63 72 65 | 65 6e 20 6d 65 6d 6f 72 | of scre|en memor|
|00000e00| 79 22 0d 05 dc 24 f1 22 | 20 35 29 2e 20 44 45 46 |y"...$."| 5). DEF|
|00000e10| 46 4e 72 65 61 64 5f 73 | 63 72 65 65 6e 73 69 7a |FNread_s|creensiz|
|00000e20| 65 28 42 25 29 22 0d 05 | e6 33 f1 22 20 20 20 20 |e(B%)"..|.3." |
|00000e30| 20 20 20 72 65 74 75 72 | 6e 73 20 74 68 65 20 73 | retur|ns the s|
|00000e40| 69 7a 65 20 6f 66 20 74 | 68 65 20 73 63 72 65 65 |ize of t|he scree|
|00000e50| 6e 20 6d 65 6d 6f 72 79 | 22 0d 05 f0 4a f1 22 20 |n memory|"...J." |
|00000e60| 36 29 2e 20 44 45 46 46 | 4e 6d 65 6e 75 28 6c 78 |6). DEFF|Nmenu(lx|
|00000e70| 25 2c 74 79 25 2c 6e 72 | 5f 69 74 65 6d 73 25 2c |%,ty%,nr|_items%,|
|00000e80| 64 65 70 74 68 25 2c 66 | 6f 72 65 63 6f 6c 25 2c |depth%,f|orecol%,|
|00000e90| 62 61 63 6b 63 6f 6c 25 | 2c 61 72 72 61 79 24 28 |backcol%|,array$(|
|00000ea0| 29 29 22 0d 05 fa 19 f1 | 22 20 37 29 2e 20 44 45 |))".....|" 7). DE|
|00000eb0| 46 50 52 4f 43 73 65 6c | 65 63 74 22 0d 06 04 20 |FPROCsel|ect"... |
|00000ec0| f1 22 20 38 29 2e 20 44 | 45 46 50 52 4f 43 63 65 |." 8). D|EFPROCce|
|00000ed0| 6e 74 72 65 28 74 65 78 | 74 24 29 22 0d 06 0e 29 |ntre(tex|t$)"...)|
|00000ee0| f1 22 20 39 29 2e 20 44 | 45 46 50 52 4f 43 69 6e |." 9). D|EFPROCin|
|00000ef0| 76 65 72 73 65 28 58 25 | 2c 59 25 2c 58 32 25 2c |verse(X%|,Y%,X2%,|
|00000f00| 59 32 25 29 22 0d 06 18 | 2d f1 22 31 30 29 2e 20 |Y2%)"...|-."10). |
|00000f10| 44 45 46 50 52 4f 43 64 | 61 74 61 5f 6c 61 62 65 |DEFPROCd|ata_labe|
|00000f20| 6c 5f 72 65 73 74 6f 72 | 65 28 6c 61 62 65 6c 24 |l_restor|e(label$|
|00000f30| 29 22 0d 06 22 1f f1 22 | 31 32 29 2e 20 44 45 46 |)"..".."|12). DEF|
|00000f40| 50 52 4f 43 73 68 6f 77 | 5f 63 68 61 72 73 65 74 |PROCshow|_charset|
|00000f50| 22 0d 06 2c 2e f1 22 31 | 32 29 2e 20 44 45 46 50 |"..,.."1|2). DEFP|
|00000f60| 52 4f 43 6d 65 6d 5f 6d | 6f 76 65 28 73 6f 75 72 |ROCmem_m|ove(sour|
|00000f70| 63 65 25 2c 64 65 73 74 | 25 2c 6e 72 25 29 22 0d |ce%,dest|%,nr%)".|
|00000f80| 06 36 46 f1 22 20 20 20 | 20 20 20 20 63 6f 70 69 |.6F." | copi|
|00000f90| 65 73 20 6e 72 25 20 62 | 79 74 65 73 20 6f 66 20 |es nr% b|ytes of |
|00000fa0| 6d 65 6d 6f 72 79 20 66 | 72 6f 6d 20 73 6f 75 72 |memory f|rom sour|
|00000fb0| 63 65 25 20 61 64 64 72 | 65 73 73 20 74 6f 20 64 |ce% addr|ess to d|
|00000fc0| 65 73 74 25 22 0d 06 40 | 15 f1 22 20 20 20 20 20 |est%"..@|.." |
|00000fd0| 20 20 61 64 64 72 65 73 | 73 22 0d 06 4a 39 f1 22 | addres|s"..J9."|
|00000fe0| 31 33 29 2e 20 44 45 46 | 46 4e 6d 65 6d 5f 73 75 |13). DEF|FNmem_su|
|00000ff0| 62 73 28 73 74 61 72 74 | 25 2c 6e 72 5f 62 79 74 |bs(start|%,nr_byt|
|00001000| 65 73 25 2c 74 61 72 67 | 65 74 25 2c 73 75 62 73 |es%,targ|et%,subs|
|00001010| 25 29 22 0d 06 54 41 f1 | 22 20 20 20 20 20 20 20 |%)"..TA.|" |
|00001020| 73 75 62 73 74 69 74 75 | 74 65 73 20 73 75 62 73 |substitu|tes subs|
|00001030| 25 20 66 6f 72 20 74 61 | 72 67 65 74 25 20 69 6e |% for ta|rget% in|
|00001040| 20 61 20 62 6c 6f 63 6b | 20 6f 66 20 6d 65 6d 6f | a block| of memo|
|00001050| 72 79 20 22 0d 06 5e 43 | f1 22 20 20 20 20 20 20 |ry "..^C|." |
|00001060| 20 6e 72 5f 62 79 74 65 | 73 25 20 6c 6f 6e 67 20 | nr_byte|s% long |
|00001070| 73 74 61 72 74 69 6e 67 | 20 61 74 20 73 74 61 72 |starting| at star|
|00001080| 74 25 2e 20 52 65 74 75 | 72 6e 73 20 74 68 65 20 |t%. Retu|rns the |
|00001090| 6e 75 6d 62 65 72 22 0d | 06 68 24 f1 22 20 20 20 |number".|.h$." |
|000010a0| 20 20 20 20 6f 66 20 73 | 75 62 73 74 69 74 75 74 | of s|ubstitut|
|000010b0| 69 6f 6e 73 20 6d 61 64 | 65 2e 22 0d 06 72 05 e1 |ions mad|e."..r..|
|000010c0| 0d ff | |.. | |
+--------+-------------------------+-------------------------+--------+--------+
