> 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 81 20 20 20 20 20 20 20 20 |W2$."... |
000000A0: 47 20 4C 20 45 20 49 20 43 20 48 20 53 20 54 20 |G L E I C H S T |
000000B0: 52 20 4F 20 4D 20 20 20 20 20 20 20 20 20 92 05 |R O M ..|
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 2D 09 28 00 99 22 9E 45 4C 45 4B 54 52 |3$.-.(..".ELEKTR|
00000110: 49 53 43 48 45 20 4C 45 49 53 54 55 4E 47 3A 05 |ISCHE LEISTUNG:.|
00000120: 20 20 50 20 20 3D 20 55 20 2A 20 49 22 00 5C 09 | P = U * I".\.|
00000130: 32 00 99 22 11 11 9E 44 45 46 49 4E 49 54 49 4F |2.."...DEFINITIO|
00000140: 4E 3A 05 20 20 50 20 3D 20 4C 45 49 53 54 55 4E |N:. P = LEISTUN|
00000150: 47 20 49 4E 20 1C 57 05 41 54 54 22 00 7F 09 3C |G IN .W.ATT"...<|
00000160: 00 99 A3 31 33 29 22 11 55 20 3D 20 53 50 41 4E |...13)".U = SPAN|
00000170: 4E 55 4E 47 20 49 4E 20 1C 56 05 4F 4C 54 22 00 |NUNG IN .V.OLT".|
00000180: A9 09 46 00 99 A3 31 33 29 22 11 49 20 3D 20 53 |..F...13)".I = S|
00000190: 54 52 4F 4D 53 54 41 45 52 4B 45 20 49 4E 20 1C |TROMSTAERKE IN .|
000001A0: 41 05 4D 50 45 52 45 27 22 00 DE 09 50 00 99 22 |A.MPERE'"...P.."|
000001B0: 11 11 11 11 12 20 20 20 20 20 20 20 20 20 42 49 |..... BI|
000001C0: 54 54 45 20 54 41 53 54 45 20 44 52 55 45 43 4B |TTE TASTE DRUECK|
000001D0: 45 4E 20 21 20 20 20 20 20 20 20 20 20 22 00 08 |EN ! "..|
000001E0: 0A 5A 00 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 |.Z..198,0:.198,1|
000001F0: 3A 97 31 39 38 2C 30 3A 99 22 93 22 3B 57 31 24 |:.198,0:.".";W1$|
00000200: 3B 57 32 24 3B 57 33 24 00 3A 0A 6E 00 99 22 11 |;W2$;W3$.:.n..".|
00000210: 11 20 20 42 49 54 54 45 20 57 41 45 48 4C 45 4E |. BITTE WAEHLEN|
00000220: 20 53 49 45 20 49 48 52 45 20 52 45 43 48 45 4E | SIE IHRE RECHEN|
00000230: 46 4F 52 4D 45 4C 3A 20 20 22 00 53 0A 78 00 99 |FORMEL: ".S.x..|
00000240: 22 11 11 3C 41 3E 20 20 50 20 20 3D 20 55 20 2A |"..<A> P = U *|
00000250: 20 49 22 00 7C 0A 82 00 99 A3 31 30 29 22 11 50 | I".|.....10)".P|
00000260: 22 3A 99 22 3C 42 3E 20 20 55 20 3D 20 C3 C3 C3 |":."<B> U = ...|
00000270: 22 3A 99 A3 31 30 29 22 49 11 11 22 00 A2 0A 8C |":..10)"I.."....|
00000280: 00 99 A3 31 30 29 22 50 22 3A 99 22 3C 43 3E 20 |...10)"P":."<C> |
00000290: 20 49 20 3D 20 C3 C3 C3 22 3A 99 A3 31 30 29 22 | I = ...":..10)"|
000002A0: 55 22 00 B5 0A 96 00 A1 45 24 3A 8B 45 24 B2 22 |U"......E$:.E$."|
000002B0: 22 A7 31 35 30 00 C5 0A A0 00 8B 45 24 B2 22 41 |".150......E$."A|
000002C0: 22 A7 32 30 30 00 D5 0A AA 00 8B 45 24 B2 22 42 |".200......E$."B|
000002D0: 22 A7 34 32 30 00 E5 0A B4 00 8B 45 24 B2 22 43 |".420......E$."C|
000002E0: 22 A7 35 35 30 00 EE 0A BE 00 89 31 35 30 00 29 |".550......150.)|
000002F0: 0B C8 00 99 22 93 22 3B 57 31 24 3B 57 32 24 3B |....".";W1$;W2$;|
00000300: 57 33 24 3A 85 22 13 11 11 11 11 11 11 11 53 50 |W3$:."........SP|
00000310: 41 4E 4E 55 4E 47 20 3C 41 4D 50 45 52 45 27 3E |ANNUNG <AMPERE'>|
00000320: 20 20 20 20 20 22 3B 56 24 00 38 0B CD 00 8B 56 | ";V$.8....V|
00000330: 24 B2 22 22 A7 32 30 30 00 44 0B CE 00 56 B2 C5 |$."".200.D...V..|
00000340: 28 56 24 29 00 70 0B D2 00 85 22 13 11 11 11 11 |(V$).p....".....|
00000350: 11 11 11 11 11 53 54 52 4F 4D 53 54 41 45 52 4B |.....STROMSTAERK|
00000360: 45 20 3C 41 4D 50 45 52 45 27 3E 20 22 3B 49 24 |E <AMPERE'> ";I$|
00000370: 00 7F 0B D6 00 8B 49 24 B2 22 22 A7 32 31 30 00 |......I$."".210.|
00000380: 8B 0B D7 00 49 B2 C5 28 49 24 29 00 93 0B D8 00 |....I..(I$).....|
00000390: 99 52 24 00 A6 0B E6 00 A1 45 24 3A 8B 45 24 B2 |.R$......E$:.E$.|
000003A0: 22 22 A7 32 33 30 00 B6 0B F0 00 8B 45 24 B2 22 |"".230......E$."|
000003B0: 4E 22 A7 32 37 30 00 C6 0B FA 00 8B 45 24 B2 22 |N".270......E$."|
000003C0: 4A 22 A7 32 39 30 00 CF 0B 04 01 89 32 33 30 00 |J".290......230.|
000003D0: 04 0C 0E 01 50 B2 56 AC 49 3A 99 22 11 11 44 49 |....P.V.I:."..DI|
000003E0: 45 20 4C 45 49 53 54 55 4E 47 20 42 45 54 52 41 |E LEISTUNG BETRA|
000003F0: 45 47 54 20 22 50 3A 99 22 11 57 41 54 54 22 3A |EGT "P:.".WATT":|
00000400: 89 33 31 30 00 19 0C 22 01 50 B2 56 AC 49 3A 57 |.310...".P.V.I:W|
00000410: B2 B5 28 50 29 3A 50 B2 57 00 3F 0C 2C 01 99 22 |..(P):P.W.?.,.."|
00000420: 11 11 44 49 45 20 4C 45 49 53 54 55 4E 47 20 42 |..DIE LEISTUNG B|
00000430: 45 54 52 41 45 47 54 22 50 22 57 41 54 54 22 00 |ETRAEGT"P"WATT".|
00000440: 65 0C 36 01 99 22 11 11 4E 4F 43 48 20 45 49 4E |e.6.."..NOCH EIN|
00000450: 45 20 42 45 52 45 43 48 4E 55 4E 47 20 3C 4A 2F |E BERECHNUNG <J/|
00000460: 4E 3E 20 3F 22 00 78 0C 40 01 A1 45 24 3A 8B 45 |N> ?".x.@..E$:.E|
00000470: 24 B2 22 22 A7 33 32 30 00 88 0C 4A 01 8B 45 24 |$."".320...J..E$|
00000480: B2 22 4E 22 A7 33 36 30 00 B5 0C 54 01 8B 45 24 |."N".360...T..E$|
00000490: B2 22 4A 22 A7 49 B2 30 3A 56 B2 30 3A 50 B2 30 |."J".I.0:V.0:P.0|
000004A0: 3A 57 B2 30 3A 56 24 B2 22 22 3A 49 24 B2 22 22 |:W.0:V$."":I$.""|
000004B0: 3A 89 32 30 30 00 BE 0C 5E 01 89 33 32 30 00 E0 |:.200...^..320..|
000004C0: 0C 68 01 99 22 11 11 48 41 55 50 54 4D 45 4E 55 |.h.."..HAUPTMENU|
000004D0: 45 20 4C 41 44 45 4E 20 3C 4A 2F 4E 3E 20 3F 22 |E LADEN <J/N> ?"|
000004E0: 00 F3 0C 72 01 A1 45 24 3A 8B 45 24 B2 22 22 A7 |...r..E$:.E$."".|
000004F0: 33 37 30 00 02 0D 7C 01 8B 45 24 B2 22 4E 22 A7 |370...|..E$."N".|
00000500: 31 30 00 12 0D 86 01 8B 45 24 B2 22 4A 22 A7 34 |10......E$."J".4|
00000510: 31 30 00 1B 0D 90 01 89 33 37 30 00 5C 0D 9A 01 |10......370.\...|
00000520: 99 22 93 11 11 12 20 20 20 20 20 20 20 48 41 55 |.".... HAU|
00000530: 50 54 4D 45 4E 55 45 20 57 49 52 44 20 47 45 4C |PTMENUE WIRD GEL|
00000540: 41 44 45 4E 20 21 20 20 20 20 20 20 20 20 22 3A |ADEN ! ":|
00000550: 93 22 4D 45 4E 55 45 22 2C 38 2C 31 00 97 0D A4 |."MENUE",8,1....|
00000560: 01 99 22 93 22 3B 57 31 24 3B 57 32 24 3B 57 33 |..".";W1$;W2$;W3|
00000570: 24 3A 85 22 13 11 11 11 11 11 11 11 4C 45 49 53 |$:."........LEIS|
00000580: 54 55 4E 47 20 3C 57 41 54 54 3E 20 20 20 20 20 |TUNG <WATT> |
00000590: 20 20 20 22 3B 50 24 00 A6 0D A9 01 8B 50 24 B2 | ";P$......P$.|
000005A0: 22 22 A7 34 32 30 00 B2 0D AA 01 50 B2 C5 28 50 |"".420.....P..(P|
000005B0: 24 29 00 DE 0D AE 01 85 22 13 11 11 11 11 11 11 |$)......".......|
000005C0: 11 11 11 53 54 52 4F 4D 53 54 41 45 52 4B 45 20 |...STROMSTAERKE |
000005D0: 3C 41 4D 50 45 52 45 27 3E 20 22 3B 49 24 00 ED |<AMPERE'> ";I$..|
000005E0: 0D B2 01 8B 49 24 B2 22 22 A7 34 33 30 00 F9 0D |....I$."".430...|
000005F0: B3 01 49 B2 C5 28 49 24 29 00 01 0E B4 01 99 52 |..I..(I$)......R|
00000600: 24 00 14 0E B8 01 A1 45 24 3A 8B 45 24 B2 22 22 |$......E$:.E$.""|
00000610: A7 34 34 30 00 24 0E C2 01 8B 45 24 B2 22 4A 22 |.440.$....E$."J"|
00000620: A7 34 39 30 00 34 0E CC 01 8B 45 24 B2 22 4E 22 |.490.4....E$."N"|
00000630: A7 34 38 30 00 3D 0E D6 01 89 34 34 30 00 71 0E |.480.=....440.q.|
00000640: E0 01 55 B2 50 AD 49 3A 99 22 11 11 44 49 45 20 |..U.P.I:."..DIE |
00000650: 53 50 41 4E 4E 55 4E 47 20 42 45 54 52 41 45 47 |SPANNUNG BETRAEG|
00000660: 54 22 55 3A 99 22 11 56 4F 4C 54 22 3A 89 35 30 |T"U:.".VOLT":.50|
00000670: 30 00 A8 0E EA 01 55 B2 50 AD 49 3A 53 B2 B5 28 |0.....U.P.I:S..(|
00000680: 55 29 3A 55 B2 53 3A 99 22 11 11 44 49 45 20 53 |U):U.S:."..DIE S|
00000690: 50 41 4E 4E 55 4E 47 20 42 45 54 52 41 45 47 54 |PANNUNG BETRAEGT|
000006A0: 22 55 22 56 4F 4C 54 22 00 CE 0E F4 01 99 22 11 |"U"VOLT"......".|
000006B0: 11 4E 4F 43 48 20 45 49 4E 45 20 42 45 52 45 43 |.NOCH EINE BEREC|
000006C0: 48 4E 55 4E 47 20 3C 4A 2F 4E 3E 20 3F 22 00 E1 |HNUNG <J/N> ?"..|
000006D0: 0E FE 01 A1 45 24 3A 8B 45 24 B2 22 22 A7 35 31 |....E$:.E$."".51|
000006E0: 30 00 F1 0E 08 02 8B 45 24 B2 22 4E 22 A7 33 36 |0......E$."N".36|
000006F0: 30 00 1E 0F 12 02 8B 45 24 B2 22 4A 22 A7 49 B2 |0......E$."J".I.|
00000700: 30 3A 50 B2 30 3A 55 B2 30 3A 53 B2 30 3A 50 24 |0:P.0:U.0:S.0:P$|
00000710: B2 22 22 3A 49 24 B2 22 22 3A 89 34 32 30 00 27 |."":I$."":.420.'|
00000720: 0F 1C 02 89 35 31 30 00 5B 0F 26 02 99 22 93 22 |....510.[.&.."."|
00000730: 3B 57 31 24 3B 57 32 24 3B 57 33 24 3A 85 22 13 |;W1$;W2$;W3$:.".|
00000740: 11 11 11 11 11 11 11 4C 45 49 53 54 55 4E 47 20 |.......LEISTUNG |
00000750: 3C 57 41 54 54 3E 20 22 3B 50 24 00 6A 0F 2B 02 |<WATT> ";P$.j.+.|
00000760: 8B 50 24 B2 22 22 A7 35 35 30 00 76 0F 2C 02 50 |.P$."".550.v.,.P|
00000770: B2 C5 28 50 24 29 00 9B 0F 30 02 85 22 13 11 11 |..(P$)...0.."...|
00000780: 11 11 11 11 11 11 11 53 50 41 4E 4E 55 4E 47 20 |.......SPANNUNG |
00000790: 3C 56 4F 4C 54 3E 20 22 3B 56 24 00 AA 0F 34 02 |<VOLT> ";V$...4.|
000007A0: 8B 56 24 B2 22 22 A7 35 36 30 00 B6 0F 35 02 56 |.V$."".560...5.V|
000007B0: B2 C5 28 56 24 29 00 BE 0F 36 02 99 52 24 00 D1 |..(V$)...6..R$..|
000007C0: 0F 3A 02 A1 45 24 3A 8B 45 24 B2 22 22 A7 35 37 |.:..E$:.E$."".57|
000007D0: 30 00 E1 0F 44 02 8B 45 24 B2 22 4A 22 A7 36 31 |0...D..E$."J".61|
000007E0: 35 00 F1 0F 4E 02 8B 45 24 B2 22 4E 22 A7 36 31 |5...N..E$."N".61|
000007F0: 30 00 FA 0F 58 02 89 36 34 30 00 36 10 62 02 49 |0...X..640.6.b.I|
00000800: B2 50 AD 56 3A 99 22 11 11 44 49 45 20 53 54 52 |.P.V:."..DIE STR|
00000810: 4F 4D 53 54 41 45 52 4B 45 20 42 45 54 52 41 45 |OMSTAERKE BETRAE|
00000820: 47 54 20 22 49 3A 99 22 11 41 4D 50 45 52 45 27 |GT "I:.".AMPERE'|
00000830: 22 3A 89 36 33 30 00 4B 10 67 02 49 B2 50 AD 56 |":.630.K.g.I.P.V|
00000840: 3A 42 B2 B5 28 49 29 3A 49 B2 42 00 7C 10 6C 02 |:B..(I):I.B.|.l.|
00000850: 99 22 11 11 44 49 45 20 53 54 52 4F 4D 53 54 41 |."..DIE STROMSTA|
00000860: 45 52 4B 45 20 42 45 54 52 41 45 47 54 20 22 49 |ERKE BETRAEGT "I|
00000870: 3A 99 22 11 41 4D 50 45 52 45 27 22 00 A2 10 76 |:.".AMPERE'"...v|
00000880: 02 99 22 11 11 4E 4F 43 48 20 45 49 4E 45 20 42 |.."..NOCH EINE B|
00000890: 45 52 45 43 48 4E 55 4E 47 20 3C 4A 2F 4E 3E 20 |ERECHNUNG <J/N> |
000008A0: 3F 22 00 B5 10 80 02 A1 45 24 3A 8B 45 24 B2 22 |?"......E$:.E$."|
000008B0: 22 A7 36 34 30 00 C5 10 8A 02 8B 45 24 B2 22 4E |".640......E$."N|
000008C0: 22 A7 33 36 30 00 F2 10 94 02 8B 45 24 B2 22 4A |".360......E$."J|
000008D0: 22 A7 49 B2 30 3A 50 B2 30 3A 56 B2 30 3A 42 B2 |".I.0:P.0:V.0:B.|
000008E0: 30 3A 56 24 B2 22 22 3A 50 24 B2 22 22 3A 89 35 |0:V$."":P$."":.5|
000008F0: 35 30 00 FB 10 9E 02 89 36 34 30 00 00 00 |50......640... |
.......45,B(174):.46,B(175):..@...R$."..
ERGEBNIS RUNDEN <J/N> ?"......53280,0:.5
3281,0:.".":W1$.".UCCCCCCCCCCCCCCCCCCCCC
CCCCCCCCCCCCCCCCCI".B...W2$."B..
G L E I C H S T R O M ..B".....W
3$."JCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
CCCK":.W1$;W2$;W3$.-.(..".ELEKTRISCHE LE
ISTUNG:. P = U * I".\.2.."...DEFINITIO
N:. P = LEISTUNG IN .W.ATT"..<...13)".
U = SPANNUNG IN .V.OLT"...F...13)".I = S
TROMSTAERKE IN .A.MPERE'"...P..".....
BITTE TASTE DRUECKEN ! "..
.Z..198,0:.198,1:.198,0:.".";W1$;W2$;W3$
.:.N..".. BITTE WAEHLEN SIE IHRE RECHEN
FORMEL: ".S.X.."..<A> P = U * I".|...
..10)".P":."<B> U = CCC":..10)"I.."....
...10)"P":."<C> I = CCC":..10)"U"......
E$:.E$."".150.E. ..E$."A".200.U....E$."B
".420......E$."C".550......150.).H..".";
W1$;W2$;W3$:."........SPANNUNG <AMPERE'>
";V$.8.M..V$."".200.D.N.V.E(V$).P.R
.."..........STROMSTAERKE <AMPERE'> ";I$
..V..I$."".210...W.I.E(I$)...X..R$.....
.E$:.E$."".230......E$."N".270.F....E$."
J".290.O....230.....P.V.I:."..DIE LEISTU
NG BETRAEGT "P:.".WATT":.310...".P.V.I:W
..(P):P.W.?.,.."..DIE LEISTUNG BETRAEGT"
P"WATT".E.6.."..NOCH EINE BERECHNUNG <J/
N> ?".X.@..E$:.E$."".320...J..E$."N".360
...T..E$."J".I.0:V.0:P.0:W.0:V$."":I$.""
:.200...^..320...H.."..HAUPTMENUE LADEN
<J/N> ?"...R..E$:.E$."".370...|..E$."N".
10......E$."J".410......370.\...."....
HAUPTMENUE WIRD GELADEN ! ":
."MENUE",8,1......".";W1$;W2$;W3$:."....
....LEISTUNG <WATT> ";P$......P$.
"".420.....P.E(P$)......"..........STROM
STAERKE <AMPERE'> ";I$......I$."".430...
..I.E(I$)......R$......E$:.E$."".440.$.B
..E$."J".490.4.L..E$."N".480.=.V..440.Q.
..U.P.I:."..DIE SPANNUNG BETRAEGT"U:.".V
OLT":.500.....U.P.I:S..(U):U.S:."..DIE S
PANNUNG BETRAEGT"U"VOLT".N...."..NOCH EI
NE BERECHNUNG <J/N> ?"......E$:.E$."".51
0......E$."N".360......E$."J".I.0:P.0:U.
0:S.0:P$."":I$."":.420.'....510.[.&.."."
;W1$;W2$;W3$:."........LEISTUNG <WATT> "
;P$.J.+..P$."".550.V.,.P.E(P$)...0.."...
.......SPANNUNG <VOLT> ";V$...4..V$."".5
60...5.V.E(V$)...6..R$.Q.:..E$:.E$."".57
0...D..E$."J".615...N..E$."N".610...X..6
40.6.B.I.P.V:."..DIE STROMSTAERKE BETRAE
GT "I:.".AMPERE'":.630.K.G.I.P.V:B..(I):
I.B.|.L.."..DIE STROMSTAERKE BETRAEGT "I
:.".AMPERE'"...V.."..NOCH EINE BERECHNUN
G <J/N> ?"......E$:.E$."".640.E....E$."N
".360......E$."J".I.0:P.0:V.0:B.0:V$."":
P$."":.550......640...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL