> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 0A 00 89 31 30 30 30 00 33 08 64 00 |.......1000.3.d.|
00000010: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000030: 2A 2A 2A 00 56 08 69 00 99 22 93 11 11 11 11 1D |***.V.i.."......|
00000040: 1D 1D 53 4C 55 4D 50 45 52 20 54 45 4D 45 52 41 |..SLUMPER TEMERA|
00000050: 54 55 52 45 52 22 00 6C 08 6E 00 81 58 B2 30 A4 |TURER".l.n..X.0.|
00000060: 41 AA 34 3A 81 59 B2 30 A4 41 AA 34 00 88 08 78 |A.4:.Y.0.A.4...x|
00000070: 00 8B 58 B2 30 B0 59 B2 30 A7 41 28 58 2C 59 29 |..X.0.Y.0.A(X,Y)|
00000080: B2 54 55 3A 89 31 38 30 00 A6 08 82 00 8B 58 B1 |.TU:.180......X.|
00000090: B2 41 AF 59 B1 B2 41 A7 41 28 58 2C 59 29 B2 54 |.A.Y..A.A(X,Y).T|
000000A0: 45 3A 89 31 38 30 00 C5 08 8C 00 8B 59 B1 58 A7 |E:.180......Y.X.|
000000B0: 41 28 58 2C 59 29 B2 54 55 AB 28 54 55 AB 54 45 |A(X,Y).TU.(TU.TE|
000000C0: 29 AD 41 AC 58 00 E4 08 96 00 8B 58 B1 59 A7 41 |).A.X......X.Y.A|
000000D0: 28 58 2C 59 29 B2 54 55 AB 28 54 55 AB 54 45 29 |(X,Y).TU.(TU.TE)|
000000E0: AD 41 AC 59 00 03 09 A0 00 8B 58 B2 59 A7 41 28 |.A.Y......X.Y.A(|
000000F0: 58 2C 59 29 B2 54 55 AB 28 54 55 AB 54 45 29 AD |X,Y).TU.(TU.TE).|
00000100: 41 AC 59 00 0D 09 B4 00 82 59 3A 82 58 00 17 09 |A.Y......Y:.X...|
00000110: BE 00 89 31 31 32 30 00 3F 09 C7 00 8F 2A 2A 2A |...1120.?....***|
00000120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000130: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000140: 5E 09 C8 00 9C 3A 99 22 93 11 11 11 11 11 1D 1D |^....:."........|
00000150: 1D 1D 4F 50 47 49 56 20 4E 22 3B 3A 85 4E 00 71 |..OPGIV N";:.N.q|
00000160: 09 CA 00 85 22 11 11 1D 1D 1D 54 55 3D 22 3B 54 |....".....TU=";T|
00000170: 55 00 84 09 CB 00 85 22 11 11 1D 1D 1D 54 45 3D |U......".....TE=|
00000180: 22 3B 54 45 00 9E 09 CD 00 41 B2 4E AD 32 3A 86 |";TE.....A.N.2:.|
00000190: 41 28 37 34 2C 37 34 29 3A 89 31 31 32 30 00 C6 |A(74,74):.1120..|
000001A0: 09 2C 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.,..************|
000001B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000001C0: 2A 2A 2A 2A 2A 2A 00 CF 09 36 01 99 22 93 22 00 |******...6..".".|
000001D0: F4 09 3B 01 99 22 93 11 11 11 1D 1D 1D 42 45 52 |..;..".......BER|
000001E0: 45 47 4E 45 52 20 54 45 4D 50 45 52 41 54 55 52 |EGNER TEMPERATUR|
000001F0: 45 52 11 22 00 FC 09 40 01 51 B2 30 00 16 0A 4A |ER."...@.Q.0...J|
00000200: 01 81 58 B2 31 A4 4E AB 41 AA 34 3A 81 59 B2 31 |..X.1.N.A.4:.Y.1|
00000210: A4 4E AB 41 AA 34 00 34 0A 54 01 8B 58 B1 B2 41 |.N.A.4.4.T..X..A|
00000220: AF 59 B1 B2 41 A7 41 28 58 2C 59 29 B2 54 45 3A |.Y..A.A(X,Y).TE:|
00000230: 89 33 38 30 00 67 0A 5E 01 52 B2 41 28 58 AA 31 |.380.g.^.R.A(X.1|
00000240: 2C 59 29 AA 41 28 58 AB 31 2C 59 29 AA 41 28 58 |,Y).A(X.1,Y).A(X|
00000250: 2C 59 AA 31 29 AA 41 28 58 2C 59 AB 31 29 AB 34 |,Y.1).A(X,Y.1).4|
00000260: AC 41 28 58 2C 59 29 00 7C 0A 6B 01 A1 43 24 3A |.A(X,Y).|.k..C$:|
00000270: 8B 43 24 B2 22 53 22 A7 31 31 32 30 00 92 0A 72 |.C$."S".1120...r|
00000280: 01 41 28 58 2C 59 29 B2 41 28 58 2C 59 29 AA 52 |.A(X,Y).A(X,Y).R|
00000290: AD 34 00 A2 0A 77 01 8B B6 28 52 29 B1 31 A7 51 |.4...w...(R).1.Q|
000002A0: B2 31 00 AC 0A 7C 01 82 59 3A 82 58 00 B9 0A 86 |.1...|..Y:.X....|
000002B0: 01 8B 51 B2 31 A7 33 31 35 00 C3 0A 8B 01 89 31 |..Q.1.315......1|
000002C0: 31 32 30 00 EB 0A 90 01 8F 2A 2A 2A 2A 2A 2A 2A |120......*******|
000002D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000002E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 F4 0A 9A 01 |***********.....|
000002F0: 99 22 93 22 00 01 0B A4 01 81 58 B2 30 A4 41 AA |."."......X.0.A.|
00000300: 34 00 07 0B AE 01 99 00 14 0B B8 01 81 59 B2 30 |4............Y.0|
00000310: A4 41 AA 34 00 28 0B C2 01 54 24 B2 C4 28 B5 28 |.A.4.(...T$..(.(|
00000320: 41 28 58 2C 59 29 29 29 00 45 0B CC 01 8B C3 28 |A(X,Y))).E.....(|
00000330: 54 24 29 B2 32 A7 54 24 B2 22 20 30 22 AA C9 28 |T$).2.T$." 0"..(|
00000340: 54 24 2C 31 29 00 4E 0B D6 01 99 54 24 3B 00 58 |T$,1).N....T$;.X|
00000350: 0B E0 01 82 59 3A 82 58 00 65 0B E5 01 8B 48 44 |....Y:.X.e....HD|
00000360: B2 31 A7 20 8E 00 6F 0B EA 01 89 31 31 32 30 00 |.1. ..o....1120.|
00000370: 97 0B F4 01 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.....***********|
00000380: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000390: 2A 2A 2A 2A 2A 2A 2A 00 A0 0B F9 01 48 44 B2 31 |*******.....HD.1|
000003A0: 00 AC 0B FE 01 9F 34 2C 34 3A 9D 34 00 B5 0B 08 |......4,4:.4....|
000003B0: 02 8D 34 30 30 00 C4 0B 26 02 48 44 B2 30 3A 98 |..400...&.HD.0:.|
000003C0: 34 3A A0 34 00 CE 0B 44 02 89 31 31 32 30 00 F6 |4:.4...D..1120..|
000003D0: 0B 58 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.X..************|
000003E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000003F0: 2A 2A 2A 2A 2A 2A 00 23 0C 5D 02 99 22 93 11 11 |******.#.].."...|
00000400: 11 11 1D 1D 1D 1D 42 45 52 45 47 4E 49 4E 47 20 |......BEREGNING |
00000410: 41 46 20 56 41 52 4D 45 47 45 4E 4E 45 4D 47 41 |AF VARMEGENNEMGA|
00000420: 4E 47 22 00 2F 0C 62 02 53 B2 30 3A 54 B2 30 00 |NG"./.b.S.0:T.0.|
00000430: 41 0C 6C 02 81 58 B2 31 A4 41 3A 81 59 B2 58 A4 |A.l..X.1.A:.Y.X.|
00000440: 41 00 59 0C 80 02 54 B2 54 AA 41 28 58 2C 59 29 |A.Y...T.T.A(X,Y)|
00000450: AB 41 28 58 AB 31 2C 59 29 00 6D 0C 94 02 82 59 |.A(X.1,Y).m....Y|
00000460: 3A 53 B2 53 AA 54 3A 54 B2 30 3A 82 58 00 92 0C |:S.S.T:T.0:.X...|
00000470: 9E 02 99 22 11 11 11 1D 1D 1D 56 41 52 4D 45 20 |..."......VARME |
00000480: 20 51 3D 4C 41 4D 42 44 41 2A 4C 2A 22 53 AD 41 | Q=LAMBDA*L*"S.A|
00000490: AC 32 00 9C 0C A8 02 89 31 31 32 30 00 C4 0C BC |.2......1120....|
000004A0: 02 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
000004B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000004C0: 2A 2A 2A 2A 00 E4 0C BF 02 85 22 11 11 11 1D 1D |****......".....|
000004D0: 1D 54 59 4B 4B 45 4C 53 45 20 44 54 20 20 3A 20 |.TYKKELSE DT : |
000004E0: 22 3B 44 54 00 EE 0C C1 02 64 01 36 2C 37 00 04 |";DT.....d.6,7..|
000004F0: 0D C4 02 53 31 B2 33 30 3A 53 32 B2 32 30 3A 53 |...S1.30:S2.20:S|
00000500: 33 B2 31 30 00 16 0D C6 02 50 58 B2 33 31 30 3A |3.10.....PX.310:|
00000510: 50 59 B2 31 39 30 00 27 0D C8 02 8F 3A 20 47 4F |PY.190.'....: GO|
00000520: 53 55 42 32 30 39 30 00 3B 0D CB 02 81 58 B2 30 |SUB2090.;....X.0|
00000530: A4 20 41 3A 81 59 B2 30 A4 20 41 00 48 0D D7 02 |. A:.Y.0. A.H...|
00000540: 54 B2 41 28 58 2C 59 29 00 5E 0D DA 02 8B B6 28 |T.A(X,Y).^.....(|
00000550: 54 AB 53 31 29 B3 44 54 A7 8D 32 30 30 30 00 74 |T.S1).DT..2000.t|
00000560: 0D DC 02 8B B6 28 54 AB 53 32 29 B3 44 54 A7 8D |.....(T.S2).DT..|
00000570: 32 30 30 30 00 8A 0D DE 02 8B B6 28 54 AB 53 33 |2000.......(T.S3|
00000580: 29 B3 44 54 A7 8D 32 30 30 30 00 94 0D 0C 03 82 |).DT..2000......|
00000590: 59 3A 82 58 00 A7 0D 11 03 A1 43 24 3A 8B 43 24 |Y:.X......C$:.C$|
000005A0: B2 22 22 A7 37 38 35 00 BB 0D 12 03 8B 43 24 B2 |."".785......C$.|
000005B0: 22 48 22 20 A7 20 8D 33 30 30 30 00 C5 0D 16 03 |"H" . .3000.....|
000005C0: 89 31 31 32 30 00 EE 0D E8 03 99 22 93 11 11 1D |.1120......"....|
000005D0: 1D 1D 1D 4E 59 20 4E 45 54 2D 49 4E 44 44 45 4C |...NY NET-INDDEL|
000005E0: 49 4E 47 20 20 20 20 20 20 20 20 20 31 22 00 15 |ING 1"..|
000005F0: 0E F2 03 99 22 11 1D 1D 1D 1D 53 4C 55 4D 50 20 |....".....SLUMP |
00000600: 54 45 4D 50 45 52 41 54 55 52 45 52 20 20 20 20 |TEMPERATURER |
00000610: 20 20 20 32 22 00 3C 0E FC 03 99 22 11 1D 1D 1D | 2".<...."....|
00000620: 1D 42 45 52 45 47 4E 20 54 45 4D 50 45 52 41 54 |.BEREGN TEMPERAT|
00000630: 55 52 45 52 20 20 20 20 20 20 33 22 00 63 0E 06 |URER 3".c..|
00000640: 04 99 22 11 1D 1D 1D 1D 54 45 4D 50 2E 20 55 44 |..".....TEMP. UD|
00000650: 53 4B 52 49 46 54 20 2F 20 53 4B 41 45 52 4D 20 |SKRIFT / SKAERM |
00000660: 20 34 22 00 8A 0E 10 04 99 22 11 1D 1D 1D 1D 54 | 4"......".....T|
00000670: 45 4D 50 2E 20 55 44 53 4B 52 49 46 54 20 2F 20 |EMP. UDSKRIFT / |
00000680: 50 52 49 4E 54 45 52 20 35 22 00 B1 0E 1A 04 99 |PRINTER 5"......|
00000690: 22 11 1D 1D 1D 1D 42 45 52 45 47 4E 20 56 41 52 |".....BEREGN VAR|
000006A0: 4D 45 2D 53 54 52 30 4D 20 20 20 20 20 20 20 36 |ME-STR0M 6|
000006B0: 22 00 D8 0E 24 04 99 22 11 1D 1D 1D 1D 49 53 4F |"...$..".....ISO|
000006C0: 54 45 52 4D 45 52 20 50 41 41 20 50 52 49 4E 54 |TERMER PAA PRINT|
000006D0: 45 52 20 20 20 20 37 22 00 EC 0E 4C 04 A1 43 24 |ER 7"...L..C$|
000006E0: 3A 8B 43 24 B2 22 22 A7 31 31 30 30 00 0A 0F 51 |:.C$."".1100...Q|
000006F0: 04 8B 28 43 24 B1 B2 22 31 22 AF 43 24 B3 B2 22 |..(C$.."1".C$.."|
00000700: 37 22 29 B2 30 A7 31 30 30 30 00 32 0F 56 04 91 |7").0.1000.2.V..|
00000710: C5 28 43 24 29 89 20 32 30 30 2C 31 30 30 2C 33 |.(C$). 200,100,3|
00000720: 30 30 2C 34 30 30 2C 35 30 30 2C 36 30 30 2C 37 |00,400,500,600,7|
00000730: 30 30 00 4D 0F 60 04 99 3A 99 22 11 1D 1D 1D 54 |00.M.`..:."....T|
00000740: 52 59 4B 20 45 4E 20 54 41 53 54 45 22 00 61 0F |RYK EN TASTE".a.|
00000750: 6A 04 A1 43 24 3A 8B 43 24 B2 22 22 A7 31 31 33 |j..C$:.C$."".113|
00000760: 30 00 6B 0F 74 04 89 31 30 30 30 00 82 0F D0 07 |0.k.t..1000.....|
00000770: 64 02 20 58 AC 50 58 AD 41 2C 59 AC 50 59 AD 41 |d. X.PX.A,Y.PY.A|
00000780: 2C 31 00 88 0F D1 07 8E 00 9D 0F 2A 08 50 B2 2E |,1.........*.P..|
00000790: 35 AC 50 4B 54 3A 4D B2 35 3A 46 B2 31 00 AF 0F |5.PKT:M.5:F.1...|
000007A0: 34 08 64 03 20 4D 2C 50 4B 2C 4D 2C 4D 2C 46 00 |4.d. M,PK,M,M,F.|
000007B0: C1 0F 36 08 64 03 20 4D 2C 4D 2C 50 4B 2C 4D 2C |..6.d. M,M,PK,M,|
000007C0: 46 00 D3 0F 38 08 64 03 20 50 2C 50 4B 2C 50 2C |F...8.d. P,PK,P,|
000007D0: 50 2C 46 00 E5 0F 3A 08 64 03 20 50 2C 50 2C 50 |P,F...:.d. P,P,P|
000007E0: 4B 2C 50 2C 46 00 EB 0F 3E 08 8E 00 F2 0F B8 0B |K,P,F...>.......|
000007F0: 64 77 00 F8 0F C2 0B 8E 00 00 00 |dw......... |
.......1000.3.D..***********************
***********.V.I.."........SLUMPER TEMERA
TURER".L.N..X.0.A.4:.Y.0.A.4...X..X.0.Y.
0.A(X,Y).TU:.180......X..A.Y..A.A(X,Y).T
E:.180.E....Y.X.A(X,Y).TU.(TU.TE).A.X...
...X.Y.A(X,Y).TU.(TU.TE).A.Y... ..X.Y.A(
X,Y).TU.(TU.TE).A.Y......Y:.X......1120.
?.G..**********************************.
^.H..:."..........OPGIV N";:.N.Q.J.."...
..TU=";TU...K..".....TE=";TE...M.A.N.2:.
A(74,74):.1120.F.,..********************
**************.O.6.."."...;..".......BER
EGNER TEMPERATURER."...@.Q.0...J..X.1.N.
A.4:.Y.1.N.A.4.4.T..X..A.Y..A.A(X,Y).TE:
.380.G.^.R.A(X.1,Y).A(X.1,Y).A(X,Y.1).A(
X,Y.1).4.A(X,Y).|.K..C$:.C$."S".1120...R
.A(X,Y).A(X,Y).R.4...W...(R).1.Q.1...|..
Y:.X......Q.1.315.C....1120......*******
***************************......"."....
..X.0.A.4............Y.0.A.4.(.B.T$.D(.(
A(X,Y))).E.L..C(T$).2.T$." 0".I(T$,1).N.
V..T$;.X....Y:.X.E....HD.1. ..O....1120.
.....**********************************.
...HD.1......4,4:.4......400.D.&.HD.0:.
4: 4.N.D..1120...X..********************
**************.#.]..".........BEREGNING
AF VARMEGENNEMGANG"./.B.S.0:T.0.A.L..X.1
.A:.Y.X.A.Y...T.T.A(X,Y).A(X.1,Y).M....Y
:S.S.T:T.0:.X......"......VARME Q=LAMBD
A*L*"S.A.2......1120.D....**************
********************......"......TYKKELS
E DT : ";DT...A.D.6,7...D.S1.30:S2.20:S
3.10...F.PX.310:PY.190.'.H..: GOSUB2090.
;.K..X.0. A:.Y.0. A.H.W.T.A(X,Y).^.Z...(
T.S1).DT..2000.T.....(T.S2).DT..2000....
...(T.S3).DT..2000......Y:.X......C$:.C$
."".785......C$."H" . .3000.E....1120...
...".......NY NET-INDDELING 1"..
....".....SLUMP TEMPERATURER 2".<.
...".....BEREGN TEMPERATURER 3".C..
..".....TEMP. UDSKRIFT / SKAERM 4".....
.".....TEMP. UDSKRIFT / PRINTER 5"......
".....BEREGN VARME-STR0M 6".X.$.."
.....ISOTERMER PAA PRINTER 7"...L..C$
:.C$."".1100...Q..(C$.."1".C$.."7").0.10
00.2.V..E(C$). 200,100,300,400,500,600,7
00.M.`..:."....TRYK EN TASTE".A.J..C$:.C
$."".1130.K.T..1000...P.D. X.PX.A,Y.PY.A
,1...Q.....*.P..5.PKT:M.5:F.1...4.D. M,P
K,M,M,F.A.6.D. M,M,PK,M,F.S.8.D. P,PK,P,
P,F...:.D. P,P,PK,P,F...>.......DW...B..
...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL