MONDPHASEN
FILE INFORMATION
FILENAME(S): MONDPHASEN
FILE TYPE(S): PRG
FILE SIZE: 2K
FIRST SEEN: 2025-11-02 16:39:17
APPEARS ON: 2 disk(s)
FILE HASH
2381085f6c2cff58d5f34577cee21df5243db12e0f280af2ff07370a14dd4062
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PD DISK NR | MONDPHASEN | PRG | Treasure Chest - Plattfuss | 9 | 1 | DOWNLOAD FILE |
| PD DISK NR | MONDPHASEN | PRG | Treasure Chest - Plattfuss | 9 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 02 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..(.... ********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 2A 2A 2A 2A 2A 2A 00 4F 08 04 00 8F 20 2A |********.O.... *| 00000030: 20 4D 4F 4E 44 50 48 41 53 45 4E 42 45 52 45 43 | MONDPHASENBEREC| 00000040: 48 4E 55 4E 47 20 20 20 35 2F 38 33 20 20 2A 00 |HNUNG 5/83 *.| 00000050: 76 08 06 00 8F 20 2A 20 42 59 20 50 2E 4D 45 52 |v.... * BY P.MER| 00000060: 54 45 4E 53 20 2C 20 35 38 20 48 41 47 45 4E 20 |TENS , 58 HAGEN | 00000070: 20 20 20 20 20 2A 00 9D 08 08 00 8F 20 2A 2A 2A | *...... ***| 00000080: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000090: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B0 08 |*************...| 000000A0: 0A 00 99 22 93 22 3A 97 20 35 33 32 38 30 2C 36 |...".":. 53280,6| 000000B0: 00 DF 08 0F 00 53 24 B2 22 2D 2D 2D 2D 2D 2D 2D |.....S$."-------| 000000C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000000D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".| 000000E0: 0A 09 14 00 99 22 20 20 20 20 20 20 20 20 20 4D |....." M| 000000F0: 4F 4E 44 50 48 41 53 45 4E 2D 42 45 52 45 43 48 |ONDPHASEN-BERECH| 00000100: 4E 55 4E 47 11 22 3A 99 53 24 00 53 09 1E 00 99 |NUNG.":.S$.S....| 00000110: 22 11 44 49 45 53 45 53 20 50 52 4F 47 52 41 4D |".DIESES PROGRAM| 00000120: 4D 20 42 45 52 45 43 48 4E 45 54 20 44 49 45 20 |M BERECHNET DIE | 00000130: 41 4E 5A 41 48 4C 20 44 45 52 54 41 47 45 20 4E |ANZAHL DERTAGE N| 00000140: 41 43 48 20 56 4F 4C 4C 4D 4F 4E 44 20 55 4E 44 |ACH VOLLMOND UND| 00000150: 20 22 3B 00 9F 09 23 00 99 22 47 49 42 54 20 44 | ";...#.."GIBT D| 00000160: 49 45 20 50 48 41 53 45 20 20 20 44 45 53 20 4D |IE PHASE DES M| 00000170: 4F 4E 44 45 53 20 49 4E 20 56 49 45 52 54 45 4C |ONDES IN VIERTEL| 00000180: 4E 20 44 45 52 20 56 4F 4C 4C 45 4E 20 20 20 20 |N DER VOLLEN | 00000190: 20 20 20 53 43 48 45 49 42 45 20 41 4E 2E 22 00 | SCHEIBE AN.".| 000001A0: D1 09 28 00 99 22 11 11 42 45 49 20 56 4F 4C 4C |..(.."..BEI VOLL| 000001B0: 45 4D 20 42 49 4C 44 53 43 48 49 52 4D 20 57 45 |EM BILDSCHIRM WE| 000001C0: 49 54 45 52 20 4D 49 54 20 3C 53 50 41 43 45 3E |ITER MIT <SPACE>| 000001D0: 22 00 19 0A 32 00 99 22 11 47 45 42 45 4E 20 53 |"...2..".GEBEN S| 000001E0: 49 45 20 4E 55 4E 20 42 49 54 54 45 20 44 45 4E |IE NUN BITTE DEN| 000001F0: 20 4D 4F 4E 41 54 20 28 41 4C 53 20 5A 41 48 4C | MONAT (ALS ZAHL| 00000200: 29 55 4E 44 20 44 41 53 20 4A 41 48 52 20 45 49 |)UND DAS JAHR EI| 00000210: 4E 2C 46 55 45 52 20 22 3B 00 59 0A 37 00 99 22 |N,FUER ";.Y.7.."| 00000220: 57 45 4C 43 48 45 53 20 45 49 4E 45 20 20 20 20 |WELCHES EINE | 00000230: 20 20 42 45 52 45 43 48 4E 55 4E 47 20 44 55 52 | BERECHNUNG DUR| 00000240: 43 48 47 45 46 55 45 48 52 54 20 57 45 52 44 45 |CHGEFUEHRT WERDE| 00000250: 4E 20 53 4F 4C 4C 20 21 22 00 71 0A 3C 00 85 20 |N SOLL !".q.<.. | 00000260: 22 11 4D 4F 4E 41 54 2C 4A 41 48 52 22 3B 4D 2C |".MONAT,JAHR";M,| 00000270: 4A 00 7E 0A 46 00 54 B2 31 3A 54 54 B2 31 00 8F |J.~.F.T.1:TT.1..| 00000280: 0A 6E 00 8B 20 4D B1 31 32 20 A7 20 33 32 30 00 |.n.. M.12 . 320.| 00000290: CA 0A 78 00 8B 4A B3 31 35 38 33 20 A7 20 99 22 |..x..J.1583 . ."| 000002A0: 11 11 42 45 52 45 43 48 4E 55 4E 47 20 45 52 53 |..BERECHNUNG ERS| 000002B0: 54 20 41 42 20 31 35 38 33 20 4D 4F 45 47 4C 49 |T AB 1583 MOEGLI| 000002C0: 43 48 20 21 22 3A 89 20 36 30 00 D4 0A 82 00 8D |CH !":. 60......| 000002D0: 20 36 30 30 00 FB 0A C8 00 8B 28 4A AD 34 B3 B1 | 600......(J.4..| 000002E0: B5 28 4A AD 34 29 B0 4A AD 31 30 30 B2 B5 28 4A |.(J.4).J.100..(J| 000002F0: AD 31 30 30 29 29 A7 20 35 39 30 00 14 0B CD 00 |.100)). 590.....| 00000300: 8B 20 28 54 B1 32 39 29 AC 28 4D B2 32 29 20 A7 |. (T.29).(M.2) .| 00000310: 20 37 30 30 00 41 0B D2 00 8B 20 28 54 B1 33 30 | 700.A.... (T.30| 00000320: 29 AC 28 28 4D B2 34 29 AA 28 4D B2 36 29 AA 28 |).((M.4).(M.6).(| 00000330: 0D B2 39 29 AA 28 4D B2 31 31 29 29 A7 20 37 30 |..9).(M.11)). 70| 00000340: 30 00 52 0B DC 00 0B 20 54 B1 33 31 20 A7 20 37 |0.R.... T.31 . 7| 00000350: 30 30 00 84 0B E6 00 53 B2 32 39 2E 35 33 30 35 |00.....S.29.5305| 00000360: 39 3A 8F 20 53 59 4E 4F 44 49 53 43 48 45 20 55 |9:. SYNODISCHE U| 00000370: 4D 4C 41 55 46 5A 45 49 54 20 44 45 53 20 4D 4F |MLAUFZEIT DES MO| 00000380: 4E 44 45 53 00 8F 0B F0 00 53 4E B2 53 AD 32 00 |NDES.....SN.S.2.| 00000390: A7 0B FA 00 46 31 B2 54 AA 33 31 AC 28 4D AB 31 |....F1.T.31.(M.1| 000003A0: 29 AA 33 36 35 AC 4A 00 B7 0B 04 01 8B 20 4D B1 |).365.J...... M.| 000003B0: 32 20 A7 20 34 30 30 00 E3 0B 0E 01 46 32 B2 B5 |2 . 400.....F2..| 000003C0: 28 28 4A AB 31 29 AD 34 29 AB B5 28 28 33 AD 34 |((J.1).4)..((3.4| 000003D0: 29 AC 28 B5 28 28 4A AB 31 29 AD 31 30 30 29 29 |).(.((J.1).100))| 000003E0: AA 31 29 00 EF 0B 18 01 46 B2 46 31 AA 46 32 00 |.1).....F.F1.F2.| 000003F0: 02 0C 22 01 57 B2 46 AB 28 B5 28 46 AD 37 29 AC |..".W.F.(.(F.7).| 00000400: 37 29 00 24 0C 2C 01 91 20 57 20 89 20 34 32 30 |7).$.,.. W . 420| 00000410: 2C 34 33 30 2C 34 34 30 2C 34 35 30 2C 34 36 30 |,430,440,450,460| 00000420: 2C 34 37 30 00 39 0C 36 01 44 24 B2 22 20 53 41 |,470.9.6.D$." SA| 00000430: 20 22 20 3A 89 20 34 38 30 00 88 0C 40 01 99 22 | " :. 480...@.."| 00000440: 93 11 11 1D 57 49 54 5A 42 4F 4C 44 2C 45 53 20 |....WITZBOLD,ES | 00000450: 47 49 42 54 20 4E 55 52 20 31 32 20 4D 0F 4E 41 |GIBT NUR 12 M.NA| 00000460: 54 45 2C 44 41 53 20 20 20 20 20 20 53 4F 4C 4C |TE,DAS SOLL| 00000470: 54 45 20 57 4F 48 4C 20 45 49 4E 20 54 45 53 54 |TE WOHL EIN TEST| 00000480: 20 53 45 49 4E 20 3F 22 00 99 0C 4A 01 81 20 41 | SEIN ?"...J.. A| 00000490: B2 31 A4 34 30 30 30 3A 82 00 9F 0C 54 01 8A 00 |.1.4000:....T...| 000004A0: D1 0C 90 01 46 B2 46 31 AB B5 28 2E 34 AC 4D AA |....F.F1..(.4.M.| 000004B0: 32 2E 33 29 AA B5 28 4A AD 34 29 AB B5 28 28 33 |2.3)..(J.4)..((3| 000004C0: AD 34 29 AC 28 B5 28 4A AD 31 30 30 29 AA 31 29 |.4).(.(J.100).1)| 000004D0: 29 00 DB 0C 9A 01 89 20 32 39 30 00 F4 0C A4 01 |)...... 290.....| 000004E0: 44 24 B2 22 20 53 4F 20 22 20 20 20 3A 99 3A 89 |D$." SO " :.:.| 000004F0: 20 34 38 30 00 0B 0D AE 01 44 24 B2 22 20 4D 4F | 480.....D$." MO| 00000500: 20 22 20 20 20 3A 89 20 34 38 30 00 22 0D B8 01 | " :. 480."...| 00000510: 44 24 B2 22 20 44 49 20 22 20 20 20 3A 89 20 34 |D$." DI " :. 4| 00000520: 38 30 00 39 0D C2 01 44 24 B2 22 20 4D 49 20 22 |80.9...D$." MI "| 00000530: 20 20 20 3A 89 20 34 38 30 00 50 0D CC 01 44 24 | :. 480.P...D$| 00000540: B2 22 20 44 4F 20 22 20 20 20 3A 89 20 34 38 30 |." DO " :. 480| 00000550: 00 67 0D D6 01 44 24 B2 22 20 46 52 20 22 20 20 |.g...D$." FR " | 00000560: 20 3A 89 20 34 38 30 00 7A 0D E0 01 41 B2 28 46 | :. 480.z...A.(F| 00000570: AB 35 37 38 32 30 31 29 AD 53 00 92 0D EA 01 54 |.578201).S.....T| 00000580: 4E B2 B5 28 53 AC 28 41 AB B5 28 41 29 29 AA 2E |N..(S.(A..(A))..| 00000590: 35 29 00 A4 0D F4 01 8B 20 54 4E B1 53 4E 20 A7 |5)...... TN.SN .| 000005A0: 20 35 32 30 00 BA 0D FE 01 50 B2 34 AC 28 54 4E | 520.....P.4.(TN| 000005B0: AD 53 4E 29 3A 89 20 35 33 30 00 CE 0D 08 02 50 |.SN):. 530.....P| 000005C0: B2 34 AC 28 28 54 4E AB 53 29 AD 53 4E 29 00 DC |.4.((TN.S).SN)..| 000005D0: 0D 12 02 50 B2 B5 28 50 AA 2E 35 29 00 F7 0D 1C |...P..(P..5)....| 000005E0: 02 99 20 44 24 3B 54 3B 22 9D 2E 22 2C 2C 50 2C |.. D$;T;"..",,P,| 000005F0: 54 4E 3B 22 9D 2E 22 00 01 0E 21 02 54 B2 54 AA |TN;".."...!.T.T.| 00000600: 31 00 19 0E 26 02 41 B2 C2 28 31 39 30 36 29 3A |1...&.A..(1906):| 00000610: 42 B2 C2 28 31 39 34 36 29 00 2E 0E 30 02 8B 20 |B..(1946)...0.. | 00000620: 41 20 AA 20 42 B2 36 34 20 A7 20 32 30 30 00 46 |A . B.64 . 200.F| 00000630: 0E 3A 02 A1 20 41 24 3A 8B 20 41 24 B3 B1 22 20 |.:.. A$:. A$.." | 00000640: 22 A7 20 35 37 30 00 58 0E 44 02 8D 20 36 30 30 |". 570.X.D.. 600| 00000650: 20 3A 20 89 20 32 30 30 00 6F 0E 4E 02 8B 28 54 | : . 200.o.N..(T| 00000660: B1 32 38 29 AC 28 4D B2 32 29 A7 20 37 30 30 00 |.28).(M.2). 700.| 00000670: 79 0E 53 02 89 20 32 30 35 00 95 0E 58 02 99 22 |y.S.. 205...X.."| 00000680: 93 11 1D 4D 4F 4E 44 50 48 41 53 45 4E 20 41 42 |...MONDPHASEN AB| 00000690: 20 3A 20 22 2C 00 AC 0E 62 02 99 20 54 54 3B 22 | : ",...b.. TT;"| 000006A0: 9D 2E 22 3B 4D 3B 22 9D 2E 22 3B 4A 00 CA 0E 6C |..";M;"..";J...l| 000006B0: 02 99 22 11 1D 50 48 3A 50 48 41 53 45 20 49 4E |.."..PH:PHASE IN| 000006C0: 20 56 49 45 52 54 45 4C 4E 22 00 E7 0E 76 02 99 | VIERTELN"...v..| 000006D0: 22 1D 54 4E 4E 3A 54 41 47 20 4E 41 43 48 20 4E |".TNN:TAG NACH N| 000006E0: 45 55 4D 4F 4E 44 22 00 04 0F 80 02 99 22 1D 50 |EUMOND"......".P| 000006F0: 48 28 2D 29 3A 4D 4F 4E 44 20 41 42 4E 45 48 4D |H(-):MOND ABNEHM| 00000700: 45 4E 44 22 00 26 0F 8A 02 99 22 11 1D 44 41 54 |END".&...."..DAT| 00000710: 55 4D 22 2C 2C 22 50 48 22 2C 22 54 4E 4E 22 3A |UM",,"PH","TNN":| 00000720: 99 53 24 20 3A 8E 00 46 0F BC 02 99 22 11 20 4E |.S$ :..F....". N| 00000730: 41 45 43 48 53 54 45 52 20 4D 4F 4E 41 54 20 20 |AECHSTER MONAT | 00000740: 4A 2F 4E 20 3F 22 00 5B 0F C6 02 A1 20 42 24 3A |J/N ?".[.... B$:| 00000750: 8B 42 24 B2 22 22 A7 20 37 31 30 00 7A 0F D0 02 |.B$."". 710.z...| 00000760: 8B 20 42 24 B2 22 4A 22 A7 20 4D B2 4D AA 31 3A |. B$."J". M.M.1:| 00000770: 54 B2 31 3A 20 89 20 38 30 30 00 99 0F DA 02 99 |T.1: . 800......| 00000780: 22 93 11 11 1D 4E 45 55 45 20 45 49 4E 47 41 42 |"....NEUE EINGAB| 00000790: 45 20 20 4A 2F 4E 20 3F 22 00 AF 0F E4 02 A1 20 |E J/N ?"...... | 000007A0: 42 24 3A 8B 20 42 24 B2 22 22 A7 20 37 34 30 00 |B$:. B$."". 740.| 000007B0: BF 0F EE 02 8B 20 42 24 B2 22 4A 22 A7 20 8A 00 |..... B$."J". ..| 000007C0: DC 0F F8 02 99 22 93 11 11 1D 41 55 46 20 57 49 |....."....AUF WI| 000007D0: 45 44 45 52 53 45 48 45 4E 20 21 22 00 E6 0F 02 |EDERSEHEN !"....| 000007E0: 03 89 20 37 37 30 00 FD 0F 20 03 8B 20 4D B1 31 |.. 770... .. M.1| 000007F0: 32 20 A7 20 4A B2 4A AA 31 3A 4D B2 31 00 07 10 |2 . J.J.1:M.1...| 00000800: 2A 03 89 20 31 32 30 00 0D 10 34 03 80 00 00 00 |*.. 120...4.....| 00000810: 12 |. |
..(.... ******************************** .O.... * MONDPHASENBERECHNUNG 5/83 *. V.... * BY P.MERTENS , 58 HAGEN *.. .... ********************************... ...".":. 53280,6.....S$."--------------- ----------------------"......" M ONDPHASEN-BERECHNUNG.":.S$.S....".DIESES PROGRAMM BERECHNET DIE ANZAHL DERTAGE N ACH VOLLMOND UND ";...#.."GIBT DIE PHASE DES MONDES IN VIERTELN DER VOLLEN SCHEIBE AN.".Q.(.."..BEI VOLLEM BILDS CHIRM WEITER MIT <SPACE>"...2..".GEBEN S IE NUN BITTE DEN MONAT (ALS ZAHL)UND DAS JAHR EIN,FUER ";.Y.7.."WELCHES EINE BERECHNUNG DURCHGEFUEHRT WERDEN SOLL ! ".Q.<.. ".MONAT,JAHR";M,J.~.F.T.1:TT.1.. .N.. M.12 . 320.J.X..J.1583 . ."..BERECH NUNG ERST AB 1583 MOEGLICH !":. 60.T.... 600...H..(J.4...(J.4).J.100..(J.100)). 590...M.. (T.29).(M.2) . 700.A.R.. (T.30 ).((M.4).(M.6).(..9).(M.11)). 700.R.... T.31 . 700.....S.29.53059:. SYNODISCHE U MLAUFZEIT DES MONDES.....SN.S.2.....F1.T .31.(M.1).365.J...... M.2 . 400.....F2.. ((J.1).4)..((3.4).(.((J.1).100)).1)..... F.F1.F2...".W.F.(.(F.7).7).$.,.. W . 420 ,430,440,450,460,470.9.6.D$." SA " :. 48 0...@.."....WITZBOLD,ES GIBT NUR 12 M.NA TE,DAS SOLLTE WOHL EIN TEST SEIN ?" ...J.. A.1.4000:....T...Q...F.F1..(.4.M. 2.3)..(J.4)..((3.4).(.(J.100).1))...... 290.....D$." SO " :.:. 480.....D$." MO " :. 480."...D$." DI " :. 480.9.B.D $." MI " :. 480.P.L.D$." DO " :. 480 .G.V.D$." FR " :. 480.Z...A.(F.578201) .S.....TN..(S.(A..(A))..5)...... TN.SN . 520.....P.4.(TN.SN):. 530.N...P.4.((TN. S).SN).....P..(P..5)...... D$;T;"..",,P, TN;".."...!.T.T.1...&.A.B(1906):B.B(1946 )...0.. A . B.64 . 200.F.:.. A$:. A$.." ". 570.X.D.. 600 : . 200.O.N..(T.28).(M. 2). 700.Y.S.. 205...X.."...MONDPHASEN AB : ",...B.. TT;"..";M;"..";J.J.L.."..PH: PHASE IN VIERTELN"...V..".TNN:TAG NACH N EUMOND"......".PH(-):MOND ABNEHMEND".&.. .."..DATUM",,"PH","TNN":.S$ :..F....". N AECHSTER MONAT J/N ?".[.F.. B$:.B$."". 710.Z.P.. B$."J". M.M.1:T.1: . 800...Z.. "....NEUE EINGABE J/N ?"...... B$:. B$. "". 740...... B$."J". ......."....AUF WI EDERSEHEN !"...... 770... .. M.12 . J.J. 1:M.1...*.. 120...4......
> CLICK IMAGE PREVIEW FOR FULL MODAL