/ Piper's Pit BBS/FTP: ibm 0010 - 0019 / ibm0010-0019 / ibm0010.tar / ibm0010 / ME494-3.ZIP / DBASE.MAC

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 22 aa 07 44 42 41 4d 54 | 43 48 00 00 00 00 00 00 |"..DBAMT|CH......|
|00000010| 00 00 00 80 00 00 00 26 | 04 07 05 00 00 aa 3d fe |.......&|......=.|
|00000020| 67 01 3d fe 67 02 3d fe | 67 03 3d fe 67 04 3d fe |g.=.g.=.|g.=.g.=.|
|00000030| 67 05 3d fe 67 06 3d fe | 67 07 3d 00 02 2c 03 2f |g.=.g.=.|g.=..,./|
|00000040| 07 04 3d 01 02 2f 39 10 | 04 15 74 01 28 5c 0c 57 |..=../9.|..t.(\.W|
|00000050| 00 79 32 00 5a 01 74 01 | 29 5a 04 79 3e 00 5a 02 |.y2.Z.t.|)Z.y>.Z.|
|00000060| 3d 01 07 01 74 05 28 7c | 29 7c 24 5a 06 0b 3e 03 |=...t.(||)|$Z..>.|
|00000070| 04 15 79 3e 00 5c 0c 86 | 00 79 3e 00 5a 01 79 32 |..y>.\..|.y>.Z.y2|
|00000080| 00 5a 04 79 32 00 5a 02 | 3d 00 07 01 59 01 74 01 |.Z.y2.Z.|=...Y.t.|
|00000090| 7c 5b 59 02 5b 74 02 7c | 25 5b 5a 06 0b 3e 03 3d ||[Y.[t.||%[Z..>.=|
|000000a0| 01 04 17 04 15 74 01 20 | 5c 0c 95 00 39 0e 79 8d |.....t. |\...9.y.|
|000000b0| 00 04 3b 4a 3d 01 3d 04 | 42 5a 05 59 05 74 04 45 |..;J=.=.|BZ.Y.t.E|
|000000c0| 4c 53 45 5c 59 05 74 02 | 49 46 5c 14 0c e4 00 79 |LSE\Y.t.|IF\....y|
|000000d0| ae 00 5a 01 74 05 45 4e | 44 49 46 5a 04 74 04 45 |..Z.t.EN|DIFZ.t.E|
|000000e0| 4e 44 49 5a 02 74 11 7b | 25 20 2a 49 46 7d 7c 7b |NDIZ.t.{|% *IF}|{|
|000000f0| 25 20 2a 45 4e 44 49 7d | 5a 06 0b 3a 03 59 05 79 |% *ENDI}|Z..:.Y.y|
|00000100| c5 00 5c 0c 04 01 79 c5 | 00 5a 01 79 ae 00 5a 04 |..\...y.|.Z.y..Z.|
|00000110| 79 ae 00 5a 02 79 cd 00 | 5a 06 0b 2f 03 59 05 74 |y..Z.y..|Z../.Y.t|
|00000120| 04 54 45 58 54 5c 0c 42 | 01 79 07 01 5a 01 74 07 |.TEXT\.B|.y..Z.t.|
|00000130| 45 4e 44 54 45 58 54 5a | 04 74 04 45 4e 44 54 5a |ENDTEXTZ|.t.ENDTZ|
|00000140| 02 74 13 7b 25 20 2a 54 | 45 58 54 7d 7c 7b 25 20 |.t.{% *T|EXT}|{% |
|00000150| 2a 45 4e 44 54 7d 5a 06 | 0b 3a 03 59 05 79 21 01 |*ENDT}Z.|.:.Y.y!.|
|00000160| 5c 0c 62 01 79 21 01 5a | 01 79 07 01 5a 04 79 07 |\.b.y!.Z|.y..Z.y.|
|00000170| 01 5a 02 79 29 01 5a 06 | 0b 2f 03 59 05 74 02 44 |.Z.y).Z.|./.Y.t.D|
|00000180| 4f 5c 0c 7b 01 39 0e 79 | 8d 00 04 3b 4a 3d 01 3d |O\.{.9.y|...;J=.=|
|00000190| 04 42 5a 05 59 05 74 04 | 57 48 49 4c 5c 59 05 74 |.BZ.Y.t.|WHIL\Y.t|
|000001a0| 04 45 58 49 54 5c 14 59 | 05 74 04 4c 4f 4f 50 5c |.EXIT\.Y|.t.LOOP\|
|000001b0| 14 0c d5 01 74 07 44 4f | 20 57 48 49 4c 5a 01 74 |....t.DO| WHILZ.t|
|000001c0| 05 45 4e 44 44 4f 5a 04 | 74 04 45 4e 44 44 5a 02 |.ENDDOZ.|t.ENDDZ.|
|000001d0| 74 17 7b 25 20 2a 44 4f | 20 2b 57 48 49 4c 7d 7c |t.{% *DO| +WHIL}||
|000001e0| 7b 25 20 2a 45 4e 44 44 | 7d 5a 06 0b 3a 03 59 05 |{% *ENDD|}Z..:.Y.|
|000001f0| 74 04 43 41 53 45 5c 59 | 05 74 04 4f 54 48 45 5c |t.CASE\Y|.t.OTHE\|
|00000200| 14 0c 27 02 74 07 44 4f | 20 43 41 53 45 5a 01 74 |..'.t.DO| CASEZ.t|
|00000210| 07 45 4e 44 43 41 53 45 | 5a 04 74 04 45 4e 44 43 |.ENDCASE|Z.t.ENDC|
|00000220| 5a 02 74 17 7b 25 20 2a | 44 4f 20 2b 43 41 53 45 |Z.t.{% *|DO +CASE|
|00000230| 7d 7c 7b 25 20 2a 45 4e | 44 43 7d 5a 06 0b 3a 03 |}|{% *EN|DC}Z..:.|
|00000240| 59 05 79 b0 01 5c 0c 4e | 02 79 b0 01 5a 01 74 08 |Y.y..\.N|.y..Z.t.|
|00000250| 44 4f 20 57 48 49 4c 45 | 5a 04 79 9c 01 5a 02 79 |DO WHILE|Z.y..Z.y|
|00000260| b8 01 5a 06 0b 2f 03 59 | 05 79 02 02 5c 0c 6e 02 |..Z../.Y|.y..\.n.|
|00000270| 79 02 02 5a 01 79 ec 01 | 5a 04 79 ec 01 5a 02 79 |y..Z.y..|Z.y..Z.y|
|00000280| 0a 02 5a 06 0b 2f 03 74 | 21 4c 6f 6f 6b 69 6e 67 |..Z../.t|!Looking|
|00000290| 20 66 6f 72 20 74 68 65 | 20 4e 65 78 74 20 43 6f | for the| Next Co|
|000002a0| 6e 74 72 6f 6c 20 57 6f | 72 64 cd 39 11 74 55 7b |ntrol Wo|rd.9.tU{|
|000002b0| 25 20 2a 49 46 7d 7c 7b | 25 20 2a 45 4e 44 49 7d |% *IF}|{|% *ENDI}|
|000002c0| 7c 7b 25 20 2a 44 4f 20 | 2b 57 48 49 4c 7d 7c 7b ||{% *DO |+WHIL}|{|
|000002d0| 25 20 2a 44 4f 20 2b 43 | 41 53 45 7d 7c 7b 25 20 |% *DO +C|ASE}|{% |
|000002e0| 2a 45 4e 44 44 7d 7c 7b | 25 20 2a 45 4e 44 43 7d |*ENDD}|{|% *ENDC}|
|000002f0| 7c 7b 25 20 2a 54 45 58 | 54 7d 7c 7b 25 20 2a 45 ||{% *TEX|T}|{% *E|
|00000300| 4e 44 54 7d 5a 06 59 06 | 3d 00 04 0f 07 05 06 05 |NDT}Z.Y.|=.......|
|00000310| 3d 01 12 0c 14 03 74 11 | 4e 65 78 74 20 43 6f 6e |=.....t.|Next Con|
|00000320| 74 72 6f 6c 20 57 6f 72 | 64 cd 0b 2c 03 74 15 6e |trol Wor|d..,.t.n|
|00000330| 6f 20 63 6f 6e 74 72 6f | 6c 20 77 6f 72 64 20 66 |o contro|l word f|
|00000340| 6f 75 6e 64 cd 0b 1a 04 | 3d 00 07 01 3d 01 04 17 |ound....|=...=...|
|00000350| 0b 3e 03 3d 01 07 01 3d | 01 04 4f 3d 01 02 2f 3d |.>.=...=|..O=../=|
|00000360| 01 07 02 3d 01 07 05 74 | 21 4d 61 74 63 68 69 6e |...=...t|!Matchin|
|00000370| 67 2e 2e 2e 20 20 50 72 | 65 73 73 20 3c 45 53 43 |g...  Pr|ess <ESC|
|00000380| 3e 20 74 6f 20 53 74 6f | 70 2e cd d2 e9 0c 95 03 |> to Sto|p.......|
|00000390| 03 31 3d 1b 12 0c 95 03 | 39 11 74 0e 4d 61 74 63 |.1=.....|9.t.Matc|
|000003a0| 68 20 41 62 6f 72 74 65 | 64 2e cd 0b 1a 04 06 02 |h Aborte|d.......|
|000003b0| 3d 00 12 0c a0 03 0b 0c | 04 06 01 3d 01 12 0c b5 |=.......|...=....|
|000003c0| 03 39 02 59 06 3d 00 04 | 0f 07 05 0b bf 03 39 01 |.9.Y.=..|......9.|
|000003d0| 59 06 3d 00 04 10 07 05 | 06 05 3d 00 12 0c ca 03 |Y.=.....|..=.....|
|000003e0| 0b f4 03 04 2c 4a 57 5a | 07 59 07 59 01 5c 0c e2 |....,JWZ|.Y.Y.\..|
|000003f0| 03 06 02 3d 01 15 07 02 | 0b f1 03 59 07 59 02 5c |...=....|...Y.Y.\|
|00000400| 0c f1 03 06 02 3d 01 16 | 07 02 0b 73 03 39 11 74 |.....=..|...s.9.t|
|00000410| 0d 44 69 64 20 4e 6f 74 | 20 46 69 6e 64 20 59 04 |.Did Not| Find Y.|
|00000420| 5b cd 0b 1a 04 04 29 74 | 06 46 6f 75 6e 64 20 59 |[.....)t|.Found Y|
|00000430| 04 5b cd 06 04 02 2f 3d | 01 02 2c 39 3f 08 00 22 |.[..../=|..,9?.."|
|00000440| aa 07 44 42 41 5f 49 4e | 44 00 00 00 00 00 00 00 |..DBA_IN|D.......|
|00000450| 00 00 00 00 00 00 db 02 | 03 05 00 01 aa 3d fe 67 |........|.....=.g|
|00000460| 01 3d fe 67 02 3d fe 67 | 03 39 10 3d 01 04 4f 3d |.=.g.=.g|.9.=..O=|
|00000470| 00 02 2c 39 01 74 11 40 | 7b 7c 40 7d 7c 7b 28 40 |..,9.t.@|{|@}|{(@|
|00000480| 2a 7d 7c 7b 40 2a 29 7d | 3d 14 04 10 0c 66 00 04 |*}|{@*)}|=....f..|
|00000490| 15 74 01 7b 5c 04 15 74 | 01 28 5c 14 0c 66 00 04 |.t.{\..t|.(\..f..|
|000004a0| 15 79 3a 00 5c 0c 55 00 | 39 02 0b 59 00 39 02 39 |.y:.\.U.|9..Y.9.9|
|000004b0| 02 04 58 39 11 3d 01 02 | 2c 39 3a 0b d9 02 39 11 |..X9.=..|,9:...9.|
|000004c0| 39 10 09 62 02 04 15 5f | 01 39 11 3d 01 02 2c 04 |9..b..._|.9.=..,.|
|000004d0| 32 07 02 39 13 04 32 07 | 01 06 02 06 01 0e 0c 91 |2..9..2.|........|
|000004e0| 00 06 02 07 01 06 01 04 | 17 04 15 74 01 00 5d 0c |........|...t..].|
|000004f0| 9c 00 04 58 04 32 07 01 | 74 01 20 74 05 3b 20 28 |...X.2..|t. t.; (|
|00000500| 2c 7b 04 3b 4a 57 5b 79 | a1 00 5b 5a 01 59 01 74 |,{.;JW[y|..[Z.Y.t|
|00000510| 32 20 50 52 4f 43 45 44 | 55 52 45 20 46 55 4e 43 |2 PROCED|URE FUNC|
|00000520| 54 49 4f 4e 20 44 4f 20 | 43 41 53 45 20 4e 45 58 |TION DO |CASE NEX|
|00000530| 54 20 4f 54 48 45 52 57 | 49 53 45 20 49 46 20 46 |T OTHERW|ISE IF F|
|00000540| 4f 52 20 3d 01 43 74 04 | 20 45 4e 44 59 01 3d 01 |OR =.Ct.| ENDY.=.|
|00000550| 43 13 74 05 20 45 4c 53 | 45 59 01 3d 01 43 13 0c |C.t. ELS|EY.=.C..|
|00000560| 0d 01 0b d9 02 39 02 79 | a1 00 79 a4 00 04 3b 4a |.....9.y|..y...;J|
|00000570| 57 5b 79 a1 00 5b 5a 02 | 06 02 04 17 39 3a 79 ef |W[y..[Z.|....9:y.|
|00000580| 00 59 01 3d 01 43 3d 00 | 11 79 fb 00 59 01 3d 01 |.Y.=.C=.|.y..Y.=.|
|00000590| 43 3d 00 11 14 59 01 74 | 10 20 4e 45 58 54 20 4f |C=...Y.t|. NEXT O|
|000005a0| 54 48 45 52 57 49 53 45 | 20 3d 01 43 3d 00 11 14 |THERWISE| =.C=...|
|000005b0| 0c 75 01 09 3e 02 59 01 | 74 09 20 45 4e 44 43 41 |.u..>.Y.|t. ENDCA|
|000005c0| 53 45 20 5c 0c 72 01 09 | 3e 02 0b c4 01 59 01 74 |SE \.r..|>....Y.t|
|000005d0| 06 20 43 41 53 45 20 5c | 0c c4 01 39 10 39 03 39 |. CASE \|...9.9.9|
|000005e0| 03 39 13 79 a1 00 79 a4 | 00 04 3b 4a 57 5b 79 a1 |.9.y..y.|..;JW[y.|
|000005f0| 00 5b 5a 03 39 02 59 03 | 79 a4 00 04 3b 4a 57 5b |.[Z.9.Y.|y...;JW[|
|00000600| 79 a1 00 5b 5a 03 39 11 | 59 03 74 09 20 44 4f 20 |y..[Z.9.|Y.t. DO |
|00000610| 43 41 53 45 20 5d 0c c4 | 01 09 3e 02 59 01 74 04 |CASE ]..|..>.Y.t.|
|00000620| 20 44 4f 20 5c 59 02 74 | 0c 20 43 41 53 45 20 57 | DO \Y.t|. CASE W|
|00000630| 48 49 4c 45 20 3d 01 43 | 3d 00 11 13 0c e9 01 39 |HILE =.C|=......9|
|00000640| 16 06 01 06 02 11 59 01 | 4c 3d 00 11 13 59 01 74 |......Y.|L=...Y.t|
|00000650| 2a 20 50 52 4f 43 45 44 | 55 52 45 20 46 55 4e 43 |* PROCED|URE FUNC|
|00000660| 54 49 4f 4e 20 46 4f 52 | 20 43 41 53 45 20 4f 54 |TION FOR| CASE OT|
|00000670| 48 45 52 57 49 53 45 20 | 49 46 20 3d 01 43 3d 00 |HERWISE |IF =.C=.|
|00000680| 11 79 fb 00 59 01 3d 01 | 43 3d 00 11 14 13 0c 3b |.y..Y.=.|C=.....;|
|00000690| 02 39 16 0b d9 02 39 17 | 04 32 07 01 39 03 39 10 |.9....9.|.2..9.9.|
|000006a0| 39 13 04 32 06 01 16 07 | 01 39 11 06 01 3d 00 0d |9..2....|.9...=..|
|000006b0| 0c 5f 02 06 01 04 0e 39 | 04 0a 74 04 5b 7e 20 5d |._.....9|..t.[~ ]|
|000006c0| 3d 01 04 10 0c be 02 04 | 15 74 01 29 5c 0c 9f 02 |=.......|.t.)\...|
|000006d0| 39 01 04 15 74 01 2a 5c | 0c 93 02 74 03 28 40 2a |9...t.*\|...t.(@*|
|000006e0| 3d 00 04 10 07 05 39 01 | 0b 62 02 39 02 3d 01 07 |=.....9.|.b.9.=..|
|000006f0| 03 0b d4 02 0b b7 02 04 | 15 74 01 7d 5c 0c b7 02 |........|.t.}\...|
|00000700| 74 02 40 7b 3d 00 04 10 | 07 05 39 01 0b 62 02 3d |t.@{=...|..9..b.=|
|00000710| 01 07 03 0b d4 02 04 31 | 3d 01 12 0c cd 02 3d 00 |.......1|=.....=.|
|00000720| 07 03 0b d4 02 39 03 39 | 06 0b 62 02 3d 01 02 2c |.....9.9|..b.=..,|
|00000730| 0a 08 00 22 aa 07 44 42 | 41 54 45 4d 50 00 00 00 |..."..DB|ATEMP...|
|00000740| 00 00 00 00 00 00 80 00 | 00 00 8d 07 02 06 00 01 |........|........|
|00000750| aa 3d fe 67 01 3d fe 67 | 02 2e 07 03 3d 01 33 04 |.=.g.=.g|....=.3.|
|00000760| 32 07 01 39 13 04 15 4a | 5f 01 74 01 20 04 3b 4a |2..9...J|_.t. .;J|
|00000770| 5a 02 39 13 04 58 04 32 | 07 04 59 02 74 05 48 45 |Z.9..X.2|..Y.t.HE|
|00000780| 41 44 46 5c 0c 3e 00 0b | 93 06 59 02 74 05 48 45 |ADF\.>..|..Y.t.HE|
|00000790| 41 44 50 5c 0c 4e 00 0b | fb 06 04 15 74 01 66 5c |ADP\.N..|....t.f\|
|000007a0| 0c 5a 00 0b 59 02 04 15 | 74 01 63 5c 0c 66 00 0b |.Z..Y...|t.c\.f..|
|000007b0| 7a 02 5e 01 74 01 2a 5c | 0c 99 00 39 18 74 1f 2a |z.^.t.*\|...9.t.*|
|000007c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000007d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 04 0b |********|******..|
|000007e0| 39 3a 0b 88 07 5e 01 74 | 01 49 5c 0c a5 00 0b 8b |9:...^.t|.I\.....|
|000007f0| 01 5e 01 74 01 44 5c 0c | b1 00 0b d2 01 5e 01 74 |.^.t.D\.|.....^.t|
|00000800| 01 55 5c 0c bd 00 0b 8a | 02 5e 01 74 01 50 5c 0c |.U\.....|.^.t.P\.|
|00000810| f9 00 59 02 74 02 50 41 | 5c 0c d6 00 0b b6 02 0b |..Y.t.PA|\.......|
|00000820| f9 00 59 02 74 02 50 52 | 5c 0c e6 00 0b d1 02 0b |..Y.t.PR|\.......|
|00000830| f9 00 59 02 74 02 50 55 | 5c 0c f6 00 0b e9 02 0b |..Y.t.PU|\.......|
|00000840| f9 00 0b 00 03 5e 01 74 | 01 46 5c 0c 05 01 0b 3d |.....^.t|.F\....=|
|00000850| 03 5e 01 74 01 43 5c 0c | 11 01 0b 7d 03 5e 01 74 |.^.t.C\.|...}.^.t|
|00000860| 01 40 5c 0c 1d 01 0b 8d | 03 5e 01 74 01 4b 5c 0c |.@\.....|.^.t.K\.|
|00000870| 29 01 0b e8 04 59 02 74 | 04 4e 4f 52 4d 5c 0c 38 |)....Y.t|.NORM\.8|
|00000880| 01 0b 1f 05 5e 01 74 01 | 52 5c 0c 55 01 59 02 74 |....^.t.|R\.U.Y.t|
|00000890| 03 52 45 56 5c 0c 52 01 | 0b 01 05 0b 55 01 0b 3c |.REV\.R.|....U..<|
|000008a0| 05 5e 01 74 01 53 5c 0c | 84 01 59 02 4c 3d 01 0d |.^.t.S\.|..Y.L=..|
|000008b0| 0c 81 01 79 58 01 59 02 | 3d 02 43 3d 00 11 0c 7b |...yX.Y.|=.C=...{|
|000008c0| 01 0b 72 05 0b 7e 01 0b | a3 05 0b 84 01 0b 7c 06 |..r..~..|......|.|
|000008d0| 06 01 04 17 0b 88 07 59 | 02 4c 04 0e 74 03 49 66 |.......Y|.L..t.If|
|000008e0| 20 04 0b 39 06 39 3a 39 | 3a 74 05 45 6e 64 49 46 | ..9.9:9|:t.EndIF|
|000008f0| 04 0b 39 03 06 04 04 17 | 59 02 74 02 49 45 5c 0c |..9.....|Y.t.IE\.|
|00000900| cd 01 39 3a 74 05 45 6c | 73 65 20 04 0b 39 06 39 |..9:t.El|se ..9.9|
|00000910| 3a 06 04 04 17 39 03 39 | 03 39 16 0b 88 07 59 02 |:....9.9|.9....Y.|
|00000920| 4c 04 0e 74 03 44 4f 20 | 04 0b 59 02 74 02 44 57 |L..t.DO |..Y.t.DW|
|00000930| 5c 0c f7 01 74 06 57 68 | 69 6c 65 20 04 0b 39 06 |\...t.Wh|ile ..9.|
|00000940| 0b 41 02 59 02 74 02 44 | 43 5c 0c 41 02 74 04 43 |.A.Y.t.D|C\.A.t.C|
|00000950| 61 73 65 04 0b 39 3a 39 | 3a 39 16 74 09 4f 54 48 |ase..9:9|:9.t.OTH|
|00000960| 45 52 57 49 53 45 04 0b | 39 3a 39 17 74 07 45 6e |ERWISE..|9:9.t.En|
|00000970| 64 43 41 53 45 04 0b 06 | 04 04 17 39 03 39 03 39 |dCASE...|...9.9.9|
|00000980| 16 74 05 43 41 53 45 20 | 04 0b 0b 88 07 39 3a 39 |.t.CASE |.....9:9|
|00000990| 3a 74 05 45 6e 64 44 4f | 04 0b 39 03 06 04 04 17 |:t.EndDO|..9.....|
|000009a0| 39 16 0b 88 07 39 18 74 | 04 46 6f 72 20 04 0b 39 |9....9.t|.For ..9|
|000009b0| 3a 39 3a 74 04 4e 65 78 | 74 04 0b 06 04 04 17 39 |:9:t.Nex|t......9|
|000009c0| 03 39 16 0b 88 07 39 18 | 74 05 43 4c 45 41 52 04 |.9....9.|t.CLEAR.|
|000009d0| 0b 39 3a 0b 88 07 59 02 | 4c 04 0e 74 04 55 53 45 |.9:...Y.|L..t.USE|
|000009e0| 20 04 0b 39 06 59 02 74 | 02 55 49 5c 0c b1 02 74 | ..9.Y.t|.UI\...t|
|000009f0| 07 20 49 4e 44 45 58 20 | 04 0b 0b b3 02 39 3a 0b |. INDEX |.....9:.|
|00000a00| 88 07 59 02 4c 04 0e 74 | 0b 50 41 52 41 4d 45 54 |..Y.L..t|.PARAMET|
|00000a10| 45 52 53 20 04 0b 39 06 | 39 3a 0b 88 07 59 02 4c |ERS ..9.|9:...Y.L|
|00000a20| 04 0e 74 08 50 52 49 56 | 41 54 45 20 04 0b 39 06 |..t.PRIV|ATE ..9.|
|00000a30| 39 3a 0b 88 07 59 02 4c | 04 0e 74 07 50 55 42 4c |9:...Y.L|..t.PUBL|
|00000a40| 49 43 20 04 0b 39 06 39 | 3a 0b 88 07 59 02 4c 04 |IC ..9.9|:...Y.L.|
|00000a50| 0e 74 0a 50 52 4f 43 45 | 44 55 52 45 20 04 0b 39 |.t.PROCE|DURE ..9|
|00000a60| 06 39 3a 39 3a 74 06 52 | 45 54 55 52 4e 04 0b 06 |.9:9:t.R|ETURN...|
|00000a70| 04 04 17 39 03 39 16 59 | 02 74 02 50 50 5c 0c 3a |...9.9.Y|.t.PP\.:|
|00000a80| 03 79 bc 02 04 0b 0b 88 | 07 59 02 4c 04 0e 74 09 |.y......|.Y.L..t.|
|00000a90| 46 55 4e 43 54 49 4f 4e | 20 04 0b 39 06 39 3a 39 |FUNCTION| ..9.9:9|
|00000aa0| 3a 74 0a 52 45 54 55 52 | 4e 20 2e 54 2e 04 0b 06 |:t.RETUR|N .T....|
|00000ab0| 04 04 17 39 03 39 16 59 | 02 74 02 46 50 5c 0c 7a |...9.9.Y|.t.FP\.z|
|00000ac0| 03 79 bc 02 04 0b 0b 88 | 07 39 18 79 36 02 04 0b |.y......|.9.y6...|
|00000ad0| 39 06 39 3a 39 16 0b 88 | 07 59 02 4c 04 0e 3d 00 |9.9:9...|.Y.L..=.|
|00000ae0| 07 01 79 3b 01 59 02 3d | 02 43 3d 00 11 0c b5 03 |..y;.Y.=|.C=.....|
|00000af0| 74 0a 40 20 52 6f 77 28 | 29 2b 31 2c 04 0b 0b c3 |t.@ Row(|)+1,....|
|00000b00| 03 74 03 40 20 2c 04 0b | 04 32 3d 01 16 07 01 79 |.t.@ ,..|.2=....y|
|00000b10| 08 01 59 02 3d 02 43 3d | 00 11 0c db 03 09 61 04 |..Y.=.C=|......a.|
|00000b20| 59 01 04 0b 0b e8 03 74 | 02 20 20 04 0b 04 32 3d |Y......t|.  ...2=|
|00000b30| 01 16 07 01 79 58 01 59 | 02 3d 02 43 3d 00 11 0c |....yX.Y|.=.C=...|
|00000b40| 0a 04 74 04 53 41 59 20 | 04 0b 06 01 3d 00 12 0c |..t.SAY |....=...|
|00000b50| 0a 04 04 32 07 01 74 01 | 47 59 02 3d 02 43 3d 00 |...2..t.|GY.=.C=.|
|00000b60| 11 0c 2e 04 79 58 01 59 | 02 3d 02 43 0c 25 04 39 |....yX.Y|.=.C.%.9|
|00000b70| 06 74 05 20 47 45 54 20 | 04 0b 79 c0 00 59 02 3d |.t. GET |..y..Y.=|
|00000b80| 02 43 3d 00 11 0c 55 04 | 79 58 01 59 02 3d 02 43 |.C=...U.|yX.Y.=.C|
|00000b90| 0c 49 04 39 06 74 08 20 | 50 52 4f 4d 50 54 20 04 |.I.9.t. |PROMPT .|
|00000ba0| 0b 06 01 0c 5e 04 06 01 | 04 17 0b 88 07 39 10 39 |....^...|.....9.9|
|00000bb0| 03 3d 01 04 17 74 0a 7b | 2c 7d 7b 20 2a 7d 7b 28 |.=...t.{|,}{ *}{(|
|00000bc0| 7d 3d 01 04 0f 3d 00 12 | 0c 87 04 79 1f 00 5a 01 |}=...=..|...y..Z.|
|00000bd0| 0b e5 04 39 02 04 32 07 | 05 3d 00 07 06 74 04 5b |...9..2.|.=...t.[|
|00000be0| 28 29 5d 3d 01 04 0f 3d | 00 11 0c c9 04 04 15 74 |()]=...=|.......t|
|00000bf0| 01 29 5c 0c b4 04 06 06 | 3d 01 16 07 06 0b c4 04 |.)\.....|=.......|
|00000c00| 04 15 74 01 28 5c 0c c4 | 04 06 06 3d 01 15 07 06 |..t.(\..|...=....|
|00000c10| 39 02 0b 91 04 06 06 3d | 00 12 0c e0 04 04 0d 06 |9......=|........|
|00000c20| 05 04 32 06 05 16 42 5a | 01 0b e5 04 79 1f 00 5a |..2...BZ|....y..Z|
|00000c30| 01 39 11 0a 59 02 4c 04 | 0e 74 09 4b 45 59 42 4f |.9..Y.L.|.t.KEYBO|
|00000c40| 41 52 44 20 04 0b 39 06 | 39 3a 0b 88 07 59 02 4c |ARD ..9.|9:...Y.L|
|00000c50| 04 0e 74 10 53 45 54 20 | 43 4f 4c 4f 52 20 54 4f |..t.SET |COLOR TO|
|00000c60| 20 4e 2f 57 04 0b 39 3a | 0b 88 07 59 02 4c 04 0e | N/W..9:|...Y.L..|
|00000c70| 74 0d 53 45 54 20 43 4f | 4c 4f 52 20 54 4f 20 04 |t.SET CO|LOR TO .|
|00000c80| 0b 39 06 39 3a 0b 88 07 | 59 02 4c 04 0e 74 0f 52 |.9.9:...|Y.L..t.R|
|00000c90| 45 53 54 4f 52 45 20 53 | 43 52 45 45 4e 20 04 0b |ESTORE S|CREEN ..|
|00000ca0| 79 fc 00 59 02 3d 03 43 | 3d 00 11 0c 6b 05 74 05 |y..Y.=.C|=...k.t.|
|00000cb0| 46 52 4f 4d 20 04 0b 39 | 06 39 3a 0b 88 07 59 02 |FROM ..9|.9:...Y.|
|00000cc0| 4c 04 0e 74 0c 53 41 56 | 45 20 53 43 52 45 45 4e |L..t.SAV|E SCREEN|
|00000cd0| 20 04 0b 74 01 54 59 02 | 3d 03 43 3d 00 11 0c 9c | ..t.TY.|=.C=....|
|00000ce0| 05 74 03 54 4f 20 04 0b | 39 06 39 3a 0b 88 07 59 |.t.TO ..|9.9:...Y|
|00000cf0| 02 4c 04 0e 74 03 53 45 | 54 04 0b 74 01 45 59 02 |.L..t.SE|T..t.EY.|
|00000d00| 3d 02 43 3d 00 11 0c cb | 05 74 07 20 45 53 43 41 |=.C=....|.t. ESCA|
|00000d10| 50 45 04 0b 0b 57 06 79 | 08 01 59 02 3d 02 43 3d |PE...W.y|..Y.=.C=|
|00000d20| 00 11 0c e7 05 74 07 20 | 43 55 52 53 4f 52 04 0b |.....t. |CURSOR..|
|00000d30| 0b 57 06 79 20 01 59 02 | 3d 02 43 3d 00 11 0c 1b |.W.y .Y.|=.C=....|
|00000d40| 06 74 05 20 4b 45 59 20 | 04 0b 39 06 79 88 05 59 |.t. KEY |..9.y..Y|
|00000d50| 02 3d 02 43 3d 00 11 0c | 15 06 74 03 20 54 4f 04 |.=.C=...|..t. TO.|
|00000d60| 0b 0b 88 07 0b 57 06 74 | 01 57 59 02 3d 02 43 3d |.....W.t|.WY.=.C=|
|00000d70| 00 11 0c 36 06 74 06 20 | 57 52 41 50 20 04 0b 0b |...6.t. |WRAP ...|
|00000d80| 57 06 74 01 4d 59 02 3d | 02 43 3d 00 11 0c 57 06 |W.t.MY.=|.C=...W.|
|00000d90| 74 0c 20 4d 45 53 53 41 | 47 45 20 54 4f 20 04 0b |t. MESSA|GE TO ..|
|00000da0| 0b 88 07 74 01 4f 59 02 | 3d 02 43 3d 00 11 0c 6f |...t.OY.|=.C=...o|
|00000db0| 06 74 03 20 4f 4e 04 0b | 0b 77 06 74 04 20 4f 46 |.t. ON..|.w.t. OF|
|00000dc0| 46 04 0b 39 3a 0b 88 07 | 59 02 4c 04 0e 74 07 53 |F..9:...|Y.L..t.S|
|00000dd0| 45 4c 45 43 54 20 04 0b | 39 06 39 3a 0b 88 07 59 |ELECT ..|9.9:...Y|
|00000de0| 02 4c 04 0e 79 72 00 04 | 0b 39 3a 74 0a 2a 46 75 |.L..yr..|.9:t.*Fu|
|00000df0| 6e 63 74 69 6f 6e 3a 04 | 0b 39 3a 74 07 2a 4e 6f |nction:.|.9:t.*No|
|00000e00| 74 65 73 3a 04 0b 39 3a | 79 69 00 04 0b 39 3a 39 |tes:..9:|yi...9:9|
|00000e10| 3a 74 1f 2a 2a 2a 20 45 | 6e 64 20 6f 66 20 20 20 |:t.*** E|nd of   |
|00000e20| 20 20 20 20 20 20 20 2a | 2a 2a 2a 2a 2a 2a 2a 2a |       *|********|
|00000e30| 2a 2a 04 0b 39 3a 39 03 | 39 03 39 03 39 03 39 03 |**..9:9.|9.9.9.9.|
|00000e40| 39 06 39 02 0b 88 07 59 | 02 4c 04 0e 79 72 00 04 |9.9....Y|.L..yr..|
|00000e50| 0b 39 3a 74 06 2a 46 69 | 6c 65 3a 04 0b 39 3a 74 |.9:t.*Fi|le:..9:t|
|00000e60| 08 2a 41 75 74 68 6f 72 | 3a 04 0b 39 3a 74 06 2a |.*Author|:..9:t.*|
|00000e70| 44 61 74 65 3a 04 0b 39 | 3a 74 09 2a 56 65 72 73 |Date:..9|:t.*Vers|
|00000e80| 69 6f 6e 3a 04 0b 39 3a | 79 b0 06 04 0b 39 3a 79 |ion:..9:|y....9:y|
|00000e90| 69 00 04 0b 39 3a 39 3a | 74 1f 2a 2a 2a 20 45 6e |i...9:9:|t.*** En|
|00000ea0| 64 20 6f 66 20 20 20 20 | 20 20 20 20 20 2e 50 52 |d of    |     .PR|
|00000eb0| 47 20 2a 2a 2a 2a 2a 2a | 2a 04 0b 39 3a 39 03 39 |G ******|*..9:9.9|
|00000ec0| 03 39 03 39 03 39 03 39 | 03 39 03 39 03 39 06 39 |.9.9.9.9|.9.9.9.9|
|00000ed0| 02 0b 88 07 06 03 33 08 | 00                      |......3.|.       |
+--------+-------------------------+-------------------------+--------+--------+