/ Liren Large Software Subsidy 5 / 05.iso / a / a046 / 5.img / TEMPLATE / SSB02.COD

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0b 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000070| 1a 1a 1a 1a 1a 1a 1a 1a | 1a 1a 1a 1a 1a 1a 1a 1a |........|........|
|00000080| 1e d7 48 15 01 00 00 1a | 00 04 04 00 1e 8f 00 1d |..H.....|........|
|00000090| 00 00 00 19 01 04 1d 00 | 19 00 04 04 00 16 01 1b |........|........|
|000000a0| 15 01 00 00 16 01 1f 17 | 03 01 00 16 05 00 16 05 |........|........|
|000000b0| 00 0d 1e b5 00 1d 00 03 | 00 15 01 00 00 1a 00 04 |........|........|
|000000c0| 09 00 15 03 00 00 1a 00 | 0c 08 00 19 00 04 05 00 |........|........|
|000000d0| 19 00 04 06 00 16 01 21 | 19 00 04 09 00 15 01 32 |.......!|.......2|
|000000e0| 00 16 01 20 16 03 1b 1f | ab 01 19 00 04 09 00 15 |... ....|........|
|000000f0| 01 01 00 16 01 10 1a 00 | 04 09 00 19 00 08 04 00 |........|........|
|00000100| 19 00 04 05 00 15 01 01 | 00 16 02 62 1a 00 08 07 |........|...b....|
|00000110| 00 19 00 08 07 00 15 02 | 01 00 20 16 02 20 19 00 |........|.. .. ..|
|00000120| 08 07 00 15 02 01 00 22 | 16 02 1e 16 03 19 1f 73 |......."|.......s|
|00000130| 01 19 00 0c 08 00 16 03 | 1c 1f 4e 01 15 02 01 00 |........|..N.....|
|00000140| 22 17 02 16 00 15 03 01 | 00 1a 00 0c 08 00 15 02 |".......|........|
|00000150| 05 00 2b 43 48 52 28 17 | 02 16 00 19 00 08 07 00 |..+CHR(.|........|
|00000160| 16 02 6f 17 01 16 00 15 | 02 01 00 29 17 02 16 00 |..o.....|...)....|
|00000170| 1e 97 01 19 00 0c 08 00 | 1f 8e 01 15 02 02 00 2b |........|.......+|
|00000180| 22 17 02 16 00 15 03 00 | 00 1a 00 0c 08 00 19 00 |".......|........|
|00000190| 08 07 00 17 02 16 00 19 | 00 04 05 00 15 01 01 00 |........|........|
|000001a0| 16 01 10 1a 00 04 05 00 | 1e cb 00 19 00 0c 08 00 |........|........|
|000001b0| 1f bd 01 15 02 02 00 2b | 22 17 02 16 00 19 00 04 |.......+|".......|
|000001c0| 05 00 17 01 01 00 16 05 | 00 16 05 00 1e cf 01 1d |........|........|
|000001d0| 00 03 00 19 00 08 06 00 | 16 02 73 1f 9e 02 15 01 |........|..s.....|
|000001e0| 01 00 1a 00 04 08 00 19 | 00 08 06 00 16 02 64 1a |........|......d.|
|000001f0| 00 04 09 00 19 00 04 05 | 00 1a 00 04 07 00 19 00 |........|........|
|00000200| 04 08 00 19 00 04 09 00 | 16 01 21 1f 9b 02 15 02 |........|..!.....|
|00000210| 02 00 40 20 17 02 16 00 | 19 00 04 04 00 15 01 02 |..@ ....|........|
|00000220| 00 16 02 67 17 02 16 00 | 15 02 01 00 2c 17 02 16 |...g....|....,...|
|00000230| 00 19 00 04 07 00 15 01 | 02 00 16 02 67 17 02 16 |........|....g...|
|00000240| 00 15 02 06 00 20 53 41 | 59 20 22 17 02 16 00 1b |..... SA|Y ".....|
|00000250| 01 1c b5 00 19 00 08 06 | 00 1a 00 1c 04 00 19 00 |........|........|
|00000260| 04 08 00 19 00 04 09 00 | 1b 06 00 b5 00 17 01 02 |........|........|
|00000270| 00 1a 00 04 08 00 15 02 | 01 00 22 17 02 17 00 19 |........|..".....|
|00000280| 00 04 05 00 19 00 04 08 | 00 16 01 10 15 01 01 00 |........|........|
|00000290| 16 01 11 1a 00 04 07 00 | 1e fe 01 1e f1 02 15 02 |........|........|
|000002a0| 02 00 40 20 17 02 16 00 | 19 00 04 04 00 15 01 02 |..@ ....|........|
|000002b0| 00 16 02 67 17 02 16 00 | 15 02 01 00 2c 17 02 16 |...g....|....,...|
|000002c0| 00 19 00 04 05 00 15 01 | 02 00 16 02 67 17 02 16 |........|....g...|
|000002d0| 00 15 02 06 00 20 53 41 | 59 20 22 17 02 16 00 19 |..... SA|Y ".....|
|000002e0| 00 08 06 00 17 02 16 00 | 15 02 01 00 22 17 02 17 |........|...."...|
|000002f0| 00 16 05 00 0d 1e f8 02 | 1d 00 00 00 19 00 08 05 |........|........|
|00000300| 00 19 00 08 04 00 16 02 | 3c 1f 36 03 19 00 08 04 |........|<.6.....|
|00000310| 00 19 00 08 05 00 19 00 | 08 04 00 16 02 63 19 00 |........|.....c..|
|00000320| 08 05 00 16 02 64 19 00 | 08 06 00 16 02 65 1a 00 |.....d..|.....e..|
|00000330| 08 04 00 1e fc 02 19 00 | 08 04 00 17 02 01 00 16 |........|........|
|00000340| 05 00 16 05 00 0d 1e 49 | 03 1d 00 00 00 18 03 41 |.......I|.......A|
|00000350| 18 02 01 15 02 01 00 4d | 16 02 1f 16 03 1b 1f c3 |.......M|........|
|00000360| 03 19 01 0c 13 00 1f 9c | 03 19 01 08 1c 00 18 02 |........|........|
|00000370| 01 16 02 10 18 02 10 15 | 01 0a 00 19 01 08 1c 00 |........|........|
|00000380| 18 02 01 16 02 10 16 02 | 64 16 01 11 16 02 75 16 |........|d.....u.|
|00000390| 02 10 17 02 01 00 16 05 | 00 1e c0 03 19 01 08 1c |........|........|
|000003a0| 00 18 02 10 15 01 0a 00 | 19 01 08 1c 00 16 02 64 |........|.......d|
|000003b0| 16 01 11 16 02 75 16 02 | 10 17 02 01 00 16 05 00 |.....u..|........|
|000003c0| 1e cd 03 18 02 10 17 02 | 01 00 16 05 00 16 05 00 |........|........|
|000003d0| 1e d3 03 1d 00 08 00 15 | 01 03 00 1a 00 04 06 00 |........|........|
|000003e0| 18 01 1f 1a 00 04 08 00 | 19 00 08 04 00 17 02 17 |........|........|
|000003f0| 00 15 01 03 00 16 02 69 | 17 02 16 00 15 01 00 00 |.......i|........|
|00000400| 1a 00 04 07 00 15 01 00 | 00 1a 00 04 05 00 15 01 |........|........|
|00000410| 01 00 1a 00 04 0a 00 17 | 04 07 00 15 01 00 00 1a |........|........|
|00000420| 00 04 0b 00 17 04 11 00 | 1a 00 04 0c 00 15 01 01 |........|........|
|00000430| 00 1c 00 04 0b 00 19 00 | 04 0b 00 19 00 04 0c 00 |........|........|
|00000440| 16 01 21 1f 3d 05 19 00 | 04 0b 00 17 04 06 00 15 |..!.=...|........|
|00000450| 01 01 00 1f 3a 05 19 00 | 04 07 00 15 01 01 00 16 |....:...|........|
|00000460| 01 10 1a 00 04 07 00 19 | 00 04 07 00 15 01 05 00 |........|........|
|00000470| 16 01 14 15 01 00 00 16 | 01 1e 19 00 04 07 00 19 |........|........|
|00000480| 00 04 08 00 16 01 1f 16 | 03 1b 1a 00 0c 09 00 1b |........|........|
|00000490| 01 14 49 03 17 02 02 00 | 17 02 16 00 19 00 04 07 |..I.....|........|
|000004a0| 00 19 00 04 08 00 16 01 | 1e 19 00 0c 09 00 19 00 |........|........|
|000004b0| 04 05 00 19 00 04 06 00 | 16 01 1e 16 03 1b 16 03 |........|........|
|000004c0| 19 16 03 1c 1f d0 04 15 | 02 01 00 2c 17 02 16 00 |........|...,....|
|000004d0| 19 00 0c 09 00 1f 31 05 | 19 00 04 05 00 15 01 01 |......1.|........|
|000004e0| 00 16 01 10 1a 00 04 05 | 00 19 00 04 05 00 19 00 |........|........|
|000004f0| 04 06 00 15 01 01 00 16 | 01 10 16 01 1e 1f 1d 05 |........|........|
|00000500| 15 01 00 00 1a 00 04 05 | 00 15 02 00 00 17 02 17 |........|........|
|00000510| 00 19 00 08 04 00 17 02 | 17 00 1e 26 05 15 02 01 |........|...&....|
|00000520| 00 3b 17 02 17 00 15 01 | 03 00 16 02 69 17 02 16 |.;......|....i...|
|00000530| 00 15 01 01 00 1c 00 04 | 0a 00 1e 2d 04 17 04 06 |........|...-....|
|00000540| 00 15 02 00 00 17 02 17 | 00 16 05 00 0d 1e 50 05 |........|......P.|
|00000550| 1d 00 00 00 18 01 44 17 | 01 21 00 18 01 44 19 00 |......D.|.!...D..|
|00000560| 04 04 00 15 01 03 00 16 | 01 12 16 01 10 15 01 44 |........|.......D|
|00000570| 00 17 01 18 00 16 05 00 | 1e 7b 05 1d 00 01 00 17 |........|.{......|
|00000580| 01 22 00 1a 00 04 04 00 | 19 00 04 04 00 15 01 44 |."......|.......D|
|00000590| 00 17 01 18 00 16 05 00 | 1e 9b 05 1d 00 00 00 19 |........|........|
|000005a0| 00 08 04 00 17 02 13 00 | 1a 01 08 05 00 1a 01 08 |........|........|
|000005b0| 06 00 1a 01 08 07 00 15 | 02 0c 00 2a 20 b3 cc d0 |........|...* ...|
|000005c0| f2 c3 fb 2e 2e 3a 20 17 | 02 16 00 19 01 08 06 00 |.....: .|........|
|000005d0| 17 02 16 00 15 02 01 00 | 2e 17 02 16 00 19 01 08 |........|........|
|000005e0| 07 00 17 02 17 00 15 02 | 0c 00 2a 20 c8 d5 20 20 |........|..* ..  |
|000005f0| c6 da 2e 2e 3a 20 17 02 | 16 00 18 02 3a 17 02 17 |....: ..|....:...|
|00000600| 00 15 02 26 00 2a 20 d7 | a2 20 20 ca cd 2e 2e 3a |...&.* .|.  ....:|
|00000610| 20 d3 c9 20 53 53 42 4d | 49 53 20 cf b5 cd b3 c9 | .. SSBM|IS .....|
|00000620| fa b3 c9 c4 bf b1 ea cf | b5 cd b3 17 02 17 00 15 |........|........|
|00000630| 02 0c 00 2a 20 bb b7 20 | 20 be b3 2e 2e 3a 20 17 |...* .. | ....: .|
|00000640| 02 16 00 15 02 23 00 d4 | da ba ba bb af 20 46 6f |.....#..|..... Fo|
|00000650| 78 42 41 53 45 2b 2c 20 | 72 65 76 69 73 69 6f 6e |xBASE+, |revision|
|00000660| 20 32 2e 31 30 20 d4 cb | d0 d0 17 02 17 00 15 02 | 2.10 ..|........|
|00000670| 01 00 2a 17 02 17 00 16 | 05 00 1e 7d 06 1d 00 00 |..*.....|...}....|
|00000680| 00 19 00 08 04 00 17 02 | 13 00 1a 01 08 05 00 1a |........|........|
|00000690| 01 08 06 00 1a 01 08 07 | 00 19 01 08 07 00 15 02 |........|........|
|000006a0| 03 00 50 52 47 16 02 1e | 1f bc 06 15 02 06 00 52 |..PRG...|.......R|
|000006b0| 45 54 55 52 4e 17 02 17 | 00 1e c5 06 15 02 01 00 |ETURN...|........|
|000006c0| 2a 17 02 17 00 15 02 07 | 00 2a 20 45 4f 46 3a 20 |*.......|.* EOF: |
|000006d0| 17 02 16 00 19 01 08 06 | 00 17 02 16 00 15 02 01 |........|........|
|000006e0| 00 2e 17 02 16 00 19 01 | 08 07 00 17 02 17 00 16 |........|........|
|000006f0| 05 00 1e f5 06 1d 00 00 | 00 19 00 08 04 00 16 02 |........|........|
|00000700| 5b 15 01 00 00 16 01 1e | 1f 37 07 1b 01 1c 9b 05 |[.......|.7......|
|00000710| 19 00 08 04 00 1a 00 1c | 04 00 19 00 08 05 00 1a |........|........|
|00000720| 00 1c 05 00 1b 05 00 9b | 05 15 03 01 00 17 03 01 |........|........|
|00000730| 00 16 05 00 1e 42 07 15 | 03 00 00 17 03 01 00 16 |.....B..|........|
|00000740| 05 00 16 05 00 1e 48 07 | 1d 00 00 00 19 00 08 04 |......H.|........|
|00000750| 00 16 02 5b 15 01 00 00 | 16 01 1e 1f 6c 07 15 03 |...[....|....l...|
|00000760| 01 00 17 03 01 00 16 05 | 00 1e 77 07 15 03 00 00 |........|..w.....|
|00000770| 17 03 01 00 16 05 00 16 | 05 00 0d 1e 7e 07 1d 00 |........|....~...|
|00000780| 00 00 19 00 04 04 00 15 | 01 03 00 16 01 12 16 02 |........|........|
|00000790| 69 17 02 16 00 15 02 0d | 00 53 45 54 20 43 4f 4c |i.......|.SET COL|
|000007a0| 4f 52 20 54 4f 20 17 02 | 16 00 19 00 08 05 00 15 |OR TO ..|........|
|000007b0| 02 06 00 53 43 52 45 45 | 4e 16 02 1e 1f d4 07 15 |...SCREE|N.......|
|000007c0| 02 0a 00 26 53 63 72 65 | 65 6e 41 74 72 17 02 17 |...&Scre|enAtr...|
|000007d0| 00 1e 84 08 19 00 08 05 | 00 15 02 06 00 53 54 41 |........|.....STA|
|000007e0| 54 55 53 16 02 1e 1f fe | 07 15 02 0a 00 26 53 74 |TUS.....|.....&St|
|000007f0| 61 74 75 73 41 74 72 17 | 02 17 00 1e d1 07 19 00 |atusAtr.|........|
|00000800| 08 05 00 15 02 06 00 57 | 49 4e 44 4f 57 16 02 1e |.......W|INDOW...|
|00000810| 1f 28 08 15 02 0a 00 26 | 57 69 6e 64 6f 77 41 74 |.(.....&|WindowAt|
|00000820| 72 17 02 17 00 1e d1 07 | 19 00 08 05 00 15 02 06 |r.......|........|
|00000830| 00 50 52 4f 4d 50 54 16 | 02 1e 1f 52 08 15 02 0a |.PROMPT.|...R....|
|00000840| 00 26 50 72 6f 6d 70 74 | 41 74 72 17 02 17 00 1e |.&Prompt|Atr.....|
|00000850| d1 07 19 00 08 05 00 15 | 02 06 00 48 49 4c 49 54 |........|...HILIT|
|00000860| 45 16 02 1e 1f 7c 08 15 | 02 0a 00 26 48 69 6c 69 |E....|..|...&Hili|
|00000870| 74 65 41 74 72 17 02 17 | 00 1e d1 07 15 02 00 00 |teAtr...|........|
|00000880| 17 02 17 00 16 05 00 0d | 0d 1e 8c 08 1d 00 00 00 |........|........|
|00000890| 18 02 2e 17 02 13 00 1a | 01 08 05 00 1a 01 08 06 |........|........|
|000008a0| 00 1a 01 08 07 00 44 42 | 46 6e 61 6d 65 20 3d 20 |......DB|Fname = |
|000008b0| 22 19 01 08 06 00 17 02 | 03 00 2e 04 13 22 0d 19 |".......|....."..|
|000008c0| 01 08 06 00 15 01 01 00 | 15 01 07 00 16 02 62 1a |........|......b.|
|000008d0| 01 08 06 00 44 42 46 74 | 65 6d 70 20 3d 20 22 19 |....DBFt|emp = ".|
|000008e0| 01 08 06 00 17 02 03 00 | 24 2e 04 13 22 0d 16 05 |........|$..."...|
|000008f0| 00 1e f4 08 1d 00 00 00 | 15 02 03 00 49 44 58 17 |........|....IDX.|
|00000900| 02 01 00 16 05 00 16 05 | 00 1e 0c 09 1d 00 03 00 |........|........|
|00000910| 15 01 01 00 1a 00 04 04 | 00 17 0a 07 00 15 01 00 |........|........|
|00000920| 00 1a 00 04 05 00 15 01 | 0a 00 1a 00 04 06 00 15 |........|........|
|00000930| 01 01 00 1c 00 04 05 00 | 19 00 04 05 00 19 00 04 |........|........|
|00000940| 06 00 16 01 21 1f bc 09 | 19 00 04 05 00 17 0a 06 |....!...|........|
|00000950| 00 17 0a 08 00 1f b9 09 | 18 02 34 17 02 13 00 1a |........|..4.....|
|00000960| 01 08 05 00 1a 01 08 06 | 00 1a 01 08 07 00 1b 01 |........|........|
|00000970| 14 f4 08 17 02 02 00 1a | 01 08 07 00 4e 44 58 6e |........|....NDXn|
|00000980| 61 6d 05 01 32 20 3d 20 | 22 19 01 08 06 00 17 02 |am..2 = |".......|
|00000990| 03 00 2e 19 01 08 07 00 | 17 02 03 00 22 0d 4e 44 |........|....".ND|
|000009a0| 58 6b 65 79 05 01 32 20 | 3d 20 22 05 02 35 22 0d |Xkey..2 |= "..5".|
|000009b0| 15 01 01 00 1c 00 04 04 | 00 1e 2f 09 17 0a 06 00 |........|../.....|
|000009c0| 16 05 00 1e c6 09 1d 00 | 04 00 15 02 07 00 26 4e |........|......&N|
|000009d0| 44 58 6e 61 6d 19 00 04 | 04 00 16 02 66 16 02 10 |DXnam...|....f...|
|000009e0| 1a 00 08 05 00 15 01 01 | 00 1a 00 04 06 00 17 0a |........|........|
|000009f0| 07 00 15 01 00 00 1a 00 | 04 07 00 15 01 0a 00 1a |........|........|
|00000a00| 00 04 08 00 15 01 01 00 | 1c 00 04 07 00 19 00 04 |........|........|
|00000a10| 07 00 19 00 04 08 00 16 | 01 21 1f 69 0a 19 00 04 |........|.!.i....|
|00000a20| 07 00 17 0a 06 00 17 0a | 08 00 1f 66 0a 18 01 32 |........|...f...2|
|00000a30| 19 00 04 04 00 16 01 1f | 1f 5d 0a 19 00 08 05 00 |........|.]......|
|00000a40| 15 02 08 00 2c 26 4e 44 | 58 6e 61 6d 16 02 10 18 |....,&ND|Xnam....|
|00000a50| 01 32 16 02 66 16 02 10 | 1a 00 08 05 00 15 01 01 |.2..f...|........|
|00000a60| 00 1c 00 04 06 00 1e 04 | 0a 17 0a 06 00 19 00 08 |........|........|
|00000a70| 05 00 17 02 01 00 16 05 | 00 16 05 00 1e 7f 0a 1d |........|........|
|00000a80| 00 04 00 19 00 04 04 00 | 17 0a 06 00 18 02 34 17 |........|......4.|
|00000a90| 02 13 00 1a 01 08 05 00 | 1a 01 08 06 00 1a 01 08 |........|........|
|00000aa0| 07 00 19 01 08 06 00 15 | 02 01 00 2e 16 02 10 1b |........|........|
|00000ab0| 01 14 f4 08 17 02 02 00 | 16 02 10 1a 00 08 05 00 |........|........|
|00000ac0| 15 01 01 00 1a 00 04 06 | 00 17 0a 07 00 15 01 00 |........|........|
|00000ad0| 00 1a 00 04 07 00 15 01 | 0a 00 1a 00 04 08 00 15 |........|........|
|00000ae0| 01 01 00 1c 00 04 07 00 | 19 00 04 07 00 19 00 04 |........|........|
|00000af0| 08 00 16 01 21 1f 66 0b | 19 00 04 07 00 17 0a 06 |....!.f.|........|
|00000b00| 00 17 0a 08 00 1f 63 0b | 18 01 32 19 00 04 04 00 |......c.|..2.....|
|00000b10| 16 01 1f 1f 5a 0b 18 02 | 34 17 02 13 00 1a 01 08 |....Z...|4.......|
|00000b20| 05 00 1a 01 08 06 00 1a | 01 08 07 00 19 00 08 05 |........|........|
|00000b30| 00 15 02 01 00 2c 16 02 | 10 19 01 08 06 00 16 02 |.....,..|........|
|00000b40| 10 15 02 01 00 2e 16 02 | 10 1b 01 14 f4 08 17 02 |........|........|
|00000b50| 02 00 16 02 10 1a 00 08 | 05 00 15 01 01 00 1c 00 |........|........|
|00000b60| 04 06 00 1e df 0a 17 0a | 06 00 19 00 08 05 00 17 |........|........|
|00000b70| 02 01 00 16 05 00 16 05 | 00 0d 0d 1e 7e 0b 1d 00 |........|....~...|
|00000b80| 03 00 15 01 00 00 17 04 | 06 00 17 00 09 00 15 01 |........|........|
|00000b90| 00 00 1a 00 04 06 00 17 | 04 07 00 15 01 00 00 1a |........|........|
|00000ba0| 00 04 07 00 17 04 11 00 | 1a 00 04 08 00 15 01 01 |........|........|
|00000bb0| 00 1c 00 04 07 00 19 00 | 04 07 00 19 00 04 08 00 |........|........|
|00000bc0| 16 01 21 1f 06 0c 19 00 | 04 07 00 17 04 06 00 18 |..!.....|........|
|00000bd0| 02 11 19 00 08 04 00 16 | 02 1e 18 02 01 15 02 01 |........|........|
|00000be0| 00 4d 16 02 1e 16 03 1b | 18 03 06 16 03 1b 1f 03 |.M......|........|
|00000bf0| 0c 15 01 01 00 1c 00 04 | 06 00 19 00 04 06 00 17 |........|........|
|00000c00| 00 0a 00 1e ad 0b 17 04 | 06 00 17 00 0b 00 18 01 |........|........|
|00000c10| 1f 15 01 00 00 16 01 22 | 1f 2f 0c 1b 01 1c d3 03 |......."|./......|
|00000c20| 19 00 08 05 00 1a 00 1c | 04 00 1b 04 00 d3 03 16 |........|........|
|00000c30| 05 00 1e 35 0c 1d 00 03 | 00 15 01 00 00 17 04 06 |...5....|........|
|00000c40| 00 17 00 09 00 15 01 00 | 00 1a 00 04 06 00 17 04 |........|........|
|00000c50| 07 00 15 01 00 00 1a 00 | 04 07 00 17 04 11 00 1a |........|........|
|00000c60| 00 04 08 00 15 01 01 00 | 1c 00 04 07 00 19 00 04 |........|........|
|00000c70| 07 00 19 00 04 08 00 16 | 01 21 1f bd 0c 19 00 04 |........|.!......|
|00000c80| 07 00 17 04 06 00 18 02 | 11 19 00 08 04 00 16 02 |........|........|
|00000c90| 1e 18 02 01 15 02 01 00 | 4d 16 02 1f 16 03 1b 18 |........|M.......|
|00000ca0| 03 06 16 03 1b 1f ba 0c | 15 01 01 00 1c 00 04 06 |........|........|
|00000cb0| 00 19 00 04 06 00 17 00 | 0a 00 1e 64 0c 17 04 06 |........|...d....|
|00000cc0| 00 17 00 0b 00 18 01 1f | 15 01 00 00 16 01 22 1f |........|......".|
|00000cd0| e6 0c 1b 01 1c d3 03 19 | 00 08 05 00 1a 00 1c 04 |........|........|
|00000ce0| 00 1b 04 00 d3 03 16 05 | 00 1e ec 0c 1d 00 06 00 |........|........|
|00000cf0| 15 01 00 00 17 00 06 00 | 17 00 09 00 15 01 00 00 |........|........|
|00000d00| 1a 00 04 05 00 17 04 07 | 00 15 01 00 00 1a 00 04 |........|........|
|00000d10| 06 00 17 04 11 00 1a 00 | 04 07 00 15 01 01 00 1c |........|........|
|00000d20| 00 04 06 00 19 00 04 06 | 00 19 00 04 07 00 16 01 |........|........|
|00000d30| 21 1f 77 0d 19 00 04 06 | 00 17 04 06 00 18 02 11 |!.w.....|........|
|00000d40| 15 02 04 00 43 44 4c 4e | 16 02 3c 18 02 01 15 02 |....CDLN|..<.....|
|00000d50| 01 00 4d 16 02 1f 16 03 | 1b 18 03 06 16 03 1b 1f |..M.....|........|
|00000d60| 74 0d 15 01 01 00 1c 00 | 04 05 00 19 00 04 05 00 |t.......|........|
|00000d70| 17 00 0a 00 1e 1b 0d 17 | 04 06 00 17 00 0b 00 18 |........|........|
|00000d80| 01 1f 15 01 80 00 16 01 | 22 1f d4 0f 15 02 24 00 |........|".....$.|
|00000d90| 2a 20 2d 2d 2d 44 65 63 | 6c 61 72 65 20 66 69 65 |* ---Dec|lare fie|
|00000da0| 6c 64 20 6d 65 6d 6f 72 | 79 20 76 61 72 69 61 62 |ld memor|y variab|
|00000db0| 6c 65 73 2e 17 02 17 00 | 15 02 07 00 44 4f 20 43 |les.....|....DO C|
|00000dc0| 41 53 45 17 02 17 00 15 | 01 01 00 1a 00 04 08 00 |ASE.....|........|
|00000dd0| 17 09 07 00 15 01 00 00 | 1a 00 04 09 00 15 01 0a |........|........|
|00000de0| 00 1a 00 04 0a 00 15 01 | 01 00 1c 00 04 09 00 19 |........|........|
|00000df0| 00 04 09 00 19 00 04 0a | 00 16 01 21 1f c1 0f 19 |........|...!....|
|00000e00| 00 04 09 00 17 09 06 00 | 17 09 08 00 1f be 0f 18 |........|........|
|00000e10| 02 2e 17 02 13 00 1a 01 | 08 05 00 1a 01 08 06 00 |........|........|
|00000e20| 1a 01 08 07 00 15 02 10 | 00 43 41 53 45 20 64 62 |........|.CASE db|
|00000e30| 66 61 72 65 61 20 3d 20 | 22 17 02 16 00 18 01 2c |farea = |"......,|
|00000e40| 17 01 16 00 15 02 01 00 | 22 17 02 17 00 1b 01 1c |........|".......|
|00000e50| 50 05 15 01 01 00 1b 04 | 00 50 05 15 02 0b 00 2a |P.......|.P.....*|
|00000e60| 20 2d 2d 2d 55 73 69 6e | 67 20 17 02 16 00 19 01 | ---Usin|g ......|
|00000e70| 08 06 00 17 02 16 00 15 | 02 01 00 2e 17 02 16 00 |........|........|
|00000e80| 19 01 08 07 00 17 02 17 | 00 18 01 1f 15 01 00 00 |........|........|
|00000e90| 16 01 22 1f 97 0f 19 00 | 04 04 00 15 01 00 00 16 |..".....|........|
|00000ea0| 01 1e 1f 79 0f 1b 01 1c | d3 03 15 02 08 00 50 52 |...y....|......PR|
|00000eb0| 49 56 41 54 45 3b 1a 00 | 1c 04 00 1b 04 00 d3 03 |IVATE;..|........|
|00000ec0| 1b 01 1c 35 0c 15 02 01 | 00 43 1a 00 1c 04 00 15 |...5....|.C......|
|00000ed0| 02 0d 00 53 54 4f 52 45 | 20 22 20 22 20 54 4f 3b |...STORE| " " TO;|
|00000ee0| 1a 00 1c 05 00 1b 05 00 | 35 0c 1b 01 1c 35 0c 15 |........|5....5..|
|00000ef0| 02 01 00 4e 1a 00 1c 04 | 00 15 02 0e 00 53 54 4f |...N....|.....STO|
|00000f00| 52 45 20 30 2e 30 30 20 | 54 4f 3b 1a 00 1c 05 00 |RE 0.00 |TO;.....|
|00000f10| 1b 05 00 35 0c 1b 01 1c | 35 0c 15 02 01 00 4c 1a |...5....|5.....L.|
|00000f20| 00 1c 04 00 15 02 0d 00 | 53 54 4f 52 45 20 2e 46 |........|STORE .F|
|00000f30| 2e 20 54 4f 3b 1a 00 1c | 05 00 1b 05 00 35 0c 1b |. TO;...|.....5..|
|00000f40| 01 1c 35 0c 15 02 01 00 | 44 1a 00 1c 04 00 15 02 |..5.....|D.......|
|00000f50| 1a 00 53 54 4f 52 45 20 | 43 54 4f 44 28 22 20 20 |..STORE |CTOD("  |
|00000f60| 2f 20 20 2f 20 20 22 29 | 20 54 4f 3b 1a 00 1c 05 |/  /  ")| TO;....|
|00000f70| 00 1b 05 00 35 0c 1e 94 | 0f 1b 01 1c d3 03 15 02 |....5...|........|
|00000f80| 08 00 52 45 4c 45 41 53 | 45 3b 1a 00 1c 04 00 1b |..RELEAS|E;......|
|00000f90| 04 00 d3 03 1e b0 0f 15 | 02 11 00 2a 20 2d 2d 2d |........|...* ---|
|00000fa0| 3c 4e 6f 20 66 69 65 6c | 64 73 3e 2e 17 02 17 00 |<No fiel|ds>.....|
|00000fb0| 1b 01 14 7b 05 15 01 01 | 00 1c 00 04 08 00 1e e6 |...{....|........|
|00000fc0| 0d 17 09 06 00 15 02 07 | 00 45 4e 44 43 41 53 45 |........|.ENDCASE|
|00000fd0| 17 02 17 00 16 05 00 0d | 0d 1e dc 0f 1d 00 00 00 |........|........|
|00000fe0| 04 06 20 53 61 79 4c 69 | 6e 65 20 03 3f 20 72 6f |.. SayLi|ne .? ro|
|00000ff0| 77 2c 22 50 52 49 4e 54 | 3a 20 20 7b 4c 7d 61 62 |w,"PRINT|:  {L}ab|
|00001000| 65 6c 20 20 7b 52 7d 65 | 63 6f 72 64 20 20 3c 52 |el  {R}e|cord  <R|
|00001010| 65 74 75 72 6e 3e 20 22 | 0d 04 06 20 47 65 74 4b |eturn> "|... GetK|
|00001020| 65 79 20 03 3f 20 63 68 | 6f 69 63 65 2c 22 4c 52 |ey .? ch|oice,"LR|
|00001030| 22 2b 52 65 74 75 72 6e | 6b 65 79 0d 04 06 20 03 |"+Return|key... .|
|00001040| 65 0d 03 65 20 63 68 6f | 69 63 65 20 3d 20 22 4c |e..e cho|ice = "L|
|00001050| 22 0d 01 03 04 06 20 19 | 01 08 0a 00 17 02 03 00 |"..... .|........|
|00001060| 30 2e 4c 41 42 20 03 3f | 20 72 6f 77 0d 03 65 20 |0.LAB .?| row..e |
|00001070| 63 68 6f 69 63 65 20 3d | 20 22 52 22 0d 01 03 04 |choice =| "R"....|
|00001080| 06 20 19 01 08 0a 00 17 | 02 03 00 30 2e 52 50 54 |. ......|...0.RPT|
|00001090| 20 03 3f 20 72 6f 77 0d | 03 91 0d 16 05 00 0d 0d | .? row.|........|
|000010a0| 1e a3 10 1d 00 0b 00 15 | 01 01 00 1a 00 04 06 00 |........|........|
|000010b0| 17 0c 07 00 15 01 00 00 | 1a 00 04 07 00 17 0c 11 |........|........|
|000010c0| 00 1a 00 04 08 00 15 01 | 01 00 1c 00 04 07 00 19 |........|........|
|000010d0| 00 04 07 00 19 00 04 08 | 00 16 01 21 1f 2d 11 19 |........|...!.-..|
|000010e0| 00 04 07 00 17 0c 06 00 | 15 01 01 00 1f 2a 11 19 |........|.....*..|
|000010f0| 00 04 06 00 15 01 10 00 | 16 01 21 1f 21 11 19 00 |........|..!.!...|
|00001100| 08 04 00 15 02 01 00 20 | 16 02 10 18 01 20 16 02 |....... |..... ..|
|00001110| 66 16 02 10 15 02 01 00 | 20 16 02 10 1a 00 08 04 |f.......| .......|
|00001120| 00 15 01 01 00 1c 00 04 | 06 00 1e c6 10 17 0c 06 |........|........|
|00001130| 00 70 61 67 65 63 68 6f | 69 63 65 20 3d 20 70 61 |.pagecho|ice = pa|
|00001140| 67 65 6e 6f 20 2b 20 31 | 0d 1b 01 1c 7e 07 15 01 |geno + 1|....~...|
|00001150| 00 00 15 02 06 00 50 52 | 4f 4d 50 54 1a 00 1c 05 |......PR|OMPT....|
|00001160| 00 1b 05 00 7e 07 40 20 | 72 6f 77 2c 20 30 20 03 |....~.@ |row, 0 .|
|00001170| 48 0d 40 20 72 6f 77 2c | 20 30 20 04 20 20 22 50 |H.@ row,| 0 .  "P|
|00001180| 41 47 45 3a 01 03 46 6f | 72 77 61 72 64 01 02 28 |AGE:..Fo|rward..(|
|00001190| 19 00 08 04 00 17 02 03 | 00 29 01 02 3c 52 65 74 |........|.)..<Ret|
|000011a0| 75 72 6e 3e 22 0d 40 20 | 72 6f 77 2c 20 38 20 50 |urn>".@ |row, 8 P|
|000011b0| 52 4f 4d 50 54 20 22 46 | 6f 72 77 61 72 64 22 0d |ROMPT "F|orward".|
|000011c0| 15 01 12 00 1a 00 04 05 | 00 15 01 01 00 1a 00 04 |........|........|
|000011d0| 09 00 17 0c 07 00 15 01 | 00 00 1a 00 04 0a 00 17 |........|........|
|000011e0| 0c 11 00 1a 00 04 0b 00 | 15 01 01 00 1c 00 04 0a |........|........|
|000011f0| 00 19 00 04 0a 00 19 00 | 04 0b 00 16 01 21 1f 77 |........|.....!.w|
|00001200| 12 19 00 04 0a 00 17 0c | 06 00 15 01 01 00 1f 74 |........|.......t|
|00001210| 12 19 00 04 09 00 15 01 | 10 00 16 01 21 1f 6b 12 |........|....!.k.|
|00001220| 15 02 06 00 40 20 72 6f | 77 2c 17 02 16 00 19 00 |....@ ro|w,......|
|00001230| 04 05 00 17 01 16 00 15 | 02 0a 00 20 50 52 4f 4d |........|... PROM|
|00001240| 50 54 20 22 20 17 02 16 | 00 18 01 20 17 01 16 00 |PT " ...|... ....|
|00001250| 15 02 02 00 20 22 17 02 | 17 00 19 00 04 05 00 15 |.... "..|........|
|00001260| 01 03 00 16 01 10 1a 00 | 04 05 00 15 01 01 00 1c |........|........|
|00001270| 00 04 09 00 1e e8 11 17 | 0c 06 00 19 00 04 05 00 |........|........|
|00001280| 15 01 03 00 16 01 10 1a | 00 04 05 00 40 20 72 6f |........|....@ ro|
|00001290| 77 2c 19 00 04 05 00 17 | 01 03 00 20 04 20 20 22 |w,......|... .  "|
|000012a0| 3c 52 65 74 75 72 6e 3e | 22 0d 19 00 04 05 00 15 |<Return>|".......|
|000012b0| 01 01 00 16 01 10 1a 00 | 04 05 00 40 20 72 6f 77 |........|...@ row|
|000012c0| 2c 19 00 04 05 00 17 01 | 03 00 20 50 52 4f 4d 50 |,.......|.. PROMP|
|000012d0| 54 20 22 52 65 74 75 72 | 6e 22 0d 4d 45 4e 55 20 |T "Retur|n".MENU |
|000012e0| 04 09 20 70 61 67 65 63 | 68 6f 69 63 65 0d 15 02 |.. pagec|hoice...|
|000012f0| 00 00 1a 00 08 04 00 15 | 01 01 00 1a 00 04 0c 00 |........|........|
|00001300| 17 0c 07 00 15 01 00 00 | 1a 00 04 0d 00 17 0c 11 |........|........|
|00001310| 00 1a 00 04 0e 00 15 01 | 01 00 1c 00 04 0d 00 19 |........|........|
|00001320| 00 04 0d 00 19 00 04 0e | 00 16 01 21 1f 6a 13 19 |........|...!.j..|
|00001330| 00 04 0d 00 17 0c 06 00 | 15 01 01 00 1f 67 13 18 |........|.....g..|
|00001340| 01 20 15 01 10 00 16 01 | 21 1f 5e 13 19 00 08 04 |. ......|!.^.....|
|00001350| 00 15 02 01 00 53 16 02 | 10 1a 00 08 04 00 15 01 |.....S..|........|
|00001360| 01 00 1c 00 04 0c 00 1e | 16 13 17 0c 06 00 63 68 |........|......ch|
|00001370| 6f 69 63 65 20 3d 20 03 | 14 28 20 52 65 74 75 72 |oice = .|.( Retur|
|00001380| 6e 6b 65 79 2b 50 67 44 | 6e 2b 22 19 00 08 04 00 |nkey+PgD|n+".....|
|00001390| 17 02 03 00 22 2b 52 65 | 74 75 72 6e 6b 65 79 2c |...."+Re|turnkey,|
|000013a0| 70 61 67 65 63 68 6f 69 | 63 65 2b 31 2c 31 20 29 |pagechoi|ce+1,1 )|
|000013b0| 0d 16 05 00 0d 0d 1e b9 | 13 1d 00 00 00 1b 01 14 |........|........|
|000013c0| a3 10 6c 61 73 74 70 61 | 67 65 20 3d 20 70 61 67 |..lastpa|ge = pag|
|000013d0| 65 6e 6f 0d 04 06 20 03 | 65 0d 03 65 20 63 68 6f |eno... .|e..e cho|
|000013e0| 69 63 65 20 3d 20 50 67 | 44 6e 0d 01 03 04 06 20 |ice = Pg|Dn..... |
|000013f0| 50 61 67 65 20 03 3f 20 | 70 61 67 65 6e 6f 2c 31 |Page .? |pageno,1|
|00001400| 2c 50 61 67 65 4d 61 78 | 0d 03 65 20 63 68 6f 69 |,PageMax|..e choi|
|00001410| 63 65 20 3d 20 22 53 22 | 0d 01 03 70 61 67 65 6e |ce = "S"|...pagen|
|00001420| 6f 20 3d 20 70 61 67 65 | 63 68 6f 69 63 65 20 2d |o = page|choice -|
|00001430| 20 31 0d 03 91 0d 04 19 | 20 70 61 67 65 6e 6f 20 | 1......| pageno |
|00001440| 3c 3e 20 6c 61 73 74 70 | 61 67 65 0d 01 03 04 06 |<> lastp|age.....|
|00001450| 20 19 01 08 0a 00 17 02 | 03 00 30 2e 04 18 0d 01 | .......|..0.....|
|00001460| 03 04 06 20 53 61 79 52 | 65 63 0d 03 8b 0d 16 05 |... SayR|ec......|
|00001470| 00 0d 0d 1e 76 14 1d 00 | 08 00 15 01 00 00 1a 00 |....v...|........|
|00001480| 04 04 00 15 01 00 00 17 | 00 06 00 15 01 01 00 1a |........|........|
|00001490| 00 04 09 00 17 04 07 00 | 15 01 00 00 1a 00 04 0a |........|........|
|000014a0| 00 17 04 11 00 1a 00 04 | 0b 00 15 01 01 00 1c 00 |........|........|
|000014b0| 04 0a 00 19 00 04 0a 00 | 19 00 04 0b 00 16 01 21 |........|.......!|
|000014c0| 1f 24 16 19 00 04 0a 00 | 17 04 06 00 15 01 01 00 |.$......|........|
|000014d0| 1f 21 16 18 02 0d 16 02 | 64 1a 00 04 07 00 18 02 |.!......|d.......|
|000014e0| 11 15 02 01 00 42 16 02 | 1e 1f 04 15 18 01 02 18 |.....B..|........|
|000014f0| 01 0f 16 01 10 15 01 01 | 00 16 01 11 1a 00 04 05 |........|........|
|00001500| 00 1e fe 15 18 02 11 15 | 02 01 00 54 16 02 1e 1f |........|...T....|
|00001510| 40 15 18 03 08 16 03 1c | 1f 35 15 18 01 02 19 00 |@.......|.5......|
|00001520| 04 07 00 16 01 10 15 01 | 01 00 16 01 11 1a 00 04 |........|........|
|00001530| 05 00 1e 3d 15 18 01 02 | 1a 00 04 05 00 1e 01 15 |...=....|........|
|00001540| 18 01 02 1a 00 04 05 00 | 18 01 03 1a 00 04 06 00 |........|........|
|00001550| 18 03 0b 16 03 1c 1f 6d | 15 19 00 04 05 00 15 01 |.......m|........|
|00001560| 01 00 16 01 10 1a 00 04 | 05 00 1e 7f 15 19 00 04 |........|........|
|00001570| 06 00 19 00 04 07 00 16 | 01 10 1a 00 04 06 00 19 |........|........|
|00001580| 00 04 06 00 18 01 0e 16 | 01 10 19 01 04 15 00 16 |........|........|
|00001590| 01 22 1f fe 15 18 01 0e | 19 01 04 15 00 19 00 04 |."......|........|
|000015a0| 06 00 16 01 11 16 01 11 | 1a 00 04 08 00 19 01 04 |........|........|
|000015b0| 15 00 19 00 04 06 00 16 | 01 11 15 01 00 00 16 01 |........|........|
|000015c0| 22 1f fe 15 19 00 04 05 | 00 15 01 01 00 16 01 10 |".......|........|
|000015d0| 1a 00 04 05 00 19 00 04 | 08 00 19 01 04 15 00 19 |........|........|
|000015e0| 00 04 06 00 16 01 11 16 | 01 11 1a 00 04 08 00 19 |........|........|
|000015f0| 00 04 08 00 15 01 00 00 | 16 01 21 1f c4 15 19 00 |........|..!.....|
|00001600| 04 04 00 19 00 04 05 00 | 16 01 20 1f 18 16 19 00 |........|.. .....|
|00001610| 04 05 00 1a 00 04 04 00 | 15 01 01 00 1c 00 04 09 |........|........|
|00001620| 00 1e aa 14 17 04 06 00 | 19 00 04 04 00 15 01 04 |........|........|
|00001630| 00 16 01 10 1a 00 04 04 | 00 19 00 04 04 00 15 01 |........|........|
|00001640| 17 00 16 01 22 1f 51 16 | 15 01 17 00 1a 00 04 04 |....".Q.|........|
|00001650| 00 19 00 04 04 00 17 01 | 01 00 16 05 00 16 05 00 |........|........|
|00001660| 0d 0d 1e 65 16 1d 00 0e | 00 1b 01 14 76 14 17 01 |...e....|....v...|
|00001670| 02 00 1a 00 04 04 00 2a | 20 2d 2d 2d 49 4e 4b 45 |.......*| ---INKE|
|00001680| 59 28 29 20 63 6f 6e 73 | 74 61 6e 74 20 76 61 6c |Y() cons|tant val|
|00001690| 75 65 73 2e 0d 50 67 44 | 6e 20 3d 20 04 1d 28 33 |ues..PgD|n = ..(3|
|000016a0| 29 0d 50 67 55 70 20 3d | 20 04 1d 28 31 38 29 0d |).PgUp =| ..(18).|
|000016b0| 52 65 74 75 72 6e 6b 65 | 79 20 3d 20 04 1d 28 31 |Returnke|y = ..(1|
|000016c0| 33 29 0d 44 65 6c 52 65 | 63 6f 72 64 20 3d 20 04 |3).DelRe|cord = .|
|000016d0| 1d 28 37 29 0d 2a 0d 2a | 20 2d 2d 2d 53 45 54 20 |.(7).*.*| ---SET |
|000016e0| 43 4f 4c 4f 52 20 54 4f | 20 76 61 6c 75 65 73 2e |COLOR TO| values.|
|000016f0| 0d 53 63 72 65 65 6e 41 | 74 72 20 3d 20 22 57 2b |.ScreenA|tr = "W+|
|00001700| 2f 42 2c 4e 2f 57 22 0d | 53 74 61 74 75 73 41 74 |/B,N/W".|StatusAt|
|00001710| 72 20 3d 20 22 4e 2f 42 | 47 2c 4e 2f 57 22 0d 57 |r = "N/B|G,N/W".W|
|00001720| 69 6e 64 6f 77 41 74 72 | 20 3d 20 22 57 2f 42 2c |indowAtr| = "W/B,|
|00001730| 4e 2f 57 22 0d 50 72 6f | 6d 70 74 41 74 72 20 3d |N/W".Pro|mptAtr =|
|00001740| 20 22 4e 2f 57 2c 47 52 | 2b 2f 52 22 0d 48 69 6c | "N/W,GR|+/R".Hil|
|00001750| 69 74 65 41 74 72 20 3d | 20 22 4e 2f 57 22 0d 2a |iteAtr =| "N/W".*|
|00001760| 0d 2a 20 2d 2d 2d 49 6e | 69 74 69 61 6c 69 7a 65 |.* ---In|itialize|
|00001770| 20 67 6c 6f 62 61 6c 20 | 76 61 72 69 61 62 6c 65 | global |variable|
|00001780| 73 2e 0d 03 05 20 30 20 | 04 09 20 4c 61 73 74 52 |s.... 0 |.. LastR|
|00001790| 65 63 2c 6f 6c 64 72 65 | 63 6e 75 6d 2c 72 65 63 |ec,oldre|cnum,rec|
|000017a0| 6e 75 6d 2c 6d 65 6e 75 | 63 68 6f 69 63 65 0d 03 |num,menu|choice..|
|000017b0| 05 20 22 20 22 20 04 09 | 20 63 68 6f 69 63 65 2c |. " " ..| choice,|
|000017c0| 65 78 70 72 2c 6e 6f 74 | 65 73 0d 19 01 0c 12 00 |expr,not|es......|
|000017d0| 1f 15 18 70 61 67 65 6e | 6f 20 3d 20 31 0d 15 01 |...pagen|o = 1...|
|000017e0| 00 00 17 00 06 00 50 61 | 67 65 4d 61 78 20 3d 20 |......Pa|geMax = |
|000017f0| 05 01 21 0d 19 01 0c 13 | 00 1f 15 18 15 01 01 00 |..!.....|........|
|00001800| 17 09 06 00 64 62 66 70 | 61 67 65 6d 61 78 20 3d |....dbfp|agemax =|
|00001810| 20 05 01 21 0d 50 72 6f | 6d 70 74 52 6f 77 20 3d | ..!.Pro|mptRow =|
|00001820| 20 32 33 0d 50 72 6f 6d | 70 74 42 61 72 20 3d 20 | 23.Prom|ptBar = |
|00001830| 03 9e 28 20 22 a9 a4 22 | 2c 34 30 20 29 0d 0d 15 |..( ".."|,40 )...|
|00001840| 01 01 00 1a 00 04 06 00 | 17 09 07 00 15 01 00 00 |........|........|
|00001850| 1a 00 04 07 00 15 01 0a | 00 1a 00 04 08 00 15 01 |........|........|
|00001860| 01 00 1c 00 04 07 00 19 | 00 04 07 00 19 00 04 08 |........|........|
|00001870| 00 16 01 21 1f 96 1a 19 | 00 04 07 00 17 09 06 00 |...!....|........|
|00001880| 17 09 08 00 1f 93 1a 2a | 0d 2a 20 2d 2d 2d 4f 70 |.......*|.* ---Op|
|00001890| 65 6e 20 64 61 74 61 62 | 61 73 65 20 66 69 6c 65 |en datab|ase file|
|000018a0| 2e 0d 18 02 2e 17 02 13 | 00 1a 01 08 05 00 1a 01 |........|........|
|000018b0| 08 06 00 1a 01 08 07 00 | 18 01 2c 15 01 40 00 16 |........|..,..@..|
|000018c0| 01 10 16 02 6e 1a 00 08 | 05 00 03 1c 20 19 00 08 |....n...|.... ...|
|000018d0| 05 00 17 02 03 00 0d 04 | 19 20 2e 04 1a 2e 20 03 |........|. .... .|
|000018e0| 72 28 20 22 19 01 08 06 | 00 17 02 03 00 2e 04 13 |r( "....|........|
|000018f0| 22 20 29 0d 01 03 3f 20 | 5b 22 19 01 08 06 00 17 |" )...? |["......|
|00001900| 02 03 00 2e 04 13 22 20 | 6e 6f 74 20 66 6f 75 6e |......" |not foun|
|00001910| 64 5d 0d 01 03 03 26 0d | 01 03 03 44 0d 03 8b 0d |d]....&.|...D....|
|00001920| 18 02 2f 15 02 00 00 16 | 02 1e 1f 3d 19 04 28 20 |../.....|...=..( |
|00001930| 19 01 08 06 00 17 02 03 | 00 0d 1e 51 19 04 28 20 |........|...Q..( |
|00001940| 19 01 08 06 00 17 02 03 | 00 20 03 4f 20 05 02 2f |........|. .O ../|
|00001950| 0d 18 01 33 15 01 00 00 | 16 01 22 1f 8a 1a 2a 0d |...3....|.."...*.|
|00001960| 2a 20 2d 2d 2d 4f 70 65 | 6e 20 49 4e 44 45 58 20 |* ---Ope|n INDEX |
|00001970| 66 69 6c 65 28 73 29 2e | 0d 15 01 01 00 1a 00 04 |file(s).|........|
|00001980| 09 00 17 0a 07 00 15 01 | 00 00 1a 00 04 0a 00 15 |........|........|
|00001990| 01 0a 00 1a 00 04 0b 00 | 15 01 01 00 1c 00 04 0a |........|........|
|000019a0| 00 19 00 04 0a 00 19 00 | 04 0b 00 16 01 21 1f 5b |........|.....!.[|
|000019b0| 1a 19 00 04 0a 00 17 0a | 06 00 17 0a 08 00 1f 58 |........|.......X|
|000019c0| 1a 18 02 34 17 02 13 00 | 1a 01 08 05 00 1a 01 08 |...4....|........|
|000019d0| 06 00 1a 01 08 07 00 19 | 01 08 06 00 15 02 01 00 |........|........|
|000019e0| 2e 16 02 10 1b 01 14 f4 | 08 17 02 02 00 16 02 10 |........|........|
|000019f0| 1a 01 08 06 00 04 19 20 | 2e 04 1a 2e 20 03 72 28 |....... |.... .r(|
|00001a00| 20 22 19 01 08 06 00 17 | 02 03 00 22 20 29 0d 01 | "......|..." )..|
|00001a10| 03 3f 20 5b 43 72 65 61 | 74 69 6e 67 20 69 6e 64 |.? [Crea|ting ind|
|00001a20| 65 78 20 22 19 01 08 06 | 00 17 02 03 00 22 2e 2e |ex "....|....."..|
|00001a30| 2e 5d 0d 01 03 03 8f 20 | 04 0c 20 05 02 35 20 04 |.]..... |.. ..5 .|
|00001a40| 09 20 19 01 08 06 00 17 | 02 03 00 0d 03 8b 0d 15 |. ......|........|
|00001a50| 01 01 00 1c 00 04 09 00 | 1e 98 19 17 0a 06 00 15 |........|........|
|00001a60| 02 0d 00 53 45 54 20 49 | 4e 44 45 58 20 54 4f 20 |...SET I|NDEX TO |
|00001a70| 17 02 16 00 1b 01 1c 7f | 0a 15 01 01 00 1b 04 00 |........|........|
|00001a80| 7f 0a 17 02 02 00 17 02 | 17 00 15 01 01 00 1c 00 |........|........|
|00001a90| 04 06 00 1e 5e 18 17 09 | 06 00 15 01 00 00 17 00 |....^...|........|
|00001aa0| 06 00 18 01 23 15 01 00 | 00 16 01 22 1f 2f 1c 2a |....#...|..."./.*|
|00001ab0| 0d 2a 20 2d 2d 2d 53 45 | 54 20 52 45 4c 41 54 49 |.* ---SE|T RELATI|
|00001ac0| 4f 4e 28 73 29 2e 0d 15 | 01 01 00 1a 00 04 0c 00 |ON(s)...|........|
|00001ad0| 17 09 07 00 15 01 00 00 | 1a 00 04 0d 00 15 01 0a |........|........|
|00001ae0| 00 1a 00 04 0e 00 15 01 | 01 00 1c 00 04 0d 00 19 |........|........|
|00001af0| 00 04 0d 00 19 00 04 0e | 00 16 01 21 1f 2b 1c 19 |........|...!.+..|
|00001b00| 00 04 0d 00 17 09 06 00 | 17 09 08 00 1f 28 1c 18 |........|.....(..|
|00001b10| 01 23 15 01 00 00 16 01 | 22 1f 3c 1b 15 02 07 00 |.#......|".<.....|
|00001b20| 53 45 4c 45 43 54 20 17 | 02 16 00 18 01 2c 15 01 |SELECT .|.....,..|
|00001b30| 40 00 16 01 10 16 02 6e | 17 02 17 00 15 01 01 00 |@......n|........|
|00001b40| 1a 00 04 0f 00 17 0b 07 | 00 15 01 00 00 1a 00 04 |........|........|
|00001b50| 10 00 15 01 0a 00 1a 00 | 04 11 00 15 01 01 00 1c |........|........|
|00001b60| 00 04 10 00 19 00 04 10 | 00 19 00 04 11 00 16 01 |........|........|
|00001b70| 21 1f 1b 1c 19 00 04 10 | 00 17 0b 06 00 17 0b 08 |!.......|........|
|00001b80| 00 1f 18 1c 19 00 04 0f | 00 15 01 01 00 16 01 1e |........|........|
|00001b90| 1f ca 1b 15 02 10 00 53 | 45 54 20 52 45 4c 41 54 |.......S|ET RELAT|
|00001ba0| 49 4f 4e 20 54 4f 20 17 | 02 16 00 18 02 24 17 02 |ION TO .|.....$..|
|00001bb0| 16 00 15 02 06 00 20 49 | 4e 54 4f 20 17 02 16 00 |...... I|NTO ....|
|00001bc0| 18 02 25 17 02 17 00 1e | 0f 1c 15 02 10 00 53 45 |..%.....|......SE|
|00001bd0| 54 20 52 45 4c 41 54 49 | 4f 4e 20 54 4f 20 17 02 |T RELATI|ON TO ..|
|00001be0| 16 00 18 02 24 17 02 16 | 00 15 02 06 00 20 49 4e |....$...|..... IN|
|00001bf0| 54 4f 20 17 02 16 00 18 | 02 25 17 02 16 00 15 02 |TO .....|.%......|
|00001c00| 09 00 20 41 44 44 49 54 | 49 56 45 17 02 17 00 15 |.. ADDIT|IVE.....|
|00001c10| 01 01 00 1c 00 04 0f 00 | 1e 5b 1b 17 0b 06 00 15 |........|.[......|
|00001c20| 01 01 00 1c 00 04 0c 00 | 1e e6 1a 17 09 06 00 15 |........|........|
|00001c30| 01 08 00 17 09 06 00 18 | 02 2e 15 02 00 00 16 02 |........|........|
|00001c40| 1e 1f 2b 1e 2a 20 2d 2d | 2d 4f 70 65 6e 20 43 4f |..+.* --|-Open CO|
|00001c50| 4e 44 49 54 49 4f 4e 53 | 20 66 69 6c 65 2e 0d 04 |NDITIONS| file...|
|00001c60| 19 20 2e 04 1a 2e 20 03 | 72 28 20 22 19 01 08 0a |. .... .|r( "....|
|00001c70| 00 17 02 03 00 43 2e 04 | 13 22 20 29 0d 01 03 3f |.....C..|." )...?|
|00001c80| 20 5b 43 72 65 61 74 69 | 6e 67 20 22 19 01 08 0a | [Creati|ng "....|
|00001c90| 00 17 02 03 00 43 2e 04 | 13 22 20 66 69 6c 65 2e |.....C..|." file.|
|00001ca0| 2e 2e 5d 0d 01 03 03 60 | 20 04 09 20 19 01 08 0a |..]....`| .. ....|
|00001cb0| 00 17 02 03 00 58 20 03 | 81 20 45 58 54 45 4e 44 |.....X .|. EXTEND|
|00001cc0| 45 44 0d 01 03 03 1c 20 | 48 0d 01 03 04 28 20 19 |ED..... |H....( .|
|00001cd0| 01 08 0a 00 17 02 03 00 | 58 0d 01 03 04 04 0d 01 |........|X.......|
|00001ce0| 03 03 9b 20 03 97 0d 01 | 03 03 22 20 46 49 45 4c |... ....|.." FIEL|
|00001cf0| 44 5f 4e 41 4d 45 20 03 | 3f 20 22 43 4f 4e 44 45 |D_NAME .|? "CONDE|
|00001d00| 58 50 52 22 0d 01 03 03 | 22 20 46 49 45 4c 44 5f |XPR"....|" FIELD_|
|00001d10| 54 59 50 45 20 03 3f 20 | 22 43 22 0d 01 03 03 22 |TYPE .? |"C"...."|
|00001d20| 20 46 49 45 4c 44 5f 4c | 45 4e 01 02 03 3f 20 31 | FIELD_L|EN...? 1|
|00001d30| 32 38 0d 01 03 03 9b 20 | 03 97 0d 01 03 03 22 20 |28..... |......" |
|00001d40| 46 49 45 4c 44 5f 4e 41 | 4d 45 20 03 3f 20 22 43 |FIELD_NA|ME .? "C|
|00001d50| 4f 4e 44 41 52 45 41 22 | 0d 01 03 03 22 20 46 49 |ONDAREA"|...." FI|
|00001d60| 45 4c 44 5f 54 59 50 45 | 20 03 3f 20 22 43 22 0d |ELD_TYPE| .? "C".|
|00001d70| 01 03 03 22 20 46 49 45 | 4c 44 5f 4c 45 4e 01 02 |..." FIE|LD_LEN..|
|00001d80| 03 3f 20 31 0d 01 03 03 | 9b 20 03 97 0d 01 03 03 |.? 1....|. ......|
|00001d90| 22 20 46 49 45 4c 44 5f | 4e 41 4d 45 20 03 3f 20 |" FIELD_|NAME .? |
|00001da0| 22 43 4f 4e 44 4e 4f 54 | 45 22 0d 01 03 03 22 20 |"CONDNOT|E"...." |
|00001db0| 46 49 45 4c 44 5f 54 59 | 50 45 20 03 3f 20 22 43 |FIELD_TY|PE .? "C|
|00001dc0| 22 0d 01 03 03 22 20 46 | 49 45 4c 44 5f 4c 45 4e |"...." F|IELD_LEN|
|00001dd0| 01 02 03 3f 20 34 30 0d | 01 03 04 28 0d 01 03 03 |...? 40.|...(....|
|00001de0| 8c 20 19 01 08 0a 00 17 | 02 03 00 43 20 03 04 20 |. ......|...C .. |
|00001df0| 19 01 08 0a 00 17 02 03 | 00 58 0d 01 03 44 45 4c |........|.X...DEL|
|00001e00| 45 54 45 20 03 72 20 19 | 01 08 0a 00 17 02 03 00 |ETE .r .|........|
|00001e10| 58 2e 04 13 0d 03 8b 0d | 03 1c 20 48 0d 04 28 20 |X.......|.. H..( |
|00001e20| 19 01 08 0a 00 17 02 03 | 00 43 0d 2a 20 2d 2d 2d |........|.C.* ---|
|00001e30| 49 6e 69 74 69 61 6c 69 | 7a 65 20 64 61 74 61 62 |Initiali|ze datab|
|00001e40| 61 73 65 20 76 61 72 69 | 61 62 6c 65 73 20 66 6f |ase vari|ables fo|
|00001e50| 72 20 63 75 72 72 65 6e | 74 20 77 6f 72 6b 61 72 |r curren|t workar|
|00001e60| 65 61 2e 0d 04 06 20 19 | 01 08 0a 00 17 02 03 00 |ea.... .|........|
|00001e70| 41 0d 0d 16 05 00 0d 0d | 1e 7b 1e 1d 00 0d 00 04 |A.......|.{......|
|00001e80| 0c 20 03 3d 20 04 06 20 | 53 59 53 45 52 52 4f 52 |. .= .. |SYSERROR|
|00001e90| 0d 04 19 20 55 73 65 53 | 74 61 74 75 73 0d 1b 01 |... UseS|tatus...|
|00001ea0| 1c 50 05 15 01 01 00 1b | 04 00 50 05 2a 20 2d 2d |.P......|..P.* --|
|00001eb0| 2d 53 45 54 20 65 6e 76 | 69 72 6f 6e 6d 65 6e 74 |-SET env|ironment|
|00001ec0| 2e 0d 04 24 20 03 94 20 | 04 29 0d 04 24 20 03 77 |...$ .. |.)..$ .w|
|00001ed0| 20 04 29 0d 04 24 20 03 | 1f 20 04 29 0d 04 24 20 | .)..$ .|. .)..$ |
|00001ee0| 03 06 20 04 29 0d 04 24 | 20 03 62 20 04 29 0d 04 |.. .)..$| .b .)..|
|00001ef0| 24 20 03 2d 20 04 29 0d | 04 24 20 03 2e 20 04 29 |$ .- .).|.$ .. .)|
|00001f00| 0d 1b 01 14 7b 05 03 8b | 0d 2a 20 2d 2d 2d 53 45 |....{...|.* ---SE|
|00001f10| 54 20 43 55 52 53 4f 52 | 20 4f 46 46 0d 3f 3f 20 |T CURSOR| OFF.?? |
|00001f20| 53 59 53 28 32 30 30 32 | 29 0d 2a 0d 2a 20 2d 2d |SYS(2002|).*.* --|
|00001f30| 2d 48 4f 54 4b 45 59 53 | 0d 2a 20 4f 4e 20 4b 45 |-HOTKEYS|.* ON KE|
|00001f40| 59 3d 33 31 35 20 44 4f | 20 53 59 53 5f 48 45 4c |Y=315 DO| SYS_HEL|
|00001f50| 50 0d 03 5a 3b 0d 01 03 | 50 67 44 6e 2c 50 67 55 |P..Z;...|PgDn,PgU|
|00001f60| 70 2c 52 65 74 75 72 6e | 6b 65 79 2c 44 65 6c 52 |p,Return|key,DelR|
|00001f70| 65 63 6f 72 64 2c 3b 0d | 01 03 53 63 72 65 65 6e |ecord,;.|..Screen|
|00001f80| 41 74 72 2c 53 74 61 74 | 75 73 41 74 72 2c 57 69 |Atr,Stat|usAtr,Wi|
|00001f90| 6e 64 6f 77 41 74 72 2c | 50 72 6f 6d 70 74 41 74 |ndowAtr,|PromptAt|
|00001fa0| 72 2c 48 69 6c 69 74 65 | 41 74 72 2c 3b 0d 01 03 |r,Hilite|Atr,;...|
|00001fb0| 44 42 46 6e 61 6d 65 2c | 44 42 46 74 65 6d 70 2c |DBFname,|DBFtemp,|
|00001fc0| 64 62 66 61 72 65 61 2c | 64 62 66 70 61 67 65 6d |dbfarea,|dbfpagem|
|00001fd0| 61 78 2c 4e 64 78 4f 72 | 64 65 72 2c 69 73 65 64 |ax,NdxOr|der,ised|
|00001fe0| 69 74 65 64 2c 3b 0d 01 | 03 50 72 6f 6d 70 74 42 |ited,;..|.PromptB|
|00001ff0| 61 72 2c 50 72 6f 6d 70 | 74 52 6f 77 2c 6d 61 69 |ar,Promp|tRow,mai|
|00002000| 6e 63 68 6f 69 63 65 2c | 6d 65 6e 75 63 68 6f 69 |nchoice,|menuchoi|
|00002010| 63 65 2c 63 68 6f 69 63 | 65 0d 03 05 20 2e 46 2e |ce,choic|e... .F.|
|00002020| 20 04 09 3b 0d 01 03 50 | 67 44 6e 2c 50 67 55 70 | ..;...P|gDn,PgUp|
|00002030| 2c 52 65 74 75 72 6e 6b | 65 79 2c 44 65 6c 52 65 |,Returnk|ey,DelRe|
|00002040| 63 6f 72 64 2c 3b 0d 01 | 03 53 63 72 65 65 6e 41 |cord,;..|.ScreenA|
|00002050| 74 72 2c 53 74 61 74 75 | 73 41 74 72 2c 57 69 6e |tr,Statu|sAtr,Win|
|00002060| 64 6f 77 41 74 72 2c 50 | 72 6f 6d 70 74 41 74 72 |dowAtr,P|romptAtr|
|00002070| 2c 48 69 6c 69 74 65 41 | 74 72 2c 3b 0d 01 03 44 |,HiliteA|tr,;...D|
|00002080| 42 46 6e 61 6d 65 2c 44 | 42 46 74 65 6d 70 2c 64 |BFname,D|BFtemp,d|
|00002090| 62 66 61 72 65 61 2c 64 | 62 66 70 61 67 65 6d 61 |bfarea,d|bfpagema|
|000020a0| 78 2c 4e 64 78 4f 72 64 | 65 72 2c 69 73 65 64 69 |x,NdxOrd|er,isedi|
|000020b0| 74 65 64 2c 3b 0d 01 03 | 50 72 6f 6d 70 74 42 61 |ted,;...|PromptBa|
|000020c0| 72 2c 50 72 6f 6d 70 74 | 52 6f 77 2c 6d 61 69 6e |r,Prompt|Row,main|
|000020d0| 63 68 6f 69 63 65 2c 6d | 65 6e 75 63 68 6f 69 63 |choice,m|enuchoic|
|000020e0| 65 2c 63 68 6f 69 63 65 | 0d 0d 15 01 01 00 1a 00 |e,choice|........|
|000020f0| 04 06 00 17 09 07 00 15 | 01 00 00 1a 00 04 07 00 |........|........|
|00002100| 15 01 0a 00 1a 00 04 08 | 00 15 01 01 00 1c 00 04 |........|........|
|00002110| 07 00 19 00 04 07 00 19 | 00 04 08 00 16 01 21 1f |........|......!.|
|00002120| 54 21 19 00 04 07 00 17 | 09 06 00 17 09 08 00 1f |T!......|........|
|00002130| 51 21 18 01 33 19 00 04 | 05 00 16 01 22 1f 48 21 |Q!..3...|....".H!|
|00002140| 18 01 33 1a 00 04 05 00 | 15 01 01 00 1c 00 04 06 |..3.....|........|
|00002150| 00 1e 09 21 17 09 06 00 | 15 01 01 00 1a 00 04 04 |...!....|........|
|00002160| 00 19 00 04 05 00 1a 00 | 04 09 00 1e 77 21 15 01 |........|....w!..|
|00002170| 01 00 1c 00 04 04 00 19 | 00 04 04 00 19 00 04 09 |........|........|
|00002180| 00 16 01 21 1f c1 21 15 | 02 0e 00 50 52 49 56 41 |...!..!.|...PRIVA|
|00002190| 54 45 20 4e 44 58 6e 61 | 6d 17 02 16 00 19 00 04 |TE NDXna|m.......|
|000021a0| 04 00 17 01 16 00 15 02 | 07 00 2c 4e 44 58 6b 65 |........|..,NDXke|
|000021b0| 79 17 02 16 00 19 00 04 | 04 00 17 01 17 00 1e 6e |y.......|.......n|
|000021c0| 21 15 01 01 00 1a 00 04 | 04 00 19 00 04 05 00 1a |!.......|........|
|000021d0| 00 04 0a 00 1e e0 21 15 | 01 01 00 1c 00 04 04 00 |......!.|........|
|000021e0| 19 00 04 04 00 19 00 04 | 0a 00 16 01 21 1f 2f 22 |........|....!./"|
|000021f0| 15 02 13 00 53 54 4f 52 | 45 20 2e 46 2e 20 54 4f |....STOR|E .F. TO|
|00002200| 20 4e 44 58 6e 61 6d 17 | 02 16 00 19 00 04 04 00 | NDXnam.|........|
|00002210| 17 01 16 00 15 02 07 00 | 2c 4e 44 58 6b 65 79 17 |........|,NDXkey.|
|00002220| 02 16 00 19 00 04 04 00 | 17 01 17 00 1e d7 21 19 |........|......!.|
|00002230| 01 0c 12 00 1f 78 22 03 | 5a 20 4c 61 73 74 52 65 |.....x".|Z LastRe|
|00002240| 63 2c 72 65 63 6e 75 6d | 2c 6f 6c 64 72 65 63 6e |c,recnum|,oldrecn|
|00002250| 75 6d 2c 70 61 67 65 6e | 6f 2c 50 61 67 65 4d 61 |um,pagen|o,PageMa|
|00002260| 78 2c 65 78 70 72 2c 6e | 6f 74 65 73 2c 49 73 56 |x,expr,n|otes,IsV|
|00002270| 61 6c 69 64 0d 1e a7 22 | 03 5a 20 4c 61 73 74 52 |alid..."|.Z LastR|
|00002280| 65 63 2c 72 65 63 6e 75 | 6d 2c 6f 6c 64 72 65 63 |ec,recnu|m,oldrec|
|00002290| 6e 75 6d 2c 65 78 70 72 | 2c 6e 6f 74 65 73 2c 49 |num,expr|,notes,I|
|000022a0| 73 56 61 6c 69 64 0d 19 | 01 0c 12 00 1f f7 22 03 |sValid..|......".|
|000022b0| 05 20 2e 46 2e 20 04 09 | 20 4c 61 73 74 52 65 63 |. .F. ..| LastRec|
|000022c0| 2c 72 65 63 6e 75 6d 2c | 6f 6c 64 72 65 63 6e 75 |,recnum,|oldrecnu|
|000022d0| 6d 2c 70 61 67 65 6e 6f | 2c 50 61 67 65 4d 61 78 |m,pageno|,PageMax|
|000022e0| 2c 65 78 70 72 2c 6e 6f | 74 65 73 2c 49 73 56 61 |,expr,no|tes,IsVa|
|000022f0| 6c 69 64 0d 1e 2d 23 03 | 05 20 2e 46 2e 20 04 09 |lid..-#.|. .F. ..|
|00002300| 20 4c 61 73 74 52 65 63 | 2c 72 65 63 6e 75 6d 2c | LastRec|,recnum,|
|00002310| 6f 6c 64 72 65 63 6e 75 | 6d 2c 65 78 70 72 2c 6e |oldrecnu|m,expr,n|
|00002320| 6f 74 65 73 2c 49 73 56 | 61 6c 69 64 0d 15 01 00 |otes,IsV|alid....|
|00002330| 00 17 00 06 00 17 00 09 | 00 15 01 00 00 1a 00 04 |........|........|
|00002340| 0b 00 17 04 07 00 15 01 | 00 00 1a 00 04 0c 00 17 |........|........|
|00002350| 04 11 00 1a 00 04 0d 00 | 15 01 01 00 1c 00 04 0c |........|........|
|00002360| 00 19 00 04 0c 00 19 00 | 04 0d 00 16 01 21 1f b4 |........|.....!..|
|00002370| 23 19 00 04 0c 00 17 04 | 06 00 18 02 11 15 02 04 |#.......|........|
|00002380| 00 43 44 4c 4e 16 02 3c | 18 02 01 15 02 01 00 4d |.CDLN..<|.......M|
|00002390| 16 02 1e 16 03 1b 18 03 | 06 16 03 1b 1f b1 23 15 |........|......#.|
|000023a0| 01 01 00 1c 00 04 0b 00 | 19 00 04 0b 00 17 00 0a |........|........|
|000023b0| 00 1e 58 23 17 04 06 00 | 17 00 0b 00 18 01 1f 15 |..X#....|........|
|000023c0| 01 00 00 16 01 22 1f cd | 24 15 02 2b 00 2a 20 2d |....."..|$..+.* -|
|000023d0| 2d 2d 44 65 63 6c 61 72 | 65 20 75 73 65 72 2d 64 |--Declar|e user-d|
|000023e0| 65 66 69 6e 65 64 20 6d | 65 6d 6f 72 79 20 76 61 |efined m|emory va|
|000023f0| 72 69 61 62 6c 65 73 2e | 17 02 17 00 1b 01 1c d3 |riables.|........|
|00002400| 03 15 02 08 00 50 52 49 | 56 41 54 45 3b 1a 00 1c |.....PRI|VATE;...|
|00002410| 04 00 1b 04 00 d3 03 1b | 01 1c 7e 0b 15 02 01 00 |........|..~.....|
|00002420| 43 1a 00 1c 04 00 15 02 | 0d 00 53 54 4f 52 45 20 |C.......|..STORE |
|00002430| 22 20 22 20 54 4f 3b 1a | 00 1c 05 00 1b 05 00 7e |" " TO;.|.......~|
|00002440| 0b 1b 01 1c 7e 0b 15 02 | 01 00 4e 1a 00 1c 04 00 |....~...|..N.....|
|00002450| 15 02 0e 00 53 54 4f 52 | 45 20 30 2e 30 30 20 54 |....STOR|E 0.00 T|
|00002460| 4f 3b 1a 00 1c 05 00 1b | 05 00 7e 0b 1b 01 1c 7e |O;......|..~....~|
|00002470| 0b 15 02 01 00 4c 1a 00 | 1c 04 00 15 02 0d 00 53 |.....L..|.......S|
|00002480| 54 4f 52 45 20 2e 46 2e | 20 54 4f 3b 1a 00 1c 05 |TORE .F.| TO;....|
|00002490| 00 1b 05 00 7e 0b 1b 01 | 1c 7e 0b 15 02 01 00 44 |....~...|.~.....D|
|000024a0| 1a 00 1c 04 00 15 02 1a | 00 53 54 4f 52 45 20 43 |........|.STORE C|
|000024b0| 54 4f 44 28 22 20 20 2f | 20 20 2f 20 20 22 29 20 |TOD("  /|  /  ") |
|000024c0| 54 4f 3b 1a 00 1c 05 00 | 1b 05 00 7e 0b 15 01 00 |TO;.....|...~....|
|000024d0| 00 17 00 06 00 17 00 09 | 00 15 01 00 00 1a 00 04 |........|........|
|000024e0| 0e 00 17 04 07 00 15 01 | 00 00 1a 00 04 0f 00 17 |........|........|
|000024f0| 04 11 00 1a 00 04 10 00 | 15 01 01 00 1c 00 04 0f |........|........|
|00002500| 00 19 00 04 0f 00 19 00 | 04 10 00 16 01 21 1f 54 |........|.....!.T|
|00002510| 25 19 00 04 0f 00 17 04 | 06 00 18 02 11 15 02 04 |%.......|........|
|00002520| 00 43 44 4c 4e 16 02 3c | 18 02 01 15 02 01 00 4d |.CDLN..<|.......M|
|00002530| 16 02 1f 16 03 1b 18 03 | 06 16 03 1b 1f 51 25 15 |........|.....Q%.|
|00002540| 01 01 00 1c 00 04 0e 00 | 19 00 04 0e 00 17 00 0a |........|........|
|00002550| 00 1e f8 24 17 04 06 00 | 17 00 0b 00 18 01 1f 15 |...$....|........|
|00002560| 01 80 00 16 01 21 1f 66 | 26 15 02 24 00 2a 20 2d |.....!.f|&..$.* -|
|00002570| 2d 2d 44 65 63 6c 61 72 | 65 20 66 69 65 6c 64 20 |--Declar|e field |
|00002580| 6d 65 6d 6f 72 79 20 76 | 61 72 69 61 62 6c 65 73 |memory v|ariables|
|00002590| 2e 17 02 17 00 1b 01 1c | d3 03 15 02 08 00 50 52 |........|......PR|
|000025a0| 49 56 41 54 45 3b 1a 00 | 1c 04 00 1b 04 00 d3 03 |IVATE;..|........|
|000025b0| 1b 01 1c 35 0c 15 02 01 | 00 43 1a 00 1c 04 00 15 |...5....|.C......|
|000025c0| 02 0d 00 53 54 4f 52 45 | 20 22 20 22 20 54 4f 3b |...STORE| " " TO;|
|000025d0| 1a 00 1c 05 00 1b 05 00 | 35 0c 1b 01 1c 35 0c 15 |........|5....5..|
|000025e0| 02 01 00 4e 1a 00 1c 04 | 00 15 02 0e 00 53 54 4f |...N....|.....STO|
|000025f0| 52 45 20 30 2e 30 30 20 | 54 4f 3b 1a 00 1c 05 00 |RE 0.00 |TO;.....|
|00002600| 1b 05 00 35 0c 1b 01 1c | 35 0c 15 02 01 00 4c 1a |...5....|5.....L.|
|00002610| 00 1c 04 00 15 02 0d 00 | 53 54 4f 52 45 20 2e 46 |........|STORE .F|
|00002620| 2e 20 54 4f 3b 1a 00 1c | 05 00 1b 05 00 35 0c 1b |. TO;...|.....5..|
|00002630| 01 1c 35 0c 15 02 01 00 | 44 1a 00 1c 04 00 15 02 |..5.....|D.......|
|00002640| 1a 00 53 54 4f 52 45 20 | 43 54 4f 44 28 22 20 20 |..STORE |CTOD("  |
|00002650| 2f 20 20 2f 20 20 22 29 | 20 54 4f 3b 1a 00 1c 05 |/  /  ")| TO;....|
|00002660| 00 1b 05 00 35 0c 2a 0d | 2a 20 2d 2d 2d 4f 70 65 |....5.*.|* ---Ope|
|00002670| 6e 20 50 52 4f 43 45 44 | 55 52 45 20 66 69 6c 65 |n PROCED|URE file|
|00002680| 2e 0d 04 24 20 03 11 20 | 04 09 20 19 01 08 0a 00 |...$ .. |.. .....|
|00002690| 17 02 03 00 50 0d 2a 0d | 2a 20 2d 2d 2d 44 65 66 |....P.*.|* ---Def|
|000026a0| 69 6e 65 20 6f 70 65 72 | 61 74 69 6f 6e 20 6f 66 |ine oper|ation of|
|000026b0| 20 73 74 61 74 75 73 0d | 03 5a 3b 0d 01 03 46 75 | status.|.Z;...Fu|
|000026c0| 6e 63 53 74 61 74 75 31 | 2c 46 75 6e 63 53 74 61 |ncStatu1|,FuncSta|
|000026d0| 74 75 32 2c 46 75 6e 63 | 53 74 61 74 75 33 2c 46 |tu2,Func|Statu3,F|
|000026e0| 75 6e 63 53 74 61 74 75 | 34 2c 3b 0d 01 03 46 75 |uncStatu|4,;...Fu|
|000026f0| 6e 63 53 74 61 74 75 35 | 2c 46 75 6e 63 53 74 61 |ncStatu5|,FuncSta|
|00002700| 74 75 36 2c 46 75 6e 63 | 53 74 61 74 75 37 2c 46 |tu6,Func|Statu7,F|
|00002710| 75 6e 63 53 74 61 74 75 | 38 2c 3b 0d 01 03 03 05 |uncStatu|8,;.....|
|00002720| 20 2e 46 2e 20 04 09 3b | 0d 01 03 46 75 6e 63 53 | .F. ..;|...FuncS|
|00002730| 74 61 74 75 31 2c 46 75 | 6e 63 53 74 61 74 75 32 |tatu1,Fu|ncStatu2|
|00002740| 2c 46 75 6e 63 53 74 61 | 74 75 33 2c 46 75 6e 63 |,FuncSta|tu3,Func|
|00002750| 53 74 61 74 75 34 2c 3b | 0d 01 03 46 75 6e 63 53 |Statu4,;|...FuncS|
|00002760| 74 61 74 75 35 2c 46 75 | 6e 63 53 74 61 74 75 36 |tatu5,Fu|ncStatu6|
|00002770| 2c 46 75 6e 63 53 74 61 | 74 75 37 2c 46 75 6e 63 |,FuncSta|tu7,Func|
|00002780| 53 74 61 74 75 38 2c 3b | 0d 03 5a 20 4d 65 6e 75 |Statu8,;|..Z Menu|
|00002790| 68 64 67 0d 03 05 20 22 | 22 20 04 09 20 4d 65 6e |hdg... "|" .. Men|
|000027a0| 75 68 64 67 0d 2a 20 2d | 2d 2d 20 46 75 6e 63 74 |uhdg.* -|-- Funct|
|000027b0| 69 6f 6e 20 69 74 6d 65 | 20 73 74 61 74 75 73 0d |ion itme| status.|
|000027c0| 01 03 46 75 6e 63 53 74 | 61 74 75 31 20 3d 20 2e |..FuncSt|atu1 = .|
|000027d0| 19 01 08 0c 00 17 02 03 | 00 2e 0d 01 03 46 75 6e |........|.....Fun|
|000027e0| 63 53 74 61 74 75 32 20 | 3d 20 2e 19 01 08 0d 00 |cStatu2 |= ......|
|000027f0| 17 02 03 00 2e 0d 01 03 | 46 75 6e 63 53 74 61 74 |........|FuncStat|
|00002800| 75 33 20 3d 20 2e 46 75 | 6e 63 53 74 61 74 75 73 |u3 = .Fu|ncStatus|
|00002810| 33 2e 0d 01 03 46 75 6e | 63 53 74 61 74 75 34 20 |3....Fun|cStatu4 |
|00002820| 3d 20 2e 46 75 6e 63 53 | 74 61 74 75 73 34 2e 0d |= .FuncS|tatus4..|
|00002830| 01 03 46 75 6e 63 53 74 | 61 74 75 35 20 3d 20 2e |..FuncSt|atu5 = .|
|00002840| 46 75 6e 63 53 74 61 74 | 75 73 35 2e 0d 01 03 46 |FuncStat|us5....F|
|00002850| 75 6e 63 53 74 61 74 75 | 36 20 3d 20 2e 46 75 6e |uncStatu|6 = .Fun|
|00002860| 63 53 74 61 74 75 73 36 | 2e 0d 01 03 46 75 6e 63 |cStatus6|....Func|
|00002870| 53 74 61 74 75 37 20 3d | 20 2e 46 75 6e 63 53 74 |Statu7 =| .FuncSt|
|00002880| 61 74 75 73 37 2e 0d 01 | 03 46 75 6e 63 53 74 61 |atus7...|.FuncSta|
|00002890| 74 75 38 20 3d 20 2e 46 | 75 6e 63 53 74 61 74 75 |tu8 = .F|uncStatu|
|000028a0| 73 38 2e 0d 2a 20 2d 2d | 2d 20 46 75 6e 63 74 69 |s8..* --|- Functi|
|000028b0| 6f 6e 20 69 74 6d 65 20 | 4c 61 62 6c 65 0d 01 03 |on itme |Lable...|
|000028c0| 46 75 6e 63 4c 61 62 6c | 65 31 20 3d 20 27 46 75 |FuncLabl|e1 = 'Fu|
|000028d0| 6e 63 4c 61 62 6c 65 31 | 27 0d 01 03 46 75 6e 63 |ncLable1|'...Func|
|000028e0| 4c 61 62 6c 65 32 20 3d | 20 27 46 75 6e 63 4c 61 |Lable2 =| 'FuncLa|
|000028f0| 62 6c 65 32 27 0d 01 03 | 46 75 6e 63 4c 61 62 6c |ble2'...|FuncLabl|
|00002900| 65 33 20 3d 20 27 46 75 | 6e 63 4c 61 62 6c 65 33 |e3 = 'Fu|ncLable3|
|00002910| 27 0d 01 03 46 75 6e 63 | 4c 61 62 6c 65 34 20 3d |'...Func|Lable4 =|
|00002920| 20 27 46 75 6e 63 4c 61 | 62 6c 65 34 27 0d 01 03 | 'FuncLa|ble4'...|
|00002930| 46 75 6e 63 4c 61 62 6c | 65 35 20 3d 20 27 46 75 |FuncLabl|e5 = 'Fu|
|00002940| 6e 63 4c 61 62 6c 65 35 | 27 0d 01 03 46 75 6e 63 |ncLable5|'...Func|
|00002950| 4c 61 62 6c 65 36 20 3d | 20 27 46 75 6e 63 4c 61 |Lable6 =| 'FuncLa|
|00002960| 62 6c 65 36 27 0d 01 03 | 46 75 6e 63 4c 61 62 6c |ble6'...|FuncLabl|
|00002970| 65 37 20 3d 20 27 46 75 | 6e 63 4c 61 62 6c 65 37 |e7 = 'Fu|ncLable7|
|00002980| 27 0d 01 03 46 75 6e 63 | 4c 61 62 6c 65 38 20 3d |'...Func|Lable8 =|
|00002990| 20 27 46 75 6e 63 4c 61 | 62 6c 65 38 27 0d 01 03 | 'FuncLa|ble8'...|
|000029a0| 4d 65 6e 75 68 64 67 20 | 3d 20 22 4d 65 6e 75 4c |Menuhdg |= "MenuL|
|000029b0| 69 6e 65 68 64 67 22 0d | 0d 03 5a 20 4d 65 6e 75 |inehdg".|..Z Menu|
|000029c0| 63 68 6f 2c 4f 70 74 70 | 72 63 0d 4d 65 6e 75 63 |cho,Optp|rc.Menuc|
|000029d0| 68 6f 20 3d 20 22 22 0d | 64 62 66 61 72 65 61 20 |ho = "".|dbfarea |
|000029e0| 3d 20 22 31 22 0d 04 06 | 20 19 01 08 0a 00 17 02 |= "1"...| .......|
|000029f0| 03 00 4f 0d 2a 20 2d 2d | 2d 43 68 6f 6f 73 65 20 |..O.* --|-Choose |
|00002a00| 6f 70 74 61 74 69 6f 6e | 20 4d 65 6e 75 0d 04 24 |optation| Menu..$|
|00002a10| 20 03 27 20 04 09 20 4e | 2f 57 20 2c 57 2f 4e 0d | .' .. N|/W ,W/N.|
|00002a20| 40 20 32 31 2c 20 30 20 | 03 48 20 04 09 20 32 31 |@ 21, 0 |.H .. 21|
|00002a30| 2c 37 39 0d 40 20 32 31 | 2c 32 35 20 04 20 20 27 |,79.@ 21|,25 .  '|
|00002a40| 20 20 d2 b5 20 20 ce f1 | 20 20 b4 a6 20 20 c0 ed |  ..  ..|  ..  ..|
|00002a50| 20 20 b9 a6 20 20 c4 dc | 20 20 b1 ed 20 20 27 0d |  ..  ..|  ..  '.|
|00002a60| 04 24 20 03 27 20 04 09 | 20 4e 2f 47 42 20 2c 57 |.$ .' ..| N/GB ,W|
|00002a70| 2f 4e 0d 40 20 32 32 2c | 20 30 20 03 48 20 04 09 |/N.@ 22,| 0 .H ..|
|00002a80| 20 32 33 2c 37 39 0d 04 | 24 20 03 27 20 04 09 20 | 23,79..|$ .' .. |
|00002a90| 57 2f 42 20 2c 57 2b 2f | 52 0d 04 19 20 46 75 6e |W/B ,W+/|R... Fun|
|00002aa0| 63 53 74 61 74 75 31 0d | 01 03 04 19 20 04 03 28 |cStatu1.|.... ..(|
|00002ab0| 20 46 75 6e 63 4c 61 62 | 6c 65 31 20 29 20 3e 20 | FuncLab|le1 ) > |
|00002ac0| 30 0d 01 06 40 20 32 33 | 2c 20 31 20 50 52 4f 4d |0...@ 23|, 1 PROM|
|00002ad0| 50 54 20 27 31 27 20 2b | 20 46 75 6e 63 4c 61 62 |PT '1' +| FuncLab|
|00002ae0| 6c 65 31 0d 01 03 03 5b | 0d 01 06 40 20 32 33 2c |le1....[|...@ 23,|
|00002af0| 20 31 20 50 52 4f 4d 50 | 54 20 27 31 2e ca e4 20 | 1 PROMP|T '1... |
|00002b00| 20 c8 eb 20 27 0d 01 03 | 03 8b 0d 01 03 4d 65 6e | .. '...|.....Men|
|00002b10| 75 63 68 6f 20 3d 20 4d | 65 6e 75 63 68 6f 20 2b |ucho = M|enucho +|
|00002b20| 20 22 41 22 0d 03 8b 0d | 04 19 20 46 75 6e 63 53 | "A"....|.. FuncS|
|00002b30| 74 61 74 75 32 0d 01 03 | 04 19 20 04 03 28 20 46 |tatu2...|.. ..( F|
|00002b40| 75 6e 63 4c 61 62 6c 65 | 32 20 29 20 3e 20 30 0d |uncLable|2 ) > 0.|
|00002b50| 01 06 40 20 32 33 2c 31 | 31 20 50 52 4f 4d 50 54 |..@ 23,1|1 PROMPT|
|00002b60| 20 27 32 27 20 2b 20 46 | 75 6e 63 4c 61 62 6c 65 | '2' + F|uncLable|
|00002b70| 32 0d 01 03 03 5b 0d 01 | 06 40 20 32 33 2c 31 31 |2....[..|.@ 23,11|
|00002b80| 20 50 52 4f 4d 50 54 20 | 27 32 2e d0 de 20 20 b8 | PROMPT |'2...  .|
|00002b90| c4 20 27 0d 01 03 03 8b | 0d 01 03 4d 65 6e 75 63 |. '.....|...Menuc|
|00002ba0| 68 6f 20 3d 20 4d 65 6e | 75 63 68 6f 20 2b 20 22 |ho = Men|ucho + "|
|00002bb0| 42 22 0d 03 8b 0d 04 19 | 20 46 75 6e 63 53 74 61 |B"......| FuncSta|
|00002bc0| 74 75 33 0d 01 03 04 19 | 20 04 03 28 20 46 75 6e |tu3.....| ..( Fun|
|00002bd0| 63 4c 61 62 6c 65 33 20 | 29 20 3e 20 30 0d 01 06 |cLable3 |) > 0...|
|00002be0| 40 20 32 33 2c 32 31 20 | 50 52 4f 4d 50 54 20 27 |@ 23,21 |PROMPT '|
|00002bf0| 33 27 20 2b 20 46 75 6e | 63 4c 61 62 6c 65 33 0d |3' + Fun|cLable3.|
|00002c00| 01 03 03 5b 0d 01 06 40 | 20 32 33 2c 32 31 20 50 |...[...@| 23,21 P|
|00002c10| 52 4f 4d 50 54 20 27 33 | 2e b2 e9 20 20 d1 af 20 |ROMPT '3|...  .. |
|00002c20| 27 0d 01 03 03 8b 0d 01 | 03 4d 65 6e 75 63 68 6f |'.......|.Menucho|
|00002c30| 20 3d 20 4d 65 6e 75 63 | 68 6f 20 2b 20 22 43 22 | = Menuc|ho + "C"|
|00002c40| 0d 03 8b 0d 04 19 20 46 | 75 6e 63 53 74 61 74 75 |...... F|uncStatu|
|00002c50| 34 0d 01 03 04 19 20 04 | 03 28 20 46 75 6e 63 4c |4..... .|.( FuncL|
|00002c60| 61 62 6c 65 34 20 29 20 | 3e 20 30 0d 01 06 40 20 |able4 ) |> 0...@ |
|00002c70| 32 33 2c 33 31 20 50 52 | 4f 4d 50 54 20 27 34 27 |23,31 PR|OMPT '4'|
|00002c80| 20 2b 20 46 75 6e 63 4c | 61 62 6c 65 34 0d 01 03 | + FuncL|able4...|
|00002c90| 03 5b 0d 01 06 40 20 32 | 33 2c 33 31 20 50 52 4f |.[...@ 2|3,31 PRO|
|00002ca0| 4d 50 54 20 27 34 2e cd | b3 20 20 bc c6 20 27 0d |MPT '4..|.  .. '.|
|00002cb0| 01 03 03 8b 0d 01 03 4d | 65 6e 75 63 68 6f 20 3d |.......M|enucho =|
|00002cc0| 20 4d 65 6e 75 63 68 6f | 20 2b 20 22 44 22 0d 03 | Menucho| + "D"..|
|00002cd0| 8b 0d 04 19 20 46 75 6e | 63 53 74 61 74 75 35 0d |.... Fun|cStatu5.|
|00002ce0| 01 03 04 19 20 04 03 28 | 20 46 75 6e 63 4c 61 62 |.... ..(| FuncLab|
|00002cf0| 6c 65 35 20 29 20 3e 20 | 30 0d 01 06 40 20 32 33 |le5 ) > |0...@ 23|
|00002d00| 2c 34 31 20 50 52 4f 4d | 50 54 20 27 35 27 20 2b |,41 PROM|PT '5' +|
|00002d10| 20 46 75 6e 63 4c 61 62 | 6c 65 35 0d 01 03 03 5b | FuncLab|le5....[|
|00002d20| 0d 01 06 40 20 32 33 2c | 34 31 20 50 52 4f 4d 50 |...@ 23,|41 PROMP|
|00002d30| 54 20 27 35 2e b4 f2 20 | 20 d3 a1 20 27 0d 01 03 |T '5... | .. '...|
|00002d40| 03 8b 0d 01 03 4d 65 6e | 75 63 68 6f 20 3d 20 4d |.....Men|ucho = M|
|00002d50| 65 6e 75 63 68 6f 20 2b | 20 22 45 22 0d 03 8b 0d |enucho +| "E"....|
|00002d60| 04 19 20 46 75 6e 63 53 | 74 61 74 75 36 0d 01 03 |.. FuncS|tatu6...|
|00002d70| 04 19 20 04 03 28 20 46 | 75 6e 63 4c 61 62 6c 65 |.. ..( F|uncLable|
|00002d80| 36 20 29 20 3e 20 30 0d | 01 06 40 20 32 33 2c 35 |6 ) > 0.|..@ 23,5|
|00002d90| 31 20 50 52 4f 4d 50 54 | 20 27 36 27 20 2b 20 46 |1 PROMPT| '6' + F|
|00002da0| 75 6e 63 4c 61 62 6c 65 | 36 0d 01 03 03 5b 0d 01 |uncLable|6....[..|
|00002db0| 06 40 20 32 33 2c 35 31 | 20 50 52 4f 4d 50 54 20 |.@ 23,51| PROMPT |
|00002dc0| 27 36 2e d7 d4 b6 a8 d2 | e5 31 27 0d 01 03 03 8b |'6......|.1'.....|
|00002dd0| 0d 01 03 4d 65 6e 75 63 | 68 6f 20 3d 20 4d 65 6e |...Menuc|ho = Men|
|00002de0| 75 63 68 6f 20 2b 20 22 | 46 22 0d 03 8b 0d 04 19 |ucho + "|F"......|
|00002df0| 20 46 75 6e 63 53 74 61 | 74 75 37 0d 01 03 04 19 | FuncSta|tu7.....|
|00002e00| 20 04 03 28 20 46 75 6e | 63 4c 61 62 6c 65 37 20 | ..( Fun|cLable7 |
|00002e10| 29 20 3e 20 30 0d 01 06 | 40 20 32 33 2c 36 31 20 |) > 0...|@ 23,61 |
|00002e20| 50 52 4f 4d 50 54 20 27 | 37 27 20 2b 20 53 65 6c |PROMPT '|7' + Sel|
|00002e30| 32 4c 61 62 6c 65 37 0d | 01 03 03 5b 0d 01 06 40 |2Lable7.|...[...@|
|00002e40| 20 32 33 2c 36 31 20 50 | 52 4f 4d 50 54 20 27 37 | 23,61 P|ROMPT '7|
|00002e50| 2e d7 d4 b6 a8 d2 e5 32 | 27 0d 01 03 03 8b 0d 01 |.......2|'.......|
|00002e60| 03 4d 65 6e 75 63 68 6f | 20 3d 20 4d 65 6e 75 63 |.Menucho| = Menuc|
|00002e70| 68 6f 20 2b 20 22 47 22 | 0d 03 8b 0d 04 19 20 46 |ho + "G"|...... F|
|00002e80| 75 6e 63 53 74 61 74 75 | 38 0d 01 03 04 19 20 04 |uncStatu|8..... .|
|00002e90| 03 28 20 46 75 6e 63 4c | 61 62 6c 65 38 20 29 20 |.( FuncL|able8 ) |
|00002ea0| 3e 20 30 0d 01 06 40 20 | 32 33 2c 37 31 20 50 52 |> 0...@ |23,71 PR|
|00002eb0| 4f 4d 50 54 20 27 38 27 | 20 2b 20 46 75 6e 63 4c |OMPT '8'| + FuncL|
|00002ec0| 61 62 6c 65 38 0d 01 03 | 03 5b 0d 01 06 40 20 32 |able8...|.[...@ 2|
|00002ed0| 33 2c 37 31 20 50 52 4f | 4d 50 54 20 27 38 2e d7 |3,71 PRO|MPT '8..|
|00002ee0| d4 b6 a8 d2 e5 33 27 0d | 01 03 03 8b 0d 01 03 4d |.....3'.|.......M|
|00002ef0| 65 6e 75 63 68 6f 20 3d | 20 4d 65 6e 75 63 68 6f |enucho =| Menucho|
|00002f00| 20 2b 20 22 48 22 0d 03 | 8b 0d 4d 45 4e 55 20 04 | + "H"..|..MENU .|
|00002f10| 09 20 4f 70 74 5f 43 68 | 69 0d 4f 70 74 70 72 63 |. Opt_Ch|i.Optprc|
|00002f20| 20 3d 20 03 14 28 20 4d | 65 6e 75 63 68 6f 2c 4f | = ..( M|enucho,O|
|00002f30| 50 74 5f 63 68 69 2c 31 | 20 29 0d 04 06 20 03 65 |Pt_chi,1| )... .e|
|00002f40| 0d 01 03 03 65 20 4f 70 | 74 70 72 63 20 3d 20 22 |....e Op|tprc = "|
|00002f50| 41 22 0d 01 06 04 06 20 | 19 01 08 0a 00 17 02 03 |A"..... |........|
|00002f60| 00 31 0d 01 03 03 65 20 | 4f 70 74 70 72 63 20 3d |.1....e |Optprc =|
|00002f70| 20 22 42 22 0d 01 06 04 | 06 20 19 01 08 0a 00 17 | "B"....|. ......|
|00002f80| 02 03 00 32 0d 01 03 03 | 65 20 4f 70 74 70 72 63 |...2....|e Optprc|
|00002f90| 20 3d 20 22 43 22 0d 01 | 06 04 06 20 19 01 08 0a | = "C"..|... ....|
|00002fa0| 00 17 02 03 00 33 0d 01 | 03 03 65 20 4f 70 74 70 |.....3..|..e Optp|
|00002fb0| 72 63 20 3d 20 22 44 22 | 0d 01 06 04 06 20 46 49 |rc = "D"|..... FI|
|00002fc0| 4e 44 53 55 42 30 30 20 | 03 3f 20 22 53 22 0d 01 |NDSUB00 |.? "S"..|
|00002fd0| 03 03 65 20 4f 70 74 70 | 72 63 20 3d 20 22 45 22 |..e Optp|rc = "E"|
|00002fe0| 0d 01 06 04 06 20 19 01 | 08 0a 00 17 02 03 00 35 |..... ..|.......5|
|00002ff0| 0d 01 03 03 65 20 4f 70 | 74 70 72 63 20 3d 20 22 |....e Op|tprc = "|
|00003000| 46 22 0d 01 06 04 06 20 | 19 01 08 0a 00 17 02 03 |F"..... |........|
|00003010| 00 36 0d 01 03 03 65 20 | 4f 70 74 70 72 63 20 3d |.6....e |Optprc =|
|00003020| 20 22 47 22 0d 01 06 04 | 06 20 19 01 08 0a 00 17 | "G"....|. ......|
|00003030| 02 03 00 37 0d 01 03 03 | 65 20 4f 70 74 70 72 63 |...7....|e Optprc|
|00003040| 20 3d 20 22 48 22 0d 01 | 06 04 06 20 19 01 08 0a | = "H"..|... ....|
|00003050| 00 17 02 03 00 38 0d 03 | 91 0d 04 19 20 55 73 65 |.....8..|.... Use|
|00003060| 53 74 61 74 75 73 0d 01 | 03 2a 20 2d 2d 2d 43 6c |Status..|.* ---Cl|
|00003070| 6f 73 69 6e 67 20 6f 70 | 65 72 61 74 69 6f 6e 73 |osing op|erations|
|00003080| 2e 0d 1b 01 1c 7e 07 15 | 01 01 00 15 02 06 00 53 |.....~..|.......S|
|00003090| 43 52 45 45 4e 1a 00 1c | 05 00 1b 05 00 7e 07 01 |CREEN...|.....~..|
|000030a0| 03 03 48 0d 01 03 03 48 | 20 4d 45 4d 4f 52 59 0d |..H....H| MEMORY.|
|000030b0| 01 03 03 23 20 03 84 0d | 01 03 03 23 20 03 8f 0d |...# ...|...# ...|
|000030c0| 01 03 03 23 20 03 11 0d | 01 03 04 24 20 03 2e 20 |...# ...|...$ .. |
|000030d0| 04 0c 0d 01 03 04 24 20 | 03 2d 20 04 0c 0d 01 03 |......$ |.- .....|
|000030e0| 04 24 20 03 62 20 04 0c | 0d 01 03 3f 3f 20 53 59 |.$ .b ..|...?? SY|
|000030f0| 53 28 32 30 30 32 2c 31 | 29 0d 01 03 04 24 20 03 |S(2002,1|)....$ .|
|00003100| 39 20 04 0c 0d 01 03 04 | 24 20 03 06 20 04 0c 0d |9 ......|$ .. ...|
|00003110| 01 03 04 24 20 03 1f 20 | 04 0c 0d 01 03 04 24 20 |...$ .. |......$ |
|00003120| 03 77 20 04 0c 0d 01 03 | 04 24 20 03 94 20 04 0c |.w .....|.$ .. ..|
|00003130| 0d 03 8b 0d 16 05 00 0d | 0d 1e 3c 31 1d 00 01 00 |........|..<1....|
|00003140| 18 02 15 1a 00 08 04 00 | 18 02 11 15 02 01 00 43 |........|.......C|
|00003150| 16 02 1e 1f 9a 31 19 00 | 08 04 00 15 01 01 00 15 |.....1..|........|
|00003160| 01 01 00 16 02 62 15 02 | 02 00 5b 22 15 02 01 00 |.....b..|..["....|
|00003170| 27 16 02 10 16 02 3c 16 | 03 1c 1f 97 31 15 02 01 |'.....<.|....1...|
|00003180| 00 22 19 00 08 04 00 16 | 02 10 15 02 01 00 22 16 |."......|......".|
|00003190| 02 10 1a 00 08 04 00 1e | e0 31 18 02 11 15 02 01 |........|.1......|
|000031a0| 00 4c 16 02 1e 1f e0 31 | 19 00 08 04 00 15 01 01 |.L.....1|........|
|000031b0| 00 15 01 01 00 16 02 62 | 15 02 01 00 2e 16 02 1f |.......b|........|
|000031c0| 1f dd 31 15 02 01 00 2e | 19 00 08 04 00 16 02 10 |..1.....|........|
|000031d0| 15 02 01 00 2e 16 02 10 | 1a 00 08 04 00 1e 97 31 |........|.......1|
|000031e0| 19 00 08 04 00 17 02 01 | 00 16 05 00 16 05 00 1e |........|........|
|000031f0| f2 31 1d 00 0f 00 15 01 | 00 00 17 00 06 00 15 02 |.1......|........|
|00003200| 1f 00 2a 20 2d 2d 2d 49 | 6e 69 74 69 61 6c 69 7a |..* ---I|nitializ|
|00003210| 65 20 66 69 65 6c 64 73 | 2f 6d 65 6d 76 61 72 73 |e fields|/memvars|
|00003220| 2e 17 02 17 00 19 01 0c | 13 00 16 03 1c 1f 67 33 |........|......g3|
|00003230| 15 01 01 00 17 09 06 00 | 17 00 09 00 15 01 00 00 |........|........|
|00003240| 1a 00 04 04 00 17 04 07 | 00 15 01 00 00 1a 00 04 |........|........|
|00003250| 05 00 17 04 11 00 1a 00 | 04 06 00 15 01 01 00 1c |........|........|
|00003260| 00 04 05 00 19 00 04 05 | 00 19 00 04 06 00 16 01 |........|........|
|00003270| 21 1f ac 32 19 00 04 05 | 00 17 04 06 00 18 02 15 |!..2....|........|
|00003280| 16 02 18 18 02 11 15 02 | 04 00 43 44 4c 4e 16 02 |........|..CDLN..|
|00003290| 3c 16 03 1b 1f a9 32 15 | 01 01 00 1c 00 04 04 00 |<.....2.|........|
|000032a0| 19 00 04 04 00 17 00 0a | 00 1e 5b 32 17 04 06 00 |........|..[2....|
|000032b0| 17 00 0b 00 18 01 1f 15 | 01 00 00 16 01 22 1f 50 |........|.....".P|
|000032c0| 33 15 01 01 00 1a 00 04 | 07 00 17 04 07 00 15 01 |3.......|........|
|000032d0| 00 00 1a 00 04 08 00 17 | 04 11 00 1a 00 04 09 00 |........|........|
|000032e0| 15 01 01 00 1c 00 04 08 | 00 19 00 04 08 00 19 00 |........|........|
|000032f0| 04 09 00 16 01 21 1f 49 | 33 19 00 04 08 00 17 04 |.....!.I|3.......|
|00003300| 06 00 15 01 01 00 1f 46 | 33 15 02 06 00 53 54 4f |.......F|3....STO|
|00003310| 52 45 20 17 02 16 00 1b | 01 14 3c 31 17 02 02 00 |RE .....|..<1....|
|00003320| 17 02 16 00 15 02 04 00 | 20 54 4f 20 17 02 16 00 |........| TO ....|
|00003330| 1b 01 14 49 03 17 02 02 | 00 17 02 17 00 15 01 01 |...I....|........|
|00003340| 00 1c 00 04 07 00 1e e0 | 32 17 04 06 00 1e 64 33 |........|2.....d3|
|00003350| 15 02 0c 00 2a 20 2d 2d | 2d 3c 6e 6f 6e 65 3e 2e |....* --|-<none>.|
|00003360| 17 02 17 00 1e 59 35 15 | 02 07 00 44 4f 20 43 41 |.....Y5.|...DO CA|
|00003370| 53 45 17 02 17 00 15 01 | 01 00 1a 00 04 0a 00 17 |SE......|........|
|00003380| 09 07 00 15 01 00 00 1a | 00 04 0b 00 15 01 0a 00 |........|........|
|00003390| 1a 00 04 0c 00 15 01 01 | 00 1c 00 04 0b 00 19 00 |........|........|
|000033a0| 04 0b 00 19 00 04 0c 00 | 16 01 21 1f 46 35 19 00 |........|..!.F5..|
|000033b0| 04 0b 00 17 09 06 00 17 | 09 08 00 1f 43 35 18 02 |........|....C5..|
|000033c0| 2e 17 02 13 00 1a 01 08 | 05 00 1a 01 08 06 00 1a |........|........|
|000033d0| 01 08 07 00 15 02 10 00 | 43 41 53 45 20 64 62 66 |........|CASE dbf|
|000033e0| 61 72 65 61 20 3d 20 22 | 17 02 16 00 18 01 2c 17 |area = "|......,.|
|000033f0| 01 16 00 15 02 01 00 22 | 17 02 17 00 1b 01 1c 50 |......."|.......P|
|00003400| 05 15 01 01 00 1b 04 00 | 50 05 17 00 09 00 15 01 |........|P.......|
|00003410| 00 00 1a 00 04 0d 00 17 | 04 07 00 15 01 00 00 1a |........|........|
|00003420| 00 04 0e 00 17 04 11 00 | 1a 00 04 0f 00 15 01 01 |........|........|
|00003430| 00 1c 00 04 0e 00 19 00 | 04 0e 00 19 00 04 0f 00 |........|........|
|00003440| 16 01 21 1f 7e 34 19 00 | 04 0e 00 17 04 06 00 18 |..!.~4..|........|
|00003450| 02 15 16 02 18 18 02 11 | 15 02 04 00 43 44 4c 4e |........|....CDLN|
|00003460| 16 02 3c 16 03 1b 1f 7b | 34 15 01 01 00 1c 00 04 |..<....{|4.......|
|00003470| 0d 00 19 00 04 0d 00 17 | 00 0a 00 1e 2d 34 17 04 |........|....-4..|
|00003480| 06 00 17 00 0b 00 18 01 | 1f 15 01 00 00 16 01 22 |........|......."|
|00003490| 1f 22 35 15 01 01 00 1a | 00 04 10 00 17 04 07 00 |."5.....|........|
|000034a0| 15 01 00 00 1a 00 04 11 | 00 17 04 11 00 1a 00 04 |........|........|
|000034b0| 12 00 15 01 01 00 1c 00 | 04 11 00 19 00 04 11 00 |........|........|
|000034c0| 19 00 04 12 00 16 01 21 | 1f 1b 35 19 00 04 11 00 |.......!|..5.....|
|000034d0| 17 04 06 00 15 01 01 00 | 1f 18 35 15 02 06 00 53 |........|..5....S|
|000034e0| 54 4f 52 45 20 17 02 16 | 00 1b 01 14 3c 31 17 02 |TORE ...|....<1..|
|000034f0| 02 00 17 02 16 00 15 02 | 04 00 20 54 4f 20 17 02 |........|.. TO ..|
|00003500| 16 00 1b 01 14 49 03 17 | 02 02 00 17 02 17 00 15 |.....I..|........|
|00003510| 01 01 00 1c 00 04 10 00 | 1e b2 34 17 04 06 00 1e |........|..4.....|
|00003520| 35 35 15 02 0b 00 2a 20 | 2d 2d 2d ce de bc c7 c2 |55....* |---.....|
|00003530| bc 17 02 17 00 1b 01 14 | 7b 05 15 01 01 00 1c 00 |........|{.......|
|00003540| 04 0a 00 1e 95 33 17 09 | 06 00 15 02 07 00 45 4e |.....3..|......EN|
|00003550| 44 43 41 53 45 17 02 17 | 00 16 05 00 0d 0d 1e 61 |DCASE...|.......a|
|00003560| 35 1d 00 00 00 2a 20 2d | 2d 2d 45 64 69 74 20 61 |5....* -|--Edit a|
|00003570| 6e 64 20 70 61 67 65 20 | 74 68 72 6f 75 67 68 20 |nd page |through |
|00003580| 74 68 65 20 72 65 63 6f | 72 64 2e 0d 2a 20 2d 2d |the reco|rd..* --|
|00003590| 2d 54 68 65 20 66 6f 6c | 6c 6f 77 69 6e 67 20 6c |-The fol|lowing l|
|000035a0| 6f 6f 70 20 69 73 20 72 | 65 61 6c 6c 79 20 61 20 |oop is r|eally a |
|000035b0| 22 52 45 50 45 41 54 2f | 55 4e 54 49 4c 20 3c 63 |"REPEAT/|UNTIL <c|
|000035c0| 6f 6e 64 3e 22 2e 0d 04 | 06 20 03 7b 20 2e 54 2e |ond>"...|. .{ .T.|
|000035d0| 0d 01 03 04 06 20 53 74 | 61 74 4c 69 6e 65 20 03 |..... St|atLine .|
|000035e0| 3f 20 4c 61 73 74 52 65 | 63 2b 72 65 63 6e 75 6d |? LastRe|c+recnum|
|000035f0| 4f 46 53 2c 49 73 44 65 | 6c 65 74 65 64 0d 01 03 |OFS,IsDe|leted...|
|00003600| 40 20 30 2c 35 30 20 04 | 20 20 22 2a bf d5 20 b0 |@ 0,50 .|  "*.. .|
|00003610| d7 2a 20 20 22 0d 1b 01 | 1c 7e 07 15 01 01 00 15 |.*  "...|.~......|
|00003620| 02 06 00 53 43 52 45 45 | 4e 1a 00 1c 05 00 1b 05 |...SCREE|N.......|
|00003630| 00 7e 07 01 03 40 20 32 | 33 2c 30 20 03 48 20 04 |.~...@ 2|3,0 .H .|
|00003640| 09 20 32 34 2c 37 39 0d | 01 03 40 20 32 34 2c 32 |. 24,79.|..@ 24,2|
|00003650| 20 04 20 20 27 ca e4 c8 | eb bc c7 c2 bc bb f2 b0 | .  '...|........|
|00003660| b4 3c 45 73 63 3e bc fc | b7 b5 bb d8 d1 a1 d4 f1 |.<Esc>..|........|
|00003670| b2 cb b5 a5 27 0d 01 03 | 04 06 20 19 01 08 0a 00 |....'...|.. .....|
|00003680| 17 02 03 00 47 0d 19 01 | 0c 13 00 1f b2 36 01 03 |....G...|.....6..|
|00003690| 04 06 20 50 61 67 65 20 | 03 3f 20 70 61 67 65 6e |.. Page |.? pagen|
|000036a0| 6f 2c 31 2c 64 62 66 70 | 61 67 65 6d 61 78 0d 1e |o,1,dbfp|agemax..|
|000036b0| d0 36 01 03 04 06 20 50 | 61 67 65 20 03 3f 20 70 |.6.... P|age .? p|
|000036c0| 61 67 65 6e 6f 2c 31 2c | 50 61 67 65 4d 61 78 0d |ageno,1,|PageMax.|
|000036d0| 01 03 2a 20 2d 2d 2d 43 | 6f 6e 64 69 74 69 6f 6e |..* ---C|ondition|
|000036e0| 20 74 6f 20 65 78 69 74 | 20 69 6e 6e 65 72 20 6c | to exit| inner l|
|000036f0| 6f 6f 70 2e 0d 01 03 04 | 19 20 70 61 67 65 6e 6f |oop.....|. pageno|
|00003700| 20 3d 20 31 0d 01 06 03 | 73 0d 01 03 03 8b 0d 01 | = 1....|s.......|
|00003710| 03 04 06 20 19 01 08 0a | 00 17 02 03 00 46 0d 03 |... ....|.....F..|
|00003720| 0a 0d 19 01 0c 13 00 1f | 3e 37 70 61 67 65 6e 6f |........|>7pageno|
|00003730| 20 3d 20 64 62 66 70 61 | 67 65 6d 61 78 0d 16 05 | = dbfpa|gemax...|
|00003740| 00 0d 0d 1e 46 37 1d 00 | 00 00 2a 20 2d 2d 2d 43 |....F7..|..* ---C|
|00003750| 68 65 63 6b 20 66 6f 72 | 20 64 75 70 6c 69 63 61 |heck for| duplica|
|00003760| 74 65 20 72 65 63 6f 72 | 64 2e 0d 04 06 20 03 7b |te recor|d.... .{|
|00003770| 20 2e 54 2e 0d 1b 01 1c | 7e 07 15 01 01 00 15 02 | .T.....|~.......|
|00003780| 06 00 53 43 52 45 45 4e | 1a 00 1c 05 00 1b 05 00 |..SCREEN|........|
|00003790| 7e 07 01 03 40 20 32 33 | 2c 30 20 03 48 20 04 09 |~...@ 23|,0 .H ..|
|000037a0| 20 32 34 2c 37 39 0d 01 | 03 40 20 32 34 2c 32 20 | 24,79..|.@ 24,2 |
|000037b0| 04 20 20 27 ca e4 c8 eb | bc c7 c2 bc bb f2 b0 b4 |.  '....|........|
|000037c0| 3c 45 73 63 3e bc fc b7 | b5 bb d8 d1 a1 d4 f1 b2 |<Esc>...|........|
|000037d0| cb b5 a5 27 0d 01 03 2a | 20 2d 2d 2d 45 6e 74 65 |...'...*| ---Ente|
|000037e0| 72 20 6b 65 79 20 66 69 | 65 6c 64 20 76 61 6c 75 |r key fi|eld valu|
|000037f0| 65 73 2e 0d 01 03 04 06 | 20 19 01 08 0a 00 17 02 |es......| .......|
|00003800| 03 00 4b 20 03 3f 20 65 | 78 70 72 2c 49 73 42 6c |..K .? e|xpr,IsBl|
|00003810| 61 6e 6b 2c 49 73 55 6e | 69 71 75 65 0d 01 03 04 |ank,IsUn|ique....|
|00003820| 19 20 49 73 42 6c 61 6e | 6b 20 2e 4f 52 2e 20 2e |. IsBlan|k .OR. .|
|00003830| 04 1a 2e 20 49 73 55 6e | 69 71 75 65 0d 01 06 03 |... IsUn|ique....|
|00003840| 73 0d 01 03 03 8b 0d 01 | 03 2a 20 2d 2d 2d 43 68 |s.......|.* ---Ch|
|00003850| 65 63 6b 20 66 6f 72 20 | 64 75 70 6c 69 63 61 74 |eck for |duplicat|
|00003860| 65 20 6b 65 79 20 69 6e | 20 6d 61 73 74 65 72 20 |e key in| master |
|00003870| 66 69 6c 65 2e 0d 01 03 | 03 4d 20 65 78 70 72 0d |file....|.M expr.|
|00003880| 01 03 04 19 20 04 0e 28 | 29 0d 01 06 2a 20 2d 2d |.... ..(|)...* --|
|00003890| 2d 4e 6f 20 64 75 70 6c | 69 63 61 74 65 20 6b 65 |-No dupl|icate ke|
|000038a0| 79 20 66 6f 75 6e 64 2c | 20 73 6f 20 6c 65 61 76 |y found,| so leav|
|000038b0| 65 2e 0d 01 06 03 73 0d | 01 03 03 5b 0d 01 06 2a |e.....s.|...[...*|
|000038c0| 20 2d 2d 2d 46 6f 75 6e | 64 20 61 20 64 75 70 6c | ---Foun|d a dupl|
|000038d0| 69 63 61 74 65 20 72 65 | 63 6f 72 64 20 69 6e 20 |icate re|cord in |
|000038e0| 74 68 65 20 66 69 6c 65 | 2e 0d 1b 01 1c 7e 07 15 |the file|.....~..|
|000038f0| 01 02 00 15 02 06 00 53 | 54 41 54 55 53 1a 00 1c |.......S|TATUS...|
|00003900| 05 00 1b 05 00 7e 07 01 | 06 40 20 30 2c 35 30 20 |.....~..|.@ 0,50 |
|00003910| 04 20 20 22 2a 20 c9 be | 20 b3 fd 20 2a 22 0d 01 |.  "* ..| .. *"..|
|00003920| 06 04 06 20 53 61 79 4c | 69 6e 65 20 03 3f 20 72 |... SayL|ine .? r|
|00003930| 6f 77 2c 3b 0d 01 09 22 | b9 d8 bc fc d7 d6 d6 d8 |ow,;..."|........|
|00003940| b8 b4 2c 20 bc c7 c2 bc | b2 bb c4 dc b1 bb d4 f6 |.., ....|........|
|00003950| bc d3 2e 22 0d 01 06 03 | 26 0d 01 03 03 8b 0d 03 |..."....|&.......|
|00003960| 0a 0d 16 05 00 0d 0d 1e | 6a 39 1d 00 04 00 15 03 |........|j9......|
|00003970| 00 00 1a 00 0c 04 00 15 | 01 00 00 17 00 06 00 15 |........|........|
|00003980| 01 01 00 1a 00 04 05 00 | 17 09 07 00 15 01 00 00 |........|........|
|00003990| 1a 00 04 06 00 15 01 0a | 00 1a 00 04 07 00 15 01 |........|........|
|000039a0| 01 00 1c 00 04 06 00 19 | 00 04 06 00 19 00 04 07 |........|........|
|000039b0| 00 16 01 21 1f e9 39 19 | 00 04 06 00 17 09 06 00 |...!..9.|........|
|000039c0| 17 09 08 00 1f e6 39 18 | 01 33 15 01 00 00 16 01 |......9.|.3......|
|000039d0| 22 1f dd 39 15 03 01 00 | 1a 00 0c 04 00 15 01 01 |"..9....|........|
|000039e0| 00 1c 00 04 05 00 1e 9e | 39 17 09 06 00 19 00 0c |........|9.......|
|000039f0| 04 00 1f fd 39 1b 01 14 | 46 37 1e 9f 3a 2a 20 2d |....9...|F7..:* -|
|00003a00| 2d 2d 45 6e 74 65 72 20 | 6b 65 79 20 66 69 65 6c |--Enter |key fiel|
|00003a10| 64 20 76 61 6c 75 65 73 | 2e 0d 1b 01 1c 7e 07 15 |d values|.....~..|
|00003a20| 01 01 00 15 02 06 00 53 | 43 52 45 45 4e 1a 00 1c |.......S|CREEN...|
|00003a30| 05 00 1b 05 00 7e 07 01 | 03 40 20 32 33 2c 30 20 |.....~..|.@ 23,0 |
|00003a40| 03 48 20 04 09 20 32 34 | 2c 37 39 0d 01 03 40 20 |.H .. 24|,79...@ |
|00003a50| 32 34 2c 32 20 04 20 20 | 27 ca e4 c8 eb bc c7 c2 |24,2 .  |'.......|
|00003a60| bc bb f2 3c 45 73 63 3e | bc fc b7 b5 bb d8 d1 a1 |...<Esc>|........|
|00003a70| d4 f1 b2 cb b5 a5 27 0d | 04 06 20 19 01 08 0a 00 |......'.|.. .....|
|00003a80| 17 02 03 00 4b 20 03 3f | 20 65 78 70 72 2c 49 73 |....K .?| expr,Is|
|00003a90| 42 6c 61 6e 6b 2c 49 73 | 55 6e 69 71 75 65 0d 04 |Blank,Is|Unique..|
|00003aa0| 19 20 49 73 42 6c 61 6e | 6b 0d 01 03 49 73 44 65 |. IsBlan|k...IsDe|
|00003ab0| 6c 65 74 65 64 20 3d 20 | 2e 54 2e 0d 03 5b 0d 19 |leted = |.T...[..|
|00003ac0| 01 0c 12 00 1f e2 3a 1b | 01 1c 50 05 15 01 01 00 |......:.|..P.....|
|00003ad0| 1b 04 00 50 05 1b 01 14 | 61 35 1b 01 14 7b 05 1e |...P....|a5...{..|
|00003ae0| f2 3a 01 03 04 06 20 19 | 01 08 0a 00 17 02 03 00 |.:.... .|........|
|00003af0| 47 0d 03 8b 0d 16 05 00 | 0d 0d 1e fd 3a 1d 00 06 |G.......|....:...|
|00003b00| 00 0d 03 5a 20 72 6f 77 | 2c 72 65 63 6e 75 6d 2c |...Z row|,recnum,|
|00003b10| 72 65 63 6e 75 6d 4f 46 | 53 0d 03 5a 20 49 73 42 |recnumOF|S..Z IsB|
|00003b20| 6c 61 6e 6b 2c 49 73 55 | 6e 69 71 75 65 2c 49 73 |lank,IsU|nique,Is|
|00003b30| 43 61 72 72 79 2c 49 73 | 44 65 6c 65 74 65 64 2c |Carry,Is|Deleted,|
|00003b40| 49 73 45 64 69 74 65 64 | 0d 19 01 0c 13 00 1f 5f |IsEdited|......._|
|00003b50| 3b 1b 01 1c ec 0c 15 01 | 00 00 1b 04 00 ec 0c 2a |;.......|.......*|
|00003b60| 20 2d 2d 2d 49 6e 69 74 | 69 61 6c 69 7a 65 20 6c | ---Init|ialize l|
|00003b70| 6f 63 61 6c 20 6d 65 6d | 6f 72 79 20 76 61 72 69 |ocal mem|ory vari|
|00003b80| 61 62 6c 65 73 2e 0d 72 | 6f 77 20 3d 20 50 72 6f |ables..r|ow = Pro|
|00003b90| 6d 70 74 52 6f 77 0d 72 | 65 63 6e 75 6d 4f 46 53 |mptRow.r|ecnumOFS|
|00003ba0| 20 3d 20 30 0d 03 05 20 | 2e 46 2e 20 04 09 20 49 | = 0... |.F. .. I|
|00003bb0| 73 42 6c 61 6e 6b 2c 49 | 73 55 6e 69 71 75 65 2c |sBlank,I|sUnique,|
|00003bc0| 49 73 43 61 72 72 79 2c | 49 73 44 65 6c 65 74 65 |IsCarry,|IsDelete|
|00003bd0| 64 2c 49 73 45 64 69 74 | 65 64 0d 65 78 70 72 20 |d,IsEdit|ed.expr |
|00003be0| 3d 20 22 22 0d 19 01 0c | 12 00 16 03 1c 1f fe 3b |= ""....|.......;|
|00003bf0| 04 06 20 19 01 08 0a 00 | 17 02 03 00 46 0d 2a 20 |.. .....|....F.* |
|00003c00| 2d 2d 2d 53 74 61 72 74 | 20 62 79 20 61 64 64 69 |---Start| by addi|
|00003c10| 6e 67 20 6f 6e 65 20 72 | 65 63 6f 72 64 2e 0d 63 |ng one r|ecord..c|
|00003c20| 68 6f 69 63 65 20 3d 20 | 22 41 22 0d 2a 20 2d 2d |hoice = |"A".* --|
|00003c30| 2d 54 68 65 20 66 6f 6c | 6c 6f 77 69 6e 67 20 6c |-The fol|lowing l|
|00003c40| 6f 6f 70 20 69 73 20 72 | 65 61 6c 6c 79 20 61 20 |oop is r|eally a |
|00003c50| 22 52 45 50 45 41 54 2f | 55 4e 54 49 4c 20 3c 63 |"REPEAT/|UNTIL <c|
|00003c60| 6f 6e 64 3e 22 2e 0d 04 | 06 20 03 7b 20 2e 54 2e |ond>"...|. .{ .T.|
|00003c70| 0d 19 01 0c 13 00 19 01 | 0c 12 00 16 03 1b 1f 3e |........|.......>|
|00003c80| 3d 01 03 2a 20 2d 2d 2d | 53 74 61 72 74 20 64 61 |=..* ---|Start da|
|00003c90| 74 61 62 61 73 65 20 66 | 69 6c 65 20 6f 6e 20 63 |tabase f|ile on c|
|00003ca0| 6f 72 72 65 63 74 20 70 | 61 67 65 2e 0d 01 03 04 |orrect p|age.....|
|00003cb0| 06 20 03 65 0d 15 01 01 | 00 1a 00 04 07 00 17 09 |. .e....|........|
|00003cc0| 07 00 15 01 00 00 1a 00 | 04 08 00 15 01 0a 00 1a |........|........|
|00003cd0| 00 04 09 00 15 01 01 00 | 1c 00 04 08 00 19 00 04 |........|........|
|00003ce0| 08 00 19 00 04 09 00 16 | 01 21 1f 35 3d 19 00 04 |........|.!.5=...|
|00003cf0| 08 00 17 09 06 00 17 09 | 08 00 1f 32 3d 01 03 03 |........|...2=...|
|00003d00| 65 20 64 62 66 61 72 65 | 61 20 3d 20 22 05 01 2c |e dbfare|a = "..,|
|00003d10| 22 0d 15 01 01 00 17 04 | 06 00 01 06 70 61 67 65 |".......|....page|
|00003d20| 6e 6f 20 3d 20 05 01 04 | 0d 15 01 01 00 1c 00 04 |no = ...|........|
|00003d30| 07 00 1e d4 3c 17 09 06 | 00 01 03 03 91 0d 19 01 |....<...|........|
|00003d40| 0c 12 00 1f 56 3d 01 03 | 04 06 20 19 01 08 0a 00 |....V=..|.. .....|
|00003d50| 17 02 03 00 46 0d 01 03 | 04 19 20 28 63 68 6f 69 |....F...|.. (choi|
|00003d60| 63 65 20 3d 20 22 41 22 | 29 20 2e 4f 52 2e 20 49 |ce = "A"|) .OR. I|
|00003d70| 73 43 61 72 72 79 0d 01 | 06 2a 20 2d 2d 2d 41 64 |sCarry..|.* ---Ad|
|00003d80| 64 20 61 6e 6f 74 68 65 | 72 20 72 65 63 6f 72 64 |d anothe|r record|
|00003d90| 2e 0d 01 06 72 65 63 6e | 75 6d 4f 46 53 20 3d 20 |....recn|umOFS = |
|00003da0| 72 65 63 6e 75 6d 4f 46 | 53 20 2b 20 31 0d 01 06 |recnumOF|S + 1...|
|00003db0| 04 19 20 2e 04 1a 2e 20 | 49 73 43 61 72 72 79 0d |.. .... |IsCarry.|
|00003dc0| 01 09 2a 20 2d 2d 2d 49 | 6e 69 74 69 61 6c 69 7a |..* ---I|nitializ|
|00003dd0| 65 20 6d 65 6d 6f 72 79 | 20 76 61 72 69 61 62 6c |e memory| variabl|
|00003de0| 65 73 20 77 69 74 68 20 | 62 6c 61 6e 6b 73 2e 0d |es with |blanks..|
|00003df0| 01 09 03 08 20 03 8e 0d | 01 09 04 19 20 2e 04 1a |.... ...|.... ...|
|00003e00| 2e 20 04 0e 28 29 0d 01 | 0c 03 55 0d 01 09 03 8b |. ..()..|..U.....|
|00003e10| 0d 01 09 04 06 20 19 01 | 08 0a 00 17 02 03 00 53 |..... ..|.......S|
|00003e20| 0d 01 09 04 06 20 19 01 | 08 0a 00 17 02 03 00 54 |..... ..|.......T|
|00003e30| 0d 01 09 03 08 20 03 8e | 0d 1b 01 1c 50 05 15 01 |..... ..|....P...|
|00003e40| 03 00 1b 04 00 50 05 1b | 01 14 f2 31 1b 01 14 7b |.....P..|...1...{|
|00003e50| 05 01 06 03 8b 0d 01 06 | 49 73 43 61 72 72 79 20 |........|IsCarry |
|00003e60| 3d 20 2e 46 2e 0d 01 03 | 03 8b 0d 01 03 04 06 20 |= .F....|....... |
|00003e70| 53 74 61 74 4c 69 6e 65 | 20 03 3f 20 4c 61 73 74 |StatLine| .? Last|
|00003e80| 52 65 63 2b 72 65 63 6e | 75 6d 4f 46 53 2c 49 73 |Rec+recn|umOFS,Is|
|00003e90| 44 65 6c 65 74 65 64 0d | 01 03 40 20 30 2c 35 30 |Deleted.|..@ 0,50|
|00003ea0| 20 04 20 20 22 2a bf d5 | 20 b0 d7 2a 20 20 22 0d | .  "*..| ..*  ".|
|00003eb0| 1b 01 1c 50 05 15 01 01 | 00 1b 04 00 50 05 1b 01 |...P....|....P...|
|00003ec0| 14 6a 39 1b 01 14 7b 05 | 01 03 04 06 20 53 74 61 |.j9...{.|.... Sta|
|00003ed0| 74 4c 69 6e 65 20 03 3f | 20 4c 61 73 74 52 65 63 |tLine .?| LastRec|
|00003ee0| 2b 72 65 63 6e 75 6d 4f | 46 53 2c 49 73 44 65 6c |+recnumO|FS,IsDel|
|00003ef0| 65 74 65 64 0d 01 03 2a | 20 2d 2d 2d 4c 6f 6f 70 |eted...*| ---Loop|
|00003f00| 20 75 6e 74 69 6c 20 41 | 64 64 2c 20 43 61 72 72 | until A|dd, Carr|
|00003f10| 79 2c 20 45 64 69 74 2c | 20 6f 72 20 46 69 6e 69 |y, Edit,| or Fini|
|00003f20| 73 68 65 64 20 69 73 20 | 73 65 6c 65 63 74 65 64 |shed is |selected|
|00003f30| 2e 0d 01 03 2a 20 2d 2d | 2d 54 68 65 20 66 6f 6c |....* --|-The fol|
|00003f40| 6c 6f 77 69 6e 67 20 6c | 6f 6f 70 20 69 73 20 72 |lowing l|oop is r|
|00003f50| 65 61 6c 6c 79 20 61 20 | 22 52 45 50 45 41 54 2f |eally a |"REPEAT/|
|00003f60| 55 4e 54 49 4c 20 3c 63 | 6f 6e 64 3e 22 2e 0d 01 |UNTIL <c|ond>"...|
|00003f70| 03 6d 65 6e 75 63 68 6f | 69 63 65 20 3d 20 35 0d |.menucho|ice = 5.|
|00003f80| 01 03 04 06 20 03 7b 20 | 2e 54 2e 0d 01 06 2a 20 |.... .{ |.T....* |
|00003f90| 2d 2d 2d 59 6f 75 20 63 | 61 6e 20 61 64 64 20 6f |---You c|an add o|
|00003fa0| 74 68 65 72 20 70 72 6f | 6d 70 74 73 20 61 6e 64 |ther pro|mpts and|
|00003fb0| 20 6f 70 74 69 6f 6e 73 | 20 69 6e 20 74 68 69 73 | options| in this|
|00003fc0| 20 69 6e 6e 65 72 20 6c | 6f 6f 70 2e 0d 01 06 2a | inner l|oop....*|
|00003fd0| 20 2d 2d 2d 46 6f 72 20 | 65 78 61 6d 70 6c 65 2c | ---For |example,|
|00003fe0| 20 74 6f 20 61 64 64 20 | 61 6e 20 69 6e 76 6f 69 | to add |an invoi|
|00003ff0| 63 69 6e 67 20 72 6f 75 | 74 69 6e 65 3a 0d 01 06 |cing rou|tine:...|
|00004000| 2a 0d 01 06 2a 01 04 28 | 31 29 20 49 6e 73 65 72 |*...*..(|1) Inser|
|00004010| 74 20 22 7b 49 7d 6e 76 | 6f 69 63 65 22 20 69 6e |t "{I}nv|oice" in|
|00004020| 20 74 68 65 20 70 72 6f | 6d 70 74 20 6c 69 6e 65 | the pro|mpt line|
|00004030| 20 62 65 6c 6f 77 2c 0d | 01 06 2a 01 04 28 32 29 | below,.|..*..(2)|
|00004040| 20 49 6e 63 6c 75 64 65 | 20 22 49 22 20 69 6e 20 | Include| "I" in |
|00004050| 74 68 65 20 76 61 6c 75 | 65 73 20 66 6f 72 20 47 |the valu|es for G|
|00004060| 65 74 4b 65 79 2c 20 61 | 6e 64 0d 01 06 2a 01 04 |etKey, a|nd...*..|
|00004070| 28 33 29 20 41 64 64 20 | 61 20 43 41 53 45 20 74 |(3) Add |a CASE t|
|00004080| 6f 20 74 68 65 20 44 4f | 20 43 41 53 45 20 73 74 |o the DO| CASE st|
|00004090| 72 75 63 74 75 72 65 2c | 20 73 75 63 68 20 61 73 |ructure,| such as|
|000040a0| 3a 0d 01 06 2a 0d 01 06 | 2a 01 08 43 41 53 45 20 |:...*...|*..CASE |
|000040b0| 63 68 6f 69 63 65 20 3d | 20 22 49 22 0d 01 06 2a |choice =| "I"...*|
|000040c0| 01 0b 44 4f 20 3c 69 6e | 76 6f 69 63 65 5f 70 72 |..DO <in|voice_pr|
|000040d0| 6f 67 72 61 6d 5f 6e 61 | 6d 65 3e 0d 01 06 2a 0d |ogram_na|me>...*.|
|000040e0| 01 06 04 24 20 03 27 20 | 04 09 20 26 70 72 6f 6d |...$ .' |.. &prom|
|000040f0| 70 74 61 74 72 0d 01 06 | 40 20 32 32 2c 30 01 02 |ptatr...|@ 22,0..|
|00004100| 03 48 20 04 09 20 32 33 | 2c 37 39 0d 01 06 40 20 |.H .. 23|,79...@ |
|00004110| 32 33 2c 20 31 20 04 20 | 20 22 d1 a1 d4 f1 3a 22 |23, 1 . | "....:"|
|00004120| 0d 01 06 40 20 32 33 2c | 20 39 20 50 52 4f 4d 50 |...@ 23,| 9 PROMP|
|00004130| 54 20 22 31 2e ca e4 c8 | eb bc c7 c2 bc 22 0d 01 |T "1....|....."..|
|00004140| 06 40 20 32 33 2c 32 33 | 20 50 52 4f 4d 50 54 20 |.@ 23,23| PROMPT |
|00004150| 22 32 2e d0 af b4 f8 ca | e4 c8 eb 22 0d 01 06 40 |"2......|..."...@|
|00004160| 20 32 33 2c 33 37 20 50 | 52 4f 4d 50 54 20 22 33 | 23,37 P|ROMPT "3|
|00004170| 2e d0 de b8 c4 ca e4 c8 | eb 22 0d 01 06 40 20 32 |........|."...@ 2|
|00004180| 33 2c 35 31 20 50 52 4f | 4d 50 54 20 22 34 2e c9 |3,51 PRO|MPT "4..|
|00004190| be b3 fd ca e4 c8 eb 22 | 0d 01 06 40 20 32 33 2c |......."|...@ 23,|
|000041a0| 36 35 20 50 52 4f 4d 50 | 54 20 22 35 2e b7 b5 20 |65 PROMP|T "5... |
|000041b0| 20 20 20 bb d8 22 0d 01 | 06 4d 45 4e 55 20 04 09 |   .."..|.MENU ..|
|000041c0| 20 6d 65 6e 75 63 68 6f | 69 63 65 0d 01 06 63 68 | menucho|ice...ch|
|000041d0| 6f 69 63 65 20 3d 20 03 | 14 28 22 41 41 43 45 44 |oice = .|.("AACED|
|000041e0| 52 22 2c 6d 65 6e 75 63 | 68 6f 69 63 65 2b 31 2c |R",menuc|hoice+1,|
|000041f0| 31 29 0d 01 06 04 06 20 | 03 65 0d 01 06 03 65 20 |1)..... |.e....e |
|00004200| 63 68 6f 69 63 65 20 3d | 20 22 44 22 0d 01 09 2a |choice =| "D"...*|
|00004210| 20 2d 2d 2d 54 6f 67 67 | 6c 65 20 49 73 44 65 6c | ---Togg|le IsDel|
|00004220| 65 74 65 64 20 66 6c 61 | 67 2e 0d 01 09 49 73 44 |eted fla|g....IsD|
|00004230| 65 6c 65 74 65 64 20 3d | 20 2e 04 1a 2e 20 49 73 |eleted =| .... Is|
|00004240| 44 65 6c 65 74 65 64 0d | 01 09 04 06 20 53 74 61 |Deleted.|.... Sta|
|00004250| 74 4c 69 6e 65 20 03 3f | 20 4c 61 73 74 52 65 63 |tLine .?| LastRec|
|00004260| 2b 72 65 63 6e 75 6d 4f | 46 53 2c 49 73 44 65 6c |+recnumO|FS,IsDel|
|00004270| 65 74 65 64 0d 01 06 03 | 65 20 63 68 6f 69 63 65 |eted....|e choice|
|00004280| 20 3d 20 22 45 22 0d 01 | 09 2a 20 2d 2d 2d 52 65 | = "E"..|.* ---Re|
|00004290| 2d 65 64 69 74 20 74 68 | 65 20 72 65 63 6f 72 64 |-edit th|e record|
|000042a0| 2e 0d 01 09 49 73 44 65 | 6c 65 74 65 64 20 3d 20 |....IsDe|leted = |
|000042b0| 2e 46 2e 0d 01 06 03 65 | 20 63 68 6f 69 63 65 20 |.F.....e| choice |
|000042c0| 24 20 22 41 43 52 22 0d | 01 09 2a 20 2d 2d 2d 46 |$ "ACR".|..* ---F|
|000042d0| 69 6e 69 73 68 65 64 2c | 20 41 64 64 2d 61 6e 6f |inished,| Add-ano|
|000042e0| 74 68 65 72 2c 20 6f 72 | 20 43 61 72 72 79 2d 61 |ther, or| Carry-a|
|000042f0| 64 64 2e 0d 01 09 49 73 | 43 61 72 72 79 20 3d 20 |dd....Is|Carry = |
|00004300| 28 63 68 6f 69 63 65 20 | 3d 20 22 43 22 29 0d 01 |(choice |= "C")..|
|00004310| 09 04 19 20 49 73 44 65 | 6c 65 74 65 64 0d 01 0c |... IsDe|leted...|
|00004320| 2a 20 2d 2d 2d 52 65 73 | 65 74 20 6f 66 66 73 65 |* ---Res|et offse|
|00004330| 74 20 73 6f 20 61 73 20 | 6e 6f 74 20 74 6f 20 69 |t so as |not to i|
|00004340| 6e 63 72 65 6d 65 6e 74 | 2e 0d 01 0c 72 65 63 6e |ncrement|....recn|
|00004350| 75 6d 4f 46 53 20 3d 20 | 72 65 63 6e 75 6d 4f 46 |umOFS = |recnumOF|
|00004360| 53 20 2d 20 31 0d 01 09 | 03 5b 0d 01 0c 2a 20 2d |S - 1...|.[...* -|
|00004370| 2d 2d 53 61 76 65 20 74 | 68 65 20 6d 65 6d 76 61 |--Save t|he memva|
|00004380| 72 20 76 61 6c 75 65 73 | 2e 0d 01 0c 03 9b 20 03 |r values|...... .|
|00004390| 97 0d 01 0c 04 06 20 19 | 01 08 0a 00 17 02 03 00 |...... .|........|
|000043a0| 52 0d 01 09 03 8b 0d 1b | 01 1c 8f 00 19 01 04 1f |R.......|........|
|000043b0| 00 1b 04 00 8f 00 17 03 | 02 00 1f 15 44 01 06 03 |........|....D...|
|000043c0| 65 20 63 68 6f 69 63 65 | 20 3d 20 22 4f 22 0d 01 |e choice| = "O"..|
|000043d0| 09 2a 20 2d 2d 2d 50 72 | 69 6e 74 20 6f 6e 65 20 |.* ---Pr|int one |
|000043e0| 6c 61 62 65 6c 2f 72 65 | 63 6f 72 64 2e 0d 1b 01 |label/re|cord....|
|000043f0| 1c 50 05 15 01 03 00 1b | 04 00 50 05 1b 01 14 dc |.P......|..P.....|
|00004400| 0f 1b 01 14 7b 05 01 09 | 63 68 6f 69 63 65 20 3d |....{...|choice =|
|00004410| 20 22 4f 22 0d 01 06 03 | 91 0d 01 06 2a 20 2d 2d | "O"....|....* --|
|00004420| 2d 43 6f 6e 64 69 74 69 | 6f 6e 20 74 6f 20 65 78 |-Conditi|on to ex|
|00004430| 69 74 20 69 6e 6e 65 72 | 20 6c 6f 6f 70 2e 0d 01 |it inner| loop...|
|00004440| 06 04 19 20 63 68 6f 69 | 63 65 20 24 20 22 41 43 |... choi|ce $ "AC|
|00004450| 45 52 22 0d 01 09 03 73 | 0d 01 06 03 8b 0d 01 03 |ER"....s|........|
|00004460| 03 0a 0d 01 03 2a 20 2d | 2d 2d 43 6f 6e 64 69 74 |.....* -|--Condit|
|00004470| 69 6f 6e 20 74 6f 20 65 | 78 69 74 20 6f 75 74 65 |ion to e|xit oute|
|00004480| 72 20 6c 6f 6f 70 2e 0d | 01 03 04 19 20 63 68 6f |r loop..|.... cho|
|00004490| 69 63 65 20 3d 20 22 52 | 22 0d 01 06 03 73 0d 01 |ice = "R|"....s..|
|000044a0| 03 03 8b 0d 03 0a 0d 4c | 61 73 74 52 65 63 20 3d |.......L|astRec =|
|000044b0| 20 4c 61 73 74 52 65 63 | 20 2b 20 72 65 63 6e 75 | LastRec| + recnu|
|000044c0| 6d 4f 46 53 0d 03 08 20 | 04 0f 0d 16 05 00 0d 0d |mOFS... |........|
|000044d0| 1e d3 44 1d 00 02 00 0d | 04 24 20 03 27 20 04 09 |..D.....|.$ .' ..|
|000044e0| 20 26 50 72 6f 6d 70 74 | 41 74 72 0d 04 06 20 03 | &Prompt|Atr... .|
|000044f0| 7b 20 2e 54 2e 0d 01 03 | 4f 70 74 5f 43 68 69 20 |{ .T....|Opt_Chi |
|00004500| 3d 20 31 0d 01 03 40 20 | 32 33 2c 30 20 03 48 0d |= 1...@ |23,0 .H.|
|00004510| 01 03 40 20 32 33 2c 33 | 30 20 04 20 20 22 d1 a1 |..@ 23,3|0 .  "..|
|00004520| 20 d4 f1 20 d0 de 20 b8 | c4 20 b7 bd 20 ca bd 20 | .. .. .|. .. .. |
|00004530| 3a 20 22 0d 01 03 40 20 | 32 34 2c 30 20 63 6c 65 |: "...@ |24,0 cle|
|00004540| 61 72 0d 01 03 40 20 32 | 34 2c 20 37 20 50 52 4f |ar...@ 2|4, 7 PRO|
|00004550| 4d 50 54 20 27 20 20 31 | 2e ca e4 c8 eb b7 bd ca |MPT '  1|........|
|00004560| bd 20 20 27 0d 01 03 40 | 20 32 34 2c 32 35 20 50 |.  '...@| 24,25 P|
|00004570| 52 4f 4d 50 54 20 27 20 | 20 32 2e c8 ab 20 c6 c1 |ROMPT ' | 2... ..|
|00004580| 20 c4 bb 20 20 27 0d 01 | 03 40 20 32 34 2c 34 33 | ..  '..|.@ 24,43|
|00004590| 20 50 52 4f 4d 50 54 20 | 27 20 20 33 2e b0 b4 20 | PROMPT |'  3... |
|000045a0| cc f5 20 bc fe 20 20 27 | 0d 01 03 40 20 32 34 2c |.. ..  '|...@ 24,|
|000045b0| 36 31 20 50 52 4f 4d 50 | 54 20 27 20 20 34 2e b7 |61 PROMP|T '  4..|
|000045c0| b5 20 20 20 20 bb d8 20 | 20 27 0d 01 03 4d 45 4e |.    .. | '...MEN|
|000045d0| 55 20 04 09 20 4f 70 74 | 5f 43 68 69 0d 01 03 04 |U .. Opt|_Chi....|
|000045e0| 06 20 03 65 0d 01 05 03 | 65 20 4f 70 74 5f 43 68 |. .e....|e Opt_Ch|
|000045f0| 69 20 3d 20 31 0d 01 08 | 04 06 20 19 01 08 0a 00 |i = 1...|.. .....|
|00004600| 17 02 03 00 42 0d 01 05 | 03 65 20 4f 70 74 5f 43 |....B...|.e Opt_C|
|00004610| 68 69 20 3d 20 32 0d 01 | 08 04 06 20 44 6f 42 52 |hi = 2..|... DoBR|
|00004620| 4f 57 0d 01 05 03 65 20 | 4f 70 74 5f 43 68 69 20 |OW....e |Opt_Chi |
|00004630| 3d 20 33 0d 01 08 04 06 | 20 19 01 08 0a 00 17 02 |= 3.....| .......|
|00004640| 03 00 43 0d 01 05 03 65 | 20 4f 70 74 5f 43 68 69 |..C....e| Opt_Chi|
|00004650| 20 3d 20 34 0d 01 08 03 | 73 0d 01 03 03 91 0d 03 | = 4....|s.......|
|00004660| 0a 0d 0d 16 05 00 0d 1e | 6a 46 1d 00 02 00 19 01 |........|jF......|
|00004670| 08 0a 00 15 02 05 00 4f | 2e 50 52 47 16 02 10 1a |.......O|.PRG....|
|00004680| 00 08 04 00 15 02 01 00 | 20 17 02 17 00 15 02 0a |........| .......|
|00004690| 00 50 52 4f 43 45 44 55 | 52 45 20 17 02 16 00 19 |.PROCEDU|RE .....|
|000046a0| 00 08 04 00 17 02 17 00 | 1b 01 14 65 16 1b 01 1c |........|...e....|
|000046b0| 7d 06 19 00 08 04 00 1a | 00 1c 04 00 1b 04 00 7d |}.......|.......}|
|000046c0| 06 19 01 08 0c 00 15 02 | 01 00 54 16 02 1e 19 01 |........|..T.....|
|000046d0| 08 0c 00 15 02 01 00 74 | 16 02 1e 16 03 19 1f 34 |.......t|.......4|
|000046e0| 47 19 01 08 0a 00 15 02 | 05 00 31 2e 50 52 47 16 |G.......|..1.PRG.|
|000046f0| 02 10 1a 00 08 04 00 15 | 02 01 00 20 17 02 17 00 |........|... ....|
|00004700| 15 02 0a 00 50 52 4f 43 | 45 44 55 52 45 20 17 02 |....PROC|EDURE ..|
|00004710| 16 00 19 00 08 04 00 17 | 02 17 00 1b 01 14 fd 3a |........|.......:|
|00004720| 1b 01 1c 7d 06 19 00 08 | 04 00 1a 00 1c 04 00 1b |...}....|........|
|00004730| 04 00 7d 06 19 01 08 0d | 00 15 02 01 00 54 16 02 |..}.....|.....T..|
|00004740| 1e 19 01 08 0d 00 15 02 | 01 00 74 16 02 1e 16 03 |........|..t.....|
|00004750| 19 1f a7 47 19 01 08 0a | 00 15 02 05 00 32 2e 50 |...G....|.....2.P|
|00004760| 52 47 16 02 10 1a 00 08 | 04 00 15 02 01 00 20 17 |RG......|...... .|
|00004770| 02 17 00 15 02 0a 00 50 | 52 4f 43 45 44 55 52 45 |.......P|ROCEDURE|
|00004780| 20 17 02 16 00 19 00 08 | 04 00 17 02 17 00 1b 01 | .......|........|
|00004790| 14 d3 44 1b 01 1c 7d 06 | 19 00 08 04 00 1a 00 1c |..D...}.|........|
|000047a0| 04 00 1b 04 00 7d 06 16 | 05 00 1e ad 47 1d 00 03 |.....}..|....G...|
|000047b0| 00 15 01 01 00 17 09 06 | 00 18 02 30 15 01 01 00 |........|...0....|
|000047c0| 15 01 01 00 16 02 62 1a | 01 08 0c 00 18 02 30 15 |......b.|......0.|
|000047d0| 01 02 00 15 01 01 00 16 | 02 62 1a 01 08 0d 00 15 |........|.b......|
|000047e0| 01 00 00 1a 01 04 15 00 | 15 02 01 00 6d 1a 01 08 |........|....m...|
|000047f0| 1c 00 18 01 18 15 01 01 | 00 16 01 1e 1a 01 0c 11 |........|........|
|00004800| 00 15 01 00 00 17 00 06 | 00 18 01 21 15 01 01 00 |........|...!....|
|00004810| 16 01 22 1a 01 0c 12 00 | 18 01 2d 15 01 01 00 16 |..".....|..-.....|
|00004820| 01 22 1a 01 0c 13 00 15 | 03 00 00 1a 01 0c 14 00 |."......|........|
|00004830| 15 01 01 00 1a 00 04 04 | 00 17 09 07 00 15 01 00 |........|........|
|00004840| 00 1a 00 04 05 00 15 01 | 0a 00 1a 00 04 06 00 15 |........|........|
|00004850| 01 01 00 1c 00 04 05 00 | 19 00 04 05 00 19 00 04 |........|........|
|00004860| 06 00 16 01 21 1f 9a 48 | 19 00 04 05 00 17 09 06 |....!..H|........|
|00004870| 00 17 09 08 00 1f 97 48 | 18 01 33 15 01 01 00 16 |.......H|..3.....|
|00004880| 01 22 1f 8e 48 15 03 01 | 00 1a 01 0c 14 00 15 01 |."..H...|........|
|00004890| 01 00 1c 00 04 04 00 1e | 4f 48 17 09 06 00 15 01 |........|OH......|
|000048a0| 02 00 1a 01 04 1f 00 19 | 01 08 09 00 17 02 13 00 |........|........|
|000048b0| 1a 01 08 05 00 1a 01 08 | 06 00 1a 01 08 07 00 19 |........|........|
|000048c0| 01 08 06 00 15 01 01 00 | 15 01 07 00 16 02 62 1a |........|......b.|
|000048d0| 01 08 0a 00 16 05 00 1d | 00 1c 00 18 02 1a 1a 00 |........|........|
|000048e0| 08 09 00 19 00 08 09 00 | 16 02 18 1f f8 48 1b 00 |........|.....H..|
|000048f0| 14 ad 47 1b 00 14 6a 46 | 16 05 00 14 00 00       |..G...jF|......  |
+--------+-------------------------+-------------------------+--------+--------+