> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 64 00 8F 3A 51 54 48 2D 4B 45 4E 4E |....d..:QTH-KENN|
00000010: 45 52 20 4E 45 55 45 52 20 41 52 54 00 48 08 6E |ER NEUER ART.H.n|
00000020: 00 99 22 93 11 11 11 1D 1D 1D 1D 1D 1D 1D 45 4E |.."...........EN|
00000030: 54 46 45 52 4E 55 4E 47 53 42 45 52 45 43 48 4E |TFERNUNGSBERECHN|
00000040: 55 4E 47 20 41 55 53 22 00 70 08 78 00 99 22 1D |UNG AUS".p.x..".|
00000050: 1D 1D 1D 1D 1D 1D B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
00000060: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 22 |..............."|
00000070: 00 96 08 82 00 99 22 11 1D 1D 1D 1D 1D 1D 1D 1D |......".........|
00000080: 1D 51 54 48 2D 4B 45 4E 4E 45 52 20 4E 45 55 45 |.QTH-KENNER NEUE|
00000090: 52 20 41 52 54 22 00 BB 08 8C 00 99 22 1D 1D 1D |R ART"......"...|
000000A0: 1D 1D 1D 1D 1D 1D B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
000000B0: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 22 00 E3 08 96 00 |..........".....|
000000C0: 99 22 11 1D 1D 1D 1D 1D 51 54 48 2D 4B 45 4E 4E |."......QTH-KENN|
000000D0: 45 52 20 44 41 54 54 45 4C 4E 3A 20 4A 4F 33 31 |ER DATTELN: JO31|
000000E0: 51 50 22 00 0A 09 A0 00 99 22 1D 1D 1D 1D 1D B7 |QP"......"......|
000000F0: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
00000100: B7 B7 B7 B7 B7 B7 B7 B7 B7 22 00 32 09 AA 00 50 |.........".2...P|
00000110: 49 B2 33 2E 31 34 31 35 39 33 3A 50 B2 50 49 AD |I.3.141593:P.PI.|
00000120: 31 38 30 3A 46 B2 34 30 30 30 39 AD 28 32 AC 50 |180:F.40009.(2.P|
00000130: 49 29 00 61 09 B4 00 99 22 11 11 20 20 20 20 20 |I).a....".. |
00000140: 45 49 47 45 4E 45 52 20 51 54 48 2D 4B 45 4E 4E |EIGENER QTH-KENN|
00000150: 45 52 22 3B 3A 85 51 45 24 3A 51 46 24 B2 51 45 |ER";:.QE$:QF$.QE|
00000160: 24 00 8C 09 BE 00 8D 33 39 30 3A 4C 45 B2 4C 46 |$......390:LE.LF|
00000170: 3A 42 45 B2 42 46 3A 8F 20 43 48 45 43 4B 20 55 |:BE.BF:. CHECK U|
00000180: 2E 20 55 4D 52 45 43 48 4E 55 4E 47 00 95 09 C8 |. UMRECHNUNG....|
00000190: 00 46 4C B2 31 00 BA 09 D2 00 85 22 11 11 1D 1D |.FL.1......"....|
000001A0: 1D 1D 1D 46 52 45 4D 44 45 52 20 51 54 48 2D 4B |...FREMDER QTH-K|
000001B0: 45 4E 4E 45 52 22 3B 51 46 24 00 CE 09 DC 00 8B |ENNER";QF$......|
000001C0: 51 46 24 B2 22 45 4E 44 45 22 A7 33 35 30 00 ED |QF$."ENDE".350..|
000001D0: 09 E6 00 8B 51 46 24 B2 51 45 24 A7 99 A3 31 30 |....QF$.QE$...10|
000001E0: 29 22 30 20 20 4B 4D 22 3A 89 35 31 30 00 07 0A |)"0 KM":.510...|
000001F0: F0 00 8D 33 39 30 3A 47 41 B2 4C 46 AB 4C 45 3A |...390:GA.LF.LE:|
00000200: 42 B2 42 46 AB 42 45 00 23 0A FA 00 8F 20 45 4E |B.BF.BE.#.... EN|
00000210: 54 46 45 52 4E 55 4E 47 53 42 45 52 45 43 48 4E |TFERNUNGSBERECHN|
00000220: 55 4E 47 00 47 0A 04 01 4E B2 BF 28 42 45 29 AC |UNG.G...N..(BE).|
00000230: BF 28 42 46 29 AA BE 28 42 45 29 AC BE 28 42 46 |.(BF)..(BE)..(BF|
00000240: 29 AC BE 28 47 41 29 00 6C 0A 0E 01 44 58 B2 B5 |)..(GA).l...DX..|
00000250: 28 28 AB C1 28 4E AD BA 28 31 AB 4E AC 4E 29 29 |((..(N..(1.N.N))|
00000260: AA 50 49 AD 32 29 AC 46 AA 2E 35 29 00 7F 0A 18 |.PI.2).F..5)....|
00000270: 01 51 B2 51 AA 31 3A 53 55 B2 53 55 AA 44 58 00 |.Q.Q.1:SU.SU.DX.|
00000280: 92 0A 22 01 8B 44 58 B1 4F 44 58 A7 4F 44 58 B2 |.."..DX.ODX.ODX.|
00000290: 44 58 00 B4 0A 2C 01 99 3A 99 22 11 1D 1D 1D 1D |DX...,..:.".....|
000002A0: 1D 45 4E 54 46 45 52 4E 55 4E 47 3D 22 44 58 22 |.ENTFERNUNG="DX"|
000002B0: 4B 4D 2E 22 00 DA 0A 36 01 99 22 11 11 1D 1D 1D |KM."...6..".....|
000002C0: 1D 1D 4E 4F 43 48 20 45 49 4E 45 20 52 45 43 48 |..NOCH EINE RECH|
000002D0: 4E 55 4E 47 3F 28 4A 2F 4E 29 00 ED 0A 40 01 A1 |NUNG?(J/N)...@..|
000002E0: 41 24 3A 8B 41 24 B2 22 22 A7 33 32 30 00 FD 0A |A$:.A$."".320...|
000002F0: 4A 01 8B 41 24 B2 22 4A 22 A7 31 31 30 00 0D 0B |J..A$."J".110...|
00000300: 54 01 8B 41 24 B2 22 4E 22 A7 33 35 30 00 33 0B |T..A$."N".350.3.|
00000310: 5E 01 99 22 93 11 11 11 11 11 11 11 11 11 1D 1D |^.."............|
00000320: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 45 4E |..............EN|
00000330: 44 45 22 00 39 0B 68 01 80 00 3F 0B 72 01 80 00 |DE".9.h...?.r...|
00000340: 6B 0B 7C 01 8F 20 43 48 45 43 4B 20 55 2E 55 4D |k.|.. CHECK U.UM|
00000350: 52 45 43 48 4E 55 4E 47 20 49 4E 20 4C 41 45 4E |RECHNUNG IN LAEN|
00000360: 47 45 20 55 2E 42 52 45 49 54 45 00 7E 0B 86 01 |GE U.BREITE.~...|
00000370: 8B C3 28 51 46 24 29 B3 B1 36 A7 35 30 30 00 9C |..(QF$)..6.500..|
00000380: 0B 90 01 81 4E B2 31 A4 36 3A 54 24 28 4E 29 B2 |....N.1.6:T$(N).|
00000390: CA 28 51 46 24 2C 4E 2C 31 29 3A 82 00 A7 0B 9A |.(QF$,N,1):.....|
000003A0: 01 81 4E B2 31 A4 32 00 C8 0B A4 01 8B C6 28 54 |..N.1.2.......(T|
000003B0: 24 28 4E 29 29 B3 36 35 B0 C6 28 54 24 28 4E 29 |$(N)).65..(T$(N)|
000003C0: 29 B1 38 32 A7 35 30 30 00 ED 0B AE 01 8B C6 28 |).82.500.......(|
000003D0: 54 24 28 4E AA 32 29 29 B3 34 38 B0 C6 28 54 24 |T$(N.2)).48..(T$|
000003E0: 28 4E AA 32 29 29 B1 35 37 A7 35 30 30 00 12 0C |(N.2)).57.500...|
000003F0: B8 01 8B C6 28 54 24 28 4E AA 34 29 29 B3 36 35 |....(T$(N.4)).65|
00000400: B0 C6 28 54 24 28 4E AA 34 29 29 B1 38 38 A7 35 |..(T$(N.4)).88.5|
00000410: 30 30 00 18 0C C2 01 82 00 55 0C CC 01 4C 46 B2 |00.......U...LF.|
00000420: 28 C6 28 54 24 28 31 29 29 AB 36 35 29 AC 32 30 |(.(T$(1)).65).20|
00000430: AB 31 38 30 AA C5 28 54 24 28 33 29 29 AC 32 AA |.180..(T$(3)).2.|
00000440: 28 C6 28 54 24 28 35 29 29 AB 36 35 29 AD 31 32 |(.(T$(5)).65).12|
00000450: AA 31 AD 32 34 00 8F 0C D6 01 42 46 B2 28 C6 28 |.1.24.....BF.(.(|
00000460: 54 24 28 32 29 29 AB 36 35 29 AC 31 30 AB 39 30 |T$(2)).65).10.90|
00000470: AA C5 28 54 24 28 34 29 29 AA 28 C6 28 54 24 28 |..(T$(4)).(.(T$(|
00000480: 36 29 29 AB 36 35 29 AD 32 34 AA 31 AD 34 38 00 |6)).65).24.1.48.|
00000490: A5 0C E0 01 4C 46 B2 4C 46 AC 50 3A 42 46 B2 42 |....LF.LF.P:BF.B|
000004A0: 46 AC 50 3A 8E 00 CB 0C EA 01 8F 20 45 52 4E 45 |F.P:....... ERNE|
000004B0: 55 54 45 20 45 49 4E 47 41 42 45 20 44 45 53 20 |UTE EINGABE DES |
000004C0: 51 54 48 2D 4B 45 4E 4E 45 52 53 00 EE 0C F4 01 |QTH-KENNERS.....|
000004D0: 8B 46 4C B2 30 A7 31 38 30 3A 8F 20 45 49 47 45 |.FL.0.180:. EIGE|
000004E0: 4E 45 52 20 51 54 48 2D 4B 45 4E 4E 45 52 00 0C |NER QTH-KENNER..|
000004F0: 0D FE 01 89 32 31 30 3A 8F 20 46 52 45 4D 44 45 |....210:. FREMDE|
00000500: 52 20 51 54 48 2D 4B 45 4E 4E 45 52 00 00 00 |R QTH-KENNER... |
....D..:QTH-KENNER NEUER ART.H.N..".....
......ENTFERNUNGSBERECHNUNG AUS".P.X..".
..............................."......".
.........QTH-KENNER NEUER ART"......"...
.........................."......"......
QTH-KENNER DATTELN: JO31QP"... .."......
.........................".2...PI.3.1415
93:P.PI.180:F.40009.(2.PI).A...."..
EIGENER QTH-KENNER";:.QE$:QF$.QE$......3
90:LE.LF:BE.BF:. CHECK U. UMRECHNUNG...H
.FL.1...R..".......FREMDER QTH-KENNER";Q
F$.N....QF$."ENDE".350......QF$.QE$...10
)"0 KM":.510......390:GA.LF.LE:B.BF.BE.
#.... ENTFERNUNGSBERECHNUNG.G...N..(BE).
.(BF)..(BE)..(BF)..(GA).L...DX..((.A(N..
(1.N.N)).PI.2).F..5)....Q.Q.1:SU.SU.DX.
.."..DX.ODX.ODX.DX...,..:."......ENTFERN
UNG="DX"KM.".Z.6..".......NOCH EINE RECH
NUNG?(J/N)...@..A$:.A$."".320...J..A$."J
".110...T..A$."N".350.3.^.."............
..............ENDE".9.H...?.R...K.|.. CH
ECK U.UMRECHNUNG IN LAENGE U.BREITE.~...
.C(QF$)..6.500......N.1.6:T$(N).J(QF$,N,
1):.......N.1.2.H....F(T$(N)).65.F(T$(N)
).82.500......F(T$(N.2)).48.F(T$(N.2)).5
7.500......F(T$(N.4)).65.F(T$(N.4)).88.5
00...B...U.L.LF.(F(T$(1)).65).20.180.E(T
$(3)).2.(F(T$(5)).65).12.1.24...V.BF.(F(
T$(2)).65).10.90.E(T$(4)).(F(T$(6)).65).
24.1.48.....LF.LF.P:BF.BF.P:..K.... ERNE
UTE EINGABE DES QTH-KENNERS......FL.0.18
0:. EIGENER QTH-KENNER......210:. FREMDE
R QTH-KENNER...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL