DUPECHECKER
FILE INFORMATION
FILENAME(S): DUPECHECKER
FILE TYPE(S): PRG
FILE SIZE: 6.2K
FIRST SEEN: 2025-11-30 19:36:45
APPEARS ON: 1 disk(s)
FILE HASH
6b5af9c44a09152dd3fe61cb5bf30fa877bcc906f2491ee2ec2b17fe0015c505
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| JBR C64 RADIO MM | DUPECHECKER | PRG | Curtcool, Bo | 11 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 0A 00 8F 20 54 48 45 20 44 55 50 45 |....... THE DUPE|
00000010: 43 48 45 43 4B 45 52 20 28 43 36 34 29 00 34 08 |CHECKER (C64).4.|
00000020: 14 00 8F 20 42 59 20 4B 43 36 41 20 41 4E 44 20 |... BY KC6A AND |
00000030: 4E 36 4E 42 00 66 08 1E 00 8F 20 43 4F 50 59 52 |N6NB.f.... COPYR|
00000040: 49 47 48 54 20 31 39 38 33 20 42 59 20 48 41 59 |IGHT 1983 BY HAY|
00000050: 44 45 4E 20 42 4F 4F 4B 20 43 4F 4D 50 41 4E 59 |DEN BOOK COMPANY|
00000060: 2C 20 49 4E 43 2E 00 86 08 20 00 9F 31 33 2C 34 |, INC.... ..13,4|
00000070: 3A 8F 20 56 49 43 20 50 52 49 4E 54 45 52 20 43 |:. VIC PRINTER C|
00000080: 48 41 4E 4E 45 4C 00 93 08 21 00 9F 31 35 2C 38 |HANNEL...!..15,8|
00000090: 2C 31 35 00 B7 08 28 00 41 41 B2 C6 28 22 41 22 |,15...(.AA..("A"|
000000A0: 29 AB 31 3A 41 30 B2 C6 28 22 41 22 29 AB C6 28 |).1:A0..("A")..(|
000000B0: 22 30 22 29 AA 32 36 00 CB 08 32 00 42 4C 24 B2 |"0").26...2.BL$.|
000000C0: C7 28 37 29 3A 8F 20 42 45 4C 4C 00 04 09 3C 00 |.(7):. BELL...<.|
000000D0: 48 49 24 B2 C7 28 31 38 29 3A 8F 20 50 55 54 20 |HI$..(18):. PUT |
000000E0: 59 4F 55 52 20 56 49 44 45 4F 20 48 49 47 48 4C |YOUR VIDEO HIGHL|
000000F0: 49 47 48 54 49 4E 47 20 43 4F 4D 4D 41 4E 44 20 |IGHTING COMMAND |
00000100: 48 45 52 45 00 39 09 46 00 4C 4F 24 B2 C7 28 31 |HERE.9.F.LO$..(1|
00000110: 34 36 29 3A 8F 20 50 55 54 20 59 4F 55 52 20 56 |46):. PUT YOUR V|
00000120: 49 44 45 4F 20 4E 4F 52 4D 41 4C 20 43 4F 4D 4D |IDEO NORMAL COMM|
00000130: 41 4E 44 20 48 45 52 45 20 00 57 09 50 00 43 37 |AND HERE .W.P.C7|
00000140: 24 B2 C7 28 31 34 37 29 3A 8F 20 43 4C 45 41 52 |$..(147):. CLEAR|
00000150: 20 53 43 52 45 45 4E 00 62 09 64 00 8D 20 31 35 | SCREEN.b.d.. 15|
00000160: 38 30 00 8E 09 6E 00 99 3A 85 20 22 4E 45 57 20 |80...n..:. "NEW |
00000170: 43 4F 4E 54 45 53 54 20 28 4E 29 20 4F 52 20 52 |CONTEST (N) OR R|
00000180: 45 53 55 4D 45 20 28 52 29 20 22 3B 41 24 00 94 |ESUME (R) ";A$..|
00000190: 09 78 00 99 00 A7 09 82 00 8B 20 41 24 B2 22 4E |.x........ A$."N|
000001A0: 22 20 A7 20 31 38 30 00 C3 09 8C 00 8B 20 41 24 |" . 180...... A$|
000001B0: B3 B1 22 52 22 20 A7 20 99 20 42 4C 24 3A 89 20 |.."R" . . BL$:. |
000001C0: 31 30 30 00 CE 09 96 00 8D 20 31 33 32 30 00 E5 |100...... 1320..|
000001D0: 09 A0 00 8B 20 48 43 24 B2 22 59 22 20 A7 20 8D |.... HC$."Y" . .|
000001E0: 20 31 34 33 30 00 FA 09 AA 00 53 53 B2 32 36 AC | 1430.....SS.26.|
000001F0: 4E 4C AA 31 3A 89 20 33 39 30 00 22 0A B4 00 98 |NL.1:. 390."....|
00000200: 31 35 2C 22 53 30 3A 44 55 50 45 4C 4F 47 41 22 |15,"S0:DUPELOGA"|
00000210: 3A 98 31 35 2C 22 53 30 3A 44 55 50 45 4C 4F 47 |:.15,"S0:DUPELOG|
00000220: 42 22 00 54 0A B9 00 85 20 22 57 41 4E 54 20 41 |B".T.... "WANT A|
00000230: 20 48 41 52 44 20 43 4F 50 59 20 57 48 49 4C 45 | HARD COPY WHILE|
00000240: 20 4C 4F 47 47 49 4E 47 20 28 59 2F 4E 29 20 22 | LOGGING (Y/N) "|
00000250: 3B 48 43 24 00 94 0A BE 00 8B 20 48 43 24 B2 22 |;HC$...... HC$."|
00000260: 59 22 20 A7 20 85 20 22 54 55 52 4E 20 4F 4E 20 |Y" . . "TURN ON |
00000270: 50 52 49 4E 54 45 52 2E 20 3C 43 52 3E 20 57 48 |PRINTER. <CR> WH|
00000280: 45 4E 20 52 45 41 44 59 20 22 3B 41 24 3A 8D 20 |EN READY ";A$:. |
00000290: 31 39 39 30 00 9E 0A C8 00 54 B2 31 3A 99 00 C3 |1990.....T.1:...|
000002A0: 0A D2 00 85 20 22 57 48 41 54 20 49 53 20 54 48 |.... "WHAT IS TH|
000002B0: 45 20 43 4F 4E 54 45 53 54 20 4E 41 4D 45 20 22 |E CONTEST NAME "|
000002C0: 3B 59 24 00 EF 0A DC 00 99 3A 85 20 22 57 48 41 |;Y$......:. "WHA|
000002D0: 54 20 49 53 20 54 48 45 20 44 41 54 45 20 28 4D |T IS THE DATE (M|
000002E0: 4D 2F 44 44 2F 59 59 29 20 22 3B 5A 24 3A 99 00 |M/DD/YY) ";Z$:..|
000002F0: 06 0B E6 00 8B 20 48 43 24 B2 22 59 22 20 A7 20 |..... HC$."Y" . |
00000300: 8D 20 31 34 33 30 00 2F 0B F0 00 85 20 22 48 4F |. 1430./.... "HO|
00000310: 57 20 4D 41 4E 59 20 53 45 50 41 52 41 54 45 20 |W MANY SEPARATE |
00000320: 44 55 50 45 20 53 48 45 45 54 53 22 3B 4E 4C 00 |DUPE SHEETS";NL.|
00000330: 35 0B F2 00 99 00 4E 0B FA 00 8B 20 4E 4C B3 31 |5.....N.... NL.1|
00000340: 20 A7 20 99 20 42 4C 24 3A 89 20 32 34 30 00 5C | . . BL$:. 240.\|
00000350: 0B 04 01 86 20 4C 4E 24 28 4E 4C 29 00 74 0B 0E |.... LN$(NL).t..|
00000360: 01 4D 31 B2 B5 28 28 B8 28 30 29 AB 32 30 30 30 |.M1..((.(0).2000|
00000370: 29 AD 36 29 00 9D 0B 18 01 8B 20 4E 4C AC 32 36 |).6)...... NL.26|
00000380: B1 B2 4D 31 20 A7 20 99 20 22 54 4F 4F 20 4D 41 |..M1 . . "TOO MA|
00000390: 4E 59 22 3B 42 4C 24 3A 89 20 32 34 30 00 BA 0B |NY";BL$:. 240...|
000003A0: 22 01 86 20 43 31 25 28 4D 31 29 2C 43 32 25 28 |".. C1%(M1),C2%(|
000003B0: 4D 31 29 2C 50 25 28 4D 31 29 00 D8 0B 2C 01 8B |M1),P%(M1)...,..|
000003C0: 20 4E 4C B2 31 20 A7 20 4C 4E 24 28 31 29 B2 22 | NL.1 . LN$(1)."|
000003D0: 31 22 3A 89 20 33 36 30 00 E7 0B 36 01 81 20 4A |1":. 360...6.. J|
000003E0: B2 31 20 A4 20 4E 4C 00 0B 0C 40 01 99 20 22 57 |.1 . NL...@.. "W|
000003F0: 48 41 54 20 42 41 4E 44 20 49 53 20 44 55 50 45 |HAT BAND IS DUPE|
00000400: 20 53 48 45 45 54 20 23 22 3B 4A 00 37 0C 4A 01 | SHEET #";J.7.J.|
00000410: 85 20 22 28 45 2E 47 2E 20 32 30 2C 20 32 30 43 |. "(E.G. 20, 20C|
00000420: 57 2C 20 4F 52 20 32 30 50 48 4F 4E 45 29 20 22 |W, OR 20PHONE) "|
00000430: 3B 4C 4E 24 28 4A 29 00 6B 0C 54 01 8B 20 C3 28 |;LN$(J).k.T.. .(|
00000440: 4C 4E 24 28 4A 29 29 B1 32 30 20 A7 20 99 20 42 |LN$(J)).20 . . B|
00000450: 4C 24 3B 22 4E 41 4D 45 20 49 53 20 54 4F 4F 20 |L$;"NAME IS TOO |
00000460: 4C 4F 4E 47 22 3A 89 20 33 32 30 00 75 0C 5E 01 |LONG":. 320.u.^.|
00000470: 99 3A 82 20 4A 00 8C 0C 68 01 53 53 B2 32 36 AC |.:. J...h.SS.26.|
00000480: 4E 4C AA 31 3A 4C 25 B2 53 53 AB 31 00 D7 0C 72 |NL.1:L%.SS.1...r|
00000490: 01 99 3A 99 20 22 53 50 41 43 45 20 49 53 20 41 |..:. "SPACE IS A|
000004A0: 56 41 49 4C 41 42 4C 45 20 46 4F 52 20 41 50 50 |VAILABLE FOR APP|
000004B0: 52 4F 58 49 4D 41 54 45 4C 59 22 3B 4D 31 3B 22 |ROXIMATELY";M1;"|
000004C0: 43 41 4C 4C 20 53 49 47 4E 53 2E 20 47 4F 4F 44 |CALL SIGNS. GOOD|
000004D0: 20 4C 55 43 4B 21 22 00 0E 0D 7C 01 81 20 4B B2 | LUCK!"...|.. K.|
000004E0: 31 20 A4 20 4C 25 3A 43 31 25 28 4B 29 B2 AB 33 |1 . L%:C1%(K)..3|
000004F0: 32 30 30 30 3A 43 32 25 28 4B 29 B2 AB 33 32 30 |2000:C2%(K)..320|
00000500: 30 30 3A 50 25 28 4B 29 B2 30 3A 82 20 4B 00 2D |00:P%(K).0:. K.-|
00000510: 0D 86 01 4C 47 B2 31 3A 4C 48 25 B2 30 3A 8B 20 |...LG.1:LH%.0:. |
00000520: 4E 4C B1 31 20 A7 20 8D 20 31 30 35 30 00 38 0D |NL.1 . . 1050.8.|
00000530: 90 01 8D 20 31 36 37 30 00 6C 0D 9A 01 99 3A 99 |... 1670.l....:.|
00000540: 20 22 44 55 50 45 43 48 45 43 4B 45 52 20 52 45 | "DUPECHECKER RE|
00000550: 41 44 59 20 46 4F 52 20 51 53 4F 20 23 22 3B 54 |ADY FOR QSO #";T|
00000560: 3B 22 2D 22 3B 4C 4E 24 28 4C 47 29 00 85 0D A4 |;"-";LN$(LG)....|
00000570: 01 8D 20 31 38 37 30 3A 8B 20 58 31 25 B2 31 20 |.. 1870:. X1%.1 |
00000580: A7 20 35 31 30 00 99 0D AE 01 8B 20 47 24 B2 22 |. 510...... G$."|
00000590: 58 22 20 A7 20 31 31 33 30 00 AF 0D B8 01 8B 20 |X" . 1130...... |
000005A0: 47 24 B2 22 44 45 4C 22 20 A7 20 31 31 38 30 00 |G$."DEL" . 1180.|
000005B0: D8 0D C2 01 8B 20 47 24 B2 22 51 52 54 22 20 A7 |..... G$."QRT" .|
000005C0: 20 8D 20 31 32 33 30 3A A0 20 31 33 3A 8D 36 30 | . 1230:. 13:.60|
000005D0: 30 30 3A A0 31 35 3A 80 00 F6 0D CC 01 8B 20 47 |00:.15:....... G|
000005E0: 24 B2 22 51 53 59 22 20 A7 20 8D 20 31 30 33 30 |$."QSY" . . 1030|
000005F0: 3A 89 20 34 31 30 00 15 0E D6 01 8B 20 47 24 B2 |:. 410...... G$.|
00000600: 22 53 41 56 45 22 20 A7 20 8D 20 31 32 33 30 3A |"SAVE" . . 1230:|
00000610: 89 20 34 31 30 00 28 0E E0 01 8B 20 47 24 B2 22 |. 410.(.... G$."|
00000620: 3F 22 20 A7 20 34 30 30 00 32 0E EA 01 89 20 36 |?" . 400.2.... 6|
00000630: 30 30 00 51 0E F4 01 99 20 22 49 4E 56 41 4C 49 |00.Q.... "INVALI|
00000640: 44 20 43 41 4C 4C 22 3B 42 4C 24 3A 89 20 34 31 |D CALL";BL$:. 41|
00000650: 30 00 6C 0E FE 01 99 20 22 20 2E 2E 41 42 4F 52 |0.l.... " ..ABOR|
00000660: 54 45 44 2E 2E 22 3A 89 20 34 31 30 00 8E 0E 08 |TED..":. 410....|
00000670: 02 99 20 22 44 55 50 45 20 53 48 45 45 54 20 46 |.. "DUPE SHEET F|
00000680: 55 4C 4C 22 3B 42 4C 24 3A 89 20 34 31 30 00 AD |ULL";BL$:. 410..|
00000690: 0E 12 02 99 20 22 43 41 4E 27 54 20 44 45 4C 45 |.... "CAN'T DELE|
000006A0: 54 45 22 3B 42 4C 24 3A 89 20 34 31 30 00 BF 0E |TE";BL$:. 410...|
000006B0: 1C 02 8B 20 44 44 B2 31 20 A7 20 31 32 30 30 00 |... DD.1 . 1200.|
000006C0: D0 0E 26 02 8D 20 32 30 31 30 3A 89 20 34 31 30 |..&.. 2010:. 410|
000006D0: 00 D9 0E 58 02 44 44 B2 30 00 00 0F 62 02 45 28 |...X.DD.0...b.E(|
000006E0: 35 29 B2 30 3A 45 28 36 29 B2 30 3A 4B B2 31 3A |5).0:E(6).0:K.1:|
000006F0: 8B 20 C3 28 47 24 29 B1 31 30 20 A7 20 35 30 30 |. .(G$).10 . 500|
00000700: 00 19 0F 6C 02 8B 20 C9 28 47 24 2C 31 29 B3 B1 |...l.. .(G$,1)..|
00000710: 22 3F 22 20 A7 20 36 34 30 00 33 0F 76 02 44 44 |"?" . 640.3.v.DD|
00000720: B2 32 3A 47 24 B2 C8 28 47 24 2C C3 28 47 24 29 |.2:G$..(G$,.(G$)|
00000730: AB 31 29 00 47 0F 80 02 8B 20 C3 28 47 24 29 B3 |.1).G.... .(G$).|
00000740: 34 20 A7 20 35 30 30 00 61 0F 8A 02 8B 20 CA 28 |4 . 500.a.... .(|
00000750: 47 24 2C 33 2C 31 29 B3 22 41 22 20 A7 20 36 38 |G$,3,1)."A" . 68|
00000760: 30 00 7C 0F 94 02 8B 20 CA 28 47 24 2C 32 2C 31 |0.|.... .(G$,2,1|
00000770: 29 B2 B1 22 41 22 20 A7 20 35 30 30 00 95 0F 9E |).."A" . 500....|
00000780: 02 47 24 B2 22 20 22 AA 47 24 3A 4B B2 32 3A 45 |.G$." ".G$:K.2:E|
00000790: 28 31 29 B2 30 00 A7 0F A8 02 81 20 4A B2 4B 20 |(1).0...... J.K |
000007A0: A4 20 C3 28 47 24 29 00 B8 0F B2 02 57 24 B2 CA |. .(G$).....W$..|
000007B0: 28 47 24 2C 4A 2C 31 29 00 CB 0F BC 02 8B 20 57 |(G$,J,1)...... W|
000007C0: 24 B2 22 2F 22 20 A7 20 37 35 30 00 F8 0F C6 02 |$."/" . 750.....|
000007D0: 45 28 4A 29 B2 C6 28 57 24 29 AB 41 41 3A 8B 20 |E(J)..(W$).AA:. |
000007E0: 45 28 4A 29 B1 30 20 A7 20 8B 20 45 28 4A 29 B1 |E(J).0 . . E(J).|
000007F0: 32 36 20 A7 20 35 30 30 00 0B 10 D0 02 8B 20 57 |26 . 500...... W|
00000800: 24 B3 22 30 22 20 A7 20 35 30 30 00 37 10 DA 02 |$."0" . 500.7...|
00000810: 8B 20 45 28 4A 29 B3 31 20 A7 20 45 28 4A 29 B2 |. E(J).1 . E(J).|
00000820: 45 28 4A 29 AA 41 30 3A 8B 20 45 28 4A 29 B1 33 |E(J).A0:. E(J).3|
00000830: 36 20 A7 20 35 30 30 00 3F 10 E4 02 82 20 4A 00 |6 . 500.?.... J.|
00000840: 4F 10 EE 02 8B 20 4A B1 37 20 A7 20 35 30 30 00 |O.... J.7 . 500.|
00000850: 61 10 F8 02 8B 20 4A AB 4B B3 34 20 A7 20 35 30 |a.... J.K.4 . 50|
00000860: 30 00 7F 10 02 03 81 20 4A B2 34 20 A4 20 36 3A |0...... J.4 . 6:|
00000870: 8B 20 45 28 4A 29 B1 32 36 20 A7 20 35 30 30 00 |. E(J).26 . 500.|
00000880: 87 10 0C 03 82 20 4A 00 AD 10 16 03 45 31 25 B2 |..... J.....E1%.|
00000890: AB 33 32 30 30 30 AA 45 28 31 29 AC 31 33 36 39 |.32000.E(1).1369|
000008A0: AA 45 28 32 29 AC 33 37 AA 45 28 33 29 00 D3 10 |.E(2).37.E(3)...|
000008B0: 20 03 45 32 25 B2 AB 33 32 30 30 30 AA 45 28 34 | .E2%..32000.E(4|
000008C0: 29 AC 31 33 36 39 AA 45 28 35 29 AC 33 37 AA 45 |).1369.E(5).37.E|
000008D0: 28 36 29 00 E5 10 2A 03 8B 20 44 44 B2 32 20 89 |(6)...*.. DD.2 .|
000008E0: 20 31 34 37 30 00 FA 10 34 03 48 25 B2 45 28 34 | 1470...4.H%.E(4|
000008F0: 29 AA 4C 47 AC 32 36 AB 32 36 00 16 11 3E 03 8B |).LG.26.26...>..|
00000900: 20 43 31 25 28 48 25 29 B3 B1 AB 33 32 30 30 30 | C1%(H%)...32000|
00000910: 20 A7 20 38 39 30 00 48 11 48 03 8B 20 44 44 B2 | . 890.H.H.. DD.|
00000920: 31 20 A7 20 99 20 42 4C 24 3B 22 43 41 4C 4C 20 |1 . . BL$;"CALL |
00000930: 4E 4F 54 20 49 4E 20 44 55 50 45 20 53 48 45 45 |NOT IN DUPE SHEE|
00000940: 54 22 3A 89 20 34 31 30 00 61 11 52 03 8D 20 39 |T":. 410.a.R.. 9|
00000950: 37 30 3A 8B 20 41 24 B3 B1 22 22 20 A7 20 35 31 |70:. A$.."" . 51|
00000960: 30 00 6C 11 5C 03 4C 48 25 B2 48 25 00 91 11 66 |0.l.\.LH%.H%...f|
00000970: 03 43 31 25 28 48 25 29 B2 45 31 25 3A 43 32 25 |.C1%(H%).E1%:C2%|
00000980: 28 48 25 29 B2 45 32 25 3A 50 25 28 48 25 29 B2 |(H%).E2%:P%(H%).|
00000990: 30 00 A1 11 70 03 54 B2 54 AA 31 3A 89 20 34 31 |0...p.T.T.1:. 41|
000009A0: 30 00 BA 11 7A 03 8B 20 43 32 25 28 48 25 29 B3 |0...z.. C2%(H%).|
000009B0: B1 45 32 25 20 A7 20 39 31 30 00 D9 11 84 03 8B |.E2% . 910......|
000009C0: 20 43 31 25 28 48 25 29 B2 45 31 25 20 A7 20 35 | C1%(H%).E1% . 5|
000009D0: 34 30 3A 8F 20 44 55 50 45 00 EE 11 8E 03 8B 20 |40:. DUPE...... |
000009E0: 50 25 28 48 25 29 B2 30 20 A7 20 39 33 30 00 02 |P%(H%).0 . 930..|
000009F0: 12 98 03 48 25 B2 50 25 28 48 25 29 3A 89 20 38 |...H%.P%(H%):. 8|
00000A00: 39 30 00 13 12 A2 03 8B 20 44 44 B2 31 20 A7 20 |90...... DD.1 . |
00000A10: 38 34 30 00 25 12 AC 03 8B 20 4C 25 B2 4D 31 20 |840.%.... L%.M1 |
00000A20: A7 20 35 32 30 00 5E 12 B6 03 8D 20 39 37 30 3A |. 520.^.... 970:|
00000A30: 8B 20 41 24 B2 22 22 20 A7 20 4C 48 25 B2 48 25 |. A$."" . LH%.H%|
00000A40: 3A 4C 25 B2 4C 25 AA 31 3A 50 25 28 48 25 29 B2 |:L%.L%.1:P%(H%).|
00000A50: 4C 25 3A 48 25 B2 4C 25 3A 89 20 38 37 30 00 68 |L%:H%.L%:. 870.h|
00000A60: 12 C0 03 89 20 35 31 30 00 8A 12 CA 03 99 20 22 |.... 510...... "|
00000A70: 2D 2D 43 41 4C 4C 20 4F 4B 2D 2D 20 20 51 53 4F |--CALL OK-- QSO|
00000A80: 20 45 4E 54 45 52 45 44 2E 22 00 B2 12 D4 03 41 | ENTERED.".....A|
00000A90: 24 B2 22 22 3A 99 20 22 49 46 20 4E 4F 20 51 53 |$."":. "IF NO QS|
00000AA0: 4F 2C 20 54 59 50 45 20 27 58 27 20 42 45 4C 4F |O, TYPE 'X' BELO|
00000AB0: 57 22 00 C8 12 E8 03 8B 20 48 43 24 B3 B1 22 59 |W"...... HC$.."Y|
00000AC0: 22 20 A7 20 31 30 32 30 00 DA 12 F2 03 98 31 33 |" . 1020......13|
00000AD0: 2C 54 3B 22 20 20 22 3B 47 24 00 E0 12 FC 03 8E |,T;" ";G$......|
00000AE0: 00 F5 12 06 04 4C 48 25 B2 30 3A 8B 20 4E 4C B2 |.....LH%.0:. NL.|
00000AF0: 31 20 A7 20 8E 00 10 13 10 04 8D 20 31 39 30 30 |1 . ....... 1900|
00000B00: 3A 8B 20 47 24 B3 B1 22 22 20 A7 20 31 30 36 30 |:. G$.."" . 1060|
00000B10: 00 33 13 1A 04 85 20 22 57 48 49 43 48 20 42 41 |.3.... "WHICH BA|
00000B20: 4E 44 20 44 4F 20 59 4F 55 20 57 41 4E 54 20 22 |ND DO YOU WANT "|
00000B30: 3B 47 24 00 55 13 24 04 81 20 4B B2 31 20 A4 20 |;G$.U.$.. K.1 . |
00000B40: 4E 4C 3A 8B 20 47 24 B2 4C 4E 24 28 4B 29 20 A7 |NL:. G$.LN$(K) .|
00000B50: 20 31 31 31 30 00 5D 13 2E 04 82 20 4B 00 8F 13 | 1110.].... K...|
00000B60: 38 04 99 20 22 4E 4F 20 53 55 43 48 20 44 55 50 |8.. "NO SUCH DUP|
00000B70: 45 20 53 48 45 45 54 2E 20 56 41 4C 49 44 20 53 |E SHEET. VALID S|
00000B80: 48 45 45 54 53 20 41 52 45 3A 22 3B 42 4C 24 00 |HEETS ARE:";BL$.|
00000B90: AE 13 42 04 81 20 4B B2 31 20 A4 20 4E 4C 3A 99 |..B.. K.1 . NL:.|
00000BA0: 20 A3 35 29 4C 4E 24 28 4B 29 3A 82 20 4B 00 BB | .5)LN$(K):. K..|
00000BB0: 13 4C 04 99 3A 89 20 31 30 35 30 00 D2 13 56 04 |.L..:. 1050...V.|
00000BC0: 8B 20 48 43 24 B2 22 59 22 20 A7 20 8D 20 31 34 |. HC$."Y" . . 14|
00000BD0: 36 30 00 DD 13 60 04 4C 47 B2 4B 3A 8E 00 EF 13 |60...`.LG.K:....|
00000BE0: 6A 04 8B 20 4C 48 25 B2 30 20 A7 20 35 33 30 00 |j.. LH%.0 . 530.|
00000BF0: 15 14 74 04 8B 20 4C 48 25 B3 53 53 20 A7 20 43 |..t.. LH%.SS . C|
00000C00: 31 25 28 4C 48 25 29 B2 AB 33 32 30 30 30 3A 89 |1%(LH%)..32000:.|
00000C10: 20 31 31 36 30 00 2B 14 7E 04 50 25 28 4C 48 25 | 1160.+.~.P%(LH%|
00000C20: 29 B2 30 3A 4C 25 B2 4C 25 AB 31 00 60 14 88 04 |).0:L%.L%.1.`...|
00000C30: 8B 20 48 43 24 B2 22 59 22 20 A7 20 98 31 33 2C |. HC$."Y" . .13,|
00000C40: 22 20 2A 2A 2A 20 50 52 45 56 49 4F 55 53 20 43 |" *** PREVIOUS C|
00000C50: 41 4C 4C 20 44 45 4C 45 54 45 44 20 2A 2A 2A 22 |ALL DELETED ***"|
00000C60: 00 85 14 92 04 4C 48 25 B2 30 3A 54 B2 54 AB 31 |.....LH%.0:T.T.1|
00000C70: 3A 99 20 22 20 20 20 44 45 4C 45 54 45 44 22 3A |:. " DELETED":|
00000C80: 89 20 34 31 30 00 C2 14 9C 04 8D 20 31 39 30 30 |. 410...... 1900|
00000C90: 3A 20 8B 20 47 24 B2 22 22 20 A7 20 85 20 22 57 |: . G$."" . . "W|
00000CA0: 48 41 54 20 49 53 20 54 48 45 20 43 41 4C 4C 20 |HAT IS THE CALL |
00000CB0: 54 4F 20 42 45 20 44 45 4C 45 54 45 44 20 22 3B |TO BE DELETED ";|
00000CC0: 47 24 00 D1 14 A6 04 44 44 B2 31 3A 89 20 36 31 |G$.....DD.1:. 61|
00000CD0: 30 00 F3 14 B0 04 43 31 25 28 48 25 29 B2 AB 33 |0.....C1%(H%)..3|
00000CE0: 32 30 30 31 3A 43 32 25 28 48 25 29 B2 AB 33 32 |2001:C2%(H%)..32|
00000CF0: 30 30 30 00 1D 15 BA 04 8B 20 48 43 24 B2 22 59 |000...... HC$."Y|
00000D00: 22 20 A7 20 98 31 33 2C 22 20 20 20 2A 2A 2A 20 |" . .13," *** |
00000D10: 44 45 4C 45 54 49 4E 47 20 22 3B 47 24 00 36 15 |DELETING ";G$.6.|
00000D20: C4 04 99 20 22 20 20 20 44 45 4C 45 54 45 44 22 |... " DELETED"|
00000D30: 3A 89 20 34 31 30 00 59 15 CE 04 9F 34 2C 38 2C |:. 410.Y....4,8,|
00000D40: 34 2C 20 22 30 3A 44 55 50 45 4C 4F 47 41 2C 53 |4, "0:DUPELOGA,S|
00000D50: 2C 57 22 3A 8D 36 30 30 30 00 75 15 EC 04 98 34 |,W":.6000.u....4|
00000D60: 2C 48 43 24 3A 98 34 2C 54 3A 98 34 2C 59 24 3A |,HC$:.4,T:.4,Y$:|
00000D70: 98 34 2C 5A 24 00 8B 15 EE 04 98 34 2C 4E 4C 3A |.4,Z$......4,NL:|
00000D80: 98 34 2C 4C 25 3A 98 34 2C 4D 31 00 A8 15 F6 04 |.4,L%:.4,M1.....|
00000D90: 81 20 4A B2 31 20 A4 20 4E 4C 3A 98 34 2C 4C 4E |. J.1 . NL:.4,LN|
00000DA0: 24 28 4A 29 3A 82 20 4A 00 AF 15 F8 04 A0 34 00 |$(J):. J......4.|
00000DB0: D6 15 FA 04 9F 33 2C 38 2C 33 2C 22 30 3A 44 55 |.....3,8,3,"0:DU|
00000DC0: 50 45 4C 4F 47 42 2C 4C 2C 22 AA C7 28 32 33 29 |PELOGB,L,"..(23)|
00000DD0: 3A 8D 36 30 30 30 00 E5 15 00 05 81 20 4A B2 31 |:.6000...... J.1|
00000DE0: 20 A4 20 4C 25 00 F4 15 0A 05 52 4E B2 4A 3A 8D | . L%.....RN.J:.|
00000DF0: 37 30 30 30 00 0D 16 0C 05 52 50 B2 31 3A 8D 37 |7000.....RP.1:.7|
00000E00: 31 30 30 3A 98 33 2C 43 31 25 28 4A 29 00 26 16 |100:.3,C1%(J).&.|
00000E10: 0E 05 52 50 B2 39 3A 8D 37 31 30 30 3A 98 33 2C |..RP.9:.7100:.3,|
00000E20: 43 32 25 28 4A 29 00 3F 16 10 05 52 50 B2 31 37 |C2%(J).?...RP.17|
00000E30: 3A 8D 37 31 30 30 3A 98 33 2C 50 25 28 4A 29 00 |:.7100:.3,P%(J).|
00000E40: 47 16 14 05 82 20 4A 00 50 16 1E 05 A0 33 3A 8E |G.... J.P....3:.|
00000E50: 00 72 16 28 05 9F 34 2C 38 2C 34 2C 22 30 3A 44 |.r.(..4,8,4,"0:D|
00000E60: 55 50 45 4C 4F 47 41 2C 53 2C 52 22 3A 8D 36 30 |UPELOGA,S,R":.60|
00000E70: 30 30 00 8E 16 32 05 84 34 2C 48 43 24 3A 84 34 |00...2..4,HC$:.4|
00000E80: 2C 54 3A 84 34 2C 59 24 3A 84 34 2C 5A 24 00 A4 |,T:.4,Y$:.4,Z$..|
00000E90: 16 34 05 84 34 2C 4E 4C 3A 84 34 2C 4C 25 3A 84 |.4..4,NL:.4,L%:.|
00000EA0: 34 2C 4D 31 00 C9 16 3C 05 86 20 4C 4E 24 28 4E |4,M1...<.. LN$(N|
00000EB0: 4C 29 2C 43 31 25 28 4D 31 29 2C 43 32 25 28 4D |L),C1%(M1),C2%(M|
00000EC0: 31 29 2C 50 25 28 4D 31 29 00 E6 16 46 05 81 20 |1),P%(M1)...F.. |
00000ED0: 4A B2 31 20 A4 20 4E 4C 3A 84 34 2C 4C 4E 24 28 |J.1 . NL:.4,LN$(|
00000EE0: 4A 29 3A 82 20 4A 00 F1 16 48 05 8D 20 36 30 30 |J):. J...H.. 600|
00000EF0: 30 00 F8 16 4A 05 A0 34 00 1F 17 50 05 9F 33 2C |0...J..4...P..3,|
00000F00: 38 2C 33 2C 22 30 3A 44 55 50 45 4C 4F 47 42 2C |8,3,"0:DUPELOGB,|
00000F10: 4C 2C 22 AA C7 28 32 33 29 3A 8D 36 30 30 30 00 |L,"..(23):.6000.|
00000F20: 2E 17 64 05 81 20 4A B2 31 20 A4 20 4C 25 00 3D |..d.. J.1 . L%.=|
00000F30: 17 6E 05 52 4E B2 4A 3A 8D 37 30 30 30 00 56 17 |.n.RN.J:.7000.V.|
00000F40: 70 05 52 50 B2 31 3A 8D 37 31 30 30 3A 84 33 2C |p.RP.1:.7100:.3,|
00000F50: 43 31 25 28 4A 29 00 6F 17 72 05 52 50 B2 39 3A |C1%(J).o.r.RP.9:|
00000F60: 8D 37 31 30 30 3A 84 33 2C 43 32 25 28 4A 29 00 |.7100:.3,C2%(J).|
00000F70: 88 17 74 05 52 50 B2 31 37 3A 8D 37 31 30 30 3A |..t.RP.17:.7100:|
00000F80: 84 33 2C 50 25 28 4A 29 00 90 17 82 05 82 20 4A |.3,P%(J)...... J|
00000F90: 00 99 17 8C 05 A0 33 3A 8E 00 BF 17 96 05 98 31 |......3:.......1|
00000FA0: 33 2C 22 22 3A 98 31 33 2C 22 22 3A 98 31 33 2C |3,"":.13,"":.13,|
00000FB0: 22 20 43 4F 4E 54 45 53 54 3A 20 22 3B 59 24 00 |" CONTEST: ";Y$.|
00000FC0: DB 17 A0 05 98 31 33 2C 22 20 20 20 20 20 44 41 |.....13," DA|
00000FD0: 54 45 3A 20 20 20 20 22 3B 5A 24 00 E1 17 AA 05 |TE: ";Z$.....|
00000FE0: 8E 00 0B 18 B4 05 98 31 33 3A 98 31 33 2C 22 20 |.......13:.13," |
00000FF0: 20 20 20 20 51 53 59 20 54 4F 3A 20 22 3B 4C 4E | QSY TO: ";LN|
00001000: 24 28 4B 29 3A 89 20 31 34 35 30 00 16 18 BE 05 |$(K):. 1450.....|
00001010: 8D 20 32 31 30 30 00 2B 18 C0 05 99 3A 99 20 22 |. 2100.+....:. "|
00001020: 4E 45 45 44 45 44 20 4F 4E 3A 22 00 3A 18 C8 05 |NEEDED ON:".:...|
00001030: 81 20 4A B2 31 20 A4 20 4E 4C 00 4E 18 D2 05 48 |. J.1 . NL.N...H|
00001040: 25 B2 45 28 34 29 AA 4A AC 32 36 AB 32 36 00 6A |%.E(4).J.26.26.j|
00001050: 18 DC 05 8B 20 43 31 25 28 48 25 29 B2 AB 33 32 |.... C1%(H%)..32|
00001060: 30 30 30 20 A7 20 31 35 35 30 00 84 18 E6 05 8B |000 . 1550......|
00001070: 20 43 32 25 28 48 25 29 B3 B1 45 32 25 20 A7 20 | C2%(H%)..E2% . |
00001080: 31 35 33 30 00 9D 18 F0 05 8B 20 43 31 25 28 48 |1530...... C1%(H|
00001090: 25 29 B2 45 31 25 20 A7 20 31 35 37 30 00 B3 18 |%).E1% . 1570...|
000010A0: FA 05 8B 20 50 25 28 48 25 29 B2 30 20 A7 20 31 |... P%(H%).0 . 1|
000010B0: 35 35 30 00 C8 18 04 06 48 25 B2 50 25 28 48 25 |550.....H%.P%(H%|
000010C0: 29 3A 89 20 31 35 31 30 00 DE 18 0E 06 99 20 22 |):. 1510...... "|
000010D0: 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 00 EB | ";..|
000010E0: 18 18 06 99 20 4C 4E 24 28 4A 29 00 FB 18 22 06 |.... LN$(J)...".|
000010F0: 82 20 4A 3A 99 3A 89 20 34 31 30 00 1A 19 2C 06 |. J:.:. 410...,.|
00001100: 81 20 4A B2 31 20 A4 20 34 30 3A 99 3A 82 20 4A |. J.1 . 40:.:. J|
00001110: 3A 99 20 43 37 24 3A 99 3A 99 00 20 19 36 06 99 |:. C7$:.:.. .6..|
00001120: 00 57 19 40 06 99 20 22 20 22 3B 48 49 24 3B 22 |.W.@.. " ";HI$;"|
00001130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001140: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001150: 20 20 20 20 20 20 22 00 8E 19 4A 06 99 20 22 20 | "...J.. " |
00001160: 22 3B 48 49 24 3B 22 20 20 20 20 20 20 20 20 20 |";HI$;" |
00001170: 20 20 54 48 45 20 44 55 50 45 43 48 45 43 4B 45 | THE DUPECHECKE|
00001180: 52 20 20 20 20 20 20 20 20 20 20 20 20 22 00 C5 |R "..|
00001190: 19 54 06 99 20 22 20 22 3B 48 49 24 3B 22 20 20 |.T.. " ";HI$;" |
000011A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000011B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000011C0: 20 20 20 20 22 00 FC 19 5E 06 99 20 22 20 22 3B | "...^.. " ";|
000011D0: 48 49 24 3B 22 20 20 20 28 43 29 20 31 39 38 33 |HI$;" (C) 1983|
000011E0: 20 42 59 20 48 41 59 44 45 4E 20 42 4F 4F 4B 20 | BY HAYDEN BOOK |
000011F0: 43 4F 2E 2C 49 4E 43 2E 20 20 20 22 00 33 1A 68 |CO.,INC. ".3.h|
00001200: 06 99 20 22 20 22 3B 48 49 24 3B 22 20 20 20 20 |.. " ";HI$;" |
00001210: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001230: 20 20 22 00 3D 1A 72 06 99 20 4C 4F 24 00 43 1A | ".=.r.. LO$.C.|
00001240: 7C 06 8E 00 51 1A 86 06 99 20 43 37 24 3A 99 3A ||...Q.... C7$:.:|
00001250: 99 00 85 1A 90 06 99 20 48 49 24 3B 22 20 20 20 |....... HI$;" |
00001260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001280: 20 20 20 20 22 00 B9 1A 9A 06 99 20 48 49 24 3B | "...... HI$;|
00001290: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 49 4E |" IN|
000012A0: 53 54 52 55 43 54 49 4F 4E 53 20 20 20 20 20 20 |STRUCTIONS |
000012B0: 20 20 20 20 20 20 20 20 22 00 ED 1A A4 06 99 20 | "...... |
000012C0: 48 49 24 3B 22 20 20 20 20 20 20 20 20 20 20 20 |HI$;" |
000012D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000012E0: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 21 1B | ".!.|
000012F0: AE 06 99 20 48 49 24 3B 22 20 20 20 20 20 20 20 |... HI$;" |
00001300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001310: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001320: 22 00 55 1B B8 06 99 20 48 49 24 3B 22 20 20 2D |".U.... HI$;" -|
00001330: 45 4E 54 45 52 20 43 41 4C 4C 20 54 4F 20 41 44 |ENTER CALL TO AD|
00001340: 44 20 49 54 20 54 4F 20 44 55 50 45 53 48 45 45 |D IT TO DUPESHEE|
00001350: 54 2D 20 20 22 00 89 1B C2 06 99 20 48 49 24 3B |T- "...... HI$;|
00001360: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00001370: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001380: 20 20 20 20 20 20 20 20 22 00 BD 1B CC 06 99 20 | "...... |
00001390: 48 49 24 3B 22 20 27 4E 31 4E 4E 4E 3F 27 20 45 |HI$;" 'N1NNN?' E|
000013A0: 4E 54 45 52 20 41 4E 59 20 43 41 4C 4C 20 50 4C |NTER ANY CALL PL|
000013B0: 55 53 20 27 3F 27 20 46 4F 52 20 20 22 00 F1 1B |US '?' FOR "...|
000013C0: D6 06 99 20 48 49 24 3B 22 20 20 20 20 20 20 20 |... HI$;" |
000013D0: 20 42 41 4E 44 2D 42 59 2D 42 41 4E 44 20 44 55 | BAND-BY-BAND DU|
000013E0: 50 45 43 48 45 43 4B 20 20 20 20 20 20 20 20 20 |PECHECK |
000013F0: 22 00 25 1C E0 06 99 20 48 49 24 3B 22 20 20 20 |".%.... HI$;" |
00001400: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001420: 20 20 20 20 22 00 59 1C F4 06 99 20 48 49 24 3B | ".Y.... HI$;|
00001430: 22 20 27 58 27 20 20 20 20 44 45 4C 45 54 45 53 |" 'X' DELETES|
00001440: 20 54 48 45 20 4C 41 53 54 20 43 41 4C 4C 20 45 | THE LAST CALL E|
00001450: 4E 54 45 52 45 44 20 20 22 00 8D 1C FE 06 99 20 |NTERED "...... |
00001460: 48 49 24 3B 22 20 27 44 45 4C 27 20 20 44 45 4C |HI$;" 'DEL' DEL|
00001470: 45 54 45 53 20 41 4E 59 20 43 41 4C 4C 20 20 20 |ETES ANY CALL |
00001480: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 C1 1C | "...|
00001490: 08 07 99 20 48 49 24 3B 22 20 27 51 52 54 27 20 |... HI$;" 'QRT' |
000014A0: 20 53 41 56 45 53 20 41 4C 4C 20 43 41 4C 4C 53 | SAVES ALL CALLS|
000014B0: 20 41 4E 44 20 45 58 49 54 53 20 20 20 20 20 20 | AND EXITS |
000014C0: 22 00 F5 1C 12 07 99 20 48 49 24 3B 22 20 27 51 |"...... HI$;" 'Q|
000014D0: 53 59 27 20 20 43 48 41 4E 47 45 53 20 42 41 4E |SY' CHANGES BAN|
000014E0: 44 53 2F 44 55 50 45 20 53 48 45 45 54 53 20 20 |DS/DUPE SHEETS |
000014F0: 20 20 20 20 22 00 29 1D 1C 07 99 20 48 49 24 3B | ".).... HI$;|
00001500: 22 20 27 53 41 56 45 27 20 53 41 56 45 53 20 43 |" 'SAVE' SAVES C|
00001510: 41 4C 4C 53 20 57 49 54 48 4F 55 54 20 45 58 49 |ALLS WITHOUT EXI|
00001520: 54 49 4E 47 20 20 20 20 22 00 5D 1D 26 07 99 20 |TING ".].&.. |
00001530: 48 49 24 3B 22 20 27 3F 27 20 20 20 20 44 49 53 |HI$;" '?' DIS|
00001540: 50 4C 41 59 53 20 54 48 49 53 20 4D 45 4E 55 20 |PLAYS THIS MENU |
00001550: 20 20 20 20 20 20 20 20 20 20 20 20 22 00 91 1D | "...|
00001560: 30 07 99 20 48 49 24 3B 22 20 20 20 20 20 20 20 |0.. HI$;" |
00001570: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001590: 22 00 9B 1D 3A 07 99 20 4C 4F 24 00 A1 1D 44 07 |"...:.. LO$...D.|
000015A0: 8E 00 C3 1D 4E 07 85 20 47 53 24 3A 4C 4C B2 C3 |....N.. GS$:LL..|
000015B0: 28 47 53 24 29 3A 8B 20 4C 4C B2 30 20 A7 20 31 |(GS$):. LL.0 . 1|
000015C0: 39 33 30 00 EF 1D 58 07 58 31 25 B2 30 3A 81 20 |930...X.X1%.0:. |
000015D0: 4A B2 31 20 A4 20 4C 4C 3A 8B 20 CA 28 47 53 24 |J.1 . LL:. .(GS$|
000015E0: 2C 4A 2C 31 29 B2 22 2D 22 20 A7 20 35 31 30 00 |,J,1)."-" . 510.|
000015F0: F7 1D 5A 07 82 20 4A 00 00 1E 62 07 4C 50 B2 31 |..Z.. J...b.LP.1|
00001600: 00 1F 1E 6C 07 8B 20 4C 50 B1 4C 4C 20 A7 20 31 |...l.. LP.LL . 1|
00001610: 39 33 30 3A 8F 20 32 4E 44 20 45 4E 54 52 59 00 |930:. 2ND ENTRY.|
00001620: 4A 1E 76 07 81 20 4C 54 B2 4C 50 20 A4 20 4C 4C |J.v.. LT.LP . LL|
00001630: 3A 8B 20 CA 28 47 53 24 2C 4C 54 2C 31 29 B3 B1 |:. .(GS$,LT,1)..|
00001640: 22 20 22 20 A7 20 31 39 34 30 00 53 1E 80 07 82 |" " . 1940.S....|
00001650: 20 4C 54 00 5F 1E 8A 07 47 24 B2 22 22 3A 8E 00 | LT._...G$."":..|
00001660: 69 1E 94 07 4C 50 B2 4C 54 00 93 1E 9E 07 81 20 |i...LP.LT...... |
00001670: 4C 54 B2 4C 50 20 A4 20 4C 4C 3A 8B 20 CA 28 47 |LT.LP . LL:. .(G|
00001680: 53 24 2C 4C 54 2C 31 29 B2 22 20 22 20 A7 20 31 |S$,LT,1)." " . 1|
00001690: 39 38 30 00 9C 1E A8 07 82 20 4C 54 00 A8 1E B2 |980...... LT....|
000016A0: 07 4C 54 B2 4C 54 AA 31 00 C7 1E BC 07 47 24 B2 |.LT.LT.1.....G$.|
000016B0: CA 28 47 53 24 2C 4C 50 2C 4C 54 AB 4C 50 29 3A |.(GS$,LP,LT.LP):|
000016C0: 4C 50 B2 4C 54 3A 8E 00 E5 1E C6 07 8F 20 50 52 |LP.LT:....... PR|
000016D0: 49 4E 54 45 52 20 49 4E 49 54 2C 20 49 46 20 4E |INTER INIT, IF N|
000016E0: 45 45 44 45 44 00 EB 1E D0 07 8E 00 F2 1E DA 07 |EEDED...........|
000016F0: 99 20 00 23 1F E4 07 99 20 48 49 24 3B 22 2A 2A |. .#.... HI$;"**|
00001700: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001710: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001720: 2A 2A 22 00 54 1F EE 07 99 20 48 49 24 3B 22 2A |**".T.... HI$;"*|
00001730: 2A 20 49 54 27 53 20 41 20 44 55 50 45 20 20 2A |* IT'S A DUPE *|
00001740: 2A 20 20 42 4F 4F 20 20 2A 2A 20 20 48 49 53 53 |* BOO ** HISS|
00001750: 20 2A 2A 22 00 85 1F F8 07 99 20 48 49 24 3B 22 | **"...... HI$;"|
00001760: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001770: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001780: 2A 2A 2A 2A 22 00 97 1F 02 08 99 20 42 4C 24 3A |****"...... BL$:|
00001790: 99 20 4C 4F 24 3A 8E 00 AC 1F 34 08 48 25 B2 45 |. LO$:....4.H%.E|
000017A0: 28 34 29 AA 4C 47 AC 32 36 AB 32 36 00 C5 1F 3E |(4).LG.26.26...>|
000017B0: 08 8B 20 43 31 25 28 48 25 29 B2 AB 33 32 30 30 |.. C1%(H%)..3200|
000017C0: 30 20 A7 20 8E 00 DF 1F 48 08 8B 20 43 32 25 28 |0 . ....H.. C2%(|
000017D0: 48 25 29 B3 B1 45 32 25 20 A7 20 32 31 34 30 00 |H%)..E2% . 2140.|
000017E0: FC 1F 52 08 8B 20 43 31 25 28 48 25 29 B2 45 31 |..R.. C1%(H%).E1|
000017F0: 25 20 A7 20 8D 20 32 30 31 30 3A 8E 00 0F 20 5C |% . . 2010:... \|
00001800: 08 8B 20 50 25 28 48 25 29 B2 30 20 A7 20 8E 00 |.. P%(H%).0 . ..|
00001810: 24 20 66 08 48 25 B2 50 25 28 48 25 29 3A 89 20 |$ f.H%.P%(H%):. |
00001820: 32 31 32 30 00 5A 20 70 17 84 31 35 2C 45 41 2C |2120.Z p..15,EA,|
00001830: 45 42 24 2C 45 43 2C 45 44 3A 8B 20 45 41 B3 32 |EB$,EC,ED:. EA.2|
00001840: 30 20 A7 20 8E 3A 8F 20 52 45 41 44 20 45 52 52 |0 . .:. READ ERR|
00001850: 4F 52 20 43 48 41 4E 4E 45 4C 00 6A 20 7A 17 8B |OR CHANNEL.j z..|
00001860: 20 45 41 B2 35 30 20 A7 20 8E 00 96 20 84 17 8B | EA.50 . ... ...|
00001870: 20 45 41 B2 36 33 20 A7 20 A0 34 3A 9F 34 2C 38 | EA.63 . .4:.4,8|
00001880: 2C 34 2C 22 40 30 3A 44 55 50 45 4C 4F 47 41 2C |,4,"@0:DUPELOGA,|
00001890: 53 2C 57 22 3A 8E 00 AD 20 8E 17 99 20 45 41 3B |S,W":... ... EA;|
000018A0: 45 42 24 2C 45 43 3B 45 44 3A 90 3A 8E 00 CD 20 |EB$,EC;ED:.:... |
000018B0: 58 1B 52 48 B2 B5 28 52 4E AD 32 35 36 29 3A 52 |X.RH..(RN.256):R|
000018C0: 4C B2 52 4E AB 32 35 36 AC 52 48 3A 8E 00 EC 20 |L.RN.256.RH:... |
000018D0: BC 1B 98 31 35 2C 22 50 22 C7 28 33 29 C7 28 52 |...15,"P".(3).(R|
000018E0: 4C 29 C7 28 52 48 29 C7 28 52 50 29 00 F7 20 C6 |L).(RH).(RP).. .|
000018F0: 1B 89 20 36 30 30 30 00 00 00 |.. 6000... |
....... THE DUPECHECKER (C64).4.... BY K
C6A AND N6NB.F.... COPYRIGHT 1983 BY HAY
DEN BOOK COMPANY, INC.... ..13,4:. VIC P
RINTER CHANNEL...!..15,8,15...(.AA.F("A"
).1:A0.F("A").F("0").26.K.2.BL$.G(7):. B
ELL...<.HI$.G(18):. PUT YOUR VIDEO HIGHL
IGHTING COMMAND HERE.9.F.LO$.G(146):. PU
T YOUR VIDEO NORMAL COMMAND HERE .W.P.C7
$.G(147):. CLEAR SCREEN.B.D.. 1580...N..
:. "NEW CONTEST (N) OR RESUME (R) ";A$..
.X........ A$."N" . 180.C.... A$.."R" .
. BL$:. 100.N.... 1320... .. HC$."Y" . .
1430.....SS.26.NL.1:. 390."....15,"S0:D
UPELOGA":.15,"S0:DUPELOGB".T.... "WANT A
HARD COPY WHILE LOGGING (Y/N) ";HC$....
.. HC$."Y" . . "TURN ON PRINTER. <CR> WH
EN READY ";A$:. 1990...H.T.1:..C.R.. "WH
AT IS THE CONTEST NAME ";Y$......:. "WHA
T IS THE DATE (MM/DD/YY) ";Z$:....... HC
$."Y" . . 1430./.... "HOW MANY SEPARATE
DUPE SHEETS";NL.5.....N.... NL.1 . . BL$
:. 240.\.... LN$(NL).T...M1..((.(0).2000
).6)...... NL.26..M1 . . "TOO MANY";BL$:
. 240...".. C1%(M1),C2%(M1),P%(M1).X.,..
NL.1 . LN$(1)."1":. 360...6.. J.1 . NL.
..@.. "WHAT BAND IS DUPE SHEET #";J.7.J.
. "(E.G. 20, 20CW, OR 20PHONE) ";LN$(J).
K.T.. C(LN$(J)).20 . . BL$;"NAME IS TOO
LONG":. 320.U.^..:. J...H.SS.26.NL.1:L%.
SS.1.W.R..:. "SPACE IS AVAILABLE FOR APP
ROXIMATELY";M1;"CALL SIGNS. GOOD LUCK!".
..|.. K.1 . L%:C1%(K)..32000:C2%(K)..320
00:P%(K).0:. K.-...LG.1:LH%.0:. NL.1 . .
1050.8.... 1670.L....:. "DUPECHECKER RE
ADY FOR QSO #";T;"-";LN$(LG)...... 1870:
. X1%.1 . 510...... G$."X" . 1130......
G$."DEL" . 1180.X.B.. G$."QRT" . . 1230:
13:.6000: 15:....L.. G$."QSY" . . 1030
:. 410...V.. G$."SAVE" . . 1230:. 410.(.
... G$."?" . 400.2.... 600.Q.... "INVALI
D CALL";BL$:. 410.L.... " ..ABORTED..":.
410...... "DUPE SHEET FULL";BL$:. 410..
.... "CAN'T DELETE";BL$:. 410...... DD.1
. 1200.P.&.. 2010:. 410.Y.X.DD.0...B.E(
5).0:E(6).0:K.1:. C(G$).10 . 500...L.. I
(G$,1).."?" . 640.3.V.DD.2:G$.H(G$,C(G$)
.1).G.... C(G$).4 . 500.A.... J(G$,3,1).
"A" . 680.|.... J(G$,2,1).."A" . 500....
.G$." ".G$:K.2:E(1).0...... J.K . C(G$).
....W$.J(G$,J,1).K.... W$."/" . 750...F.
E(J).F(W$).AA:. E(J).0 . . E(J).26 . 500
...P.. W$."0" . 500.7.Z.. E(J).1 . E(J).
E(J).A0:. E(J).36 . 500.?.... J.O.... J.
7 . 500.A.... J.K.4 . 500..... J.4 . 6:
. E(J).26 . 500...... J.....E1%..32000.E
(1).1369.E(2).37.E(3).S. .E2%..32000.E(4
).1369.E(5).37.E(6)...*.. DD.2 . 1470...
4.H%.E(4).LG.26.26...>.. C1%(H%)...32000
. 890.H.H.. DD.1 . . BL$;"CALL NOT IN D
UPE SHEET":. 410.A.R.. 970:. A$.."" . 51
0.L.\.LH%.H%...F.C1%(H%).E1%:C2%(H%).E2%
:P%(H%).0...P.T.T.1:. 410...Z.. C2%(H%).
.E2% . 910.Y.... C1%(H%).E1% . 540:. DUP
E...... P%(H%).0 . 930.....H%.P%(H%):. 8
90...... DD.1 . 840.%.... L%.M1 . 520.^.
... 970:. A$."" . LH%.H%:L%.L%.1:P%(H%).
L%:H%.L%:. 870.H.... 510...J.. "--CALL O
K-- QSO ENTERED."...T.A$."":. "IF NO QS
O, TYPE 'X' BELOW".H.... HC$.."Y" . 1020
.Z....13,T;" ";G$...........LH%.0:. NL.
1 . ....... 1900:. G$.."" . 1060.3.... "
WHICH BAND DO YOU WANT ";G$.U.$.. K.1 .
NL:. G$.LN$(K) . 1110.].... K...8.. "NO
SUCH DUPE SHEET. VALID SHEETS ARE:";BL$.
..B.. K.1 . NL:. .5)LN$(K):. K...L..:. 1
050.R.V.. HC$."Y" . . 1460...`.LG.K:....
J.. LH%.0 . 530...T.. LH%.SS . C1%(LH%).
.32000:. 1160.+.~.P%(LH%).0:L%.L%.1.`...
. HC$."Y" . .13," *** PREVIOUS CALL DELE
TED ***".....LH%.0:T.T.1:. " DELETED":
. 410.B.... 1900: . G$."" . . "WHAT IS T
HE CALL TO BE DELETED ";G$.Q...DD.1:. 61
0.....C1%(H%)..32001:C2%(H%)..32000.....
. HC$."Y" . .13," *** DELETING ";G$.6.
D.. " DELETED":. 410.Y.N..4,8,4, "0:DU
PELOGA,S,W":.6000.U....4,HC$:.4,T:.4,Y$:
.4,Z$......4,NL:.4,L%:.4,M1...... J.1 .
NL:.4,LN$(J):. J..... 4.V....3,8,3,"0:DU
PELOGB,L,".G(23):.6000...... J.1 . L%...
..RN.J:.7000.....RP.1:.7100:.3,C1%(J).&.
..RP.9:.7100:.3,C2%(J).?...RP.17:.7100:.
3,P%(J).G.... J.P... 3:..R.(..4,8,4,"0:D
UPELOGA,S,R":.6000...2..4,HC$:.4,T:.4,Y$
:.4,Z$...4..4,NL:.4,L%:.4,M1.I.<.. LN$(N
L),C1%(M1),C2%(M1),P%(M1)...F.. J.1 . NL
:.4,LN$(J):. J...H.. 6000...J. 4...P..3,
8,3,"0:DUPELOGB,L,".G(23):.6000...D.. J.
1 . L%.=.N.RN.J:.7000.V.P.RP.1:.7100:.3,
C1%(J).O.R.RP.9:.7100:.3,C2%(J)...T.RP.1
7:.7100:.3,P%(J)...... J..... 3:.......1
3,"":.13,"":.13," CONTEST: ";Y$... ..13,
" DATE: ";Z$............13:.13,"
QSY TO: ";LN$(K):. 1450...... 2100.+
....:. "NEEDED ON:".:.H.. J.1 . NL.N.R.H
%.E(4).J.26.26.J.... C1%(H%)..32000 . 15
50...... C2%(H%)..E2% . 1530...... C1%(H
%).E1% . 1570...... P%(H%).0 . 1550.H...
H%.P%(H%):. 1510...... " ";..
.... LN$(J)...".. J:.:. 410...,.. J.1 .
40:.:. J:. C7$:.:.. .6...W.@.. " ";HI$;"
".
..J.. " ";HI$;" THE DUPECHECKE
R ".E.T.. " ";HI$;"
"...^.. " ";
HI$;" (C) 1983 BY HAYDEN BOOK CO.,INC.
".3.H.. " ";HI$;"
".=.R.. LO$.C.|...Q...
. C7$:.:....... HI$;"
"...... HI$;"
INSTRUCTIONS "......
HI$;"
".!.... HI$;"
".U.... HI$;" -ENTER CA
LL TO ADD IT TO DUPESHEET- "...B.. HI$;
"
"...L.. HI$;" 'N1NNN?' ENTER ANY CALL PL
US '?' FOR "...V.. HI$;" BAND-BY
-BAND DUPECHECK ".%.... HI$;"
".Y.
... HI$;" 'X' DELETES THE LAST CALL E
NTERED "...... HI$;" 'DEL' DELETES ANY
CALL ".A.... HI$;" 'QRT'
SAVES ALL CALLS AND EXITS "......
HI$;" 'QSY' CHANGES BANDS/DUPE SHEETS
".).... HI$;" 'SAVE' SAVES CALLS WIT
HOUT EXITING ".].&.. HI$;" '?' DIS
PLAYS THIS MENU "...0.. HI$;
"
"...:.. LO$...D...C.N.. GS$:LL.C(GS$):.
LL.0 . 1930...X.X1%.0:. J.1 . LL:. J(GS$
,J,1)."-" . 510...Z.. J...B.LP.1...L.. L
P.LL . 1930:. 2ND ENTRY.J.V.. LT.LP . LL
:. J(GS$,LT,1).." " . 1940.S.... LT._...
G$."":..I...LP.LT...... LT.LP . LL:. J(G
S$,LT,1)." " . 1980...... LT.....LT.LT.1
.G...G$.J(GS$,LP,LT.LP):LP.LT:....F.. PR
INTER INIT, IF NEEDED...P.....Z.. .#....
HI$;"**********************************
**".T.... HI$;"** IT'S A DUPE ** BOO
** HISS **"...... HI$;"****************
********************"...... BL$:. LO$:..
..4.H%.E(4).LG.26.26.E.>.. C1%(H%)..3200
0 . ....H.. C2%(H%)..E2% . 2140...R.. C1
%(H%).E1% . . 2010:... \.. P%(H%).0 . ..
$ F.H%.P%(H%):. 2120.Z P..15,EA,EB$,EC,E
D:. EA.20 . .:. READ ERROR CHANNEL.J Z..
EA.50 . ... ... EA.63 . 4:.4,8,4,"@0:D
UPELOGA,S,W":... ... EA;EB$,EC;ED:.:..M
X.RH..(RN.256):RL.RN.256.RH:... ...15,"P
"G(3)G(RL)G(RH)G(RP).. F.. 6000...
> CLICK IMAGE PREVIEW FOR FULL MODAL