_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

CAL QSO SUPP

FILE INFORMATION

FILENAME(S): CAL QSO SUPP

FILE TYPE(S): PRG

FILE SIZE: 2.7K

FIRST SEEN: 2025-11-30 18:13:02

APPEARS ON: 1 disk(s)

FILE HASH

da2b6857e0f7b16d48d7038eb2bd2b81da65f9feea249f01031a6623c5f6b9a1

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
COMTESTER V2 0 CAL QSO SUPP PRG Sailor, Ganheden 19 8 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 4D 08 00 00 8F 20  43 4F 50 59 52 49 47 48  |..M.... COPYRIGH|
00000010: 54 20 31 39 38 38 2C 20  4A 41 4D 45 53 20 57 2E  |T 1988, JAMES W.|
00000020: 20 4D 43 43 4C 45 4C 4C  41 4E 2C 20 33 33 30 34  | MCCLELLAN, 3304|
00000030: 20 4A 4F 20 41 4E 4E 20  41 56 45 2E 2C 20 4F 4D  | JO ANN AVE., OM|
00000040: 41 48 41 2C 20 4E 45 20  36 38 31 32 33 00 56 08  |AHA, NE 68123.V.|
00000050: 05 00 47 46 B2 38 00 65  08 0A 00 8B 43 34 B2 2E  |..GF.8.e....C4..|
00000060: A7 38 30 30 30 00 74 08  14 00 8B 43 34 B2 32 A7  |.8000.t....C4.2.|
00000070: 32 30 30 30 00 90 08 40  01 48 42 B2 B5 28 4B AD  |2000...@.HB..(K.|
00000080: 32 35 36 29 3A 4C 42 B2  4B AB 48 42 AC 32 35 36  |256):LB.K.HB.256|
00000090: 00 B5 08 4A 01 98 31 35  2C 22 50 22 AA C7 28 39  |...J..15,"P"..(9|
000000A0: 38 29 AA C7 28 4C 42 29  AA C7 28 48 42 29 AA C7  |8)..(LB)..(HB)..|
000000B0: 28 31 29 3A 8E 00 D7 08  54 01 9F 31 35 2C 38 2C  |(1):....T..15,8,|
000000C0: 31 35 3A 9F 31 2C 38 2C  32 2C 22 43 41 4C 20 51  |15:.1,8,2,"CAL Q|
000000D0: 53 4F 2C 4C 22 3A 8E 00  F0 08 5E 01 52 24 B2 22  |SO,L":....^.R$."|
000000E0: 22 3A 53 52 24 B2 22 22  3A 57 24 B2 22 22 3A 8E  |":SR$."":W$."":.|
000000F0: 00 15 09 68 01 4E 44 25  B2 54 3A 97 38 32 38 2C  |...h.ND%.T:.828,|
00000100: 30 3A 9E 34 39 31 35 32  3A 53 45 2C 45 2C 43 24  |0:.49152:SE,E,C$|
00000110: 28 29 2E 3A 8E 00 2F 09  7C 01 97 35 35 2C C2 28  |().:../.|..55,.(|
00000120: 35 31 29 3A 97 35 36 2C  C2 28 35 32 29 3A 8E 00  |51):.56,.(52):..|
00000130: 50 09 86 01 5A B2 B8 28  30 29 3A 97 35 35 2C C2  |P...Z..(0):.55,.|
00000140: 28 35 35 29 3A 97 35 36  2C C2 28 35 36 29 3A 8E  |(55):.56,.(56):.|
00000150: 00 6D 09 90 01 99 22 93  12 20 53 45 4C 45 43 54  |.m....".. SELECT|
00000160: 20 44 45 53 49 52 45 44  20 42 41 4E 44 00 A9 09  | DESIRED BAND...|
00000170: 95 01 99 3A 99 22 31 2E  20 31 30 50 48 22 3A 99  |...:."1. 10PH":.|
00000180: 22 32 2E 20 31 30 43 57  22 3A 99 22 33 2E 20 31  |"2. 10CW":."3. 1|
00000190: 35 50 48 22 3A 99 22 34  2E 20 31 35 43 57 22 3A  |5PH":."4. 15CW":|
000001A0: 99 22 35 2E 20 32 30 50  48 00 E4 09 96 01 99 22  |."5. 20PH......"|
000001B0: 36 2E 20 32 30 43 57 22  3A 99 22 37 2E 20 34 30  |6. 20CW":."7. 40|
000001C0: 50 48 22 3A 99 22 38 2E  20 34 30 43 57 22 3A 99  |PH":."8. 40CW":.|
000001D0: 22 39 2E 20 37 35 50 48  22 3A 99 22 31 30 2E 20  |"9. 75PH":."10. |
000001E0: 38 30 43 57 00 01 0A 97  01 99 22 31 31 2E 20 31  |80CW......"11. 1|
000001F0: 36 30 50 48 22 3A 99 22  31 32 2E 20 31 36 30 43  |60PH":."12. 160C|
00000200: 57 00 3A 0A 9F 01 99 3A  99 22 43 55 52 52 45 4E  |W.:....:."CURREN|
00000210: 54 20 42 41 4E 44 20 22  42 42 24 3A 99 3A 99 3A  |T BAND "BB$:.:.:|
00000220: 85 22 45 4E 54 45 52 20  31 20 2D 20 31 32 22 3B  |."ENTER 1 - 12";|
00000230: 43 3A 8B 43 B2 30 A7 34  30 30 00 58 0A A4 01 8B  |C:.C.0.400.X....|
00000240: 43 B2 31 A7 42 41 24 B2  22 21 50 22 3A 42 42 24  |C.1.BA$."!P":BB$|
00000250: B2 22 31 30 20 53 53 42  00 75 0A A9 01 8B 43 B2  |."10 SSB.u....C.|
00000260: 32 A7 42 41 24 B2 22 21  43 22 3A 42 42 24 B2 22  |2.BA$."!C":BB$."|
00000270: 31 30 20 43 57 00 93 0A  AE 01 8B 43 B2 33 A7 42  |10 CW......C.3.B|
00000280: 41 24 B2 22 23 50 22 3A  42 42 24 B2 22 31 35 20  |A$."#P":BB$."15 |
00000290: 53 53 42 00 B0 0A B3 01  8B 43 B2 34 A7 42 41 24  |SSB......C.4.BA$|
000002A0: B2 22 23 43 22 3A 42 42  24 B2 22 31 35 20 43 57  |."#C":BB$."15 CW|
000002B0: 00 CE 0A B8 01 8B 43 B2  35 A7 42 41 24 B2 22 24  |......C.5.BA$."$|
000002C0: 50 22 3A 42 42 24 B2 22  32 30 20 53 53 42 00 EB  |P":BB$."20 SSB..|
000002D0: 0A BD 01 8B 43 B2 36 A7  42 41 24 B2 22 24 43 22  |....C.6.BA$."$C"|
000002E0: 3A 42 42 24 B2 22 32 30  20 43 57 00 09 0B C2 01  |:BB$."20 CW.....|
000002F0: 8B 43 B2 37 A7 42 41 24  B2 22 25 50 22 3A 42 42  |.C.7.BA$."%P":BB|
00000300: 24 B2 22 34 30 20 53 53  42 00 26 0B C7 01 8B 43  |$."40 SSB.&....C|
00000310: B2 38 A7 42 41 24 B2 22  25 43 22 3A 42 42 24 B2  |.8.BA$."%C":BB$.|
00000320: 22 34 30 20 43 57 00 44  0B C8 01 8B 43 B2 39 A7  |"40 CW.D....C.9.|
00000330: 42 41 24 B2 22 26 50 22  3A 42 42 24 B2 22 37 35  |BA$."&P":BB$."75|
00000340: 20 53 53 42 00 62 0B C9  01 8B 43 B2 31 30 A7 42  | SSB.b....C.10.B|
00000350: 41 24 B2 22 26 43 22 3A  42 42 24 B2 22 38 30 20  |A$."&C":BB$."80 |
00000360: 43 57 00 82 0B CA 01 8B  43 B2 31 31 A7 42 41 24  |CW......C.11.BA$|
00000370: B2 22 27 50 22 3A 42 42  24 B2 22 31 36 30 20 53  |."'P":BB$."160 S|
00000380: 53 42 00 A1 0B CB 01 8B  43 B2 31 32 A7 42 41 24  |SB......C.12.BA$|
00000390: B2 22 27 43 22 3A 42 42  24 B2 22 31 36 30 20 43  |."'C":BB$."160 C|
000003A0: 57 00 B9 0B D1 01 4D 4F  24 B2 22 43 22 3A 8B 58  |W.....MO$."C":.X|
000003B0: B2 32 A7 4D 4F 24 B2 22  50 00 BF 0B D6 01 8E 00  |.2.MO$."P.......|
000003C0: EF 0B DE 03 4E 53 B2 31  3A 8B CA 28 52 24 2C 31  |....NS.1:..(R$,1|
000003D0: 37 2C 31 29 B2 22 2A 22  A7 43 24 28 59 29 B2 C8  |7,1)."*".C$(Y)..|
000003E0: 28 52 24 2C 32 29 AA 22  5A 5A 5A 5A 22 3A 8E 00  |(R$,2)."ZZZZ":..|
000003F0: 0A 0C E3 03 43 24 28 59  29 B2 C8 28 52 24 2C 31  |....C$(Y)..(R$,1|
00000400: 31 29 3A 81 4D B2 36 A4  31 31 00 33 0C E8 03 8B  |1):.M.6.11.3....|
00000410: CA 28 43 24 28 59 29 2C  4D 2C 31 29 B2 22 20 22  |.(C$(Y),M,1)." "|
00000420: A7 43 24 28 59 29 B2 C8  28 43 24 28 59 29 2C 4D  |.C$(Y)..(C$(Y),M|
00000430: AB 31 29 00 53 0C ED 03  8B C3 28 43 24 28 59 29  |.1).S.....(C$(Y)|
00000440: 29 B3 38 A7 43 24 28 59  29 B2 43 24 28 59 29 AA  |).8.C$(Y).C$(Y).|
00000450: 22 20 22 00 5B 0C F2 03  82 3A 8E 00 A5 0C D0 07  |" ".[....:......|
00000460: 99 22 93 50 52 49 4E 54  20 51 53 4C 20 4C 41 42  |.".PRINT QSL LAB|
00000470: 45 4C 53 20 46 4F 52 22  3A 99 3A 99 22 31 2E 20  |ELS FOR":.:."1. |
00000480: 45 4E 54 49 52 45 20 42  41 4E 44 22 3A 99 22 32  |ENTIRE BAND":."2|
00000490: 2E 20 49 4E 44 49 56 49  44 55 41 4C 20 43 41 4C  |. INDIVIDUAL CAL|
000004A0: 4C 53 49 47 4E 00 C2 0C  DA 07 99 22 33 2E 20 52  |LSIGN......"3. R|
000004B0: 45 54 55 52 4E 20 54 4F  20 4D 41 49 4E 20 4D 45  |ETURN TO MAIN ME|
000004C0: 4E 55 00 DD 0C E4 07 99  3A 85 22 28 31 2C 20 32  |NU......:."(1, 2|
000004D0: 20 4F 52 20 33 29 22 3B  58 3A 99 3A 99 00 EE 0C  | OR 3)";X:.:....|
000004E0: EE 07 A0 34 3A 8B 58 B1  32 A7 39 37 37 30 00 19  |...4:.X.2.9770..|
000004F0: 0D F8 07 8D 34 30 30 3A  8B C9 28 42 41 24 2C 31  |....400:..(BA$,1|
00000500: 29 B2 22 50 22 A7 4D 52  24 B2 22 53 53 42 22 3A  |)."P".MR$."SSB":|
00000510: 52 53 24 B2 22 35 39 20  22 00 3D 0D 02 08 8B C9  |RS$."59 ".=.....|
00000520: 28 42 41 24 2C 31 29 B2  22 43 22 A7 4D 52 24 B2  |(BA$,1)."C".MR$.|
00000530: 22 43 57 22 3A 52 53 24  B2 22 35 39 39 00 72 0D  |"CW":RS$."599.r.|
00000540: 0C 08 99 3A 85 22 44 41  54 45 22 3B 44 41 24 3A  |...:."DATE";DA$:|
00000550: 44 41 24 B2 C8 28 44 41  24 AA 22 20 20 20 20 20  |DA$..(DA$."     |
00000560: 20 20 20 20 22 2C 39 29  3A 8B 58 B2 31 A7 32 31  |    ",9):.X.1.21|
00000570: 39 30 00 AD 0D 16 08 99  22 93 22 3A 99 3A 99 3A  |90......".":.:.:|
00000580: 85 22 43 41 4C 4C 22 3B  53 52 24 3A 53 52 24 B2  |."CALL";SR$:SR$.|
00000590: 42 41 24 AA 53 52 24 3A  8B C3 28 53 52 24 29 B3  |BA$.SR$:..(SR$).|
000005A0: 38 A7 53 52 24 B2 53 52  24 AA 22 20 22 00 D8 0D  |8.SR$.SR$." "...|
000005B0: 20 08 8D 33 36 30 3A 8B  52 50 25 28 30 29 B1 30  | ..360:.RP%(0).0|
000005C0: A7 59 B2 52 50 25 28 31  29 3A 99 22 51 53 4F 23  |.Y.RP%(1):."QSO#|
000005D0: 22 59 3A 89 32 31 30 30  00 0B 0E 2A 08 99 22 93  |"Y:.2100...*..".|
000005E0: 22 3A 99 A3 32 35 31 29  22 12 43 41 4C 4C 20 4E  |":..251)".CALL N|
000005F0: 4F 54 20 46 4F 55 4E 44  22 3A 81 4B B2 31 A4 32  |OT FOUND":.K.1.2|
00000600: 30 30 30 3A 82 3A 89 32  31 36 30 00 2C 0E 34 08  |000:.:.2160.,.4.|
00000610: 8D 33 34 30 3A 8D 33 35  30 3A 4B B2 59 3A 8D 33  |.340:.350:K.Y:.3|
00000620: 32 30 3A 99 22 51 53 4F  23 20 22 59 00 5B 0E 3E  |20:."QSO# "Y.[.>|
00000630: 08 99 3A 99 22 42 2F 43  41 4C 4C 20 20 20 20 20  |..:."B/CALL     |
00000640: 20 47 4D 54 20 20 4E 41  4D 45 20 20 20 20 42 2F  | GMT  NAME    B/|
00000650: 51 54 48 2A 20 50 20 53  45 52 23 00 70 0E 48 08  |QTH* P SER#.p.H.|
00000660: 84 31 2C 52 24 3A 99 52  24 3A A0 31 3A A0 31 35  |.1,R$:.R$:.1:.15|
00000670: 00 AA 0E 52 08 99 22 52  45 41 44 59 20 54 4F 20  |...R.."READY TO |
00000680: 50 52 49 4E 54 20 51 53  4C 20 4C 41 42 45 4C 22  |PRINT QSL LABEL"|
00000690: 3A 99 22 28 59 2F 4E 29  20 20 59 22 3A 85 22 91  |:."(Y/N)  Y":.".|
000006A0: 1D 1D 1D 1D 1D 22 3B 4C  42 24 00 C4 0E 5C 08 8B  |.....";LB$...\..|
000006B0: 4C 42 24 B2 22 4E 22 A7  A0 31 3A A0 31 35 3A 89  |LB$."N"..1:.15:.|
000006C0: 32 30 30 30 00 DA 0E 66  08 9F 34 2C 34 3A 8D 32  |2000...f..4,4:.2|
000006D0: 32 32 30 3A A0 34 3A 99  3A 99 00 07 0F 70 08 99  |220:.4:.:....p..|
000006E0: 22 50 52 49 4E 54 20 41  4E 4F 54 48 45 52 20 51  |"PRINT ANOTHER Q|
000006F0: 53 4C 20 4C 41 42 45 4C  20 46 52 4F 4D 20 54 48  |SL LABEL FROM TH|
00000700: 49 53 20 42 41 4E 44 00  31 0F 7A 08 99 22 28 59  |IS BAND.1.z.."(Y|
00000710: 2F 4E 29 20 20 59 22 3A  85 22 91 1D 1D 1D 1D 1D  |/N)  Y":."......|
00000720: 22 3B 57 24 3A 8B 57 24  B2 22 59 22 A7 32 30 37  |";W$:.W$."Y".207|
00000730: 30 00 3B 0F 84 08 89 32  30 30 30 00 51 0F 8E 08  |0.;....2000.Q...|
00000740: 53 52 24 B2 42 41 24 3A  8D 33 36 30 3A 9F 34 2C  |SR$.BA$:.360:.4,|
00000750: 34 00 85 0F 98 08 8D 33  34 30 3A 81 41 B2 31 A4  |4......340:.A.1.|
00000760: 52 50 25 28 30 29 3A 52  24 B2 22 22 3A 4B B2 52  |RP%(0):R$."":K.R|
00000770: 50 25 28 41 29 3A 8D 33  32 30 3A 8D 33 35 30 3A  |P%(A):.320:.350:|
00000780: 84 31 2C 52 24 00 A1 0F  A2 08 8D 32 32 32 30 3A  |.1,R$......2220:|
00000790: 82 3A A0 31 3A A0 34 3A  A0 31 35 3A 89 32 30 30  |.:.1:.4:.15:.200|
000007A0: 30 00 C4 0F AC 08 98 34  2C 22 20 20 20 54 4F 20  |0......4,"   TO |
000007B0: 52 41 44 49 4F 3A 20 20  20 22 CA 28 52 24 2C 33  |RADIO:   ".(R$,3|
000007C0: 2C 31 30 29 00 F6 0F B6  08 98 34 2C 22 43 4F 4E  |,10)......4,"CON|
000007D0: 46 49 52 4D 49 4E 47 20  51 53 4F 20 4F 4E 20 22  |FIRMING QSO ON "|
000007E0: CA 28 52 24 2C 34 31 2C  32 29 22 20 4D 45 54 45  |.(R$,41,2)" METE|
000007F0: 52 20 22 4D 52 24 00 2B  10 C0 08 98 34 2C 22 44  |R "MR$.+....4,"D|
00000800: 41 54 45 3A 20 22 C8 28  44 41 24 AA 22 20 20 20  |ATE: ".(DA$."   |
00000810: 20 20 22 2C 39 29 22 20  41 54 20 22 CA 28 52 24  |  ",9)" AT ".(R$|
00000820: 2C 31 33 2C 35 29 22 20  55 54 43 00 46 10 CA 08  |,13,5)" UTC.F...|
00000830: 98 34 2C 22 20 52 45 50  4F 52 54 20 22 52 53 24  |.4," REPORT "RS$|
00000840: 22 20 20 54 4E 58 00 55  10 D4 08 98 34 2C C7 28  |"  TNX.U....4,.(|
00000850: 31 33 29 3A 8E 00 76 10  DC 14 57 24 B2 22 3D 22  |13):..v...W$."="|
00000860: 3A 81 57 B2 31 A4 38 30  3A 98 34 2C 57 24 3B 3A  |:.W.1.80:.4,W$;:|
00000870: 82 3A 98 34 3A 8E 00 A1  10 40 1F 99 22 93 20 20  |.:.4:....@..".  |
00000880: 20 20 20 20 20 20 12 52  45 4C 41 54 49 56 45 20  |      .RELATIVE |
00000890: 46 49 4C 45 20 4C 4F 41  44 92 22 3A 99 3A 99 3A  |FILE LOAD.":.:.:|
000008A0: 99 00 EB 10 4A 1F 99 22  54 48 49 53 20 49 53 20  |....J.."THIS IS |
000008B0: 4E 4F 54 20 41 20 4E 4F  52 4D 41 4C 20 50 52 4F  |NOT A NORMAL PRO|
000008C0: 43 45 44 55 52 45 20 52  45 46 45 52 20 20 20 20  |CEDURE REFER    |
000008D0: 54 4F 20 49 4E 53 54 52  55 43 54 49 4F 4E 53 20  |TO INSTRUCTIONS |
000008E0: 46 4F 52 20 49 54 53 20  55 53 45 00 1A 11 54 1F  |FOR ITS USE...T.|
000008F0: 99 3A 99 3A 99 22 41 52  45 20 59 4F 55 20 53 55  |.:.:."ARE YOU SU|
00000900: 52 45 20 28 59 2F 4E 29  22 3A 85 57 24 3A 8B 57  |RE (Y/N)":.W$:.W|
00000910: 24 B2 22 4E 22 A7 39 37  37 30 00 4D 11 5E 1F 99  |$."N".9770.M.^..|
00000920: 3A 99 3A 99 22 23 20 4F  46 20 51 53 4F 27 53 20  |:.:."# OF QSO'S |
00000930: 54 4F 20 42 45 20 4C 4F  41 44 45 44 20 4F 52 20  |TO BE LOADED OR |
00000940: 28 30 29 20 4C 4F 41 44  53 20 41 4C 4C 00 73 11  |(0) LOADS ALL.s.|
00000950: 68 1F 85 22 45 4E 54 45  52 20 4E 55 4D 42 45 52  |h.."ENTER NUMBER|
00000960: 22 3B 47 3A 99 3A 99 3A  8B 47 B2 2E A7 47 B2 32  |";G:.:.:.G...G.2|
00000970: 35 30 30 00 8C 11 72 1F  85 22 53 54 41 52 54 20  |500...r.."START |
00000980: 4C 4F 41 44 20 41 54 20  23 22 3B 59 00 BD 11 7C  |LOAD AT #";Y...||
00000990: 1F 8D 33 33 30 3A 81 41  B2 59 A4 47 3A 8D 33 38  |..330:.A.Y.G:.38|
000009A0: 30 3A 4B B2 41 3A 8D 33  32 30 3A 84 31 2C 52 24  |0:K.A:.320:.1,R$|
000009B0: 3A 8B 52 24 B2 22 FF 22  A7 39 37 36 30 00 F7 11  |:.R$.".".9760...|
000009C0: 86 1F 54 B2 54 AA 31 3A  59 B2 54 3A 8D 39 39 30  |..T.T.1:Y.T:.990|
000009D0: 3A 8B CA 28 52 24 2C 33  31 2C 31 29 B2 22 2A 22  |:..(R$,31,1)."*"|
000009E0: A7 56 B2 56 AA 31 3A 55  24 28 56 29 B2 CA 28 52  |.V.V.1:U$(V)..(R|
000009F0: 24 2C 32 35 2C 35 29 00  19 12 8B 1F 57 57 B2 C5  |$,25,5).....WW..|
00000A00: 28 CA 28 52 24 2C 33 33  2C 31 29 3A 51 50 B2 51  |(.(R$,33,1):QP.Q|
00000A10: 50 AA 57 57 3A 57 57 B2  2E 00 35 12 90 1F 99 41  |P.WW:WW...5....A|
00000A20: 3B C7 28 31 34 35 29 3A  8D 33 39 30 3A 82 41 3A  |;.(145):.390:.A:|
00000A30: 89 39 37 36 30 00 40 12  20 26 A0 31 3A A0 31 35  |.9760.@. &.1:.15|
00000A40: 00 6A 12 2A 26 99 3A 99  3A 99 22 52 45 4C 4F 41  |.j.*&.:.:."RELOA|
00000A50: 44 49 4E 47 20 50 52 4F  47 52 41 4D 20 20 2D 20  |DING PROGRAM  - |
00000A60: 50 4C 45 41 53 45 20 51  52 58 00 9A 12 34 26 43  |PLEASE QRX...4&C|
00000A70: 39 B2 31 3A 41 24 28 31  29 B2 C8 28 41 24 28 31  |9.1:A$(1)..(A$(1|
00000A80: 29 2C 28 C3 28 41 24 28  31 29 29 AB 31 29 29 3A  |),(.(A$(1)).1)):|
00000A90: 93 20 41 24 28 31 29 2C  47 46 00 00 00           |. A$(1),GF...   |
..M.... COPYRIGHT 1988, JAMES W. MCCLELL
AN, 3304 JO ANN AVE., OMAHA, NE 68123.V.
..GF.8.E....C4...8000.T....C4.2.2000...@
.HB..(K.256):LB.K.HB.256...J..15,"P".G(9
8).G(LB).G(HB).G(1):..W.T..15,8,15:.1,8,
2,"CAL QSO,L":....^.R$."":SR$."":W$."":.
...H.ND%.T:.828,0:.49152:SE,E,C$().:../.
|..55,B(51):.56,B(52):..P...Z..(0):.55,B
(55):.56,B(56):..M....".. SELECT DESIRED
 BAND......:."1. 10PH":."2. 10CW":."3. 1
5PH":."4. 15CW":."5. 20PH......"6. 20CW"
:."7. 40PH":."8. 40CW":."9. 75PH":."10. 
80CW......"11. 160PH":."12. 160CW.:....:
."CURRENT BAND "BB$:.:.:."ENTER 1 - 12";
C:.C.0.400.X....C.1.BA$."!P":BB$."10 SSB
.U....C.2.BA$."!C":BB$."10 CW......C.3.B
A$."#P":BB$."15 SSB......C.4.BA$."#C":BB
$."15 CW.N....C.5.BA$."$P":BB$."20 SSB..
....C.6.BA$."$C":BB$."20 CW...B..C.7.BA$
."%P":BB$."40 SSB.&.G..C.8.BA$."%C":BB$.
"40 CW.D.H..C.9.BA$."&P":BB$."75 SSB.B.I
..C.10.BA$."&C":BB$."80 CW...J..C.11.BA$
."'P":BB$."160 SSB...K..C.12.BA$."'C":BB
$."160 CW...Q.MO$."C":.X.2.MO$."P...V...
....NS.1:.J(R$,17,1)."*".C$(Y).H(R$,2)."
ZZZZ":......C$(Y).H(R$,11):.M.6.11.3....
J(C$(Y),M,1)." ".C$(Y).H(C$(Y),M.1).S...
.C(C$(Y)).8.C$(Y).C$(Y)." ".[....:....P.
.".PRINT QSL LABELS FOR":.:."1. ENTIRE B
AND":."2. INDIVIDUAL CALLSIGN.B.Z.."3. R
ETURN TO MAIN MENU......:."(1, 2 OR 3)";
X:.:...... 4:.X.2.9770......400:.I(BA$,1
)."P".MR$."SSB":RS$."59 ".=....I(BA$,1).
"C".MR$."CW":RS$."599.R....:."DATE";DA$:
DA$.H(DA$."         ",9):.X.1.2190......
".":.:.:."CALL";SR$:SR$.BA$.SR$:.C(SR$).
8.SR$.SR$." ".X. ..360:.RP%(0).0.Y.RP%(1
):."QSO#"Y:.2100...*..".":..251)".CALL N
OT FOUND":.K.1.2000:.:.2160.,.4..340:.35
0:K.Y:.320:."QSO# "Y.[.>..:."B/CALL     
 GMT  NAME    B/QTH* P SER#.P.H..1,R$:.R
$: 1: 15...R.."READY TO PRINT QSL LABEL"
:."(Y/N)  Y":."......";LB$.D.\..LB$."N".
 1: 15:.2000.Z.F..4,4:.2220: 4:.:....P..
"PRINT ANOTHER QSL LABEL FROM THIS BAND.
1.Z.."(Y/N)  Y":."......";W$:.W$."Y".207
0.;....2000.Q...SR$.BA$:.360:.4,4......3
40:.A.1.RP%(0):R$."":K.RP%(A):.320:.350:
.1,R$......2220:.: 1: 4: 15:.2000.D....4
,"   TO RADIO:   "J(R$,3,10)......4,"CON
FIRMING QSO ON "J(R$,41,2)" METER "MR$.+
....4,"DATE: "H(DA$."     ",9)" AT "J(R$
,13,5)" UTC.F.J..4," REPORT "RS$"  TNX.U
.T..4,G(13):..V...W$."=":.W.1.80:.4,W$;:
.:.4:....@..".        .RELATIVE FILE LOA
D.":.:.:....J.."THIS IS NOT A NORMAL PRO
CEDURE REFER    TO INSTRUCTIONS FOR ITS 
USE...T..:.:."ARE YOU SURE (Y/N)":.W$:.W
$."N".9770.M.^..:.:."# OF QSO'S TO BE LO
ADED OR (0) LOADS ALL.S.H.."ENTER NUMBER
";G:.:.:.G...G.2500...R.."START LOAD AT 
#";Y...|..330:.A.Y.G:.380:K.A:.320:.1,R$
:.R$.".".9760.....T.T.1:Y.T:.990:.J(R$,3
1,1)."*".V.V.1:U$(V).J(R$,25,5).....WW.E
(J(R$,33,1):QP.QP.WW:WW...5....A;G(145):
.390:.A:.9760.@. & 1: 15.J.*&.:.:."RELOA
DING PROGRAM  - PLEASE QRX...4&C9.1:A$(1
).H(A$(1),(C(A$(1)).1)):. A$(1),GF...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL