> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 0A 00 8F 20 2B 2B 2B 20 20 20 20 20 |..'.... +++ |
00000010: 46 52 55 45 48 54 45 4D 50 45 52 41 54 55 52 20 |FRUEHTEMPERATUR |
00000020: 20 20 20 20 2B 2B 2B 00 4D 08 0B 00 8F 20 2B 2B | +++.M.... ++|
00000030: 2B 20 4D 41 44 45 20 42 59 20 50 45 54 45 52 20 |+ MADE BY PETER |
00000040: 53 4D 45 4A 4B 41 4C 20 20 20 2B 2B 2B 00 75 08 |SMEJKAL +++.u.|
00000050: 14 00 86 20 4D 28 31 32 29 3A 99 C7 28 38 29 22 |... M(12):..(8)"|
00000060: 0E 05 22 3A 97 35 33 32 38 30 2C 30 3A 97 35 33 |..":.53280,0:.53|
00000070: 32 38 31 2C 30 00 88 08 1E 00 8F 20 44 45 46 49 |281,0...... DEFI|
00000080: 4E 49 54 49 4F 4E 45 4E 00 B1 08 28 00 83 20 30 |NITIONEN...(.. 0|
00000090: 2C 33 31 2C 32 38 2C 33 31 2C 33 30 2C 33 31 2C |,31,28,31,30,31,|
000000A0: 33 30 2C 33 31 2C 33 31 2C 33 30 2C 33 31 2C 33 |30,31,31,30,31,3|
000000B0: 30 00 E5 08 32 00 83 20 22 D7 49 4E 44 53 54 49 |0...2.. ".INDSTI|
000000C0: 4C 4C 45 20 20 20 20 20 20 20 20 22 2C 30 2C 22 |LLE ",0,"|
000000D0: 4C 45 49 43 48 54 45 52 20 D7 49 4E 44 20 20 20 |LEICHTER .IND |
000000E0: 20 20 22 2C 37 00 1B 09 3C 00 83 20 22 4D 41 45 | ",7...<.. "MAE|
000000F0: 53 53 49 47 45 52 20 D7 49 4E 44 20 20 20 20 22 |SSIGER .IND "|
00000100: 2C 31 35 2C 22 53 54 41 52 4B 45 52 20 D7 49 4E |,15,"STARKER .IN|
00000110: 44 20 20 20 20 20 20 22 2C 33 30 00 50 09 46 00 |D ",30.P.F.|
00000120: 83 20 22 57 4F 4C 4B 45 4E 4C 4F 53 20 20 20 20 |. "WOLKENLOS |
00000130: 20 20 20 20 20 22 2C 31 2C 22 4C 45 49 43 48 54 | ",1,"LEICHT|
00000140: 20 42 45 57 4F 45 4C 4B 54 20 20 20 22 2C 2E 39 | BEWOELKT ",.9|
00000150: 00 86 09 50 00 83 20 22 53 54 41 52 4B 20 42 45 |...P.. "STARK BE|
00000160: 57 4F 45 4C 4B 54 20 20 20 20 22 2C 2E 36 2C 22 |WOELKT ",.6,"|
00000170: 54 49 45 46 45 20 D2 45 47 45 4E 57 4F 4C 4B 45 |TIEFE .EGENWOLKE|
00000180: 4E 20 22 2C 2E 33 00 98 09 5A 00 55 47 B2 34 AC |N ",.3...Z.UG.4.|
00000190: C1 28 31 29 AD 31 38 30 00 C1 09 64 00 96 20 A5 |.(1).180...d.. .|
000001A0: 44 41 28 54 41 29 B2 32 33 2E 35 AC BF 28 28 2E |DA(TA).23.5..((.|
000001B0: 39 38 36 AC 54 41 AB 37 38 2E 38 38 29 AC 55 47 |986.TA.78.88).UG|
000001C0: 29 00 CE 09 6E 00 50 48 49 B2 34 38 2E 33 00 DD |)...n.PHI.48.3..|
000001D0: 09 78 00 81 20 49 B2 31 20 A4 20 31 32 00 E8 09 |.x.. I.1 . 12...|
000001E0: 82 00 87 20 4D 28 49 29 00 F0 09 8C 00 82 20 49 |... M(I)...... I|
000001F0: 00 FE 09 96 00 81 20 49 B2 31 20 A4 20 34 00 0F |...... I.1 . 4..|
00000200: 0A A0 00 87 20 57 24 28 49 29 2C 57 28 49 29 00 |.... W$(I),W(I).|
00000210: 17 0A AA 00 82 20 49 00 25 0A B4 00 81 20 49 B2 |..... I.%.... I.|
00000220: 31 20 A4 20 34 00 36 0A BE 00 87 20 42 24 28 49 |1 . 4.6.... B$(I|
00000230: 29 2C 42 28 49 29 00 3E 0A C8 00 82 20 49 00 48 |),B(I).>.... I.H|
00000240: 0A D2 00 89 20 35 38 30 00 70 0A DC 00 8F 20 53 |.... 580.p.... S|
00000250: 55 42 20 53 43 48 52 49 46 54 20 41 4E 20 42 49 |UB SCHRIFT AN BI|
00000260: 4C 44 53 43 48 49 52 4D 50 4F 53 49 54 49 4F 4E |LDSCHIRMPOSITION|
00000270: 00 8C 0A E6 00 97 20 37 38 31 2C 59 3A 97 20 37 |...... 781,Y:. 7|
00000280: 38 32 2C 58 3A 97 20 37 38 33 2C 30 00 A7 0A F0 |82,X:. 783,0....|
00000290: 00 9E 20 36 35 35 32 30 3A 8F 20 53 45 54 5A 45 |.. 65520:. SETZE|
000002A0: 20 43 55 52 53 4F 52 00 B0 0A FA 00 99 20 4D 24 | CURSOR...... M$|
000002B0: 00 B6 0A 04 01 8E 00 C8 0A 0E 01 8F 20 53 55 42 |............ SUB|
000002C0: 20 41 42 46 52 41 47 45 00 D0 0A 18 01 58 B2 32 | ABFRAGE.....X.2|
000002D0: 00 DA 0A 22 01 8D 20 32 32 30 00 ED 0A 2C 01 4D |...".. 220...,.M|
000002E0: 24 B2 22 4A 20 4F 44 45 52 20 4E 3F 22 00 F6 0A |$."J ODER N?"...|
000002F0: 36 01 58 B2 32 30 00 00 0B 40 01 8D 20 32 32 30 |6.X.20...@.. 220|
00000300: 00 0B 0B 4A 01 A1 20 4B 45 59 24 00 1F 0B 54 01 |...J.. KEY$...T.|
00000310: 8B 20 4B 45 59 24 B2 22 22 20 A7 20 33 33 30 00 |. KEY$."" . 330.|
00000320: 25 0B 5E 01 8E 00 3B 0B 68 01 8F 20 53 55 42 20 |%.^...;.h.. SUB |
00000330: 53 4F 4E 4E 45 4E 44 41 54 45 4E 00 5F 0B 72 01 |SONNENDATEN._.r.|
00000340: 85 22 C4 41 54 55 4D 20 28 D4 41 47 2C 20 CD 4F |.".ATUM (.AG, .O|
00000350: 4E 41 54 29 20 20 20 20 22 3B 54 41 2C 4D 4F 00 |NAT) ";TA,MO.|
00000360: 68 0B 7C 01 4D 4E B2 30 00 78 0B 86 01 81 20 4D |h.|.MN.0.x.... M|
00000370: 49 B2 31 20 A4 20 4D 4F 00 88 0B 90 01 4D 4E B2 |I.1 . MO.....MN.|
00000380: 4D 4E AA 4D 28 4D 49 29 00 91 0B 9A 01 82 20 4D |MN.M(MI)...... M|
00000390: 49 00 9E 0B A4 01 54 41 B2 54 41 AA 4D 4E 00 C0 |I.....TA.TA.MN..|
000003A0: 0B AE 01 43 41 B2 AB 28 C0 28 50 48 49 AC 55 47 |...CA..(.(PHI.UG|
000003B0: 29 AC C0 28 A5 44 41 28 54 41 29 AC 55 47 29 29 |)..(.DA(TA).UG))|
000003C0: 00 C9 0B B8 01 57 41 B2 30 00 DA 0B C2 01 8B 20 |.....WA.0...... |
000003D0: 43 41 B3 30 20 A7 20 34 39 30 00 EC 0B CC 01 8B |CA.0 . 490......|
000003E0: 20 43 41 B3 B1 30 20 A7 20 35 30 30 00 F6 0B D6 | CA..0 . 500....|
000003F0: 01 4E 4C B2 31 32 00 00 0C E0 01 89 20 35 31 30 |.NL.12...... 510|
00000400: 00 0B 0C EA 01 57 41 B2 31 38 30 00 36 0C F4 01 |.....WA.180.6...|
00000410: 4E 4C B2 32 34 AB 28 32 AC 28 57 41 AA 28 C1 28 |NL.24.(2.(WA.(.(|
00000420: BA 28 31 AB 43 41 AE 32 29 AD 43 41 29 AD 55 47 |.(1.CA.2).CA).UG|
00000430: 29 29 AD 31 35 29 00 42 0C FE 01 53 41 B2 4E 4C |)).15).B...SA.NL|
00000440: AD 32 00 4F 0C 08 02 41 53 B2 B5 28 53 41 29 00 |.2.O...AS..(SA).|
00000450: 64 0C 12 02 41 4D B2 B5 28 28 53 41 AB 41 53 29 |d...AM..((SA.AS)|
00000460: AC 36 30 29 00 71 0C 1C 02 53 55 B2 32 34 AB 53 |.60).q...SU.24.S|
00000470: 41 00 7E 0C 26 02 55 53 B2 B5 28 53 55 29 00 93 |A.~.&.US..(SU)..|
00000480: 0C 30 02 55 4D B2 B5 28 28 53 55 AB 55 53 29 AC |.0.UM..((SU.US).|
00000490: 36 30 29 00 99 0C 3A 02 8E 00 AD 0C 44 02 8F 20 |60)...:.....D.. |
000004A0: 48 41 55 50 54 50 52 4F 47 52 41 4D 4D 00 BF 0C |HAUPTPROGRAMM...|
000004B0: 4E 02 9E 20 35 38 36 39 32 3A 8F 20 43 4C 53 00 |N.. 58692:. CLS.|
000004C0: E9 0C 58 02 99 20 22 20 20 20 20 20 20 C6 52 55 |..X.. " .RU|
000004D0: 45 48 54 45 4D 50 45 52 41 54 55 52 45 4E 20 46 |EHTEMPERATUREN F|
000004E0: 55 45 52 20 D7 49 45 4E 22 00 15 0D 5D 02 99 20 |UER .IEN"...].. |
000004F0: 22 20 20 20 20 20 20 A3 A3 A3 A3 A3 A3 A3 A3 A3 |" .........|
00000500: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00000510: A3 A3 22 3A 99 00 1F 0D 62 02 8D 20 33 36 30 00 |..":....b.. 360.|
00000520: 5A 0D 6C 02 99 3A 99 22 CD 45 53 53 55 4E 47 20 |Z.l..:.".ESSUNG |
00000530: 42 45 49 22 3A 99 22 D3 4F 4E 4E 45 4E 55 4E 54 |BEI":.".ONNENUNT|
00000540: 45 52 47 41 4E 47 20 28 57 4F 5A 29 3A 22 3B 55 |ERGANG (WOZ):";U|
00000550: 53 3B 22 48 22 3B 55 4D 3A 99 00 7B 0D 76 02 85 |S;"H";UM:..{.v..|
00000560: 20 22 D4 45 4D 50 45 52 41 54 55 52 20 28 C7 52 | ".EMPERATUR (.R|
00000570: 41 44 20 C3 29 20 20 22 3B 54 54 00 9D 0D 80 02 |AD .) ";TT.....|
00000580: 85 20 22 52 45 4C 2E 20 C6 45 55 43 48 54 45 20 |. "REL. .EUCHTE |
00000590: 28 50 52 4F 5A 2E 29 20 20 22 3B 52 46 00 B7 0D |(PROZ.) ";RF...|
000005A0: 8A 02 59 B2 31 31 3A 8F 20 55 4E 54 45 52 53 54 |..Y.11:. UNTERST|
000005B0: 45 20 5A 45 49 4C 45 00 BF 0D 94 02 49 B2 30 00 |E ZEILE.....I.0.|
000005C0: D2 0D 9E 02 49 B2 49 AA 31 3A 4D 24 B2 57 24 28 |....I.I.1:M$.W$(|
000005D0: 49 29 00 DE 0D A8 02 57 49 B2 57 28 49 29 00 E8 |I).....WI.W(I)..|
000005E0: 0D B2 02 8D 20 32 37 30 00 FD 0D BC 02 8B 20 4B |.... 270...... K|
000005F0: 45 59 24 B2 22 4A 22 20 A7 20 37 33 30 00 0F 0E |EY$."J" . 730...|
00000600: C6 02 8B 20 57 49 B2 33 30 20 A7 20 36 36 30 00 |... WI.30 . 660.|
00000610: 22 0E D0 02 8B 20 57 49 B3 B1 33 30 20 A7 20 36 |".... WI..30 . 6|
00000620: 37 30 00 35 0E DA 02 4D 24 B2 22 20 20 20 20 20 |70.5...M$." |
00000630: 20 20 20 20 22 00 3F 0E E4 02 8D 20 32 32 30 00 | ".?.... 220.|
00000640: 59 0E EE 02 59 B2 31 33 3A 8F 20 55 4E 54 45 52 |Y...Y.13:. UNTER|
00000650: 53 54 45 20 5A 45 49 4C 45 00 61 0E F8 02 49 B2 |STE ZEILE.a...I.|
00000660: 30 00 74 0E 02 03 49 B2 49 AA 31 3A 4D 24 B2 42 |0.t...I.I.1:M$.B|
00000670: 24 28 49 29 00 80 0E 0C 03 57 4B B2 42 28 49 29 |$(I).....WK.B(I)|
00000680: 00 8A 0E 16 03 8D 20 32 37 30 00 9F 0E 20 03 8B |...... 270... ..|
00000690: 20 4B 45 59 24 B2 22 4A 22 20 A7 20 38 33 30 00 | KEY$."J" . 830.|
000006A0: B1 0E 2A 03 8B 20 57 4B B2 2E 33 20 A7 20 37 36 |..*.. WK..3 . 76|
000006B0: 30 00 C4 0E 34 03 8B 20 57 4B B3 B1 2E 33 20 A7 |0...4.. WK...3 .|
000006C0: 20 37 37 30 00 D7 0E 3E 03 4D 24 B2 22 20 20 20 | 770...>.M$." |
000006D0: 20 20 20 20 20 20 22 00 E1 0E 48 03 8D 20 32 32 | "...H.. 22|
000006E0: 30 00 F7 0E 52 03 46 56 B2 BD 28 33 2E 33 AB 57 |0...R.FV..(3.3.W|
000006F0: 49 AC 2E 30 37 33 29 00 21 0F 5C 03 46 46 B2 33 |I..073).!.\.FF.3|
00000700: 35 36 2E 36 AD 28 54 54 AA 32 37 33 2E 31 35 29 |56.6.(TT.273.15)|
00000710: AB 28 2E 30 36 36 AC BC 28 52 46 29 29 AB 2E 37 |.(.066..(RF))..7|
00000720: 35 00 54 0F 66 03 54 4D 49 4E B2 54 54 AB 28 BA |5.T.f.TMIN.TT.(.|
00000730: 28 4E 4C 29 AC 38 2E 32 45 AB 31 31 AC 28 54 54 |(NL).8.2E.11.(TT|
00000740: AA 32 37 33 2E 31 35 29 AE 34 AC 57 4B AC 46 46 |.273.15).4.WK.FF|
00000750: AC 46 56 29 00 86 0F 70 03 99 3A 99 22 A6 A6 A6 |.FV)...p..:."...|
00000760: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00000770: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00000780: A6 A6 A6 A6 A6 22 00 B3 0F 7A 03 99 22 20 20 20 |....."...z.." |
00000790: 20 D3 4F 4E 4E 45 4E 41 55 46 47 41 4E 47 20 28 | .ONNENAUFGANG (|
000007A0: 57 4F 5A 29 3A 20 20 20 22 3B 41 53 3B 22 48 22 |WOZ): ";AS;"H"|
000007B0: 3B 41 4D 00 E2 0F 84 03 99 22 20 20 20 20 D4 45 |;AM......" .E|
000007C0: 4D 50 45 52 41 54 55 52 20 28 C7 52 41 44 20 C3 |MPERATUR (.RAD .|
000007D0: 29 3A 20 20 20 22 3B B5 28 54 4D 49 4E AA 30 2E |): ";.(TMIN.0.|
000007E0: 35 29 00 16 10 8E 03 99 3A 99 22 A6 A6 A6 A6 A6 |5)......:.".....|
000007F0: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00000800: A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 A6 |................|
00000810: A6 A6 A6 22 3A 99 00 32 10 98 03 99 20 22 57 45 |...":..2.... "WE|
00000820: 49 54 45 52 20 4D 49 54 20 12 D2 C5 D4 D5 D2 CE |ITER MIT .......|
00000830: 92 22 00 4C 10 A2 03 85 22 C5 4E 44 45 20 4D 49 |.".L....".NDE MI|
00000840: 54 20 4E 20 20 20 20 20 22 3B 41 24 00 60 10 AC |T N ";A$.`..|
00000850: 03 8B 20 41 24 B3 B1 22 4E 22 20 A7 20 35 38 30 |.. A$.."N" . 580|
00000860: 00 00 00 |... |
..'.... +++ FRUEHTEMPERATUR +++.
M.... +++ MADE BY PETER SMEJKAL +++.U.
... M(12):.G(8)"..":.53280,0:.53281,0...
... DEFINITIONEN...(.. 0,31,28,31,30,31,
30,31,31,30,31,30...2.. "WINDSTILLE
",0,"LEICHTER WIND ",7...<.. "MAE
SSIGER WIND ",15,"STARKER WIND "
,30.P.F.. "WOLKENLOS ",1,"LEICHT
BEWOELKT ",.9...P.. "STARK BEWOELKT
",.6,"TIEFE REGENWOLKEN ",.3...Z.UG.4.
A(1).180.A.D.. .DA(TA).23.5..((.986.TA.7
8.88).UG).N.N.PHI.48.3...X.. I.1 . 12...
... M(I)...... I...... I.1 . 4... .. W$(
I),W(I)...... I.%.... I.1 . 4.6.... B$(I
),B(I).>.H.. I.H.R.. 580.P.... SUB SCHRI
FT AN BILDSCHIRMPOSITION...... 781,Y:. 7
82,X:. 783,0...... 65520:. SETZE CURSOR.
..... M$.......H.... SUB ABFRAGE.P...X.2
.Z.".. 220...,.M$."J ODER N?"...6.X.20..
.@.. 220...J.. KEY$...T.. KEY$."" . 330.
%.^...;.H.. SUB SONNENDATEN._.R.."DATUM
(TAG, MONAT) ";TA,MO.H.|.MN.0.X.... M
I.1 . MO.....MN.MN.M(MI)...... MI.....TA
.TA.MN.....CA..(.(PHI.UG)..(.DA(TA).UG))
.I...WA.0.Z.B.. CA.0 . 490...L.. CA..0 .
500...V.NL.12...... 510.....WA.180.6...
NL.24.(2.(WA.(A(.(1.CA.2).CA).UG)).15).B
...SA.NL.2.O...AS..(SA).D...AM..((SA.AS)
.60).Q...SU.24.SA.~.&.US..(SU)...0.UM..(
(SU.US).60)...:.....D.. HAUPTPROGRAMM...
N.. 58692:. CLS...X.. " FRUEHTEMPER
ATUREN FUER WIEN"...].. " .........
..................":....B.. 360.Z.L..:."
MESSUNG BEI":."SONNENUNTERGANG (WOZ):";U
S;"H";UM:..{.V.. "TEMPERATUR (GRAD C) "
;TT...... "REL. FEUCHTE (PROZ.) ";RF...
..Y.11:. UNTERSTE ZEILE.....I.0.R...I.I.
1:M$.W$(I).....WI.W(I)...... 270...... K
EY$."J" . 730...F.. WI.30 . 660.".P.. WI
..30 . 670.5.Z.M$." ".?.... 220.
Y...Y.13:. UNTERSTE ZEILE.A...I.0.T...I.
I.1:M$.B$(I).....WK.B(I)...... 270... ..
KEY$."J" . 830...*.. WK..3 . 760.D.4..
WK...3 . 770.W.>.M$." "...H.. 22
0...R.FV..(3.3.WI..073).!.\.FF.356.6.(TT
.273.15).(.066..(RF))..75.T.F.TMIN.TT.(.
(NL).8.2E.11.(TT.273.15).4.WK.FF.FV)...P
..:."...................................
....."...Z.." SONNENAUFGANG (WOZ):
";AS;"H";AM......" TEMPERATUR (GRAD C
): ";.(TMIN.0.5)......:.".............
...........................":..2.... "WE
ITER MIT .RETURN.".L...."ENDE MIT N
";A$.`.... A$.."N" . 580...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL