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

STROMWAERME

FILE INFORMATION

FILENAME(S): STROMWAERME

FILE TYPE(S): PRG

FILE SIZE: 3.5K

FIRST SEEN: 2025-12-02 23:21:12

APPEARS ON: 1 disk(s)

FILE HASH

9a3bf2fadb16dcb515264f4e3cc17de054fc9127649e012c7665b74206bbccaa

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
GOODSOFT STROMWAERME PRG swasti, dinkel 15 3 ⚠ CORRUPT
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 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 35 09 28 00 99  22 9E 53 54 52 4F 4D 57  |3$.5.(..".STROMW|
00000110: 41 45 52 4D 45 3A 05 20  20 51 20 20 3D 20 4D 20  |AERME:.  Q  = M |
00000120: 2A 20 43 20 2A 20 CE CD  20 54 22 3A 99 A3 32 37  |* C * .. T":..27|
00000130: 29 22 A3 A3 22 00 6E 09  32 00 99 22 11 9E 44 45  |)"..".n.2.."..DE|
00000140: 46 49 4E 49 54 49 4F 4E  3A 05 22 3A 99 22 11 11  |FINITION:.":."..|
00000150: 20 20 20 51 20 3D 20 57  41 45 52 4D 45 4D 45 4E  |   Q = WAERMEMEN|
00000160: 47 45 20 49 4E 20 1C 4A  05 4F 55 4C 45 22 00 A4  |GE IN .J.OULE"..|
00000170: 09 3C 00 99 22 11 20 20  20 4D 20 3D 20 4D 41 53  |.<..".   M = MAS|
00000180: 53 45 20 44 45 53 20 4B  4F 45 52 50 45 52 53 20  |SE DES KOERPERS |
00000190: 49 4E 20 1C 4B 47 05 22  3A 99 A3 33 35 29 22 1C  |IN .KG.":..35)".|
000001A0: 4B 4A 05 22 00 E1 09 46  00 99 22 20 20 20 43 20  |KJ."...F.."   C |
000001B0: 3D 20 53 50 45 5A 2E 20  57 41 45 52 4D 45 4B 41  |= SPEZ. WAERMEKA|
000001C0: 50 41 5A 49 54 41 45 54  20 49 4E 20 1C C3 C3 C3  |PAZITAET IN ....|
000001D0: C3 C3 C3 22 3A 99 A3 33  34 29 22 4B 47 2A 4B 05  |...":..34)"KG*K.|
000001E0: 22 00 17 0A 4B 00 99 22  11 CE CD 20 54 20 3D 20  |"...K.."... T = |
000001F0: 54 48 45 4D 50 45 52 41  54 55 52 44 49 46 46 45  |THEMPERATURDIFFE|
00000200: 52 45 4E 5A 20 49 4E 20  1C 4B 05 45 4C 56 49 4E  |RENZ IN .K.ELVIN|
00000210: 22 3A 99 22 A3 A3 22 00  4A 0A 50 00 99 22 11 11  |":."..".J.P.."..|
00000220: 12 20 20 20 20 20 20 20  20 20 42 49 54 54 45 20  |.         BITTE |
00000230: 54 41 53 54 45 20 44 52  55 45 43 4B 45 4E 20 21  |TASTE DRUECKEN !|
00000240: 20 20 20 20 20 20 20 20  20 22 00 74 0A 5A 00 97  |         ".t.Z..|
00000250: 31 39 38 2C 30 3A 92 31  39 38 2C 31 3A 97 31 39  |198,0:.198,1:.19|
00000260: 38 2C 30 3A 99 22 93 22  3B 57 31 24 3B 57 32 24  |8,0:.".";W1$;W2$|
00000270: 3B 57 33 24 00 A6 0A 6E  00 99 22 11 11 20 20 42  |;W3$...n.."..  B|
00000280: 49 54 54 45 20 57 41 45  48 4C 45 4E 20 53 49 45  |ITTE WAEHLEN SIE|
00000290: 20 49 48 52 45 20 52 45  43 48 45 4E 46 4F 52 4D  | IHRE RECHENFORM|
000002A0: 45 4C 3A 20 20 22 00 C5  0A 78 00 99 22 11 3C 41  |EL:  "...x..".<A|
000002B0: 3E 20 20 51 20 20 3D 20  4D 20 2A 20 43 20 2A 20  |>  Q  = M * C * |
000002C0: CE CD 20 54 22 00 FB 0A  82 00 99 A3 31 38 29 22  |.. T".......18)"|
000002D0: A3 A3 11 22 3A 99 A3 31  31 29 22 51 22 3A 99 22  |...":..11)"Q":."|
000002E0: 3C 42 3E 20 20 4D 20 3D  20 C3 C3 C3 C3 C3 22 3A  |<B>  M = .....":|
000002F0: 99 A3 39 29 22 43 2A CE  CD 54 22 00 3A 0B 87 00  |..9)"C*..T".:...|
00000300: 99 A3 31 31 29 22 A3 A3  22 3A 99 A3 31 31 29 22  |..11)"..":..11)"|
00000310: 51 22 3A 99 22 3C 43 3E  20 20 43 20 3D 20 C3 C3  |Q":."<C>  C = ..|
00000320: C3 C3 C3 22 3A 99 A3 39  29 22 4D 2A CE CD 54 22  |...":..9)"M*..T"|
00000330: 3A 99 A3 31 31 29 22 A3  A3 22 00 6E 0B 8C 00 99  |:..11)"..".n....|
00000340: A3 31 33 29 22 51 22 3A  99 22 3C 44 3E 20 20 CE  |.13)"Q":."<D>  .|
00000350: CD 54 20 3D 20 C3 C3 C3  C3 C3 22 3A 99 A3 35 29  |.T = .....":..5)|
00000360: 22 A3 A3 22 3B A3 31 32  29 22 4D 2A 43 22 00 81  |"..";.12)"M*C"..|
00000370: 0B 9C 00 A1 45 24 3A 8B  45 24 B2 22 22 A7 31 35  |....E$:.E$."".15|
00000380: 36 00 91 0B A0 00 8B 45  24 B2 22 41 22 A7 32 30  |6......E$."A".20|
00000390: 30 00 A1 0B AA 00 8B 45  24 B2 22 42 22 A7 34 32  |0......E$."B".42|
000003A0: 30 00 B1 0B B4 00 8B 45  24 B2 22 43 22 A7 35 35  |0......E$."C".55|
000003B0: 30 00 C1 0B B9 00 8B 45  24 B2 22 44 22 A7 36 38  |0......E$."D".68|
000003C0: 30 00 CA 0B BE 00 89 31  35 36 00 0C 0C C8 00 99  |0......156......|
000003D0: 22 93 22 3B 57 31 24 3B  57 32 24 3B 57 33 24 3A  |".";W1$;W2$;W3$:|
000003E0: 85 22 13 11 11 11 11 11  11 11 4D 41 53 53 45 20  |."........MASSE |
000003F0: 3C 4B 47 3E 20 20 20 20  20 20 20 20 20 20 20 20  |<KG>            |
00000400: 20 20 20 20 20 20 20 20  22 3B 4B 24 00 1B 0C CD  |        ";K$....|
00000410: 00 8B 4B 24 B2 22 22 A7  32 30 30 00 27 0C CE 00  |..K$."".200.'...|
00000420: 4B B2 C5 28 4B 24 29 00  5A 0C D2 00 85 22 13 11  |K..(K$).Z...."..|
00000430: 11 11 11 11 11 11 11 11  57 41 45 52 4D 45 4B 41  |........WAERMEKA|
00000440: 50 41 5A 49 54 41 45 54  20 3C 4B 4A 2F 4B 47 2A  |PAZITAET <KJ/KG*|
00000450: 4B 3E 20 20 20 20 22 3B  4A 24 00 69 0C D3 00 8B  |K>    ";J$.i....|
00000460: 4A 24 B2 22 22 A7 32 31  30 00 75 0C D4 00 4A B2  |J$."".210.u...J.|
00000470: C5 28 4A 24 29 00 AA 0C  D5 00 85 22 13 11 11 11  |.(J$)......"....|
00000480: 11 11 11 11 11 11 11 11  54 48 45 4D 50 45 52 41  |........THEMPERA|
00000490: 54 55 52 44 49 46 46 45  52 45 4E 5A 20 3C 4B 45  |TURDIFFERENZ <KE|
000004A0: 4C 56 49 4E 3E 20 22 3B  54 24 00 B9 0C D6 00 8B  |LVIN> ";T$......|
000004B0: 54 24 B2 22 22 A7 32 31  33 00 C5 0C D7 00 54 B2  |T$."".213.....T.|
000004C0: C5 28 54 24 29 00 CD 0C  D8 00 99 52 24 00 E0 0C  |.(T$)......R$...|
000004D0: E6 00 A1 45 24 3A 8B 45  24 B2 22 22 A7 32 33 30  |...E$:.E$."".230|
000004E0: 00 F0 0C F0 00 8B 45 24  B2 22 4E 22 A7 32 37 30  |......E$."N".270|
000004F0: 00 00 0D FA 00 8B 45 24  B2 22 4A 22 A7 32 39 30  |......E$."J".290|
00000500: 00 09 0D 04 01 89 32 33  30 00 40 0D 0E 01 51 B2  |......230.@...Q.|
00000510: 4B AC 4A AC 54 3A 99 22  11 11 44 49 45 20 57 41  |K.J.T:."..DIE WA|
00000520: 45 52 4D 45 4D 45 4E 47  45 20 42 45 54 52 41 45  |ERMEMENGE BETRAE|
00000530: 47 54 22 51 3A 99 22 11  4B 4A 22 3A 89 33 31 30  |GT"Q:.".KJ":.310|
00000540: 00 57 0D 22 01 51 B2 4B  AC 4A AC 54 3A 53 B2 B5  |.W.".Q.K.J.T:S..|
00000550: 28 51 29 3A 51 B2 53 00  81 0D 2C 01 99 22 11 11  |(Q):Q.S...,.."..|
00000560: 44 49 45 20 57 41 45 52  4D 45 4D 45 4E 47 45 20  |DIE WAERMEMENGE |
00000570: 42 45 54 52 41 45 47 54  22 51 3A 99 22 11 4B 4A  |BETRAEGT"Q:.".KJ|
00000580: 22 00 A7 0D 36 01 99 22  11 11 4E 4F 43 48 20 45  |"...6.."..NOCH E|
00000590: 49 4E 45 20 42 45 52 45  43 48 4E 55 4E 47 20 3C  |INE BERECHNUNG <|
000005A0: 4A 2F 4E 3E 20 3F 22 00  BA 0D 40 01 A1 45 24 3A  |J/N> ?"...@..E$:|
000005B0: 8B 45 24 B2 22 22 A7 33  32 30 00 CA 0D 4A 01 8B  |.E$."".320...J..|
000005C0: 45 24 B2 22 4E 22 A7 33  36 30 00 01 0E 54 01 8B  |E$."N".360...T..|
000005D0: 45 24 B2 22 4A 22 A7 4B  B2 30 3A 4A B2 30 3A 54  |E$."J".K.0:J.0:T|
000005E0: B2 30 3A 51 B2 30 3A 53  B2 30 3A 4B 24 B2 22 22  |.0:Q.0:S.0:K$.""|
000005F0: 3A 4A 24 B2 22 22 3A 54  24 B2 22 22 3A 89 32 30  |:J$."":T$."":.20|
00000600: 30 00 0A 0E 5E 01 89 33  32 30 00 2C 0E 68 01 99  |0...^..320.,.h..|
00000610: 22 11 11 48 41 55 50 54  4D 45 4E 55 45 20 4C 41  |"..HAUPTMENUE LA|
00000620: 44 45 4E 20 3C 4A 2F 4E  3E 20 3F 22 00 3F 0E 72  |DEN <J/N> ?".?.r|
00000630: 01 A1 45 24 3A 8B 45 24  B2 22 22 A7 33 37 30 00  |..E$:.E$."".370.|
00000640: 4E 0E 7C 01 8B 45 24 B2  22 4E 22 A7 31 30 00 5E  |N.|..E$."N".10.^|
00000650: 0E 86 01 8B 45 24 B2 22  4A 22 A7 34 31 30 00 67  |....E$."J".410.g|
00000660: 0E 90 01 89 33 37 30 00  A8 0E 9A 01 99 22 93 11  |....370......"..|
00000670: 11 12 20 20 20 20 20 20  20 48 41 55 50 54 4D 45  |..       HAUPTME|
00000680: 4E 55 45 20 57 49 52 44  20 47 45 4C 41 44 45 4E  |NUE WIRD GELADEN|
00000690: 20 21 20 20 20 20 20 20  20 20 22 3A 93 22 4D 45  | !        ":."ME|
000006A0: 4E 55 45 22 2C 38 2C 31  00 EA 0E A4 01 99 22 93  |NUE",8,1......".|
000006B0: 22 3B 57 31 24 3B 57 32  24 3B 57 33 24 3A 85 22  |";W1$;W2$;W3$:."|
000006C0: 13 11 11 11 11 11 11 11  57 41 45 52 4D 45 4D 45  |........WAERMEME|
000006D0: 4E 47 45 20 3C 4B 4A 3E  20 20 20 20 20 20 20 20  |NGE <KJ>        |
000006E0: 20 20 20 20 20 20 22 3B  51 24 00 F9 0E A9 01 8B  |      ";Q$......|
000006F0: 51 24 B2 22 22 A7 34 32  30 00 05 0F AA 01 51 B2  |Q$."".420.....Q.|
00000700: C5 28 51 24 29 00 38 0F  AE 01 85 22 13 11 11 11  |.(Q$).8...."....|
00000710: 11 11 11 11 11 11 57 41  45 52 4D 45 4B 41 50 41  |......WAERMEKAPA|
00000720: 5A 49 54 41 45 54 20 3C  4B 4A 2F 4B 47 2A 4B 3E  |ZITAET <KJ/KG*K>|
00000730: 20 20 20 20 22 3B 43 24  00 47 0F AF 01 8B 43 24  |    ";C$.G....C$|
00000740: B2 22 22 A7 34 33 30 00  53 0F B0 01 43 B2 C5 28  |."".430.S...C..(|
00000750: 43 24 29 00 88 0F B1 01  85 22 13 11 11 11 11 11  |C$)......"......|
00000760: 11 11 11 11 11 11 54 48  45 4D 50 45 52 41 54 55  |......THEMPERATU|
00000770: 52 44 49 46 46 45 52 45  4E 5A 20 3C 4B 45 4C 56  |RDIFFERENZ <KELV|
00000780: 49 4E 3E 20 22 3B 54 24  00 97 0F B2 01 8B 54 24  |IN> ";T$......T$|
00000790: B2 22 22 A7 34 33 33 00  A3 0F B3 01 54 B2 C5 28  |."".433.....T..(|
000007A0: 54 24 29 00 AB 0F B4 01  99 52 24 00 BE 0F B8 01  |T$)......R$.....|
000007B0: A1 45 24 3A 8B 45 24 B2  22 22 A7 34 34 30 00 CE  |.E$:.E$."".440..|
000007C0: 0F C2 01 8B 45 24 B2 22  4A 22 A7 34 39 30 00 DE  |....E$."J".490..|
000007D0: 0F CC 01 8B 45 24 B2 22  4E 22 A7 34 38 30 00 E7  |....E$."N".480..|
000007E0: 0F D6 01 89 34 34 30 00  1C 10 E0 01 58 B2 43 AC  |....440.....X.C.|
000007F0: 54 3A 4D B2 51 AD 58 3A  99 22 11 11 44 49 45 20  |T:M.Q.X:."..DIE |
00000800: 4D 41 53 53 45 20 42 45  54 52 41 45 47 54 22 4D  |MASSE BETRAEGT"M|
00000810: 3A 99 22 11 4B 47 22 3A  89 35 30 30 00 54 10 EA  |:.".KG":.500.T..|
00000820: 01 58 B2 43 AC 54 3A 4D  B2 51 AD 58 3A 53 B2 B5  |.X.C.T:M.Q.X:S..|
00000830: 28 4D 29 3A 4D B2 53 3A  99 22 11 11 44 49 45 20  |(M):M.S:."..DIE |
00000840: 4D 41 53 53 45 20 42 45  54 52 41 45 47 54 22 4D  |MASSE BETRAEGT"M|
00000850: 22 4B 47 22 00 7A 10 F4  01 99 22 11 11 4E 4F 43  |"KG".z...."..NOC|
00000860: 48 20 45 49 4E 45 20 42  45 52 45 43 48 4E 55 4E  |H EINE BERECHNUN|
00000870: 47 20 3C 4A 2F 4E 3E 20  3F 22 00 8D 10 FE 01 A1  |G <J/N> ?"......|
00000880: 45 24 3A 8B 45 24 B2 22  22 A7 35 31 30 00 9D 10  |E$:.E$."".510...|
00000890: 08 02 8B 45 24 B2 22 4E  22 A7 33 36 30 00 DC 10  |...E$."N".360...|
000008A0: 12 02 8B 45 24 B2 22 4A  22 A7 58 B2 30 3A 43 B2  |...E$."J".X.0:C.|
000008B0: 30 3A 54 B2 30 3A 4D B2  30 3A 51 B2 30 3A 53 B2  |0:T.0:M.0:Q.0:S.|
000008C0: 30 3A 57 B2 30 3A 51 24  B2 22 22 3A 54 24 B2 22  |0:W.0:Q$."":T$."|
000008D0: 22 3A 43 24 B2 22 22 3A  89 34 32 30 00 E5 10 1C  |":C$."":.420....|
000008E0: 02 89 35 31 30 00 27 11  26 02 99 22 93 22 3B 57  |..510.'.&..".";W|
000008F0: 31 24 3B 57 32 24 3B 57  33 24 3A 85 22 13 11 11  |1$;W2$;W3$:."...|
00000900: 11 11 11 11 11 57 41 45  52 4D 45 4D 45 4E 47 45  |.....WAERMEMENGE|
00000910: 20 3C 4B 45 4C 56 49 4E  3E 20 20 20 20 20 20 20  | <KELVIN>       |
00000920: 20 20 20 22 3B 51 24 00  36 11 2B 02 8B 51 24 B2  |   ";Q$.6.+..Q$.|
00000930: 22 22 A7 35 35 30 00 42  11 2C 02 51 B2 C5 28 51  |"".550.B.,.Q..(Q|
00000940: 24 29 00 75 11 30 02 85  22 13 11 11 11 11 11 11  |$).u.0..".......|
00000950: 11 11 11 4D 41 53 53 45  20 3C 4B 47 3E 20 20 20  |...MASSE <KG>   |
00000960: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000970: 20 22 3B 4D 24 00 84 11  31 02 8B 4D 24 B2 22 22  | ";M$...1..M$.""|
00000980: A7 35 36 30 00 90 11 32  02 4D B2 C5 28 4D 24 29  |.560...2.M..(M$)|
00000990: 00 C5 11 33 02 85 22 13  11 11 11 11 11 11 11 11  |...3..".........|
000009A0: 11 11 11 54 48 45 4D 50  45 52 41 54 55 52 44 49  |...THEMPERATURDI|
000009B0: 46 46 45 52 45 4E 5A 20  3C 4B 45 4C 56 49 4E 3E  |FFERENZ <KELVIN>|
000009C0: 20 22 3B 54 24 00 D4 11  34 02 8B 54 24 B2 22 22  | ";T$...4..T$.""|
000009D0: A7 35 36 33 00 E0 11 35  02 54 B2 C5 28 54 24 29  |.563...5.T..(T$)|
000009E0: 00 E8 11 36 02 99 52 24  00 FB 11 3A 02 A1 45 24  |...6..R$...:..E$|
000009F0: 3A 8B 45 24 B2 22 22 A7  35 37 30 00 0B 12 44 02  |:.E$."".570...D.|
00000A00: 8B 45 24 B2 22 4A 22 A7  36 31 35 00 1B 12 4E 02  |.E$."J".615...N.|
00000A10: 8B 45 24 B2 22 4E 22 A7  36 31 30 00 24 12 58 02  |.E$."N".610.$.X.|
00000A20: 89 36 34 30 00 6A 12 62  02 46 B2 4D AC 54 3A 43  |.640.j.b.F.M.T:C|
00000A30: B2 51 AD 46 3A 99 22 11  11 44 49 45 20 57 41 45  |.Q.F:."..DIE WAE|
00000A40: 52 4D 45 4B 41 50 41 5A  49 54 41 45 54 20 42 45  |RMEKAPAZITAET BE|
00000A50: 54 52 41 45 47 54 20 22  43 3A 99 22 11 4B 4A 2F  |TRAEGT "C:.".KJ/|
00000A60: 4B 47 2A 4B 22 3A 89 36  33 30 00 85 12 67 02 46  |KG*K":.630...g.F|
00000A70: B2 4D AC 54 3A 43 B2 51  AD 46 3A 42 B2 B5 28 43  |.M.T:C.Q.F:B..(C|
00000A80: 29 3A 43 B2 42 00 BA 12  6C 02 99 22 11 11 44 49  |):C.B...l.."..DI|
00000A90: 45 20 57 41 45 52 4D 45  4B 41 50 41 5A 49 54 41  |E WAERMEKAPAZITA|
00000AA0: 45 54 20 42 45 54 52 41  45 47 54 20 22 43 3A 99  |ET BETRAEGT "C:.|
00000AB0: 22 11 4B 4A 2F 4B 47 2A  4B 22 00 E0 12 76 02 99  |".KJ/KG*K"...v..|
00000AC0: 22 11 11 4E 4F 43 48 20  45 49 4E 45 20 42 45 52  |"..NOCH EINE BER|
00000AD0: 45 43 48 4E 55 4E 47 20  3C 4A 2F 4E 3E 20 3F 22  |ECHNUNG <J/N> ?"|
00000AE0: 00 F3 12 80 02 A1 45 24  3A 8B 45 24 B2 22 22 A7  |......E$:.E$."".|
00000AF0: 36 34 30 00 03 13 8A 02  8B 45 24 B2 22 4E 22 A7  |640......E$."N".|
00000B00: 33 36 30 00 3E 13 94 02  8B 45 24 B2 22 4A 22 A7  |360.>....E$."J".|
00000B10: 51 B2 30 3A 4D B2 30 3A  54 B2 30 3A 46 B2 30 3A  |Q.0:M.0:T.0:F.0:|
00000B20: 43 B2 30 3A 42 B2 30 3A  51 24 B2 22 22 3A 4D 24  |C.0:B.0:Q$."":M$|
00000B30: B2 22 22 3A 54 24 B2 22  22 3A 89 35 35 30 00 47  |."":T$."":.550.G|
00000B40: 13 9E 02 89 36 34 30 00  86 13 A8 02 99 22 93 22  |....640......"."|
00000B50: 3B 57 31 24 3B 57 32 24  3B 57 33 24 3A 85 22 13  |;W1$;W2$;W3$:.".|
00000B60: 11 11 11 11 11 11 11 57  41 45 52 4D 45 4D 45 4E  |.......WAERMEMEN|
00000B70: 47 45 20 3C 4B 4A 3E 20  20 20 20 20 20 20 20 20  |GE <KJ>         |
00000B80: 20 20 22 3B 51 24 00 95  13 B7 02 8B 51 24 B2 22  |  ";Q$......Q$."|
00000B90: 22 A7 36 38 30 00 A1 13  B8 02 51 B2 C5 28 51 24  |".680.....Q..(Q$|
00000BA0: 29 00 D1 13 BC 02 85 22  13 11 11 11 11 11 11 11  |)......"........|
00000BB0: 11 11 4D 41 53 53 45 20  3C 4B 47 3E 20 20 20 20  |..MASSE <KG>    |
00000BC0: 20 20 20 20 20 20 20 20  20 20 20 20 20 22 3B 4D  |             ";M|
00000BD0: 24 00 E0 13 C6 02 8B 4D  24 B2 22 22 A7 37 30 30  |$......M$."".700|
00000BE0: 00 EC 13 C7 02 4D B2 C5  28 4D 24 29 00 1E 14 D0  |.....M..(M$)....|
00000BF0: 02 85 22 13 11 11 11 11  11 11 11 11 11 11 11 57  |.."............W|
00000C00: 41 45 52 4D 45 4B 41 50  41 5A 49 54 41 45 54 20  |AERMEKAPAZITAET |
00000C10: 3C 4B 4A 2F 4B 47 2A 4B  3E 20 22 3B 43 24 00 2D  |<KJ/KG*K> ";C$.-|
00000C20: 14 DA 02 8B 43 24 B2 22  22 A7 37 32 30 00 39 14  |....C$."".720.9.|
00000C30: DB 02 43 B2 C5 28 43 24  29 00 41 14 E4 02 99 52  |..C..(C$).A....R|
00000C40: 24 00 54 14 EE 02 A1 45  24 3A 8B 45 24 B2 22 22  |$.T....E$:.E$.""|
00000C50: A7 37 35 30 00 64 14 F8  02 8B 45 24 B2 22 4A 22  |.750.d....E$."J"|
00000C60: A7 38 30 30 00 74 14 02  03 8B 45 24 B2 22 4E 22  |.800.t....E$."N"|
00000C70: A7 37 39 30 00 7D 14 0C  03 89 37 35 30 00 C5 14  |.790.}....750...|
00000C80: 16 03 46 B2 4D AC 43 3A  54 B2 51 AD 46 3A 99 22  |..F.M.C:T.Q.F:."|
00000C90: 11 11 44 49 45 20 54 48  45 4D 50 45 52 41 54 55  |..DIE THEMPERATU|
00000CA0: 52 44 49 46 46 45 52 45  4E 5A 20 42 45 54 52 41  |RDIFFERENZ BETRA|
00000CB0: 45 47 54 22 54 3A 99 22  11 4B 45 4C 56 49 4E 22  |EGT"T:.".KELVIN"|
00000CC0: 3A 89 38 32 30 00 E0 14  20 03 46 B2 4D AC 43 3A  |:.820... .F.M.C:|
00000CD0: 54 B2 51 AD 46 3A 42 B2  B5 28 54 29 3A 54 B2 42  |T.Q.F:B..(T):T.B|
00000CE0: 00 17 15 2A 03 99 FF FF  0D 88 60 08 CC CC 99 FF  |...*......`.....|
00000CF0: 9E 88 D9 FF 9D BF D8 9D  E8 9C D9 DD E8 99 FF A9  |................|
00000D00: A9 9D E8 9D B9 FF 88 A8  9D D9 E8 9C 9D AD DA 08  |................|
00000D10: DA 51 FF 08 CC BC 9D 9F  E9 FF BA 08 80 5F CE C9  |.Q..........._..|
00000D20: 05 FF 08 CC CC B9 AF AC  FF 88 9D FF B9 9E 88 A8  |................|
00000D30: 9D E8 9D AC FF B9 DD B9  AE 80 CF B0 0F BA 5A 80  |..............Z.|
00000D40: 46 08 88 D8 CE 59 05 8C  9E 8A 58 FF 9E 8B 40 00  |F....Y....X...@.|
00000D50: 01 0E FF 44 C8 88 FF CD  FF 0C FF 9E 8B 40 08 B0  |...D.........@..|
00000D60: 01 0D D5 40 C0 58 B7 40  C0 58 A5 40 C0 58 AB 40  |...@.X.@.X.@.X.@|
00000D70: C0 58 DB 40 C0 58 A1 40  C0 58 D4 8B 40 00 00 58  |.X.@.X.@.X..@..X|
00000D80: B6 8B 40 00 00 58 A4 8B  40 00 00 58 FF 4A FF C8  |..@..X..@..X.J..|
00000D90: 81 FF CD E8 0C FF 9E 8B  40 08 BA 01 0E 44 4A C8  |........@....DJ.|
00000DA0: 81 89 CD DF 0C FF FF 44  C8 88 88 88 5F FF 8C 81  |.......D...._...|
00000DB0: FF CA CE 8F 60 FF C4 4E  CA FF 51 FF CA 4A 8F 60  |....`..N..Q..J.`|
00000DC0: FF C4 4E CE FF 51 FF 88  98 FF FF 88 E0 8B 40 08  |..N..Q........@.|
00000DD0: CC CC 9D E8 AD 9D A8 B9  FF E4 88 E8 DD B9 99 9D  |................|
00000DE0: BA 80 CF B0                                       |....            |
.......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$.5.(..".STROMWAERME:. 
 Q  = M * C * NM T":..27)"..".N.2.."..DE
FINITION:.":."..   Q = WAERMEMENGE IN .J
.OULE"...<..".   M = MASSE DES KOERPERS 
IN .KG.":..35)".KJ."...F.."   C = SPEZ. 
WAERMEKAPAZITAET IN .CCCCCC":..34)"KG*K.
"...K..".NM T = THEMPERATURDIFFERENZ IN 
.K.ELVIN":."..".J.P.."...         BITTE 
TASTE DRUECKEN !         ".T.Z..198,0:.1
98,1:.198,0:.".";W1$;W2$;W3$...N.."..  B
ITTE WAEHLEN SIE IHRE RECHENFORMEL:  ".E
.X..".<A>  Q  = M * C * NM T".......18)"
...":..11)"Q":."<B>  M = CCCCC":..9)"C*N
MT".:.....11)"..":..11)"Q":."<C>  C = CC
CCC":..9)"M*NMT":..11)"..".N.....13)"Q":
."<D>  NMT = CCCCC":..5)"..";.12)"M*C"..
....E$:.E$."".156... ..E$."A".200......E
$."B".420......E$."C".550.A....E$."D".68
0.J....156...H..".";W1$;W2$;W3$:."......
..MASSE <KG>                    ";K$...M
..K$."".200.'.N.K.E(K$).Z.R.."..........
WAERMEKAPAZITAET <KJ/KG*K>    ";J$.I.S..
J$."".210.U.T.J.E(J$)...U.."............
THEMPERATURDIFFERENZ <KELVIN> ";T$...V..
T$."".213.E.W.T.E(T$).M.X..R$......E$:.E
$."".230......E$."N".270......E$."J".290
......230.@...Q.K.J.T:."..DIE WAERMEMENG
E BETRAEGT"Q:.".KJ":.310.W.".Q.K.J.T:S..
(Q):Q.S...,.."..DIE WAERMEMENGE BETRAEGT
"Q:.".KJ"...6.."..NOCH EINE BERECHNUNG <
J/N> ?"...@..E$:.E$."".320.J.J..E$."N".3
60...T..E$."J".K.0:J.0:T.0:Q.0:S.0:K$.""
:J$."":T$."":.200...^..320.,.H.."..HAUPT
MENUE LADEN <J/N> ?".?.R..E$:.E$."".370.
N.|..E$."N".10.^....E$."J".410.G....370.
....."....       HAUPTMENUE WIRD GELADEN
 !        ":."MENUE",8,1......".";W1$;W2
$;W3$:."........WAERMEMENGE <KJ>        
      ";Q$......Q$."".420.....Q.E(Q$).8.
..."..........WAERMEKAPAZITAET <KJ/KG*K>
    ";C$.G....C$."".430.S...C.E(C$).....
."............THEMPERATURDIFFERENZ <KELV
IN> ";T$......T$."".433.....T.E(T$).....
.R$......E$:.E$."".440.N.B..E$."J".490..
.L..E$."N".480...V..440.....X.C.T:M.Q.X:
."..DIE MASSE BETRAEGT"M:.".KG":.500.T..
.X.C.T:M.Q.X:S..(M):M.S:."..DIE MASSE BE
TRAEGT"M"KG".Z...."..NOCH EINE BERECHNUN
G <J/N> ?"......E$:.E$."".510......E$."N
".360......E$."J".X.0:C.0:T.0:M.0:Q.0:S.
0:W.0:Q$."":T$."":C$."":.420......510.'.
&..".";W1$;W2$;W3$:."........WAERMEMENGE
 <KELVIN>          ";Q$.6.+..Q$."".550.B
.,.Q.E(Q$).U.0.."..........MASSE <KG>   
                 ";M$...1..M$."".560...2
.M.E(M$).E.3.."............THEMPERATURDI
FFERENZ <KELVIN> ";T$.T.4..T$."".563...5
.T.E(T$)...6..R$...:..E$:.E$."".570...D.
.E$."J".615...N..E$."N".610.$.X..640.J.B
.F.M.T:C.Q.F:."..DIE WAERMEKAPAZITAET BE
TRAEGT "C:.".KJ/KG*K":.630...G.F.M.T:C.Q
.F:B..(C):C.B...L.."..DIE WAERMEKAPAZITA
ET BETRAEGT "C:.".KJ/KG*K"...V.."..NOCH 
EINE BERECHNUNG <J/N> ?"......E$:.E$."".
640......E$."N".360.>....E$."J".Q.0:M.0:
T.0:F.0:C.0:B.0:Q$."":M$."":T$."":.550.G
....640......".";W1$;W2$;W3$:."........W
AERMEMENGE <KJ>           ";Q$......Q$."
".680.....Q.E(Q$).Q...."..........MASSE 
<KG>                 ";M$...F..M$."".700
...G.M.E(M$)...P.."............WAERMEKAP
AZITAET <KJ/KG*K> ";C$.-.Z..C$."".720.9.
..C.E(C$).A....R$.T....E$:.E$."".750.D..
..E$."J".800.T....E$."N".790.}....750.E.
..F.M.C:T.Q.F:."..DIE THEMPERATURDIFFERE
NZ BETRAEGT"T:.".KELVIN":.820... .F.M.C:
T.Q.F:B..(T):T.B...*......`.LL....Y...X.
..Y..............Y....Z.ZQ..L........_NI
...LL.....................O...Z.F..XNY..
..X...@....DH..M.....@....U@.X.@.X.@.X.@
.X.@.X.@.XT.@..X..@..X..@..X.J.H..M.....
@....DJH..M....DH..._....JN.`.DNJ.Q.JJ.`
.DNN.Q........@.LL................O.
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL