QTH A.B.
FILE INFORMATION
FILENAME(S): QTH A.B.
FILE TYPE(S): PRG
FILE SIZE: 2.2K
FIRST SEEN: 2025-11-30 21:14:26
APPEARS ON: 1 disk(s)
FILE HASH
fffe5a8574ba5761e5756f48ac04bca69fddb018f3491d066dc0d91873fe4a7b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NIEUW | QTH A.B. | PRG | DuncanTwain | 19 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 1E 00 97 35 33 32 38 30 2C 30 3A 97 |.......53280,0:.| 00000010: 35 33 32 38 31 2C 30 00 20 08 28 00 99 22 93 22 |53281,0. .(.."."| 00000020: 00 4F 08 32 00 99 22 20 A6 A6 A6 A6 A6 A6 A6 A6 |.O.2.." ........| 00000030: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................| 00000040: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 22 00 |..............".| 00000050: 6F 08 3C 00 99 22 91 22 3A 81 41 B2 31 A4 32 31 |o.<..".":.A.1.21| 00000060: 3A 99 22 20 A6 22 A3 33 38 29 22 A6 22 3A 82 00 |:." .".38)".":..| 00000070: AA 08 46 00 99 22 20 A6 A6 A6 A6 A6 A6 A6 A6 A6 |..F.." .........| 00000080: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................| 00000090: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 20 22 3B |............. ";| 000000A0: 3A 99 22 13 11 11 11 11 22 3B 00 D3 08 50 00 99 |:.".....";...P..| 000000B0: 22 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 50 |"..............P| 000000C0: 45 31 43 46 41 92 20 20 20 20 20 12 28 43 29 92 |E1CFA. .(C).| 000000D0: 11 11 22 00 F9 08 5A 00 99 22 1D 1D 1D 1D 1D 1D |.."...Z.."......| 000000E0: 1D 1D 1D 51 54 48 20 4C 4F 43 41 54 4F 52 20 50 |...QTH LOCATOR P| 000000F0: 52 4F 47 52 41 4D 4D 41 22 00 28 09 64 00 99 22 |ROGRAMMA".(.d.."| 00000100: 11 11 1D 1D 1D 1D 44 49 54 20 50 52 4F 47 52 41 |......DIT PROGRA| 00000110: 4D 4D 41 20 42 45 52 45 4B 45 4E 44 20 44 45 20 |MMA BEREKEND DE | 00000120: 41 46 53 54 41 4E 44 22 00 4B 09 6E 00 99 22 11 |AFSTAND".K.n..".| 00000130: 1D 1D 1D 1D 54 55 53 53 45 4E 20 32 20 51 54 48 |....TUSSEN 2 QTH| 00000140: 20 4C 4F 43 41 54 4F 52 53 2E 22 00 5C 09 78 00 | LOCATORS.".\.x.| 00000150: 81 20 58 B2 31 A4 35 30 30 30 3A 82 00 69 09 82 |. X.1.5000:..i..| 00000160: 00 99 22 93 22 3A 4B B2 30 00 8F 09 8C 00 85 22 |..".":K.0......"| 00000170: 57 41 54 20 49 53 20 55 57 20 45 49 47 45 4E 20 |WAT IS UW EIGEN | 00000180: 51 54 48 20 20 22 3B 41 24 3A 89 20 31 36 30 00 |QTH ";A$:. 160.| 00000190: A7 09 96 00 99 22 45 49 47 45 4E 20 51 54 48 20 |....."EIGEN QTH | 000001A0: 49 53 20 22 3B 41 24 00 AD 09 A0 00 99 00 D9 09 |IS ";A$.........| 000001B0: AA 00 41 31 24 B2 C8 28 41 24 2C 31 29 3A 41 32 |..A1$..(A$,1):A2| 000001C0: 24 B2 CA 28 41 24 2C 32 2C 31 29 3A 41 33 24 B2 |$..(A$,2,1):A3$.| 000001D0: CA 28 41 24 2C 33 2C 31 29 00 F7 09 B4 00 41 34 |.(A$,3,1).....A4| 000001E0: 24 B2 CA 28 41 24 2C 34 2C 31 29 3A 41 35 24 B2 |$..(A$,4,1):A5$.| 000001F0: C9 28 41 24 2C 31 29 00 01 0A BE 00 8D 20 38 37 |.(A$,1)...... 87| 00000200: 30 00 17 0A C8 00 5A 24 B2 41 31 24 3A 8D 20 37 |0.....Z$.A1$:. 7| 00000210: 32 30 3A 41 31 B2 5A 00 2D 0A D2 00 5A 24 B2 41 |20:A1.Z.-...Z$.A| 00000220: 32 24 3A 8D 20 37 32 30 3A 41 32 B2 5A 00 43 0A |2$:. 720:A2.Z.C.| 00000230: DC 00 5A 24 B2 41 33 24 3A 8D 20 37 32 30 3A 41 |..Z$.A3$:. 720:A| 00000240: 33 B2 5A 00 72 0A E6 00 5A 24 B2 41 34 24 3A 8D |3.Z.r...Z$.A4$:.| 00000250: 37 32 30 3A 41 34 B2 5A 3A 8B 41 34 B2 30 A7 41 |720:A4.Z:.A4.0.A| 00000260: 33 B2 41 33 AB 31 3A 8B 41 34 B2 30 A7 41 34 B2 |3.A3.1:.A4.0.A4.| 00000270: 31 30 00 88 0A F0 00 5A 24 B2 41 35 24 3A 8D 20 |10.....Z$.A5$:. | 00000280: 37 37 30 3A 41 35 B2 5A 00 9A 0A FA 00 8B 20 41 |770:A5.Z...... A| 00000290: 33 B2 B1 38 20 89 20 32 38 30 00 AC 0A 04 01 8B |3..8 . 280......| 000002A0: 41 34 B2 B1 31 31 20 89 20 32 38 30 00 B6 0A 0E |A4..11 . 280....| 000002B0: 01 89 20 33 30 30 00 D1 0A 18 01 99 22 12 43 49 |.. 300......".CI| 000002C0: 4A 46 45 52 53 20 5A 49 4A 4E 20 46 4F 55 54 92 |JFERS ZIJN FOUT.| 000002D0: 22 00 EF 0A 22 01 85 22 45 49 47 45 4E 20 51 54 |"...".."EIGEN QT| 000002E0: 48 20 49 53 20 22 3B 41 24 3A 89 20 31 37 30 00 |H IS ";A$:. 170.| 000002F0: 07 0B 2C 01 4C 31 B2 32 AC 41 31 AA 2E 32 AC 41 |..,.L1.2.A1..2.A| 00000300: 34 AB 41 35 AD 33 30 00 16 0B 36 01 8D 20 38 32 |4.A5.30...6.. 82| 00000310: 30 3A 41 35 B2 5A 00 2E 0B 40 01 42 31 B2 41 32 |0:A5.Z...@.B1.A2| 00000320: AA 33 35 AB 41 33 AD 38 AB 41 35 AD 34 38 00 4D |.35.A3.8.A5.48.M| 00000330: 0B 4A 01 85 22 51 54 48 20 54 45 47 45 4E 53 54 |.J.."QTH TEGENST| 00000340: 41 54 49 4F 4E 20 49 53 20 22 3B 43 24 00 79 0B |ATION IS ";C$.y.| 00000350: 54 01 43 31 24 B2 C8 28 43 24 2C 31 29 3A 43 32 |T.C1$..(C$,1):C2| 00000360: 24 B2 CA 28 43 24 2C 32 2C 31 29 3A 43 33 24 B2 |$..(C$,2,1):C3$.| 00000370: CA 28 43 24 2C 33 2C 31 29 00 97 0B 5E 01 43 34 |.(C$,3,1)...^.C4| 00000380: 24 B2 CA 28 43 24 2C 34 2C 31 29 3A 43 35 24 B2 |$..(C$,4,1):C5$.| 00000390: C9 28 43 24 2C 31 29 00 A1 0B 68 01 8D 20 39 33 |.(C$,1)...h.. 93| 000003A0: 30 00 B7 0B 72 01 5A 24 B2 43 31 24 3A 8D 20 37 |0...r.Z$.C1$:. 7| 000003B0: 32 30 3A 43 31 B2 5A 00 CD 0B 7C 01 5A 24 B2 43 |20:C1.Z...|.Z$.C| 000003C0: 32 24 3A 8D 20 37 32 30 3A 43 32 B2 5A 00 E3 0B |2$:. 720:C2.Z...| 000003D0: 86 01 5A 24 B2 43 33 24 3A 8D 20 37 32 30 3A 43 |..Z$.C3$:. 720:C| 000003E0: 33 B2 5A 00 17 0C 90 01 5A 24 B2 43 34 24 3A 8D |3.Z.....Z$.C4$:.| 000003F0: 20 37 32 30 3A 43 34 B2 5A 3A 8B 20 43 34 B2 30 | 720:C4.Z:. C4.0| 00000400: 20 A7 43 33 B2 43 33 AB 31 3A 8B 43 34 B2 30 20 | .C3.C3.1:.C4.0 | 00000410: A7 20 43 34 B2 31 30 00 2D 0C 9A 01 5A 24 B2 43 |. C4.10.-...Z$.C| 00000420: 35 24 3A 8D 20 37 37 30 3A 43 35 B2 5A 00 3F 0C |5$:. 770:C5.Z.?.| 00000430: A4 01 8B 20 43 33 B2 B1 38 20 89 20 34 35 30 00 |... C3..8 . 450.| 00000440: 52 0C AE 01 8B 20 43 34 B2 B1 31 31 20 89 20 34 |R.... C4..11 . 4| 00000450: 35 30 00 5C 0C B8 01 89 20 34 37 30 00 77 0C C2 |50.\.... 470.w..| 00000460: 01 99 22 12 43 49 4A 46 45 52 53 20 5A 49 4A 4E |..".CIJFERS ZIJN| 00000470: 20 46 4F 55 54 92 22 00 9B 0C CC 01 85 22 51 54 | FOUT."......"QT| 00000480: 48 20 54 45 47 45 4E 53 54 41 54 49 4F 4E 20 49 |H TEGENSTATION I| 00000490: 53 20 22 3B 43 24 3B 89 33 34 30 00 B3 0C D6 01 |S ";C$;.340.....| 000004A0: 4C 32 B2 32 AC 43 31 AA 2E 32 AC 43 34 AB 43 35 |L2.2.C1..2.C4.C5| 000004B0: AD 33 30 00 C2 0C E0 01 8D 20 38 32 30 3A 43 35 |.30...... 820:C5| 000004C0: B2 5A 00 DA 0C EA 01 42 32 B2 43 32 AA 33 35 AB |.Z.....B2.C2.35.| 000004D0: 43 33 AD 38 AB 43 35 AD 34 38 00 E6 0C F4 01 52 |C3.8.C5.48.....R| 000004E0: B2 FF AD 31 38 30 00 0A 0D FE 01 4C 31 B2 52 AC |...180.....L1.R.| 000004F0: 4C 31 3A 4C 32 B2 52 AC 4C 32 3A 42 31 B2 52 AC |L1:L2.R.L2:B1.R.| 00000500: 42 31 3A 42 32 B2 52 AC 42 32 00 31 0D 08 02 41 |B1:B2.R.B2.1...A| 00000510: B2 BF 28 42 31 29 AC BF 28 42 32 29 AA BE 28 42 |..(B1)..(B2)..(B| 00000520: 32 29 AC BE 28 42 31 29 AC BE 28 4C 31 AB 4C 32 |2)..(B1)..(L1.L2| 00000530: 29 00 4E 0D 12 02 41 B2 AB C1 28 41 AD BA 28 AB |).N...A...(A..(.| 00000540: 41 AC 41 AA 31 29 29 AA 31 2E 35 37 30 38 00 56 |A.A.1)).1.5708.V| 00000550: 0D 1C 02 47 B2 41 00 6D 0D 26 02 41 B2 41 AC 36 |...G.A.m.&.A.A.6| 00000560: 30 AC 31 2E 38 35 33 AC 31 38 30 AD FF 00 76 0D |0.1.853.180...v.| 00000570: 30 02 99 22 93 22 00 90 0D 3A 02 99 22 44 45 20 |0.."."...:.."DE | 00000580: 41 46 53 54 41 4E 44 20 54 55 53 53 45 4E 20 22 |AFSTAND TUSSEN "| 00000590: 00 A0 0D 3C 02 99 41 24 22 20 45 4E 20 22 43 24 |...<..A$" EN "C$| 000005A0: 00 C6 0D 44 02 99 22 20 3D 20 22 B5 28 41 AC 31 |...D.." = ".(A.1| 000005B0: 30 AA 2E 35 29 AD 31 30 22 20 4B 49 4C 4F 4D 45 |0..5).10" KILOME| 000005C0: 54 45 52 53 20 22 00 EE 0D 4E 02 48 B2 28 BF 28 |TERS "...N.H.(.(| 000005D0: 42 32 29 AB 28 BF 28 42 31 29 AC BE 28 47 29 29 |B2).(.(B1)..(G))| 000005E0: 29 AD 28 BF 28 47 29 AC BE 28 42 31 29 29 00 0B |).(.(G)..(B1))..| 000005F0: 0E 58 02 48 B2 AB C1 28 48 AD BA 28 AB 48 AC 48 |.X.H...(H..(.H.H| 00000600: AA 31 29 29 AA 31 2E 35 37 30 38 00 19 0E 62 02 |.1)).1.5708...b.| 00000610: 48 B2 48 AC 31 38 30 AD FF 00 30 0E 6C 02 8B 20 |H.H.180...0.l.. | 00000620: 4C 31 B1 20 4C 32 20 A7 20 48 B2 33 36 30 AB 48 |L1. L2 . H.360.H| 00000630: 00 36 0E 76 02 99 00 6C 0E 80 02 99 22 12 44 45 |.6.v...l....".DE| 00000640: 20 41 4E 54 45 4E 4E 45 52 49 43 48 54 49 4E 47 | ANTENNERICHTING| 00000650: 20 4D 4F 45 54 20 5A 49 4A 4E 20 22 3B B5 28 48 | MOET ZIJN ";.(H| 00000660: 29 22 9D 20 47 52 2E 20 20 20 92 22 00 72 0E 8A |)". GR. .".r..| 00000670: 02 99 00 8F 0E 94 02 99 22 44 45 20 54 4F 54 41 |........"DE TOTA| 00000680: 4C 45 20 41 46 53 54 41 4E 44 20 49 53 20 22 00 |LE AFSTAND IS ".| 00000690: 99 0E 9E 02 4B B2 4B AA 41 00 BB 0E A8 02 99 20 |....K.K.A...... | 000006A0: B5 28 4B AC 31 30 AA 2E 35 29 AD 31 30 22 20 4B |.(K.10..5).10" K| 000006B0: 49 4C 4F 4D 45 54 45 52 53 20 22 00 C3 0E B2 02 |ILOMETERS ".....| 000006C0: 99 3A 99 00 CD 0E C6 02 89 20 31 35 30 00 D9 0E |.:....... 150...| 000006D0: D0 02 5A B2 C6 28 5A 24 29 00 F4 0E DA 02 8B 20 |..Z..(Z$)...... | 000006E0: 5A B3 B2 38 35 20 AF 20 5A B1 36 34 20 A7 5A B2 |Z..85 . Z.64 .Z.| 000006F0: 5A AB 35 39 00 0C 0F E4 02 8B 5A B1 38 35 AF 5A |Z.59......Z.85.Z| 00000700: B3 39 31 20 A7 20 5A B2 5A AB 38 35 00 25 0F EE |.91 . Z.Z.85.%..| 00000710: 02 8B 5A B3 B2 35 37 AF 5A B1 34 37 20 A7 20 5A |..Z..57.Z.47 . Z| 00000720: B2 5A AB 34 38 00 2B 0F F8 02 8E 00 3B 0F 02 03 |.Z.48.+.....;...| 00000730: 5A B2 30 3A 56 B2 C6 28 5A 24 29 00 53 0F 0C 03 |Z.0:V..(Z$).S...| 00000740: 8B 56 B2 36 35 B0 56 B2 36 39 B0 56 B2 37 34 A7 |.V.65.V.69.V.74.| 00000750: 5A B2 33 00 6C 0F 16 03 8B 56 B2 37 30 B0 56 B2 |Z.3.l....V.70.V.| 00000760: 37 31 B0 56 B2 37 32 A7 20 5A B2 35 00 7F 0F 20 |71.V.72. Z.5... | 00000770: 03 8B 5A B3 B1 33 AF 5A B3 B1 35 A7 5A B2 31 00 |..Z..3.Z..5.Z.1.| 00000780: 85 0F 2A 03 8E 00 95 0F 34 03 5A B2 30 3A 56 B2 |..*.....4.Z.0:V.| 00000790: C6 28 5A 24 29 00 AD 0F 3E 03 8B 56 B2 36 37 B0 |.(Z$)...>..V.67.| 000007A0: 56 B2 37 31 B0 56 B2 37 34 A7 5A B2 33 00 C5 0F |V.71.V.74.Z.3...| 000007B0: 48 03 8B 56 B2 36 35 B0 56 B2 36 36 B0 56 B2 37 |H..V.65.V.66.V.7| 000007C0: 32 A7 5A B2 31 00 D8 0F 52 03 8B 5A B3 B1 33 AF |2.Z.1...R..Z..3.| 000007D0: 5A B3 B1 31 A7 5A B2 35 00 DE 0F 5C 03 8E 00 EB |Z..1.Z.5...\....| 000007E0: 0F 66 03 57 B2 C6 28 41 35 24 29 00 04 10 70 03 |.f.W..(A5$)...p.| 000007F0: 8B 57 B3 36 35 B0 57 B1 37 34 B0 57 B2 37 33 89 |.W.65.W.74.W.73.| 00000800: 20 39 30 30 00 0D 10 7A 03 89 39 32 30 00 2A 10 | 900...z..920.*.| 00000810: 84 03 99 22 12 4C 45 54 54 45 52 20 53 55 42 2D |...".LETTER SUB-| 00000820: 56 41 4B 20 46 4F 55 54 92 22 00 53 10 8E 03 85 |VAK FOUT.".S....| 00000830: 22 45 49 47 45 4E 20 51 54 48 20 49 53 20 22 3B |"EIGEN QTH IS ";| 00000840: 41 24 3A 41 35 24 B2 C9 28 41 24 2C 31 29 3A 89 |A$:A5$..(A$,1):.| 00000850: 38 37 30 00 59 10 98 03 8E 00 66 10 A2 03 57 B2 |870.Y.....f...W.| 00000860: C6 28 43 35 24 29 00 80 10 AC 03 8B 57 B3 36 35 |.(C5$)......W.65| 00000870: B0 57 B1 37 34 B0 57 B2 37 33 20 89 20 39 36 30 |.W.74.W.73 . 960| 00000880: 00 8A 10 B6 03 89 20 39 38 30 00 A7 10 C0 03 99 |...... 980......| 00000890: 22 12 4C 45 54 54 45 52 20 53 55 42 2D 56 41 4B |".LETTER SUB-VAK| 000008A0: 20 46 4F 55 54 92 22 00 D7 10 CA 03 85 22 51 54 | FOUT."......"QT| 000008B0: 48 20 54 45 47 45 4E 53 54 41 54 49 4F 4E 20 49 |H TEGENSTATION I| 000008C0: 53 20 22 3B 43 24 3A 43 35 24 B2 C9 28 43 24 2C |S ";C$:C5$..(C$,| 000008D0: 31 29 3A 89 39 33 30 00 DD 10 D4 03 8E 00 00 00 |1):.930.........|
.......53280,0:.53281,0. .(..".".O.2.." ......................................". O.<..".":.A.1.21:." .".38)".":....F.." . ..................................... "; :.".....";.S.P.."..............PE1CFA. .(C)..."...Z..".........QTH LOCATOR P ROGRAMMA".(.D.."......DIT PROGRAMMA BERE KEND DE AFSTAND".K.N..".....TUSSEN 2 QTH LOCATORS.".\.X.. X.1.5000:..I....".":K. 0......"WAT IS UW EIGEN QTH ";A$:. 160. ....."EIGEN QTH IS ";A$... ...Y...A1$.H( A$,1):A2$.J(A$,2,1):A3$.J(A$,3,1).....A4 $.J(A$,4,1):A5$.I(A$,1)...... 870...H.Z$ .A1$:. 720:A1.Z.-.R.Z$.A2$:. 720:A2.Z.C. ..Z$.A3$:. 720:A3.Z.R...Z$.A4$:.720:A4.Z :.A4.0.A3.A3.1:.A4.0.A4.10.....Z$.A5$:. 770:A5.Z...... A3..8 . 280......A4..11 . 280...... 300.Q....".CIJFERS ZIJN FOUT. "...".."EIGEN QTH IS ";A$:. 170...,.L1.2 .A1..2.A4.A5.30...6.. 820:A5.Z...@.B1.A2 .35.A3.8.A5.48.M.J.."QTH TEGENSTATION IS ";C$.Y.T.C1$.H(C$,1):C2$.J(C$,2,1):C3$. J(C$,3,1)...^.C4$.J(C$,4,1):C5$.I(C$,1). ..H.. 930...R.Z$.C1$:. 720:C1.Z.M.|.Z$.C 2$:. 720:C2.Z.....Z$.C3$:. 720:C3.Z..... Z$.C4$:. 720:C4.Z:. C4.0 .C3.C3.1:.C4.0 . C4.10.-...Z$.C5$:. 770:C5.Z.?.... C3.. 8 . 450.R.... C4..11 . 450.\.... 470.W.B ..".CIJFERS ZIJN FOUT."...L.."QTH TEGENS TATION IS ";C$;.340...V.L2.2.C1..2.C4.C5 .30.B.... 820:C5.Z.Z...B2.C2.35.C3.8.C5. 48.....R...180.....L1.R.L1:L2.R.L2:B1.R. B1:B2.R.B2.1...A..(B1)..(B2)..(B2)..(B1) ..(L1.L2).N...A..A(A..(.A.A.1)).1.5708.V ...G.A.M.&.A.A.60.1.853.180...V.0..".".. .:.."DE AFSTAND TUSSEN ". .<..A$" EN "C$ .F.D.." = ".(A.10..5).10" KILOMETERS ".. .N.H.(.(B2).(.(B1)..(G))).(.(G)..(B1)).. .X.H..A(H..(.H.H.1)).1.5708...B.H.H.180. ..0.L.. L1. L2 . H.360.H.6.V...L....".DE ANTENNERICHTING MOET ZIJN ";.(H)". GR. .".R.........."DE TOTALE AFSTAND IS ". ....K.K.A...... .(K.10..5).10" KILOMETER S ".C....:..M.F.. 150.Y.P.Z.F(Z$)...Z.. Z..85 . Z.64 .Z.Z.59......Z.85.Z.91 . Z. Z.85.%....Z..57.Z.47 . Z.Z.48.+.....;... Z.0:V.F(Z$).S....V.65.V.69.V.74.Z.3.L... .V.70.V.71.V.72. Z.5.. ..Z..3.Z..5.Z.1. ..*.....4.Z.0:V.F(Z$)...>..V.67.V.71.V.7 4.Z.3.E.H..V.65.V.66.V.72.Z.1.X.R..Z..3. Z..1.Z.5...\.....F.W.F(A5$)...P..W.65.W. 74.W.73. 900...Z..920.*....".LETTER SUB- VAK FOUT.".S...."EIGEN QTH IS ";A$:A5$.I (A$,1):.870.Y.....F...W.F(C5$)......W.65 .W.74.W.73 . 960...... 980......".LETTER SUB-VAK FOUT.".W.J.."QTH TEGENSTATION I S ";C$:C5$.I(C$,1):.930...T.....
> CLICK IMAGE PREVIEW FOR FULL MODAL