BIO 2
FILE INFORMATION
FILENAME(S): BIO 2
FILE TYPE(S): PRG
FILE SIZE: 2.8K
FIRST SEEN: 2025-11-02 16:42:21
APPEARS ON: 1 disk(s)
FILE HASH
911a86d479aeb53869559b270cb329e24ebed273a44ab0275caa1ec7fcce50a0
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TEST DISK | BIO 2 | PRG | Treasure Chest - ralf | 17 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 13 08 0A 00 8F 20 42 49 4F 52 48 59 54 48 |....... BIORHYTH| 00000010: 4D 55 53 00 25 08 14 00 8F 20 3D 3D 3D 3D 3D 3D |MUS.%.... ======| 00000020: 3D 3D 3D 3D 3D 00 35 08 1E 00 8F 20 56 41 52 49 |=====.5.... VARI| 00000030: 41 42 4C 45 4E 00 54 08 28 00 8F 20 54 48 2C 4D |ABLEN.T.(.. TH,M| 00000040: 48 2C 4A 48 20 20 48 45 55 54 49 47 45 53 20 44 |H,JH HEUTIGES D| 00000050: 41 54 55 4D 00 7D 08 32 00 8F 20 57 48 20 20 20 |ATUM.}.2.. WH | 00000060: 20 20 20 20 20 48 45 55 54 49 47 45 20 57 4F 43 | HEUTIGE WOC| 00000070: 48 45 4E 54 41 47 53 4E 55 4D 4D 45 52 00 A0 08 |HENTAGSNUMMER...| 00000080: 3C 00 8F 20 57 48 24 20 20 20 20 20 20 20 48 45 |<.. WH$ HE| 00000090: 55 54 49 47 45 52 20 57 4F 43 48 45 4E 54 41 47 |UTIGER WOCHENTAG| 000000A0: 00 BC 08 46 00 8F 20 54 4E 20 20 20 20 20 20 20 |...F.. TN | 000000B0: 20 54 41 47 45 53 4E 55 4D 4D 45 52 00 D9 08 50 | TAGESNUMMER...P| 000000C0: 00 8F 20 54 47 2C 4D 47 2C 4A 47 20 20 47 45 42 |.. TG,MG,JG GEB| 000000D0: 55 52 54 53 44 41 54 55 4D 00 07 09 5A 00 8F 20 |URTSDATUM...Z.. | 000000E0: 4E 47 20 20 20 20 20 20 20 20 54 41 47 45 53 4E |NG TAGESN| 000000F0: 55 4D 4D 45 52 20 44 45 53 20 47 45 45 42 55 52 |UMMER DES GEEBUR| 00000100: 54 53 54 41 47 45 53 00 23 09 64 00 8F 20 4C 41 |TSTAGES.#.d.. LA| 00000110: 20 20 20 20 20 20 20 20 4C 45 42 45 4E 53 41 4C | LEBENSAL| 00000120: 54 45 52 00 48 09 6E 00 8F 20 4E 31 20 20 20 20 |TER.H.n.. N1 | 00000130: 20 20 20 20 54 41 47 45 53 5A 41 45 48 4C 45 52 | TAGESZAEHLER| 00000140: 28 5A 45 48 4E 45 52 29 00 6D 09 78 00 8F 20 4E |(ZEHNER).m.x.. N| 00000150: 32 20 20 20 20 20 20 20 20 20 54 41 47 45 53 5A |2 TAGESZ| 00000160: 41 45 48 4C 45 52 28 45 49 4E 45 52 29 00 8B 09 |AEHLER(EINER)...| 00000170: 82 00 8F 20 41 2C 42 2C 43 20 20 20 20 20 44 41 |... A,B,C DA| 00000180: 54 55 4D 53 5A 41 45 48 4C 45 52 00 B2 09 8C 00 |TUMSZAEHLER.....| 00000190: 8F 20 57 5A 20 20 20 20 20 20 20 20 57 4F 43 48 |. WZ WOCH| 000001A0: 45 4E 54 41 47 53 5A 41 45 48 4C 45 52 28 30 2D |ENTAGSZAEHLER(0-| 000001B0: 36 29 00 CC 09 96 00 8F 20 57 24 20 20 20 20 20 |6)...... W$ | 000001C0: 20 20 20 57 4F 43 48 45 4E 54 41 47 00 E0 09 A0 | WOCHENTAG....| 000001D0: 00 8F 20 48 41 55 50 54 50 52 4F 47 52 41 4D 4D |.. HAUPTPROGRAMM| 000001E0: 00 F4 09 AA 00 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D |...... =========| 000001F0: 3D 3D 3D 3D 00 01 0A B4 00 8F 20 44 49 41 4C 4F |====...... DIALO| 00000200: 47 00 0E 0A BE 00 8F 20 2D 2D 2D 2D 2D 2D 00 14 |G...... ------..| 00000210: 0A C8 00 8F 00 1F 0A D2 00 8D 20 31 30 30 30 00 |.......... 1000.| 00000220: 4E 0A DC 00 85 22 48 45 55 54 49 47 45 53 20 44 |N...."HEUTIGES D| 00000230: 41 54 55 4D 28 54 41 47 2C 4D 4F 4E 41 54 2C 4A |ATUM(TAG,MONAT,J| 00000240: 41 48 52 29 22 3B 54 48 2C 4D 48 2C 4A 48 00 61 |AHR)";TH,MH,JH.a| 00000250: 0A E6 00 54 B2 54 48 3A 4D B2 4D 48 3A 4A B2 4A |...T.TH:M.MH:J.J| 00000260: 48 00 82 0A F0 00 8D 20 31 30 30 30 30 3A 8F 20 |H...... 10000:. | 00000270: 55 50 20 44 41 54 45 4E 20 45 52 53 54 45 4C 4C |UP DATEN ERSTELL| 00000280: 45 4E 00 97 0A FA 00 57 48 B2 57 3A 57 48 24 B2 |EN.....WH.W:WH$.| 00000290: 57 24 3A 54 4E B2 4E 00 B0 0A 04 01 99 22 48 45 |W$:TN.N......"HE| 000002A0: 55 54 45 20 49 53 54 20 22 3B 57 24 3B 22 2E 22 |UTE IST ";W$;"."| 000002B0: 00 D2 0A 0E 01 85 22 57 49 45 20 48 45 49 53 53 |......"WIE HEISS| 000002C0: 54 20 44 55 28 56 4F 52 4E 41 4D 45 29 3F 22 3B |T DU(VORNAME)?";| 000002D0: 4E 24 00 E5 0A 18 01 41 B2 54 48 3A 42 B2 4D 48 |N$.....A.TH:B.MH| 000002E0: 3A 43 B2 4A 48 00 01 0B 22 01 99 4E 24 3B 22 20 |:C.JH..."..N$;" | 000002F0: 41 4E 20 57 45 4C 43 48 45 4D 20 44 41 54 55 4D |AN WELCHEM DATUM| 00000300: 22 00 32 0B 2C 01 99 20 20 20 22 42 49 53 54 20 |".2.,.. "BIST | 00000310: 44 55 20 47 45 42 4F 52 45 4E 20 57 4F 52 44 45 |DU GEBOREN WORDE| 00000320: 4E 28 54 41 47 2C 4D 4F 4E 41 54 2C 4A 41 48 52 |N(TAG,MONAT,JAHR| 00000330: 29 22 00 41 0B 36 01 85 20 54 47 2C 4D 47 2C 4A |)".A.6.. TG,MG,J| 00000340: 47 00 54 0B 40 01 54 B2 54 47 3A 4D B2 4D 47 3A |G.T.@.T.TG:M.MG:| 00000350: 4A B2 4A 47 00 76 0B 4A 01 8D 20 31 30 30 30 30 |J.JG.v.J.. 10000| 00000360: 3A 8F 20 47 45 42 55 52 53 44 41 54 55 4D 20 5A |:. GEBURSDATUM Z| 00000370: 41 45 48 4C 45 4E 00 86 0B 54 01 57 47 24 B2 57 |AEHLEN...T.WG$.W| 00000380: 24 3A 4E 47 B2 4E 00 93 0B 5E 01 4C 41 B2 54 4E |$:NG.N...^.LA.TN| 00000390: AB 4E 47 00 CB 0B 68 01 99 20 4E 24 3B 22 44 45 |.NG...h.. N$;"DE| 000003A0: 52 22 3B 54 47 3B 22 2E 22 3B 4D 47 3B 22 2E 22 |R";TG;".";MG;"."| 000003B0: 3B 4A 47 3B 22 57 41 52 20 41 55 46 20 45 49 4E |;JG;"WAR AUF EIN| 000003C0: 45 4D 20 22 3B 57 24 3B 22 2E 22 00 EF 0B 72 01 |EM ";W$;"."...r.| 000003D0: 99 22 44 55 20 42 49 53 54 20 53 4F 4D 49 54 22 |."DU BIST SOMIT"| 000003E0: 3B 4C 41 3B 22 54 41 47 45 20 41 4C 54 2E 22 00 |;LA;"TAGE ALT.".| 000003F0: 0B 0C 7C 01 8F 20 41 55 53 20 47 41 42 45 20 44 |..|.. AUS GABE D| 00000400: 45 52 20 42 49 4F 57 45 52 54 45 00 36 0C 86 01 |ER BIOWERTE.6...| 00000410: 99 22 44 45 49 4E 20 42 49 4F 52 48 54 59 48 4D |."DEIN BIORHTYHM| 00000420: 55 53 20 53 49 45 48 54 20 48 45 55 54 45 20 55 |US SIEHT HEUTE U| 00000430: 4E 44 20 49 4E 22 00 62 0C 90 01 99 22 44 45 4E |ND IN".b...."DEN| 00000440: 20 4E 41 45 43 48 53 54 45 4E 20 39 20 54 41 47 | NAECHSTEN 9 TAG| 00000450: 45 4E 20 57 49 45 20 46 4F 4C 47 54 20 41 55 53 |EN WIE FOLGT AUS| 00000460: 3A 22 00 6B 0C 9A 01 4E 31 B2 30 00 92 0C A4 01 |:".k...N1.0.....| 00000470: 99 22 44 41 54 55 4D 22 2C 22 4B 4F 45 52 50 2E |."DATUM","KOERP.| 00000480: 22 2C 22 53 45 45 4C 2E 22 2C 22 47 45 49 53 54 |","SEEL.","GEIST| 00000490: 2E 22 00 BE 0C AE 01 81 20 4E 32 B2 30 20 A4 20 |."...... N2.0 . | 000004A0: 39 3A 8F 20 53 43 48 4C 45 49 46 45 20 46 55 45 |9:. SCHLEIFE FUE| 000004B0: 52 20 54 41 47 45 53 5A 41 45 48 4C 45 52 00 EC |R TAGESZAEHLER..| 000004C0: 0C B8 01 5A B2 28 4C 41 AA 4E 31 AA 4E 32 29 AC |...Z.(LA.N1.N2).| 000004D0: 32 AC 33 2E 31 34 35 39 3A 8F 20 5A 41 45 48 4C |2.3.1459:. ZAEHL| 000004E0: 45 52 20 42 45 52 45 43 48 4E 45 4E 00 F8 0C C2 |ER BERECHNEN....| 000004F0: 01 8D 20 32 30 30 30 30 00 17 0D D6 01 8B 20 C3 |.. 20000...... .| 00000500: 28 41 24 29 B2 32 20 A7 20 41 24 B2 22 30 22 AA |(A$).2 . A$."0".| 00000510: C9 28 41 24 2C 31 29 00 35 0D E0 01 8B 20 C3 28 |.(A$,1).5.... .(| 00000520: 42 24 29 B2 32 20 A7 42 24 B2 22 30 22 AA C9 28 |B$).2 .B$."0"..(| 00000530: 42 24 2C 31 29 00 58 0D EA 01 44 41 24 B2 57 4B |B$,1).X...DA$.WK| 00000540: 24 AA 28 41 24 29 AA 22 2E 22 AA 28 42 24 29 AA |$.(A$).".".(B$).| 00000550: 22 2E 22 AA 28 43 24 29 00 62 0D F4 01 99 44 41 |".".(C$).b....DA| 00000560: 24 2C 00 78 0D FE 01 99 20 B5 28 31 30 30 AC BF |$,.x.... .(100..| 00000570: 28 5A AD 32 33 29 29 2C 00 8E 0D 08 02 99 20 B5 |(Z.23)),...... .| 00000580: 28 31 30 30 AC BF 28 5A AD 32 39 29 29 2C 00 A4 |(100..(Z.29)),..| 00000590: 0D 12 02 99 20 B5 28 31 30 30 AC BF 28 5A AD 33 |.... .(100..(Z.3| 000005A0: 33 29 29 2C 00 AD 0D 1C 02 82 20 4E 32 00 CB 0D |3)),...... N2...| 000005B0: 26 02 8F 20 46 4F 52 54 53 45 54 5A 55 4E 47 20 |&.. FORTSETZUNG | 000005C0: 44 45 53 20 44 49 41 4C 4F 47 53 00 E9 0D 30 02 |DES DIALOGS...0.| 000005D0: 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |. --------------| 000005E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 FB 0D 3A 02 99 22 |---------...:.."| 000005F0: 57 45 49 54 45 52 20 4D 49 54 22 00 1E 0E 44 02 |WEITER MIT"...D.| 00000600: 99 22 20 20 20 20 20 20 20 20 20 20 5A 3D 57 45 |." Z=WE| 00000610: 49 54 45 52 45 20 31 30 20 54 41 47 45 22 00 40 |ITERE 10 TAGE".@| 00000620: 0E 4E 02 99 22 20 20 20 20 20 20 20 20 20 20 50 |.N.." P| 00000630: 3D 57 49 45 54 45 52 45 20 50 45 52 53 4F 4E 22 |=WIETERE PERSON"| 00000640: 00 5F 0E 58 02 99 22 53 4F 4E 53 54 2E 3D 53 54 |._.X.."SONST.=ST| 00000650: 41 52 54 20 56 4F 4D 20 42 45 47 49 4E 4E 22 00 |ART VOM BEGINN".| 00000660: 77 0E 62 02 A1 20 46 24 3A 8B 20 46 24 B2 22 22 |w.b.. F$:. F$.""| 00000670: A7 20 89 20 36 31 30 00 93 0E 6C 02 8B 20 46 24 |. . 610...l.. F$| 00000680: B2 22 5A 22 A7 20 4E 31 B2 4E 31 AA 31 30 3A 89 |."Z". N1.N1.10:.| 00000690: 34 32 30 00 AC 0E 76 02 8B 20 46 24 B2 22 50 22 |420...v.. F$."P"| 000006A0: A7 20 99 22 93 22 3A 89 20 32 37 30 00 C1 0E 80 |. .".":. 270....| 000006B0: 02 8F 20 55 4E 54 45 52 50 52 4F 47 52 41 4D 4D |.. UNTERPROGRAMM| 000006C0: 45 00 D6 0E 8A 02 8F 20 3D 3D 3D 3D 3D 3D 3D 3D |E...... ========| 000006D0: 3D 3D 3D 3D 3D 3D 00 EF 0E E8 03 8F 20 54 41 42 |======...... TAB| 000006E0: 45 4C 4C 45 4E 45 49 4E 52 49 43 48 54 45 4E 00 |ELLENEINRICHTEN.| 000006F0: F5 0E F2 03 9C 00 01 0F FC 03 86 20 4D 28 31 32 |........... M(12| 00000700: 29 00 0E 0F 06 04 81 20 49 B2 31 A4 31 32 00 16 |)...... I.1.12..| 00000710: 0F 10 04 87 20 4D 00 2E 0F 1A 04 83 20 33 31 2C |.... M...... 31,| 00000720: 32 38 2C 33 31 2C 33 30 2C 33 31 2C 33 30 00 46 |28,31,30,31,30.F| 00000730: 0F 24 04 83 20 33 31 2C 33 31 2C 33 30 2C 33 31 |.$.. 31,31,30,31| 00000740: 2C 33 30 2C 33 31 00 4E 0F 2E 04 82 20 49 00 5C |,30,31.N.... I.\| 00000750: 0F 38 04 81 20 49 B2 30 20 A4 20 36 00 68 0F 42 |.8.. I.0 . 6.h.B| 00000760: 04 87 20 57 24 28 49 29 00 97 0F 4C 04 83 20 22 |.. W$(I)...L.. "| 00000770: 53 4F 4E 4E 54 41 47 22 2C 22 4D 4F 4E 54 41 47 |SONNTAG","MONTAG| 00000780: 22 2C 22 44 49 45 4E 53 54 41 47 22 2C 22 4D 49 |","DIENSTAG","MI| 00000790: 54 54 57 4F 43 48 22 00 BE 0F 56 04 83 20 22 44 |TTWOCH"...V.. "D| 000007A0: 4F 4E 4E 45 52 53 54 41 47 22 2C 22 46 52 45 49 |ONNERSTAG","FREI| 000007B0: 54 41 47 22 2C 22 53 41 4D 53 54 41 47 22 00 C6 |TAG","SAMSTAG"..| 000007C0: 0F 60 04 82 20 49 00 D4 0F 6A 04 81 20 49 B2 30 |.`.. I...j.. I.0| 000007D0: 20 A4 20 36 00 E1 0F 74 04 87 20 57 4B 24 28 49 | . 6...t.. WK$(I| 000007E0: 29 00 09 10 7E 04 83 20 22 53 4F 22 2C 22 4D 4F |)...~.. "SO","MO| 000007F0: 22 2C 22 44 49 22 2C 22 4D 49 22 2C 22 44 4F 22 |","DI","MI","DO"| 00000800: 2C 46 52 22 2C 22 53 41 22 00 11 10 88 04 82 20 |,FR","SA"...... | 00000810: 49 00 1B 10 92 04 89 20 32 32 30 00 3C 10 10 27 |I...... 220.<..'| 00000820: 8F 20 54 41 47 45 53 2D 55 4E 44 20 57 4F 43 48 |. TAGES-UND WOCH| 00000830: 45 4E 54 41 47 53 4E 55 4D 4D 45 52 00 5C 10 1A |ENTAGSNUMMER.\..| 00000840: 27 8B 20 4D B3 33 20 A7 20 4D B2 4D AA 31 33 3A |'. M.3 . M.M.13:| 00000850: 4A B2 4A AB 31 3A 89 31 30 30 33 30 00 66 10 24 |J.J.1:.10030.f.$| 00000860: 27 4D B2 4D AA 31 00 8B 10 2E 27 4E B2 B5 28 4A |'M.M.1....'N..(J| 00000870: AC 33 36 35 2E 32 35 29 AA B5 28 4D AC 33 30 2E |.365.25)..(M.30.| 00000880: 36 29 AA 54 AB 36 32 31 30 34 39 00 A3 10 38 27 |6).T.621049...8'| 00000890: 57 B2 B5 28 37 AC 28 4E AD 37 AB B5 28 4E AD 37 |W..(7.(N.7..(N.7| 000008A0: 29 29 29 00 AF 10 42 27 8D 20 33 30 30 30 30 00 |)))...B'. 30000.| 000008B0: B5 10 4C 27 8E 00 C9 10 20 4E 57 5A B2 28 57 48 |..L'.... NWZ.(WH| 000008C0: AA 4E 31 AA 4E 32 29 AD 37 00 D3 10 2A 4E 41 B2 |.N1.N2).7...*NA.| 000008D0: 41 AA 31 00 DF 10 34 4E 54 4D B2 4D 28 42 29 00 |A.1...4NTM.M(B).| 000008E0: F6 10 3E 4E 8B 20 54 4D B3 B1 32 38 20 A7 20 89 |..>N. TM..28 . .| 000008F0: 20 32 30 30 35 30 00 15 11 48 4E 8B 20 28 43 AD | 20050...HN. (C.| 00000900: 34 29 AB B5 28 43 AD 34 29 B2 30 20 A7 20 89 20 |4)..(C.4).0 . . | 00000910: 54 4D B2 32 39 00 2B 11 52 4E 8B 20 41 B3 B2 54 |TM.29.+.RN. A..T| 00000920: 4D 20 A7 20 89 20 32 30 30 39 30 00 39 11 5C 4E |M . . 20090.9.\N| 00000930: 41 B2 31 3A 42 B2 42 AA 31 00 4E 11 66 4E 8B 20 |A.1:B.B.1.N.fN. | 00000940: 42 B3 31 33 20 A7 20 89 20 32 30 30 39 30 00 5C |B.13 . . 20090.\| 00000950: 11 70 4E 42 B2 31 3A 43 B2 43 AA 31 00 65 11 7A |.pNB.1:C.C.1.e.z| 00000960: 4E 57 B2 57 5A 00 71 11 84 4E 8D 20 33 30 30 30 |NW.WZ.q..N. 3000| 00000970: 30 00 7D 11 8E 4E 57 5A 24 B2 57 4B 24 00 83 11 |0.}..NWZ$.WK$...| 00000980: 98 4E 8E 00 9C 11 30 75 8F 20 57 4F 43 48 45 4E |.N....0u. WOCHEN| 00000990: 54 41 47 20 41 55 53 47 45 42 45 4E 00 AC 11 3A |TAG AUSGEBEN...:| 000009A0: 75 8B 20 57 B1 36 20 A7 20 57 B2 30 00 B9 11 44 |u. W.6 . W.0...D| 000009B0: 75 57 24 B2 57 24 28 57 29 00 C8 11 4E 75 57 4B |uW$.W$(W)...NuWK| 000009C0: 24 B2 57 4B 24 28 57 29 00 CE 11 58 75 8E 00 E7 |$.WK$(W)...Xu...| 000009D0: 11 40 9C 8F 20 54 41 42 45 4C 4C 45 4E 45 49 4E |.@.. TABELLENEIN| 000009E0: 52 49 43 48 54 45 4E 00 ED 11 4A 9C 9C 00 F9 11 |RICHTEN...J.....| 000009F0: 54 9C 86 20 4D 28 31 32 29 00 08 12 5E 9C 81 20 |T.. M(12)...^.. | 00000A00: 49 B2 31 20 A4 20 31 32 00 10 12 68 9C 87 20 4D |I.1 . 12...h.. M| 00000A10: 00 18 12 72 9C 82 20 49 00 30 12 7C 9C 83 20 33 |...r.. I.0.|.. 3| 00000A20: 31 2C 32 38 2C 33 31 2C 33 30 2C 33 31 2C 33 30 |1,28,31,30,31,30| 00000A30: 00 48 12 86 9C 83 20 33 31 2C 33 31 2C 33 30 2C |.H.... 31,31,30,| 00000A40: 33 31 2C 33 30 2C 33 31 00 56 12 90 9C 81 20 49 |31,30,31.V.... I| 00000A50: B2 30 20 A4 20 36 00 62 12 9A 9C 87 20 57 24 28 |.0 . 6.b.... W$(| 00000A60: 49 29 00 6A 12 A4 9C 82 20 49 00 99 12 AE 9C 83 |I).j.... I......| 00000A70: 20 22 53 4F 4E 4E 54 41 47 22 2C 22 4D 4F 4E 54 | "SONNTAG","MONT| 00000A80: 41 47 22 2C 22 44 49 45 4E 53 54 41 47 22 2C 22 |AG","DIENSTAG","| 00000A90: 4D 49 54 54 57 4F 43 48 22 00 C0 12 B8 9C 83 20 |MITTWOCH"...... | 00000AA0: 22 44 4F 4E 4E 45 52 53 54 41 47 22 2C 22 46 52 |"DONNERSTAG","FR| 00000AB0: 45 49 54 41 47 22 2C 22 53 41 4D 53 54 41 47 22 |EITAG","SAMSTAG"| 00000AC0: 00 CE 12 C2 9C 81 20 49 B2 31 20 A4 20 36 00 DB |...... I.1 . 6..| 00000AD0: 12 CC 9C 87 20 57 4B 24 28 49 29 00 E3 12 D6 9C |.... WK$(I).....| 00000AE0: 82 20 49 00 0A 13 E0 9C 83 20 22 53 4F 22 2C 4D |. I...... "SO",M| 00000AF0: 4F 22 2C 22 44 49 22 2C 22 4D 49 22 2C 22 44 4F |O","DI","MI","DO| 00000B00: 22 2C 46 52 22 2C 22 53 41 22 00 10 13 EA 9C 8E |",FR","SA"......| 00000B10: 00 00 00 |... |
....... BIORHYTHMUS.%.... ===========.5. ... VARIABLEN.T.(.. TH,MH,JH HEUTIGES D ATUM.}.2.. WH HEUTIGE WOCHENTAGSN UMMER. .<.. WH$ HEUTIGER WOCHENTAG ...F.. TN TAGESNUMMER.Y.P.. TG,MG ,JG GEBURTSDATUM...Z.. NG TAGESN UMMER DES GEEBURTSTAGES.#.D.. LA LEBENSALTER.H.N.. N1 TAGESZAEHLER (ZEHNER).M.X.. N2 TAGESZAEHLER(E INER)...... A,B,C DATUMSZAEHLER..... . WZ WOCHENTAGSZAEHLER(0-6).L.... W$ WOCHENTAG... .. HAUPTPROGRAMM ...... =============...... DIALOG...... ------...H.....R.. 1000.N...."HEUTIGES D ATUM(TAG,MONAT,JAHR)";TH,MH,JH.A...T.TH: M.MH:J.JH...... 10000:. UP DATEN ERSTELL EN.....WH.W:WH$.W$:TN.N......"HEUTE IST ";W$;".".R...."WIE HEISST DU(VORNAME)?"; N$.....A.TH:B.MH:C.JH..."..N$;" AN WELCH EM DATUM".2.,.. "BIST DU GEBOREN WORDE N(TAG,MONAT,JAHR)".A.6.. TG,MG,JG.T.@.T. TG:M.MG:J.JG.V.J.. 10000:. GEBURSDATUM Z AEHLEN...T.WG$.W$:NG.N...^.LA.TN.NG.K.H. . N$;"DER";TG;".";MG;".";JG;"WAR AUF EIN EM ";W$;"."...R.."DU BIST SOMIT";LA;"TAG E ALT."...|.. AUS GABE DER BIOWERTE.6... ."DEIN BIORHTYHMUS SIEHT HEUTE UND IN".B ...."DEN NAECHSTEN 9 TAGEN WIE FOLGT AUS :".K...N1.0......"DATUM","KOERP.","SEEL. ","GEIST."...... N2.0 . 9:. SCHLEIFE FUE R TAGESZAEHLER.....Z.(LA.N1.N2).2.3.1459 :. ZAEHLER BERECHNEN...B.. 20000...V.. C (A$).2 . A$."0".I(A$,1).5.... C(B$).2 .B $."0".I(B$,1).X...DA$.WK$.(A$).".".(B$). ".".(C$).B....DA$,.X.... .(100..(Z.23)), ...... .(100..(Z.29)),...... .(100..(Z.3 3)),...... N2.K.&.. FORTSETZUNG DES DIAL OGS...0.. -----------------------...:.." WEITER MIT"...D.." Z=WEITERE 10 TAGE".@.N.." P=WIETERE PERSON" ._.X.."SONST.=START VOM BEGINN".W.B.. F$ :. F$."". . 610...L.. F$."Z". N1.N1.10:. 420...V.. F$."P". .".":. 270.A.... UNTER PROGRAMME.V.... ==============...... TAB ELLENEINRICHTEN............ M(12)...... I.1.12...... M...... 31,28,31,30,31,30.F .$.. 31,31,30,31,30,31.N.... I.\.8.. I.0 . 6.H.B.. W$(I)...L.. "SONNTAG","MONTAG ","DIENSTAG","MITTWOCH"...V.. "DONNERSTA G","FREITAG","SAMSTAG".F.`.. I.T.J.. I.0 . 6...T.. WK$(I)...~.. "SO","MO","DI"," MI","DO",FR","SA"...... I...... 220.<..' . TAGES-UND WOCHENTAGSNUMMER.\..'. M.3 . M.M.13:J.J.1:.10030.F.$'M.M.1....'N..(J .365.25)..(M.30.6).T.621049...8'W..(7.(N .7..(N.7)))...B'. 30000...L'..I. NWZ.(WH .N1.N2).7.S.*NA.A.1...4NTM.M(B)...>N. TM ..28 . . 20050...HN. (C.4)..(C.4).0 . . TM.29.+.RN. A..TM . . 20090.9.\NA.1:B.B. 1.N.FN. B.13 . . 20090.\.PNB.1:C.C.1.E.Z NW.WZ.Q..N. 30000.}..NWZ$.WK$....N....0U . WOCHENTAG AUSGEBEN...:U. W.6 . W.0...D UW$.W$(W).H.NUWK$.WK$(W).N.XU....@.. TAB ELLENEINRICHTEN...J.....T.. M(12)...^.. I.1 . 12...H.. M...R.. I.0.|.. 31,28,31, 30,31,30.H.... 31,31,30,31,30,31.V.... I .0 . 6.B.... W$(I).J.... I...... "SONNTA G","MONTAG","DIENSTAG","MITTWOCH"...... "DONNERSTAG","FREITAG","SAMSTAG".N.B.. I .1 . 6...L.. WK$(I)...V.. I...... "SO",M O","DI","MI","DO",FR","SA".........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL