> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 01 00 97 34 35 2C C2 28 31 37 34 29 |.......45,.(174)|
00000010: 3A 97 34 36 2C C2 28 31 37 35 29 3A 9C 00 40 08 |:.46,.(175):..@.|
00000020: 09 00 52 24 B2 22 11 11 45 52 47 45 42 4E 49 53 |..R$."..ERGEBNIS|
00000030: 20 52 55 4E 44 45 4E 20 3C 4A 2F 4E 3E 20 3F 22 | RUNDEN <J/N> ?"|
00000040: 00 8B 08 0A 00 97 35 33 32 38 30 2C 30 3A 97 35 |......53280,0:.5|
00000050: 33 32 38 31 2C 30 3A 99 22 93 22 3A 57 31 24 B2 |3281,0:.".":W1$.|
00000060: 22 05 D5 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |"...............|
00000070: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
00000080: C3 C3 C3 C3 C3 C3 C3 C3 C3 C9 22 00 C2 08 14 00 |..........".....|
00000090: 57 32 24 B2 22 C2 12 96 20 20 20 20 20 20 20 45 |W2$."... E|
000000A0: 20 4C 20 2E 20 20 4D 20 41 20 53 20 43 20 48 20 | L . M A S C H |
000000B0: 49 20 4E 20 45 20 4E 20 20 20 20 20 20 20 92 05 |I N E N ..|
000000C0: C2 22 00 02 09 1E 00 57 33 24 B2 22 CA C3 C3 C3 |.".....W3$."....|
000000D0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
000000E0: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 |................|
000000F0: C3 C3 C3 CB 22 3A 99 57 31 24 3B 57 32 24 3B 57 |....":.W1$;W2$;W|
00000100: 33 24 00 11 09 23 00 99 A3 32 38 29 22 55 2A 49 |3$...#...28)"U*I|
00000110: 22 00 43 09 28 00 99 22 47 4C 45 49 43 48 53 54 |".C.(.."GLEICHST|
00000120: 52 4F 4D 47 45 4E 45 52 41 54 4F 52 3A 20 50 11 |ROMGENERATOR: P.|
00000130: 5A 55 91 20 3D 20 C3 C3 C3 22 3A 99 A3 32 39 29 |ZU. = ...":..29)|
00000140: 22 4E 22 00 7C 09 32 00 99 22 11 11 9E 44 45 46 |"N".|.2.."...DEF|
00000150: 49 4E 49 54 49 4F 4E 3A 05 22 3A 99 22 11 49 20 |INITION:.":.".I |
00000160: 3D 20 53 54 52 4F 4D 53 54 41 45 52 4B 45 20 49 |= STROMSTAERKE I|
00000170: 4E 20 1C 41 05 4D 50 45 52 45 27 22 00 9E 09 3C |N .A.MPERE'"...<|
00000180: 00 99 22 11 55 20 20 20 3D 20 53 50 41 4E 4E 55 |..".U = SPANNU|
00000190: 4E 47 20 49 4E 20 1C 56 05 4F 4C 54 11 22 00 BC |NG IN .V.OLT."..|
000001A0: 09 46 00 99 22 4E 20 20 20 3D 20 57 49 52 4B 55 |.F.."N = WIRKU|
000001B0: 4E 47 53 47 52 41 44 20 45 54 41 22 00 EA 09 4B |NGSGRAD ETA"...K|
000001C0: 00 99 22 11 50 11 41 42 91 20 3D 20 41 42 47 45 |..".P.AB. = ABGE|
000001D0: 47 45 42 45 4E 45 20 4C 45 49 53 54 55 4E 47 20 |GEBENE LEISTUNG |
000001E0: 49 4E 20 1C 57 05 41 54 54 22 00 19 0A 4C 00 99 |IN .W.ATT"...L..|
000001F0: 22 11 50 11 5A 55 91 20 3D 20 5A 55 47 45 46 55 |".P.ZU. = ZUGEFU|
00000200: 45 48 52 54 45 20 4C 45 49 53 54 55 4E 47 20 49 |EHRTE LEISTUNG I|
00000210: 4E 20 1C 57 05 41 54 54 22 00 4B 0A 50 00 99 22 |N .W.ATT".K.P.."|
00000220: 11 12 20 20 20 20 20 20 20 20 20 42 49 54 54 45 |.. BITTE|
00000230: 20 54 41 53 54 45 20 44 52 55 45 43 4B 45 4E 20 | TASTE DRUECKEN |
00000240: 21 20 20 20 20 20 20 20 20 20 22 00 75 0A 5A 00 |! ".u.Z.|
00000250: 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A 97 31 |.198,0:.198,1:.1|
00000260: 39 38 2C 30 3A 99 22 93 22 3B 57 31 24 3B 57 32 |98,0:.".";W1$;W2|
00000270: 24 3B 57 33 24 00 A7 0A 6E 00 99 22 11 11 20 20 |$;W3$...n..".. |
00000280: 42 49 54 54 45 20 57 41 45 48 4C 45 4E 20 53 49 |BITTE WAEHLEN SI|
00000290: 45 20 49 48 52 45 20 52 45 43 48 45 4E 46 4F 52 |E IHRE RECHENFOR|
000002A0: 4D 45 4C 3A 20 20 22 00 C4 0A 78 00 99 22 11 11 |MEL: "...x.."..|
000002B0: 11 3C 41 3E 20 20 50 11 41 42 91 20 3D 20 55 20 |.<A> P.AB. = U |
000002C0: 2A 20 49 22 00 D7 0A 7D 00 99 A3 31 32 29 22 11 |* I"...}...12)".|
000002D0: 11 11 11 55 2A 49 22 00 FA 0A 82 00 99 22 3C 42 |...U*I"......"<B|
000002E0: 3E 20 20 50 11 5A 55 91 20 3D 20 C3 C3 C3 C3 C3 |> P.ZU. = .....|
000002F0: 22 3A 99 A3 31 33 29 22 4E 22 00 0D 0B 96 00 A1 |":..13)"N"......|
00000300: 45 24 3A 8B 45 24 B2 22 22 A7 31 35 30 00 1D 0B |E$:.E$."".150...|
00000310: A0 00 8B 45 24 B2 22 41 22 A7 32 30 30 00 2D 0B |...E$."A".200.-.|
00000320: AA 00 8B 45 24 B2 22 42 22 A7 34 32 30 00 36 0B |...E$."B".420.6.|
00000330: BE 00 89 31 35 30 00 6E 0B C8 00 99 22 93 22 3B |...150.n....".";|
00000340: 57 31 24 3B 57 32 24 3B 57 33 24 3A 85 22 13 11 |W1$;W2$;W3$:."..|
00000350: 11 11 11 53 50 41 4E 4E 55 4E 47 20 3C 56 4F 4C |...SPANNUNG <VOL|
00000360: 54 3E 20 20 20 20 20 20 20 20 22 3B 56 24 00 7D |T> ";V$.}|
00000370: 0B CD 00 8B 56 24 B2 22 22 A7 32 30 30 00 89 0B |....V$."".200...|
00000380: CE 00 56 B2 C5 28 56 24 29 00 B2 0B D2 00 85 22 |..V..(V$)......"|
00000390: 13 11 11 11 11 11 11 53 54 52 4F 4D 53 54 41 45 |.......STROMSTAE|
000003A0: 52 4B 45 20 3C 41 4D 50 45 52 45 27 3E 20 22 3B |RKE <AMPERE'> ";|
000003B0: 41 24 00 C1 0B D6 00 8B 41 24 B2 22 22 A7 32 31 |A$......A$."".21|
000003C0: 30 00 CD 0B D7 00 41 B2 C5 28 41 24 29 00 D5 0B |0.....A..(A$)...|
000003D0: E5 00 99 52 24 00 E8 0B E6 00 A1 45 24 3A 8B 45 |...R$......E$:.E|
000003E0: 24 B2 22 22 A7 32 33 30 00 F8 0B F0 00 8B 45 24 |$."".230......E$|
000003F0: B2 22 4E 22 A7 32 37 30 00 08 0C FA 00 8B 45 24 |."N".270......E$|
00000400: B2 22 4A 22 A7 32 39 30 00 11 0C 04 01 89 32 33 |."J".290......23|
00000410: 30 00 52 0C 0E 01 50 B2 56 AC 41 3A 99 22 11 11 |0.R...P.V.A:."..|
00000420: 44 49 45 20 41 42 47 45 47 45 42 45 4E 45 20 4C |DIE ABGEGEBENE L|
00000430: 45 49 53 54 55 4E 47 22 3A 99 22 11 42 45 54 52 |EISTUNG":.".BETR|
00000440: 41 45 47 54 20 22 50 22 57 41 54 54 22 3A 89 33 |AEGT "P"WATT":.3|
00000450: 31 30 00 67 0C 22 01 50 B2 56 AC 41 3A 53 B2 B5 |10.g.".P.V.A:S..|
00000460: 28 50 29 3A 50 B2 53 00 9E 0C 2C 01 99 22 11 11 |(P):P.S...,.."..|
00000470: 44 49 45 20 41 42 47 45 47 45 42 45 4E 45 20 4C |DIE ABGEGEBENE L|
00000480: 45 49 53 54 55 4E 47 22 3A 99 22 11 42 45 54 52 |EISTUNG":.".BETR|
00000490: 41 45 47 54 20 22 50 22 20 57 41 54 54 22 00 C4 |AEGT "P" WATT"..|
000004A0: 0C 36 01 99 22 11 11 4E 4F 43 48 20 45 49 4E 45 |.6.."..NOCH EINE|
000004B0: 20 42 45 52 45 43 48 4E 55 4E 47 20 3C 4A 2F 4E | BERECHNUNG <J/N|
000004C0: 3E 20 3F 22 00 D7 0C 40 01 A1 45 24 3A 8B 45 24 |> ?"...@..E$:.E$|
000004D0: B2 22 22 A7 33 32 30 00 E7 0C 4A 01 8B 45 24 B2 |."".320...J..E$.|
000004E0: 22 4E 22 A7 33 36 30 00 14 0D 54 01 8B 45 24 B2 |"N".360...T..E$.|
000004F0: 22 4A 22 A7 56 B2 30 3A 41 B2 30 3A 50 B2 30 3A |"J".V.0:A.0:P.0:|
00000500: 53 B2 30 3A 56 24 B2 22 22 3A 41 24 B2 22 22 3A |S.0:V$."":A$."":|
00000510: 89 32 30 30 00 1D 0D 5E 01 89 33 32 30 00 3F 0D |.200...^..320.?.|
00000520: 68 01 99 22 11 11 48 41 55 50 54 4D 45 4E 55 45 |h.."..HAUPTMENUE|
00000530: 20 4C 41 44 45 4E 20 3C 4A 2F 4E 3E 20 3F 22 00 | LADEN <J/N> ?".|
00000540: 52 0D 72 01 A1 45 24 3A 8B 45 24 B2 22 22 A7 33 |R.r..E$:.E$."".3|
00000550: 37 30 00 61 0D 7C 01 8B 45 24 B2 22 4E 22 A7 31 |70.a.|..E$."N".1|
00000560: 30 00 71 0D 86 01 8B 45 24 B2 22 4A 22 A7 34 31 |0.q....E$."J".41|
00000570: 30 00 7A 0D 90 01 89 33 37 30 00 BB 0D 9A 01 99 |0.z....370......|
00000580: 22 93 11 11 12 20 20 20 20 20 20 20 48 41 55 50 |".... HAUP|
00000590: 54 4D 45 4E 55 45 20 57 49 52 44 20 47 45 4C 41 |TMENUE WIRD GELA|
000005A0: 44 45 4E 20 21 20 20 20 20 20 20 20 20 22 3A 93 |DEN ! ":.|
000005B0: 22 4D 45 4E 55 45 22 2C 38 2C 31 00 F4 0D A4 01 |"MENUE",8,1.....|
000005C0: 99 22 93 22 3B 57 31 24 3B 57 32 24 3B 57 33 24 |.".";W1$;W2$;W3$|
000005D0: 3A 85 22 13 11 11 11 11 53 50 41 4E 4E 55 4E 47 |:.".....SPANNUNG|
000005E0: 20 3C 56 4F 4C 54 3E 20 20 20 20 20 20 20 20 20 | <VOLT> |
000005F0: 22 3B 55 24 00 03 0E A9 01 8B 55 24 B2 22 22 A7 |";U$......U$."".|
00000600: 34 32 30 00 0F 0E AA 01 55 B2 C5 28 55 24 29 00 |420.....U..(U$).|
00000610: 39 0E AE 01 85 22 13 11 11 11 11 11 11 53 54 52 |9....".......STR|
00000620: 4F 4D 53 54 41 45 52 4B 45 20 3C 41 4D 50 45 52 |OMSTAERKE <AMPER|
00000630: 45 27 3E 20 20 22 3B 49 24 00 48 0E AF 01 8B 49 |E'> ";I$.H....I|
00000640: 24 B2 22 22 A7 34 33 30 00 54 0E B0 01 49 B2 C5 |$."".430.T...I..|
00000650: 28 49 24 29 00 80 0E B1 01 85 22 13 11 11 11 11 |(I$)......".....|
00000660: 11 11 11 11 57 49 52 4B 55 4E 47 53 47 52 41 44 |....WIRKUNGSGRAD|
00000670: 20 20 20 20 20 20 20 20 20 20 20 20 22 3B 43 24 | ";C$|
00000680: 00 8F 0E B2 01 8B 43 24 B2 22 22 A7 34 33 33 00 |......C$."".433.|
00000690: 9B 0E B3 01 43 B2 C5 28 43 24 29 00 A3 0E B7 01 |....C..(C$).....|
000006A0: 99 52 24 00 B6 0E C1 01 A1 45 24 3A 8B 45 24 B2 |.R$......E$:.E$.|
000006B0: 22 22 A7 34 34 39 00 C6 0E C2 01 8B 45 24 B2 22 |"".449......E$."|
000006C0: 4A 22 A7 34 39 30 00 D6 0E CC 01 8B 45 24 B2 22 |J".490......E$."|
000006D0: 4E 22 A7 34 38 30 00 DF 0E D6 01 89 34 34 39 00 |N".480......449.|
000006E0: 24 0F E0 01 4F B2 55 AC 49 AD 43 3A 99 22 11 11 |$...O.U.I.C:."..|
000006F0: 44 45 52 20 5A 55 47 45 46 55 45 48 52 54 45 20 |DER ZUGEFUEHRTE |
00000700: 4C 45 49 53 54 55 4E 47 22 3A 99 22 11 42 45 54 |LEISTUNG":.".BET|
00000710: 52 41 45 47 54 20 22 4F 22 20 57 41 54 54 22 3A |RAEGT "O" WATT":|
00000720: 89 35 30 30 00 6F 0F EA 01 4F B2 55 AC 49 AD 43 |.500.o...O.U.I.C|
00000730: 3A 53 B2 B5 28 4F 29 3A 4F B2 53 3A 99 22 11 11 |:S..(O):O.S:."..|
00000740: 44 45 52 20 5A 55 47 45 46 55 45 48 52 54 45 20 |DER ZUGEFUEHRTE |
00000750: 4C 45 49 53 54 55 4E 47 22 3A 99 22 11 42 45 54 |LEISTUNG":.".BET|
00000760: 52 41 45 47 54 20 22 4F 22 20 57 41 54 54 22 00 |RAEGT "O" WATT".|
00000770: 95 0F F4 01 99 22 11 11 4E 4F 43 48 20 45 49 4E |....."..NOCH EIN|
00000780: 45 20 42 45 52 45 43 48 4E 55 4E 47 20 3C 4A 2F |E BERECHNUNG <J/|
00000790: 4E 3E 20 3F 22 00 A8 0F FE 01 A1 45 24 3A 8B 45 |N> ?"......E$:.E|
000007A0: 24 B2 22 22 A7 35 31 30 00 B8 0F 08 02 8B 45 24 |$."".510......E$|
000007B0: B2 22 4E 22 A7 33 36 30 00 EF 0F 12 02 8B 45 24 |."N".360......E$|
000007C0: B2 22 4A 22 A7 49 B2 30 3A 56 B2 30 3A 4F B2 30 |."J".I.0:V.0:O.0|
000007D0: 3A 53 B2 30 3A 43 B2 30 3A 56 24 B2 22 22 3A 49 |:S.0:C.0:V$."":I|
000007E0: 24 B2 22 22 3A 43 24 B2 22 22 3A 89 34 32 30 00 |$."":C$."":.420.|
000007F0: F8 0F 1C 02 89 35 31 30 00 00 00 |.....510... |
.......45,B(174):.46,B(175):..@...R$."..
ERGEBNIS RUNDEN <J/N> ?"......53280,0:.5
3281,0:.".":W1$.".UCCCCCCCCCCCCCCCCCCCCC
CCCCCCCCCCCCCCCCCI".B...W2$."B.. E
L . M A S C H I N E N ..B".....W
3$."JCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
CCCK":.W1$;W2$;W3$...#...28)"U*I".C.(.."
GLEICHSTROMGENERATOR: P.ZU. = CCC":..29)
"N".|.2.."...DEFINITION:.":.".I = STROMS
TAERKE IN .A.MPERE'"...<..".U = SPANNU
NG IN .V.OLT."...F.."N = WIRKUNGSGRAD
ETA"...K..".P.AB. = ABGEGEBENE LEISTUNG
IN .W.ATT"...L..".P.ZU. = ZUGEFUEHRTE LE
ISTUNG IN .W.ATT".K.P..".. BITTE
TASTE DRUECKEN ! ".U.Z..198,0:.
198,1:.198,0:.".";W1$;W2$;W3$...N.."..
BITTE WAEHLEN SIE IHRE RECHENFORMEL: ".
D.X.."...<A> P.AB. = U * I".W.}...12)".
...U*I"......"<B> P.ZU. = CCCCC":..13)"
N"......E$:.E$."".150... ..E$."A".200.-.
...E$."B".420.6....150.N.H..".";W1$;W2$;
W3$:.".....SPANNUNG <VOLT> ";V$.}
.M..V$."".200...N.V.E(V$)...R..".......S
TROMSTAERKE <AMPERE'> ";A$.A.V..A$."".21
0.M.W.A.E(A$).U....R$......E$:.E$."".230
......E$."N".270......E$."J".290......23
0.R...P.V.A:."..DIE ABGEGEBENE LEISTUNG"
:.".BETRAEGT "P"WATT":.310.G.".P.V.A:S..
(P):P.S...,.."..DIE ABGEGEBENE LEISTUNG"
:.".BETRAEGT "P" WATT".D.6.."..NOCH EINE
BERECHNUNG <J/N> ?".W.@..E$:.E$."".320.
..J..E$."N".360...T..E$."J".V.0:A.0:P.0:
S.0:V$."":A$."":.200...^..320.?.H.."..HA
UPTMENUE LADEN <J/N> ?".R.R..E$:.E$."".3
70.A.|..E$."N".10.Q....E$."J".410.Z....3
70......".... HAUPTMENUE WIRD GELA
DEN ! ":."MENUE",8,1......".";W1$
;W2$;W3$:.".....SPANNUNG <VOLT>
";U$......U$."".420.....U.E(U$).9...."..
.....STROMSTAERKE <AMPERE'> ";I$.H....I
$."".430.T...I.E(I$)......".........WIRK
UNGSGRAD ";C$......C$."".433.
....C.E(C$)......R$...A..E$:.E$."".449.F
.B..E$."J".490.V.L..E$."N".480...V..449.
$...O.U.I.C:."..DER ZUGEFUEHRTE LEISTUNG
":.".BETRAEGT "O" WATT":.500.O...O.U.I.C
:S..(O):O.S:."..DER ZUGEFUEHRTE LEISTUNG
":.".BETRAEGT "O" WATT"......"..NOCH EIN
E BERECHNUNG <J/N> ?"......E$:.E$."".510
......E$."N".360......E$."J".I.0:V.0:O.0
:S.0:C.0:V$."":I$."":C$."":.420......510
...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL