_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

WIRK.INDUKTIV

FILE INFORMATION

FILENAME(S): WIRK.INDUKTIV

FILE TYPE(S): PRG

FILE SIZE: 3.4K

FIRST SEEN: 2025-11-30 01:07:54

APPEARS ON: 3 disk(s)

FILE HASH

7c06f1d9e094f6cbe3f2c65411a528861c32b55197083db1ae1726fcf2c4544c

FOUND ON DISKS (3 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
FREEWARE DISK NR WIRK.INDUKTIV PRG Treasure Chest - Wolfgang Rauprich 23 8 DOWNLOAD FILE
A NWENDER WIRK.INDUKTIV PRG Treasure Chest - Wolfgang Rauprich 23 8 DOWNLOAD FILE
GOODSOFT WIRK.INDUKTIV PRG swasti, dinkel 23 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> 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 7C 08 0A 00 57 24 B2  22 22 3A 43 24 B2 22 22  |.|...W$."":C$.""|
00000050: 3A 56 24 B2 22 22 3A 49  24 B2 22 22 3A 50 B2 30  |:V$."":I$."":P.0|
00000060: 3A 56 B2 30 3A 49 B2 30  3A 53 B2 30 3A 4F B2 30  |:V.0:I.0:S.0:O.0|
00000070: 3A 43 B2 30 3A 57 B2 30  3A 42 B2 30 00 C7 08 0B  |:C.0:W.0:B.0....|
00000080: 00 97 35 33 32 38 30 2C  30 3A 97 35 33 32 38 31  |..53280,0:.53281|
00000090: 2C 30 3A 99 22 93 22 3A  57 31 24 B2 22 05 D5 C3  |,0:.".":W1$."...|
000000A0: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |................|
000000B0: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |................|
000000C0: C3 C3 C3 C3 C3 C9 22 00  FE 08 14 00 57 32 24 B2  |......".....W2$.|
000000D0: 22 C2 12 9B 20 20 20 20  20 20 20 57 20 45 20 43  |"...       W E C|
000000E0: 20 48 20 53 20 45 20 4C  20 53 20 54 20 52 20 4F  | H S E L S T R O|
000000F0: 20 4D 20 20 20 20 20 20  20 20 92 05 C2 22 00 3E  | M        ...".>|
00000100: 09 1E 00 57 33 24 B2 22  CA C3 C3 C3 C3 C3 C3 C3  |...W3$."........|
00000110: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C3 C3 C3  |................|
00000120: C3 C3 C3 C3 C3 C3 C3 C3  C3 C3 C3 C3 C3 C3 C3 CB  |................|
00000130: 22 3A 99 57 31 24 3B 57  32 24 3B 57 33 24 00 71  |":.W1$;W2$;W3$.q|
00000140: 09 28 00 99 22 9E 57 49  52 4B 4C 45 49 53 54 55  |.(..".WIRKLEISTU|
00000150: 4E 47 20 28 49 4E 44 55  4B 54 49 56 29 3A 05 20  |NG (INDUKTIV):. |
00000160: 50 20 3D 20 55 20 2A 20  49 20 2A 20 43 4F 53 20  |P = U * I * COS |
00000170: 22 00 A3 09 32 00 99 22  11 9E 44 45 46 49 4E 49  |"...2.."..DEFINI|
00000180: 54 49 4F 4E 3A 05 22 3A  99 22 11 11 50 20 3D 20  |TION:.":."..P = |
00000190: 4C 45 49 53 54 55 4E 47  20 49 4E 20 1C 57 05 41  |LEISTUNG IN .W.A|
000001A0: 54 54 22 00 C4 09 3C 00  99 22 11 55 20 20 20 3D  |TT"...<..".U   =|
000001B0: 20 53 50 41 4E 4E 55 4E  47 20 49 4E 20 1C 56 05  | SPANNUNG IN .V.|
000001C0: 4F 4C 54 22 00 ED 09 46  00 99 22 11 49 20 20 20  |OLT"...F..".I   |
000001D0: 3D 20 53 54 52 4F 4D 53  54 41 45 52 4B 45 20 49  |= STROMSTAERKE I|
000001E0: 4E 20 20 1C 41 05 4D 50  45 52 45 27 22 00 0B 0A  |N  .A.MPERE'"...|
000001F0: 47 00 99 22 11 43 4F 53  20 3D 20 4C 45 49 53 54  |G..".COS = LEIST|
00000200: 55 4E 47 53 46 41 4B 54  4F 52 22 00 3E 0A 50 00  |UNGSFAKTOR".>.P.|
00000210: 99 22 11 11 12 20 20 20  20 20 20 20 20 20 42 49  |."...         BI|
00000220: 54 54 45 20 54 41 53 54  45 20 44 52 55 45 43 4B  |TTE TASTE DRUECK|
00000230: 45 4E 20 21 20 20 20 20  20 20 20 20 20 22 00 68  |EN !         ".h|
00000240: 0A 5A 00 97 31 39 38 2C  30 3A 92 31 39 38 2C 31  |.Z..198,0:.198,1|
00000250: 3A 97 31 39 38 2C 30 3A  99 22 93 22 3B 57 31 24  |:.198,0:.".";W1$|
00000260: 3B 57 32 24 3B 57 33 24  00 9A 0A 6E 00 99 22 11  |;W2$;W3$...n..".|
00000270: 11 20 20 42 49 54 54 45  20 57 41 45 48 4C 45 4E  |.  BITTE WAEHLEN|
00000280: 20 53 49 45 20 49 48 52  45 20 52 45 43 48 45 4E  | SIE IHRE RECHEN|
00000290: 46 4F 52 4D 45 4C 3A 20  20 22 00 C4 0A 78 00 99  |FORMEL:  "...x..|
000002A0: 22 11 3C 41 3E 20 20 20  20 50 20 3D 20 55 20 2A  |".<A>    P = U *|
000002B0: 20 49 20 2A 20 43 4F 53  20 11 22 3A 99 A3 31 33  | I * COS .":..13|
000002C0: 29 22 50 22 00 F5 0A 82  00 99 22 3C 42 3E 20 20  |)"P"......"<B>  |
000002D0: 20 20 55 20 3D 20 C3 C3  C3 C3 C3 C3 22 3A 99 A3  |  U = ......":..|
000002E0: 31 31 29 22 49 2A 43 4F  53 20 11 22 3A 99 A3 31  |11)"I*COS .":..1|
000002F0: 33 29 22 50 22 00 25 0B  8C 00 99 22 3C 43 3E 20  |3)"P".%...."<C> |
00000300: 20 20 20 49 20 3D 20 C3  C3 C3 C3 C3 22 3A 99 A3  |   I = .....":..|
00000310: 31 31 29 22 55 2A 43 4F  53 20 11 22 3A 99 A3 31  |11)"U*COS .":..1|
00000320: 33 29 22 50 22 00 48 0B  91 00 99 22 3C 44 3E 20  |3)"P".H...."<D> |
00000330: 20 43 4F 53 20 3D 20 C3  C3 C3 C3 C3 22 3A 99 A3  | COS = .....":..|
00000340: 31 32 29 22 55 2A 49 22  00 5B 0B 9C 00 A1 45 24  |12)"U*I".[....E$|
00000350: 3A 8B 45 24 B2 22 22 A7  31 35 36 00 6B 0B A0 00  |:.E$."".156.k...|
00000360: 8B 45 24 B2 22 41 22 A7  32 30 30 00 7B 0B AA 00  |.E$."A".200.{...|
00000370: 8B 45 24 B2 22 42 22 A7  34 32 30 00 8B 0B B4 00  |.E$."B".420.....|
00000380: 8B 45 24 B2 22 43 22 A7  35 35 30 00 9B 0B B9 00  |.E$."C".550.....|
00000390: 8B 45 24 B2 22 44 22 A7  36 38 30 00 A4 0B BE 00  |.E$."D".680.....|
000003A0: 89 31 35 36 00 DE 0B C8  00 99 22 93 22 3B 57 31  |.156......".";W1|
000003B0: 24 3B 57 32 24 3B 57 33  24 3A 85 22 13 11 11 11  |$;W2$;W3$:."....|
000003C0: 11 11 57 45 43 48 53 45  4C 53 50 41 4E 4E 55 4E  |..WECHSELSPANNUN|
000003D0: 47 20 3C 56 4F 4C 54 3E  20 20 22 3B 56 24 00 ED  |G <VOLT>  ";V$..|
000003E0: 0B CD 00 8B 56 24 B2 22  22 A7 32 30 30 00 F9 0B  |....V$."".200...|
000003F0: CE 00 56 B2 C5 28 56 24  29 00 24 0C D2 00 85 22  |..V..(V$).$...."|
00000400: 13 11 11 11 11 11 11 11  53 54 52 4F 4D 53 54 41  |........STROMSTA|
00000410: 45 52 4B 45 20 3C 41 4D  50 45 52 45 27 3E 20 20  |ERKE <AMPERE'>  |
00000420: 22 3B 49 24 00 33 0C D3  00 8B 49 24 B2 22 22 A7  |";I$.3....I$."".|
00000430: 32 31 30 00 3F 0C D4 00  49 B2 C5 28 49 24 29 00  |210.?...I..(I$).|
00000440: 6C 0C D5 00 85 22 13 11  11 11 11 11 11 11 11 11  |l...."..........|
00000450: 4C 45 49 53 54 55 4E 47  53 46 41 4B 54 4F 52 20  |LEISTUNGSFAKTOR |
00000460: 20 3C 43 4F 53 3E 20 20  22 3B 43 24 00 7B 0C D6  | <COS>  ";C$.{..|
00000470: 00 8B 43 24 B2 22 22 A7  32 31 33 00 87 0C D7 00  |..C$."".213.....|
00000480: 43 B2 C5 28 43 24 29 00  8F 0C D8 00 99 52 24 00  |C..(C$)......R$.|
00000490: A2 0C E6 00 A1 45 24 3A  8B 45 24 B2 22 22 A7 32  |.....E$:.E$."".2|
000004A0: 33 30 00 B2 0C F0 00 8B  45 24 B2 22 4E 22 A7 32  |30......E$."N".2|
000004B0: 37 30 00 C2 0C FA 00 8B  45 24 B2 22 4A 22 A7 32  |70......E$."J".2|
000004C0: 39 30 00 CB 0C 04 01 89  32 33 30 00 10 0D 0E 01  |90......230.....|
000004D0: 50 B2 56 AC 49 AC 43 3A  99 22 11 11 44 49 45 20  |P.V.I.C:."..DIE |
000004E0: 49 4E 44 55 4B 54 49 56  45 20 57 49 52 4B 4C 45  |INDUKTIVE WIRKLE|
000004F0: 49 53 54 55 4E 47 22 3A  99 22 11 42 45 54 52 41  |ISTUNG":.".BETRA|
00000500: 45 47 54 22 50 22 57 41  54 54 22 3A 89 33 31 30  |EGT"P"WATT":.310|
00000510: 00 27 0D 22 01 50 B2 56  AC 49 AC 43 3A 53 B2 B5  |.'.".P.V.I.C:S..|
00000520: 28 50 29 3A 50 B2 53 00  5F 0D 2C 01 99 22 11 11  |(P):P.S._.,.."..|
00000530: 44 49 45 20 49 4E 44 55  4B 54 49 56 45 20 57 49  |DIE INDUKTIVE WI|
00000540: 52 4B 4C 45 49 53 54 55  4E 47 22 3A 99 22 11 42  |RKLEISTUNG":.".B|
00000550: 45 54 52 41 45 47 54 22  50 22 57 41 54 54 22 00  |ETRAEGT"P"WATT".|
00000560: 85 0D 36 01 99 22 11 11  4E 4F 43 48 20 45 49 4E  |..6.."..NOCH EIN|
00000570: 45 20 42 45 52 45 43 48  4E 55 4E 47 20 3C 4A 2F  |E BERECHNUNG <J/|
00000580: 4E 3E 20 3F 22 00 98 0D  40 01 A1 45 24 3A 8B 45  |N> ?"...@..E$:.E|
00000590: 24 B2 22 22 A7 33 32 30  00 A8 0D 4A 01 8B 45 24  |$."".320...J..E$|
000005A0: B2 22 4E 22 A7 33 36 30  00 DF 0D 54 01 8B 45 24  |."N".360...T..E$|
000005B0: B2 22 4A 22 A7 56 B2 30  3A 49 B2 30 3A 50 B2 30  |."J".V.0:I.0:P.0|
000005C0: 3A 53 B2 30 3A 43 B2 30  3A 56 24 B2 22 22 3A 49  |:S.0:C.0:V$."":I|
000005D0: 24 B2 22 22 3A 43 24 B2  22 22 3A 89 32 30 30 00  |$."":C$."":.200.|
000005E0: E8 0D 5E 01 89 33 32 30  00 0A 0E 68 01 99 22 11  |..^..320...h..".|
000005F0: 11 48 41 55 50 54 4D 45  4E 55 45 20 4C 41 44 45  |.HAUPTMENUE LADE|
00000600: 4E 20 3C 4A 2F 4E 3E 20  3F 22 00 1D 0E 72 01 A1  |N <J/N> ?"...r..|
00000610: 45 24 3A 8B 45 24 B2 22  22 A7 33 37 30 00 2C 0E  |E$:.E$."".370.,.|
00000620: 7C 01 8B 45 24 B2 22 4E  22 A7 31 30 00 3C 0E 86  ||..E$."N".10.<..|
00000630: 01 8B 45 24 B2 22 4A 22  A7 34 31 30 00 45 0E 90  |..E$."J".410.E..|
00000640: 01 89 33 37 30 00 86 0E  9A 01 99 22 93 11 11 12  |..370......"....|
00000650: 20 20 20 20 20 20 20 48  41 55 50 54 4D 45 4E 55  |       HAUPTMENU|
00000660: 45 20 57 49 52 44 20 47  45 4C 41 44 45 4E 20 21  |E WIRD GELADEN !|
00000670: 20 20 20 20 20 20 20 20  22 3A 93 22 4D 45 4E 55  |        ":."MENU|
00000680: 45 22 2C 38 2C 31 00 C3  0E A4 01 99 22 93 22 3B  |E",8,1......".";|
00000690: 57 31 24 3B 57 32 24 3B  57 33 24 3A 85 22 13 11  |W1$;W2$;W3$:."..|
000006A0: 11 11 11 11 49 4E 44 55  4B 54 2E 20 4C 45 49 53  |....INDUKT. LEIS|
000006B0: 54 55 4E 47 20 20 20 3C  57 41 54 54 3E 20 20 22  |TUNG   <WATT>  "|
000006C0: 3B 57 24 00 D2 0E A5 01  8B 57 24 B2 22 22 A7 34  |;W$......W$."".4|
000006D0: 32 30 00 DE 0E A9 01 57  B2 C5 28 57 24 29 00 0C  |20.....W..(W$)..|
000006E0: 0F AE 01 85 22 13 11 11  11 11 11 11 11 53 54 52  |...."........STR|
000006F0: 4F 4D 53 54 41 45 52 4B  45 20 20 20 20 3C 41 4D  |OMSTAERKE    <AM|
00000700: 50 45 52 45 27 3E 20 20  22 3B 49 24 00 1B 0F AF  |PERE'>  ";I$....|
00000710: 01 8B 49 24 B2 22 22 A7  34 33 30 00 27 0F B0 01  |..I$."".430.'...|
00000720: 49 B2 C5 28 49 24 29 00  57 0F B1 01 85 22 13 11  |I..(I$).W...."..|
00000730: 11 11 11 11 11 11 11 11  4C 45 49 53 54 55 4E 47  |........LEISTUNG|
00000740: 53 46 41 4B 54 4F 52 20  20 20 20 20 3C 43 4F 53  |SFAKTOR     <COS|
00000750: 3E 20 20 22 3B 43 24 00  66 0F B2 01 8B 43 24 B2  |>  ";C$.f....C$.|
00000760: 22 22 A7 34 33 33 00 72  0F B3 01 43 B2 C5 28 43  |"".433.r...C..(C|
00000770: 24 29 00 7A 0F B4 01 99  52 24 00 8D 0F B8 01 A1  |$).z....R$......|
00000780: 45 24 3A 8B 45 24 B2 22  22 A7 34 34 30 00 9D 0F  |E$:.E$."".440...|
00000790: C2 01 8B 45 24 B2 22 4A  22 A7 34 39 30 00 AD 0F  |...E$."J".490...|
000007A0: CC 01 8B 45 24 B2 22 4E  22 A7 34 38 30 00 B6 0F  |...E$."N".480...|
000007B0: D6 01 89 34 34 30 00 FB  0F E0 01 50 B2 49 AC 43  |...440.....P.I.C|
000007C0: 3A 56 B2 57 AD 50 3A 99  22 11 11 44 49 45 20 49  |:V.W.P:."..DIE I|
000007D0: 4E 44 55 4B 54 49 56 45  20 53 50 41 4E 4E 55 4E  |NDUKTIVE SPANNUN|
000007E0: 47 22 3A 99 22 11 42 45  54 52 41 45 47 54 22 56  |G":.".BETRAEGT"V|
000007F0: 22 56 4F 4C 54 22 3A 89  35 30 30 00 32 10 EA 01  |"VOLT":.500.2...|
00000800: 50 B2 49 AC 43 3A 56 B2  57 AD 50 3A 53 B2 B5 28  |P.I.C:V.W.P:S..(|
00000810: 56 29 3A 56 B2 53 3A 99  22 11 11 44 49 45 20 49  |V):V.S:."..DIE I|
00000820: 4E 44 55 4B 54 49 56 45  20 53 50 41 4E 4E 55 4E  |NDUKTIVE SPANNUN|
00000830: 47 22 00 4A 10 EF 01 99  22 11 42 45 54 52 41 45  |G".J....".BETRAE|
00000840: 47 54 22 56 22 56 4F 4C  54 22 00 70 10 F4 01 99  |GT"V"VOLT".p....|
00000850: 22 11 11 4E 4F 43 48 20  45 49 4E 45 20 42 45 52  |"..NOCH EINE BER|
00000860: 45 43 48 4E 55 4E 47 20  3C 4A 2F 4E 3E 20 3F 22  |ECHNUNG <J/N> ?"|
00000870: 00 83 10 FE 01 A1 45 24  3A 8B 45 24 B2 22 22 A7  |......E$:.E$."".|
00000880: 35 31 30 00 93 10 08 02  8B 45 24 B2 22 4E 22 A7  |510......E$."N".|
00000890: 33 36 30 00 CE 10 12 02  8B 45 24 B2 22 4A 22 A7  |360......E$."J".|
000008A0: 49 B2 30 3A 43 B2 30 3A  50 B2 30 3A 56 B2 30 3A  |I.0:C.0:P.0:V.0:|
000008B0: 57 B2 30 3A 53 B2 30 3A  49 24 B2 22 22 3A 43 24  |W.0:S.0:I$."":C$|
000008C0: B2 22 22 3A 57 24 B2 22  22 3A 89 34 32 30 00 D7  |."":W$."":.420..|
000008D0: 10 1C 02 89 35 31 30 00  11 11 26 02 99 22 93 22  |....510...&.."."|
000008E0: 3B 57 31 24 3B 57 32 24  3B 57 33 24 3A 85 22 13  |;W1$;W2$;W3$:.".|
000008F0: 11 11 11 11 11 49 4E 44  55 4B 54 2E 20 4C 45 49  |.....INDUKT. LEI|
00000900: 53 54 55 4E 47 20 3C 57  41 54 54 3E 20 22 3B 57  |STUNG <WATT> ";W|
00000910: 24 00 20 11 27 02 8B 57  24 B2 22 22 A7 35 35 30  |$. .'..W$."".550|
00000920: 00 2C 11 2B 02 57 B2 C5  28 57 24 29 00 57 11 30  |.,.+.W..(W$).W.0|
00000930: 02 85 22 13 11 11 11 11  11 11 11 53 50 41 4E 4E  |.."........SPANN|
00000940: 55 4E 47 20 20 20 20 20  20 20 20 20 3C 56 4F 4C  |UNG         <VOL|
00000950: 54 3E 20 22 3B 56 24 00  66 11 31 02 8B 56 24 B2  |T> ";V$.f.1..V$.|
00000960: 22 22 A7 35 36 30 00 72  11 32 02 56 B2 C5 28 56  |"".560.r.2.V..(V|
00000970: 24 29 00 9F 11 33 02 85  22 13 11 11 11 11 11 11  |$)...3..".......|
00000980: 11 11 11 4C 45 49 53 54  55 4E 47 53 46 41 4B 54  |...LEISTUNGSFAKT|
00000990: 4F 52 20 20 20 3C 43 4F  53 3E 20 22 3B 43 24 00  |OR   <COS> ";C$.|
000009A0: AE 11 34 02 8B 43 24 B2  22 22 A7 35 36 33 00 BA  |..4..C$."".563..|
000009B0: 11 35 02 43 B2 C5 28 43  24 29 00 C2 11 36 02 99  |.5.C..(C$)...6..|
000009C0: 52 24 00 D5 11 3A 02 A1  45 24 3A 8B 45 24 B2 22  |R$...:..E$:.E$."|
000009D0: 22 A7 35 37 30 00 E5 11  44 02 8B 45 24 B2 22 4A  |".570...D..E$."J|
000009E0: 22 A7 36 31 35 00 F5 11  4E 02 8B 45 24 B2 22 4E  |".615...N..E$."N|
000009F0: 22 A7 36 31 30 00 FE 11  58 02 89 35 37 30 00 2E  |".610...X..570..|
00000A00: 12 62 02 49 B2 56 AC 43  3A 50 B2 57 AD 49 3A 99  |.b.I.V.C:P.W.I:.|
00000A10: 22 11 11 44 49 45 20 49  4E 44 55 4B 54 49 56 45  |"..DIE INDUKTIVE|
00000A20: 20 53 54 52 4F 4D 53 54  41 45 52 4B 45 22 00 4E  | STROMSTAERKE".N|
00000A30: 12 63 02 99 22 11 42 45  54 52 41 45 47 54 22 50  |.c..".BETRAEGT"P|
00000A40: 22 41 4D 50 45 52 45 27  22 3A 89 36 33 30 00 69  |"AMPERE'":.630.i|
00000A50: 12 67 02 49 B2 56 AC 43  3A 50 B2 57 AD 49 3A 42  |.g.I.V.C:P.W.I:B|
00000A60: B2 B5 28 50 29 3A 50 B2  42 00 A4 12 6C 02 99 22  |..(P):P.B...l.."|
00000A70: 11 11 44 49 45 20 49 4E  44 55 4B 54 49 56 45 20  |..DIE INDUKTIVE |
00000A80: 53 54 52 4F 4D 53 54 41  45 52 4B 45 22 3A 99 22  |STROMSTAERKE":."|
00000A90: 11 42 45 54 52 41 45 47  54 22 50 22 41 4D 50 45  |.BETRAEGT"P"AMPE|
00000AA0: 52 45 27 22 00 CA 12 76  02 99 22 11 11 4E 4F 43  |RE'"...v.."..NOC|
00000AB0: 48 20 45 49 4E 45 20 42  45 52 45 43 48 4E 55 4E  |H EINE BERECHNUN|
00000AC0: 47 20 3C 4A 2F 4E 3E 20  3F 22 00 DD 12 80 02 A1  |G <J/N> ?"......|
00000AD0: 45 24 3A 8B 45 24 B2 22  22 A7 36 34 30 00 ED 12  |E$:.E$."".640...|
00000AE0: 8A 02 8B 45 24 B2 22 4E  22 A7 33 36 30 00 28 13  |...E$."N".360.(.|
00000AF0: 94 02 8B 45 24 B2 22 4A  22 A7 49 B2 30 3A 56 B2  |...E$."J".I.0:V.|
00000B00: 30 3A 43 B2 30 3A 50 B2  30 3A 57 B2 30 3A 42 B2  |0:C.0:P.0:W.0:B.|
00000B10: 30 3A 57 24 B2 22 22 3A  56 24 B2 22 22 3A 43 24  |0:W$."":V$."":C$|
00000B20: B2 22 22 3A 89 35 35 30  00 31 13 9E 02 89 36 34  |."":.550.1....64|
00000B30: 30 00 6B 13 A8 02 99 22  93 22 3B 57 31 24 3B 57  |0.k....".";W1$;W|
00000B40: 32 24 3B 57 33 24 3A 85  22 13 11 11 11 11 11 49  |2$;W3$:."......I|
00000B50: 4E 44 55 4B 54 2E 20 4C  45 49 53 54 55 4E 47 20  |NDUKT. LEISTUNG |
00000B60: 3C 57 41 54 54 3E 20 22  3B 57 24 00 7A 13 B2 02  |<WATT> ";W$.z...|
00000B70: 8B 57 24 B2 22 22 A7 36  38 30 00 86 13 BC 02 57  |.W$."".680.....W|
00000B80: B2 C5 28 57 24 29 00 B1  13 C6 02 85 22 13 11 11  |..(W$)......"...|
00000B90: 11 11 11 11 11 53 50 41  4E 4E 55 4E 47 20 20 20  |.....SPANNUNG   |
00000BA0: 20 20 20 20 20 20 3C 56  4F 4C 54 3E 20 22 3B 56  |      <VOLT> ";V|
00000BB0: 24 00 C0 13 D0 02 8B 56  24 B2 22 22 A7 37 31 30  |$......V$."".710|
00000BC0: 00 CC 13 DA 02 56 B2 C5  28 56 24 29 00 F9 13 E4  |.....V..(V$)....|
00000BD0: 02 85 22 13 11 11 11 11  11 11 11 11 11 53 54 52  |.."..........STR|
00000BE0: 4F 4D 53 54 41 45 52 4B  45 20 20 3C 41 4D 50 45  |OMSTAERKE  <AMPE|
00000BF0: 52 45 27 3E 20 22 3B 49  24 00 08 14 EE 02 8B 49  |RE'> ";I$......I|
00000C00: 24 B2 22 22 A7 37 34 30  00 14 14 F8 02 49 B2 C5  |$."".740.....I..|
00000C10: 28 49 24 29 00 1C 14 02  03 99 52 24 00 2F 14 0C  |(I$)......R$./..|
00000C20: 03 A1 45 24 3A 8B 45 24  B2 22 22 A7 37 38 30 00  |..E$:.E$."".780.|
00000C30: 3F 14 16 03 8B 45 24 B2  22 4A 22 A7 38 34 30 00  |?....E$."J".840.|
00000C40: 4F 14 20 03 8B 45 24 B2  22 4E 22 A7 38 32 30 00  |O. ..E$."N".820.|
00000C50: 58 14 2A 03 89 37 38 30  00 81 14 34 03 50 B2 56  |X.*..780...4.P.V|
00000C60: AC 49 3A 53 B2 57 AD 50  3A 99 22 11 11 44 45 52  |.I:S.W.P:."..DER|
00000C70: 20 4C 45 49 53 54 55 4E  47 53 46 41 4B 54 4F 52  | LEISTUNGSFAKTOR|
00000C80: 22 00 98 14 3E 03 99 22  11 42 45 54 52 41 45 47  |"...>..".BETRAEG|
00000C90: 54 22 53 3A 89 38 36 30  00 BC 14 48 03 50 B2 56  |T"S:.860...H.P.V|
00000CA0: AC 49 3A 53 B2 57 AD 50  3A 42 B2 B5 28 53 29 3A  |.I:S.W.P:B..(S):|
00000CB0: 53 B2 42 3A 99 22 11 11  43 4F 53 22 00 D7 14 52  |S.B:."..COS"...R|
00000CC0: 03 99 22 11 42 45 54 52  41 45 47 54 22 53 22 20  |..".BETRAEGT"S" |
00000CD0: 20 20 20 20 20 20 22 00  FD 14 5C 03 99 22 11 11  |      "...\.."..|
00000CE0: 4E 4F 43 48 20 45 49 4E  45 20 42 45 52 45 43 48  |NOCH EINE BERECH|
00000CF0: 4E 55 4E 47 20 3C 4A 2F  4E 3E 20 3F 22 00 10 15  |NUNG <J/N> ?"...|
00000D00: 66 03 A1 45 24 3A 8B 45  24 B2 22 22 A7 38 37 30  |f..E$:.E$."".870|
00000D10: 00 20 15 70 03 8B 45 24  B2 22 4E 22 A7 33 36 30  |. .p..E$."N".360|
00000D20: 00 5B 15 7A 03 8B 45 24  B2 22 4A 22 A7 56 B2 30  |.[.z..E$."J".V.0|
00000D30: 3A 49 B2 30 3A 50 B2 30  3A 53 B2 30 3A 57 B2 30  |:I.0:P.0:S.0:W.0|
00000D40: 3A 42 B2 30 3A 56 24 B2  22 22 3A 49 24 B2 22 22  |:B.0:V$."":I$.""|
00000D50: 3A 57 24 B2 22 22 3A 89  36 38 30 00 64 15 84 03  |:W$."":.680.d...|
00000D60: 89 38 37 30 00 00 00                              |.870...         |
.......45,B(174):.46,B(175):..@...R$."..
ERGEBNIS RUNDEN <J/N> ?".|...W$."":C$.""
:V$."":I$."":P.0:V.0:I.0:S.0:O.0:C.0:W.0
:B.0.G....53280,0:.53281,0:.".":W1$.".UC
CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCI".
....W2$."B..       W E C H S E L S T R O
 M        ..B".>...W3$."JCCCCCCCCCCCCCCC
CCCCCCCCCCCCCCCCCCCCCCCK":.W1$;W2$;W3$.Q
.(..".WIRKLEISTUNG (INDUKTIV):. P = U * 
I * COS "...2.."..DEFINITION:.":."..P = 
LEISTUNG IN .W.ATT".D.<..".U   = SPANNUN
G IN .V.OLT"...F..".I   = STROMSTAERKE I
N  .A.MPERE'"...G..".COS = LEISTUNGSFAKT
OR".>.P.."...         BITTE TASTE DRUECK
EN !         ".H.Z..198,0:.198,1:.198,0:
.".";W1$;W2$;W3$...N.."..  BITTE WAEHLEN
 SIE IHRE RECHENFORMEL:  ".D.X..".<A>   
 P = U * I * COS .":..13)"P"......"<B>  
  U = CCCCCC":..11)"I*COS .":..13)"P".%.
..."<C>    I = CCCCC":..11)"U*COS .":..1
3)"P".H...."<D>  COS = CCCCC":..12)"U*I"
.[....E$:.E$."".156.K. ..E$."A".200.{...
.E$."B".420......E$."C".550......E$."D".
680......156...H..".";W1$;W2$;W3$:."....
..WECHSELSPANNUNG <VOLT>  ";V$...M..V$."
".200...N.V.E(V$).$.R.."........STROMSTA
ERKE <AMPERE'>  ";I$.3.S..I$."".210.?.T.
I.E(I$).L.U.."..........LEISTUNGSFAKTOR 
 <COS>  ";C$.{.V..C$."".213...W.C.E(C$).
..X..R$......E$:.E$."".230......E$."N".2
70.B....E$."J".290.K....230.....P.V.I.C:
."..DIE INDUKTIVE WIRKLEISTUNG":.".BETRA
EGT"P"WATT":.310.'.".P.V.I.C:S..(P):P.S.
_.,.."..DIE INDUKTIVE WIRKLEISTUNG":.".B
ETRAEGT"P"WATT"...6.."..NOCH EINE BERECH
NUNG <J/N> ?"...@..E$:.E$."".320...J..E$
."N".360...T..E$."J".V.0:I.0:P.0:S.0:C.0
:V$."":I$."":C$."":.200...^..320...H..".
.HAUPTMENUE LADEN <J/N> ?"...R..E$:.E$."
".370.,.|..E$."N".10.<....E$."J".410.E..
..370......"....       HAUPTMENUE WIRD G
ELADEN !        ":."MENUE",8,1.C....".";
W1$;W2$;W3$:."......INDUKT. LEISTUNG   <
WATT>  ";W$.R....W$."".420.....W.E(W$)..
...."........STROMSTAERKE    <AMPERE'>  
";I$......I$."".430.'...I.E(I$).W...."..
........LEISTUNGSFAKTOR     <COS>  ";C$.
F....C$."".433.R...C.E(C$).Z....R$......
E$:.E$."".440...B..E$."J".490...L..E$."N
".480...V..440.....P.I.C:V.W.P:."..DIE I
NDUKTIVE SPANNUNG":.".BETRAEGT"V"VOLT":.
500.2...P.I.C:V.W.P:S..(V):V.S:."..DIE I
NDUKTIVE SPANNUNG".J....".BETRAEGT"V"VOL
T".P...."..NOCH EINE BERECHNUNG <J/N> ?"
......E$:.E$."".510......E$."N".360.N...
.E$."J".I.0:C.0:P.0:V.0:W.0:S.0:I$."":C$
."":W$."":.420.W....510...&..".";W1$;W2$
;W3$:."......INDUKT. LEISTUNG <WATT> ";W
$. .'..W$."".550.,.+.W.E(W$).W.0..".....
...SPANNUNG         <VOLT> ";V$.F.1..V$.
"".560.R.2.V.E(V$)...3.."..........LEIST
UNGSFAKTOR   <COS> ";C$...4..C$."".563..
.5.C.E(C$).B.6..R$.U.:..E$:.E$."".570...
D..E$."J".615...N..E$."N".610...X..570..
.B.I.V.C:P.W.I:."..DIE INDUKTIVE STROMST
AERKE".N.C..".BETRAEGT"P"AMPERE'":.630.I
.G.I.V.C:P.W.I:B..(P):P.B...L.."..DIE IN
DUKTIVE STROMSTAERKE":.".BETRAEGT"P"AMPE
RE'".J.V.."..NOCH EINE BERECHNUNG <J/N> 
?"......E$:.E$."".640......E$."N".360.(.
...E$."J".I.0:V.0:C.0:P.0:W.0:B.0:W$."":
V$."":C$."":.550.1....640.K....".";W1$;W
2$;W3$:."......INDUKT. LEISTUNG <WATT> "
;W$.Z....W$."".680.....W.E(W$)...F.."...
.....SPANNUNG         <VOLT> ";V$...P..V
$."".710.L.Z.V.E(V$)......"..........STR
OMSTAERKE  <AMPERE'> ";I$......I$."".740
.....I.E(I$)......R$./....E$:.E$."".780.
?....E$."J".840.O. ..E$."N".820.X.*..780
...4.P.V.I:S.W.P:."..DER LEISTUNGSFAKTOR
"...>..".BETRAEGT"S:.860...H.P.V.I:S.W.P
:B..(S):S.B:."..COS".W.R..".BETRAEGT"S" 
      "...\.."..NOCH EINE BERECHNUNG <J/
N> ?"...F..E$:.E$."".870. .P..E$."N".360
.[.Z..E$."J".V.0:I.0:P.0:S.0:W.0:B.0:V$.
"":I$."":W$."":.680.D....870...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL