00000000: 01 04 07 04 01 00 27 00 29 04 02 00 27 20 20 20 |......'.)...' |
00000010: 20 20 20 20 2A 2A 2A 20 D0 45 47 41 53 55 53 20 | *** .EGASUS |
00000020: C2 41 53 49 43 20 2A 2A 2A 00 2F 04 03 00 27 00 |.ASIC ***./...'.|
00000030: 56 04 04 00 27 20 C4 45 4D 4F 50 52 4F 47 52 41 |V...' .EMOPROGRA|
00000040: 4D 4D 20 46 55 45 52 20 44 49 45 20 C2 45 52 45 |MM FUER DIE .ERE|
00000050: 43 48 4E 55 4E 47 00 7D 04 05 00 27 20 55 4E 44 |CHNUNG.}...' UND|
00000060: 20 47 52 41 46 49 53 43 48 45 20 20 C4 41 52 53 | GRAFISCHE .ARS|
00000070: 54 45 4C 4C 55 4E 47 20 45 49 4E 45 53 00 8F 04 |TELLUNG EINES...|
00000080: 06 00 27 20 C2 49 4F 52 48 59 54 48 4D 55 53 00 |..' .IORHYTHMUS.|
00000090: 95 04 07 00 27 00 9B 04 08 00 27 00 A2 04 E8 03 |....'.....'.....|
000000A0: FE 3E 00 B8 04 F2 03 FE 44 20 31 2C 31 36 2C 20 |.>......D 1,16, |
000000B0: 32 2C 31 2C 20 33 2C 31 00 F6 04 FC 03 96 20 A5 |2,1, 3,1...... .|
000000C0: 20 54 41 28 5A 5A 29 B2 B5 28 33 36 35 2E 32 35 | TA(ZZ)..(365.25|
000000D0: AC 28 4A AA 28 4D B3 33 29 29 29 AA B5 28 33 30 |.(J.(M.3)))..(30|
000000E0: 2E 36 AC 28 4D AA 31 AB 28 4D B3 33 29 AC 31 32 |.6.(M.1.(M.3).12|
000000F0: 29 29 AA 54 AB 32 00 17 05 06 04 96 20 A5 20 4B |)).T.2...... . K|
00000100: 4B 28 5A 5A 29 B2 CF 2E 32 37 33 31 38 31 39 37 |K(ZZ)...27318197|
00000110: AC 5A 5A 29 AC 38 30 00 39 05 10 04 96 20 A5 20 |.ZZ).80.9.... . |
00000120: 53 4B 28 5A 5A 29 B2 CF 2E 32 32 34 33 39 39 34 |SK(ZZ)...2243994|
00000130: 37 35 AC 5A 5A 29 AC 38 30 00 5B 05 1A 04 96 20 |75.ZZ).80.[.... |
00000140: A5 20 47 4B 28 5A 5A 29 B2 CF 2E 31 39 30 33 39 |. GK(ZZ)...19039|
00000150: 39 35 35 35 AC 5A 5A 29 AC 38 30 00 61 05 24 04 |9555.ZZ).80.a.$.|
00000160: 3A 00 B2 05 2E 04 54 41 24 B2 22 D3 4F 4E 4E 54 |:.....TA$.".ONNT|
00000170: 41 47 20 20 20 CD 4F 4E 54 41 47 20 20 20 20 C4 |AG .ONTAG .|
00000180: 49 45 4E 53 54 41 47 20 20 CD 49 54 54 57 4F 43 |IENSTAG .ITTWOC|
00000190: 48 20 20 C4 4F 4E 4E 45 52 53 54 41 47 C6 52 45 |H .ONNERSTAG.RE|
000001A0: 49 54 41 47 20 20 20 D3 4F 4E 4E 41 42 45 4E 44 |ITAG .ONNABEND|
000001B0: 20 22 00 E0 05 38 04 99 20 22 11 11 CE 41 43 48 | "...8.. "...ACH|
000001C0: 20 C5 4E 44 45 20 44 45 52 20 C2 45 52 45 43 48 | .NDE DER .ERECH|
000001D0: 4E 55 4E 47 20 28 D0 49 45 50 54 4F 4E 29 3A 22 |NUNG (.IEPTON):"|
000001E0: 00 0D 06 42 04 99 20 22 20 3C 2B 3E 20 C2 45 52 |...B.. " <+> .ER|
000001F0: 45 43 48 4E 55 4E 47 20 46 55 45 52 20 4E 41 45 |ECHNUNG FUER NAE|
00000200: 43 48 53 54 45 4E 20 CD 4F 4E 41 54 22 00 38 06 |CHSTEN .ONAT".8.|
00000210: 4C 04 99 20 22 20 3C 2D 3E 20 C2 45 52 45 43 48 |L.. " <-> .ERECH|
00000220: 4E 55 4E 47 20 46 55 45 52 20 56 4F 52 49 47 45 |NUNG FUER VORIGE|
00000230: 4E 20 CD 4F 4E 41 54 22 00 4E 06 56 04 99 20 22 |N .ONAT".N.V.. "|
00000240: 20 3C 48 3E 20 C8 41 52 44 43 4F 50 59 22 00 69 | <H> .ARDCOPY".i|
00000250: 06 60 04 99 20 22 20 3C 5F 3E 20 D0 52 4F 47 52 |.`.. " <_> .ROGR|
00000260: 41 4D 4D 45 4E 44 45 11 22 00 A0 06 6A 04 85 20 |AMMENDE."...j.. |
00000270: 22 C7 45 42 55 52 54 53 44 41 54 55 4D 20 20 20 |".EBURTSDATUM |
00000280: 20 20 20 30 35 2C 30 39 2C 31 39 36 36 9D 9D 9D | 05,09,1966...|
00000290: 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 54 2C 4D 2C 4A |.........";T,M,J|
000002A0: 00 BF 06 74 04 54 47 B2 A5 20 54 41 28 30 29 3A |...t.TG.. TA(0):|
000002B0: 57 54 B2 54 47 AB 37 AC B5 28 54 47 AD 37 29 00 |WT.TG.7..(TG.7).|
000002C0: D9 06 7E 04 57 54 24 B2 CA 28 54 41 24 2C 31 AA |..~.WT$..(TA$,1.|
000002D0: 57 54 AC 31 30 2C 31 30 29 00 0B 07 88 04 47 45 |WT.10,10).....GE|
000002E0: 24 B2 C4 28 54 29 AA 22 2E 22 AA CA 28 C4 28 4D |$..(T)."."..(.(M|
000002F0: 29 2C 32 29 AA 22 2E 22 AA CA 28 C4 28 4A 29 2C |),2)."."..(.(J),|
00000300: 32 29 AA 22 20 20 22 AA 57 54 24 00 3C 07 92 04 |2)." ".WT$.<...|
00000310: 85 20 22 C2 45 52 45 43 48 4E 55 4E 47 20 46 55 |. ".ERECHNUNG FU|
00000320: 45 52 20 20 20 31 32 2C 31 39 38 38 9D 9D 9D 9D |ER 12,1988....|
00000330: 9D 9D 9D 9D 9D 22 3B 4D 31 2C 4A 31 00 4E 07 9C |.....";M1,J1.N..|
00000340: 04 54 B2 30 3A 4D B2 4D 31 3A 4A B2 4A 31 00 6E |.T.0:M.M1:J.J1.n|
00000350: 07 A6 04 42 45 24 B2 CA 28 C4 28 4D 29 2C 32 29 |...BE$..(.(M),2)|
00000360: AA 22 2F 22 AA CA 28 C4 28 4A 29 2C 32 29 00 80 |."/"..(.(J),2)..|
00000370: 07 B0 04 41 54 B2 A5 20 54 41 28 30 29 AB 54 47 |...AT.. TA(0).TG|
00000380: 00 86 07 BA 04 3A 00 96 07 D0 07 FE 57 3A FE 56 |.....:......W:.V|
00000390: 20 31 36 2C 30 31 00 BA 07 DA 07 FE 63 20 30 2C | 16,01......c 0,|
000003A0: 30 2C 30 2C 22 18 03 19 02 06 1F 05 20 C2 49 4F |0,0,"....... .IO|
000003B0: 52 48 59 54 48 4D 55 53 20 22 00 C9 07 E4 07 FE |RHYTHMUS "......|
000003C0: 62 20 31 2C 31 2C 37 2C 38 00 F3 07 EE 07 FE 63 |b 1,1,7,8......c|
000003D0: 20 2C 30 2C 31 39 32 2C 22 06 1F 9E 20 C7 45 42 | ,0,192,"... .EB|
000003E0: 55 52 54 53 54 41 47 20 3A 22 AA 47 45 24 AA E3 |URTSTAG :".GE$..|
000003F0: 32 30 29 00 14 08 F8 07 FE 63 20 2C 33 31 33 AB |20)......c ,313.|
00000400: C3 28 42 45 24 29 AC 37 2C 31 39 32 2C 42 45 24 |.(BE$).7,192,BE$|
00000410: AA 22 20 22 00 26 08 02 08 FE 44 20 39 2C 31 36 |." ".&....D 9,16|
00000420: 2C 20 31 30 2C 31 00 3D 08 0C 08 FE 5A 20 2C 31 |, 10,1.=....Z ,1|
00000430: 36 2C 32 30 20 A4 20 31 36 2C 31 37 39 00 56 08 |6,20 . 16,179.V.|
00000440: 16 08 FE 5A 20 2C 31 36 2C 31 30 30 20 A4 20 33 |...Z ,16,100 . 3|
00000450: 30 30 2C 31 30 30 00 6A 08 20 08 FE 63 20 2C 35 |00,100.j. ..c ,5|
00000460: 2C 20 35 30 2C 22 92 81 2B 22 00 7E 08 2A 08 FE |, 50,"..+".~.*..|
00000470: 63 20 2C 35 2C 31 35 30 2C 22 1C 2D 9B 22 00 91 |c ,5,150,".-."..|
00000480: 08 34 08 81 20 54 B2 35 20 A4 20 33 30 20 A9 20 |.4.. T.5 . 30 . |
00000490: 35 00 B0 08 3E 08 FE 5A 20 2C 31 36 AA 54 AC 38 |5...>..Z ,16.T.8|
000004A0: 2C 39 37 20 A4 20 31 36 AA 54 AC 38 2C 31 30 33 |,97 . 16.T.8,103|
000004B0: 00 C5 08 48 08 FE 63 20 2C 54 AC 38 2C 31 31 30 |...H..c ,T.8,110|
000004C0: 2C C4 28 54 29 00 CB 08 52 08 82 00 DF 08 5C 08 |,.(T)...R.....\.|
000004D0: 81 20 49 B2 30 20 A4 20 33 31 20 A9 20 2E 35 00 |. I.0 . 31 . .5.|
000004E0: F4 08 66 08 50 B2 31 30 30 AB A5 20 4B 4B 28 41 |..f.P.100.. KK(A|
000004F0: 54 AA 49 29 00 24 09 70 08 FE 5A 20 2C 31 36 AA |T.I).$.p..Z ,16.|
00000500: 49 AC 38 2C 50 2C 31 37 AA 49 AC 38 2C 50 2C 31 |I.8,P,17.I.8,P,1|
00000510: 37 AA 49 AC 38 2C 50 AA 31 2C 31 36 AA 49 AC 38 |7.I.8,P.1,16.I.8|
00000520: 2C 50 AA 31 00 2A 09 7A 08 82 00 4F 09 84 08 FE |,P.1.*.z...O....|
00000530: 63 20 2C 32 36 38 2C 39 38 AB A5 20 4B 4B 28 41 |c ,268,98.. KK(A|
00000540: 54 AA 33 31 29 2C 22 CB 4F 45 52 50 45 52 22 00 |T.31),".OERPER".|
00000550: 63 09 8E 08 81 20 49 B2 30 20 A4 20 33 31 20 A9 |c.... I.0 . 31 .|
00000560: 20 2E 35 00 78 09 98 08 50 B2 31 30 30 AB A5 20 | .5.x...P.100.. |
00000570: 53 4B 28 41 54 AA 49 29 00 B0 09 A2 08 FE 5A 20 |SK(AT.I)......Z |
00000580: 2C 31 35 AA 49 AC 38 2C 50 AB 31 20 A4 20 31 37 |,15.I.8,P.1 . 17|
00000590: AA 49 AC 38 2C 50 AA 31 2C 31 37 AA 49 AC 38 2C |.I.8,P.1,17.I.8,|
000005A0: 50 AB 31 20 A4 20 31 35 AA 49 AC 38 2C 50 AA 31 |P.1 . 15.I.8,P.1|
000005B0: 00 B6 09 AC 08 82 00 D9 09 B6 08 FE 63 20 2C 32 |............c ,2|
000005C0: 36 38 2C 39 38 AB A5 20 53 4B 28 41 54 AA 33 31 |68,98.. SK(AT.31|
000005D0: 29 2C 22 D3 45 45 4C 45 22 00 ED 09 C0 08 81 20 |),".EELE"...... |
000005E0: 49 B2 30 20 A4 20 33 31 20 A9 20 2E 35 00 02 0A |I.0 . 31 . .5...|
000005F0: CA 08 50 B2 31 30 30 AB A5 20 47 4B 28 41 54 AA |..P.100.. GK(AT.|
00000600: 49 29 00 36 0A D4 08 FE 5A 20 2C 31 36 AA 49 AC |I).6....Z ,16.I.|
00000610: 38 2C 50 AB 31 20 A4 20 31 36 AA 49 AC 38 2C 50 |8,P.1 . 16.I.8,P|
00000620: AA 31 2C 31 35 AA 49 AC 38 2C 50 20 A4 20 31 37 |.1,15.I.8,P . 17|
00000630: AA 49 AC 38 2C 50 00 3C 0A DE 08 82 00 5F 0A E8 |.I.8,P.<....._..|
00000640: 08 FE 63 20 2C 32 36 38 2C 39 38 AB A5 20 47 4B |..c ,268,98.. GK|
00000650: 28 41 54 AA 33 31 29 2C 22 C7 45 49 53 54 22 00 |(AT.31),".EIST".|
00000660: 8D 0A F2 08 FE 5A 20 2C 31 36 2C 31 30 30 AB 28 |.....Z ,16,100.(|
00000670: A5 20 4B 4B 28 41 54 29 AA A5 20 53 4B 28 41 54 |. KK(AT).. SK(AT|
00000680: 29 AA A5 20 47 4B 28 41 54 29 29 AD 33 00 9C 0A |).. GK(AT)).3...|
00000690: FC 08 81 20 49 B2 31 20 A4 20 33 31 00 D5 0A 06 |... I.1 . 31....|
000006A0: 09 FE 5A 20 A4 20 31 36 AA 49 AC 38 2C 31 30 30 |..Z . 16.I.8,100|
000006B0: AB 28 A5 20 4B 4B 28 41 54 AA 49 29 AA A5 20 53 |.(. KK(AT.I).. S|
000006C0: 4B 28 41 54 AA 49 29 AA A5 20 47 4B 28 41 54 AA |K(AT.I).. GK(AT.|
000006D0: 49 29 29 AD 33 00 DB 0A 10 09 82 00 19 0B 1A 09 |I)).3...........|
000006E0: FE 63 20 2C 32 36 38 2C 39 38 AB 28 A5 20 4B 4B |.c ,268,98.(. KK|
000006F0: 28 41 54 AA 49 29 AA A5 20 53 4B 28 41 54 AA 49 |(AT.I).. SK(AT.I|
00000700: 29 AA A5 20 47 4B 28 41 54 AA 49 29 29 AD 33 2C |).. GK(AT.I)).3,|
00000710: 22 12 D3 55 4D 4D 45 92 22 00 27 0B 24 09 FE 0E |"..UMME.".'.$...|
00000720: 3A 41 24 B2 E6 31 29 00 57 0B 2E 09 FE 33 20 41 |:A$..1).W....3 A|
00000730: 24 B2 22 2D 22 20 A7 20 4D 31 B2 4D 31 AB 31 3A |$."-" . M1.M1.1:|
00000740: FE 33 20 4D 31 B2 30 20 A7 20 4D 31 B2 31 32 3A |.3 M1.0 . M1.12:|
00000750: 4A 31 B2 4A 31 AB 31 00 87 0B 38 09 FE 33 20 41 |J1.J1.1...8..3 A|
00000760: 24 B2 22 2B 22 20 A7 20 4D 31 B2 4D 31 AA 31 3A |$."+" . M1.M1.1:|
00000770: FE 33 20 4D 31 B2 31 33 20 A7 20 4D 31 B2 31 3A |.3 M1.13 . M1.1:|
00000780: 4A 31 B2 4A 31 AA 31 00 A5 0B 42 09 FE 33 20 41 |J1.J1.1...B..3 A|
00000790: 24 B2 22 2B 22 20 B0 20 41 24 B2 22 2D 22 20 A7 |$."+" . A$."-" .|
000007A0: 20 31 31 38 30 00 B8 0B 4C 09 FE 33 20 41 24 B2 | 1180...L..3 A$.|
000007B0: 22 48 22 20 A7 20 FE 68 00 BF 0B 56 09 FE 55 00 |"H" . .h...V..U.|
000007C0: D7 0B 60 09 FE 33 20 41 24 B3 B1 C7 28 32 37 29 |..`..3 A$...(27)|
000007D0: 20 A7 20 31 31 33 30 00 DD 0B 6A 09 80 00 00 00 | . 1130...j.....|
......'.)...' *** PEGASUS BASIC **
*./...'.V...' DEMOPROGRAMM FUER DIE BERE
CHNUNG.}...' UND GRAFISCHE DARSTELLUNG
EINES.....' BIORHYTHMUS.....'.....'.....
.>......D 1,16, 2,1, 3,1...... . TA(ZZ).
.(365.25.(J.(M.3)))..(30.6.(M.1.(M.3).12
)).T.2...... . KK(ZZ).O.27318197.ZZ).80.
9.... . SK(ZZ).O.224399475.ZZ).80.[....
. GK(ZZ).O.190399555.ZZ).80.A.$.:.....TA
$."SONNTAG MONTAG DIENSTAG MITTWOC
H DONNERSTAGFREITAG SONNABEND "...8..
"..NACH ENDE DER BERECHNUNG (PIEPTON):"
...B.. " <+> BERECHNUNG FUER NAECHSTEN M
ONAT".8.L.. " <-> BERECHNUNG FUER VORIGE
N MONAT".N.V.. " <H> HARDCOPY".I.`.. " <
_> PROGRAMMENDE.". .J.. "GEBURTSDATUM
05,09,1966............";T,M,J...T.TG.
. TA(0):WT.TG.7..(TG.7).Y.~.WT$.J(TA$,1.
WT.10,10).....GE$.D(T).".".J(D(M),2)."."
.J(D(J),2)." ".WT$.<.... "BERECHNUNG FU
ER 12,1988.........";M1,J1.N...T.0:M.M
1:J.J1.N...BE$.J(D(M),2)."/".J(D(J),2)..
...AT.. TA(0).TG.....:...P..W:.V 16,01..
.Z..C 0,0,0,"....... BIORHYTHMUS ".I....
B 1,1,7,8......C ,0,192,"... GEBURTSTAG
:".GE$..20)......C ,313.C(BE$).7,192,BE$
." ".&....D 9,16, 10,1.=....Z ,16,20 . 1
6,179.V....Z ,16,100 . 300,100.J. ..C ,5
, 50,"..+".~.*..C ,5,150,".-."...4.. T.5
. 30 . 5...>..Z ,16.T.8,97 . 16.T.8,103
.E.H..C ,T.8,110,D(T).K.R.....\.. I.0 .
31 . .5...F.P.100.. KK(AT.I).$.P..Z ,16.
I.8,P,17.I.8,P,17.I.8,P.1,16.I.8,P.1.*.Z
...O....C ,268,98.. KK(AT.31),"KOERPER".
C.... I.0 . 31 . .5.X...P.100.. SK(AT.I)
......Z ,15.I.8,P.1 . 17.I.8,P.1,17.I.8,
P.1 . 15.I.8,P.1.......Y....C ,268,98..
SK(AT.31),"SEELE"...... I.0 . 31 . .5...
J.P.100.. GK(AT.I).6.T..Z ,16.I.8,P.1 .
16.I.8,P.1,15.I.8,P . 17.I.8,P.<....._..
..C ,268,98.. GK(AT.31),"GEIST"......Z ,
16,100.(. KK(AT).. SK(AT).. GK(AT)).3...
... I.1 . 31.U....Z . 16.I.8,100.(. KK(A
T.I).. SK(AT.I).. GK(AT.I)).3...........
.C ,268,98.(. KK(AT.I).. SK(AT.I).. GK(A
T.I)).3,".SUMME.".'.$...:A$..1).W....3 A
$."-" . M1.M1.1:.3 M1.0 . M1.12:J1.J1.1.
..8..3 A$."+" . M1.M1.1:.3 M1.13 . M1.1:
J1.J1.1...B..3 A$."+" . A$."-" . 1180...
L..3 A$."H" . .H...V..U.W.`..3 A$..G(27)
. 1130...J.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL