> 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 20 |W2$."... |
000000A0: 45 20 4C 2E 20 4D 20 41 20 53 20 43 20 48 20 49 |E L. M A S C H I|
000000B0: 20 4E 20 45 20 4E 20 20 20 20 20 20 20 20 92 05 | N E N ..|
000000C0: C2 22 00 0D 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 3A 99 A3 32 39 29 22 91 CE A3 22 00 25 09 |3$:..29)"...".%.|
00000110: 23 00 99 A3 32 36 29 22 A3 CD CE 33 2A 55 2A 49 |#...26)"...3*U*I|
00000120: 2A 43 4F 53 22 00 61 09 28 00 99 22 9E 44 52 45 |*COS".a.(..".DRE|
00000130: 48 53 54 52 4F 4D 47 45 4E 45 52 41 54 4F 52 3A |HSTROMGENERATOR:|
00000140: 05 20 50 11 41 42 91 20 3D 20 C3 C3 C3 C3 C3 C3 |. P.AB. = ......|
00000150: C3 C3 C3 C3 C3 C3 C3 22 3A 99 A3 33 33 29 22 4E |.......":..33)"N|
00000160: 22 00 94 09 32 00 99 22 9E 44 45 46 49 4E 49 54 |"...2..".DEFINIT|
00000170: 49 4F 4E 3A 05 22 3A 99 22 11 55 20 20 20 20 3D |ION:.":.".U =|
00000180: 20 53 50 41 4E 4E 55 4E 47 20 49 4E 20 1C 56 05 | SPANNUNG IN .V.|
00000190: 4F 4C 54 22 00 BD 09 46 00 99 22 11 49 20 20 20 |OLT"...F..".I |
000001A0: 20 3D 20 53 54 52 4F 4D 53 54 41 45 52 4B 45 20 | = STROMSTAERKE |
000001B0: 49 4E 20 1C 41 05 4D 50 45 52 45 27 22 00 E0 09 |IN .A.MPERE'"...|
000001C0: 4B 00 99 22 11 43 4F 53 20 20 3D 20 57 49 52 4B |K..".COS = WIRK|
000001D0: 4C 45 49 53 54 55 4E 47 53 46 41 4B 54 4F 52 22 |LEISTUNGSFAKTOR"|
000001E0: 00 0F 0A 4C 00 99 22 11 50 11 41 42 91 20 20 3D |...L..".P.AB. =|
000001F0: 20 41 42 47 45 47 45 42 45 4E 45 20 4C 45 49 53 | ABGEGEBENE LEIS|
00000200: 54 55 4E 47 20 49 4E 20 1C 57 05 41 54 54 22 00 |TUNG IN .W.ATT".|
00000210: 3F 0A 4D 00 99 22 11 50 11 5A 55 91 20 20 3D 20 |?.M..".P.ZU. = |
00000220: 5A 55 47 45 46 55 45 48 52 54 45 20 4C 45 49 53 |ZUGEFUEHRTE LEIS|
00000230: 54 55 4E 47 20 49 4E 20 1C 57 05 41 54 54 22 00 |TUNG IN .W.ATT".|
00000240: 5B 0A 4E 00 99 22 11 4E 20 20 20 20 3D 20 57 49 |[.N..".N = WI|
00000250: 52 4B 55 4E 47 53 47 52 41 44 22 00 8D 0A 50 00 |RKUNGSGRAD"...P.|
00000260: 99 22 11 12 20 20 20 20 20 20 20 20 20 42 49 54 |.".. BIT|
00000270: 54 45 20 54 41 53 54 45 20 44 52 55 45 43 4B 45 |TE TASTE DRUECKE|
00000280: 4E 20 21 20 20 20 20 20 20 20 20 20 22 00 B7 0A |N ! "...|
00000290: 5A 00 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A |Z..198,0:.198,1:|
000002A0: 97 31 39 38 2C 30 3A 99 22 93 22 3B 57 31 24 3B |.198,0:.".";W1$;|
000002B0: 57 32 24 3B 57 33 24 00 F4 0A 6E 00 99 22 20 20 |W2$;W3$...n.." |
000002C0: 42 49 54 54 45 20 57 41 45 48 4C 45 4E 20 53 49 |BITTE WAEHLEN SI|
000002D0: 45 20 49 48 52 45 20 52 45 43 48 45 4E 46 4F 52 |E IHRE RECHENFOR|
000002E0: 4D 45 4C 3A 20 20 11 11 11 22 3A 99 A3 31 36 29 |MEL: ...":..16)|
000002F0: 22 CE A3 22 00 13 0B 78 00 99 A3 31 33 29 22 A3 |".."...x...13)".|
00000300: CD CE 20 33 20 2A 20 55 20 2A 20 49 20 2A 20 43 |.. 3 * U * I * C|
00000310: 4F 53 22 00 55 0B 79 00 99 22 3C 41 3E 20 20 50 |OS".U.y.."<A> P|
00000320: 11 5A 55 91 20 3D 20 C3 C3 C3 C3 C3 C3 C3 C3 C3 |.ZU. = .........|
00000330: C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 C3 22 3A |..............":|
00000340: 99 A3 32 33 29 22 4E 22 3A 99 A3 31 36 29 22 11 |..23)"N":..16)".|
00000350: 11 11 CE A3 22 00 7F 0B 7A 00 99 22 3C 42 3E 20 |...."...z.."<B> |
00000360: 20 50 11 41 42 91 20 3D 20 20 20 A3 CD CE 20 33 | P.AB. = ... 3|
00000370: 20 2A 20 55 20 2A 20 49 20 2A 20 43 4F 53 22 00 | * U * I * COS".|
00000380: 92 0B 7C 00 A1 45 24 3A 8B 45 24 B2 22 22 A7 31 |..|..E$:.E$."".1|
00000390: 32 34 00 A2 0B 7D 00 8B 45 24 B2 22 41 22 A7 32 |24...}..E$."A".2|
000003A0: 30 30 00 B2 0B 7E 00 8B 45 24 B2 22 42 22 A7 34 |00...~..E$."B".4|
000003B0: 32 30 00 BB 0B 80 00 89 31 32 34 00 F3 0B C8 00 |20......124.....|
000003C0: 99 22 93 22 3B 57 31 24 3B 57 32 24 3B 57 33 24 |.".";W1$;W2$;W3$|
000003D0: 3A 85 22 13 11 11 11 11 53 50 41 4E 4E 55 4E 47 |:.".....SPANNUNG|
000003E0: 20 3C 56 4F 4C 54 3E 20 20 20 20 20 20 20 20 22 | <VOLT> "|
000003F0: 3B 56 24 00 02 0C CD 00 8B 56 24 B2 22 22 A7 32 |;V$......V$."".2|
00000400: 30 30 00 0E 0C CE 00 56 B2 C5 28 56 24 29 00 37 |00.....V..(V$).7|
00000410: 0C CF 00 85 22 13 11 11 11 11 11 11 53 54 52 4F |....".......STRO|
00000420: 4D 53 54 41 45 52 4B 45 20 3C 41 4D 50 45 52 45 |MSTAERKE <AMPERE|
00000430: 27 3E 20 22 3B 49 24 00 46 0C D0 00 8B 49 24 B2 |'> ";I$.F....I$.|
00000440: 22 22 A7 32 30 37 00 52 0C D1 00 49 B2 C5 28 49 |"".207.R...I..(I|
00000450: 24 29 00 7D 0C D2 00 85 22 13 11 11 11 11 11 11 |$).}....".......|
00000460: 11 11 57 49 52 4B 4C 45 49 53 54 55 4E 47 53 46 |..WIRKLEISTUNGSF|
00000470: 41 4B 54 4F 52 20 20 20 20 22 3B 57 24 00 8C 0C |AKTOR ";W$...|
00000480: D3 00 8B 57 24 B2 22 22 A7 32 31 30 00 98 0C D4 |...W$."".210....|
00000490: 00 57 B2 C5 28 57 24 29 00 C5 0C D5 00 85 22 13 |.W..(W$)......".|
000004A0: 11 11 11 11 11 11 11 11 11 11 57 49 52 4B 55 4E |..........WIRKUN|
000004B0: 47 53 47 52 41 44 20 20 20 20 20 20 20 20 20 20 |GSGRAD |
000004C0: 20 22 3B 51 24 00 D4 0C D6 00 8B 51 24 B2 22 22 | ";Q$......Q$.""|
000004D0: A7 32 31 33 00 E0 0C D7 00 51 B2 C5 28 51 24 29 |.213.....Q..(Q$)|
000004E0: 00 E8 0C D8 00 99 52 24 00 FB 0C E6 00 A1 45 24 |......R$......E$|
000004F0: 3A 8B 45 24 B2 22 22 A7 32 33 30 00 0B 0D F0 00 |:.E$."".230.....|
00000500: 8B 45 24 B2 22 4E 22 A7 32 36 35 00 1B 0D FA 00 |.E$."N".265.....|
00000510: 8B 45 24 B2 22 4A 22 A7 32 39 30 00 24 0D 04 01 |.E$."J".290.$...|
00000520: 89 32 33 30 00 3B 0D 09 01 43 B2 BA 28 33 29 3A |.230.;...C..(3):|
00000530: 45 B2 43 AC 56 AC 49 AC 57 AD 51 00 76 0D 0E 01 |E.C.V.I.W.Q.v...|
00000540: 99 22 11 11 44 49 45 20 5A 55 47 45 46 55 45 48 |."..DIE ZUGEFUEH|
00000550: 52 54 45 20 4C 45 49 53 54 55 4E 47 22 3A 99 22 |RTE LEISTUNG":."|
00000560: 11 42 45 54 52 41 45 47 54 22 45 22 57 41 54 54 |.BETRAEGT"E"WATT|
00000570: 22 3A 89 33 31 30 00 98 0D 22 01 43 B2 BA 28 33 |":.310...".C..(3|
00000580: 29 3A 45 B2 43 AC 56 AC 49 AC 57 AD 51 3A 59 B2 |):E.C.V.I.W.Q:Y.|
00000590: B5 28 45 29 3A 45 B2 59 00 CE 0D 2C 01 99 22 11 |.(E):E.Y...,..".|
000005A0: 11 44 49 45 20 5A 55 47 45 46 55 45 48 52 54 45 |.DIE ZUGEFUEHRTE|
000005B0: 20 4C 45 49 53 54 55 4E 47 22 3A 99 22 11 42 45 | LEISTUNG":.".BE|
000005C0: 54 52 41 45 47 54 22 45 22 57 41 54 54 22 00 F4 |TRAEGT"E"WATT"..|
000005D0: 0D 36 01 99 22 11 11 4E 4F 43 48 20 45 49 4E 45 |.6.."..NOCH EINE|
000005E0: 20 42 45 52 45 43 48 4E 55 4E 47 20 3C 4A 2F 4E | BERECHNUNG <J/N|
000005F0: 3E 20 3F 22 00 07 0E 40 01 A1 45 24 3A 8B 45 24 |> ?"...@..E$:.E$|
00000600: B2 22 22 A7 33 32 30 00 17 0E 4A 01 8B 45 24 B2 |."".320...J..E$.|
00000610: 22 4E 22 A7 33 36 30 00 5C 0E 54 01 8B 45 24 B2 |"N".360.\.T..E$.|
00000620: 22 4A 22 A7 43 B2 30 3A 45 B2 30 3A 56 B2 30 3A |"J".C.0:E.0:V.0:|
00000630: 59 B2 30 3A 49 B2 30 3A 57 B2 30 3A 51 B2 30 3A |Y.0:I.0:W.0:Q.0:|
00000640: 56 24 B2 22 22 3A 49 24 B2 22 22 3A 57 24 B2 22 |V$."":I$."":W$."|
00000650: 22 3A 51 24 B2 22 22 3A 89 32 30 30 00 65 0E 5E |":Q$."":.200.e.^|
00000660: 01 89 33 32 30 00 86 0E 68 01 99 22 11 48 41 55 |..320...h..".HAU|
00000670: 50 54 4D 45 4E 55 45 20 4C 41 44 45 4E 20 3C 4A |PTMENUE LADEN <J|
00000680: 2F 4E 3E 20 3F 22 00 99 0E 72 01 A1 45 24 3A 8B |/N> ?"...r..E$:.|
00000690: 45 24 B2 22 22 A7 33 37 30 00 A8 0E 7C 01 8B 45 |E$."".370...|..E|
000006A0: 24 B2 22 4E 22 A7 31 30 00 B8 0E 86 01 8B 45 24 |$."N".10......E$|
000006B0: B2 22 4A 22 A7 34 31 30 00 C1 0E 90 01 89 33 37 |."J".410......37|
000006C0: 30 00 02 0F 9A 01 99 22 93 11 11 12 20 20 20 20 |0......".... |
000006D0: 20 20 20 48 41 55 50 54 4D 45 4E 55 45 20 57 49 | HAUPTMENUE WI|
000006E0: 52 44 20 47 45 4C 41 44 45 4E 20 21 20 20 20 20 |RD GELADEN ! |
000006F0: 20 20 20 20 22 3A 93 22 4D 45 4E 55 45 22 2C 38 | ":."MENUE",8|
00000700: 2C 31 00 3A 0F A4 01 99 22 93 22 3B 57 31 24 3B |,1.:....".";W1$;|
00000710: 57 32 24 3B 57 33 24 3A 85 22 13 11 11 11 11 53 |W2$;W3$:.".....S|
00000720: 50 41 4E 4E 55 4E 47 20 3C 56 4F 4C 54 3E 20 20 |PANNUNG <VOLT> |
00000730: 20 20 20 20 20 20 22 3B 55 24 00 49 0F A5 01 8B | ";U$.I....|
00000740: 55 24 B2 22 22 A7 34 32 30 00 55 0F A6 01 55 B2 |U$."".420.U...U.|
00000750: C5 28 55 24 29 00 7E 0F A7 01 85 22 13 11 11 11 |.(U$).~...."....|
00000760: 11 11 11 53 54 52 4F 4D 53 54 41 45 52 4B 45 20 |...STROMSTAERKE |
00000770: 3C 41 4D 50 45 52 45 27 3E 20 22 3B 4D 24 00 8D |<AMPERE'> ";M$..|
00000780: 0F A8 01 8B 4D 24 B2 22 22 A7 34 32 33 00 99 0F |....M$."".423...|
00000790: A9 01 4D B2 C5 28 4D 24 29 00 C4 0F AA 01 85 22 |..M..(M$)......"|
000007A0: 13 11 11 11 11 11 11 11 11 57 49 52 4B 4C 45 49 |.........WIRKLEI|
000007B0: 53 54 55 4E 47 53 46 41 4B 54 4F 52 20 20 20 20 |STUNGSFAKTOR |
000007C0: 22 3B 4B 24 00 D3 0F AB 01 8B 4B 24 B2 22 22 A7 |";K$......K$."".|
000007D0: 34 32 36 00 DF 0F AC 01 4B B2 C5 28 4B 24 29 00 |426.....K..(K$).|
000007E0: E7 0F C2 01 99 52 24 00 FA 0F CC 01 A1 45 24 3A |.....R$......E$:|
000007F0: 8B 45 24 B2 22 22 A7 34 36 30 00 0A 10 D6 01 8B |.E$."".460......|
00000800: 45 24 B2 22 4E 22 A7 35 30 30 00 1A 10 E0 01 8B |E$."N".500......|
00000810: 45 24 B2 22 4A 22 A7 35 32 30 00 23 10 EA 01 89 |E$."J".520.#....|
00000820: 34 36 30 00 38 10 F4 01 43 B2 BA 28 33 29 3A 45 |460.8...C..(3):E|
00000830: B2 43 AC 55 AC 4D AC 4B 00 72 10 FE 01 99 22 11 |.C.U.M.K.r....".|
00000840: 11 44 49 45 20 41 42 47 45 47 45 42 45 4E 45 20 |.DIE ABGEGEBENE |
00000850: 4C 45 49 53 54 55 4E 47 22 3A 99 22 11 42 45 54 |LEISTUNG":.".BET|
00000860: 52 41 45 47 54 22 45 22 57 41 54 54 22 3A 89 35 |RAEGT"E"WATT":.5|
00000870: 34 30 00 92 10 08 02 43 B2 BA 28 33 29 3A 45 B2 |40.....C..(3):E.|
00000880: 43 AC 55 AC 4D AC 4B 3A 59 B2 B5 28 45 29 3A 45 |C.U.M.K:Y..(E):E|
00000890: B2 59 00 C7 10 12 02 99 22 11 11 44 49 45 20 41 |.Y......"..DIE A|
000008A0: 42 47 45 47 45 42 45 4E 45 20 4C 45 49 53 54 55 |BGEGEBENE LEISTU|
000008B0: 4E 47 22 3A 99 22 11 42 45 54 52 41 45 47 54 22 |NG":.".BETRAEGT"|
000008C0: 45 22 57 41 54 54 22 00 ED 10 1C 02 99 22 11 11 |E"WATT"......"..|
000008D0: 4E 4F 43 48 20 45 49 4E 45 20 42 45 52 45 43 48 |NOCH EINE BERECH|
000008E0: 4E 55 4E 47 20 3C 4A 2F 4E 3E 20 3F 22 00 00 11 |NUNG <J/N> ?"...|
000008F0: 26 02 A1 42 24 3A 8B 42 24 B2 22 22 A7 35 35 30 |&..B$:.B$."".550|
00000900: 00 10 11 30 02 8B 42 24 B2 22 4E 22 A7 33 36 30 |...0..B$."N".360|
00000910: 00 4B 11 3A 02 8B 42 24 B2 22 4A 22 A7 43 B2 30 |.K.:..B$."J".C.0|
00000920: 3A 45 B2 30 3A 55 B2 30 3A 59 B2 30 3A 49 B2 30 |:E.0:U.0:Y.0:I.0|
00000930: 3A 4B B2 30 3A 55 24 B2 22 22 3A 4D 24 B2 22 22 |:K.0:U$."":M$.""|
00000940: 3A 4B 24 B2 22 22 3A 89 34 32 30 00 54 11 44 02 |:K$."":.420.T.D.|
00000950: 89 35 35 30 00 00 00 |.550... |
.......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$:..29)".N.".%.#...26)"
.MN3*U*I*COS".A.(..".DREHSTROMGENERATOR:
. P.AB. = CCCCCCCCCCCCC":..33)"N"...2.."
.DEFINITION:.":.".U = SPANNUNG IN .V.
OLT"...F..".I = STROMSTAERKE IN .A.MP
ERE'"...K..".COS = WIRKLEISTUNGSFAKTOR"
...L..".P.AB. = ABGEGEBENE LEISTUNG IN
.W.ATT".?.M..".P.ZU. = ZUGEFUEHRTE LEIS
TUNG IN .W.ATT".[.N..".N = WIRKUNGSGR
AD"...P..".. BITTE TASTE DRUECKE
N ! "...Z..198,0:.198,1:.198,0:.
".";W1$;W2$;W3$...N.." BITTE WAEHLEN SI
E IHRE RECHENFORMEL: ...":..16)"N."...X
...13)".MN 3 * U * I * COS".U.Y.."<A> P
.ZU. = CCCCCCCCCCCCCCCCCCCCCCC":..23)"N"
:..16)"...N."..Z.."<B> P.AB. = .MN 3
* U * I * COS"...|..E$:.E$."".124...}..
E$."A".200...~..E$."B".420......124...H.
.".";W1$;W2$;W3$:.".....SPANNUNG <VOLT>
";V$...M..V$."".200...N.V.E(V$).7
.O..".......STROMSTAERKE <AMPERE'> ";I$.
F.P..I$."".207.R.Q.I.E(I$).}.R..".......
..WIRKLEISTUNGSFAKTOR ";W$...S..W$.""
.210...T.W.E(W$).E.U.."...........WIRKUN
GSGRAD ";Q$.T.V..Q$."".213...W
.Q.E(Q$)...X..R$......E$:.E$."".230.....
.E$."N".265......E$."J".290.$....230.;..
.C..(3):E.C.V.I.W.Q.V...."..DIE ZUGEFUEH
RTE LEISTUNG":.".BETRAEGT"E"WATT":.310..
.".C..(3):E.C.V.I.W.Q:Y..(E):E.Y.N.,..".
.DIE ZUGEFUEHRTE LEISTUNG":.".BETRAEGT"E
"WATT"...6.."..NOCH EINE BERECHNUNG <J/N
> ?"...@..E$:.E$."".320...J..E$."N".360.
\.T..E$."J".C.0:E.0:V.0:Y.0:I.0:W.0:Q.0:
V$."":I$."":W$."":Q$."":.200.E.^..320...
H..".HAUPTMENUE LADEN <J/N> ?"...R..E$:.
E$."".370...|..E$."N".10......E$."J".410
.A....370......".... HAUPTMENUE WI
RD GELADEN ! ":."MENUE",8,1.:....
".";W1$;W2$;W3$:.".....SPANNUNG <VOLT>
";U$.I....U$."".420.U...U.E(U$).~.
...".......STROMSTAERKE <AMPERE'> ";M$..
....M$."".423.....M.E(M$).D...."........
.WIRKLEISTUNGSFAKTOR ";K$.S....K$."".
426.....K.E(K$)...B..R$...L..E$:.E$."".4
60...V..E$."N".500......E$."J".520.#....
460.8...C..(3):E.C.U.M.K.R...."..DIE ABG
EGEBENE LEISTUNG":.".BETRAEGT"E"WATT":.5
40.....C..(3):E.C.U.M.K:Y..(E):E.Y.G....
"..DIE ABGEGEBENE LEISTUNG":.".BETRAEGT"
E"WATT"......"..NOCH EINE BERECHNUNG <J/
N> ?"...&..B$:.B$."".550...0..B$."N".360
.K.:..B$."J".C.0:E.0:U.0:Y.0:I.0:K.0:U$.
"":M$."":K$."":.420.T.D..550...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL