CALL STRING

FILE INFORMATION

FILENAME(S): CALL STRING

FILE TYPE(S): PRG

FILE SIZE: 1.5K

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

APPEARS ON: 2 disk(s)

FILE HASH

60f8feba31fd383ad0c3b664c1d5f707428d37a3cae90e149083f4dcc5d39650

FOUND ON DISKS (2 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
COMTESTER V2 0	CALL STRING	PRG	Sailor, Ganheden	29	0	DOWNLOAD FILE
COMTESTER V2 0	CALL STRING	PRG	Sailor, Ganheden	31	9	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 4D 08 0A 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: 0F 00 58 41 B2 32 00 70  08 10 00 8B C8 28 41 24  |..XA.2.p.....(A$|
00000060: 28 31 29 2C 32 29 B2 22  53 53 22 A7 58 41 B2 31  |(1),2)."SS".XA.1|
00000070: 00 8A 08 11 00 8B C8 28  41 24 28 31 29 2C 32 29  |.......(A$(1),2)|
00000080: B2 22 43 48 22 A7 58 41  B2 31 00 A5 08 12 00 8B  |."CH".XA.1......|
00000090: C8 28 41 24 28 31 29 2C  33 29 B2 22 43 41 4C 22  |.(A$(1),3)."CAL"|
000000A0: A7 58 41 B2 33 00 AE 08  14 00 47 46 B2 38 00 B6  |.XA.3.....GF.8..|
000000B0: 08 1E 00 99 22 93 00 E5  08 28 00 99 22 45 4E 54  |...."....(.."ENT|
000000C0: 45 52 20 43 41 4C 4C 20  53 54 52 49 4E 47 2C 20  |ER CALL STRING, |
000000D0: 4F 52 20 54 59 50 45 20  2A 2A 2A 20 54 4F 20 52  |OR TYPE *** TO R|
000000E0: 45 54 55 52 4E 00 F8 08  2D 00 99 22 54 4F 20 4D  |ETURN...-.."TO M|
000000F0: 41 49 4E 20 4D 45 4E 55  00 0E 09 2F 00 99 3A 85  |AIN MENU.../..:.|
00000100: 53 52 24 3A 8B 53 52 24  B2 22 22 A7 34 30 00 21  |SR$:.SR$."".40.!|
00000110: 09 32 00 8B 53 52 24 B2  22 2A 2A 2A 22 A7 33 32  |.2..SR$."***".32|
00000120: 30 00 58 09 3C 00 8D 33  33 30 3A 8B 52 50 25 28  |0.X.<..330:.RP%(|
00000130: 30 29 B2 30 A7 99 22 93  12 20 2D 20 52 45 53 45  |0).0..".. - RESE|
00000140: 4C 45 43 54 20 4E 45 57  20 4F 50 54 49 4F 4E 22  |LECT NEW OPTION"|
00000150: 3A 99 3A 99 3A 89 34 30  00 85 09 46 00 99 3A 99  |:.:.:.40...F..:.|
00000160: 3A 99 52 50 25 28 30 29  22 20 2D 20 20 22 53 52  |:.RP%(0)" -  "SR|
00000170: 24 22 20 43 41 4C 4C 20  53 54 52 49 4E 47 53 20  |$" CALL STRINGS |
00000180: 46 4F 55 4E 44 00 BA 09  50 00 99 3A 99 3A 99 22  |FOUND...P..:.:."|
00000190: 53 45 4E 44 20 4F 55 54  50 55 54 20 54 4F 20 54  |SEND OUTPUT TO T|
000001A0: 48 45 20 12 50 92 52 49  4E 54 45 52 20 4F 52 20  |HE .P.RINTER OR |
000001B0: 12 53 92 43 52 45 45 4E  20 3F 00 D8 09 5A 00 99  |.S.CREEN ?...Z..|
000001C0: 3A 99 3A 99 22 45 4E 54  45 52 20 28 50 20 4F 52  |:.:."ENTER (P OR|
000001D0: 20 53 29 22 3A 49 B2 31  00 EB 09 64 00 A1 57 24  | S)":I.1...d..W$|
000001E0: 3A 8B 57 24 B2 22 22 A7  31 30 30 00 FB 09 6E 00  |:.W$."".100...n.|
000001F0: 8B 57 24 B2 22 50 22 A7  32 38 30 00 1C 0A 78 00  |.W$."P".280...x.|
00000200: 99 22 93 12 51 53 4F 23  20 20 20 20 43 41 4C 4C  |."..QSO#    CALL|
00000210: 53 49 47 4E 20 20 20 20  42 41 4E 44 00 51 0A 82  |SIGN    BAND.Q..|
00000220: 00 81 53 B2 49 A4 49 AA  31 39 3A 99 52 50 25 28  |..S.I.I.19:.RP%(|
00000230: 53 29 3B 22 20 20 20 22  CA 28 43 24 28 52 50 25  |S);"   ".(C$(RP%|
00000240: 28 53 29 29 2C 58 41 2C  31 30 29 3B 3A 8D 32 31  |(S)),XA,10);:.21|
00000250: 30 00 62 0A 84 00 8B 58  41 B2 31 A7 99 3A 89 31  |0.b....XA.1..:.1|
00000260: 34 30 00 88 0A 85 00 8B  58 41 B2 33 A7 99 22 20  |40......XA.3.." |
00000270: 20 22 CA 28 43 24 28 52  50 25 28 53 29 29 2C 32  | ".(C$(RP%(S)),2|
00000280: 2C 31 29 3A 89 31 34 30  00 9F 0A 87 00 99 22 20  |,1):.140......" |
00000290: 20 20 20 22 43 43 24 22  20 4D 45 54 45 52 53 00  |   "CC$" METERS.|
000002A0: D5 0A 8C 00 8B 53 B2 52  50 25 28 30 29 A7 99 22  |.....S.RP%(0).."|
000002B0: 12 54 4F 54 41 4C 20 22  53 52 24 22 20 43 41 4C  |.TOTAL "SR$" CAL|
000002C0: 4C 20 53 54 52 49 4E 47  20 51 53 4F 53 20 22 52  |L STRING QSOS "R|
000002D0: 50 25 28 30 29 00 06 0B  96 00 8B 53 B2 52 50 25  |P%(0)......S.RP%|
000002E0: 28 30 29 A7 81 58 B2 31  A4 52 50 25 28 30 29 3A  |(0)..X.1.RP%(0):|
000002F0: 52 50 25 28 58 29 B2 2E  3A 82 3A 53 52 24 B2 22  |RP%(X)..:.:SR$."|
00000300: 22 3A 89 31 38 30 00 2E  0B A0 00 82 3A 85 22 12  |":.180......:.".|
00000310: 56 49 45 57 20 4D 4F 52  45 20 28 59 2F 4E 29 22  |VIEW MORE (Y/N)"|
00000320: 3B 59 24 3A 8B 59 24 B2  22 4E 22 A7 33 30 00 3E  |;Y$:.Y$."N".30.>|
00000330: 0B AA 00 49 B2 49 AA 32  30 3A 89 31 32 30 00 5D  |...I.I.20:.120.]|
00000340: 0B B4 00 99 22 12 48 49  54 20 41 4E 59 20 4B 45  |....".HIT ANY KE|
00000350: 59 20 54 4F 20 43 4F 4E  54 49 4E 55 45 00 70 0B  |Y TO CONTINUE.p.|
00000360: BE 00 A1 57 24 3A 8B 57  24 B2 22 22 A7 31 39 30  |...W$:.W$."".190|
00000370: 00 78 0B C8 00 89 33 30  00 99 0B D2 00 8B C8 28  |.x....30.......(|
00000380: 43 24 28 52 50 25 28 53  29 29 2C 31 29 B2 22 21  |C$(RP%(S)),1)."!|
00000390: 22 A7 43 43 24 B2 22 31  30 00 BA 0B DC 00 8B C8  |".CC$."10.......|
000003A0: 28 43 24 28 52 50 25 28  53 29 29 2C 31 29 B2 22  |(C$(RP%(S)),1)."|
000003B0: 23 22 A7 43 43 24 B2 22  31 35 00 DB 0B E6 00 8B  |#".CC$."15......|
000003C0: C8 28 43 24 28 52 50 25  28 53 29 29 2C 31 29 B2  |.(C$(RP%(S)),1).|
000003D0: 22 24 22 A7 43 43 24 B2  22 32 30 00 FC 0B F0 00  |"$".CC$."20.....|
000003E0: 8B C8 28 43 24 28 52 50  25 28 53 29 29 2C 31 29  |..(C$(RP%(S)),1)|
000003F0: B2 22 25 22 A7 43 43 24  B2 22 34 30 00 1D 0C FA  |."%".CC$."40....|
00000400: 00 8B C8 28 43 24 28 52  50 25 28 53 29 29 2C 31  |...(C$(RP%(S)),1|
00000410: 29 B2 22 26 22 A7 43 43  24 B2 22 38 30 00 3F 0C  |)."&".CC$."80.?.|
00000420: 04 01 8B C8 28 43 24 28  52 50 25 28 53 29 29 2C  |....(C$(RP%(S)),|
00000430: 31 29 B2 22 27 22 A7 43  43 24 B2 22 31 36 30 00  |1)."'".CC$."160.|
00000440: 60 0C 07 01 8B C8 28 43  24 28 52 50 25 28 53 29  |`.....(C$(RP%(S)|
00000450: 29 2C 31 29 B2 22 28 22  A7 43 43 24 B2 22 50 48  |),1)."(".CC$."PH|
00000460: 00 81 0C 08 01 8B C8 28  43 24 28 52 50 25 28 53  |.......(C$(RP%(S|
00000470: 29 29 2C 31 29 B2 22 29  22 A7 43 43 24 B2 22 43  |)),1).")".CC$."C|
00000480: 57 00 87 0C 0E 01 8E 00  D7 0C 18 01 9F 34 2C 34  |W............4,4|
00000490: 3A 8D 33 34 30 3A 45 B2  2E 3A 81 53 B2 31 A4 52  |:.340:E..:.S.1.R|
000004A0: 50 25 28 30 29 3A 4A 24  B2 C4 28 52 50 25 28 53  |P%(0):J$..(RP%(S|
000004B0: 29 29 3A 4A 24 B2 C8 28  4A 24 AA 22 20 20 20 20  |)):J$..(J$."    |
000004C0: 20 22 2C 35 29 3A 45 B2  45 AA 31 3A 8B 45 B1 33  | ",5):E.E.1:.E.3|
000004D0: A7 98 34 3A 45 B2 31 00  EB 0C 22 01 8B 45 B1 31  |..4:E.1..."..E.1|
000004E0: A7 98 34 2C 22 20 20 2F  20 22 3B 00 18 0D 2C 01  |..4,"  / ";...,.|
000004F0: 98 34 2C 4A 24 CA 28 43  24 28 52 50 25 28 53 29  |.4,J$.(C$(RP%(S)|
00000500: 29 AA 22 20 20 20 20 20  20 20 22 2C 58 41 2C 31  |)."       ",XA,1|
00000510: 30 29 3B 3A 8D 32 31 30  00 36 0D 2E 01 8B 58 41  |0);:.210.6....XA|
00000520: B2 31 A7 98 34 2C 22 20  20 20 20 20 20 20 20 22  |.1..4,"        "|
00000530: 3B 3A 89 33 30 36 00 50  0D 31 01 98 34 2C 43 43  |;:.306.P.1..4,CC|
00000540: 24 22 20 4D 54 52 53 22  3B 3A 43 43 24 B2 22 22  |$" MTRS";:CC$.""|
00000550: 00 5E 0D 32 01 82 3A 98  34 3A 8D 33 34 30 00 9B  |.^.2..:.4:.340..|
00000560: 0D 36 01 98 34 2C 22 54  4F 54 41 4C 20 22 53 52  |.6..4,"TOTAL "SR|
00000570: 24 22 20 43 41 4C 4C 20  53 54 52 49 4E 47 20 51  |$" CALL STRING Q|
00000580: 53 4F 53 20 22 52 50 25  28 30 29 3A 98 34 3A 98  |SOS "RP%(0):.4:.|
00000590: 34 3A 98 34 3A A0 34 3A  89 33 30 00 BE 0D 40 01  |4:.4:.4:.30...@.|
000005A0: 43 39 B2 31 3A 93 C8 28  41 24 28 31 29 2C 28 C3  |C9.1:..(A$(1),(.|
000005B0: 28 41 24 28 31 29 29 AB  31 29 29 2C 47 46 00 E3  |(A$(1)).1)),GF..|
000005C0: 0D 4A 01 4E 44 25 B2 54  3A 97 38 32 38 2C 30 3A  |.J.ND%.T:.828,0:|
000005D0: 9E 34 39 31 35 32 3A 53  45 2C 45 2C 43 24 28 29  |.49152:SE,E,C$()|
000005E0: 2E 3A 8E 00 04 0E 54 01  57 24 B2 22 3D 22 3A 81  |.:....T.W$."=":.|
000005F0: 57 B2 31 A4 37 38 3A 98  34 2C 57 24 3B 3A 82 3A  |W.1.78:.4,W$;:.:|
00000600: 98 34 3A 8E 00 00 00                              |.4:....         |

..M.... COPYRIGHT 1988, JAMES W. MCCLELL
AN, 3304 JO ANN AVE., OMAHA, NE 68123.V.
..XA.2.P....H(A$(1),2)."SS".XA.1......H(
A$(1),2)."CH".XA.1......H(A$(1),3)."CAL"
.XA.3.....GF.8......"....(.."ENTER CALL 
STRING, OR TYPE *** TO RETURN...-.."TO M
AIN MENU.../..:.SR$:.SR$."".40.!.2..SR$.
"***".320.X.<..330:.RP%(0).0..".. - RESE
LECT NEW OPTION":.:.:.40...F..:.:.RP%(0)
" -  "SR$" CALL STRINGS FOUND...P..:.:."
SEND OUTPUT TO THE .P.RINTER OR .S.CREEN
 ?.X.Z..:.:."ENTER (P OR S)":I.1...D..W$
:.W$."".100...N..W$."P".280...X.."..QSO#
    CALLSIGN    BAND.Q....S.I.I.19:.RP%(
S);"   "J(C$(RP%(S)),XA,10);:.210.B....X
A.1..:.140......XA.3.."  "J(C$(RP%(S)),2
,1):.140......"    "CC$" METERS.U....S.R
P%(0)..".TOTAL "SR$" CALL STRING QSOS "R
P%(0)......S.RP%(0)..X.1.RP%(0):RP%(X)..
:.:SR$."":.180... ..:.".VIEW MORE (Y/N)"
;Y$:.Y$."N".30.>...I.I.20:.120.]....".HI
T ANY KEY TO CONTINUE.P....W$:.W$."".190
.X.H..30...R..H(C$(RP%(S)),1)."!".CC$."1
0......H(C$(RP%(S)),1)."#".CC$."15......
H(C$(RP%(S)),1)."$".CC$."20......H(C$(RP
%(S)),1)."%".CC$."40......H(C$(RP%(S)),1
)."&".CC$."80.?....H(C$(RP%(S)),1)."'".C
C$."160.`....H(C$(RP%(S)),1)."(".CC$."PH
......H(C$(RP%(S)),1).")".CC$."CW.......
W....4,4:.340:E..:.S.1.RP%(0):J$.D(RP%(S
)):J$.H(J$."     ",5):E.E.1:.E.3..4:E.1.
.."..E.1..4,"  / ";...,..4,J$J(C$(RP%(S)
)."       ",XA,10);:.210.6....XA.1..4," 
       ";:.306.P.1..4,CC$" MTRS";:CC$.""
.^.2..:.4:.340...6..4,"TOTAL "SR$" CALL 
STRING QSOS "RP%(0):.4:.4:.4: 4:.30...@.
C9.1:.H(A$(1),(C(A$(1)).1)),GF...J.ND%.T
:.828,0:.49152:SE,E,C$().:....T.W$."=":.
W.1.78:.4,W$;:.:.4:....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL