> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 09 08 01 00 8D 39 39 00 31 08 1D 00 99 22 |.......99.1...."|
00000010: 93 20 20 20 20 20 20 20 20 20 20 12 D3 D3 44 41 |. ...DA|
00000020: 53 20 49 44 45 41 4C 47 45 57 49 43 48 54 D3 D3 |S IDEALGEWICHT..|
00000030: 92 00 56 08 1E 00 99 22 20 20 20 20 20 20 20 20 |..V...." |
00000040: 20 20 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 | ..............|
00000050: C5 C5 C5 C5 C5 C5 00 88 08 1F 00 99 22 11 42 49 |............".BI|
00000060: 54 54 45 20 47 49 42 20 44 45 49 4E 45 20 57 45 |TTE GIB DEINE WE|
00000070: 52 54 45 20 4D 49 54 20 12 3E 52 45 54 55 52 4E |RTE MIT .>RETURN|
00000080: 3C 92 20 45 49 4E 2E 22 00 8E 08 21 00 3A 00 AA |<. EIN."...!.:..|
00000090: 08 22 00 85 22 11 11 11 47 52 4F 45 53 53 45 1D |.".."...GROESSE.|
000000A0: 1D 1D 1D 1D 20 3A 22 3B 47 52 00 C4 08 23 00 85 |.... :";GR...#..|
000000B0: 22 11 47 45 57 49 43 48 54 1D 1D 1D 1D 1D 20 3A |".GEWICHT..... :|
000000C0: 22 3B 47 57 00 DE 08 24 00 85 22 11 57 55 4E 53 |";GW...$..".WUNS|
000000D0: 43 48 47 45 57 49 43 48 54 3A 22 3B 57 47 00 FE |CHGEWICHT:";WG..|
000000E0: 08 25 00 99 22 11 11 11 4D 41 45 4E 4E 4C 49 43 |.%.."...MAENNLIC|
000000F0: 48 2F 57 45 49 42 4C 49 43 48 20 4D 2F 57 00 10 |H/WEIBLICH M/W..|
00000100: 09 26 00 A1 47 24 3A 8B 47 24 B2 22 22 A7 33 38 |.&..G$:.G$."".38|
00000110: 00 1F 09 27 00 8B 47 24 B2 22 4D 22 A7 39 36 00 |...'..G$."M".96.|
00000120: 3B 09 28 00 49 44 B2 B5 28 28 28 47 52 AB 31 30 |;.(.ID..(((GR.10|
00000130: 30 29 AC 38 35 29 AD 31 30 30 29 00 4C 09 29 00 |0).85).100).L.).|
00000140: 4E 4F B2 B5 28 47 52 AB 31 30 30 29 00 69 09 2A |NO..(GR.100).i.*|
00000150: 00 55 45 B2 B5 28 28 28 47 52 AB 31 30 30 29 AC |.UE..(((GR.100).|
00000160: 31 31 32 29 AD 31 30 30 29 00 8B 09 2B 00 99 22 |112).100)...+.."|
00000170: 93 20 20 20 20 20 20 20 20 20 20 2A 2A 2A 41 55 |. ***AU|
00000180: 53 57 45 52 54 55 4E 47 2A 2A 2A 00 AC 09 2C 00 |SWERTUNG***...,.|
00000190: 99 22 20 20 20 20 20 20 20 20 20 20 C5 C5 C5 C5 |." ....|
000001A0: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 00 DF 09 2D |...............-|
000001B0: 00 99 22 11 11 11 44 55 20 42 49 53 54 22 3B 47 |.."...DU BIST";G|
000001C0: 52 3B 22 43 4D 20 47 52 4F 53 53 20 55 4E 44 20 |R;"CM GROSS UND |
000001D0: 57 49 45 47 53 54 22 3B 47 57 3B 22 4B 47 22 00 |WIEGST";GW;"KG".|
000001E0: 0F 0A 2F 00 99 22 11 11 11 44 45 49 4E 20 57 55 |../.."...DEIN WU|
000001F0: 4E 53 43 48 47 45 57 49 43 48 54 20 53 4F 4C 4C |NSCHGEWICHT SOLL|
00000200: 22 3B 57 47 3B 22 4B 47 20 53 45 49 4E 2E 22 00 |";WG;"KG SEIN.".|
00000210: 52 0A 31 00 99 22 11 11 11 11 20 20 20 20 20 20 |R.1..".... |
00000220: 53 49 4E 44 1D 44 49 45 20 41 4E 47 41 42 45 4E |SIND.DIE ANGABEN|
00000230: 20 52 49 43 48 54 49 47 3F 22 3A 99 22 11 1D 1D | RICHTIG?":."...|
00000240: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 4A 2F |..............J/|
00000250: 4E 22 00 64 0A 32 00 A1 46 24 3A 8B 46 24 B2 22 |N".d.2..F$:.F$."|
00000260: 22 A7 35 30 00 73 0A 33 00 8B 46 24 B2 22 4E 22 |".50.s.3..F$."N"|
00000270: A7 32 39 00 95 0A 34 00 99 22 93 20 20 20 20 20 |.29...4..". |
00000280: 20 20 20 20 20 2A 2A 2A 41 55 53 57 45 52 54 55 | ***AUSWERTU|
00000290: 4E 47 2A 2A 2A 00 B6 0A 35 00 99 22 20 20 20 20 |NG***...5.." |
000002A0: 20 20 20 20 20 20 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 | ..........|
000002B0: C5 C5 C5 C5 C5 C5 00 E2 0A 36 00 99 22 11 11 11 |.........6.."...|
000002C0: 4C 41 55 54 20 4D 45 49 4E 45 52 20 45 52 4D 49 |LAUT MEINER ERMI|
000002D0: 54 54 4C 55 4E 47 20 57 41 45 52 45 20 44 45 49 |TTLUNG WAERE DEI|
000002E0: 4E 22 00 08 0B 38 00 99 22 1D 1D 11 11 11 11 4E |N"...8.."......N|
000002F0: 4F 52 4D 41 4C 47 45 57 49 43 48 54 20 20 20 20 |ORMALGEWICHT |
00000300: 22 3B 4E 4F 3B 22 4B 47 00 2C 0B 39 00 99 22 11 |";NO;"KG.,.9..".|
00000310: 11 1D 1D 44 45 49 4E 20 49 44 45 41 4C 47 45 57 |...DEIN IDEALGEW|
00000320: 49 43 48 54 22 3B 49 44 3B 22 4B 47 00 50 0B 3A |ICHT";ID;"KG.P.:|
00000330: 00 99 22 11 11 1D 1D 44 45 49 4E 20 55 45 42 45 |.."....DEIN UEBE|
00000340: 52 47 45 57 49 43 48 54 22 3B 55 45 3B 22 4B 47 |RGEWICHT";UE;"KG|
00000350: 00 70 0B 3B 00 4D 47 B2 47 57 AB 57 47 3A 48 47 |.p.;.MG.GW.WG:HG|
00000360: B2 47 57 AB 49 44 3A 20 45 47 B2 47 57 AB 4E 4F |.GW.ID: EG.GW.NO|
00000370: 00 81 0B 3C 00 81 57 B2 31 A4 31 33 30 30 30 3A |...<..W.1.13000:|
00000380: 82 00 91 0B 3D 00 8B 47 57 AB 49 44 B3 30 A7 36 |....=..GW.ID.0.6|
00000390: 34 00 9F 0B 3E 00 8B 47 57 B1 4E 4F 89 38 34 00 |4...>..GW.NO.84.|
000003A0: AE 0B 3F 00 8B 47 57 B3 B2 4E 4F 89 37 36 00 C0 |..?..GW..NO.76..|
000003B0: 0B 40 00 8F 2A 4D 45 48 52 20 45 53 53 45 4E 2A |.@..*MEHR ESSEN*|
000003C0: 00 F4 0B 41 00 99 22 93 11 11 11 4D 45 49 4E 45 |...A.."....MEINE|
000003D0: 20 54 41 42 45 4C 4C 45 20 53 41 47 54 2C 20 44 | TABELLE SAGT, D|
000003E0: 55 20 48 41 53 54 20 55 4E 54 45 52 47 45 57 49 |U HAST UNTERGEWI|
000003F0: 43 48 54 22 00 1E 0C 43 00 99 22 11 11 20 20 20 |CHT"...C..".. |
00000400: 20 20 20 20 20 20 20 20 20 40 40 40 22 3B 28 49 | @@@";(I|
00000410: 44 AB 47 57 29 3B 22 4B 47 21 21 40 40 40 00 4D |D.GW);"KG!!@@@.M|
00000420: 0C 44 00 99 22 11 11 41 55 43 48 20 55 4E 54 45 |.D.."..AUCH UNTE|
00000430: 52 47 45 57 49 43 48 54 20 4B 41 4E 4E 20 55 4E |RGEWICHT KANN UN|
00000440: 47 45 53 55 4E 44 20 53 45 49 4E 2E 22 00 7B 0C |GESUND SEIN.".{.|
00000450: 46 00 99 22 11 45 53 20 46 45 48 4C 45 4E 20 42 |F..".ES FEHLEN B|
00000460: 49 53 20 5A 55 20 44 45 49 4E 45 4D 20 57 55 4E |IS ZU DEINEM WUN|
00000470: 53 43 48 47 45 57 49 43 48 54 22 00 A5 0C 47 00 |SCHGEWICHT"...G.|
00000480: 99 22 11 11 20 20 20 20 20 20 20 20 20 20 20 20 |.".. |
00000490: 40 40 40 22 3B 28 57 47 AB 47 57 29 3B 22 4B 47 |@@@";(WG.GW);"KG|
000004A0: 21 21 40 40 40 00 CD 0C 48 00 99 22 11 11 11 11 |!!@@@...H.."....|
000004B0: 11 1D 1D 1D 1D 1D 1D 1D 1D 4E 45 55 45 20 41 55 |.........NEUE AU|
000004C0: 53 57 45 52 54 55 4E 47 20 4A 2F 4E 3F 00 DF 0C |SWERTUNG J/N?...|
000004D0: 49 00 A1 57 24 3A 8B 57 24 B2 22 22 A7 37 33 00 |I..W$:.W$."".73.|
000004E0: EE 0C 4A 00 8B 57 24 B2 22 4A 22 A7 32 39 00 F6 |..J..W$."J".29..|
000004F0: 0C 4B 00 89 39 38 00 0A 0D 4C 00 8F 2A 49 44 45 |.K..98...L..*IDE|
00000500: 41 4C 47 45 57 49 43 48 54 2A 00 33 0D 4D 00 99 |ALGEWICHT*.3.M..|
00000510: 22 93 11 11 11 20 20 20 20 20 20 20 20 B9 B9 B9 |".... ...|
00000520: B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 B9 |................|
00000530: B9 B9 B9 00 58 0D 4E 00 99 22 20 20 20 20 20 20 |....X.N.." |
00000540: 20 20 44 55 20 48 41 53 54 20 49 44 45 41 4C 47 | DU HAST IDEALG|
00000550: 45 57 49 43 48 54 21 21 00 7D 0D 4F 00 99 22 20 |EWICHT!!.}.O.." |
00000560: 20 20 20 20 20 20 20 B8 B8 B8 B8 B8 B8 B8 B8 B8 | .........|
00000570: B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 B8 00 A6 0D |................|
00000580: 50 00 99 22 11 11 11 11 11 11 20 20 20 20 20 20 |P.."...... |
00000590: 20 20 4E 45 55 45 20 41 55 53 57 45 52 54 55 4E | NEUE AUSWERTUN|
000005A0: 47 20 4A 2F 4E 3F 00 B8 0D 51 00 A1 57 24 3A 8B |G J/N?...Q..W$:.|
000005B0: 57 24 B2 22 22 A7 38 31 00 C7 0D 52 00 8B 57 24 |W$."".81...R..W$|
000005C0: B2 22 4A 22 A7 32 39 00 CF 0D 53 00 89 39 38 00 |."J".29...S..98.|
000005D0: E3 0D 54 00 8F 2A 55 45 42 45 52 47 45 57 49 43 |..T..*UEBERGEWIC|
000005E0: 48 54 2A 00 14 0E 55 00 99 22 93 11 11 11 11 49 |HT*...U..".....I|
000005F0: 43 48 20 48 4F 46 46 45 2C 20 44 55 20 57 45 49 |CH HOFFE, DU WEI|
00000600: 53 53 54 2C 20 5A 55 56 49 45 4C 20 47 45 57 49 |SST, ZUVIEL GEWI|
00000610: 43 48 54 22 00 46 0E 56 00 99 22 11 22 3B 45 47 |CHT".F.V..".";EG|
00000620: 3B 22 4B 47 20 53 49 4E 44 20 45 53 20 42 45 49 |;"KG SIND ES BEI|
00000630: 20 44 49 52 2C 20 49 53 54 20 55 4E 47 45 53 55 | DIR, IST UNGESU|
00000640: 4E 44 21 21 21 22 00 76 0E 59 00 99 22 11 11 11 |ND!!!".v.Y.."...|
00000650: 11 44 55 20 42 49 53 54 20 56 4F 4E 20 44 45 49 |.DU BIST VON DEI|
00000660: 4E 45 4D 20 49 44 45 41 4C 47 45 57 49 43 48 54 |NEM IDEALGEWICHT|
00000670: 20 4E 4F 43 48 22 00 92 0E 5B 00 99 22 11 22 3B | NOCH"...[..".";|
00000680: 4D 47 3B 22 4B 47 20 45 4E 54 46 45 52 4E 54 21 |MG;"KG ENTFERNT!|
00000690: 21 21 00 B9 0E 5C 00 99 22 11 11 11 11 20 20 20 |!!...\..".... |
000006A0: 20 20 20 20 20 4E 45 55 45 20 41 55 53 57 45 52 | NEUE AUSWER|
000006B0: 54 55 4E 47 3F 20 4A 2F 4E 00 CB 0E 5D 00 A1 57 |TUNG? J/N...]..W|
000006C0: 24 3A 8B 57 24 B2 22 22 A7 39 33 00 DA 0E 5E 00 |$:.W$."".93...^.|
000006D0: 8B 57 24 B2 22 4A 22 A7 32 39 00 E2 0E 5F 00 89 |.W$."J".29..._..|
000006E0: 39 38 00 FE 0E 60 00 49 44 B2 B5 28 28 28 47 52 |98...`.ID..(((GR|
000006F0: AB 31 30 30 29 AC 39 30 29 AD 31 30 30 29 00 06 |.100).90).100)..|
00000700: 0F 61 00 89 34 31 00 0C 0F 62 00 80 00 1D 0F 63 |.a..41...b.....c|
00000710: 00 8F 2A 41 4E 4C 45 49 54 55 4E 47 2A 00 3F 0F |..*ANLEITUNG*.?.|
00000720: 64 00 99 22 93 20 20 20 20 20 20 20 20 20 20 20 |d..". |
00000730: 20 20 49 44 45 41 4C 47 45 57 49 43 48 54 22 00 | IDEALGEWICHT".|
00000740: 6C 0F 65 00 99 22 11 44 49 45 53 45 53 20 50 52 |l.e..".DIESES PR|
00000750: 4F 47 52 41 4D 4D 20 49 53 54 20 47 45 44 41 43 |OGRAMM IST GEDAC|
00000760: 48 54 20 46 55 45 52 20 41 4C 4C 22 00 9B 0F 66 |HT FUER ALL"...f|
00000770: 00 99 22 11 44 49 45 20 4D 45 4E 53 43 48 45 4E |..".DIE MENSCHEN|
00000780: 2C 20 44 49 45 20 53 49 43 48 20 47 45 44 41 4E |, DIE SICH GEDAN|
00000790: 4B 45 4E 20 55 4D 20 49 48 52 22 00 C8 0F 68 00 |KEN UM IHR"...h.|
000007A0: 99 22 11 47 45 57 49 43 48 54 20 4D 41 43 48 45 |.".GEWICHT MACHE|
000007B0: 4E 2E 20 53 49 45 20 47 45 42 45 4E 20 49 48 52 |N. SIE GEBEN IHR|
000007C0: 45 20 44 41 54 45 4E 22 00 F4 0F 6A 00 99 22 11 |E DATEN"...j..".|
000007D0: 42 49 54 54 45 20 53 4F 20 45 49 4E 20 2C 20 57 |BITTE SO EIN , W|
000007E0: 49 45 20 44 45 52 20 43 4F 4D 50 55 54 45 52 20 |IE DER COMPUTER |
000007F0: 53 49 45 22 00 05 10 6B 00 99 22 11 41 42 46 52 |SIE"...k..".ABFR|
00000800: 41 47 54 2E 22 00 35 10 6C 00 99 22 11 4A 45 44 |AGT.".5.l..".JED|
00000810: 45 20 44 41 54 45 1D 42 49 54 54 45 20 4D 49 54 |E DATE.BITTE MIT|
00000820: 20 12 3E 52 45 54 55 52 4E 3C 92 20 42 45 45 4E | .>RETURN<. BEEN|
00000830: 44 45 4E 2E 22 00 5D 10 6E 00 99 22 11 11 11 11 |DEN.".].n.."....|
00000840: 1D 1D 1D 1D 1D 1D 1D 1D 11 44 52 55 45 43 4B 45 |.........DRUECKE|
00000850: 20 45 49 4E 45 20 54 41 53 54 45 21 22 00 70 10 | EINE TASTE!".p.|
00000860: 6F 00 A1 46 24 3A 8B 46 24 B2 22 22 A7 31 31 31 |o..F$:.F$."".111|
00000870: 00 7B 10 70 00 99 22 93 22 3A 8E 00 00 00 00 4F |.{.p..".":.....O|
00000880: 07 |. |
.......99.1....". .SSDAS IDEALG
EWICHTSS..V...." EEEEEEEEEEEEEE
EEEEEE......".BITTE GIB DEINE WERTE MIT
.>RETURN<. EIN."...!.:...".."...GROESSE.
.... :";GR.D.#..".GEWICHT..... :";GW...$
..".WUNSCHGEWICHT:";WG...%.."...MAENNLIC
H/WEIBLICH M/W...&..G$:.G$."".38...'..G$
."M".96.;.(.ID..(((GR.100).85).100).L.).
NO..(GR.100).I.*.UE..(((GR.100).112).100
)...+..". ***AUSWERTUNG***...,.
." EEEEEEEEEEEEEEEE...-.."...DU
BIST";GR;"CM GROSS UND WIEGST";GW;"KG".
../.."...DEIN WUNSCHGEWICHT SOLL";WG;"KG
SEIN.".R.1..".... SIND.DIE ANGABEN
RICHTIG?":.".................J/N".D.2..
F$:.F$."".50.S.3..F$."N".29...4..".
***AUSWERTUNG***...5.." EE
EEEEEEEEEEEEEE...6.."...LAUT MEINER ERMI
TTLUNG WAERE DEIN"...8.."......NORMALGEW
ICHT ";NO;"KG.,.9.."....DEIN IDEALGEW
ICHT";ID;"KG.P.:.."....DEIN UEBERGEWICHT
";UE;"KG.P.;.MG.GW.WG:HG.GW.ID: EG.GW.NO
...<..W.1.13000:....=..GW.ID.0.64...>..G
W.NO.84...?..GW..NO.76...@..*MEHR ESSEN*
...A.."....MEINE TABELLE SAGT, DU HAST U
NTERGEWICHT"...C..".. @@@";(I
D.GW);"KG!!@@@.M.D.."..AUCH UNTERGEWICHT
KANN UNGESUND SEIN.".{.F..".ES FEHLEN B
IS ZU DEINEM WUNSCHGEWICHT"...G.."..
@@@";(WG.GW);"KG!!@@@.M.H.."....
.........NEUE AUSWERTUNG J/N?...I..W$:.W
$."".73...J..W$."J".29...K..98...L..*IDE
ALGEWICHT*.3.M..".... ...........
............X.N.." DU HAST IDEALG
EWICHT!!.}.O.." .................
........P.."...... NEUE AUSWERTUN
G J/N?...Q..W$:.W$."".81.G.R..W$."J".29.
O.S..98...T..*UEBERGEWICHT*...U..".....I
CH HOFFE, DU WEISST, ZUVIEL GEWICHT".F.V
..".";EG;"KG SIND ES BEI DIR, IST UNGESU
ND!!!".V.Y.."....DU BIST VON DEINEM IDEA
LGEWICHT NOCH"...[..".";MG;"KG ENTFERNT!
!!...\..".... NEUE AUSWERTUNG? J/
N.K.]..W$:.W$."".93.Z.^..W$."J".29..._..
98...`.ID..(((GR.100).90).100)...A..41..
.B.....C..*ANLEITUNG*.?.D..".
IDEALGEWICHT".L.E..".DIESES PROGRAMM I
ST GEDACHT FUER ALL"...F..".DIE MENSCHEN
, DIE SICH GEDANKEN UM IHR".H.H..".GEWIC
HT MACHEN. SIE GEBEN IHRE DATEN"...J..".
BITTE SO EIN , WIE DER COMPUTER SIE"...K
..".ABFRAGT.".5.L..".JEDE DATE.BITTE MIT
.>RETURN<. BEENDEN.".].N.."............
.DRUECKE EINE TASTE!".P.O..F$:.F$."".111
.{.P..".":.....O.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL