BEAMCHART
FILE INFORMATION
FILENAME(S): BEAMCHART
FILE TYPE(S): DEL
FILE SIZE: 2.6K
FIRST SEEN: 2025-11-30 19:36:45
APPEARS ON: 1 disk(s)
FILE HASH
bc3206a463423e393dbe8ab09974d0ef4c9f9697f9032e68620703f3f3f21479
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| JBR C64 RADIO MM | BEAMCHART | DEL | Curtcool, Bo | 14 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 08 0B 08 05 00 9F 31 33 2C 34 00 4D 08 0A 00 |.......13,4.M...|
00000010: 8F 20 42 45 41 4D 20 41 4E 54 45 4E 4E 41 20 48 |. BEAM ANTENNA H|
00000020: 45 41 44 49 4E 47 20 41 4E 44 20 44 49 53 54 41 |EADING AND DISTA|
00000030: 4E 43 45 20 43 48 41 52 54 20 50 52 4F 47 52 41 |NCE CHART PROGRA|
00000040: 4D 20 28 43 4F 4D 4D 4F 44 4F 52 45 29 00 84 08 |M (COMMODORE)...|
00000050: 14 00 8F 20 42 59 20 4B 43 36 41 20 41 4E 44 20 |... BY KC6A AND |
00000060: 4E 36 4E 42 3B 28 43 29 31 39 38 33 20 42 59 20 |N6NB;(C)1983 BY |
00000070: 48 41 59 44 45 4E 20 42 4F 4F 4B 20 43 4F 2E 2C |HAYDEN BOOK CO.,|
00000080: 49 4E 43 2E 00 94 08 1E 00 43 4C 53 24 B2 C7 28 |INC......CLS$..(|
00000090: 31 34 37 29 00 A1 08 20 00 99 20 43 4C 53 24 3A |147)... .. CLS$:|
000000A0: 99 00 CE 08 28 00 99 20 22 20 20 20 42 45 41 4D |....(.. " BEAM|
000000B0: 20 48 45 41 44 49 4E 47 20 41 4E 44 20 44 49 53 | HEADING AND DIS|
000000C0: 54 41 4E 43 45 20 50 52 4F 47 52 41 4D 22 00 FB |TANCE PROGRAM"..|
000000D0: 08 32 00 99 20 22 20 20 20 20 46 4F 52 20 4D 41 |.2.. " FOR MA|
000000E0: 4A 4F 52 20 43 49 54 49 45 53 2C 20 44 58 43 43 |JOR CITIES, DXCC|
000000F0: 20 43 4F 55 4E 54 52 49 45 53 22 00 2B 09 37 00 | COUNTRIES".+.7.|
00000100: 99 3A 99 20 22 20 20 20 20 42 45 20 53 55 52 45 |.:. " BE SURE|
00000110: 20 27 4C 41 54 4C 4F 4E 47 27 20 46 49 4C 45 20 | 'LATLONG' FILE |
00000120: 49 53 20 4F 4E 20 44 49 53 4B 22 00 35 09 3C 00 |IS ON DISK".5.<.|
00000130: 99 3A 99 3A 99 00 53 09 3E 00 85 22 57 48 41 54 |.:.:..S.>.."WHAT|
00000140: 20 49 53 20 59 4F 55 52 20 43 41 4C 4C 20 22 3B | IS YOUR CALL ";|
00000150: 43 4C 24 00 73 09 40 00 99 3A 85 20 22 57 41 4E |CL$.s.@..:. "WAN|
00000160: 54 20 41 20 48 41 52 44 20 43 4F 50 59 20 22 3B |T A HARD COPY ";|
00000170: 4C 50 24 00 7B 09 42 00 99 3A 99 00 A2 09 46 00 |LP$.{.B..:....F.|
00000180: 86 20 50 58 24 28 35 30 30 29 2C 51 24 28 35 30 |. PX$(500),Q$(50|
00000190: 30 29 2C 41 58 28 35 30 30 29 2C 4F 58 28 35 30 |0),AX(500),OX(50|
000001A0: 30 29 00 BD 09 50 00 52 41 44 B2 35 37 2E 32 39 |0)...P.RAD.57.29|
000001B0: 35 38 3A 50 49 B2 33 2E 31 34 31 35 39 00 03 0A |58:PI.3.14159...|
000001C0: 5A 00 46 24 B2 22 20 20 20 20 20 50 52 45 46 49 |Z.F$." PREFI|
000001D0: 58 20 20 20 20 20 20 20 20 20 20 4C 4F 43 41 54 |X LOCAT|
000001E0: 49 4F 4E 20 20 20 20 20 20 20 20 20 20 20 42 45 |ION BE|
000001F0: 41 52 49 4E 47 20 20 20 20 20 20 20 20 52 41 4E |ARING RAN|
00000200: 47 45 22 00 23 0A 64 00 99 20 22 45 4E 54 45 52 |GE".#.d.. "ENTER|
00000210: 20 59 4F 55 52 20 43 4F 4F 52 44 49 4E 41 54 45 | YOUR COORDINATE|
00000220: 53 3A 22 00 50 0A 6E 00 99 20 22 20 20 20 55 53 |S:".P.n.. " US|
00000230: 45 20 27 2D 27 20 46 4F 52 20 42 4F 54 48 20 44 |E '-' FOR BOTH D|
00000240: 45 47 52 45 45 53 20 41 4E 44 20 4D 49 4E 53 22 |EGREES AND MINS"|
00000250: 00 7D 0A 78 00 99 20 22 20 20 20 49 46 20 53 4F |.}.x.. " IF SO|
00000260: 55 54 48 20 4C 41 54 49 54 55 44 45 2C 20 45 41 |UTH LATITUDE, EA|
00000270: 53 54 20 4C 4F 4E 47 49 54 55 44 45 22 00 A4 0A |ST LONGITUDE"...|
00000280: 7D 00 99 3A 99 20 22 20 20 20 45 58 41 4D 50 4C |}..:. " EXAMPL|
00000290: 45 3A 20 33 33 2C 31 35 20 4F 52 20 2D 33 33 2C |E: 33,15 OR -33,|
000002A0: 2D 31 35 22 00 BF 0A 82 00 99 3A 85 20 22 4C 41 |-15"......:. "LA|
000002B0: 54 49 54 55 44 45 20 20 22 3B 4C 41 2C 41 4D 00 |TITUDE ";LA,AM.|
000002C0: D8 0A 8C 00 85 20 22 4C 4F 4E 47 49 54 55 44 45 |..... "LONGITUDE|
000002D0: 20 22 3B 4C 4F 2C 4F 4D 00 E0 0A 96 00 99 3A 99 | ";LO,OM......:.|
000002E0: 00 0E 0B A0 00 99 20 22 41 4C 4C 20 4D 45 41 53 |...... "ALL MEAS|
000002F0: 55 52 45 4D 45 4E 54 53 20 41 52 45 20 54 4F 20 |UREMENTS ARE TO |
00000300: 54 48 45 20 43 45 4E 54 45 52 20 4F 46 22 00 3D |THE CENTER OF".=|
00000310: 0B A2 00 99 20 22 54 48 45 20 43 4F 55 4E 54 52 |.... "THE COUNTR|
00000320: 59 20 57 48 45 4E 20 4E 4F 20 43 49 54 59 20 49 |Y WHEN NO CITY I|
00000330: 53 20 53 50 45 43 49 46 49 45 44 2E 22 00 6B 0B |S SPECIFIED.".k.|
00000340: A4 00 99 20 22 48 45 41 44 49 4E 47 53 20 41 52 |... "HEADINGS AR|
00000350: 45 20 49 4E 20 44 45 47 52 45 45 53 20 45 41 53 |E IN DEGREES EAS|
00000360: 54 20 4F 46 20 4E 4F 52 54 48 22 00 96 0B A6 00 |T OF NORTH".....|
00000370: 99 20 22 41 4E 44 20 44 49 53 54 41 4E 43 45 53 |. "AND DISTANCES|
00000380: 20 41 52 45 20 49 4E 20 53 54 41 54 55 54 45 20 | ARE IN STATUTE |
00000390: 4D 49 4C 45 53 22 00 AE 0B AA 00 99 20 22 56 49 |MILES"...... "VI|
000003A0: 41 20 53 48 4F 52 54 20 50 41 54 48 2E 22 00 B6 |A SHORT PATH."..|
000003B0: 0B B4 00 99 3A 99 00 E4 0B BE 00 99 20 22 4E 4F |....:....... "NO|
000003C0: 57 20 52 45 41 44 49 4E 47 20 49 4E 20 44 41 54 |W READING IN DAT|
000003D0: 41 20 46 4F 52 20 41 4C 4C 20 43 4F 55 4E 54 52 |A FOR ALL COUNTR|
000003E0: 49 45 53 22 00 08 0C C8 00 99 20 22 20 20 20 20 |IES"...... " |
000003F0: 20 20 20 20 20 50 4C 45 41 53 45 20 53 54 41 4E | PLEASE STAN|
00000400: 44 20 42 59 2E 2E 2E 22 00 12 0C D2 00 99 3A 99 |D BY..."......:.|
00000410: 3A 99 00 28 0C DC 00 4C 54 B2 28 4C 41 AA 41 4D |:..(...LT.(LA.AM|
00000420: AD 36 30 29 AD 52 41 44 00 3E 0C E6 00 4C 47 B2 |.60).RAD.>...LG.|
00000430: 28 4C 4F AA 4F 4D AD 36 30 29 AD 52 41 44 00 58 |(LO.OM.60).RAD.X|
00000440: 0C F0 00 9F 20 38 2C 38 2C 38 2C 22 4C 41 54 4C |.... 8,8,8,"LATL|
00000450: 4F 4E 47 2C 53 2C 52 22 00 60 0C FA 00 4A B2 31 |ONG,S,R".`...J.1|
00000460: 00 80 0C 04 01 84 38 2C 50 58 24 28 4A 29 2C 51 |......8,PX$(J),Q|
00000470: 24 28 4A 29 2C 41 58 28 4A 29 2C 4F 58 28 4A 29 |$(J),AX(J),OX(J)|
00000480: 00 AE 0C 0E 01 8B 20 50 58 24 28 4A 29 B2 22 5A |...... PX$(J)."Z|
00000490: 5A 5A 22 20 A7 20 50 58 24 28 4A 29 B2 22 22 3A |ZZ" . PX$(J)."":|
000004A0: 51 24 28 4A 29 B2 22 22 3A 89 20 33 30 30 00 BE |Q$(J)."":. 300..|
000004B0: 0C 18 01 4A B2 4A AA 31 3A 89 20 32 36 30 00 C6 |...J.J.1:. 260..|
000004C0: 0C 2C 01 A0 20 38 00 EB 0C 2E 01 4E 4F 24 B2 22 |.,.. 8.....NO$."|
000004D0: 4E 20 4C 41 54 22 3A 8B 20 4C 54 B3 30 20 A7 20 |N LAT":. LT.0 . |
000004E0: 4E 4F 24 B2 22 53 20 4C 41 54 22 00 12 0D 30 01 |NO$."S LAT"...0.|
000004F0: 57 45 24 B2 22 57 20 4C 4F 4E 47 22 3A 8B 20 4C |WE$."W LONG":. L|
00000500: 47 B3 30 20 A7 20 57 45 24 B2 22 45 20 4C 4F 4E |G.0 . WE$."E LON|
00000510: 47 22 00 27 0D 36 01 8B 20 4C 50 24 B3 B1 22 59 |G".'.6.. LP$.."Y|
00000520: 22 20 A7 20 33 36 30 00 68 0D 38 01 9D 20 31 33 |" . 360.h.8.. 13|
00000530: 3A 99 20 A3 31 30 29 22 43 55 53 54 4F 4D 20 42 |:. .10)"CUSTOM B|
00000540: 45 41 4D 20 48 45 41 44 49 4E 47 20 41 4E 44 20 |EAM HEADING AND |
00000550: 44 49 53 54 41 4E 43 45 20 43 48 41 52 54 20 46 |DISTANCE CHART F|
00000560: 4F 52 20 22 3B 43 4C 24 00 70 0D 3A 01 99 3A 99 |OR ";CL$.p.:..:.|
00000570: 00 AC 0D 3C 01 99 20 A3 31 30 29 22 4C 4F 43 41 |...<.. .10)"LOCA|
00000580: 54 45 44 20 41 54 20 22 3B 4C 41 3B 22 2D 22 3B |TED AT ";LA;"-";|
00000590: 41 4D 3B 4E 4F 24 3B 22 20 41 4E 44 20 22 3B 4C |AM;NO$;" AND ";L|
000005A0: 4F 3B 22 2D 22 3B 4F 4D 3B 57 45 24 00 B6 0D 3E |O;"-";OM;WE$...>|
000005B0: 01 99 3A 99 3A 99 00 F9 0D 40 01 99 20 A3 35 29 |..:.:....@.. .5)|
000005C0: 20 22 41 4C 4C 20 4D 45 41 53 55 52 45 4D 45 4E | "ALL MEASUREMEN|
000005D0: 54 53 20 41 52 45 20 54 4F 20 54 48 45 20 43 45 |TS ARE TO THE CE|
000005E0: 4E 54 45 52 20 4F 46 20 54 48 45 20 43 4F 55 4E |NTER OF THE COUN|
000005F0: 54 52 59 20 57 48 45 4E 22 00 3B 0E 42 01 99 20 |TRY WHEN".;.B.. |
00000600: A3 35 29 22 4E 4F 20 43 49 54 59 20 49 53 20 53 |.5)"NO CITY IS S|
00000610: 50 45 43 49 46 49 45 44 2E 20 20 48 45 41 44 49 |PECIFIED. HEADI|
00000620: 4E 47 53 20 41 52 45 20 49 4E 20 44 45 47 52 45 |NGS ARE IN DEGRE|
00000630: 45 53 20 45 41 53 54 20 4F 46 22 00 80 0E 44 01 |ES EAST OF"...D.|
00000640: 99 20 A3 35 29 22 4E 4F 52 54 48 2C 20 41 4E 44 |. .5)"NORTH, AND|
00000650: 20 44 49 53 54 41 4E 43 45 53 20 41 52 45 20 49 | DISTANCES ARE I|
00000660: 4E 20 53 54 41 54 55 54 45 20 4D 49 4C 45 53 20 |N STATUTE MILES |
00000670: 56 49 41 20 53 48 4F 52 54 20 50 41 54 48 2E 22 |VIA SHORT PATH."|
00000680: 00 88 0E 46 01 99 3A 99 00 95 0E 4A 01 99 20 46 |...F..:....J.. F|
00000690: 24 3A 98 31 33 00 9F 0E 4C 01 4C 4E B2 31 35 00 |$:.13...L.LN.15.|
000006A0: A9 0E 68 01 4E B2 4A AB 31 00 B7 0E 72 01 81 20 |..h.N.J.1...r.. |
000006B0: 4A B2 31 20 A4 20 4E 00 D5 0E 7C 01 41 31 B2 41 |J.1 . N...|.A1.A|
000006C0: 58 28 4A 29 AD 52 41 44 3A 4F 31 B2 4F 58 28 4A |X(J).RAD:O1.OX(J|
000006D0: 29 AD 52 41 44 00 ED 0E 86 01 4C B2 4C 47 AB 4F |).RAD.....L.LG.O|
000006E0: 31 3A 8B 20 4C B2 30 20 A7 20 35 37 30 00 03 0F |1:. L.0 . 570...|
000006F0: 90 01 8B 20 4C B1 50 49 20 A7 20 4C B2 4C AB 32 |... L.PI . L.L.2|
00000700: AC 50 49 00 1A 0F 9A 01 8B 20 4C B3 AB 50 49 20 |.PI...... L..PI |
00000710: A7 20 4C B2 4C AA 32 AC 50 49 00 3D 0F A4 01 41 |. L.L.2.PI.=...A|
00000720: 41 B2 BE 28 4C 29 AC 28 BE 28 41 31 29 AD BF 28 |A..(L).(.(A1)..(|
00000730: 41 31 29 29 3A 41 41 B2 C1 28 41 41 29 00 6C 0F |A1)):AA..(AA).l.|
00000740: AE 01 41 5A B2 28 28 BE 28 4C 29 AD BF 28 4C 29 |..AZ.((.(L)..(L)|
00000750: 29 AC BE 28 4C 54 AA 41 41 29 29 AD BF 28 41 41 |)..(LT.AA))..(AA|
00000760: 29 3A 41 5A B2 C1 28 31 AD 41 5A 29 00 82 0F B8 |):AZ..(1.AZ)....|
00000770: 01 41 5A B2 41 5A AC 52 41 44 3A 4C B2 4C AC 52 |.AZ.AZ.RAD:L.L.R|
00000780: 41 44 00 9F 0F C2 01 8B 20 4C B1 30 20 AF 20 41 |AD...... L.0 . A|
00000790: 5A B3 30 20 A7 20 41 5A B2 41 5A AA 31 38 30 00 |Z.0 . AZ.AZ.180.|
000007A0: BC 0F CC 01 8B 20 4C B3 30 20 AF 20 41 5A B1 30 |..... L.0 . AZ.0|
000007B0: 20 A7 20 41 5A B2 41 5A AA 31 38 30 00 D9 0F D6 | . AZ.AZ.180....|
000007C0: 01 8B 20 4C B3 30 20 AF 20 41 5A B3 30 20 A7 20 |.. L.0 . AZ.0 . |
000007D0: 41 5A B2 41 5A AA 33 36 30 00 E9 0F E0 01 41 5A |AZ.AZ.360.....AZ|
000007E0: B2 B5 28 41 5A AA 2E 35 29 00 15 10 EA 01 44 58 |..(AZ..5).....DX|
000007F0: B2 28 BF 28 4C 54 29 AC BF 28 41 31 29 29 AA 28 |.(.(LT)..(A1)).(|
00000800: BE 28 4C 54 29 AC BE 28 41 31 29 AC BE 28 4C AD |.(LT)..(A1)..(L.|
00000810: 52 41 44 29 29 00 2C 10 F4 01 44 58 B2 BA 28 31 |RAD)).,...DX..(1|
00000820: AB 28 44 58 AC 44 58 29 29 AD 44 58 00 3E 10 FE |.(DX.DX)).DX.>..|
00000830: 01 8B 20 4C 47 B2 4F 31 20 A7 20 35 39 30 00 4B |.. LG.O1 . 590.K|
00000840: 10 08 02 44 58 B2 C1 28 44 58 29 00 75 10 12 02 |...DX..(DX).u...|
00000850: 44 58 B2 44 58 AC 52 41 44 3A 8B 20 44 58 B3 30 |DX.DX.RAD:. DX.0|
00000860: 20 AF 20 44 58 B1 AB 39 30 20 A7 20 44 58 B2 44 | . DX..90 . DX.D|
00000870: 58 AA 31 38 30 00 87 10 1C 02 44 58 B2 44 58 AC |X.180.....DX.DX.|
00000880: 36 39 2E 30 34 36 38 00 97 10 26 02 44 58 B2 B5 |69.0468...&.DX..|
00000890: 28 44 58 AA 2E 35 29 00 C6 10 27 02 41 24 B2 50 |(DX..5)...'.A$.P|
000008A0: 58 24 28 4A 29 3A 42 24 B2 C8 28 51 24 28 4A 29 |X$(J):B$..(Q$(J)|
000008B0: 2C 32 30 29 3A 43 24 B2 C4 28 41 5A 29 3A 44 24 |,20):C$..(AZ):D$|
000008C0: B2 C4 28 44 58 29 00 E3 10 28 02 99 20 41 24 3B |..(DX)...(.. A$;|
000008D0: A3 36 29 42 24 3B A3 32 38 29 43 24 3B A3 33 33 |.6)B$;.28)C$;.33|
000008E0: 29 44 24 00 F8 10 29 02 8B 20 4C 50 24 B3 B1 22 |)D$...).. LP$.."|
000008F0: 59 22 20 A7 20 35 36 30 00 2E 11 2A 02 98 31 33 |Y" . 560...*..13|
00000900: 2C 22 20 20 20 20 20 22 41 24 A6 31 32 AB C3 28 |," "A$.12..(|
00000910: 41 24 29 29 42 24 A6 32 34 AB C3 28 42 24 29 29 |A$))B$.24..(B$))|
00000920: 43 24 A6 31 33 AB C3 28 43 24 29 29 44 24 00 3A |C$.13..(C$))D$.:|
00000930: 11 2B 02 4C 4E B2 4C 4E AA 31 00 4F 11 2C 02 8B |.+.LN.LN.1.O.,..|
00000940: 20 4C 4E B2 B1 36 30 20 A7 20 8D 20 39 30 30 00 | LN..60 . . 900.|
00000950: 57 11 30 02 82 20 4A 00 6D 11 32 02 8B 20 4C 50 |W.0.. J.m.2.. LP|
00000960: 24 B2 22 59 22 20 A7 20 8D 20 39 32 30 00 83 11 |$."Y" . . 920...|
00000970: 34 02 81 20 4A B2 31 A4 31 30 30 30 3A 99 3B 3A |4.. J.1.1000:.;:|
00000980: 82 20 4A 00 8C 11 36 02 A0 20 31 33 00 92 11 38 |. J...6.. 13...8|
00000990: 02 80 00 AD 11 3A 02 8B 20 4C 54 B1 41 31 20 A7 |.....:.. LT.A1 .|
000009A0: 20 41 5A B2 31 38 30 3A 89 20 34 38 30 00 C6 11 | AZ.180:. 480...|
000009B0: 44 02 8B 20 4C 54 B3 41 31 20 A7 20 41 5A B2 30 |D.. LT.A1 . AZ.0|
000009C0: 3A 89 20 34 38 30 00 E3 11 4E 02 8B 20 4C 54 B1 |:. 480...N.. LT.|
000009D0: 41 31 20 A7 20 44 58 B2 4C 54 AB 41 31 3A 89 20 |A1 . DX.LT.A1:. |
000009E0: 35 33 30 00 00 12 58 02 8B 20 4C 54 B3 41 31 20 |530...X.. LT.A1 |
000009F0: A7 20 44 58 B2 41 31 AB 4C 54 3A 89 20 35 33 30 |. DX.A1.LT:. 530|
00000A00: 00 16 12 84 03 81 20 4C 46 B2 31 20 A4 20 31 31 |...... LF.1 . 11|
00000A10: 3A 98 31 33 3A 82 00 2A 12 89 03 98 31 33 2C 46 |:.13:..*....13,F|
00000A20: 24 3A 98 31 33 3A 4C 4E B2 37 00 30 12 8E 03 8E |$:.13:LN.7.0....|
00000A30: 00 4A 12 98 03 81 20 46 46 B2 4C 4E 20 A4 20 36 |.J.... FF.LN . 6|
00000A40: 35 3A 98 31 33 3A 82 20 46 46 00 50 12 9D 03 8E |5:.13:. FF.P....|
00000A50: 00 00 00 |... |
.......13,4.M.... BEAM ANTENNA HEADING A
ND DISTANCE CHART PROGRAM (COMMODORE)...
... BY KC6A AND N6NB;(C)1983 BY HAYDEN B
OOK CO.,INC......CLS$.G(147)... .. CLS$:
..N.(.. " BEAM HEADING AND DISTANCE PR
OGRAM"...2.. " FOR MAJOR CITIES, DXCC
COUNTRIES".+.7..:. " BE SURE 'LATLON
G' FILE IS ON DISK".5.<..:.:..S.>.."WHAT
IS YOUR CALL ";CL$.S.@..:. "WANT A HARD
COPY ";LP$.{.B..:....F.. PX$(500),Q$(50
0),AX(500),OX(500)...P.RAD.57.2958:PI.3.
14159...Z.F$." PREFIX LOCAT
ION BEARING RANGE".#.D.
. "ENTER YOUR COORDINATES:".P.N.. " US
E '-' FOR BOTH DEGREES AND MINS".}.X.. "
IF SOUTH LATITUDE, EAST LONGITUDE"...
}..:. " EXAMPLE: 33,15 OR -33,-15"....
..:. "LATITUDE ";LA,AM.X.... "LONGITUDE
";LO,OM......:.... .. "ALL MEASUREMENTS
ARE TO THE CENTER OF".=.... "THE COUNTR
Y WHEN NO CITY IS SPECIFIED.".K.... "HEA
DINGS ARE IN DEGREES EAST OF NORTH".....
. "AND DISTANCES ARE IN STATUTE MILES"..
.... "VIA SHORT PATH."......:....... "NO
W READING IN DATA FOR ALL COUNTRIES"...H
.. " PLEASE STAND BY..."...R..:.
:..(...LT.(LA.AM.60).RAD.>...LG.(LO.OM.6
0).RAD.X.... 8,8,8,"LATLONG,S,R".`...J.1
......8,PX$(J),Q$(J),AX(J),OX(J)...... P
X$(J)."ZZZ" . PX$(J)."":Q$(J)."":. 300..
...J.J.1:. 260.F.,. 8.....NO$."N LAT":.
LT.0 . NO$."S LAT"...0.WE$."W LONG":. L
G.0 . WE$."E LONG".'.6.. LP$.."Y" . 360.
H.8.. 13:. .10)"CUSTOM BEAM HEADING AND
DISTANCE CHART FOR ";CL$.P.:..:....<.. .
10)"LOCATED AT ";LA;"-";AM;NO$;" AND ";L
O;"-";OM;WE$...>..:.:....@.. .5) "ALL ME
ASUREMENTS ARE TO THE CENTER OF THE COUN
TRY WHEN".;.B.. .5)"NO CITY IS SPECIFIED
. HEADINGS ARE IN DEGREES EAST OF"...D.
. .5)"NORTH, AND DISTANCES ARE IN STATUT
E MILES VIA SHORT PATH."...F..:....J.. F
$:.13...L.LN.15...H.N.J.1...R.. J.1 . N.
U.|.A1.AX(J).RAD:O1.OX(J).RAD.....L.LG.O
1:. L.0 . 570...... L.PI . L.L.2.PI.....
. L..PI . L.L.2.PI.=...AA..(L).(.(A1)..(
A1)):AA.A(AA).L...AZ.((.(L)..(L))..(LT.A
A))..(AA):AZ.A(1.AZ).....AZ.AZ.RAD:L.L.R
AD...B.. L.0 . AZ.0 . AZ.AZ.180...L.. L.
0 . AZ.0 . AZ.AZ.180.Y.V.. L.0 . AZ.0 .
AZ.AZ.360.....AZ..(AZ..5).....DX.(.(LT).
.(A1)).(.(LT)..(A1)..(L.RAD)).,...DX..(1
.(DX.DX)).DX.>.... LG.O1 . 590.K...DX.A(
DX).U...DX.DX.RAD:. DX.0 . DX..90 . DX.D
X.180.....DX.DX.69.0468...&.DX..(DX..5).
F.'.A$.PX$(J):B$.H(Q$(J),20):C$.D(AZ):D$
.D(DX)...(.. A$;.6)B$;.28)C$;.33)D$...).
. LP$.."Y" . 560...*..13," "A$.12.C(
A$))B$.24.C(B$))C$.13.C(C$))D$.:.+.LN.LN
.1.O.,.. LN..60 . . 900.W.0.. J.M.2.. LP
$."Y" . . 920...4.. J.1.1000:.;:. J...6.
13...8.....:.. LT.A1 . AZ.180:. 480.F.
D.. LT.A1 . AZ.0:. 480...N.. LT.A1 . DX.
LT.A1:. 530...X.. LT.A1 . DX.A1.LT:. 530
...... LF.1 . 11:.13:..*....13,F$:.13:LN
.7.0.....J.... FF.LN . 65:.13:. FF.P....
...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL