CONTEST LOGGER
FILE INFORMATION
FILENAME(S): CONTEST LOGGER
FILE TYPE(S): DEL
FILE SIZE: 16K
FIRST SEEN: 2025-11-30 19:36:45
APPEARS ON: 1 disk(s)
FILE HASH
89e59681a14a761b5025b437dca23aeea8fc6ace67cd8b43fce761b41a48b06f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| JBR C64 RADIO MM | CONTEST LOGGER | DEL | Curtcool, Bo | 22 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 08 2C 08 0A 00 8F 20 47 45 4E 45 52 41 4C 20 |..,.... GENERAL |
00000010: 50 55 52 50 4F 53 45 20 43 4F 4E 54 45 53 54 20 |PURPOSE CONTEST |
00000020: 4C 4F 47 47 45 52 20 28 43 36 34 29 00 62 08 0F |LOGGER (C64).b..|
00000030: 00 8F 20 44 45 53 49 47 4E 45 44 20 46 4F 52 20 |.. DESIGNED FOR |
00000040: 44 58 2F 56 48 46 20 43 4F 4E 54 45 53 54 53 2C |DX/VHF CONTESTS,|
00000050: 20 51 53 4F 20 50 41 52 54 49 45 53 2C 20 45 54 | QSO PARTIES, ET|
00000060: 43 2E 00 79 08 14 00 8F 20 42 59 20 4B 43 36 41 |C..y.... BY KC6A|
00000070: 20 41 4E 44 20 4E 36 4E 42 00 A6 08 1E 00 8F 20 | AND N6NB...... |
00000080: 43 4F 50 59 52 49 47 48 54 20 31 39 38 33 20 42 |COPYRIGHT 1983 B|
00000090: 59 20 48 41 59 44 45 4E 20 42 4F 4F 4B 20 43 4F |Y HAYDEN BOOK CO|
000000A0: 2E 2C 49 4E 43 2E 00 C6 08 23 00 9F 31 33 2C 34 |.,INC....#..13,4|
000000B0: 3A 8F 20 56 49 43 20 50 52 49 4E 54 45 52 20 43 |:. VIC PRINTER C|
000000C0: 48 41 4E 4E 45 4C 00 D3 08 24 00 9F 31 35 2C 38 |HANNEL...$..15,8|
000000D0: 2C 31 35 00 F6 08 28 00 42 4C 24 B2 C7 28 37 29 |,15...(.BL$..(7)|
000000E0: 3A 8F 20 42 45 4C 4C 20 28 44 4F 4E 27 54 20 44 |:. BELL (DON'T D|
000000F0: 45 4C 45 54 45 29 00 1C 09 32 00 43 37 24 B2 C7 |ELETE)...2.C7$..|
00000100: 28 31 34 37 29 3A 8F 20 43 4C 45 41 52 20 53 43 |(147):. CLEAR SC|
00000110: 52 45 45 4E 20 43 4F 4D 4D 41 4E 44 00 35 09 34 |REEN COMMAND.5.4|
00000120: 00 48 49 24 B2 C7 28 31 38 29 3A 4C 4F 24 B2 C7 |.HI$..(18):LO$..|
00000130: 28 31 34 36 29 00 76 09 36 00 8F 20 50 55 54 20 |(146).v.6.. PUT |
00000140: 59 4F 55 52 20 48 49 47 48 4C 49 47 48 54 49 4E |YOUR HIGHLIGHTIN|
00000150: 47 20 41 4E 44 20 4E 4F 52 4D 41 4C 20 56 49 44 |G AND NORMAL VID|
00000160: 45 4F 20 43 4F 4D 4D 41 4E 44 53 20 49 4E 20 4C |EO COMMANDS IN L|
00000170: 49 4E 45 20 35 32 00 8A 09 3C 00 81 20 4A B2 31 |INE 52...<.. J.1|
00000180: 20 A4 20 35 3A 99 3A 82 20 4A 00 C1 09 46 00 46 | . 5:.:. J...F.F|
00000190: 41 24 B2 22 30 3A 44 55 50 45 4C 4F 47 41 22 3A |A$."0:DUPELOGA":|
000001A0: 46 42 24 B2 22 30 3A 44 55 50 45 4C 4F 47 42 22 |FB$."0:DUPELOGB"|
000001B0: 3A 46 43 24 B2 22 30 3A 43 4F 4E 54 53 54 4C 47 |:FC$."0:CONTSTLG|
000001C0: 22 00 EF 09 50 00 45 54 B2 30 3A 5A 41 B2 30 3A |"...P.ET.0:ZA.0:|
000001D0: 41 41 B2 C6 28 22 41 22 29 AB 31 3A 41 30 B2 C6 |AA..("A").1:A0..|
000001E0: 28 22 41 22 29 AB C6 28 22 30 22 29 AA 32 36 00 |("A")..("0").26.|
000001F0: 22 0A 5A 00 54 31 24 B2 22 42 41 4E 44 20 20 20 |".Z.T1$."BAND |
00000200: 20 20 20 51 53 4F 27 53 20 58 20 51 2D 50 54 53 | QSO'S X Q-PTS|
00000210: 20 3D 20 50 4F 49 4E 54 53 20 20 4D 27 50 4C 52 | = POINTS M'PLR|
00000220: 53 22 00 54 0A 64 00 54 32 24 B2 22 2D 2D 2D 2D |S".T.d.T2$."----|
00000230: 20 20 20 20 20 20 2D 2D 2D 2D 2D 20 20 20 20 20 | ----- |
00000240: 20 20 20 20 20 20 2D 2D 2D 2D 2D 2D 20 20 20 20 | ------ |
00000250: 2D 2D 2D 22 00 78 0A 69 00 86 20 59 24 28 32 30 |---".x.i.. Y$(20|
00000260: 29 2C 55 31 24 28 31 35 29 2C 55 32 24 28 31 35 |),U1$(15),U2$(15|
00000270: 29 2C 55 33 28 31 35 29 00 83 0A 6E 00 8D 20 32 |),U3(15)...n.. 2|
00000280: 33 31 30 00 B5 0A 73 00 99 3A 99 20 22 44 4F 20 |310...s..:. "DO |
00000290: 59 4F 55 20 57 41 4E 54 20 54 4F 20 55 53 45 20 |YOU WANT TO USE |
000002A0: 54 48 45 20 27 4A 49 46 46 59 20 43 4C 4F 43 4B |THE 'JIFFY CLOCK|
000002B0: 27 20 54 4F 22 00 D5 0A 74 00 85 20 22 4C 4F 47 |' TO"...t.. "LOG|
000002C0: 20 54 48 45 20 54 49 4D 45 20 28 59 2F 4E 29 20 | THE TIME (Y/N) |
000002D0: 22 3B 52 43 24 00 EA 0A 75 00 8B 20 52 43 24 B3 |";RC$...u.. RC$.|
000002E0: B1 22 59 22 20 A7 20 31 32 30 00 1B 0B 76 00 85 |."Y" . 120...v..|
000002F0: 20 22 45 4E 54 45 52 20 54 48 45 20 54 49 4D 45 | "ENTER THE TIME|
00000300: 20 49 4E 20 55 54 43 20 28 46 4F 52 4D 41 54 3A | IN UTC (FORMAT:|
00000310: 20 30 30 30 30 29 22 3B 54 39 24 00 2C 0B 77 00 | 0000)";T9$.,.w.|
00000320: 54 49 24 B2 54 39 24 AA 22 30 30 22 00 59 0B 78 |TI$.T9$."00".Y.x|
00000330: 00 99 3A 85 20 22 4E 45 57 20 43 4F 4E 54 45 53 |..:. "NEW CONTES|
00000340: 54 20 28 4E 29 20 4F 52 20 52 45 53 55 4D 45 20 |T (N) OR RESUME |
00000350: 28 52 29 20 22 3B 41 52 24 00 6D 0B 82 00 8B 20 |(R) ";AR$.m.... |
00000360: 41 52 24 B2 22 4E 22 20 A7 20 31 39 30 00 8A 0B |AR$."N" . 190...|
00000370: 8C 00 8B 20 41 52 24 B3 B1 22 52 22 20 A7 20 99 |... AR$.."R" . .|
00000380: 20 42 4C 24 3A 89 20 31 31 30 00 A4 0B 96 00 8D | BL$:. 110......|
00000390: 20 32 35 34 30 3A 8F 20 52 45 41 44 20 49 4E 20 | 2540:. READ IN |
000003A0: 46 49 4C 45 00 C5 0B 9B 00 99 3A 99 20 22 52 45 |FILE......:. "RE|
000003B0: 53 55 4D 49 4E 47 20 22 3B 59 24 3B 22 20 4F 46 |SUMING ";Y$;" OF|
000003C0: 20 22 3B 5A 24 00 DC 0B A0 00 8B 20 48 43 24 B2 | ";Z$...... HC$.|
000003D0: 22 59 22 20 A7 20 8D 20 31 30 37 30 00 F1 0B AA |"Y" . . 1070....|
000003E0: 00 53 53 B2 32 36 AC 4E 4C AA 31 3A 89 20 33 38 |.SS.26.NL.1:. 38|
000003F0: 30 00 03 0C B4 00 8F 20 4E 45 57 20 43 4F 4E 54 |0...... NEW CONT|
00000400: 45 53 54 00 2B 0C BE 00 98 31 35 2C 22 53 22 AA |EST.+....15,"S".|
00000410: 46 41 24 3A 98 31 35 2C 22 53 22 AA 46 42 24 3A |FA$:.15,"S".FB$:|
00000420: 98 31 35 2C 22 53 22 AA 46 43 24 00 58 0C C3 00 |.15,"S".FC$.X...|
00000430: 99 3A 99 20 22 57 41 4E 54 20 48 41 52 44 20 43 |.:. "WANT HARD C|
00000440: 4F 50 59 20 57 48 49 4C 45 20 4C 4F 47 47 49 4E |OPY WHILE LOGGIN|
00000450: 47 20 28 59 2F 4E 29 22 00 69 0C C4 00 48 43 24 |G (Y/N)".i...HC$|
00000460: B2 22 22 3A 85 20 48 43 24 00 AA 0C C8 00 8B 20 |."":. HC$...... |
00000470: 48 43 24 B2 22 59 22 20 A7 20 85 20 22 54 55 52 |HC$."Y" . . "TUR|
00000480: 4E 20 4F 4E 20 50 52 49 4E 54 45 52 2E 20 3C 43 |N ON PRINTER. <C|
00000490: 52 3E 20 57 48 45 4E 20 52 45 41 44 59 20 22 3B |R> WHEN READY ";|
000004A0: 41 41 24 3A 8D 20 31 30 37 30 00 D1 0C D2 00 99 |AA$:. 1070......|
000004B0: 3A 85 20 22 57 48 41 54 20 49 53 20 54 48 45 20 |:. "WHAT IS THE |
000004C0: 43 4F 4E 54 45 53 54 20 4E 41 4D 45 20 22 3B 59 |CONTEST NAME ";Y|
000004D0: 24 00 02 0D D7 00 99 3A 99 20 22 4E 4F 54 45 3A |$......:. "NOTE:|
000004E0: 20 46 4F 52 20 43 4F 4E 54 45 53 54 53 20 49 4E | FOR CONTESTS IN|
000004F0: 20 57 48 49 43 48 20 59 4F 55 20 43 41 4E 4E 4F | WHICH YOU CANNO|
00000500: 54 22 00 32 0D D8 00 99 20 22 57 4F 52 4B 20 53 |T".2.... "WORK S|
00000510: 54 41 54 49 4F 4E 53 20 41 47 41 49 4E 20 4F 4E |TATIONS AGAIN ON|
00000520: 20 41 44 44 49 54 49 4F 4E 41 4C 20 42 41 4E 44 | ADDITIONAL BAND|
00000530: 53 22 00 5C 0D D9 00 99 20 22 53 50 45 43 49 46 |S".\.... "SPECIF|
00000540: 59 20 4F 4E 45 20 4C 4F 47 20 48 45 52 45 20 41 |Y ONE LOG HERE A|
00000550: 4E 44 20 55 53 45 20 54 48 45 20 22 00 8C 0D DA |ND USE THE "....|
00000560: 00 99 20 22 27 4D 4F 44 45 27 20 53 50 45 43 49 |.. "'MODE' SPECI|
00000570: 46 49 45 52 20 54 4F 20 52 45 43 4F 52 44 20 42 |FIER TO RECORD B|
00000580: 41 4E 44 20 43 48 41 4E 47 45 53 22 00 B0 0D DC |AND CHANGES"....|
00000590: 00 99 3A 99 20 22 48 4F 57 20 4D 41 4E 59 20 4C |..:. "HOW MANY L|
000005A0: 4F 47 53 20 44 4F 20 59 4F 55 20 4E 45 45 44 22 |OGS DO YOU NEED"|
000005B0: 00 D7 0D DD 00 85 20 22 20 20 28 55 53 55 41 4C |...... " (USUAL|
000005C0: 4C 59 20 4F 4E 45 20 50 45 52 20 42 41 4E 44 29 |LY ONE PER BAND)|
000005D0: 20 22 3B 4E 4C 3A 99 00 F0 0D E6 00 8B 20 4E 4C | ";NL:....... NL|
000005E0: B3 31 20 A7 20 99 20 42 4C 24 3A 89 20 32 32 30 |.1 . . BL$:. 220|
000005F0: 00 22 0E F0 00 86 20 4C 4E 24 28 4E 4C 29 2C 51 |.".... LN$(NL),Q|
00000600: 50 25 28 4E 4C 29 2C 54 43 25 28 4E 4C 29 2C 54 |P%(NL),TC%(NL),T|
00000610: 53 25 28 4E 4C 29 2C 53 43 25 28 31 30 30 2C 4E |S%(NL),SC%(100,N|
00000620: 4C 29 00 41 0E FA 00 4D 31 B2 B5 28 28 B8 28 30 |L).A...M1..((.(0|
00000630: 29 AB 32 30 30 30 AB 38 30 30 AC 4E 4C 29 AD 36 |).2000.800.NL).6|
00000640: 29 00 84 0E 04 01 8B 20 4E 4C AC 32 36 B1 B2 4D |)...... NL.26..M|
00000650: 31 20 A7 20 99 20 22 54 4F 4F 20 4D 41 4E 59 22 |1 . . "TOO MANY"|
00000660: 3B 42 4C 24 3A 45 52 41 53 45 20 4C 4E 24 2C 51 |;BL$:ERASE LN$,Q|
00000670: 50 25 2C 54 43 25 2C 54 53 25 2C 53 43 25 3A 89 |P%,TC%,TS%,SC%:.|
00000680: 20 32 32 30 00 AC 0E 0E 01 86 20 43 31 25 28 4D | 220...... C1%(M|
00000690: 31 29 2C 43 32 25 28 4D 31 29 2C 50 25 28 4D 31 |1),C2%(M1),P%(M1|
000006A0: 29 2C 53 24 28 31 30 30 2C 4E 4C 29 00 B7 0E 13 |),S$(100,NL)....|
000006B0: 01 4B 4B 24 B2 22 22 00 C6 0E 18 01 81 20 4A B2 |.KK$.""...... J.|
000006C0: 31 20 A4 20 4E 4C 00 EB 0E 22 01 99 3A 99 20 22 |1 . NL..."..:. "|
000006D0: 57 48 41 54 20 42 41 4E 44 20 49 53 20 4C 4F 47 |WHAT BAND IS LOG|
000006E0: 20 53 48 45 45 54 20 23 22 3B 4A 00 19 0F 2C 01 | SHEET #";J...,.|
000006F0: 99 20 22 20 20 28 45 2E 47 2E 20 38 30 2C 32 30 |. " (E.G. 80,20|
00000700: 2C 31 34 34 2C 31 32 39 36 20 4F 52 20 45 56 45 |,144,1296 OR EVE|
00000710: 4E 20 31 30 20 47 48 5A 22 00 26 0F 2E 01 85 20 |N 10 GHZ".&.... |
00000720: 4C 4E 24 28 4A 29 00 56 0F 36 01 8B 20 C3 28 4C |LN$(J).V.6.. .(L|
00000730: 4E 24 28 4A 29 29 B1 38 20 A7 20 99 20 42 4C 24 |N$(J)).8 . . BL$|
00000740: 3B 22 4E 41 4D 45 20 54 4F 4F 20 4C 4F 4E 47 22 |;"NAME TOO LONG"|
00000750: 3A 89 20 32 39 30 00 66 0F 3A 01 8B 20 4A B2 31 |:. 290.f.:.. J.1|
00000760: 20 A7 20 33 32 30 00 A5 0F 3B 01 81 20 4B B2 31 | . 320...;.. K.1|
00000770: 20 A4 20 4A AB 31 3A 8B 20 4C 4E 24 28 4A 29 B2 | . J.1:. LN$(J).|
00000780: 4C 4E 24 28 4B 29 20 A7 20 99 20 22 44 55 50 4C |LN$(K) . . "DUPL|
00000790: 49 43 41 54 45 20 42 41 4E 44 22 3B 42 4C 24 3A |ICATE BAND";BL$:|
000007A0: 89 20 32 39 30 00 AD 0F 3C 01 82 20 4B 00 D7 0F |. 290...<.. K...|
000007B0: 40 01 99 3A 85 20 22 48 4F 57 20 4D 41 4E 59 20 |@..:. "HOW MANY |
000007C0: 50 4F 49 4E 54 53 20 50 45 52 20 51 53 4F 20 22 |POINTS PER QSO "|
000007D0: 3B 51 50 25 28 4A 29 00 F4 0F 4A 01 8B 20 51 50 |;QP%(J)...J.. QP|
000007E0: 25 28 4A 29 B3 31 20 A7 20 99 20 42 4C 24 3A 89 |%(J).1 . . BL$:.|
000007F0: 20 33 32 30 00 0C 10 4B 01 4B 4B 24 B2 4B 4B 24 | 320...K.KK$.KK$|
00000800: AA 4C 4E 24 28 4A 29 AA 22 20 20 22 00 2E 10 4C |.LN$(J)." "...L|
00000810: 01 99 3A 99 20 22 42 41 4E 44 53 20 53 50 45 43 |..:. "BANDS SPEC|
00000820: 49 46 49 45 44 3A 20 22 3B 4B 4B 24 3A 99 00 48 |IFIED: ";KK$:..H|
00000830: 10 54 01 54 43 25 28 4A 29 B2 30 3A 54 53 25 28 |.T.TC%(J).0:TS%(|
00000840: 4A 29 B2 30 3A 82 20 4A 00 61 10 5E 01 54 B2 31 |J).0:. J.a.^.T.1|
00000850: 3A 4C 25 B2 32 36 AC 4E 4C 3A 53 53 B2 4C 25 AA |:L%.26.NL:SS.L%.|
00000860: 31 00 79 10 60 01 50 32 B2 30 3A 8B 20 4E 4C B2 |1.y.`.P2.0:. NL.|
00000870: 31 20 A7 20 89 20 33 35 35 00 B2 10 61 01 99 3A |1 . . 355...a..:|
00000880: 99 22 53 45 50 41 52 41 54 45 20 4D 55 4C 54 49 |."SEPARATE MULTI|
00000890: 50 4C 49 45 52 53 20 4F 4E 22 3A 85 22 20 45 41 |PLIERS ON":." EA|
000008A0: 43 48 20 42 41 4E 44 20 28 59 2F 4E 29 20 22 3B |CH BAND (Y/N) ";|
000008B0: 47 24 00 C6 10 62 01 8B 20 47 24 B2 22 59 22 20 |G$...b.. G$."Y" |
000008C0: A7 20 50 32 B2 31 00 F7 10 63 01 99 3A 99 20 22 |. P2.1...c..:. "|
000008D0: 59 4F 55 20 48 41 56 45 20 54 57 4F 20 4F 50 54 |YOU HAVE TWO OPT|
000008E0: 49 4F 4E 53 20 46 4F 52 20 54 48 45 20 45 58 43 |IONS FOR THE EXC|
000008F0: 48 41 4E 47 45 3A 22 00 27 11 64 01 99 20 22 54 |HANGE:".'.d.. "T|
00000900: 48 45 20 45 4E 54 49 52 45 20 45 58 43 48 41 4E |HE ENTIRE EXCHAN|
00000910: 47 45 20 43 41 4E 20 42 45 20 41 20 4D 55 4C 54 |GE CAN BE A MULT|
00000920: 49 50 4C 49 45 52 22 00 55 11 65 01 99 20 22 4F |IPLIER".U.e.. "O|
00000930: 52 20 4F 54 48 45 52 20 49 4E 46 4F 20 43 41 4E |R OTHER INFO CAN|
00000940: 20 42 45 20 53 45 54 20 4F 46 46 20 46 52 4F 4D | BE SET OFF FROM|
00000950: 20 54 48 45 22 00 85 11 66 01 99 20 22 4D 55 4C | THE"...f.. "MUL|
00000960: 54 49 50 4C 49 45 52 20 57 49 54 48 20 41 20 53 |TIPLIER WITH A S|
00000970: 50 41 43 45 20 28 45 2E 47 2E 20 27 35 39 20 45 |PACE (E.G. '59 E|
00000980: 4E 59 27 29 22 00 B8 11 67 01 99 3A 85 20 22 49 |NY')"...g..:. "I|
00000990: 53 20 54 48 45 20 57 48 4F 4C 45 20 45 58 43 48 |S THE WHOLE EXCH|
000009A0: 41 4E 47 45 20 54 48 45 20 4D 55 4C 54 20 28 59 |ANGE THE MULT (Y|
000009B0: 2F 4E 29 22 3B 50 31 24 00 CD 11 68 01 8B 20 50 |/N)";P1$...h.. P|
000009C0: 31 24 B3 B1 22 4E 22 20 A7 20 33 36 35 00 F6 11 |1$.."N" . 365...|
000009D0: 69 01 99 3A 99 20 22 42 45 20 53 55 52 45 20 54 |i..:. "BE SURE T|
000009E0: 4F 20 50 55 54 20 41 20 53 50 41 43 45 20 42 45 |O PUT A SPACE BE|
000009F0: 54 57 45 45 4E 22 00 1C 12 6A 01 99 20 22 54 48 |TWEEN"...j.. "TH|
00000A00: 45 20 52 45 50 4F 52 54 20 41 4E 44 20 54 48 45 |E REPORT AND THE|
00000A10: 20 4D 55 4C 54 49 50 4C 49 45 52 22 00 45 12 6D | MULTIPLIER".E.m|
00000A20: 01 99 3A 99 20 22 20 4D 45 4D 4F 52 59 20 49 53 |..:. " MEMORY IS|
00000A30: 20 41 56 41 49 4C 41 42 4C 45 20 46 4F 52 20 41 | AVAILABLE FOR A|
00000A40: 42 4F 55 54 22 00 6D 12 6E 01 99 20 4D 31 3B 22 |BOUT".m.n.. M1;"|
00000A50: 20 43 4F 4E 54 41 43 54 53 2C 20 42 55 54 20 44 | CONTACTS, BUT D|
00000A60: 49 53 4B 20 53 50 41 43 45 20 49 53 22 00 99 12 |ISK SPACE IS"...|
00000A70: 6F 01 99 20 22 20 4C 49 4D 49 54 45 44 20 54 4F |o.. " LIMITED TO|
00000A80: 20 41 42 4F 55 54 20 31 32 30 30 20 51 53 4F 53 | ABOUT 1200 QSOS|
00000A90: 20 4F 4E 20 54 48 49 53 22 00 C6 12 70 01 99 20 | ON THIS"...p.. |
00000AA0: 22 20 43 4F 4D 50 55 54 45 52 20 41 4E 44 20 44 |" COMPUTER AND D|
00000AB0: 49 53 4B 20 4F 50 45 52 41 54 49 4E 47 20 53 59 |ISK OPERATING SY|
00000AC0: 53 54 45 4D 2E 22 00 DF 12 71 01 99 3A 99 20 A3 |STEM."...q..:. .|
00000AD0: 31 35 29 22 47 4F 4F 44 20 4C 55 43 4B 21 22 00 |15)"GOOD LUCK!".|
00000AE0: 08 13 72 01 81 20 4A B2 31 20 A4 20 4C 25 3A 43 |..r.. J.1 . L%:C|
00000AF0: 31 25 28 4A 29 B2 AB 33 32 30 30 30 3A 50 25 28 |1%(J)..32000:P%(|
00000B00: 4A 29 B2 30 3A 82 20 4A 00 13 13 7C 01 8D 20 33 |J).0:. J...|.. 3|
00000B10: 37 38 30 00 33 13 86 01 4C 47 B2 31 3A 4C 48 25 |780.3...LG.1:LH%|
00000B20: B2 30 3A 4C 50 B2 31 3A 4C 4C B2 30 3A 53 4C 24 |.0:LP.1:LL.0:SL$|
00000B30: B2 22 22 00 59 13 90 01 8D 20 31 31 33 32 3A 8B |."".Y.... 1132:.|
00000B40: 20 41 52 24 B2 22 4E 22 20 A7 20 5A 24 B2 44 54 | AR$."N" . Z$.DT|
00000B50: 45 24 3A 8F 20 44 41 54 45 00 70 13 9A 01 8B 20 |E$:. DATE.p.... |
00000B60: 48 43 24 B2 22 59 22 20 A7 20 8D 20 31 30 39 30 |HC$."Y" . . 1090|
00000B70: 00 82 13 A4 01 8D 20 31 35 39 30 3A 8F 20 42 41 |...... 1590:. BA|
00000B80: 4E 44 00 94 13 AE 01 8D 20 31 31 38 30 3A 8F 20 |ND...... 1180:. |
00000B90: 4D 4F 44 45 00 A6 13 B8 01 8D 20 31 33 38 30 3A |MODE...... 1380:|
00000BA0: 8F 20 4D 45 4E 55 00 D3 13 BA 01 5A 42 24 B2 22 |. MENU.....ZB$."|
00000BB0: 22 3A 85 20 22 3C 43 52 3E 20 54 4F 20 4C 4F 47 |":. "<CR> TO LOG|
00000BC0: 20 53 54 41 52 54 49 4E 47 20 54 49 4D 45 22 3B | STARTING TIME";|
00000BD0: 5A 42 24 00 F0 13 BB 01 5A 41 B2 5A 41 AA 31 3A |ZB$.....ZA.ZA.1:|
00000BE0: 8B 20 52 43 24 B3 B1 22 59 22 20 A7 20 34 34 36 |. RC$.."Y" . 446|
00000BF0: 00 0E 14 BC 01 8D 20 31 31 36 32 3A 55 31 24 28 |...... 1162:U1$(|
00000C00: 5A 41 29 B2 55 54 43 24 3A 89 20 34 35 30 00 3B |ZA).UTC$:. 450.;|
00000C10: 14 BE 01 85 20 22 45 4E 54 45 52 20 55 54 43 20 |.... "ENTER UTC |
00000C20: 54 49 4D 45 20 28 30 30 30 30 20 46 4F 52 4D 41 |TIME (0000 FORMA|
00000C30: 54 29 22 3B 55 31 24 28 5A 41 29 00 60 14 C2 01 |T)";U1$(ZA).`...|
00000C40: 8B 20 52 43 24 B3 B1 22 59 22 20 B0 20 54 AD 35 |. RC$.."Y" . T.5|
00000C50: 30 B3 B1 B5 28 54 AD 35 30 29 20 A7 20 34 35 34 |0...(T.50) . 454|
00000C60: 00 96 14 C3 01 99 3A 85 20 22 54 4F 20 52 45 53 |......:. "TO RES|
00000C70: 45 54 20 43 4C 4F 43 4B 2C 20 45 4E 54 45 52 20 |ET CLOCK, ENTER |
00000C80: 55 54 43 20 28 30 30 30 30 20 46 4F 52 4D 41 54 |UTC (0000 FORMAT|
00000C90: 29 22 3B 54 39 24 00 CE 14 C4 01 8B 20 C6 28 CA |)";T9$...... .(.|
00000CA0: 28 54 39 24 2C 34 2C 31 29 29 B1 35 37 20 A7 20 |(T9$,4,1)).57 . |
00000CB0: 99 20 22 49 4E 56 41 4C 49 44 20 54 49 4D 45 20 |. "INVALID TIME |
00000CC0: 45 4E 54 52 59 21 2E 22 3A 89 20 34 35 31 00 DF |ENTRY!.":. 451..|
00000CD0: 14 C5 01 54 49 24 B2 54 39 24 AA 22 30 30 22 00 |...TI$.T9$."00".|
00000CE0: 16 15 C6 01 99 3A 99 20 22 4C 4F 47 47 45 52 20 |.....:. "LOGGER |
00000CF0: 52 45 41 44 59 20 46 4F 52 20 51 53 4F 20 23 22 |READY FOR QSO #"|
00000D00: 3B 54 3B 22 2D 22 3B 4C 4E 24 28 4C 47 29 3B 22 |;T;"-";LN$(LG);"|
00000D10: 2D 22 3B 4D 44 24 00 2F 15 CC 01 99 20 22 43 4F |-";MD$./.... "CO|
00000D20: 4D 4D 41 4E 44 20 4F 52 20 43 41 4C 4C 22 3B 00 |MMAND OR CALL";.|
00000D30: 4E 15 D6 01 58 31 25 B2 30 3A 8D 20 32 33 37 30 |N...X1%.0:. 2370|
00000D40: 3A 8B 20 58 31 25 B2 31 20 A7 20 34 35 30 00 6A |:. X1%.1 . 450.j|
00000D50: 15 E0 01 8B 20 47 24 B2 22 3F 22 20 A7 20 8D 20 |.... G$."?" . . |
00000D60: 31 33 38 30 3A 89 20 34 35 30 00 8F 15 EA 01 8B |1380:. 450......|
00000D70: 20 47 24 B2 22 51 53 59 22 20 A7 20 8D 20 31 35 | G$."QSY" . . 15|
00000D80: 39 30 3A 8D 20 31 37 30 30 3A 89 20 34 35 30 00 |90:. 1700:. 450.|
00000D90: AE 15 F4 01 8B 20 47 24 B2 22 44 41 54 45 22 20 |..... G$."DATE" |
00000DA0: A7 20 8D 20 31 31 33 32 3A 89 20 34 35 30 00 CD |. . 1132:. 450..|
00000DB0: 15 FE 01 8B 20 47 24 B2 22 4D 4F 44 45 22 20 A7 |.... G$."MODE" .|
00000DC0: 20 8D 20 31 31 38 30 3A 89 20 34 35 30 00 FA 15 | . 1180:. 450...|
00000DD0: 08 02 8B 20 47 24 B2 22 51 52 54 22 20 A7 20 8D |... G$."QRT" . .|
00000DE0: 20 33 39 30 30 3A 8D 20 33 36 37 30 3A 8D 20 31 | 3900:. 3670:. 1|
00000DF0: 38 36 30 3A 89 20 32 30 30 30 00 29 16 0D 02 8B |860:. 2000.)....|
00000E00: 20 47 24 B2 22 51 52 58 22 20 A7 20 8D 20 33 39 | G$."QRX" . . 39|
00000E10: 30 30 3A 8D 20 31 38 36 30 3A A0 34 3A 8D 20 33 |00:. 1860:.4:. 3|
00000E20: 38 30 30 3A 89 20 34 34 32 00 52 16 12 02 8B 20 |800:. 442.R.... |
00000E30: 47 24 B2 22 53 41 56 45 22 20 A7 20 8D 20 31 38 |G$."SAVE" . . 18|
00000E40: 36 30 3A A0 34 3A 8D 20 33 38 30 30 3A 89 20 34 |60:.4:. 3800:. 4|
00000E50: 35 30 00 77 16 17 02 8B 20 47 24 B2 22 52 41 54 |50.w.... G$."RAT|
00000E60: 45 22 20 A7 20 8D 20 33 39 30 30 3A 45 54 B2 45 |E" . . 3900:ET.E|
00000E70: 37 3A 89 20 34 35 30 00 9D 16 1C 02 8B 20 47 24 |7:. 450...... G$|
00000E80: B2 22 53 54 41 54 22 20 A7 20 8D 20 31 37 30 30 |."STAT" . . 1700|
00000E90: 3A 8D 20 31 37 38 30 3A 89 20 34 35 30 00 BD 16 |:. 1780:. 450...|
00000EA0: 26 02 8B 20 47 24 B2 22 53 43 4F 52 45 22 20 A7 |&.. G$."SCORE" .|
00000EB0: 20 8D 20 33 36 37 30 3A 89 20 34 35 30 00 D6 16 | . 3670:. 450...|
00000EC0: 30 02 8B 20 47 24 B2 22 45 44 49 54 22 20 A7 20 |0.. G$."EDIT" . |
00000ED0: 89 20 32 37 31 30 00 F2 16 3A 02 8B 20 47 24 B2 |. 2710...:.. G$.|
00000EE0: 22 58 22 20 A7 20 8D 20 31 32 33 30 3A 89 20 34 |"X" . . 1230:. 4|
00000EF0: 35 30 00 FC 16 44 02 89 20 36 39 30 00 06 17 4E |50...D.. 690...N|
00000F00: 02 99 20 42 4C 24 00 39 17 58 02 99 20 48 49 24 |.. BL$.9.X.. HI$|
00000F10: 3B 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |;"**************|
00000F20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000F30: 2A 2A 2A 2A 2A 2A 2A 2A 22 00 6C 17 62 02 99 20 |********".l.b.. |
00000F40: 48 49 24 3B 22 2A 2A 20 20 49 54 27 53 20 41 20 |HI$;"** IT'S A |
00000F50: 44 55 50 45 20 20 2A 2A 20 20 42 4F 4F 20 20 2A |DUPE ** BOO *|
00000F60: 2A 20 20 48 49 53 53 20 20 2A 2A 22 00 A3 17 6C |* HISS **"...l|
00000F70: 02 99 20 48 49 24 3B 22 2A 2A 2A 2A 2A 2A 2A 2A |.. HI$;"********|
00000F80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000F90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 3B |**************";|
00000FA0: 4C 4F 24 00 AD 17 76 02 89 20 34 35 30 00 E0 17 |LO$...v.. 450...|
00000FB0: 80 02 99 20 22 49 4E 56 41 4C 49 44 20 45 4E 54 |... "INVALID ENT|
00000FC0: 52 59 2E 20 50 4C 45 41 53 45 20 54 52 59 20 41 |RY. PLEASE TRY A|
00000FD0: 47 41 49 4E 2E 22 3B 42 4C 24 3A 89 20 34 35 30 |GAIN.";BL$:. 450|
00000FE0: 00 F2 17 8A 02 99 20 22 41 42 4F 52 54 45 44 22 |...... "ABORTED"|
00000FF0: 3A 8E 00 0D 18 94 02 99 20 22 43 41 4E 27 54 20 |:....... "CAN'T |
00001000: 44 45 4C 45 54 45 22 3B 42 4C 24 3A 8E 00 2D 18 |DELETE";BL$:..-.|
00001010: 9E 02 99 20 22 49 4E 56 41 4C 49 44 20 51 53 4F |... "INVALID QSO|
00001020: 20 23 22 3B 42 4C 24 3A 89 20 34 35 30 00 47 18 | #";BL$:. 450.G.|
00001030: A8 02 8F 20 50 52 4F 43 45 53 53 20 41 20 43 41 |... PROCESS A CA|
00001040: 4C 4C 20 53 49 47 4E 00 59 18 B2 02 43 53 24 B2 |LL SIGN.Y...CS$.|
00001050: 47 24 3A 43 54 24 B2 47 24 00 9D 18 BC 02 8D 20 |G$:CT$.G$...... |
00001060: 33 34 30 30 3A 91 20 58 31 25 20 89 20 35 39 30 |3400:. X1% . 590|
00001070: 2C 38 32 30 2C 36 34 30 2C 37 31 30 2C 37 31 30 |,820,640,710,710|
00001080: 3A 8F 20 44 45 43 4F 44 45 20 43 41 4C 4C 2F 4A |:. DECODE CALL/J|
00001090: 55 4D 50 20 4F 4E 20 52 45 53 55 4C 54 00 B9 18 |UMP ON RESULT...|
000010A0: C6 02 8D 20 32 34 30 30 3A 8B 20 C3 28 47 24 29 |... 2400:. .(G$)|
000010B0: B3 B1 30 20 A7 20 37 33 30 00 C9 18 D0 02 99 20 |..0 . 730...... |
000010C0: 22 20 2D 4F 4B 2D 20 22 3B 00 DD 18 DA 02 8B 20 |" -OK- ";...... |
000010D0: 50 31 24 B2 22 59 22 20 A7 20 37 34 30 00 F6 18 |P1$."Y" . 740...|
000010E0: DC 02 53 4C 24 B2 47 24 3A 8B 20 58 31 25 B2 31 |..SL$.G$:. X1%.1|
000010F0: 20 A7 20 34 35 30 00 30 19 DE 02 8B 20 53 4C 24 | . 450.0.... SL$|
00001100: B2 22 22 20 A7 20 99 20 22 52 45 50 4F 52 54 20 |."" . . "REPORT |
00001110: 28 4F 52 20 46 55 4C 4C 20 45 58 43 48 29 3F 20 |(OR FULL EXCH)? |
00001120: 22 3B 3A 8D 20 32 33 37 30 3A 3A 89 20 37 33 32 |";:. 2370::. 732|
00001130: 00 3B 19 DF 02 8D 20 32 34 30 30 00 54 19 E4 02 |.;.... 2400.T...|
00001140: 53 4B 24 B2 47 24 3A 8B 20 58 31 25 B2 31 20 A7 |SK$.G$:. X1%.1 .|
00001150: 20 34 35 30 00 82 19 E6 02 8B 20 53 4B 24 B2 22 | 450...... SK$."|
00001160: 22 20 A7 20 99 20 22 4D 55 4C 54 49 50 4C 49 45 |" . . "MULTIPLIE|
00001170: 52 3F 20 22 3B 3A 8D 20 32 33 37 30 3A 89 20 37 |R? ";:. 2370:. 7|
00001180: 34 30 00 A0 19 EE 02 8B 20 C3 28 53 4B 24 29 AA |40...... .(SK$).|
00001190: C3 28 53 4C 24 29 B3 B2 31 34 20 A7 20 37 35 32 |.(SL$)..14 . 752|
000011A0: 00 D9 19 EF 02 99 20 42 4C 24 3B 22 45 58 43 48 |...... BL$;"EXCH|
000011B0: 41 4E 47 45 20 45 58 43 45 45 44 53 20 31 34 20 |ANGE EXCEEDS 14 |
000011C0: 43 48 41 52 41 43 54 45 52 53 22 3A 99 3A 47 24 |CHARACTERS":.:G$|
000011D0: B2 22 22 3A 89 20 37 33 30 00 FF 19 F0 02 8B 20 |."":. 730...... |
000011E0: C3 20 28 53 4B 24 29 B3 31 20 A7 20 99 20 42 4C |. (SK$).1 . . BL|
000011F0: 24 3A 99 3A 47 24 B2 22 22 3A 89 20 37 34 30 00 |$:.:G$."":. 740.|
00001200: 1B 1A F8 02 8B 20 52 43 24 B2 22 59 22 A7 20 8D |..... RC$."Y". .|
00001210: 20 31 31 36 32 3A 89 20 37 37 30 00 2E 1A FA 02 | 1162:. 770.....|
00001220: 8D 20 32 34 30 30 3A 55 54 43 24 B2 47 24 00 66 |. 2400:UTC$.G$.f|
00001230: 1A FE 02 8B 20 55 54 43 24 B2 22 22 20 A7 20 99 |.... UTC$."" . .|
00001240: 20 22 55 54 43 3F 20 22 3B 3A 8D 20 32 33 37 30 | "UTC? ";:. 2370|
00001250: 3A 55 54 43 24 B2 47 24 3A 8B 20 58 31 25 B2 31 |:UTC$.G$:. X1%.1|
00001260: 20 A7 20 34 35 30 00 89 1A 02 03 52 4E B2 54 3A | . 450.....RN.T:|
00001270: 8D 20 39 30 30 3A 8F 20 57 52 49 54 45 20 4C 4F |. 900:. WRITE LO|
00001280: 47 20 54 4F 20 44 49 53 4B 00 B2 1A 0C 03 8B 20 |G TO DISK...... |
00001290: 48 43 24 B2 22 59 22 20 A7 20 8D 20 39 36 30 3A |HC$."Y" . . 960:|
000012A0: 8F 20 57 52 49 54 45 20 54 4F 20 50 52 49 4E 54 |. WRITE TO PRINT|
000012B0: 45 52 00 D9 1A 16 03 4C 48 25 B2 48 25 3A 8D 20 |ER.....LH%.H%:. |
000012C0: 39 39 30 3A 8F 20 45 4E 54 45 52 20 49 4E 20 44 |990:. ENTER IN D|
000012D0: 55 50 45 20 53 48 45 45 54 00 F4 1A 20 03 8D 20 |UPE SHEET... .. |
000012E0: 31 30 32 30 3A 8F 20 45 4E 54 45 52 20 53 45 43 |1020:. ENTER SEC|
000012F0: 54 49 4F 4E 00 16 1B 2A 03 54 43 25 28 4C 47 29 |TION...*.TC%(LG)|
00001300: B2 54 43 25 28 4C 47 29 AA 31 3A 54 B2 54 AA 31 |.TC%(LG).1:T.T.1|
00001310: 3A 89 20 34 35 30 00 33 1B 34 03 99 3A 99 20 A3 |:. 450.3.4..:. .|
00001320: 32 29 43 54 24 3B 22 20 4E 45 45 44 45 44 20 4F |2)CT$;" NEEDED O|
00001330: 4E 3A 22 00 42 1B 3E 03 81 20 4A B2 31 20 A4 20 |N:".B.>.. J.1 . |
00001340: 4E 4C 00 6B 1B 48 03 48 25 B2 45 28 34 29 AA 4A |NL.k.H.H%.E(4).J|
00001350: AC 32 36 AB 32 36 3A 8D 20 33 36 31 30 3A 8F 20 |.26.26:. 3610:. |
00001360: 44 55 50 45 20 53 45 41 52 43 48 00 7D 1B 52 03 |DUPE SEARCH.}.R.|
00001370: 8B 20 58 31 25 B2 31 20 A7 20 38 38 30 00 9C 1B |. X1%.1 . 880...|
00001380: 5C 03 8B 20 4A B2 4C 47 20 A7 20 99 20 A3 31 30 |\.. J.LG . . .10|
00001390: 29 22 2A 20 22 3B 3A 89 20 38 37 30 00 AB 1B 5E |)"* ";:. 870...^|
000013A0: 03 99 20 A3 31 31 29 22 20 22 3B 00 B8 1B 66 03 |.. .11)" ";...f.|
000013B0: 99 20 4C 4E 24 28 4A 29 00 C8 1B 70 03 82 20 4A |. LN$(J)...p.. J|
000013C0: 3A 99 3A 89 20 34 35 30 00 E0 1B 7A 03 8F 20 57 |:.:. 450...z.. W|
000013D0: 52 49 54 45 20 4C 4F 47 20 54 4F 20 44 49 53 4B |RITE LOG TO DISK|
000013E0: 00 F3 1B 84 03 99 20 22 2E 2E 2E 4C 4F 47 47 49 |...... "...LOGGI|
000013F0: 4E 47 22 00 FE 1B 8E 03 8D 20 37 30 30 30 00 16 |NG"...... 7000..|
00001400: 1C 90 03 52 50 B2 31 3A 8D 20 37 31 30 30 3A 98 |...RP.1:. 7100:.|
00001410: 33 2C 44 54 45 24 00 2F 1C 92 03 52 50 B2 31 30 |3,DTE$./...RP.10|
00001420: 3A 8D 20 37 31 30 30 3A 98 33 2C 55 54 43 24 00 |:. 7100:.3,UTC$.|
00001430: 47 1C 94 03 52 50 B2 31 35 3A 8D 20 37 31 30 30 |G...RP.15:. 7100|
00001440: 3A 98 33 2C 43 54 24 00 63 1C 96 03 52 50 B2 32 |:.3,CT$.c...RP.2|
00001450: 36 3A 8D 20 37 31 30 30 3A 98 33 2C 4C 4E 24 28 |6:. 7100:.3,LN$(|
00001460: 4C 47 29 00 7B 1C 98 03 52 50 B2 33 32 3A 8D 20 |LG).{...RP.32:. |
00001470: 37 31 30 30 3A 98 33 2C 4D 44 24 00 9B 1C 9A 03 |7100:.3,MD$.....|
00001480: 52 50 B2 33 38 3A 8D 20 37 31 30 30 3A 98 33 2C |RP.38:. 7100:.3,|
00001490: 53 4C 24 AA 22 20 22 AA 53 4B 24 00 A8 1C A2 03 |SL$." ".SK$.....|
000014A0: 8D 20 36 30 30 30 3A 8E 00 C3 1C B6 03 8F 20 57 |. 6000:....... W|
000014B0: 52 49 54 45 20 4C 4F 47 20 54 4F 20 50 52 49 4E |RITE LOG TO PRIN|
000014C0: 54 45 52 00 FB 1C C0 03 98 31 33 2C 54 3B A6 32 |TER......13,T;.2|
000014D0: 29 44 54 45 24 3B A6 33 29 55 54 43 24 3B A6 33 |)DTE$;.3)UTC$;.3|
000014E0: 29 4C 4E 24 28 4C 47 29 3B A6 38 AB C3 28 4C 4E |)LN$(LG);.8..(LN|
000014F0: 24 28 4C 47 29 29 29 4D 44 24 3B 00 2C 1D C2 03 |$(LG)))MD$;.,...|
00001500: 98 31 33 2C 22 20 22 3B A6 36 AB C3 28 4D 44 24 |.13," ";.6..(MD$|
00001510: 29 29 43 54 24 3B A6 31 32 AB C3 28 43 54 24 29 |))CT$;.12..(CT$)|
00001520: 29 53 4C 24 3B 22 20 22 3B 53 4B 24 00 32 1D CA |)SL$;" ";SK$.2..|
00001530: 03 8E 00 4B 1D D4 03 8F 20 45 4E 54 45 52 20 49 |...K.... ENTER I|
00001540: 4E 20 44 55 50 45 20 4C 49 53 54 00 71 1D DE 03 |N DUPE LIST.q...|
00001550: 8B 20 58 31 25 B2 35 20 A7 20 4C 25 B2 4C 25 AA |. X1%.5 . L%.L%.|
00001560: 31 3A 50 25 28 48 25 29 B2 4C 25 3A 48 25 B2 4C |1:P%(H%).L%:H%.L|
00001570: 25 00 98 1D E8 03 43 31 25 28 48 25 29 B2 45 31 |%.....C1%(H%).E1|
00001580: 25 3A 43 32 25 28 48 25 29 B2 45 32 25 3A 50 25 |%:C2%(H%).E2%:P%|
00001590: 28 48 25 29 B2 30 3A 8E 00 AD 1D F2 03 8F 20 55 |(H%).0:....... U|
000015A0: 50 44 41 54 45 20 53 45 43 54 49 4F 4E 00 C5 1D |PDATE SECTION...|
000015B0: FC 03 4C 46 B2 4C 47 3A 8B 20 50 32 B2 30 20 A7 |..LF.LG:. P2.0 .|
000015C0: 20 4C 46 B2 31 00 EF 1D FE 03 81 20 4A B2 31 20 | LF.1...... J.1 |
000015D0: A4 20 54 53 25 28 4C 46 29 3A 8B 20 53 4B 24 B2 |. TS%(LF):. SK$.|
000015E0: 53 24 28 4A 2C 4C 46 29 20 A7 20 31 30 36 30 00 |S$(J,LF) . 1060.|
000015F0: F7 1D 06 04 82 20 4A 00 30 1E 10 04 54 53 25 28 |..... J.0...TS%(|
00001600: 4C 46 29 B2 54 53 25 28 4C 46 29 AA 31 3A 4A B2 |LF).TS%(LF).1:J.|
00001610: 54 53 25 28 4C 46 29 3A 53 43 25 28 4A 2C 4C 46 |TS%(LF):SC%(J,LF|
00001620: 29 B2 30 3A 53 24 28 4A 2C 4C 46 29 B2 53 4B 24 |).0:S$(J,LF).SK$|
00001630: 00 4C 1E 1A 04 99 20 22 20 2A 20 4E 45 57 20 4D |.L.... " * NEW M|
00001640: 55 4C 54 49 50 4C 49 45 52 20 2A 22 00 68 1E 24 |ULTIPLIER *".h.$|
00001650: 04 53 43 25 28 4A 2C 4C 46 29 B2 53 43 25 28 4A |.SC%(J,LF).SC%(J|
00001660: 2C 4C 46 29 AA 31 3A 8E 00 84 1E 2E 04 8F 20 50 |,LF).1:....... P|
00001670: 52 49 4E 54 45 52 20 49 4E 49 54 2C 20 49 46 20 |RINTER INIT, IF |
00001680: 55 53 45 44 00 8A 1E 38 04 8E 00 B4 1E 42 04 98 |USED...8.....B..|
00001690: 31 33 2C 22 22 3A 98 31 33 2C 22 22 3A 98 31 33 |13,"":.13,"":.13|
000016A0: 2C 22 20 20 20 20 20 43 4F 4E 54 45 53 54 3A 20 |," CONTEST: |
000016B0: 22 3B 59 24 00 D0 1E 4C 04 98 31 33 2C 22 20 20 |";Y$...L..13," |
000016C0: 20 20 20 44 41 54 45 3A 20 20 20 20 22 3B 5A 24 | DATE: ";Z$|
000016D0: 00 DD 1E 56 04 98 31 33 2C 22 22 3A 8E 00 EC 1E |...V..13,"":....|
000016E0: 60 04 8F 20 53 45 54 20 44 41 54 45 00 01 1F 6A |`.. SET DATE...j|
000016F0: 04 8B 20 52 43 24 B2 22 59 22 20 A7 20 31 31 36 |.. RC$."Y" . 116|
00001700: 32 00 0C 1F 6C 04 8D 20 32 34 30 30 00 40 1F 74 |2...l.. 2400.@.t|
00001710: 04 8B 20 47 24 B2 22 22 20 A7 20 99 3A 85 20 22 |.. G$."" . .:. "|
00001720: 57 48 41 54 20 49 53 20 54 48 45 20 44 41 54 45 |WHAT IS THE DATE|
00001730: 20 28 4D 4D 2F 44 44 2F 59 59 29 20 22 3B 47 24 | (MM/DD/YY) ";G$|
00001740: 00 73 1F 7E 04 8B 20 C3 28 47 24 29 B1 38 20 A7 |.s.~.. .(G$).8 .|
00001750: 20 99 20 22 44 41 54 45 20 54 4F 4F 20 4C 4F 4E | . "DATE TOO LON|
00001760: 47 22 3B 42 4C 24 3A 47 24 B2 22 22 3A 89 20 31 |G";BL$:G$."":. 1|
00001770: 31 34 30 00 81 1F 88 04 44 54 45 24 B2 47 24 3A |140.....DTE$.G$:|
00001780: 8E 00 93 1F 8A 04 55 54 43 24 B2 C8 28 54 49 24 |......UTC$..(TI$|
00001790: 2C 34 29 00 99 1F 8C 04 8E 00 A8 1F 92 04 8F 20 |,4)............ |
000017A0: 53 45 54 20 4D 4F 44 45 00 B3 1F 9C 04 8D 20 32 |SET MODE...... 2|
000017B0: 34 30 30 00 DC 1F A6 04 8B 20 47 24 B2 22 22 20 |400...... G$."" |
000017C0: A7 20 99 3A 85 20 22 57 48 41 54 20 49 53 20 54 |. .:. "WHAT IS T|
000017D0: 48 45 20 4D 4F 44 45 20 22 3B 47 24 00 F2 1F B0 |HE MODE ";G$....|
000017E0: 04 8B 20 C3 28 47 24 29 B3 B2 33 20 A7 20 31 32 |.. .(G$)..3 . 12|
000017F0: 31 30 00 2B 20 B1 04 99 20 22 49 4E 56 41 4C 49 |10.+ ... "INVALI|
00001800: 44 20 4D 4F 44 45 2E 20 33 20 43 48 41 52 41 43 |D MODE. 3 CHARAC|
00001810: 54 45 52 53 20 4D 41 58 2E 22 3B 42 4C 24 3A 47 |TERS MAX.";BL$:G|
00001820: 24 B2 22 22 3A 89 20 31 31 39 30 00 38 20 BA 04 |$."":. 1190.8 ..|
00001830: 4D 44 24 B2 47 24 3A 8E 00 53 20 C4 04 8F 20 58 |MD$.G$:..S ... X|
00001840: 20 44 45 4C 45 54 45 53 20 4C 41 53 54 20 45 4E | DELETES LAST EN|
00001850: 54 52 59 00 65 20 CE 04 8B 20 4C 48 25 B2 30 20 |TRY.e ... LH%.0 |
00001860: A7 20 36 36 30 00 99 20 D8 04 8B 20 4C 48 25 B3 |. 660.. ... LH%.|
00001870: 53 53 20 A7 20 8B 20 50 25 28 4C 48 25 29 B2 30 |SS . . P%(LH%).0|
00001880: 20 A7 20 43 31 25 28 4C 48 25 29 B2 AB 33 32 30 | . C1%(LH%)..320|
00001890: 30 30 3A 89 20 31 32 36 30 00 AF 20 E2 04 50 25 |00:. 1260.. ..P%|
000018A0: 28 4C 48 25 29 B2 30 3A 4C 25 B2 4C 25 AB 31 00 |(LH%).0:L%.L%.1.|
000018B0: D1 20 EC 04 54 B2 54 AB 31 3A 54 43 25 28 4C 47 |. ..T.T.1:TC%(LG|
000018C0: 29 B2 54 43 25 28 4C 47 29 AB 31 3A 4C 48 25 B2 |).TC%(LG).1:LH%.|
000018D0: 30 00 DC 20 F6 04 8D 20 31 33 31 30 00 0E 21 00 |0.. ... 1310..!.|
000018E0: 05 8B 20 48 43 24 B2 22 59 22 20 A7 20 98 31 33 |.. HC$."Y" . .13|
000018F0: 2C 22 2D 2D 20 50 52 45 56 49 4F 55 53 20 43 41 |,"-- PREVIOUS CA|
00001900: 4C 4C 20 44 45 4C 45 54 45 44 20 2D 2D 22 00 21 |LL DELETED --".!|
00001910: 21 0A 05 99 20 22 20 44 45 4C 45 54 45 44 22 3A |!... " DELETED":|
00001920: 8E 00 36 21 14 05 8F 20 44 45 4C 45 54 45 20 53 |..6!... DELETE S|
00001930: 45 43 54 49 4F 4E 00 4E 21 1E 05 4C 46 B2 4C 47 |ECTION.N!..LF.LG|
00001940: 3A 8B 20 50 32 B2 30 20 A7 20 4C 46 B2 31 00 78 |:. P2.0 . LF.1.x|
00001950: 21 20 05 81 20 4A B2 31 20 A4 20 54 53 25 28 4C |! .. J.1 . TS%(L|
00001960: 46 29 3A 8B 20 53 4B 24 B2 53 24 28 4A 2C 4C 46 |F):. SK$.S$(J,LF|
00001970: 29 20 A7 20 31 33 33 30 00 80 21 28 05 82 20 4A |) . 1330..!(.. J|
00001980: 00 AC 21 32 05 53 43 25 28 4A 2C 4C 46 29 B2 53 |..!2.SC%(J,LF).S|
00001990: 43 25 28 4A 2C 4C 46 29 AB 31 3A 8B 20 53 43 25 |C%(J,LF).1:. SC%|
000019A0: 28 4A 2C 4C 46 29 B1 30 20 A7 20 8E 00 C3 21 3C |(J,LF).0 . ...!<|
000019B0: 05 8B 20 4A B2 54 53 25 28 4C 46 29 20 A7 20 31 |.. J.TS%(LF) . 1|
000019C0: 33 36 30 00 F9 21 46 05 53 43 25 28 4A 2C 4C 46 |360..!F.SC%(J,LF|
000019D0: 29 B2 53 43 25 28 54 53 25 28 4C 46 29 2C 4C 46 |).SC%(TS%(LF),LF|
000019E0: 29 3A 53 24 28 4A 2C 4C 46 29 B2 53 24 28 54 53 |):S$(J,LF).S$(TS|
000019F0: 25 28 4C 46 29 2C 4C 46 29 00 11 22 50 05 54 53 |%(LF),LF).."P.TS|
00001A00: 25 28 4C 46 29 B2 54 53 25 28 4C 46 29 AB 31 3A |%(LF).TS%(LF).1:|
00001A10: 8E 00 1C 22 5A 05 8F 20 4D 45 4E 55 00 28 22 64 |..."Z.. MENU.("d|
00001A20: 05 99 20 43 37 24 3A 99 00 5C 22 6E 05 99 20 48 |.. C7$:..\"n.. H|
00001A30: 49 24 3B 22 20 20 20 20 47 45 4E 45 52 41 4C 20 |I$;" GENERAL |
00001A40: 43 4F 4E 54 45 53 54 20 4C 4F 47 47 45 52 20 4D |CONTEST LOGGER M|
00001A50: 45 4E 55 20 20 20 20 20 20 20 20 22 00 90 22 78 |ENU ".."x|
00001A60: 05 99 20 48 49 24 3B 22 20 20 20 20 20 20 20 20 |.. HI$;" |
00001A70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001A80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00001A90: 00 C4 22 82 05 99 20 48 49 24 3B 22 20 27 3F 27 |.."... HI$;" '?'|
00001AA0: 20 44 49 53 50 4C 41 59 53 20 54 48 49 53 20 4D | DISPLAYS THIS M|
00001AB0: 45 4E 55 20 20 20 20 20 20 20 20 20 20 20 20 20 |ENU |
00001AC0: 20 20 20 22 00 F8 22 8C 05 99 20 48 49 24 3B 22 | ".."... HI$;"|
00001AD0: 20 27 51 53 59 20 3C 42 41 4E 44 3E 20 3C 4D 4F | 'QSY <BAND> <MO|
00001AE0: 44 45 3E 27 20 43 48 41 4E 47 45 53 20 42 41 4E |DE>' CHANGES BAN|
00001AF0: 44 53 20 20 20 20 20 22 00 2C 23 96 05 99 20 48 |DS ".,#... H|
00001B00: 49 24 3B 22 20 27 44 41 54 45 20 3C 4D 4D 2F 44 |I$;" 'DATE <MM/D|
00001B10: 44 2F 59 59 3E 27 20 43 48 41 4E 47 45 53 20 44 |D/YY>' CHANGES D|
00001B20: 41 54 45 20 20 20 20 20 20 20 20 22 00 60 23 A0 |ATE ".`#.|
00001B30: 05 99 20 48 49 24 3B 22 20 27 4D 4F 44 45 20 3C |.. HI$;" 'MODE <|
00001B40: 4D 4F 44 45 3E 27 20 43 48 41 4E 47 45 53 20 4D |MODE>' CHANGES M|
00001B50: 4F 44 45 53 20 20 20 20 20 20 20 20 20 20 20 22 |ODES "|
00001B60: 00 94 23 AA 05 99 20 48 49 24 3B 22 20 27 51 52 |..#... HI$;" 'QR|
00001B70: 54 27 20 53 41 56 45 53 20 41 4C 4C 20 43 41 4C |T' SAVES ALL CAL|
00001B80: 4C 53 20 41 4E 44 20 45 58 49 54 53 20 20 20 20 |LS AND EXITS |
00001B90: 20 20 20 22 00 C8 23 AF 05 99 20 48 49 24 3B 22 | "..#... HI$;"|
00001BA0: 20 27 51 52 58 27 20 53 41 56 45 53 20 41 4C 4C | 'QRX' SAVES ALL|
00001BB0: 20 43 41 4C 4C 53 20 41 4E 44 20 53 54 4F 50 53 | CALLS AND STOPS|
00001BC0: 20 54 49 4D 45 52 20 22 00 FC 23 B4 05 99 20 48 | TIMER "..#... H|
00001BD0: 49 24 3B 22 20 27 53 41 56 45 27 20 53 41 56 45 |I$;" 'SAVE' SAVE|
00001BE0: 53 20 41 4C 4C 20 43 41 4C 4C 53 20 41 4E 44 20 |S ALL CALLS AND |
00001BF0: 52 45 53 55 4D 45 53 20 20 20 20 22 00 30 24 BE |RESUMES ".0$.|
00001C00: 05 99 20 48 49 24 3B 22 20 20 20 20 20 20 20 20 |.. HI$;" |
00001C10: 28 4E 4F 54 45 3A 20 41 4C 4C 4F 57 20 32 2D 33 |(NOTE: ALLOW 2-3|
00001C20: 20 4D 49 4E 20 46 4F 52 20 53 41 56 45 29 20 22 | MIN FOR SAVE) "|
00001C30: 00 64 24 C3 05 99 20 48 49 24 3B 22 20 27 52 41 |.d$... HI$;" 'RA|
00001C40: 54 45 27 20 53 48 4F 57 53 20 54 4F 54 41 4C 20 |TE' SHOWS TOTAL |
00001C50: 54 49 4D 45 20 55 53 45 44 20 41 4E 44 20 52 41 |TIME USED AND RA|
00001C60: 54 45 20 22 00 98 24 C8 05 99 20 48 49 24 3B 22 |TE "..$... HI$;"|
00001C70: 20 27 53 54 41 54 27 20 47 49 56 45 53 20 53 54 | 'STAT' GIVES ST|
00001C80: 41 54 55 53 20 4F 4E 20 43 55 52 52 45 4E 54 20 |ATUS ON CURRENT |
00001C90: 42 41 4E 44 20 20 20 22 00 CC 24 D2 05 99 20 48 |BAND "..$... H|
00001CA0: 49 24 3B 22 20 27 53 43 4F 52 45 27 20 47 49 56 |I$;" 'SCORE' GIV|
00001CB0: 45 53 20 52 55 4E 4E 49 4E 47 20 54 4F 54 41 4C |ES RUNNING TOTAL|
00001CC0: 20 53 43 4F 52 45 20 20 20 20 20 22 00 00 25 DC | SCORE "..%.|
00001CD0: 05 99 20 48 49 24 3B 22 20 27 45 44 49 54 20 3C |.. HI$;" 'EDIT <|
00001CE0: 51 53 4F 20 23 3E 27 20 45 44 49 54 53 20 41 4E |QSO #>' EDITS AN|
00001CF0: 59 20 4C 4F 47 47 45 44 20 45 4E 54 52 59 20 22 |Y LOGGED ENTRY "|
00001D00: 00 34 25 E6 05 99 20 48 49 24 3B 22 20 27 58 27 |.4%... HI$;" 'X'|
00001D10: 20 44 45 4C 45 54 45 53 20 54 48 45 20 4C 41 53 | DELETES THE LAS|
00001D20: 54 20 45 4E 54 52 59 20 20 20 20 20 20 20 20 20 |T ENTRY |
00001D30: 20 20 20 22 00 68 25 F0 05 99 20 48 49 24 3B 22 | ".h%... HI$;"|
00001D40: 20 27 2D 27 20 41 42 4F 52 54 53 20 43 55 52 52 | '-' ABORTS CURR|
00001D50: 45 4E 54 20 45 4E 54 52 59 20 20 20 20 20 20 20 |ENT ENTRY |
00001D60: 20 20 20 20 20 20 20 22 00 9C 25 FA 05 99 20 48 | "..%... H|
00001D70: 49 24 3B 22 20 45 4E 54 52 59 20 46 4F 52 4D 41 |I$;" ENTRY FORMA|
00001D80: 54 3A 20 27 43 41 4C 4C 20 45 58 43 48 41 4E 47 |T: 'CALL EXCHANG|
00001D90: 45 20 3C 55 54 43 3E 27 20 20 20 22 00 D0 25 04 |E <UTC>' "..%.|
00001DA0: 06 99 20 48 49 24 3B 22 20 45 4E 54 45 52 20 54 |.. HI$;" ENTER T|
00001DB0: 48 45 20 43 41 4C 4C 20 4F 4E 4C 59 20 46 4F 52 |HE CALL ONLY FOR|
00001DC0: 20 44 55 50 45 20 43 48 45 43 4B 20 20 20 20 22 | DUPE CHECK "|
00001DD0: 00 04 26 0E 06 99 20 48 49 24 3B 22 20 45 4E 54 |..&... HI$;" ENT|
00001DE0: 45 52 20 43 41 4C 4C 20 41 4E 44 20 27 3F 27 20 |ER CALL AND '?' |
00001DF0: 54 4F 20 4C 49 53 54 20 42 41 4E 44 53 20 20 20 |TO LIST BANDS |
00001E00: 20 20 20 22 00 38 26 10 06 99 20 48 49 24 3B 22 | ".8&... HI$;"|
00001E10: 20 20 20 20 20 20 20 4F 4E 20 57 48 49 43 48 20 | ON WHICH |
00001E20: 41 20 53 54 41 54 49 4F 4E 20 49 53 20 4E 45 45 |A STATION IS NEE|
00001E30: 44 45 44 20 20 20 20 22 00 6C 26 13 06 99 20 48 |DED ".l&... H|
00001E40: 49 24 3B 22 20 20 20 20 20 20 20 20 20 20 20 20 |I$;" |
00001E50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001E60: 20 20 20 20 20 20 20 20 20 20 20 22 00 A0 26 18 | "..&.|
00001E70: 06 99 20 48 49 24 3B 22 20 3C 3E 20 44 45 4E 4F |.. HI$;" <> DENO|
00001E80: 54 45 53 20 4F 50 54 49 4F 4E 41 4C 20 45 4E 54 |TES OPTIONAL ENT|
00001E90: 52 49 45 53 20 20 20 20 20 20 20 20 20 20 20 22 |RIES "|
00001EA0: 00 AC 26 22 06 99 20 4C 4F 24 3A 8E 00 B6 26 2C |..&".. LO$:...&,|
00001EB0: 06 8F 20 51 53 59 00 C1 26 36 06 8D 20 32 34 30 |.. QSY..&6.. 240|
00001EC0: 30 00 D0 26 40 06 8B 20 4E 4C B2 31 20 A7 20 8E |0..&@.. NL.1 . .|
00001ED0: 00 0A 27 4A 06 8B 20 47 24 B2 22 22 20 A7 20 99 |..'J.. G$."" . .|
00001EE0: 3A 85 20 22 57 48 41 54 20 42 41 4E 44 20 28 4C |:. "WHAT BAND (L|
00001EF0: 4F 47 20 53 48 45 45 54 29 20 44 4F 20 59 4F 55 |OG SHEET) DO YOU|
00001F00: 20 57 41 4E 54 20 22 3B 47 24 00 2D 27 54 06 81 | WANT ";G$.-'T..|
00001F10: 20 4A B2 31 20 A4 20 4E 4C 3A 20 8B 20 47 24 B2 | J.1 . NL: . G$.|
00001F20: 4C 4E 24 28 4A 29 20 A7 20 31 36 36 30 00 35 27 |LN$(J) . 1660.5'|
00001F30: 5E 06 82 20 4A 00 5E 27 68 06 99 20 22 4E 4F 20 |^.. J.^'h.. "NO |
00001F40: 53 55 43 48 20 4C 4F 47 2E 20 56 41 4C 49 44 20 |SUCH LOG. VALID |
00001F50: 4C 4F 47 53 20 41 52 45 3A 22 3B 42 4C 24 00 8A |LOGS ARE:";BL$..|
00001F60: 27 72 06 81 20 4A B2 31 20 A4 20 4E 4C 3A 99 20 |'r.. J.1 . NL:. |
00001F70: A3 35 29 4C 4E 24 28 4A 29 3A 82 20 4A 3A 47 24 |.5)LN$(J):. J:G$|
00001F80: B2 22 22 3A 89 20 31 36 31 30 00 A6 27 7C 06 4C |."":. 1610..'|.L|
00001F90: 47 B2 4A 3A 8B 20 48 43 24 B2 22 59 22 20 A7 20 |G.J:. HC$."Y" . |
00001FA0: 8D 20 32 34 39 30 00 C3 27 86 06 8D 20 32 34 30 |. 2490..'... 240|
00001FB0: 30 3A 8B 20 47 24 B3 B1 22 22 20 A7 20 8D 20 31 |0:. G$.."" . . 1|
00001FC0: 32 30 30 00 C9 27 90 06 8E 00 D6 27 9A 06 8F 20 |200..'.....'... |
00001FD0: 53 54 41 54 55 53 00 F3 27 A4 06 99 20 43 37 24 |STATUS..'... C7$|
00001FE0: 3A 99 3A 99 20 22 44 41 54 45 3D 20 22 3B 44 54 |:.:. "DATE= ";DT|
00001FF0: 45 24 3B 00 0D 28 AE 06 99 20 22 20 20 42 41 4E |E$;..(... " BAN|
00002000: 44 3D 20 22 3B 4C 4E 24 28 4C 47 29 3B 00 22 28 |D= ";LN$(LG);."(|
00002010: B8 06 99 20 22 20 20 4D 4F 44 45 3D 20 22 3B 4D |... " MODE= ";M|
00002020: 44 24 00 3A 28 BD 06 4C 46 B2 4C 47 3A 8B 20 50 |D$.:(..LF.LG:. P|
00002030: 32 B2 30 20 A7 20 4C 46 B2 31 00 5E 28 C2 06 99 |2.0 . LF.1.^(...|
00002040: 20 22 20 53 45 43 54 49 4F 4E 53 20 57 4F 52 4B | " SECTIONS WORK|
00002050: 45 44 3D 20 22 3B 54 53 25 28 4C 46 29 3B 00 7B |ED= ";TS%(LF);.{|
00002060: 28 CC 06 99 20 22 20 20 43 4F 4E 54 41 43 54 53 |(... " CONTACTS|
00002070: 3D 20 22 3B 54 43 25 28 4C 47 29 00 83 28 D6 06 |= ";TC%(LG)..(..|
00002080: 99 3A 8E 00 97 28 E0 06 8F 20 4C 49 53 54 20 53 |.:...(... LIST S|
00002090: 45 43 54 49 4F 4E 53 00 B7 28 EA 06 99 20 43 37 |ECTIONS..(... C7|
000020A0: 24 3A 99 3A 4C 46 B2 4C 47 3A 8B 20 50 32 B2 30 |$:.:LF.LG:. P2.0|
000020B0: 20 A7 20 4C 46 B2 31 00 F5 28 F4 06 99 20 22 2D | . LF.1..(... "-|
000020C0: 2D 2D 2D 2D 2D 20 4D 55 4C 54 49 50 4C 49 45 52 |----- MULTIPLIER|
000020D0: 53 20 57 4F 52 4B 45 44 22 3B 3A 8B 20 50 32 B2 |S WORKED";:. P2.|
000020E0: 31 20 A7 20 99 20 22 20 4F 4E 20 22 3B 4C 4E 24 |1 . . " ON ";LN$|
000020F0: 28 4C 46 29 3B 00 05 29 F6 06 99 20 22 20 2D 2D |(LF);..)... " --|
00002100: 2D 2D 2D 2D 22 00 19 29 FE 06 8B 20 54 53 25 28 |----"..)... TS%(|
00002110: 4C 46 29 B2 30 20 A7 20 8E 00 22 29 08 07 54 42 |LF).0 . ..")..TB|
00002120: B2 31 00 36 29 12 07 81 20 4A B2 31 20 A4 20 54 |.1.6)... J.1 . T|
00002130: 53 25 28 4C 46 29 00 4A 29 1C 07 99 20 A3 54 42 |S%(LF).J)... .TB|
00002140: 29 53 24 28 4A 2C 4C 46 29 3B 00 67 29 26 07 54 |)S$(J,LF);.g)&.T|
00002150: 42 B2 54 42 AA 38 3A 8B 20 54 42 B1 33 38 20 A7 |B.TB.8:. TB.38 .|
00002160: 20 54 42 B2 31 3A 99 00 73 29 30 07 82 20 4A 3A | TB.1:..s)0.. J:|
00002170: 99 3A 8E 00 7D 29 3A 07 8F 20 51 52 54 00 84 29 |.:..}):.. QRT..)|
00002180: 44 07 A0 33 00 A1 29 4E 07 9F 34 2C 38 2C 34 2C |D..3..)N..4,8,4,|
00002190: 46 41 24 AA 22 2C 53 2C 57 22 3A 8D 20 36 30 30 |FA$.",S,W":. 600|
000021A0: 30 00 C3 29 6C 07 98 34 2C 48 43 24 3A 98 34 2C |0..)l..4,HC$:.4,|
000021B0: 54 3A 98 34 2C 59 24 3A 98 34 2C 5A 24 3A 98 34 |T:.4,Y$:.4,Z$:.4|
000021C0: 2C 4E 4C 00 D3 29 6D 07 98 34 2C 4C 25 3A 98 34 |,NL..)m..4,L%:.4|
000021D0: 2C 4D 31 00 F0 29 76 07 81 20 4A B2 31 20 A4 20 |,M1..)v.. J.1 . |
000021E0: 4E 4C 3A 98 34 2C 4C 4E 24 28 4A 29 3A 82 20 4A |NL:.4,LN$(J):. J|
000021F0: 00 00 2A 78 07 98 34 2C 5A 41 3A 98 34 2C 45 54 |..*x..4,ZA:.4,ET|
00002200: 00 30 2A 7A 07 81 20 4A B2 31 20 A4 20 5A 41 3A |.0*z.. J.1 . ZA:|
00002210: 98 34 2C 55 31 24 28 4A 29 3A 98 34 2C 55 32 24 |.4,U1$(J):.4,U2$|
00002220: 28 4A 29 3A 98 34 2C 55 33 28 4A 29 3A 82 20 4A |(J):.4,U3(J):. J|
00002230: 00 63 2A 9E 07 81 20 4A B2 31 20 A4 20 4E 4C 3A |.c*... J.1 . NL:|
00002240: 98 34 2C 51 50 25 28 4A 29 3B 22 2C 22 3B 54 43 |.4,QP%(J);",";TC|
00002250: 25 28 4A 29 3B 22 2C 22 3B 54 53 25 28 4A 29 3A |%(J);",";TS%(J):|
00002260: 82 20 4A 00 81 2A A8 07 81 20 4A B2 31 20 A4 20 |. J..*... J.1 . |
00002270: 4E 4C 3A 81 20 4B B2 31 20 A4 20 54 53 25 28 4A |NL:. K.1 . TS%(J|
00002280: 29 00 9D 2A B2 07 98 34 2C 53 43 25 28 4B 2C 4A |)..*...4,SC%(K,J|
00002290: 29 3B 22 2C 22 3B 53 24 28 4B 2C 4A 29 00 A9 2A |);",";S$(K,J)..*|
000022A0: BC 07 82 20 4B 3A 82 20 4A 00 BA 2A BE 07 98 34 |... K:. J..*...4|
000022B0: 2C 50 31 24 3A 98 34 2C 50 32 00 C0 2A C1 07 8E |,P1$:.4,P2..*...|
000022C0: 00 DF 2A C6 07 8F 20 57 52 49 54 45 20 4D 55 4C |..*... WRITE MUL|
000022D0: 54 20 53 55 4D 4D 41 52 59 20 54 4F 20 23 34 00 |T SUMMARY TO #4.|
000022E0: F5 2A D0 07 98 34 2C 42 4C 24 3A 8F 20 4E 45 57 |.*...4,BL$:. NEW|
000022F0: 20 50 41 47 45 00 1B 2B DA 07 98 34 2C 22 22 A6 | PAGE..+...4,"".|
00002300: 32 37 29 22 2A 20 4D 55 4C 54 49 50 4C 49 45 52 |27)"* MULTIPLIER|
00002310: 20 53 55 4D 4D 41 52 59 20 2A 22 00 33 2B DF 07 | SUMMARY *".3+..|
00002320: 4C 46 B2 4E 4C 3A 8B 20 50 32 B2 30 20 A7 20 4C |LF.NL:. P2.0 . L|
00002330: 46 B2 31 00 42 2B E4 07 81 20 4A B2 31 20 A4 20 |F.1.B+... J.1 . |
00002340: 4C 46 00 5B 2B EE 07 98 34 2C 22 20 22 3A 98 34 |LF.[+...4," ":.4|
00002350: 2C 22 20 22 3A 98 34 2C 22 20 22 00 88 2B F8 07 |," ":.4," "..+..|
00002360: 98 34 2C 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.4,"------------|
00002370: 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 20 4D 55 4C 54 49 |--------- MULTI|
00002380: 50 4C 49 45 52 53 22 3B 00 AE 2B F9 07 8B 20 50 |PLIERS";..+... P|
00002390: 32 B2 31 20 A7 20 98 34 2C 22 20 57 4F 52 4B 45 |2.1 . .4," WORKE|
000023A0: 44 20 4F 4E 20 22 3B 4C 4E 24 28 4A 29 3B 00 D6 |D ON ";LN$(J);..|
000023B0: 2B FA 07 98 34 2C 22 20 20 2D 2D 2D 2D 2D 2D 2D |+...4," -------|
000023C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A |--------------":|
000023D0: 98 34 2C 22 20 22 00 04 2C 02 08 81 20 4B B2 31 |.4," "..,... K.1|
000023E0: 20 A4 20 35 3A 98 34 2C 22 20 20 4D 27 50 4C 49 | . 5:.4," M'PLI|
000023F0: 45 52 2F 51 53 4F 53 20 22 3B 3A 82 20 4B 3A 98 |ER/QSOS ";:. K:.|
00002400: 34 2C 22 22 00 0D 2C 0C 08 54 42 B2 39 00 20 2C |4,""..,..TB.9. ,|
00002410: 16 08 81 20 4B B2 31 20 A4 20 54 53 25 28 4A 29 |... K.1 . TS%(J)|
00002420: 00 4D 2C 20 08 98 34 2C 22 22 A6 39 AB C3 28 53 |.M, ..4,"".9..(S|
00002430: 24 28 4B 2C 4A 29 29 29 53 24 28 4B 2C 4A 29 3B |$(K,J)))S$(K,J);|
00002440: 22 2F 22 3B 53 43 25 28 4B 2C 4A 29 3B 00 6A 2C |"/";SC%(K,J);.j,|
00002450: 22 08 98 34 2C 22 22 A6 35 AB C3 28 C4 28 53 43 |"..4,"".5..(.(SC|
00002460: 25 28 4B 2C 4A 29 29 29 29 3B 00 8C 2C 2A 08 54 |%(K,J))));..,*.T|
00002470: 42 B2 54 42 AA 31 35 3A 8B 20 54 42 B1 37 34 20 |B.TB.15:. TB.74 |
00002480: A7 20 54 42 B2 39 3A 98 34 2C 22 22 00 9F 2C 34 |. TB.9:.4,""..,4|
00002490: 08 82 20 4B 3A 98 34 2C 22 20 22 3A 82 20 4A 00 |.. K:.4," ":. J.|
000024A0: B7 2C 3E 08 8F 20 57 52 49 54 45 20 53 43 4F 52 |.,>.. WRITE SCOR|
000024B0: 45 20 54 4F 20 23 34 00 CD 2C 48 08 98 34 2C 42 |E TO #4..,H..4,B|
000024C0: 4C 24 3A 8F 20 4E 45 57 20 50 41 47 45 00 FD 2C |L$:. NEW PAGE..,|
000024D0: 52 08 98 34 2C 22 2D 20 20 20 20 20 20 20 20 20 |R..4,"- |
000024E0: 20 20 53 43 4F 52 45 20 53 55 4D 4D 41 52 59 22 | SCORE SUMMARY"|
000024F0: 3A 98 34 2C 22 22 3A 98 34 2C 54 31 24 00 13 2D |:.4,"":.4,T1$..-|
00002500: 5C 08 8B 20 48 43 24 B3 B1 22 59 22 20 A7 20 32 |\.. HC$.."Y" . 2|
00002510: 31 35 30 00 3A 2D 5E 08 98 31 33 2C 22 22 3A 98 |150.:-^..13,"":.|
00002520: 31 33 2C 22 20 22 3B A6 31 33 29 22 53 43 4F 52 |13," ";.13)"SCOR|
00002530: 45 20 53 55 4D 4D 41 52 59 22 00 4D 2D 60 08 98 |E SUMMARY".M-`..|
00002540: 31 33 2C 22 22 3A 98 31 33 2C 54 31 24 00 60 2D |13,"":.13,T1$.`-|
00002550: 66 08 58 32 B2 30 3A 58 33 B2 30 3A 58 34 B2 30 |f.X2.0:X3.0:X4.0|
00002560: 00 6F 2D 70 08 81 20 4A B2 31 20 A4 20 4E 4C 00 |.o-p.. J.1 . NL.|
00002570: A7 2D 7A 08 58 34 B2 58 34 AA 54 43 25 28 4A 29 |.-z.X4.X4.TC%(J)|
00002580: 3A 58 31 B2 54 43 25 28 4A 29 AC 51 50 25 28 4A |:X1.TC%(J).QP%(J|
00002590: 29 3A 58 32 B2 58 32 AA 58 31 3A 58 33 B2 58 33 |):X2.X2.X1:X3.X3|
000025A0: AA 54 53 25 28 4A 29 00 CB 2D 84 08 98 34 2C 4C |.TS%(J)..-...4,L|
000025B0: 4E 24 28 4A 29 3B A6 31 30 AB C3 28 4C 4E 24 28 |N$(J);.10..(LN$(|
000025C0: 4A 29 29 29 54 43 25 28 4A 29 3B 00 FF 2D 85 08 |J)))TC%(J);..-..|
000025D0: 98 34 2C 22 22 A6 39 AB C3 28 C4 28 54 43 25 28 |.4,"".9..(.(TC%(|
000025E0: 4A 29 29 29 29 51 50 25 28 4A 29 3B A6 37 AB C3 |J))))QP%(J);.7..|
000025F0: 28 C4 28 51 50 25 28 4A 29 29 29 29 58 31 3B 00 |(.(QP%(J))))X1;.|
00002600: 27 2E 89 08 8B 20 50 32 B2 31 20 A7 20 98 34 2C |'.... P2.1 . .4,|
00002610: 22 22 3B A6 31 30 AB C3 28 C4 28 58 31 29 29 29 |"";.10..(.(X1)))|
00002620: 54 53 25 28 4A 29 3B 00 31 2E 8A 08 98 34 2C 22 |TS%(J);.1....4,"|
00002630: 22 00 47 2E 8C 08 8B 20 48 43 24 B3 B1 22 59 22 |".G.... HC$.."Y"|
00002640: 20 A7 20 32 32 30 30 00 7C 2E 8E 08 98 31 33 2C | . 2200.|....13,|
00002650: 4C 4E 24 28 4A 29 3B A6 31 31 AB C3 28 4C 4E 24 |LN$(J);.11..(LN$|
00002660: 28 4A 29 29 29 54 43 25 28 4A 29 3B A6 35 29 51 |(J)))TC%(J);.5)Q|
00002670: 50 25 28 4A 29 3B A6 35 29 58 31 3B 00 9C 2E 90 |P%(J);.5)X1;....|
00002680: 08 8B 20 50 32 B2 31 20 A7 20 98 31 33 2C 22 20 |.. P2.1 . .13," |
00002690: 20 20 20 20 22 54 53 25 28 4A 29 3B 00 A7 2E 92 | "TS%(J);....|
000026A0: 08 98 31 33 2C 22 22 00 AF 2E 98 08 82 20 4A 00 |..13,""...... J.|
000026B0: C6 2E A0 08 8B 20 50 32 B2 30 20 A7 20 58 33 B2 |..... P2.0 . X3.|
000026C0: 54 53 25 28 31 29 00 F5 2E A2 08 98 34 2C 22 22 |TS%(1)......4,""|
000026D0: 54 32 24 3A 98 34 2C 22 54 4F 54 41 4C 22 3B A6 |T2$:.4,"TOTAL";.|
000026E0: 36 29 58 34 3B A6 31 36 AB C3 28 C4 28 58 34 29 |6)X4;.16..(.(X4)|
000026F0: 29 29 58 32 3B 00 15 2F A4 08 98 34 2C 22 22 3B |))X2;../...4,"";|
00002700: A6 31 30 AB C3 28 C4 28 58 32 29 29 29 58 33 3A |.10..(.(X2)))X3:|
00002710: 98 34 2C 22 22 00 2B 2F AC 08 8B 20 48 43 24 B3 |.4,"".+/... HC$.|
00002720: B1 22 59 22 20 A7 20 32 32 33 30 00 5A 2F AE 08 |."Y" . 2230.Z/..|
00002730: 98 31 33 2C 54 32 24 3A 98 31 33 2C 22 54 4F 54 |.13,T2$:.13,"TOT|
00002740: 41 4C 22 3B A6 35 29 58 34 3B A6 31 35 AB C3 28 |AL";.5)X4;.15..(|
00002750: C4 28 58 34 29 29 29 58 32 3B 00 7C 2F B0 08 98 |.(X4)))X2;.|/...|
00002760: 31 33 2C 22 20 22 3B A6 38 AB C3 28 C4 28 58 32 |13," ";.8..(.(X2|
00002770: 29 29 29 58 33 3A 98 31 33 2C 22 22 00 AC 2F B6 |)))X3:.13,""../.|
00002780: 08 98 34 2C 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..4,"***********|
00002790: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000027A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 22 00 DC 2F C0 |***********"../.|
000027B0: 08 98 34 2C 22 2A 20 20 20 20 20 20 20 20 20 20 |..4,"* |
000027C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000027D0: 20 20 20 20 20 20 20 20 20 20 2A 22 00 09 30 CA | *"..0.|
000027E0: 08 98 34 2C 22 53 43 4F 52 45 20 2D 20 22 3B 58 |..4,"SCORE - ";X|
000027F0: 32 3B 22 20 58 20 22 3B 58 33 3B A6 31 30 29 22 |2;" X ";X3;.10)"|
00002800: 20 3D 22 3B 58 32 AC 58 33 00 39 30 D4 08 98 34 | =";X2.X3.90...4|
00002810: 2C 22 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 |,"* |
00002820: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002830: 20 20 20 20 20 20 20 2A 22 00 69 30 DE 08 98 34 | *".i0...4|
00002840: 2C 22 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |,"**************|
00002850: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002860: 2A 2A 2A 2A 2A 2A 2A 2A 22 00 74 30 E0 08 98 34 |********".t0...4|
00002870: 2C 22 21 22 00 82 30 E8 08 A0 34 3A 8D 20 36 30 |,"!"..0...4:. 60|
00002880: 30 30 00 8D 30 E9 08 8D 20 34 30 30 30 00 A4 30 |00..0... 4000..0|
00002890: EA 08 81 20 52 4E B2 31 20 A4 20 4C 25 3A 8D 20 |... RN.1 . L%:. |
000028A0: 37 30 30 30 00 BF 30 EB 08 52 50 B2 31 3A 8D 20 |7000..0..RP.1:. |
000028B0: 37 31 30 30 3A 98 33 2C 43 31 25 28 52 4E 29 00 |7100:.3,C1%(RN).|
000028C0: DA 30 EC 08 52 50 B2 39 3A 8D 20 37 31 30 30 3A |.0..RP.9:. 7100:|
000028D0: 98 33 2C 43 32 25 28 52 4E 29 00 F5 30 ED 08 52 |.3,C2%(RN)..0..R|
000028E0: 50 B2 31 37 3A 8D 20 37 31 30 30 3A 98 33 2C 50 |P.17:. 7100:.3,P|
000028F0: 25 28 52 4E 29 00 05 31 EE 08 8D 20 36 30 30 30 |%(RN)..1... 6000|
00002900: 3A 82 20 52 4E 00 17 31 EF 08 A0 33 3A 8D 20 36 |:. RN..1...3:. 6|
00002910: 30 30 30 3A A0 31 35 00 3C 31 F2 08 8B 20 48 43 |000:.15.<1... HC|
00002920: 24 B2 22 59 22 20 A7 20 98 31 33 2C 22 53 43 4F |$."Y" . .13,"SCO|
00002930: 52 45 20 3D 20 22 3B 58 32 AC 58 33 00 5B 31 FC |RE = ";X2.X3.[1.|
00002940: 08 81 20 4A B2 31 20 A4 20 31 35 30 30 3A 99 3B |.. J.1 . 1500:.;|
00002950: 3A 82 20 4A 3A A0 20 31 33 3A 80 00 75 31 06 09 |:. J:. 13:..u1..|
00002960: 99 20 43 37 24 3A 99 3A 8F 20 50 52 49 4E 54 20 |. C7$:.:. PRINT |
00002970: 54 49 54 4C 45 00 7D 31 10 09 99 3A 99 00 B2 31 |TITLE.}1...:...1|
00002980: 1A 09 99 20 22 20 20 22 3B 48 49 24 3B 22 20 20 |... " ";HI$;" |
00002990: 47 45 4E 45 52 41 4C 20 43 4F 4E 54 45 53 54 20 |GENERAL CONTEST |
000029A0: 4C 4F 47 47 49 4E 47 20 50 52 4F 47 52 41 4D 20 |LOGGING PROGRAM |
000029B0: 20 22 00 E7 31 1F 09 99 20 22 20 20 22 3B 48 49 | "..1... " ";HI|
000029C0: 24 3B 22 20 20 20 20 20 20 20 20 20 20 42 59 20 |$;" BY |
000029D0: 4B 43 36 41 20 41 4E 44 20 4E 36 4E 42 20 20 20 |KC6A AND N6NB |
000029E0: 20 20 20 20 20 20 22 00 1C 32 24 09 99 20 22 20 | "..2$.. " |
000029F0: 20 22 3B 48 49 24 3B 22 20 28 43 29 20 31 39 38 | ";HI$;" (C) 198|
00002A00: 33 20 42 59 20 48 41 59 44 45 4E 20 42 4F 4F 4B |3 BY HAYDEN BOOK|
00002A10: 20 43 4F 2E 2C 20 49 4E 43 2E 20 22 00 2A 32 2E | CO., INC. ".*2.|
00002A20: 09 99 20 4C 4F 24 3A 99 3A 8E 00 43 32 38 09 8F |.. LO$:.:..C28..|
00002A30: 20 49 4E 50 55 54 20 53 43 41 4E 20 52 4F 55 54 | INPUT SCAN ROUT|
00002A40: 49 4E 45 00 6C 32 42 09 47 53 24 B2 22 22 3A 85 |INE.l2B.GS$."":.|
00002A50: 20 47 53 24 3A 4C 4C B2 C3 28 47 53 24 29 3A 8B | GS$:LL..(GS$):.|
00002A60: 20 4C 4C B2 30 20 A7 20 32 34 33 30 00 9A 32 4C | LL.0 . 2430..2L|
00002A70: 09 81 20 4A B2 31 20 A4 20 4C 4C 3A 8B 20 CA 28 |.. J.1 . LL:. .(|
00002A80: 47 53 24 2C 4A 2C 31 29 B2 22 2D 22 20 A7 20 58 |GS$,J,1)."-" . X|
00002A90: 31 25 B2 31 3A 89 20 36 35 30 00 A3 32 4D 09 82 |1%.1:. 650..2M..|
00002AA0: 20 4A 20 00 AC 32 56 09 4C 50 B2 31 00 CB 32 60 | J ..2V.LP.1..2`|
00002AB0: 09 8B 20 4C 50 B1 4C 4C 20 A7 20 32 34 33 30 3A |.. LP.LL . 2430:|
00002AC0: 8F 20 32 4E 44 20 45 4E 54 52 59 00 F6 32 6A 09 |. 2ND ENTRY..2j.|
00002AD0: 81 20 4C 54 B2 4C 50 20 A4 20 4C 4C 3A 8B 20 CA |. LT.LP . LL:. .|
00002AE0: 28 47 53 24 2C 4C 54 2C 31 29 B3 B1 22 20 22 20 |(GS$,LT,1).." " |
00002AF0: A7 20 32 34 34 30 00 FF 32 74 09 82 20 4C 54 00 |. 2440..2t.. LT.|
00002B00: 0B 33 7E 09 47 24 B2 22 22 3A 8E 00 15 33 88 09 |.3~.G$."":...3..|
00002B10: 4C 50 B2 4C 54 00 3F 33 92 09 81 20 4C 54 B2 4C |LP.LT.?3... LT.L|
00002B20: 50 20 A4 20 4C 4C 3A 8B 20 CA 28 47 53 24 2C 4C |P . LL:. .(GS$,L|
00002B30: 54 2C 31 29 B2 22 20 22 20 A7 20 32 34 38 30 00 |T,1)." " . 2480.|
00002B40: 48 33 9C 09 82 20 4C 54 00 54 33 A6 09 4C 54 B2 |H3... LT.T3..LT.|
00002B50: 4C 54 AA 31 00 73 33 B0 09 47 24 B2 CA 28 47 53 |LT.1.s3..G$..(GS|
00002B60: 24 2C 4C 50 2C 4C 54 AB 4C 50 29 3A 4C 50 B2 4C |$,LP,LT.LP):LP.L|
00002B70: 54 3A 8E 00 7E 33 BA 09 98 31 33 2C 22 22 00 9E |T:..~3...13,""..|
00002B80: 33 C4 09 98 31 33 2C 22 20 20 20 20 20 51 53 59 |3...13," QSY|
00002B90: 20 54 4F 3A 20 22 3B 4C 4E 24 28 4C 47 29 00 A4 | TO: ";LN$(LG)..|
00002BA0: 33 CE 09 8E 00 B9 33 D8 09 4C 4C B2 C3 28 47 53 |3.....3..LL..(GS|
00002BB0: 24 29 3A 89 20 32 33 39 30 00 C6 33 E2 09 8F 20 |$):. 2390..3... |
00002BC0: 52 45 53 55 4D 45 00 E3 33 EC 09 9F 34 2C 38 2C |RESUME..3...4,8,|
00002BD0: 34 2C 46 41 24 AA 22 2C 53 2C 52 22 3A 8D 20 36 |4,FA$.",S,R":. 6|
00002BE0: 30 30 30 00 05 34 0A 0A 84 34 2C 48 43 24 3A 84 |000..4...4,HC$:.|
00002BF0: 34 2C 54 3A 84 34 2C 59 24 3A 84 34 2C 5A 24 3A |4,T:.4,Y$:.4,Z$:|
00002C00: 84 34 2C 4E 4C 00 15 34 0B 0A 84 34 2C 4C 25 3A |.4,NL..4...4,L%:|
00002C10: 84 34 2C 4D 31 00 47 34 14 0A 86 20 4C 4E 24 28 |.4,M1.G4... LN$(|
00002C20: 4E 4C 29 2C 51 50 25 28 4E 4C 29 2C 54 43 25 28 |NL),QP%(NL),TC%(|
00002C30: 4E 4C 29 2C 54 53 25 28 4E 4C 29 2C 53 43 25 28 |NL),TS%(NL),SC%(|
00002C40: 31 30 30 2C 4E 4C 29 00 6F 34 1E 0A 86 20 43 31 |100,NL).o4... C1|
00002C50: 25 28 4D 31 29 2C 43 32 25 28 4D 31 29 2C 50 25 |%(M1),C2%(M1),P%|
00002C60: 28 4D 31 29 2C 53 24 28 31 30 30 2C 4E 4C 29 00 |(M1),S$(100,NL).|
00002C70: 8C 34 28 0A 81 20 4A B2 31 20 A4 20 4E 4C 3A 84 |.4(.. J.1 . NL:.|
00002C80: 34 2C 4C 4E 24 28 4A 29 3A 82 20 4A 00 9C 34 2A |4,LN$(J):. J..4*|
00002C90: 0A 84 34 2C 5A 41 3A 84 34 2C 45 54 00 CC 34 2C |..4,ZA:.4,ET..4,|
00002CA0: 0A 81 20 4A B2 31 20 A4 20 5A 41 3A 84 34 2C 55 |.. J.1 . ZA:.4,U|
00002CB0: 31 24 28 4A 29 3A 84 34 2C 55 32 24 28 4A 29 3A |1$(J):.4,U2$(J):|
00002CC0: 84 34 2C 55 33 28 4A 29 3A 82 20 4A 00 F7 34 5A |.4,U3(J):. J..4Z|
00002CD0: 0A 81 20 4A B2 31 20 A4 20 4E 4C 3A 84 34 2C 51 |.. J.1 . NL:.4,Q|
00002CE0: 50 25 28 4A 29 2C 54 43 25 28 4A 29 2C 54 53 25 |P%(J),TC%(J),TS%|
00002CF0: 28 4A 29 3A 82 20 4A 00 15 35 64 0A 81 20 4A B2 |(J):. J..5d.. J.|
00002D00: 31 20 A4 20 4E 4C 3A 81 20 4B B2 31 20 A4 20 54 |1 . NL:. K.1 . T|
00002D10: 53 25 28 4A 29 00 2D 35 6E 0A 84 34 2C 53 43 25 |S%(J).-5n..4,SC%|
00002D20: 28 4B 2C 4A 29 2C 53 24 28 4B 2C 4A 29 00 39 35 |(K,J),S$(K,J).95|
00002D30: 78 0A 82 20 4B 3A 82 20 4A 00 4A 35 7A 0A 84 34 |x.. K:. J.J5z..4|
00002D40: 2C 50 31 24 3A 84 34 2C 50 32 00 58 35 82 0A A0 |,P1$:.4,P2.X5...|
00002D50: 34 3A 8D 20 36 30 30 30 00 63 35 83 0A 8D 20 34 |4:. 6000.c5... 4|
00002D60: 30 30 30 00 7A 35 84 0A 81 20 52 4E B2 31 20 A4 |000.z5... RN.1 .|
00002D70: 20 4C 25 3A 8D 20 37 30 30 30 00 94 35 85 0A 52 | L%:. 7000..5..R|
00002D80: 50 B2 31 3A 8D 37 31 30 30 3A 84 33 2C 43 31 25 |P.1:.7100:.3,C1%|
00002D90: 28 52 4E 29 00 AE 35 86 0A 52 50 B2 39 3A 8D 37 |(RN)..5..RP.9:.7|
00002DA0: 31 30 30 3A 84 33 2C 43 32 25 28 52 4E 29 00 C8 |100:.3,C2%(RN)..|
00002DB0: 35 87 0A 52 50 B2 31 37 3A 8D 37 31 30 30 3A 84 |5..RP.17:.7100:.|
00002DC0: 33 2C 50 25 28 52 4E 29 00 DC 35 88 0A 82 20 52 |3,P%(RN)..5... R|
00002DD0: 4E 3A A0 33 3A 8D 36 30 30 30 3A 8E 00 F0 35 8C |N:.3:.6000:...5.|
00002DE0: 0A 8F 20 45 44 49 54 20 41 20 52 45 43 4F 52 44 |.. EDIT A RECORD|
00002DF0: 00 2B 36 96 0A 8D 20 32 34 30 30 3A 8B 20 47 24 |.+6... 2400:. G$|
00002E00: B2 22 22 20 A7 20 85 20 22 57 48 41 54 20 51 53 |."" . . "WHAT QS|
00002E10: 4F 23 20 44 4F 20 59 4F 55 20 57 41 4E 54 20 54 |O# DO YOU WANT T|
00002E20: 4F 20 45 44 49 54 20 22 3B 47 24 00 3B 36 A0 0A |O EDIT ";G$.;6..|
00002E30: 58 32 B2 B5 28 C5 28 47 24 29 29 00 56 36 AA 0A |X2..(.(G$)).V6..|
00002E40: 8B 20 58 32 B1 30 20 A7 20 8B 20 58 32 B3 54 20 |. X2.0 . . X2.T |
00002E50: A7 20 32 37 35 30 00 60 36 B4 0A 89 20 36 37 30 |. 2750.`6... 670|
00002E60: 00 80 36 BE 0A 99 20 43 37 24 3A 4A 42 B2 38 3A |..6... C7$:JB.8:|
00002E70: 8B 20 50 31 24 B2 22 59 22 20 A7 20 4A 42 B2 37 |. P1$."Y" . JB.7|
00002E80: 00 91 36 C8 0A 52 4E B2 58 32 3A 8D 20 37 30 30 |..6..RN.X2:. 700|
00002E90: 30 00 B7 36 C9 0A 52 50 B2 31 3A 8D 20 37 31 30 |0..6..RP.1:. 710|
00002EA0: 30 3A 84 33 2C 59 24 28 32 29 3A 59 24 28 31 32 |0:.3,Y$(2):Y$(12|
00002EB0: 29 B2 59 24 28 32 29 00 DE 36 CA 0A 52 50 B2 31 |).Y$(2)..6..RP.1|
00002EC0: 30 3A 8D 20 37 31 30 30 3A 84 33 2C 59 24 28 33 |0:. 7100:.3,Y$(3|
00002ED0: 29 3A 59 24 28 31 33 29 B2 59 24 28 33 29 00 05 |):Y$(13).Y$(3)..|
00002EE0: 37 CB 0A 52 50 B2 31 35 3A 8D 20 37 31 30 30 3A |7..RP.15:. 7100:|
00002EF0: 84 33 2C 59 24 28 34 29 3A 59 24 28 31 34 29 B2 |.3,Y$(4):Y$(14).|
00002F00: 59 24 28 34 29 00 2C 37 CC 0A 52 50 B2 32 36 3A |Y$(4).,7..RP.26:|
00002F10: 8D 20 37 31 30 30 3A 84 33 2C 59 24 28 35 29 3A |. 7100:.3,Y$(5):|
00002F20: 59 24 28 31 35 29 B2 59 24 28 35 29 00 53 37 CD |Y$(15).Y$(5).S7.|
00002F30: 0A 52 50 B2 33 32 3A 8D 20 37 31 30 30 3A 84 33 |.RP.32:. 7100:.3|
00002F40: 2C 59 24 28 36 29 3A 59 24 28 31 36 29 B2 59 24 |,Y$(6):Y$(16).Y$|
00002F50: 28 36 29 00 6B 37 CE 0A 52 50 B2 33 38 3A 8D 20 |(6).k7..RP.38:. |
00002F60: 37 31 30 30 3A 84 33 2C 45 31 24 00 91 37 CF 0A |7100:.3,E1$..7..|
00002F70: 47 53 24 B2 45 31 24 3A 8D 20 32 35 32 30 3A 59 |GS$.E1$:. 2520:Y|
00002F80: 24 28 37 29 B2 47 24 3A 59 24 28 31 37 29 B2 47 |$(7).G$:Y$(17).G|
00002F90: 24 00 BE 37 D0 0A 59 24 28 38 29 B2 59 24 28 37 |$..7..Y$(8).Y$(7|
00002FA0: 29 3A 8B 20 50 31 24 B3 B1 22 59 22 20 A7 20 8D |):. P1$.."Y" . .|
00002FB0: 20 32 34 30 30 3A 59 24 28 38 29 B2 47 24 00 CF | 2400:Y$(8).G$..|
00002FC0: 37 D1 0A 59 24 28 31 38 29 B2 59 24 28 38 29 00 |7..Y$(18).Y$(8).|
00002FD0: DA 37 D2 0A 8D 20 33 30 38 30 00 07 38 DC 0A 99 |.7... 3080..8...|
00002FE0: 3A 41 24 B2 22 22 3A 85 20 22 43 48 41 4E 47 45 |:A$."":. "CHANGE|
00002FF0: 20 54 48 49 53 20 52 45 43 4F 52 44 20 28 59 2F | THIS RECORD (Y/|
00003000: 4E 29 20 22 3B 41 24 00 23 38 E6 0A 8B 20 41 24 |N) ";A$.#8... A$|
00003010: B3 B1 22 59 22 20 A7 20 99 20 43 37 24 3A 89 20 |.."Y" . . C7$:. |
00003020: 34 35 30 00 2D 38 F0 0A 4C 48 25 B2 30 00 52 38 |450.-8..LH%.0.R8|
00003030: FA 0A 81 20 4A B2 31 20 A4 20 4E 4C 3A 8B 20 59 |... J.1 . NL:. Y|
00003040: 24 28 35 29 B2 4C 4E 24 28 4A 29 20 A7 20 32 38 |$(5).LN$(J) . 28|
00003050: 33 30 00 5A 38 04 0B 82 20 4A 00 6F 38 0E 0B 4C |30.Z8... J.o8..L|
00003060: 58 B2 4C 47 3A 4C 59 B2 4A 3A 4C 4B B2 4C 59 00 |X.LG:LY.J:LK.LY.|
00003070: 8C 38 18 0B 99 3A 99 20 A3 31 32 29 22 49 4E 53 |.8...:. .12)"INS|
00003080: 54 52 55 43 54 49 4F 4E 53 22 3A 99 00 B9 38 22 |TRUCTIONS":...8"|
00003090: 0B 99 20 22 48 49 54 20 3C 43 52 3E 20 54 4F 20 |.. "HIT <CR> TO |
000030A0: 4C 45 41 56 45 20 41 4E 20 49 54 45 4D 20 55 4E |LEAVE AN ITEM UN|
000030B0: 43 48 41 4E 47 45 44 2E 22 00 E2 38 2C 0B 99 20 |CHANGED."..8,.. |
000030C0: 22 54 4F 20 43 48 41 4E 47 45 2C 20 45 4E 54 45 |"TO CHANGE, ENTE|
000030D0: 52 20 4E 45 57 20 56 41 4C 55 45 20 3C 43 52 3E |R NEW VALUE <CR>|
000030E0: 2E 22 00 14 39 36 0B 99 20 22 54 4F 20 44 45 4C |."..96.. "TO DEL|
000030F0: 45 54 45 20 54 48 49 53 20 45 4E 54 52 59 2C 20 |ETE THIS ENTRY, |
00003100: 43 48 41 4E 47 45 20 43 41 4C 4C 20 54 4F 20 27 |CHANGE CALL TO '|
00003110: 2A 27 2E 22 00 1A 39 3E 0B 99 00 55 39 40 0B 41 |*'."..9>...U9@.A|
00003120: 24 B2 22 22 3A 99 20 A3 35 29 22 44 41 54 45 3A |$."":. .5)"DATE:|
00003130: 22 3B A3 31 34 29 59 24 28 32 29 3B 3A 85 20 41 |";.14)Y$(2);:. A|
00003140: 24 3A 8B 20 41 24 B3 B1 22 22 20 A7 20 59 24 28 |$:. A$.."" . Y$(|
00003150: 32 29 B2 41 24 00 8F 39 4A 0B 99 20 A3 35 29 22 |2).A$..9J.. .5)"|
00003160: 54 49 4D 45 3A 22 3B A3 31 34 29 59 24 28 33 29 |TIME:";.14)Y$(3)|
00003170: 3B 3A 41 24 B2 22 22 3A 85 20 41 24 3A 8B 20 41 |;:A$."":. A$:. A|
00003180: 24 B3 B1 22 22 A7 20 59 24 28 33 29 B2 41 24 00 |$.."". Y$(3).A$.|
00003190: C9 39 54 0B 99 20 A3 35 29 22 43 41 4C 4C 3A 22 |.9T.. .5)"CALL:"|
000031A0: 3B A3 31 34 29 59 24 28 34 29 3B 3A 41 24 B2 22 |;.14)Y$(4);:A$."|
000031B0: 22 3A 85 20 41 24 3A 8B 20 41 24 B3 B1 22 22 A7 |":. A$:. A$.."".|
000031C0: 20 59 24 28 34 29 B2 41 24 00 04 3A 5E 0B 99 20 | Y$(4).A$..:^.. |
000031D0: A3 35 29 22 42 41 4E 44 3A 22 3B A3 31 34 29 59 |.5)"BAND:";.14)Y|
000031E0: 24 28 35 29 3B 3A 41 24 B2 22 22 3A 85 20 41 24 |$(5);:A$."":. A$|
000031F0: 3A 8B 20 41 24 B3 B1 22 22 20 A7 20 59 24 28 35 |:. A$.."" . Y$(5|
00003200: 29 B2 41 24 00 3E 3A 68 0B 99 20 A3 35 29 22 4D |).A$.>:h.. .5)"M|
00003210: 4F 44 45 3A 22 3B A3 31 34 29 59 24 28 36 29 3B |ODE:";.14)Y$(6);|
00003220: 3A 41 24 B2 22 22 3A 85 20 41 24 3A 8B 20 41 24 |:A$."":. A$:. A$|
00003230: B3 B1 22 22 A7 20 59 24 28 36 29 B2 41 24 00 6B |.."". Y$(6).A$.k|
00003240: 3A 72 0B 8B 20 50 31 24 B3 B1 22 59 22 20 A7 20 |:r.. P1$.."Y" . |
00003250: 99 20 A3 35 29 22 45 58 43 48 41 4E 47 45 3A 22 |. .5)"EXCHANGE:"|
00003260: 3B A3 31 34 29 59 24 28 37 29 3B 00 9A 3A 73 0B |;.14)Y$(7);..:s.|
00003270: 8B 20 50 31 24 B3 B1 22 59 22 A7 20 41 24 B2 22 |. P1$.."Y". A$."|
00003280: 22 3A 85 20 41 24 3A 8B 20 41 24 B3 B1 22 22 20 |":. A$:. A$.."" |
00003290: A7 20 59 24 28 37 29 B2 41 24 00 D8 3A 77 0B 99 |. Y$(7).A$..:w..|
000032A0: 20 A3 35 29 22 4D 27 50 4C 49 45 52 3A 22 3B A3 | .5)"M'PLIER:";.|
000032B0: 31 34 29 59 24 28 38 29 3B 3A 41 24 B2 22 22 3A |14)Y$(8);:A$."":|
000032C0: 85 20 41 24 3A 8B 20 41 24 B3 B1 22 22 20 A7 20 |. A$:. A$.."" . |
000032D0: 59 24 28 38 29 B2 41 24 00 FB 3A 7C 0B 99 3A 41 |Y$(8).A$..:|..:A|
000032E0: 24 B2 22 22 3A 85 20 22 4F 4B 20 28 59 2F 4E 29 |$."":. "OK (Y/N)|
000032F0: 20 22 3B 41 24 3A 58 31 25 B2 34 00 1D 3B 86 0B | ";A$:X1%.4..;..|
00003300: 8B 20 41 24 B3 B1 22 59 22 20 A7 20 99 20 43 37 |. A$.."Y" . . C7|
00003310: 24 3A 8D 20 36 35 30 3A 89 20 34 35 30 00 4F 3B |$:. 650:. 450.O;|
00003320: 90 0B 8B 20 59 24 28 35 29 B3 B1 59 24 28 31 35 |... Y$(5)..Y$(15|
00003330: 29 20 A7 20 8D 20 33 32 34 30 3A 89 20 33 30 30 |) . . 3240:. 300|
00003340: 30 3A 8F 20 42 41 4E 44 20 43 48 41 4E 47 45 00 |0:. BAND CHANGE.|
00003350: 59 3B 9A 0B 4C 47 B2 4C 4B 00 8B 3B A4 0B 8B 20 |Y;..LG.LK..;... |
00003360: 59 24 28 34 29 B3 B1 59 24 28 31 34 29 20 A7 20 |Y$(4)..Y$(14) . |
00003370: 8D 20 33 31 36 30 3A 8D 20 33 31 39 30 3A 8F 20 |. 3160:. 3190:. |
00003380: 43 41 4C 4C 20 43 48 41 4E 47 45 00 C1 3B AE 0B |CALL CHANGE..;..|
00003390: 8B 20 59 24 28 38 29 B3 B1 59 24 28 31 38 29 20 |. Y$(8)..Y$(18) |
000033A0: A7 20 8D 20 33 33 32 30 3A 8D 20 33 33 35 30 3A |. . 3320:. 3350:|
000033B0: 8F 20 45 58 43 48 41 4E 47 45 20 43 48 41 4E 47 |. EXCHANGE CHANG|
000033C0: 45 00 CB 3B B8 0B 4C 47 B2 4C 58 00 F4 3B C2 0B |E..;..LG.LX..;..|
000033D0: 91 20 58 31 25 20 89 20 35 39 30 2C 33 33 37 30 |. X1% . 590,3370|
000033E0: 2C 33 33 37 30 2C 33 30 32 30 2C 33 30 32 30 2C |,3370,3020,3020,|
000033F0: 33 33 38 30 00 0D 3C CC 0B 52 50 B2 31 3A 8D 20 |3380..<..RP.1:. |
00003400: 37 31 30 30 3A 98 33 2C 59 24 28 32 29 00 27 3C |7100:.3,Y$(2).'<|
00003410: CD 0B 52 50 B2 31 30 3A 8D 20 37 31 30 30 3A 98 |..RP.10:. 7100:.|
00003420: 33 2C 59 24 28 33 29 00 41 3C CE 0B 52 50 B2 31 |3,Y$(3).A<..RP.1|
00003430: 35 3A 8D 20 37 31 30 30 3A 98 33 2C 59 24 28 34 |5:. 7100:.3,Y$(4|
00003440: 29 00 5B 3C CF 0B 52 50 B2 32 36 3A 8D 20 37 31 |).[<..RP.26:. 71|
00003450: 30 30 3A 98 33 2C 59 24 28 35 29 00 75 3C D0 0B |00:.3,Y$(5).u<..|
00003460: 52 50 B2 33 32 3A 8D 20 37 31 30 30 3A 98 33 2C |RP.32:. 7100:.3,|
00003470: 59 24 28 36 29 00 8E 3C D8 0B 8B 20 50 31 24 B2 |Y$(6)..<... P1$.|
00003480: 22 59 22 20 A7 20 59 24 28 37 29 B2 22 22 00 B2 |"Y" . Y$(7).""..|
00003490: 3C E0 0B 52 50 B2 33 38 3A 8D 20 37 31 30 30 3A |<..RP.38:. 7100:|
000034A0: 98 33 2C 59 24 28 37 29 AA 22 A0 22 AA 59 24 28 |.3,Y$(7).".".Y$(|
000034B0: 38 29 00 C8 3C EA 0B 8B 20 48 43 24 B3 B1 22 59 |8)..<... HC$.."Y|
000034C0: 22 20 A7 20 33 30 37 30 00 02 3D F4 0B 98 31 33 |" . 3070..=...13|
000034D0: 2C 22 20 20 2A 2A 20 45 44 49 54 20 4F 4E 20 52 |," ** EDIT ON R|
000034E0: 45 43 20 23 22 3B 58 32 3B 22 3A 20 22 3B 44 31 |EC #";X2;": ";D1|
000034F0: 24 3B 22 20 22 3B 54 4D 24 3B 22 20 22 3B 4B 4C |$;" ";TM$;" ";KL|
00003500: 24 3B 00 22 3D F5 0B 98 31 33 2C 22 20 22 3B 42 |$;."=...13," ";B|
00003510: 31 24 3B 22 20 22 3B 4D 31 24 3B 22 20 22 3B 45 |1$;" ";M1$;" ";E|
00003520: 31 24 00 2C 3D FE 0B 89 20 34 35 30 00 4A 3D 08 |1$.,=... 450.J=.|
00003530: 0C 99 3A 99 20 20 A3 35 29 22 44 41 54 45 3A 22 |..:. .5)"DATE:"|
00003540: 3B A3 31 34 29 59 24 28 32 29 00 65 3D 12 0C 99 |;.14)Y$(2).e=...|
00003550: 20 A3 35 29 22 54 49 4D 45 3A 22 3B A3 31 34 29 | .5)"TIME:";.14)|
00003560: 59 24 28 33 29 00 80 3D 1C 0C 99 20 A3 35 29 22 |Y$(3)..=... .5)"|
00003570: 43 41 4C 4C 3A 22 3B A3 31 34 29 59 24 28 34 29 |CALL:";.14)Y$(4)|
00003580: 00 9B 3D 26 0C 99 20 A3 35 29 22 42 41 4E 44 3A |..=&.. .5)"BAND:|
00003590: 22 3B A3 31 34 29 59 24 28 35 29 00 B6 3D 30 0C |";.14)Y$(5)..=0.|
000035A0: 99 20 A3 35 29 22 4D 4F 44 45 3A 22 3B A3 31 34 |. .5)"MODE:";.14|
000035B0: 29 59 24 28 36 29 00 E2 3D 3A 0C 8B 20 50 31 24 |)Y$(6)..=:.. P1$|
000035C0: B3 B1 22 59 22 20 A7 20 99 20 A3 35 29 22 45 58 |.."Y" . . .5)"EX|
000035D0: 43 48 41 4E 47 45 3A 22 3B A3 31 34 29 59 24 28 |CHANGE:";.14)Y$(|
000035E0: 37 29 00 00 3E 3F 0C 99 20 A3 35 29 22 4D 27 50 |7)..>?.. .5)"M'P|
000035F0: 4C 49 45 52 3A 22 3B A3 31 34 29 59 24 28 38 29 |LIER:";.14)Y$(8)|
00003600: 00 06 3E 44 0C 8E 00 19 3E 4E 0C 8F 20 43 41 4C |..>D....>N.. CAL|
00003610: 4C 20 43 48 41 4E 47 45 44 00 37 3E 58 0C 8B 20 |L CHANGED.7>X.. |
00003620: 59 24 28 34 29 B2 22 2A 22 20 A7 20 59 24 28 38 |Y$(4)."*" . Y$(8|
00003630: 29 B2 22 2A 22 3A 8E 00 74 3E 62 0C 43 53 24 B2 |)."*":..t>b.CS$.|
00003640: 59 24 28 34 29 3A 8D 20 33 34 30 30 3A 8B 20 58 |Y$(4):. 3400:. X|
00003650: 31 25 B3 34 20 A7 20 8E 3A 8F 20 43 48 45 43 4B |1%.4 . .:. CHECK|
00003660: 20 49 46 20 4E 45 57 20 43 41 4C 4C 20 49 53 20 | IF NEW CALL IS |
00003670: 44 55 50 45 00 92 3E 6C 0C 8D 20 39 39 30 3A 54 |DUPE..>l.. 990:T|
00003680: 43 25 28 4C 47 29 B2 54 43 25 28 4C 47 29 AA 31 |C%(LG).TC%(LG).1|
00003690: 3A 8E 00 A2 3E 76 0C 8B 20 58 31 25 B3 34 20 A7 |:...>v.. X1%.4 .|
000036A0: 20 8E 00 B7 3E 7B 0C 8B 20 59 24 28 31 34 29 B2 | ...>{.. Y$(14).|
000036B0: 22 2A 22 20 A7 20 8E 00 C6 3E 80 0C 43 53 24 B2 |"*" . ...>..CS$.|
000036C0: 59 24 28 31 34 29 00 01 3F 8A 0C 8D 20 33 34 30 |Y$(14)..?... 340|
000036D0: 30 3A 43 31 25 28 48 25 29 B2 AB 33 32 30 30 31 |0:C1%(H%)..32001|
000036E0: 3A 43 32 25 28 48 25 29 B2 AB 33 32 30 30 30 3A |:C2%(H%)..32000:|
000036F0: 8F 20 44 45 4C 45 54 45 20 4F 4C 44 20 43 41 4C |. DELETE OLD CAL|
00003700: 4C 00 1F 3F 94 0C 54 43 25 28 4C 47 29 B2 54 43 |L..?..TC%(LG).TC|
00003710: 25 28 4C 47 29 AB 31 3A 58 31 25 B2 34 3A 8E 00 |%(LG).1:X1%.4:..|
00003720: 31 3F 9E 0C 8F 20 43 48 41 4E 47 45 20 42 41 4E |1?... CHANGE BAN|
00003730: 44 00 58 3F A8 0C 81 20 4C 4B B2 31 20 A4 20 4E |D.X?... LK.1 . N|
00003740: 4C 3A 8B 20 59 24 28 35 29 B2 4C 4E 24 28 4C 4B |L:. Y$(5).LN$(LK|
00003750: 29 20 A7 20 33 32 37 30 00 61 3F B2 0C 82 20 4C |) . 3270.a?... L|
00003760: 4B 00 6D 3F BC 0C 58 31 25 B2 36 3A 8E 00 8A 3F |K.m?..X1%.6:...?|
00003770: C6 0C 4C 47 B2 4C 4B 3A 8D 20 33 31 36 30 3A 8B |..LG.LK:. 3160:.|
00003780: 20 58 31 25 B3 34 20 A7 20 8E 00 9B 3F D0 0C 4C | X1%.4 . ...?..L|
00003790: 47 B2 4C 59 3A 8D 20 33 31 39 30 00 B5 3F DA 0C |G.LY:. 3190..?..|
000037A0: 8D 20 33 33 32 30 3A 4C 47 B2 4C 4B 3A 8D 20 33 |. 3320:LG.LK:. 3|
000037B0: 33 35 30 3A 8E 00 C8 3F E4 0C 4C 47 B2 4C 59 3A |350:...?..LG.LY:|
000037C0: 8D 20 33 33 35 30 3A 8E 00 DA 3F EE 0C 8F 20 43 |. 3350:...?... C|
000037D0: 48 41 4E 47 45 20 45 58 43 48 00 EF 3F F8 0C 8B |HANGE EXCH..?...|
000037E0: 20 59 24 28 31 38 29 B2 22 2A 22 20 A7 20 8E 00 | Y$(18)."*" . ..|
000037F0: FE 3F 02 0D 53 4B 24 B2 59 24 28 31 38 29 00 1E |.?..SK$.Y$(18)..|
00003800: 40 0C 0D 89 20 31 33 31 30 3A 8F 20 44 45 4C 45 |@... 1310:. DELE|
00003810: 54 45 20 4F 4C 44 20 53 45 43 54 49 4F 4E 00 32 |TE OLD SECTION.2|
00003820: 40 16 0D 8B 20 59 24 28 38 29 B2 22 2A 22 20 A7 |@... Y$(8)."*" .|
00003830: 20 8E 00 5B 40 20 0D 53 4B 24 B2 59 24 28 38 29 | ..[@ .SK$.Y$(8)|
00003840: 3A 8D 20 31 30 32 30 3A 8E 3A 8F 20 41 44 44 20 |:. 1020:.:. ADD |
00003850: 4E 45 57 20 53 45 43 54 49 4F 4E 00 7F 40 2A 0D |NEW SECTION..@*.|
00003860: 99 20 42 4C 24 3B 22 49 4E 56 41 4C 49 44 20 43 |. BL$;"INVALID C|
00003870: 41 4C 4C 20 53 49 47 4E 22 3A 89 20 34 35 30 00 |ALL SIGN":. 450.|
00003880: 9E 40 34 0D 99 20 42 4C 24 3B 22 49 4E 56 41 4C |.@4.. BL$;"INVAL|
00003890: 49 44 20 42 41 4E 44 22 3A 89 20 34 35 30 00 DC |ID BAND":. 450..|
000038A0: 40 3E 0D 8F 20 44 55 50 45 20 43 48 45 43 4B 45 |@>.. DUPE CHECKE|
000038B0: 52 3A 20 58 31 25 B2 31 B2 44 55 50 45 3A 20 32 |R: X1%.1.DUPE: 2|
000038C0: B2 51 55 45 52 59 3A 20 33 B2 49 4E C5 49 44 20 |.QUERY: 3.IN.ID |
000038D0: 43 41 4C 4C 3A 20 34 2C 35 B2 4F 4B 00 0E 41 48 |CALL: 4,5.OK..AH|
000038E0: 0D 58 31 25 B2 34 3A 45 28 35 29 B2 30 3A 45 28 |.X1%.4:E(5).0:E(|
000038F0: 36 29 B2 30 3A 4B B2 31 3A 8B 20 C3 28 43 53 24 |6).0:K.1:. .(CS$|
00003900: 29 B1 31 30 20 A7 20 58 31 25 B2 33 3A 8E 00 45 |).10 . X1%.3:..E|
00003910: 41 52 0D 8B 20 C9 28 43 53 24 2C 31 29 B2 22 3F |AR.. .(CS$,1)."?|
00003920: 22 20 A7 20 43 53 24 B2 C8 28 43 53 24 2C C3 28 |" . CS$..(CS$,.(|
00003930: 43 53 24 29 AB 31 29 3A 58 31 25 B2 32 3A 43 54 |CS$).1):X1%.2:CT|
00003940: 24 B2 43 53 24 00 5E 41 5C 0D 8B 20 C3 28 43 53 |$.CS$.^A\.. .(CS|
00003950: 24 29 B3 34 20 A7 20 58 31 25 B2 33 3A 8E 00 7A |$).4 . X1%.3:..z|
00003960: 41 66 0D 8B 20 CA 28 43 53 24 2C 33 2C 31 29 B3 |Af.. .(CS$,3,1).|
00003970: 22 41 22 20 A7 20 33 34 36 30 00 9A 41 70 0D 8B |"A" . 3460..Ap..|
00003980: 20 CA 28 43 53 24 2C 32 2C 31 29 B2 B1 22 41 22 | .(CS$,2,1).."A"|
00003990: 20 A7 20 58 31 25 B2 33 3A 8E 00 B5 41 7A 0D 43 | . X1%.3:...Az.C|
000039A0: 53 24 B2 22 20 22 AA 43 53 24 3A 4B B2 32 3A 45 |S$." ".CS$:K.2:E|
000039B0: 28 31 29 B2 30 00 C8 41 84 0D 81 20 4A B2 4B 20 |(1).0..A... J.K |
000039C0: A4 20 C3 28 43 53 24 29 00 EA 41 8E 0D 57 24 B2 |. .(CS$)..A..W$.|
000039D0: CA 28 43 53 24 2C 4A 2C 31 29 3A 8B 20 57 24 B2 |.(CS$,J,1):. W$.|
000039E0: 22 2F 22 20 A7 20 33 35 32 30 00 10 42 98 0D 45 |"/" . 3520..B..E|
000039F0: 28 4A 29 B2 C6 28 57 24 29 AB 41 41 3A 8B 20 45 |(J)..(W$).AA:. E|
00003A00: 28 4A 29 B1 32 36 20 A7 20 58 31 25 B2 33 3A 8E |(J).26 . X1%.3:.|
00003A10: 00 27 42 A2 0D 8B 20 57 24 B3 22 30 22 20 A7 20 |.'B... W$."0" . |
00003A20: 58 31 25 B2 33 3A 8E 00 57 42 AC 0D 8B 20 45 28 |X1%.3:..WB... E(|
00003A30: 4A 29 B3 31 20 A7 20 45 28 4A 29 B2 45 28 4A 29 |J).1 . E(J).E(J)|
00003A40: AA 41 30 3A 8B 20 45 28 4A 29 B1 33 36 20 A7 20 |.A0:. E(J).36 . |
00003A50: 58 31 25 B2 33 3A 8E 00 5F 42 B6 0D 82 20 4A 00 |X1%.3:.._B... J.|
00003A60: 73 42 C0 0D 8B 20 4A B1 37 20 A7 20 58 31 25 B2 |sB... J.7 . X1%.|
00003A70: 33 3A 8E 00 89 42 CA 0D 8B 20 4A AB 4B B3 34 20 |3:...B... J.K.4 |
00003A80: A7 20 58 31 25 B2 33 3A 8E 00 AB 42 D4 0D 81 20 |. X1%.3:...B... |
00003A90: 4A B2 34 20 A4 20 36 3A 8B 20 45 28 4A 29 B1 32 |J.4 . 6:. E(J).2|
00003AA0: 36 20 A7 20 58 31 25 B2 33 3A 8E 00 B3 42 DE 0D |6 . X1%.3:...B..|
00003AB0: 82 20 4A 00 D9 42 E8 0D 45 31 25 B2 AB 33 32 30 |. J..B..E1%..320|
00003AC0: 30 30 AA 45 28 31 29 AC 31 33 36 39 AA 45 28 32 |00.E(1).1369.E(2|
00003AD0: 29 AC 33 37 AA 45 28 33 29 00 FF 42 F2 0D 45 32 |).37.E(3)..B..E2|
00003AE0: 25 B2 AB 33 32 30 30 30 AA 45 28 34 29 AC 31 33 |%..32000.E(4).13|
00003AF0: 36 39 AA 45 28 35 29 AC 33 37 AA 45 28 36 29 00 |69.E(5).37.E(6).|
00003B00: 0F 43 FC 0D 8B 20 58 31 25 B2 32 20 A7 20 8E 00 |.C... X1%.2 . ..|
00003B10: 24 43 06 0E 48 25 B2 45 28 34 29 AA 4C 47 AC 32 |$C..H%.E(4).LG.2|
00003B20: 36 AB 32 36 00 3D 43 10 0E 8F 20 53 45 41 52 43 |6.26.=C... SEARC|
00003B30: 48 20 44 55 50 45 20 53 54 52 49 4E 47 00 5C 43 |H DUPE STRING.\C|
00003B40: 1A 0E 8B 20 43 31 25 28 48 25 29 B2 AB 33 32 30 |... C1%(H%)..320|
00003B50: 30 30 20 A7 20 58 31 25 B2 34 3A 8E 00 76 43 24 |00 . X1%.4:..vC$|
00003B60: 0E 8B 20 43 32 25 28 48 25 29 B3 B1 45 32 25 20 |.. C2%(H%)..E2% |
00003B70: A7 20 33 36 34 30 00 92 43 2E 0E 8B 20 43 31 25 |. 3640..C... C1%|
00003B80: 28 48 25 29 B2 45 31 25 20 A7 20 58 31 25 B2 31 |(H%).E1% . X1%.1|
00003B90: 3A 8E 00 AB 43 38 0E 8B 20 50 25 28 48 25 29 B2 |:...C8.. P%(H%).|
00003BA0: 30 20 A7 20 58 31 25 B2 35 3A 8E 00 C0 43 42 0E |0 . X1%.5:...CB.|
00003BB0: 48 25 B2 50 25 28 48 25 29 3A 89 20 33 36 32 30 |H%.P%(H%):. 3620|
00003BC0: 00 CC 43 4C 0E 8F 20 53 43 4F 52 45 00 EA 43 56 |..CL.. SCORE..CV|
00003BD0: 0E 99 3A 99 20 A3 31 30 29 22 53 43 4F 52 45 20 |..:. .10)"SCORE |
00003BE0: 53 55 4D 4D 41 52 59 22 3A 99 00 F4 43 60 0E 99 |SUMMARY":...C`..|
00003BF0: 20 54 31 24 00 07 44 6A 0E 58 32 B2 30 3A 58 33 | T1$..Dj.X2.0:X3|
00003C00: B2 30 3A 58 34 B2 30 00 16 44 74 0E 81 20 4A B2 |.0:X4.0..Dt.. J.|
00003C10: 31 20 A4 20 4E 4C 00 4E 44 7E 0E 58 34 B2 58 34 |1 . NL.ND~.X4.X4|
00003C20: AA 54 43 25 28 4A 29 3A 58 31 B2 54 43 25 28 4A |.TC%(J):X1.TC%(J|
00003C30: 29 AC 51 50 25 28 4A 29 3A 58 32 B2 58 32 AA 58 |).QP%(J):X2.X2.X|
00003C40: 31 3A 58 33 B2 58 33 AA 54 53 25 28 4A 29 00 79 |1:X3.X3.TS%(J).y|
00003C50: 44 88 0E 99 20 4C 4E 24 28 4A 29 3B A3 31 31 29 |D... LN$(J);.11)|
00003C60: 54 43 25 28 4A 29 3B A3 32 30 29 51 50 25 28 4A |TC%(J);.20)QP%(J|
00003C70: 29 3B A3 32 37 29 58 31 3B 00 94 44 8A 0E 8B 20 |);.27)X1;..D... |
00003C80: 50 32 B2 31 20 A7 20 99 20 A3 33 37 29 54 53 25 |P2.1 . . .37)TS%|
00003C90: 28 4A 29 3B 00 9A 44 8C 0E 99 00 A2 44 92 0E 82 |(J);..D.....D...|
00003CA0: 20 4A 00 AC 44 9C 0E 99 20 54 32 24 00 CF 44 A6 | J..D... T2$..D.|
00003CB0: 0E 99 20 22 54 4F 54 41 4C 22 3B A3 31 31 29 58 |.. "TOTAL";.11)X|
00003CC0: 34 3B A3 32 37 29 58 32 3B A3 33 37 29 58 33 00 |4;.27)X2;.37)X3.|
00003CD0: EB 44 B0 0E 99 3A 99 20 A3 31 30 29 22 53 43 4F |.D...:. .10)"SCO|
00003CE0: 52 45 20 3D 22 3B 58 33 AC 58 32 00 F3 44 BA 0E |RE =";X3.X2..D..|
00003CF0: 99 3A 8E 00 08 45 C4 0E 8B 20 41 52 24 B2 22 52 |.:...E... AR$."R|
00003D00: 22 20 A7 20 33 38 30 30 00 2C 45 CE 0E 9F 33 2C |" . 3800.,E...3,|
00003D10: 38 2C 33 2C 46 43 24 AA 22 2C 4C 2C 22 AA C7 28 |8,3,FC$.",L,"..(|
00003D20: 35 33 29 3A 8D 20 36 30 30 30 3A 8E 00 44 45 D8 |53):. 6000:..DE.|
00003D30: 0E 9F 33 2C 38 2C 33 2C 46 43 24 3A 8D 20 36 30 |..3,8,3,FC$:. 60|
00003D40: 30 30 3A 8E 00 5A 45 3C 0F 8B 20 52 43 24 B3 B1 |00:..ZE<.. RC$..|
00003D50: 22 59 22 20 A7 20 33 39 32 30 00 79 45 46 0F 8D |"Y" . 3920.yEF..|
00003D60: 20 31 31 36 32 3A 55 32 24 28 5A 41 29 B2 55 54 | 1162:U2$(ZA).UT|
00003D70: 43 24 3A 89 20 33 39 33 30 00 9A 45 50 0F 99 3A |C$:. 3930..EP..:|
00003D80: 85 20 22 45 4E 54 45 52 20 55 54 43 20 54 49 4D |. "ENTER UTC TIM|
00003D90: 45 22 3B 55 32 24 28 5A 41 29 00 BA 45 5A 0F 55 |E";U2$(ZA)..EZ.U|
00003DA0: 58 B2 C5 28 55 31 24 28 5A 41 29 29 3A 55 59 B2 |X..(U1$(ZA)):UY.|
00003DB0: C5 28 55 32 24 28 5A 41 29 29 00 E8 45 5C 0F 55 |.(U2$(ZA))..E\.U|
00003DC0: 37 B2 B5 28 55 58 AD 31 30 30 29 3A 55 34 B2 28 |7..(UX.100):U4.(|
00003DD0: 28 55 58 AD 31 30 30 29 AB 55 37 29 AD 2E 36 3A |(UX.100).U7)..6:|
00003DE0: 55 37 B2 55 37 AA 55 34 00 16 46 64 0F 55 35 B2 |U7.U7.U4..Fd.U5.|
00003DF0: B5 28 55 59 AD 31 30 30 29 3A 55 36 B2 28 28 55 |.(UY.100):U6.((U|
00003E00: 59 AD 31 30 30 29 AB 55 35 29 AD 2E 36 3A 55 35 |Y.100).U5)..6:U5|
00003E10: B2 55 35 AA 55 36 00 2D 46 6E 0F 8B 20 55 35 B3 |.U5.U6.-Fn.. U5.|
00003E20: 55 37 20 A7 20 55 35 B2 55 35 AA 32 34 00 5C 46 |U7 . U5.U5.24.\F|
00003E30: 78 0F 45 37 B2 45 54 3A 45 54 B2 45 54 AA 55 35 |x.E7.ET:ET.ET.U5|
00003E40: AB 55 37 3A 55 33 28 5A 41 29 B2 54 3A 8B 20 45 |.U7:U3(ZA).T:. E|
00003E50: 54 B2 30 20 A7 20 89 20 33 39 39 30 00 7A 46 82 |T.0 . . 3990.zF.|
00003E60: 0F 99 3A 99 20 22 54 49 4D 45 20 55 53 45 44 20 |..:. "TIME USED |
00003E70: 53 4F 20 46 41 52 3A 20 22 3B 00 AC 46 84 0F 99 |SO FAR: ";..F...|
00003E80: 20 B5 28 45 54 29 3B 22 20 48 52 53 20 2D 20 22 | .(ET);" HRS - "|
00003E90: 3B B5 28 28 45 54 AB B5 28 45 54 29 29 AC 36 30 |;.((ET..(ET)).60|
00003EA0: AA 2E 35 29 3B 22 20 4D 49 4E 53 22 00 E6 46 8C |..5);" MINS"..F.|
00003EB0: 0F 99 3A 99 20 22 4F 56 45 52 41 4C 4C 20 52 41 |..:. "OVERALL RA|
00003EC0: 54 45 3A 20 20 22 3B B5 28 28 54 AB 31 29 AD 45 |TE: ";.((T.1).E|
00003ED0: 54 AA 2E 35 29 3B 22 20 51 53 4F 53 20 50 45 52 |T..5);" QSOS PER|
00003EE0: 20 48 4F 55 52 22 00 EC 46 96 0F 8E 00 01 47 A0 | HOUR"..F.....G.|
00003EF0: 0F 8B 20 41 52 24 B2 22 52 22 20 A7 20 34 30 32 |.. AR$."R" . 402|
00003F00: 30 00 25 47 AA 0F 9F 33 2C 38 2C 33 2C 46 42 24 |0.%G...3,8,3,FB$|
00003F10: AA 22 2C 4C 2C 22 AA C7 28 32 33 29 3A 8D 20 36 |.",L,"..(23):. 6|
00003F20: 30 30 30 3A 8E 00 3D 47 B4 0F 9F 33 2C 38 2C 33 |000:..=G...3,8,3|
00003F30: 2C 46 42 24 3A 8D 20 36 30 30 30 3A 8E 00 73 47 |,FB$:. 6000:..sG|
00003F40: 70 17 84 31 35 2C 45 41 2C 45 42 24 2C 45 43 2C |p..15,EA,EB$,EC,|
00003F50: 45 44 3A 8B 20 45 41 B3 32 30 20 A7 20 8E 3A 8F |ED:. EA.20 . .:.|
00003F60: 20 52 45 41 44 20 45 52 52 4F 52 20 43 48 41 4E | READ ERROR CHAN|
00003F70: 4E 45 4C 00 83 47 7A 17 8B 20 45 41 B2 35 30 20 |NEL..Gz.. EA.50 |
00003F80: A7 20 8E 00 AC 47 84 17 8B 20 45 41 B2 36 33 20 |. ...G... EA.63 |
00003F90: A7 20 A0 34 3A 9F 34 2C 38 2C 34 2C 22 40 22 AA |. .4:.4,8,4,"@".|
00003FA0: 46 41 24 AA 22 2C 53 2C 57 22 3A 8E 00 C3 47 8E |FA$.",S,W":...G.|
00003FB0: 17 99 20 45 41 3B 45 42 24 2C 45 43 3B 45 44 3A |.. EA;EB$,EC;ED:|
00003FC0: 90 3A 8E 00 E3 47 58 1B 52 48 B2 B5 28 52 4E AD |.:...GX.RH..(RN.|
00003FD0: 32 35 36 29 3A 52 4C B2 52 4E AB 32 35 36 AC 52 |256):RL.RN.256.R|
00003FE0: 48 3A 8E 00 02 48 BC 1B 98 31 35 2C 22 50 22 C7 |H:...H...15,"P".|
00003FF0: 28 33 29 C7 28 52 4C 29 C7 28 52 48 29 C7 28 52 |(3).(RL).(RH).(R|
00004000: 50 29 00 0D 48 C6 1B 89 20 36 30 30 30 00 00 00 |P)..H... 6000...|
..,.... GENERAL PURPOSE CONTEST LOGGER (
C64).B.... DESIGNED FOR DX/VHF CONTESTS,
QSO PARTIES, ETC..Y.... BY KC6A AND N6N
B...... COPYRIGHT 1983 BY HAYDEN BOOK CO
.,INC..F.#..13,4:. VIC PRINTER CHANNEL.S
.$..15,8,15...(.BL$.G(7):. BELL (DON'T D
ELETE)...2.C7$.G(147):. CLEAR SCREEN COM
MAND.5.4.HI$.G(18):LO$.G(146).V.6.. PUT
YOUR HIGHLIGHTING AND NORMAL VIDEO COMMA
NDS IN LINE 52...<.. J.1 . 5:.:. J.A.F.F
A$."0:DUPELOGA":FB$."0:DUPELOGB":FC$."0:
CONTSTLG"...P.ET.0:ZA.0:AA.F("A").1:A0.F
("A").F("0").26.".Z.T1$."BAND QSO'S
X Q-PTS = POINTS M'PLRS".T.D.T2$."----
----- ------ ---".X.I
.. Y$(20),U1$(15),U2$(15),U3(15)...N.. 2
310...S..:. "DO YOU WANT TO USE THE 'JIF
FY CLOCK' TO".U.T.. "LOG THE TIME (Y/N)
";RC$...U.. RC$.."Y" . 120...V.. "ENTER
THE TIME IN UTC (FORMAT: 0000)";T9$.,.W.
TI$.T9$."00".Y.X..:. "NEW CONTEST (N) OR
RESUME (R) ";AR$.M.... AR$."N" . 190...
... AR$.."R" . . BL$:. 110...... 2540:.
READ IN FILE.E....:. "RESUMING ";Y$;" OF
";Z$... .. HC$."Y" . . 1070.....SS.26.N
L.1:. 380...... NEW CONTEST.+....15,"S".
FA$:.15,"S".FB$:.15,"S".FC$.X.C..:. "WAN
T HARD COPY WHILE LOGGING (Y/N)".I.D.HC$
."":. HC$...H.. HC$."Y" . . "TURN ON PRI
NTER. <CR> WHEN READY ";AA$:. 1070.Q.R..
:. "WHAT IS THE CONTEST NAME ";Y$...W..:
. "NOTE: FOR CONTESTS IN WHICH YOU CANNO
T".2.X.. "WORK STATIONS AGAIN ON ADDITIO
NAL BANDS".\.Y.. "SPECIFY ONE LOG HERE A
ND USE THE "...Z.. "'MODE' SPECIFIER TO
RECORD BAND CHANGES"......:. "HOW MANY L
OGS DO YOU NEED".W.... " (USUALLY ONE P
ER BAND) ";NL:....... NL.1 . . BL$:. 220
.".... LN$(NL),QP%(NL),TC%(NL),TS%(NL),S
C%(100,NL).A...M1..((.(0).2000.800.NL).6
)...... NL.26..M1 . . "TOO MANY";BL$:ERA
SE LN$,QP%,TC%,TS%,SC%:. 220...... C1%(M
1),C2%(M1),P%(M1),S$(100,NL).....KK$."".
F.... J.1 . NL..."..:. "WHAT BAND IS LOG
SHEET #";J...,.. " (E.G. 80,20,144,129
6 OR EVEN 10 GHZ".&.... LN$(J).V.6.. C(L
N$(J)).8 . . BL$;"NAME TOO LONG":. 290.F
.:.. J.1 . 320...;.. K.1 . J.1:. LN$(J).
LN$(K) . . "DUPLICATE BAND";BL$:. 290...
<.. K.W.@..:. "HOW MANY POINTS PER QSO "
;QP%(J)...J.. QP%(J).1 . . BL$:. 320...K
.KK$.KK$.LN$(J)." "...L..:. "BANDS SPEC
IFIED: ";KK$:..H.T.TC%(J).0:TS%(J).0:. J
.A.^.T.1:L%.26.NL:SS.L%.1.Y.`.P2.0:. NL.
1 . . 355...A..:."SEPARATE MULTIPLIERS O
N":." EACH BAND (Y/N) ";G$.F.B.. G$."Y"
. P2.1...C..:. "YOU HAVE TWO OPTIONS FOR
THE EXCHANGE:".'.D.. "THE ENTIRE EXCHAN
GE CAN BE A MULTIPLIER".U.E.. "OR OTHER
INFO CAN BE SET OFF FROM THE"...F.. "MUL
TIPLIER WITH A SPACE (E.G. '59 ENY')"...
G..:. "IS THE WHOLE EXCHANGE THE MULT (Y
/N)";P1$.M.H.. P1$.."N" . 365...I..:. "B
E SURE TO PUT A SPACE BETWEEN"...J.. "TH
E REPORT AND THE MULTIPLIER".E.M..:. " M
EMORY IS AVAILABLE FOR ABOUT".M.N.. M1;"
CONTACTS, BUT DISK SPACE IS"...O.. " LI
MITED TO ABOUT 1200 QSOS ON THIS".F.P..
" COMPUTER AND DISK OPERATING SYSTEM."..
.Q..:. .15)"GOOD LUCK!"...R.. J.1 . L%:C
1%(J)..32000:P%(J).0:. J...|.. 3780.3...
LG.1:LH%.0:LP.1:LL.0:SL$."".Y.... 1132:.
AR$."N" . Z$.DTE$:. DATE.P.... HC$."Y"
. . 1090...... 1590:. BAND...... 1180:.
MODE...... 1380:. MENU.S...ZB$."":. "<CR
> TO LOG STARTING TIME";ZB$.....ZA.ZA.1:
. RC$.."Y" . 446...... 1162:U1$(ZA).UTC$
:. 450.;.... "ENTER UTC TIME (0000 FORMA
T)";U1$(ZA).`.B.. RC$.."Y" . T.50...(T.5
0) . 454...C..:. "TO RESET CLOCK, ENTER
UTC (0000 FORMAT)";T9$.N.D.. F(J(T9$,4,1
)).57 . . "INVALID TIME ENTRY!.":. 451..
.E.TI$.T9$."00"...F..:. "LOGGER READY FO
R QSO #";T;"-";LN$(LG);"-";MD$./.L.. "CO
MMAND OR CALL";.N.V.X1%.0:. 2370:. X1%.1
. 450.J.... G$."?" . . 1380:. 450......
G$."QSY" . . 1590:. 1700:. 450...... G$
."DATE" . . 1132:. 450.M.... G$."MODE" .
. 1180:. 450...... G$."QRT" . . 3900:.
3670:. 1860:. 2000.).... G$."QRX" . . 39
00:. 1860: 4:. 3800:. 442.R.... G$."SAVE
" . . 1860: 4:. 3800:. 450.W.... G$."RAT
E" . . 3900:ET.E7:. 450...... G$."STAT"
. . 1700:. 1780:. 450...&.. G$."SCORE" .
. 3670:. 450.V.0.. G$."EDIT" . . 2710..
.:.. G$."X" . . 1230:. 450...D.. 690...N
.. BL$.9.X.. HI$;"**********************
****************".L.B.. HI$;"** IT'S A
DUPE ** BOO ** HISS **"...L.. HI$;"
**************************************";
LO$...V.. 450...... "INVALID ENTRY. PLEA
SE TRY AGAIN.";BL$:. 450...... "ABORTED"
:....... "CAN'T DELETE";BL$:..-.... "INV
ALID QSO #";BL$:. 450.G.... PROCESS A CA
LL SIGN.Y...CS$.G$:CT$.G$...... 3400:. X
1% . 590,820,640,710,710:. DECODE CALL/J
UMP ON RESULT...F.. 2400:. C(G$)..0 . 73
0.I.P.. " -OK- ";...Z.. P1$."Y" . 740...
..SL$.G$:. X1%.1 . 450.0.... SL$."" . .
"REPORT (OR FULL EXCH)? ";:. 2370::. 732
.;.... 2400.T...SK$.G$:. X1%.1 . 450....
.. SK$."" . . "MULTIPLIER? ";:. 2370:. 7
40. .... C(SK$).C(SL$)..14 . 752.Y.... B
L$;"EXCHANGE EXCEEDS 14 CHARACTERS":.:G$
."":. 730...... C (SK$).1 . . BL$:.:G$."
":. 740...... RC$."Y". . 1162:. 770.....
. 2400:UTC$.G$.F.... UTC$."" . . "UTC? "
;:. 2370:UTC$.G$:. X1%.1 . 450.....RN.T:
. 900:. WRITE LOG TO DISK...... HC$."Y"
. . 960:. WRITE TO PRINTER.Y...LH%.H%:.
990:. ENTER IN DUPE SHEET... .. 1020:. E
NTER SECTION...*.TC%(LG).TC%(LG).1:T.T.1
:. 450.3.4..:. .2)CT$;" NEEDED ON:".B.>.
. J.1 . NL.K.H.H%.E(4).J.26.26:. 3610:.
DUPE SEARCH.}.R.. X1%.1 . 880...\.. J.LG
. . .10)"* ";:. 870...^.. .11)" ";...F.
. LN$(J).H.P.. J:.:. 450...Z.. WRITE LOG
TO DISK...... "...LOGGING"...... 7000..
...RP.1:. 7100:.3,DTE$./...RP.10:. 7100:
.3,UTC$.G...RP.15:. 7100:.3,CT$.C...RP.2
6:. 7100:.3,LN$(LG).{...RP.32:. 7100:.3,
MD$.....RP.38:. 7100:.3,SL$." ".SK$.....
. 6000:..C.... WRITE LOG TO PRINTER.....
.13,T;.2)DTE$;.3)UTC$;.3)LN$(LG);.8.C(LN
$(LG)))MD$;.,.B..13," ";.6.C(MD$))CT$;.1
2.C(CT$))SL$;" ";SK$.2.J...K.T.. ENTER I
N DUPE LIST.Q.... X1%.5 . L%.L%.1:P%(H%)
.L%:H%.L%.....C1%(H%).E1%:C2%(H%).E2%:P%
(H%).0:....... UPDATE SECTION.E...LF.LG:
. P2.0 . LF.1...... J.1 . TS%(LF):. SK$.
S$(J,LF) . 1060...... J.0...TS%(LF).TS%(
LF).1:J.TS%(LF):SC%(J,LF).0:S$(J,LF).SK$
.L.... " * NEW MULTIPLIER *".H.$.SC%(J,L
F).SC%(J,LF).1:....... PRINTER INIT, IF
USED...8.....B..13,"":.13,"":.13," C
ONTEST: ";Y$.P.L..13," DATE: ";Z$
...V..13,"":....`.. SET DATE...J.. RC$."
Y" . 1162...L.. 2400.@.T.. G$."" . .:. "
WHAT IS THE DATE (MM/DD/YY) ";G$.S.~.. C
(G$).8 . . "DATE TOO LONG";BL$:G$."":. 1
140.....DTE$.G$:......UTC$.H(TI$,4).....
....... SET MODE...... 2400...... G$.""
. .:. "WHAT IS THE MODE ";G$...... C(G$)
..3 . 1210.+ ... "INVALID MODE. 3 CHARAC
TERS MAX.";BL$:G$."":. 1190.8 ..MD$.G$:.
.S D.. X DELETES LAST ENTRY.E N.. LH%.0
. 660.. X.. LH%.SS . . P%(LH%).0 . C1%(L
H%)..32000:. 1260.. ..P%(LH%).0:L%.L%.1.
Q ..T.T.1:TC%(LG).TC%(LG).1:LH%.0.. ...
1310..!... HC$."Y" . .13,"-- PREVIOUS CA
LL DELETED --".!!... " DELETED":..6!...
DELETE SECTION.N!..LF.LG:. P2.0 . LF.1.X
! .. J.1 . TS%(LF):. SK$.S$(J,LF) . 1330
..!(.. J..!2.SC%(J,LF).SC%(J,LF).1:. SC%
(J,LF).0 . ..C!<.. J.TS%(LF) . 1360..!F.
SC%(J,LF).SC%(TS%(LF),LF):S$(J,LF).S$(TS
%(LF),LF).."P.TS%(LF).TS%(LF).1:..."Z..
MENU.("D.. C7$:..\"N.. HI$;" GENERAL
CONTEST LOGGER MENU ".."X.. HI$;"
"
.D"... HI$;" '?' DISPLAYS THIS MENU
".."... HI$;" 'QSY <BAND> <MO
DE>' CHANGES BANDS ".,#... HI$;" 'DA
TE <MM/DD/YY>' CHANGES DATE ".`#
.. HI$;" 'MODE <MODE>' CHANGES MODES
"..#... HI$;" 'QRT' SAVES ALL CAL
LS AND EXITS ".H#... HI$;" 'QRX' S
AVES ALL CALLS AND STOPS TIMER "..#... H
I$;" 'SAVE' SAVES ALL CALLS AND RESUMES
".0$... HI$;" (NOTE: ALLOW 2-3
MIN FOR SAVE) ".D$C.. HI$;" 'RATE' SHOW
S TOTAL TIME USED AND RATE "..$H.. HI$;"
'STAT' GIVES STATUS ON CURRENT BAND "
.L$R.. HI$;" 'SCORE' GIVES RUNNING TOTAL
SCORE "..%... HI$;" 'EDIT <QSO #>'
EDITS ANY LOGGED ENTRY ".4%... HI$;" 'X'
DELETES THE LAST ENTRY ".H%.
.. HI$;" '-' ABORTS CURRENT ENTRY
"..%... HI$;" ENTRY FORMAT: 'CALL
EXCHANGE <UTC>' ".P%... HI$;" ENTER T
HE CALL ONLY FOR DUPE CHECK "..&... H
I$;" ENTER CALL AND '?' TO LIST BANDS
".8&... HI$;" ON WHICH A STATIO
N IS NEEDED ".L&... HI$;"
". &... HI$;"
<> DENOTES OPTIONAL ENTRIES "
..&".. LO$:...&,.. QSY.A&6.. 2400.P&@..
NL.1 . ...'J.. G$."" . .:. "WHAT BAND (L
OG SHEET) DO YOU WANT ";G$.-'T.. J.1 . N
L: . G$.LN$(J) . 1660.5'^.. J.^'H.. "NO
SUCH LOG. VALID LOGS ARE:";BL$..'R.. J.1
. NL:. .5)LN$(J):. J:G$."":. 1610..'|.L
G.J:. HC$."Y" . . 2490.C'... 2400:. G$..
"" . . 1200.I'....V'... STATUS..'... C7$
:.:. "DATE= ";DTE$;..(... " BAND= ";LN$
(LG);."(... " MODE= ";MD$.:(..LF.LG:. P
2.0 . LF.1.^(B.. " SECTIONS WORKED= ";TS
%(LF);.{(L.. " CONTACTS= ";TC%(LG)..(V.
.:...(... LIST SECTIONS..(... C7$:.:LF.L
G:. P2.0 . LF.1..(... "------ MULTIPLIER
S WORKED";:. P2.1 . . " ON ";LN$(LF);..)
... " ------"..)... TS%(LF).0 . ..")..TB
.1.6)... J.1 . TS%(LF).J)... .TB)S$(J,LF
);.G)&.TB.TB.8:. TB.38 . TB.1:..S)0.. J:
.:..}):.. QRT..)D. 3..)N..4,8,4,FA$.",S,
W":. 6000.C)L..4,HC$:.4,T:.4,Y$:.4,Z$:.4
,NL.S)M..4,L%:.4,M1..)V.. J.1 . NL:.4,LN
$(J):. J..*X..4,ZA:.4,ET.0*Z.. J.1 . ZA:
.4,U1$(J):.4,U2$(J):.4,U3(J):. J.C*... J
.1 . NL:.4,QP%(J);",";TC%(J);",";TS%(J):
. J..*... J.1 . NL:. K.1 . TS%(J)..*...4
,SC%(K,J);",";S$(K,J)..*... K:. J..*...4
,P1$:.4,P2..*A....*F.. WRITE MULT SUMMAR
Y TO #4..*P..4,BL$:. NEW PAGE..+Z..4,"".
27)"* MULTIPLIER SUMMARY *".3+..LF.NL:.
P2.0 . LF.1.B+... J.1 . LF.[+...4," ":.4
," ":.4," "..+...4,"--------------------
- MULTIPLIERS";..+... P2.1 . .4," WORKE
D ON ";LN$(J);.V+...4," ---------------
------":.4," "..,... K.1 . 5:.4," M'PLI
ER/QSOS ";:. K:.4,""..,..TB.9. ,... K.1
. TS%(J).M, ..4,"".9.C(S$(K,J)))S$(K,J);
"/";SC%(K,J);.J,"..4,"".5.C(D(SC%(K,J)))
);..,*.TB.TB.15:. TB.74 . TB.9:.4,""..,4
.. K:.4," ":. J..,>.. WRITE SCORE TO #4.
M,H..4,BL$:. NEW PAGE..,R..4,"-
SCORE SUMMARY":.4,"":.4,T1$..-\.. HC$.
."Y" . 2150.:-^..13,"":.13," ";.13)"SCOR
E SUMMARY".M-`..13,"":.13,T1$.`-F.X2.0:X
3.0:X4.0.O-P.. J.1 . NL..-Z.X4.X4.TC%(J)
:X1.TC%(J).QP%(J):X2.X2.X1:X3.X3.TS%(J).
K-...4,LN$(J);.10.C(LN$(J)))TC%(J);..-..
.4,"".9.C(D(TC%(J))))QP%(J);.7.C(D(QP%(J
))))X1;.'.... P2.1 . .4,"";.10.C(D(X1)))
TS%(J);.1....4,"".G.... HC$.."Y" . 2200.
|....13,LN$(J);.11.C(LN$(J)))TC%(J);.5)Q
P%(J);.5)X1;...... P2.1 . .13," "TS%
(J);......13,""...... J.F. .. P2.0 . X3.
TS%(1)......4,""T2$:.4,"TOTAL";.6)X4;.16
.C(D(X4)))X2;../...4,"";.10.C(D(X2)))X3:
.4,"".+/... HC$.."Y" . 2230.Z/...13,T2$:
.13,"TOTAL";.5)X4;.15.C(D(X4)))X2;.|/...
13," ";.8.C(D(X2)))X3:.13,""../...4,"***
***********************************"../.
..4,"*
*"..0J..4,"SCORE - ";X2;" X ";X3;.10)"
=";X2.X3.90T..4,"*
*".I0...4,"**************
************************".T0...4,"!"..0.
. 4:. 6000..0... 4000..0... RN.1 . L%:.
7000..0..RP.1:. 7100:.3,C1%(RN).Z0..RP.9
:. 7100:.3,C2%(RN)..0..RP.17:. 7100:.3,P
%(RN)..1... 6000:. RN..1.. 3:. 6000: 15.
<1... HC$."Y" . .13,"SCORE = ";X2.X3.[1.
.. J.1 . 1500:.;:. J: 13:..U1... C7$:.:
. PRINT TITLE.}1...:...1... " ";HI$;"
GENERAL CONTEST LOGGING PROGRAM "..1...
" ";HI$;" BY KC6A AND N6NB
"..2$.. " ";HI$;" (C) 1983 BY HAY
DEN BOOK CO., INC. ".*2... LO$:.:..C28..
INPUT SCAN ROUTINE.L2B.GS$."":. GS$:LL.
C(GS$):. LL.0 . 2430..2L.. J.1 . LL:. J(
GS$,J,1)."-" . X1%.1:. 650..2M.. J ..2V.
LP.1.K2`.. LP.LL . 2430:. 2ND ENTRY..2J.
. LT.LP . LL:. J(GS$,LT,1).." " . 2440..
2T.. LT..3~.G$."":...3..LP.LT.?3... LT.L
P . LL:. J(GS$,LT,1)." " . 2480.H3... LT
.T3..LT.LT.1.S3..G$.J(GS$,LP,LT.LP):LP.L
T:..~3...13,""..3D..13," QSY TO: ";L
N$(LG)..3N....3X.LL.C(GS$):. 2390.F3...
RESUME..3...4,8,4,FA$.",S,R":. 6000..4..
.4,HC$:.4,T:.4,Y$:.4,Z$:.4,NL..4...4,L%:
.4,M1.G4... LN$(NL),QP%(NL),TC%(NL),TS%(
NL),SC%(100,NL).O4... C1%(M1),C2%(M1),P%
(M1),S$(100,NL)..4(.. J.1 . NL:.4,LN$(J)
:. J..4*..4,ZA:.4,ET.L4,.. J.1 . ZA:.4,U
1$(J):.4,U2$(J):.4,U3(J):. J..4Z.. J.1 .
NL:.4,QP%(J),TC%(J),TS%(J):. J..5D.. J.
1 . NL:. K.1 . TS%(J).-5N..4,SC%(K,J),S$
(K,J).95X.. K:. J.J5Z..4,P1$:.4,P2.X5..
4:. 6000.C5... 4000.Z5... RN.1 . L%:. 70
00..5..RP.1:.7100:.3,C1%(RN)..5..RP.9:.7
100:.3,C2%(RN).H5..RP.17:.7100:.3,P%(RN)
..5... RN: 3:.6000:...5... EDIT A RECORD
.+6... 2400:. G$."" . . "WHAT QSO# DO YO
U WANT TO EDIT ";G$.;6 .X2..(E(G$)).V6..
. X2.0 . . X2.T . 2750.`6... 670..6... C
7$:JB.8:. P1$."Y" . JB.7..6H.RN.X2:. 700
0..6I.RP.1:. 7100:.3,Y$(2):Y$(12).Y$(2).
.6J.RP.10:. 7100:.3,Y$(3):Y$(13).Y$(3)..
7K.RP.15:. 7100:.3,Y$(4):Y$(14).Y$(4).,7
L.RP.26:. 7100:.3,Y$(5):Y$(15).Y$(5).S7M
.RP.32:. 7100:.3,Y$(6):Y$(16).Y$(6).K7N.
RP.38:. 7100:.3,E1$..7O.GS$.E1$:. 2520:Y
$(7).G$:Y$(17).G$..7P.Y$(8).Y$(7):. P1$.
."Y" . . 2400:Y$(8).G$.O7Q.Y$(18).Y$(8).
Z7R.. 3080..8...:A$."":. "CHANGE THIS RE
CORD (Y/N) ";A$.#8... A$.."Y" . . C7$:.
450.-8..LH%.0.R8... J.1 . NL:. Y$(5).LN$
(J) . 2830.Z8... J.O8..LX.LG:LY.J:LK.LY.
.8...:. .12)"INSTRUCTIONS":...8".. "HIT
<CR> TO LEAVE AN ITEM UNCHANGED."..8,..
"TO CHANGE, ENTER NEW VALUE <CR>."..96..
"TO DELETE THIS ENTRY, CHANGE CALL TO '
*'."..9>...U9@.A$."":. .5)"DATE:";.14)Y$
(2);:. A$:. A$.."" . Y$(2).A$..9J.. .5)"
TIME:";.14)Y$(3);:A$."":. A$:. A$.."". Y
$(3).A$.I9T.. .5)"CALL:";.14)Y$(4);:A$."
":. A$:. A$.."". Y$(4).A$..:^.. .5)"BAND
:";.14)Y$(5);:A$."":. A$:. A$.."" . Y$(5
).A$.>:H.. .5)"MODE:";.14)Y$(6);:A$."":.
A$:. A$.."". Y$(6).A$.K:R.. P1$.."Y" .
. .5)"EXCHANGE:";.14)Y$(7);..:S.. P1$.."
Y". A$."":. A$:. A$.."" . Y$(7).A$.X:W..
.5)"M'PLIER:";.14)Y$(8);:A$."":. A$:. A
$.."" . Y$(8).A$..:|..:A$."":. "OK (Y/N)
";A$:X1%.4..;... A$.."Y" . . C7$:. 650:
. 450.O;... Y$(5)..Y$(15) . . 3240:. 300
0:. BAND CHANGE.Y;..LG.LK..;... Y$(4)..Y
$(14) . . 3160:. 3190:. CALL CHANGE.A;..
. Y$(8)..Y$(18) . . 3320:. 3350:. EXCHAN
GE CHANGE.K;..LG.LX..;B.. X1% . 590,3370
,3370,3020,3020,3380..<L.RP.1:. 7100:.3,
Y$(2).'<M.RP.10:. 7100:.3,Y$(3).A<N.RP.1
5:. 7100:.3,Y$(4).[<O.RP.26:. 7100:.3,Y$
(5).U<P.RP.32:. 7100:.3,Y$(6)..<X.. P1$.
"Y" . Y$(7).""..<..RP.38:. 7100:.3,Y$(7)
." ".Y$(8).H<... HC$.."Y" . 3070..=...13
," ** EDIT ON REC #";X2;": ";D1$;" ";TM
$;" ";KL$;."=...13," ";B1$;" ";M1$;" ";E
1$.,=... 450.J=...:. .5)"DATE:";.14)Y$(
2).E=... .5)"TIME:";.14)Y$(3)..=... .5)"
CALL:";.14)Y$(4)..=&.. .5)"BAND:";.14)Y$
(5)..=0.. .5)"MODE:";.14)Y$(6)..=:.. P1$
.."Y" . . .5)"EXCHANGE:";.14)Y$(7)..>?..
.5)"M'PLIER:";.14)Y$(8)..>D....>N.. CAL
L CHANGED.7>X.. Y$(4)."*" . Y$(8)."*":..
T>B.CS$.Y$(4):. 3400:. X1%.4 . .:. CHECK
IF NEW CALL IS DUPE..>L.. 990:TC%(LG).T
C%(LG).1:...>V.. X1%.4 . ...>{.. Y$(14).
"*" . ..F>..CS$.Y$(14)..?... 3400:C1%(H%
)..32001:C2%(H%)..32000:. DELETE OLD CAL
L..?..TC%(LG).TC%(LG).1:X1%.4:..1?... CH
ANGE BAND.X?... LK.1 . NL:. Y$(5).LN$(LK
) . 3270.A?... LK.M?..X1%.6:...?F.LG.LK:
. 3160:. X1%.4 . ...?P.LG.LY:. 3190..?Z.
. 3320:LG.LK:. 3350:..H?..LG.LY:. 3350:.
.Z?... CHANGE EXCH..?... Y$(18)."*" . ..
.?..SK$.Y$(18)..@... 1310:. DELETE OLD S
ECTION.2@... Y$(8)."*" . ..[@ .SK$.Y$(8)
:. 1020:.:. ADD NEW SECTION.@*.. BL$;"I
NVALID CALL SIGN":. 450..@4.. BL$;"INVAL
ID BAND":. 450..@>.. DUPE CHECKER: X1%.1
.DUPE: 2.QUERY: 3.INEID CALL: 4,5.OK..AH
.X1%.4:E(5).0:E(6).0:K.1:. C(CS$).10 . X
1%.3:..EAR.. I(CS$,1)."?" . CS$.H(CS$,C(
CS$).1):X1%.2:CT$.CS$.^A\.. C(CS$).4 . X
1%.3:..ZAF.. J(CS$,3,1)."A" . 3460..AP..
J(CS$,2,1).."A" . X1%.3:...AZ.CS$." ".C
S$:K.2:E(1).0.HA... J.K . C(CS$)..A..W$.
J(CS$,J,1):. W$."/" . 3520..B..E(J).F(W$
).AA:. E(J).26 . X1%.3:..'B... W$."0" .
X1%.3:..WB... E(J).1 . E(J).E(J).A0:. E(
J).36 . X1%.3:.._B... J.SB... J.7 . X1%.
3:...BJ.. J.K.4 . X1%.3:...BT.. J.4 . 6:
. E(J).26 . X1%.3:...B... J.YB..E1%..320
00.E(1).1369.E(2).37.E(3)..B..E2%..32000
.E(4).1369.E(5).37.E(6)..C... X1%.2 . ..
$C..H%.E(4).LG.26.26.=C... SEARCH DUPE S
TRING.\C... C1%(H%)..32000 . X1%.4:..VC$
.. C2%(H%)..E2% . 3640..C... C1%(H%).E1%
. X1%.1:...C8.. P%(H%).0 . X1%.5:...CB.
H%.P%(H%):. 3620.LCL.. SCORE..CV..:. .10
)"SCORE SUMMARY":...C`.. T1$..DJ.X2.0:X3
.0:X4.0..DT.. J.1 . NL.ND~.X4.X4.TC%(J):
X1.TC%(J).QP%(J):X2.X2.X1:X3.X3.TS%(J).Y
D... LN$(J);.11)TC%(J);.20)QP%(J);.27)X1
;..D... P2.1 . . .37)TS%(J);..D.....D...
J..D... T2$.OD... "TOTAL";.11)X4;.27)X2
;.37)X3..D...:. .10)"SCORE =";X3.X2..D..
.:...ED.. AR$."R" . 3800.,EN..3,8,3,FC$.
",L,".G(53):. 6000:..DEX..3,8,3,FC$:. 60
00:..ZE<.. RC$.."Y" . 3920.YEF.. 1162:U2
$(ZA).UTC$:. 3930..EP..:. "ENTER UTC TIM
E";U2$(ZA)..EZ.UX.E(U1$(ZA)):UY.E(U2$(ZA
))..E\.U7..(UX.100):U4.((UX.100).U7)..6:
U7.U7.U4..FD.U5..(UY.100):U6.((UY.100).U
5)..6:U5.U5.U6.-FN.. U5.U7 . U5.U5.24.\F
X.E7.ET:ET.ET.U5.U7:U3(ZA).T:. ET.0 . .
3990.ZF...:. "TIME USED SO FAR: ";..F...
.(ET);" HRS - ";.((ET..(ET)).60..5);" M
INS"..F...:. "OVERALL RATE: ";.((T.1).E
T..5);" QSOS PER HOUR"..F.....G .. AR$."
R" . 4020.%G...3,8,3,FB$.",L,".G(23):. 6
000:..=G...3,8,3,FB$:. 6000:..SGP..15,EA
,EB$,EC,ED:. EA.20 . .:. READ ERROR CHAN
NEL..GZ.. EA.50 . ...G... EA.63 . 4:.4,
8,4,"@".FA$.",S,W":..CG... EA;EB$,EC;ED:
.:...GX.RH..(RN.256):RL.RN.256.RH:...H..
.15,"P"G(3)G(RL)G(RH)G(RP)..HF.. 6000...
> CLICK IMAGE PREVIEW FOR FULL MODAL