AFSTANDBEREKENIN
FILE INFORMATION
FILENAME(S): AFSTANDBEREKENIN
FILE TYPE(S): PRG
FILE SIZE: 2K
FIRST SEEN: 2025-11-30 21:24:23
APPEARS ON: 1 disk(s)
FILE HASH
490c21670f3853c0ddb7764d96a37f9e67cea53f7e8fd2412a39d9e3239cfea7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 SPEL 69 2 | AFSTANDBEREKENIN | PRG | DuncanTwain | 32 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 0B 04 E8 03 89 31 30 32 30 00 29 04 F2 03 |.......1020.)...| 00000010: 99 C7 28 31 34 37 29 3A 8E 3A 8F 20 53 43 48 45 |..(147):.:. SCHE| 00000020: 52 4D 20 53 43 48 4F 4F 4E 00 33 04 FC 03 8D 31 |RM SCHOON.3....1| 00000030: 30 31 30 00 5D 04 06 04 99 22 42 45 52 45 4B 45 |010.]...."BEREKE| 00000040: 4E 49 4E 47 20 56 41 4E 20 44 45 20 41 46 53 54 |NING VAN DE AFST| 00000050: 41 4E 44 20 54 55 53 53 45 4E 22 3A 99 00 87 04 |AND TUSSEN":....| 00000060: 10 04 99 22 54 57 45 45 20 57 49 4C 4C 45 4B 45 |..."TWEE WILLEKE| 00000070: 55 52 49 47 45 20 50 4C 41 41 54 53 45 4E 20 4F |URIGE PLAATSEN O| 00000080: 50 20 44 45 22 3A 99 00 99 04 1A 04 99 22 41 41 |P DE":......."AA| 00000090: 52 44 42 4F 4C 2E 22 3A 99 00 C6 04 24 04 99 22 |RDBOL.":....$.."| 000000A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000C0: 2A 22 3A 99 3A 99 00 F1 04 2E 04 99 22 57 49 4C |*":.:......."WIL| 000000D0: 54 20 55 20 57 45 52 4B 45 4E 20 4D 45 54 20 47 |T U WERKEN MET G| 000000E0: 52 41 44 45 4E 20 45 4E 20 4D 49 4E 2E 28 31 29 |RADEN EN MIN.(1)| 000000F0: 22 00 18 05 38 04 85 22 4F 46 20 4D 45 54 20 44 |"...8.."OF MET D| 00000100: 45 43 49 4D 41 4C 45 20 47 52 41 44 45 4E 20 28 |ECIMALE GRADEN (| 00000110: 32 29 20 22 3B 4D 3A 99 00 22 05 42 04 8D 31 30 |2) ";M:..".B..10| 00000120: 31 30 00 4C 05 4C 04 85 22 47 45 45 46 20 4E 41 |10.L.L.."GEEF NA| 00000130: 41 4D 20 56 41 4E 20 44 45 20 45 45 52 53 54 45 |AM VAN DE EERSTE| 00000140: 20 50 4C 41 41 54 53 20 22 3B 56 24 00 68 05 56 | PLAATS ";V$.h.V| 00000150: 04 99 3A 99 22 47 45 45 46 20 56 41 4E 20 22 3B |..:."GEEF VAN ";| 00000160: 56 24 3B 22 20 44 45 22 00 76 05 60 04 8B 4D B2 |V$;" DE".v.`..M.| 00000170: 31 A7 31 31 34 30 00 A6 05 6A 04 85 22 44 45 43 |1.1140...j.."DEC| 00000180: 49 4D 41 4C 45 20 42 52 45 45 44 54 45 47 52 41 |IMALE BREEDTEGRA| 00000190: 41 44 2C 4E 20 4F 46 20 5A 20 22 3B 49 2C 4A 24 |AD,N OF Z ";I,J$| 000001A0: 3A 89 31 31 36 30 00 D7 05 74 04 85 22 42 52 45 |:.1160...t.."BRE| 000001B0: 45 44 54 45 47 52 41 41 44 20 28 47 52 41 44 45 |EDTEGRAAD (GRADE| 000001C0: 4E 2C 4D 49 4E 2E 2C 4E 20 4F 46 20 5A 29 20 22 |N,MIN.,N OF Z) "| 000001D0: 3B 4E 2C 4F 2C 4A 24 00 E8 05 7E 04 4F B2 4F AD |;N,O,J$...~.O.O.| 000001E0: 36 30 3A 49 B2 4E AA 4F 00 EE 05 88 04 99 00 FC |60:I.N.O........| 000001F0: 05 92 04 8B 4D B2 31 A7 31 32 30 30 00 2D 06 9C |....M.1.1200.-..| 00000200: 04 85 22 47 45 45 46 20 44 45 20 44 45 43 49 4D |.."GEEF DE DECIM| 00000210: 41 4C 45 20 4C 45 4E 47 54 45 47 52 41 41 44 2C |ALE LENGTEGRAAD,| 00000220: 4F 20 4F 46 20 57 20 22 3B 4B 2C 4C 24 00 37 06 |O OF W ";K,L$.7.| 00000230: A6 04 89 31 32 32 30 00 6C 06 B0 04 85 22 47 45 |...1220.l...."GE| 00000240: 45 46 20 4C 45 4E 47 54 45 47 52 41 41 44 20 28 |EF LENGTEGRAAD (| 00000250: 47 52 41 44 45 4E 2C 4D 49 4E 2E 2C 4F 20 4F 46 |GRADEN,MIN.,O OF| 00000260: 20 57 29 20 22 3B 50 2C 51 2C 4C 24 00 7D 06 BA | W) ";P,Q,L$.}..| 00000270: 04 51 B2 51 AD 36 30 3A 4B B2 50 AA 51 00 85 06 |.Q.Q.60:K.P.Q...| 00000280: C4 04 99 3A 99 00 AF 06 CE 04 85 22 47 45 45 46 |...:......."GEEF| 00000290: 20 4E 41 41 4D 20 56 41 4E 20 44 45 20 54 57 45 | NAAM VAN DE TWE| 000002A0: 45 44 45 20 50 4C 41 41 54 53 20 22 3B 57 24 00 |EDE PLAATS ";W$.| 000002B0: CB 06 D8 04 99 3A 99 22 47 45 45 46 20 56 41 4E |.....:."GEEF VAN| 000002C0: 20 22 3B 57 24 3B 22 20 44 45 22 00 D9 06 E2 04 | ";W$;" DE".....| 000002D0: 8B 4D B2 31 A7 31 32 37 30 00 09 07 EC 04 85 22 |.M.1.1270......"| 000002E0: 44 45 43 49 4D 41 4C 45 20 42 52 45 45 44 54 45 |DECIMALE BREEDTE| 000002F0: 47 52 41 41 44 2C 4E 20 4F 46 20 5A 20 22 3B 42 |GRAAD,N OF Z ";B| 00000300: 2C 43 24 3A 89 31 32 39 30 00 3F 07 F6 04 85 22 |,C$:.1290.?...."| 00000310: 47 45 45 46 20 42 52 45 45 44 54 45 47 52 41 41 |GEEF BREEDTEGRAA| 00000320: 44 20 28 47 52 41 44 45 4E 2C 4D 49 4E 2E 2C 4E |D (GRADEN,MIN.,N| 00000330: 20 4F 46 20 5A 29 20 22 3B 52 2C 53 2C 43 24 00 | OF Z) ";R,S,C$.| 00000340: 50 07 00 05 53 B2 53 AD 36 30 3A 42 B2 52 AA 53 |P...S.S.60:B.R.S| 00000350: 00 56 07 0A 05 99 00 64 07 14 05 8B 4D B2 31 A7 |.V.....d....M.1.| 00000360: 31 33 33 30 00 95 07 1E 05 85 22 47 45 45 46 20 |1330......"GEEF | 00000370: 44 45 20 44 45 43 49 4D 41 4C 45 20 4C 45 4E 47 |DE DECIMALE LENG| 00000380: 54 45 47 52 41 41 44 2C 4F 20 4F 46 20 57 20 22 |TEGRAAD,O OF W "| 00000390: 3B 44 2C 45 24 00 9F 07 28 05 89 31 33 35 30 00 |;D,E$...(..1350.| 000003A0: D4 07 32 05 85 22 47 45 45 46 20 4C 45 4E 47 54 |..2.."GEEF LENGT| 000003B0: 45 47 52 41 41 44 20 28 47 52 41 44 45 4E 2C 4D |EGRAAD (GRADEN,M| 000003C0: 49 4E 2E 2C 4F 20 4F 46 20 57 29 20 22 3B 54 2C |IN.,O OF W) ";T,| 000003D0: 55 2C 45 24 00 E5 07 3C 05 55 B2 55 AD 36 30 3A |U,E$...<.U.U.60:| 000003E0: 44 B2 54 AA 55 00 EB 07 46 05 99 00 F6 07 50 05 |D.T.U...F.....P.| 000003F0: 46 B2 39 30 AB 49 00 06 08 5A 05 46 B2 46 AD 35 |F.90.I...Z.F.F.5| 00000400: 37 2E 32 39 35 38 00 16 08 64 05 8B 4A 24 B2 43 |7.2958...d..J$.C| 00000410: 24 A7 31 34 30 30 00 27 08 6E 05 47 B2 39 30 AA |$.1400.'.n.G.90.| 00000420: 42 3A 89 31 34 31 30 00 32 08 78 05 47 B2 39 30 |B:.1410.2.x.G.90| 00000430: AB 42 00 41 08 82 05 8B 44 B1 B2 4B A7 31 34 35 |.B.A....D..K.145| 00000440: 30 00 52 08 8C 05 8B 45 24 B3 B1 4C 24 A7 31 34 |0.R....E$..L$.14| 00000450: 34 30 00 62 08 96 05 48 B2 44 AB 4B 3A 89 31 34 |40.b...H.D.K:.14| 00000460: 38 30 00 6C 08 A0 05 48 B2 44 AA 4B 00 7D 08 AA |80.l...H.D.K.}..| 00000470: 05 8B 45 24 B3 B1 4C 24 A7 31 34 37 30 00 8D 08 |..E$..L$.1470...| 00000480: B4 05 48 B2 4B AB 44 3A 89 31 34 38 30 00 97 08 |..H.K.D:.1480...| 00000490: BE 05 48 B2 4B AA 44 00 B3 08 C8 05 47 B2 47 AD |..H.K.D.....G.G.| 000004A0: 35 37 2E 32 39 35 38 3A 48 B2 48 AD 35 37 2E 32 |57.2958:H.H.57.2| 000004B0: 39 35 38 00 D6 08 D2 05 58 B2 28 BE 28 46 29 AC |958.....X.(.(F).| 000004C0: BE 28 47 29 29 AA 28 BF 28 46 29 AC BF 28 47 29 |.(G)).(.(F)..(G)| 000004D0: AC BE 28 48 29 29 00 E7 08 DC 05 58 B2 58 AD BA |..(H)).....X.X..| 000004E0: 28 31 AB 58 AC 58 29 00 FB 08 E6 05 58 B2 31 2E |(1.X.X).....X.1.| 000004F0: 35 37 30 37 39 36 AB C1 28 58 29 00 13 09 F0 05 |570796..(X).....| 00000500: 58 B2 28 58 AD 33 2E 31 34 31 35 39 32 37 29 AC |X.(X.3.1415927).| 00000510: 31 38 30 00 22 09 FA 05 5A B2 58 AC 31 31 31 2E |180."...Z.X.111.| 00000520: 31 32 00 2D 09 04 06 5A B2 B5 28 5A 29 00 35 09 |12.-...Z..(Z).5.| 00000530: 0E 06 99 3A 99 00 5C 09 18 06 99 22 44 45 20 41 |...:..\...."DE A| 00000540: 46 53 54 41 4E 44 20 54 55 53 53 45 4E 20 22 3B |FSTAND TUSSEN ";| 00000550: 56 24 3B 22 20 45 4E 20 22 3B 57 24 00 7F 09 22 |V$;" EN ";W$..."| 00000560: 06 99 3A 99 22 42 45 44 52 41 41 47 54 20 22 3B |..:."BEDRAAGT ";| 00000570: 5A 3B 22 20 4B 49 4C 4F 4D 45 54 45 52 21 22 00 |Z;" KILOMETER!".| 00000580: 89 09 2C 06 99 3A 99 3A 99 00 AC 09 36 06 85 22 |..,..:.:....6.."| 00000590: 57 49 4C 54 20 55 20 56 45 52 44 45 52 20 47 41 |WILT U VERDER GA| 000005A0: 41 4E 20 28 4A 2F 4E 29 22 3B 46 24 00 C4 09 40 |AN (J/N)";F$...@| 000005B0: 06 8B 46 24 B2 22 4A 22 A7 8D 31 30 31 30 3A 89 |..F$."J"..1010:.| 000005C0: 31 30 39 30 00 E6 09 4A 06 99 3A 99 3A 99 22 54 |1090...J..:.:."T| 000005D0: 4F 54 20 44 45 20 56 4F 4C 47 45 4E 44 45 20 4B |OT DE VOLGENDE K| 000005E0: 45 45 52 20 21 22 00 06 0A 54 06 8F 20 42 45 5A |EER !"...T.. BEZ| 000005F0: 49 54 20 55 20 45 45 4E 20 41 54 4C 41 53 20 44 |IT U EEN ATLAS D| 00000600: 49 45 20 45 45 4E 00 24 0A 5E 06 8F 20 50 4C 41 |IE EEN.$.^.. PLA| 00000610: 41 54 53 4E 41 4D 45 4E 52 45 47 49 53 54 45 52 |ATSNAMENREGISTER| 00000620: 20 4D 45 54 00 45 0A 68 06 8F 20 47 52 41 44 45 | MET.E.h.. GRADE| 00000630: 4E 56 45 52 4D 45 4C 44 49 4E 47 20 42 45 56 41 |NVERMELDING BEVA| 00000640: 54 2C 44 41 4E 00 6B 0A 72 06 8F 20 49 53 20 44 |T,DAN.k.r.. IS D| 00000650: 41 54 20 49 44 45 41 41 4C 20 4F 4D 20 4D 45 45 |AT IDEAAL OM MEE| 00000660: 20 54 45 20 57 45 52 4B 45 4E 2E 00 8E 0A 7C 06 | TE WERKEN....|.| 00000670: 8F 20 4D 4F 45 54 20 55 20 45 56 45 4E 57 45 4C |. MOET U EVENWEL| 00000680: 20 44 45 20 47 52 41 44 45 4E 20 56 41 4E 00 AD | DE GRADEN VAN..| 00000690: 0A 86 06 8F 20 44 45 20 4B 41 41 52 54 20 41 46 |.... DE KAART AF| 000006A0: 4C 45 5A 45 4E 2C 20 44 41 4E 20 49 53 00 D1 0A |LEZEN, DAN IS...| 000006B0: 90 06 8F 20 44 45 4E 4B 45 4C 49 4A 4B 20 44 45 |... DENKELIJK DE| 000006C0: 20 44 45 43 49 4D 41 4C 45 20 4D 45 54 48 4F 44 | DECIMALE METHOD| 000006D0: 45 00 E5 0A 9A 06 8F 20 54 45 20 56 45 52 4B 49 |E...... TE VERKI| 000006E0: 45 5A 45 4E 2E 00 06 0B A4 06 8F 20 57 49 4C 54 |EZEN....... WILT| 000006F0: 20 55 20 41 4C 4C 45 45 4E 20 56 41 4E 20 55 57 | U ALLEEN VAN UW| 00000700: 20 45 49 47 45 4E 00 2A 0B AE 06 8F 20 57 4F 4F | EIGEN.*.... WOO| 00000710: 4E 50 4C 41 41 54 53 20 55 49 54 47 41 41 4E 20 |NPLAATS UITGAAN | 00000720: 44 41 4E 20 4B 55 4E 54 20 55 00 53 0B B8 06 8F |DAN KUNT U.S....| 00000730: 20 45 4E 49 47 45 20 49 4E 50 55 54 47 45 47 45 | ENIGE INPUTGEGE| 00000740: 56 45 4E 53 20 56 41 53 54 20 49 4E 56 4F 45 52 |VENS VAST INVOER| 00000750: 45 4E 2E 00 59 0B C2 06 8F 00 75 0B CC 06 8F 20 |EN..Y.....u.... | 00000760: 42 41 53 49 43 4F 44 45 50 52 4F 47 52 41 4D 4D |BASICODEPROGRAMM| 00000770: 41 20 56 41 4E 00 93 0B D6 06 8F 20 4C 45 4F 20 |A VAN...... LEO | 00000780: 4C 55 49 4A 53 54 45 52 42 55 52 47 20 50 41 30 |LUIJSTERBURG PA0| 00000790: 4C 43 52 00 B6 0B E0 06 8F 20 56 41 4E 20 4D 4F |LCR...... VAN MO| 000007A0: 45 52 4B 45 52 4B 45 4E 53 54 52 41 41 54 20 32 |ERKERKENSTRAAT 2| 000007B0: 38 20 48 55 49 53 00 CD 0B EA 06 8F 20 32 30 32 |8 HUIS...... 202| 000007C0: 35 20 4D 58 20 20 48 41 41 52 4C 45 4D 00 EA 0B |5 MX HAARLEM...| 000007D0: F4 06 8F 20 54 45 4C 45 46 4F 4F 4E 3A 20 30 32 |... TELEFOON: 02| 000007E0: 33 20 2D 20 33 37 34 35 31 32 00 00 00 29 |3 - 374512...) |
.......1020.)....G(147):.:. SCHERM SCHOO N.3....1010.]...."BEREKENING VAN DE AFST AND TUSSEN":......."TWEE WILLEKEURIGE PL AATSEN OP DE":......."AARDBOL.":..F.$.." *********************************":.:... ...."WILT U WERKEN MET GRADEN EN MIN.(1) "...8.."OF MET DECIMALE GRADEN (2) ";M:. .".B..1010.L.L.."GEEF NAAM VAN DE EERSTE PLAATS ";V$.H.V..:."GEEF VAN ";V$;" DE" .V.`..M.1.1140...J.."DECIMALE BREEDTEGRA AD,N OF Z ";I,J$:.1160.W.T.."BREEDTEGRAA D (GRADEN,MIN.,N OF Z) ";N,O,J$...~.O.O. 60:I.N.O............M.1.1200.-...."GEEF DE DECIMALE LENGTEGRAAD,O OF W ";K,L$.7. ...1220.L...."GEEF LENGTEGRAAD (GRADEN,M IN.,O OF W) ";P,Q,L$.}...Q.Q.60:K.P.Q... D..:....N.."GEEF NAAM VAN DE TWEEDE PLAA TS ";W$.K.X..:."GEEF VAN ";W$;" DE".Y... .M.1.1270......"DECIMALE BREEDTEGRAAD,N OF Z ";B,C$:.1290.?...."GEEF BREEDTEGRAA D (GRADEN,MIN.,N OF Z) ";R,S,C$.P...S.S. 60:B.R.S.V.....D....M.1.1330......"GEEF DE DECIMALE LENGTEGRAAD,O OF W ";D,E$... (..1350.T.2.."GEEF LENGTEGRAAD (GRADEN,M IN.,O OF W) ";T,U,E$...<.U.U.60:D.T.U... F.....P.F.90.I...Z.F.F.57.2958...D..J$.C $.1400.'.N.G.90.B:.1410.2.X.G.90.B.A.... D..K.1450.R....E$..L$.1440.B...H.D.K:.14 80.L. .H.D.K.}....E$..L$.1470.....H.K.D: .1480.....H.K.D...H.G.G.57.2958:H.H.57.2 958.V.R.X.(.(F)..(G)).(.(F)..(G)..(H)).. ...X.X..(1.X.X).....X.1.570796.A(X)..... X.(X.3.1415927).180."...Z.X.111.12.-...Z ..(Z).5....:..\...."DE AFSTAND TUSSEN "; V$;" EN ";W$.."..:."BEDRAAGT ";Z;" KILO METER!"...,..:.:....6.."WILT U VERDER GA AN (J/N)";F$.D.@..F$."J"..1010:.1090...J ..:.:."TOT DE VOLGENDE KEER !"...T.. BEZ IT U EEN ATLAS DIE EEN.$.^.. PLAATSNAMEN REGISTER MET.E.H.. GRADENVERMELDING BEVA T,DAN.K.R.. IS DAT IDEAAL OM MEE TE WERK EN....|.. MOET U EVENWEL DE GRADEN VAN.. .... DE KAART AFLEZEN, DAN IS.Q.... DENK ELIJK DE DECIMALE METHODE...... TE VERKI EZEN....... WILT U ALLEEN VAN UW EIGEN.* .... WOONPLAATS UITGAAN DAN KUNT U.S.... ENIGE INPUTGEGEVENS VAST INVOEREN..Y.B. ..U.L.. BASICODEPROGRAMMA VAN...V.. LEO LUIJSTERBURG PA0LCR...... VAN MOERKERKEN STRAAT 28 HUIS.M.... 2025 MX HAARLEM... ... TELEFOON: 023 - 374512...)
> CLICK IMAGE PREVIEW FOR FULL MODAL