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

QTH AFAZ

FILE INFORMATION

FILENAME(S): QTH AFAZ

FILE TYPE(S): PRG

FILE SIZE: 1.8K

FIRST SEEN: 2025-12-02 02:15:05

APPEARS ON: 1 disk(s)

FILE HASH

ec78d7dfe097367090b6a604629a7bf283f384d3bc33f8a36a4d926e9392f241

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
PAKKET WIS WET QTH AFAZ PRG The BAM Archive 10 7 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 28 08 0A 00 8F 2A  20 51 54 48 2D 4C 4F 43  |..(....* QTH-LOC|
00000010: 41 54 4F 52 3A 20 41 46  53 54 41 4E 44 26 52 49  |ATOR: AFSTAND&RI|
00000020: 43 48 54 49 4E 47 20 2A  00 4F 08 14 00 8F 2A 20  |CHTING *.O....* |
00000030: 56 4F 4F 52 20 4D 41 49  44 45 4E 48 45 41 44 20  |VOOR MAIDENHEAD |
00000040: 4C 4F 43 41 54 4F 52 20  20 20 20 20 20 20 2A 00  |LOCATOR       *.|
00000050: 76 08 1E 00 8F 2A 20 56  4F 4C 47 45 4E 53 20 4F  |v....* VOLGENS O|
00000060: 4E 37 4C 4E 20 20 4C 45  4F 4E 20 20 20 20 20 20  |N7LN  LEON      |
00000070: 20 20 20 20 20 2A 00 9D  08 28 00 8F 2A 20 4D 4F  |     *...(..* MO|
00000080: 44 49 46 49 43 41 54 49  45 20 56 4F 4F 52 20 43  |DIFICATIE VOOR C|
00000090: 4D 44 20 36 34 20 20 20  20 20 20 20 2A 00 C4 08  |MD 64       *...|
000000A0: 32 00 8F 2A 20 44 4F 4F  52 20 4F 4E 37 57 58 20  |2..* DOOR ON7WX |
000000B0: 20 47 4F 4D 4D 41 49 52  45 20 20 20 20 20 20 20  | GOMMAIRE       |
000000C0: 20 20 20 2A 00 EB 08 3C  00 8F 2A 20 4D 45 43 48  |   *...<..* MECH|
000000D0: 45 4C 45 4E 20 4A 55 4C  49 20 20 31 39 38 34 20  |ELEN JULI  1984 |
000000E0: 20 20 20 20 20 20 20 20  20 20 2A 00 12 09 46 00  |          *...F.|
000000F0: 99 22 13 22 3A 50 49 B2  33 2E 31 34 31 35 39 32  |.".":PI.3.141592|
00000100: 36 3A 52 41 B2 50 49 AD  31 38 30 3A 50 B2 31 AD  |6:RA.PI.180:P.1.|
00000110: 52 41 00 38 09 50 00 47  24 B2 22 42 3D 35 31 2E  |RA.8.P.G$."B=51.|
00000120: 30 32 30 37 4E 20 20 4C  3D 34 2E 33 30 30 35 45  |0207N  L=4.3005E|
00000130: 20 28 44 2E 4D 53 29 22  00 71 09 64 00 41 31 B2  | (D.MS)".q.d.A1.|
00000140: 30 3A 54 B2 30 3A 59 24  B2 22 22 3A 99 22 93 22  |0:T.0:Y$."":."."|
00000150: 3A 99 22 41 46 53 54 41  4E 44 20 54 55 53 53 45  |:."AFSTAND TUSSE|
00000160: 4E 20 51 54 48 2D 4C 4F  43 41 54 4F 52 53 22 3A  |N QTH-LOCATORS":|
00000170: 99 00 9B 09 6E 00 51 24  B2 22 22 3A 85 22 47 45  |....n.Q$."":."GE|
00000180: 45 46 20 4A 45 20 45 49  47 45 4E 20 51 54 48 2D  |EF JE EIGEN QTH-|
00000190: 4C 4F 43 41 54 4F 52 22  3B 51 24 00 CD 09 78 00  |LOCATOR";Q$...x.|
000001A0: 8B 51 24 B2 22 22 A7 51  24 B2 22 4A 4F 32 31 47  |.Q$."".Q$."JO21G|
000001B0: 41 22 20 27 56 55 4C 20  48 49 45 52 20 45 49 47  |A" 'VUL HIER EIG|
000001C0: 45 4E 20 51 54 48 AB 4C  4F 43 20 49 4E 00 E2 09  |EN QTH.LOC IN...|
000001D0: 96 00 8D 35 30 30 3A 8B  46 24 B2 22 46 22 A7 31  |...500:.F$."F".1|
000001E0: 31 30 00 FB 09 9B 00 59  24 B2 51 24 3A 8D 34 34  |10.....Y$.Q$:.44|
000001F0: 30 3A 4C 31 B2 4C 3A 42  31 B2 4D 00 29 0A A0 00  |0:L1.L:B1.M.)...|
00000200: 4E 31 B2 4C AD 50 3A 58  B2 4C 3A 8D 36 30 30 3A  |N1.L.P:X.L:.600:|
00000210: 4C 31 B2 58 3A 4F 31 B2  4D AD 50 3A 58 B2 4D 3A  |L1.X:O1.M.P:X.M:|
00000220: 8D 36 30 30 3A 42 31 B2  58 00 5D 0A AA 00 99 22  |.600:B1.X.]...."|
00000230: 93 22 3A 4E B2 4E 31 3A  4F B2 4F 31 3A 99 22 41  |.":N.N1:O.O1:."A|
00000240: 46 53 54 41 4E 44 20 54  55 53 53 45 4E 20 51 54  |FSTAND TUSSEN QT|
00000250: 48 2D 4C 4F 43 41 54 4F  52 53 22 3A 99 00 81 0A  |H-LOCATORS":....|
00000260: B4 00 99 22 45 49 47 45  4E 20 51 54 48 2D 4C 4F  |..."EIGEN QTH-LO|
00000270: 43 41 54 4F 52 3D 20 22  51 24 3A 99 3B 47 24 3A  |CATOR= "Q$:.;G$:|
00000280: 99 00 A8 0A BE 00 99 54  41 42 32 37 22 57 20 3D  |.......TAB27"W =|
00000290: 20 45 49 47 45 4E 20 51  54 48 2D 4C 4F 43 20 57  | EIGEN QTH-LOC W|
000002A0: 49 4A 5A 49 47 45 4E 22  00 C2 0A C8 00 99 54 41  |IJZIGEN"......TA|
000002B0: 42 32 37 22 53 20 3D 20  53 54 4F 50 50 45 4E 22  |B27"S = STOPPEN"|
000002C0: 3A 99 00 EB 0A D2 00 51  24 B2 22 22 3A 85 22 44  |:......Q$."":."D|
000002D0: 45 20 41 4E 44 45 52 45  20 51 54 48 2D 4C 4F 43  |E ANDERE QTH-LOC|
000002E0: 41 54 4F 52 20 3D 20 22  3B 51 24 00 FB 0A DC 00  |ATOR = ";Q$.....|
000002F0: 8B 51 24 B2 22 57 22 A7  31 30 30 00 0B 0B E1 00  |.Q$."W".100.....|
00000300: 8B 51 24 B2 22 53 22 A7  36 35 30 00 20 0B E6 00  |.Q$."S".650. ...|
00000310: 8D 35 30 30 3A 8B 46 24  B2 22 46 22 A7 32 31 30  |.500:.F$."F".210|
00000320: 00 51 0B F0 00 8D 34 34  30 3A 52 B2 4C AD 50 3A  |.Q....440:R.L.P:|
00000330: 58 B2 4C 3A 8D 36 30 30  3A 4C 32 B2 58 3A 53 B2  |X.L:.600:L2.X:S.|
00000340: 4D AD 50 3A 58 B2 4D 3A  8D 36 30 30 3A 42 32 B2  |M.P:X.M:.600:B2.|
00000350: 58 00 65 0B FA 00 99 3B  22 42 3D 22 42 32 2C 22  |X.e....;"B="B2,"|
00000360: 4C 3D 22 4C 32 00 8D 0B  04 01 99 22 49 4E 44 49  |L="L2......"INDI|
00000370: 45 4E 20 5B 2D 5D 20 4C  45 45 53 20 5B 5A 55 49  |EN [-] LEES [ZUI|
00000380: 44 5D 20 4F 46 20 5B 57  45 53 54 5D 22 00 AE 0B  |D] OF [WEST]"...|
00000390: 0E 01 56 B2 BF 28 4F 29  AC BF 28 53 29 AA BE 28  |..V..(O)..(S)..(|
000003A0: 4F 29 AC BE 28 53 29 AC  BE 28 52 AB 4E 29 00 E4  |O)..(S)..(R.N)..|
000003B0: 0B 18 01 58 B2 31 2E 35  37 30 38 AB C1 28 56 AD  |...X.1.5708..(V.|
000003C0: BA 28 31 AB 56 AC 56 29  29 3A 58 B2 B5 28 58 AC  |.(1.V.V)):X..(X.|
000003D0: 31 31 31 2E 31 38 AC 50  AA 2E 35 29 3A 41 31 B2  |111.18.P..5):A1.|
000003E0: 41 31 AA 58 00 F4 0B 2C  01 99 3A 8B 4E B3 B1 52  |A1.X...,..:.N..R|
000003F0: A7 33 32 30 00 09 0C 31  01 41 5A B2 30 3A 8B 4F  |.320...1.AZ.0:.O|
00000400: B1 53 A7 41 5A B2 31 38  30 00 12 0C 36 01 89 33  |.S.AZ.180...6..3|
00000410: 35 30 00 25 0C 40 01 41  41 B2 BF 28 53 29 AB 56  |50.%.@.AA..(S).V|
00000420: AC BF 28 4F 29 00 4D 0C  4A 01 41 43 B2 C1 28 BF  |..(O).M.J.AC..(.|
00000430: 28 52 AB 4E 29 AC BE 28  53 29 AC BE 28 4F 29 AD  |(R.N)..(S)..(O).|
00000440: 41 41 29 AA 50 49 AC 28  41 41 B3 30 29 00 77 0C  |AA).PI.(AA.0).w.|
00000450: 54 01 41 5A B2 28 41 43  AB 28 50 49 AA 50 49 29  |T.AZ.(AC.(PI.PI)|
00000460: AC 28 41 43 B3 30 29 29  AD 52 41 3A 41 5A B2 B5  |.(AC.0)).RA:AZ..|
00000470: 28 41 5A AA 2E 35 29 00  AC 0C 5E 01 54 B2 54 AA  |(AZ..5)...^.T.T.|
00000480: 31 3A 99 22 44 45 20 41  46 53 54 41 4E 44 20 49  |1:."DE AFSTAND I|
00000490: 53 20 22 58 22 20 4B 4D  22 3B 22 1D 41 41 4E 54  |S "X" KM";".AANT|
000004A0: 41 4C 20 51 53 4F 27 53  20 3D 22 54 00 CA 0C 68  |AL QSO'S ="T...h|
000004B0: 01 99 22 52 49 43 48 54  49 4E 47 20 3D 20 22 41  |.."RICHTING = "A|
000004C0: 5A 22 20 47 52 41 44 45  4E 22 00 EC 0C 72 01 99  |Z" GRADEN"...r..|
000004D0: 22 44 45 20 54 4F 54 41  41 4C 41 46 53 54 41 4E  |"DE TOTAALAFSTAN|
000004E0: 44 20 3D 22 41 31 22 20  4B 4D 22 2C 00 13 0D 7C  |D ="A1" KM",...||
000004F0: 01 99 22 47 45 4D 49 44  44 45 4C 44 45 20 41 46  |.."GEMIDDELDE AF|
00000500: 53 54 41 4E 44 20 3D 22  B5 28 41 31 AD 54 29 22  |STAND =".(A1.T)"|
00000510: 4B 4D 22 00 4B 0D 90 01  99 22 56 4F 4F 52 20 56  |KM".K...."VOOR V|
00000520: 45 52 56 4F 4C 47 20 2C  20 20 20 20 20 20 54 4F  |ERVOLG ,      TO|
00000530: 45 54 53 20 20 20 20 20  5B 52 45 54 55 52 4E 5D  |ETS     [RETURN]|
00000540: 22 3B 3A 85 49 24 3A 89  31 37 30 00 7D 0D B8 01  |";:.I$:.170.}...|
00000550: 4C B2 28 41 28 31 29 AB  36 35 29 AC 32 30 AA 28  |L.(A(1).65).20.(|
00000560: 41 28 33 29 AB 34 38 29  AC 32 AA 28 41 28 35 29  |A(3).48).2.(A(5)|
00000570: AB 36 34 2E 35 29 AD 31  32 AB 31 38 30 00 AC 0D  |.64.5).12.180...|
00000580: C2 01 4D B2 28 41 28 32  29 AB 36 35 29 AC 31 30  |..M.(A(2).65).10|
00000590: AA 28 41 28 34 29 AB 34  38 29 AA 28 41 28 36 29  |.(A(4).48).(A(6)|
000005A0: AB 36 34 2E 35 29 AD 32  34 AB 39 30 00 B2 0D C7  |.64.5).24.90....|
000005B0: 01 8E 00 CA 0D F4 01 8B  51 24 B2 59 24 B0 C3 28  |........Q$.Y$..(|
000005C0: 51 24 29 B3 B1 36 A7 35  38 30 00 E9 0D F9 01 81  |Q$)..6.580......|
000005D0: 4B B2 31 A4 36 3A 41 28  4B 29 B2 C6 28 CA 28 51  |K.1.6:A(K)..(.(Q|
000005E0: 24 2C 4B 2C 31 29 29 3A  82 00 02 0E FE 01 8B 41  |$,K,1)):.......A|
000005F0: 28 31 29 B3 36 35 B0 41  28 31 29 B1 38 32 A7 35  |(1).65.A(1).82.5|
00000600: 38 30 00 1B 0E 08 02 8B  41 28 32 29 B3 36 35 B0  |80......A(2).65.|
00000610: 41 28 32 29 B1 38 32 A7  35 38 30 00 34 0E 12 02  |A(2).82.580.4...|
00000620: 8B 41 28 33 29 B3 34 38  B0 41 28 33 29 B1 35 37  |.A(3).48.A(3).57|
00000630: A7 35 38 30 00 4D 0E 1C  02 8B 41 28 34 29 B3 34  |.580.M....A(4).4|
00000640: 38 B0 41 28 34 29 B1 35  37 A7 35 38 30 00 66 0E  |8.A(4).57.580.f.|
00000650: 26 02 8B 41 28 35 29 B3  36 35 B0 41 28 35 29 B1  |&..A(5).65.A(5).|
00000660: 38 38 A7 35 38 30 00 7F  0E 30 02 8B 41 28 36 29  |88.580...0..A(6)|
00000670: B3 36 35 B0 41 28 36 29  B1 38 38 A7 35 38 30 00  |.65.A(6).88.580.|
00000680: 8B 0E 3A 02 46 24 B2 22  22 3A 8E 00 BF 0E 44 02  |..:.F$."":....D.|
00000690: 46 24 B2 22 46 22 3A 99  22 46 4F 55 54 2C 20 4F  |F$."F":."FOUT, O|
000006A0: 50 4E 49 45 55 57 22 3B  3A 20 20 20 20 20 20 20  |PNIEUW";:       |
000006B0: 20 20 20 20 20 20 20 20  99 C7 28 32 39 29 3B 00  |        ..(29);.|
000006C0: C5 0E 4E 02 8E 00 DD 0E  58 02 58 58 B2 30 3A 8B  |..N.....X.XX.0:.|
000006D0: 58 B3 30 A7 58 B2 AB 58  3A 58 58 B2 31 00 03 0F  |X.0.X..X:XX.1...|
000006E0: 62 02 58 31 B2 58 AC 36  30 AB B5 28 58 29 AC 36  |b.X1.X.60..(X).6|
000006F0: 30 3A 58 32 B2 58 31 AC  36 30 AB B5 28 58 31 29  |0:X2.X1.60..(X1)|
00000700: AC 36 30 00 34 0F 6C 02  58 B2 B5 28 58 29 AA B5  |.60.4.l.X..(X)..|
00000710: 28 58 31 AA 2E 30 31 29  AD 31 30 30 AA 28 58 32  |(X1..01).100.(X2|
00000720: AA 2E 30 31 29 AD 31 45  34 3A 8B 58 58 B2 31 A7  |..01).1E4:.XX.1.|
00000730: 58 B2 AB 58 00 3A 0F 76  02 8E 00 45 0F 8A 02 99  |X..X.:.v...E....|
00000740: 22 93 22 3A 80 00 00 00                           |".":....        |
..(....* QTH-LOCATOR: AFSTAND&RICHTING *
.O....* VOOR MAIDENHEAD LOCATOR       *.
V....* VOLGENS ON7LN  LEON           *..
.(..* MODIFICATIE VOOR CMD 64       *.D.
2..* DOOR ON7WX  GOMMAIRE          *...<
..* MECHELEN JULI  1984           *...F.
.".":PI.3.1415926:RA.PI.180:P.1.RA.8.P.G
$."B=51.0207N  L=4.3005E (D.MS)".Q.D.A1.
0:T.0:Y$."":.".":."AFSTAND TUSSEN QTH-LO
CATORS":....N.Q$."":."GEEF JE EIGEN QTH-
LOCATOR";Q$.M.X..Q$."".Q$."JO21GA" 'VUL 
HIER EIGEN QTH.LOC IN......500:.F$."F".1
10.....Y$.Q$:.440:L1.L:B1.M.). .N1.L.P:X
.L:.600:L1.X:O1.M.P:X.M:.600:B1.X.]...."
.":N.N1:O.O1:."AFSTAND TUSSEN QTH-LOCATO
RS":......."EIGEN QTH-LOCATOR= "Q$:.;G$:
.......TAB27"W = EIGEN QTH-LOC WIJZIGEN"
.B.H..TAB27"S = STOPPEN":....R.Q$."":."D
E ANDERE QTH-LOCATOR = ";Q$......Q$."W".
100......Q$."S".650. ....500:.F$."F".210
.Q....440:R.L.P:X.L:.600:L2.X:S.M.P:X.M:
.600:B2.X.E....;"B="B2,"L="L2......"INDI
EN [-] LEES [ZUID] OF [WEST]".....V..(O)
..(S)..(O)..(S)..(R.N).....X.1.5708.A(V.
.(1.V.V)):X..(X.111.18.P..5):A1.A1.X...,
..:.N..R.320...1.AZ.0:.O.S.AZ.180...6..3
50.%.@.AA..(S).V..(O).M.J.AC.A(.(R.N)..(
S)..(O).AA).PI.(AA.0).W.T.AZ.(AC.(PI.PI)
.(AC.0)).RA:AZ..(AZ..5)...^.T.T.1:."DE A
FSTAND IS "X" KM";".AANTAL QSO'S ="T.J.H
.."RICHTING = "AZ" GRADEN"...R.."DE TOTA
ALAFSTAND ="A1" KM",...|.."GEMIDDELDE AF
STAND =".(A1.T)"KM".K...."VOOR VERVOLG ,
      TOETS     [RETURN]";:.I$:.170.}...
L.(A(1).65).20.(A(3).48).2.(A(5).64.5).1
2.180...B.M.(A(2).65).10.(A(4).48).(A(6)
.64.5).24.90...G...J....Q$.Y$.C(Q$)..6.5
80......K.1.6:A(K).F(J(Q$,K,1)):.......A
(1).65.A(1).82.580......A(2).65.A(2).82.
580.4....A(3).48.A(3).57.580.M....A(4).4
8.A(4).57.580.F.&..A(5).65.A(5).88.580.
.0..A(6).65.A(6).88.580...:.F$."":....D.
F$."F":."FOUT, OPNIEUW";:               
.G(29);.E.N.....X.XX.0:.X.0.X..X:XX.1...
B.X1.X.60..(X).60:X2.X1.60..(X1).60.4.L.
X..(X)..(X1..01).100.(X2..01).1E4:.XX.1.
X..X.:.V...E....".":....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL