SUNRISE DK
FILE INFORMATION
FILENAME(S): SUNRISE DK
FILE TYPE(S): PRG
FILE SIZE: 4.3K
FIRST SEEN: 2025-11-30 19:36:45
APPEARS ON: 1 disk(s)
FILE HASH
078b43c0c3ada34bc0cbdd25822405e93d092558681504119f672fb4ac232c65
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| JBR C64 RADIO MM | SUNRISE DK | PRG | Curtcool, Bo | 3 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 4D 08 05 00 8F 20 20 44 45 54 54 45 20 50 |..M.... DETTE P|
00000010: 52 4F 47 52 41 4D 20 4B 41 4E 20 42 45 52 45 47 |ROGRAM KAN BEREG|
00000020: 4E 45 20 53 4F 4C 20 4F 50 20 20 4F 47 20 53 4F |NE SOL OP OG SO|
00000030: 4C 4E 45 44 47 41 4E 47 53 54 49 44 45 52 20 46 |LNEDGANGSTIDER F|
00000040: 4F 52 20 45 54 20 48 56 49 4C 4B 45 54 00 8C 08 |OR ET HVILKET...|
00000050: 06 00 8F 20 20 53 4F 4D 20 48 45 4C 53 54 20 53 |... SOM HELST S|
00000060: 54 45 44 20 4F 47 20 46 4F 52 20 45 54 20 56 49 |TED OG FOR ET VI|
00000070: 4C 4B 41 41 52 4C 49 47 54 20 56 41 4C 47 54 20 |LKAARLIGT VALGT |
00000080: 20 41 4E 54 41 4C 20 44 41 47 45 2E 00 C3 08 07 | ANTAL DAGE.....|
00000090: 00 8F 20 20 52 45 54 54 45 54 20 4C 49 44 54 20 |.. RETTET LIDT |
000000A0: 54 49 4C 20 41 46 20 20 4F 5A 31 42 4D 57 2F 4A |TIL AF OZ1BMW/J|
000000B0: 42 52 20 20 20 20 20 20 20 20 20 20 30 37 4A 41 |BR 07JA|
000000C0: 4E 38 36 00 D0 08 08 00 9F 31 35 2C 38 2C 31 35 |N86......15,8,15|
000000D0: 00 DD 08 0A 00 99 20 C7 28 31 34 37 29 00 06 09 |...... .(147)...|
000000E0: 12 00 42 31 24 B2 22 42 45 52 45 47 4E 49 4E 47 |..B1$."BEREGNING|
000000F0: 20 41 46 20 53 4F 4C 20 4F 50 20 4F 47 20 4E 45 | AF SOL OP OG NE|
00000100: 44 47 41 4E 47 22 00 2C 09 14 00 42 32 24 B2 22 |DGANG".,...B2$."|
00000110: 46 4F 52 20 45 54 20 48 56 45 52 54 20 53 54 45 |FOR ET HVERT STE|
00000120: 44 20 50 5D 20 4A 4F 52 44 45 4E 22 00 51 09 16 |D P] JORDEN".Q..|
00000130: 00 99 20 22 20 20 20 20 20 22 3B 42 31 24 3A 99 |.. " ";B1$:.|
00000140: 22 11 20 20 20 20 20 20 22 3B 42 32 24 3A 99 3A |". ";B2$:.:|
00000150: 99 00 9C 09 3C 00 8F 20 20 44 45 20 46 55 4E 44 |....<.. DE FUND|
00000160: 4E 45 20 54 49 44 45 52 20 45 52 20 44 45 20 54 |NE TIDER ER DE T|
00000170: 49 44 53 50 55 4E 4B 54 45 52 48 56 4F 52 20 53 |IDSPUNKTERHVOR S|
00000180: 4F 4C 45 4E 20 46 41 4B 54 49 53 4B 20 53 54 41 |OLEN FAKTISK STA|
00000190: 41 52 20 4F 50 20 4F 47 20 4E 45 44 00 EC 09 46 |AR OP OG NED...F|
000001A0: 00 8F 20 20 4F 47 20 44 45 20 45 52 20 4F 50 20 |.. OG DE ER OP |
000001B0: 54 49 4C 20 45 4E 20 35 2D 37 20 4D 49 4E 55 54 |TIL EN 5-7 MINUT|
000001C0: 54 45 52 20 20 46 4F 52 53 4B 45 4C 4C 49 47 20 |TER FORSKELLIG |
000001D0: 46 52 41 20 44 45 20 42 45 52 45 47 4E 45 44 45 |FRA DE BEREGNEDE|
000001E0: 20 54 49 44 53 50 55 4E 4B 54 45 52 00 34 0A 50 | TIDSPUNKTER.4.P|
000001F0: 00 8F 20 20 44 45 54 20 53 4B 59 4C 44 45 53 20 |.. DET SKYLDES |
00000200: 41 54 20 53 4F 4C 4C 59 53 45 54 20 41 46 42 30 |AT SOLLYSET AFB0|
00000210: 4A 45 53 20 20 50 41 41 20 44 45 54 53 20 56 45 |JES PAA DETS VE|
00000220: 4A 20 47 45 4E 4E 45 4D 20 41 54 4D 4F 53 46 41 |J GENNEM ATMOSFA|
00000230: 45 52 45 4E 00 5A 0A 64 00 99 22 20 49 4E 44 54 |EREN.Z.d.." INDT|
00000240: 41 53 54 20 53 54 41 52 54 20 44 41 54 4F 20 44 |AST START DATO D|
00000250: 2C 4D 22 3A 85 20 44 41 2C 4D 00 60 0A 6E 00 99 |,M":. DA,M.`.n..|
00000260: 00 8A 0A 78 00 99 22 20 49 4E 44 54 41 53 54 20 |...x.." INDTAST |
00000270: 42 52 45 44 44 45 20 4F 47 20 4C 41 45 4E 47 44 |BREDDE OG LAENGD|
00000280: 45 20 49 20 47 52 41 44 45 52 00 B4 0A 79 00 99 |E I GRADER...y..|
00000290: 22 11 20 4F 47 20 4D 49 4E 55 54 54 45 52 20 48 |". OG MINUTTER H|
000002A0: 55 53 4B 20 27 2D 27 20 46 4F 52 41 4E 20 53 59 |USK '-' FORAN SY|
000002B0: 44 4C 49 47 00 D6 0A 7A 00 99 22 11 20 42 52 45 |DLIG...z..". BRE|
000002C0: 44 44 45 20 4F 47 20 56 45 53 54 4C 49 47 20 4C |DDE OG VESTLIG L|
000002D0: 41 45 4E 47 44 45 00 FE 0A 7B 00 99 3A 99 22 28 |AENGDE...{..:."(|
000002E0: 4B 30 42 45 4E 48 41 56 4E 20 35 35 2C 33 39 20 |K0BENHAVN 55,39 |
000002F0: 4E 20 20 4F 47 20 31 32 2C 32 36 20 30 29 00 35 |N OG 12,26 0).5|
00000300: 0B 82 00 99 3A 99 22 20 49 4E 44 54 41 53 54 20 |....:." INDTAST |
00000310: 42 52 45 44 44 45 4E 20 49 20 47 52 41 44 45 52 |BREDDEN I GRADER|
00000320: 20 4F 47 20 4D 49 4E 55 54 54 45 52 22 3A 85 20 | OG MINUTTER":. |
00000330: 41 31 2C 41 32 00 6D 0B 96 00 99 3A 99 22 20 49 |A1,A2.m....:." I|
00000340: 4E 44 54 41 53 54 20 4C 41 45 4E 47 44 45 4E 20 |NDTAST LAENGDEN |
00000350: 49 20 47 52 41 44 45 52 20 4F 47 20 4D 49 4E 55 |I GRADER OG MINU|
00000360: 54 54 45 52 22 3A 85 20 4F 31 2C 4F 32 00 9A 0B |TTER":. O1,O2...|
00000370: B4 00 99 3A 85 22 20 48 56 4F 52 20 4D 41 4E 47 |...:." HVOR MANG|
00000380: 45 20 44 41 47 45 20 53 4B 41 4C 20 53 4B 52 49 |E DAGE SKAL SKRI|
00000390: 56 45 53 20 55 44 22 3B 4E 52 00 C9 0B B9 00 99 |VES UD";NR......|
000003A0: 22 30 4E 53 4B 45 52 20 44 55 20 41 4E 44 45 4E |"0NSKER DU ANDEN|
000003B0: 20 54 49 44 20 45 4E 44 20 47 4D 54 20 28 4A 2F | TID END GMT (J/|
000003C0: 4E 29 22 3A 85 20 4A 4E 24 00 F4 0B BE 00 8B A8 |N)":. JN$.......|
000003D0: 20 4A 4E 24 B3 B1 22 4E 22 A7 20 47 4D B2 30 3A | JN$.."N". GM.0:|
000003E0: 47 4D 24 B2 22 47 4D 54 2E 20 54 49 44 22 3A 89 |GM$."GMT. TID":.|
000003F0: 20 32 31 35 00 1B 0C C3 00 99 22 49 4E 44 54 41 | 215......"INDTA|
00000400: 53 54 20 46 4F 52 53 4B 45 4C 20 46 52 41 20 47 |ST FORSKEL FRA G|
00000410: 4D 54 20 49 20 54 49 4D 45 52 22 00 32 0C C4 00 |MT I TIMER".2...|
00000420: 99 22 28 4B 30 42 45 4E 48 41 56 4E 20 3D 20 2B |."(K0BENHAVN = +|
00000430: 31 29 00 4B 0C C8 00 85 20 47 4D 3A 47 4D 24 B2 |1).K.... GM:GM$.|
00000440: 22 4C 4F 4B 41 4C 20 54 49 44 22 00 87 0C D7 00 |"LOKAL TID".....|
00000450: 99 3A 99 3A 99 3A 85 22 11 20 53 4B 41 4C 20 44 |.:.:.:.". SKAL D|
00000460: 45 54 20 53 4B 52 49 56 45 53 20 55 44 20 50 41 |ET SKRIVES UD PA|
00000470: 41 20 50 52 49 4E 54 45 52 45 4E 20 28 4A 2F 4E |A PRINTEREN (J/N|
00000480: 29 20 22 3B 4C 50 24 00 91 0C D8 00 99 3A 99 3A |) ";LP$......:.:|
00000490: 99 00 A6 0C D9 00 8B 20 4C 50 24 B3 B1 22 4A 22 |....... LP$.."J"|
000004A0: 20 A7 20 32 34 30 00 C3 0C DA 00 99 3A 99 22 20 | . 240......:." |
000004B0: 53 54 45 44 45 54 53 20 4E 41 56 4E 20 22 3A 85 |STEDETS NAVN ":.|
000004C0: 20 47 24 00 CE 0C DB 00 9F 20 31 33 2C 34 00 E7 | G$...... 13,4..|
000004D0: 0C DC 00 81 20 4A B2 31 20 A4 20 33 3A 98 31 33 |.... J.1 . 3:.13|
000004E0: 2C 22 22 3A 82 20 4A 00 17 0D E6 00 98 31 33 2C |,"":. J......13,|
000004F0: 22 22 3B A6 32 30 29 42 31 24 3A 98 31 33 2C 22 |"";.20)B1$:.13,"|
00000500: 22 3B A6 32 31 29 42 32 24 3A 98 31 33 2C 22 22 |";.21)B2$:.13,""|
00000510: 3A 98 31 33 2C 22 22 00 34 0D F0 00 41 33 B2 41 |:.13,"".4...A3.A|
00000520: 31 AA 41 32 AD 36 30 3A 4F 33 B2 AB 4F 31 AA 4F |1.A2.60:O3..O1.O|
00000530: 32 AD 36 30 00 71 0D FA 00 41 35 24 B2 22 20 53 |2.60.q...A5$." S|
00000540: 59 44 4C 49 47 20 42 52 45 44 44 45 3B 20 20 22 |YDLIG BREDDE; "|
00000550: 3A 8B 20 41 33 B2 B1 30 20 A7 20 41 35 24 B2 22 |:. A3..0 . A5$."|
00000560: 20 4E 4F 52 44 4C 49 47 20 42 52 45 44 44 45 20 | NORDLIG BREDDE |
00000570: 22 00 AA 0D 04 01 4F 35 24 B2 22 20 5C 53 54 4C |".....O5$." \STL|
00000580: 49 47 20 4C 5B 4E 47 44 45 22 3A 8B 20 4F 33 B2 |IG L[NGDE":. O3.|
00000590: B1 30 20 A7 20 4F 35 24 B2 22 20 56 45 53 54 4C |.0 . O5$." VESTL|
000005A0: 49 47 20 4C 5B 4E 47 44 45 22 00 C2 0D 0E 01 41 |IG L[NGDE".....A|
000005B0: 34 B2 B5 28 41 33 AC 31 30 30 AA 2E 35 29 AD 31 |4..(A3.100..5).1|
000005C0: 30 30 00 DA 0D 18 01 4F 34 B2 B5 28 4F 33 AC 31 |00.....O4..(O3.1|
000005D0: 30 30 AA 2E 35 29 AD 31 30 30 00 F8 0D 22 01 52 |00..5).100...".R|
000005E0: 41 44 B2 35 37 2E 32 39 35 38 3A 50 31 B2 33 2E |AD.57.2958:P1.3.|
000005F0: 31 34 31 35 39 AD 32 36 00 06 0E 2C 01 41 33 B2 |14159.26...,.A3.|
00000600: 41 33 AD 52 41 44 00 12 0E 36 01 86 20 4E 28 31 |A3.RAD...6.. N(1|
00000610: 32 29 00 21 0E 40 01 81 20 49 B2 31 20 A4 20 31 |2).!.@.. I.1 . 1|
00000620: 32 00 2C 0E 4A 01 87 20 4E 28 49 29 00 34 0E 54 |2.,.J.. N(I).4.T|
00000630: 01 82 20 49 00 65 0E 5E 01 83 20 30 2C 33 31 2C |.. I.e.^.. 0,31,|
00000640: 35 39 2C 39 30 2C 31 32 30 2C 31 35 31 2C 31 38 |59,90,120,151,18|
00000650: 31 2C 32 31 32 2C 32 34 33 2C 32 37 33 2C 33 30 |1,212,243,273,30|
00000660: 34 2C 33 33 34 00 A1 0E 68 01 8F 20 20 44 45 52 |4,334...h.. DER|
00000670: 20 54 41 47 45 53 20 49 4B 4B 45 20 48 45 4E 53 | TAGES IKKE HENS|
00000680: 59 4E 20 54 49 4C 20 41 54 20 45 54 20 53 4B 55 |YN TIL AT ET SKU|
00000690: 44 41 41 52 20 48 41 52 20 33 36 36 20 44 41 47 |DAAR HAR 366 DAG|
000006A0: 45 00 B6 0E 72 01 8B 20 4C 50 24 B3 B1 22 4A 22 |E...r.. LP$.."J"|
000006B0: 20 A7 20 34 31 30 00 ED 0E 7C 01 98 31 33 2C 22 | . 410...|..13,"|
000006C0: 44 45 4E 4E 45 20 42 45 52 45 47 4E 49 4E 47 20 |DENNE BEREGNING |
000006D0: 45 52 20 46 4F 52 3A 20 22 3B B6 28 41 34 29 3B |ER FOR: ";.(A4);|
000006E0: 41 35 24 3B B6 28 4F 34 29 3B 4F 35 24 00 11 0F |A5$;.(O4);O5$...|
000006F0: 86 01 98 31 33 2C 22 22 3A 98 31 33 2C 22 53 54 |...13,"":.13,"ST|
00000700: 45 44 45 54 53 20 4E 41 56 4E 20 3A 20 22 3B 47 |EDETS NAVN : ";G|
00000710: 24 00 1D 0F 90 01 98 31 33 2C 22 20 22 00 6D 0F |$......13," ".m.|
00000720: 9A 01 4B 24 B2 22 41 4C 4C 45 20 54 49 44 45 52 |..K$."ALLE TIDER|
00000730: 20 45 52 20 22 AA 47 4D 24 AA 22 2C 20 4E 4F 47 | ER ".GM$.", NOG|
00000740: 4C 45 20 45 52 20 45 54 20 44 5C 47 4E 20 46 4F |LE ER ET D\GN FO|
00000750: 52 53 4B 55 44 54 20 50 5D 20 47 52 55 4E 44 20 |RSKUDT P] GRUND |
00000760: 41 46 20 44 41 54 4F 4C 49 4E 4A 45 4E 00 88 0F |AF DATOLINJEN...|
00000770: A4 01 99 22 20 41 4C 4C 45 20 54 49 44 45 52 20 |..." ALLE TIDER |
00000780: 45 52 20 22 3B 47 4D 24 00 C4 0F A9 01 99 3A 99 |ER ";GM$......:.|
00000790: 22 20 4E 4F 47 4C 45 20 45 52 20 46 4F 52 53 4B |" NOGLE ER FORSK|
000007A0: 55 44 54 20 45 54 20 44 30 47 4E 20 50 41 41 20 |UDT ET D0GN PAA |
000007B0: 47 52 55 4E 44 20 41 46 20 20 44 41 54 4F 4C 49 |GRUND AF DATOLI|
000007C0: 4E 4A 45 4E 00 CC 0F AE 01 99 3A 99 00 03 10 B8 |NJEN......:.....|
000007D0: 01 43 24 B2 22 20 50 41 41 20 44 45 4E 4E 45 20 |.C$." PAA DENNE |
000007E0: 42 52 45 44 44 45 47 52 41 44 20 47 41 41 52 20 |BREDDEGRAD GAAR |
000007F0: 53 4F 4C 45 4E 20 49 4B 4B 45 20 4F 50 20 44 45 |SOLEN IKKE OP DE|
00000800: 4E 20 22 00 3B 10 C2 01 42 24 B2 22 20 50 41 41 |N ".;...B$." PAA|
00000810: 20 44 45 4E 4E 45 20 42 52 45 44 44 45 47 52 41 | DENNE BREDDEGRA|
00000820: 44 20 47 41 41 52 20 53 4F 4C 45 4E 20 49 4B 4B |D GAAR SOLEN IKK|
00000830: 45 20 4E 45 44 20 44 45 4E 20 22 00 87 10 CC 01 |E NED DEN ".....|
00000840: 46 24 B2 22 44 41 47 20 20 20 20 20 20 20 20 20 |F$."DAG |
00000850: 20 20 53 4F 4C 20 4F 50 20 20 20 20 20 20 20 20 | SOL OP |
00000860: 53 4F 4C 20 4E 45 44 20 20 20 20 20 20 20 20 53 |SOL NED S|
00000870: 4F 4C 44 45 4B 4C 2E 20 20 20 20 20 20 20 44 41 |OLDEKL. DA|
00000880: 47 54 49 4D 45 52 22 00 D7 10 D6 01 4A 24 B2 22 |GTIMER".....J$."|
00000890: 4D 5D 4E 45 44 20 20 20 20 20 20 20 20 20 20 20 |M]NED |
000008A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008C0: 20 20 20 20 20 20 20 20 20 20 54 49 4D 45 52 20 | TIMER |
000008D0: 4F 47 20 4D 49 4E 2E 00 08 11 E0 01 99 22 20 44 |OG MIN......." D|
000008E0: 41 54 4F 20 20 53 4F 4C 20 4F 50 20 20 53 4F 4C |ATO SOL OP SOL|
000008F0: 20 4E 45 44 20 20 44 45 43 4C 2E 20 54 49 4D 45 | NED DECL. TIME|
00000900: 52 20 44 41 47 22 3A 99 00 1F 11 EA 01 8B 20 4C |R DAG":....... L|
00000910: 50 24 B3 B1 22 4A 22 20 A7 20 89 20 35 32 30 00 |P$.."J" . . 520.|
00000920: 38 11 F4 01 98 31 33 2C 4B 24 3A 98 31 33 2C 22 |8....13,K$:.13,"|
00000930: 22 3A 98 31 33 2C 22 22 00 51 11 FE 01 98 31 33 |":.13,"".Q....13|
00000940: 2C 46 24 3A 98 31 33 2C 4A 24 3A 98 31 33 2C 22 |,F$:.13,J$:.13,"|
00000950: 22 00 5F 11 08 02 4B B2 4E 28 4D 29 AA 44 41 00 |"._...K.N(M).DA.|
00000960: 69 11 12 02 4C 4E B2 31 37 00 78 11 1C 02 81 20 |i...LN.17.x.... |
00000970: 51 B2 31 20 A4 20 4E 52 00 84 11 26 02 4C 4E B2 |Q.1 . NR...&.LN.|
00000980: 4C 4E AA 31 00 A4 11 30 02 8B 20 4C 4E B1 B2 36 |LN.1...0.. LN..6|
00000990: 36 20 AF 20 4C 50 24 B2 22 4A 22 20 A7 20 8D 20 |6 . LP$."J" . . |
000009A0: 31 30 35 30 00 B4 11 3A 02 44 54 20 B2 20 4B AB |1050...:.DT . K.|
000009B0: 4E 28 4D 29 00 C7 11 44 02 8B 20 44 54 B2 33 32 |N(M)...D.. DT.32|
000009C0: 20 A7 20 44 54 B2 31 00 D9 11 4E 02 8B 20 4B B3 | . DT.1...N.. K.|
000009D0: 33 36 36 20 A7 20 36 31 30 00 EA 11 58 02 4D B2 |366 . 610...X.M.|
000009E0: 31 3A 44 41 B2 31 3A 4B B2 31 00 FB 11 62 02 8B |1:DA.1:K.1...b..|
000009F0: 20 4D B2 31 32 20 A7 20 36 34 30 00 1A 12 6C 02 | M.12 . 640...l.|
00000A00: 8B 20 4B B1 4E 28 4D AA 31 29 20 A7 20 44 54 B2 |. K.N(M.1) . DT.|
00000A10: 4B AB 28 4E 28 4D AA 31 29 29 00 31 12 76 02 8B |K.(N(M.1)).1.v..|
00000A20: 20 4B B1 4E 28 4D AA 31 29 20 A7 20 4D B2 4D AA | K.N(M.1) . M.M.|
00000A30: 31 00 3E 12 80 02 58 B2 50 31 AC 4B AD 37 00 48 |1.>...X.P1.K.7.H|
00000A40: 12 8A 02 4B B2 4B AA 31 00 76 12 94 02 44 B2 2E |...K.K.1.v...D..|
00000A50: 34 35 36 AB 32 32 2E 39 31 35 AC BE 28 58 29 AB |456.22.915..(X).|
00000A60: 2E 34 33 AC BE 28 32 AC 58 29 AB 2E 31 35 36 AC |.43..(2.X)..156.|
00000A70: BE 28 33 AC 58 29 00 9F 12 96 02 44 B2 44 AA 33 |.(3.X).....D.D.3|
00000A80: 2E 38 33 AC BF 28 58 29 AA 2E 30 36 AC BF 28 32 |.83..(X)..06..(2|
00000A90: AC 58 29 AB 2E 30 38 32 AC BF 28 33 AC 58 29 00 |.X)..082..(3.X).|
00000AA0: D7 12 9E 02 45 B2 2E 30 30 38 AA 2E 35 31 AC BE |....E..008..51..|
00000AB0: 28 58 29 AB 33 2E 31 39 37 AC BE 28 32 AC 58 29 |(X).3.197..(2.X)|
00000AC0: AB 2E 31 30 36 AC BE 28 33 AC 58 29 AB 2E 31 35 |..106..(3.X)..15|
00000AD0: AC BE 28 34 AC 58 29 00 0F 13 A0 02 45 B2 45 AB |..(4.X).....E.E.|
00000AE0: 37 2E 33 31 37 AC BF 28 58 29 AB 39 2E 34 37 31 |7.317..(X).9.471|
00000AF0: AC BF 28 32 AC 58 29 AB 2E 33 39 31 AC BF 28 33 |..(2.X)..391..(3|
00000B00: AC 58 29 AB 2E 32 34 32 AC BF 28 34 AC 58 29 00 |.X)..242..(4.X).|
00000B10: 25 13 A1 02 4D 24 B2 C4 28 4D 29 3A 44 54 24 B2 |%...M$..(M):DT$.|
00000B20: C4 28 44 54 29 00 41 13 A2 02 8B 20 4D B3 31 30 |.(DT).A.... M.10|
00000B30: 20 A7 20 4D 24 B2 C9 28 4D 24 2C 31 29 AA 22 20 | . M$..(M$,1)." |
00000B40: 22 00 60 13 A3 02 8B 20 44 54 B3 31 30 20 A7 20 |".`.... DT.10 . |
00000B50: 44 54 24 B2 22 20 22 AA C9 28 44 54 24 2C 31 29 |DT$." "..(DT$,1)|
00000B60: 00 7D 13 A4 02 44 54 24 B2 C9 28 44 54 24 2C 32 |.}...DT$..(DT$,2|
00000B70: 29 AA 22 2F 22 AA C9 28 4D 24 2C 32 29 00 C8 13 |)."/"..(M$,2)...|
00000B80: A8 02 8F 20 20 44 20 49 53 20 44 45 43 4C 49 4E |... D IS DECLIN|
00000B90: 41 54 49 4F 4E 20 4F 46 20 53 55 4E 20 49 4E 20 |ATION OF SUN IN |
00000BA0: 44 45 47 52 45 45 53 3B 20 45 20 45 52 20 54 49 |DEGREES; E ER TI|
00000BB0: 44 53 41 45 4B 56 41 54 49 4F 4E 45 4E 20 49 20 |DSAEKVATIONEN I |
00000BC0: 4D 49 4E 55 54 54 45 52 00 D5 13 B2 02 44 45 B2 |MINUTTER.....DE.|
00000BD0: 44 AD 52 41 44 00 E7 13 BC 02 59 B2 C0 28 44 45 |D.RAD.....Y..(DE|
00000BE0: 29 AC C0 28 41 33 29 00 F8 13 D0 02 8B 20 59 B2 |)..(A3)...... Y.|
00000BF0: B1 31 20 A7 20 39 36 30 00 0A 14 DA 02 8B 20 59 |.1 . 960...... Y|
00000C00: B3 B2 AB 31 20 A7 20 39 39 30 00 2B 14 E4 02 41 |...1 . 990.+...A|
00000C10: 52 B2 AB C1 28 59 AD BA 28 AB 59 AC 59 AA 31 29 |R...(Y..(.Y.Y.1)|
00000C20: 29 AA 31 2E 35 37 30 37 36 33 33 00 39 14 EE 02 |).1.5707633.9...|
00000C30: 41 43 B2 41 52 AC 52 41 44 00 57 14 F8 02 52 49 |AC.AR.RAD.W...RI|
00000C40: B2 4F 33 AD 31 35 AA 41 43 AD 31 35 3A 52 49 B2 |.O3.15.AC.15:RI.|
00000C50: 52 49 AB 45 AD 36 30 00 75 14 02 03 53 4A B2 4F |RI.E.60.u...SJ.O|
00000C60: 33 AD 31 35 AB 41 43 AD 31 35 3A 53 4A B2 53 4A |3.15.AC.15:SJ.SJ|
00000C70: AB 45 AD 36 30 00 97 14 03 03 52 49 B2 52 49 AA |.E.60.....RI.RI.|
00000C80: 47 4D 3A 53 4A B2 53 4A AA 47 4D 3A 8F 20 4C 4F |GM:SJ.SJ.GM:. LO|
00000C90: 4B 41 4C 20 54 49 44 00 A4 14 0C 03 4C 54 B2 53 |KAL TID.....LT.S|
00000CA0: 4A AB 52 49 00 BA 14 16 03 8B 20 4C 54 B3 30 20 |J.RI...... LT.0 |
00000CB0: A7 20 4C 54 B2 32 34 AA 4C 54 00 E9 14 20 03 8B |. LT.24.LT... ..|
00000CC0: 20 28 4C 54 AB B5 28 4C 54 29 29 B1 2E 39 39 20 | (LT..(LT))..99 |
00000CD0: A7 20 4C 54 B2 28 B5 28 28 4C 54 AC 31 30 30 29 |. LT.(.((LT.100)|
00000CE0: AA 2E 36 29 29 AD 31 30 30 00 F6 14 2A 03 4C 48 |..6)).100...*.LH|
00000CF0: B2 B5 28 4C 54 29 00 0B 15 34 03 4C 4D B2 28 4C |..(LT)...4.LM.(L|
00000D00: 54 AB B5 28 4C 54 29 29 AC 36 30 00 22 15 3E 03 |T..(LT)).60.".>.|
00000D10: 8B 20 52 49 B1 32 34 20 A7 20 52 49 B2 52 49 AB |. RI.24 . RI.RI.|
00000D20: 32 34 00 38 15 48 03 8B 20 52 49 B3 30 20 A7 20 |24.8.H.. RI.0 . |
00000D30: 52 49 B2 52 49 AA 32 34 00 67 15 52 03 8B 20 28 |RI.RI.24.g.R.. (|
00000D40: 52 49 AB B5 28 52 49 29 29 B1 2E 39 39 20 A7 20 |RI..(RI))..99 . |
00000D50: 52 49 B2 28 B5 28 28 52 49 AC 31 30 30 29 AA 2E |RI.(.((RI.100)..|
00000D60: 36 29 29 AD 31 30 30 00 74 15 5C 03 52 31 B2 B5 |6)).100.t.\.R1..|
00000D70: 28 52 49 29 00 89 15 66 03 52 32 B2 28 52 49 AB |(RI)...f.R2.(RI.|
00000D80: B5 28 52 49 29 29 AC 36 30 00 A0 15 70 03 8B 20 |.(RI)).60...p.. |
00000D90: 53 4A B1 32 34 20 A7 20 53 4A B2 53 4A AB 32 34 |SJ.24 . SJ.SJ.24|
00000DA0: 00 B6 15 7A 03 8B 20 53 4A B3 30 20 A7 20 53 4A |...z.. SJ.0 . SJ|
00000DB0: B2 53 4A AA 32 34 00 E5 15 84 03 8B 20 28 53 4A |.SJ.24...... (SJ|
00000DC0: AB B5 28 53 4A 29 29 B1 2E 39 39 20 A7 20 53 4A |..(SJ))..99 . SJ|
00000DD0: B2 28 B5 28 28 53 4A AC 31 30 30 29 AA 2E 36 29 |.(.((SJ.100)..6)|
00000DE0: 29 AD 31 30 30 00 0C 16 86 03 53 31 B2 B5 28 53 |).100.....S1..(S|
00000DF0: 4A 29 3A 44 B2 B5 28 44 AC 31 30 30 AA 2E 35 29 |J):D..(D.100..5)|
00000E00: AD 31 30 30 3A 44 24 B2 C4 28 44 29 00 21 16 87 |.100:D$..(D).!..|
00000E10: 03 53 32 B2 28 53 4A AB B5 28 53 4A 29 29 AC 36 |.S2.(SJ..(SJ)).6|
00000E20: 30 00 49 16 88 03 53 32 B2 B5 28 53 32 AA 2E 35 |0.I...S2..(S2..5|
00000E30: 29 3A 52 32 B2 B5 28 52 32 AA 2E 35 29 3A 4C 4D |):R2..(R2..5):LM|
00000E40: B2 B5 28 4C 4D AA 2E 35 29 00 75 16 89 03 52 31 |..(LM..5).u...R1|
00000E50: 24 B2 C4 28 52 31 29 3A 52 32 24 B2 C4 28 52 32 |$..(R1):R2$..(R2|
00000E60: 29 3A 53 31 24 B2 C4 28 53 31 29 3A 53 32 24 B2 |):S1$..(S1):S2$.|
00000E70: C4 28 53 32 29 00 8D 16 8A 03 4C 48 24 B2 C4 28 |.(S2).....LH$..(|
00000E80: 4C 48 29 3A 4C 4D 24 B2 C4 28 4C 4D 29 00 B8 16 |LH):LM$..(LM)...|
00000E90: 8B 03 8B 20 52 31 B3 31 30 20 A7 20 52 31 24 B2 |... R1.10 . R1$.|
00000EA0: 22 20 22 AA C9 28 52 31 24 2C 31 29 20 3A 8F 20 |" "..(R1$,1) :. |
00000EB0: 4F 50 20 54 49 4D 45 52 00 E1 16 8C 03 8B 20 52 |OP TIMER...... R|
00000EC0: 32 B3 31 30 20 A7 20 52 32 24 B2 22 30 22 AA C9 |2.10 . R2$."0"..|
00000ED0: 28 52 32 24 2C 31 29 20 3A 8F 20 4F 50 20 4D 49 |(R2$,1) :. OP MI|
00000EE0: 4E 00 0D 17 8D 03 8B 20 53 31 B3 31 30 20 A7 20 |N...... S1.10 . |
00000EF0: 53 31 24 B2 22 20 22 AA C9 28 53 31 24 2C 31 29 |S1$." "..(S1$,1)|
00000F00: 20 3A 8F 20 4E 45 44 20 54 49 4D 45 52 00 37 17 | :. NED TIMER.7.|
00000F10: 8E 03 8B 20 53 32 B3 31 30 20 A7 20 53 32 24 B2 |... S2.10 . S2$.|
00000F20: 22 30 22 AA C9 28 53 32 24 2C 31 29 20 3A 8F 20 |"0"..(S2$,1) :. |
00000F30: 4E 45 44 20 4D 49 4E 00 63 17 8F 03 8B 20 4C 48 |NED MIN.c.... LH|
00000F40: B3 31 30 20 A7 20 4C 48 24 B2 22 20 22 AA C9 28 |.10 . LH$." "..(|
00000F50: 4C 48 24 2C 31 29 20 3A 8F 20 4C 59 53 20 54 49 |LH$,1) :. LYS TI|
00000F60: 4D 45 52 00 8D 17 90 03 8B 20 4C 4D B3 31 30 20 |MER...... LM.10 |
00000F70: A7 20 4C 4D 24 B2 22 30 22 AA C9 28 4C 4D 24 2C |. LM$."0"..(LM$,|
00000F80: 31 29 20 3A 8F 20 4C 59 53 20 4D 49 4E 00 C5 17 |1) :. LYS MIN...|
00000F90: 91 03 52 58 24 B2 C9 28 52 31 24 2C 32 29 AA 22 |..RX$..(R1$,2)."|
00000FA0: 3A 22 AA C9 28 52 32 24 2C 32 29 3A 53 58 24 B2 |:"..(R2$,2):SX$.|
00000FB0: C9 28 53 31 24 2C 32 29 AA 22 3A 22 AA C9 28 53 |.(S1$,2).":"..(S|
00000FC0: 32 24 2C 32 29 00 E3 17 92 03 4C 58 24 B2 C9 28 |2$,2).....LX$..(|
00000FD0: 4C 48 24 2C 32 29 AA 22 3A 22 AA C9 28 4C 4D 24 |LH$,2).":"..(LM$|
00000FE0: 2C 32 29 00 0D 18 A2 03 99 20 44 54 24 3B A3 37 |,2)...... DT$;.7|
00000FF0: 29 3B 52 58 24 3B A3 31 35 29 3B 53 58 24 3B A3 |);RX$;.15);SX$;.|
00001000: 32 33 29 44 24 3B A3 33 31 29 4C 58 24 00 22 18 |23)D$;.31)LX$.".|
00001010: AC 03 8B 20 4C 50 24 B3 B1 22 4A 22 20 A7 20 39 |... LP$.."J" . 9|
00001020: 35 30 00 4A 18 AE 03 98 31 33 2C 22 22 3B A6 30 |50.J....13,"";.0|
00001030: 29 44 54 24 3B A6 39 29 52 58 24 3B A6 31 30 29 |)DT$;.9)RX$;.10)|
00001040: 53 58 24 3B A6 38 29 44 24 3B 00 63 18 B0 03 98 |SX$;.8)D$;.c....|
00001050: 31 33 2C 22 22 3B A6 31 36 AB C3 28 44 24 29 29 |13,"";.16..(D$))|
00001060: 4C 58 24 00 6E 18 B6 03 89 20 31 30 31 30 00 7B |LX$.n.... 1010.{|
00001070: 18 C0 03 99 20 42 24 3B 44 54 24 00 9C 18 CA 03 |.... B$;DT$.....|
00001080: 8B 20 4C 50 24 B2 22 4A 22 20 A7 20 98 31 33 2C |. LP$."J" . .13,|
00001090: 22 22 3B A6 35 29 42 24 3B 44 54 24 00 A7 18 D4 |"";.5)B$;DT$....|
000010A0: 03 89 20 31 30 31 30 00 B4 18 DE 03 99 20 43 24 |.. 1010...... C$|
000010B0: 3B 44 54 24 00 CD 18 E2 03 98 31 33 2C 22 22 3B |;DT$......13,"";|
000010C0: A6 31 36 AB C3 28 44 24 29 29 4C 58 24 00 EE 18 |.16..(D$))LX$...|
000010D0: E8 03 8B 20 4C 50 24 B2 22 4A 22 20 A7 20 98 31 |... LP$."J" . .1|
000010E0: 33 2C 22 22 3B A6 35 29 43 24 3B 44 54 24 00 F6 |3,"";.5)C$;DT$..|
000010F0: 18 F2 03 82 20 51 00 1B 19 FC 03 8B 20 4C 50 24 |.... Q...... LP$|
00001100: B2 22 4A 22 20 A7 20 81 4A B2 30 A4 34 3A 98 31 |."J" . .J.0.4:.1|
00001110: 33 2C 22 20 22 3A 82 3A A0 31 33 00 21 19 10 04 |3," ":.:.13.!...|
00001120: 80 00 3A 19 1A 04 81 20 4A B2 31 20 A4 31 31 3A |..:.... J.1 .11:|
00001130: 98 31 33 2C 22 22 3A 82 20 4A 00 58 19 24 04 98 |.13,"":. J.X.$..|
00001140: 31 33 2C 46 24 3A 98 31 33 2C 4A 24 3A 98 31 33 |13,F$:.13,J$:.13|
00001150: 2C 22 22 3A 4C 4E B2 38 00 5E 19 2E 04 8E 00 00 |,"":LN.8.^......|
00001160: 00 |. |
..M.... DETTE PROGRAM KAN BEREGNE SOL O
P OG SOLNEDGANGSTIDER FOR ET HVILKET...
... SOM HELST STED OG FOR ET VILKAARLIG
T VALGT ANTAL DAGE..C.... RETTET LIDT
TIL AF OZ1BMW/JBR 07JAN86.P...
.15,8,15...... G(147).....B1$."BEREGNING
AF SOL OP OG NEDGANG".,...B2$."FOR ET H
VERT STED P] JORDEN".Q.... " ";B1$:.
". ";B2$:.:....<.. DE FUNDNE TIDER
ER DE TIDSPUNKTERHVOR SOLEN FAKTISK STA
AR OP OG NED...F.. OG DE ER OP TIL EN 5
-7 MINUTTER FORSKELLIG FRA DE BEREGNEDE
TIDSPUNKTER.4.P.. DET SKYLDES AT SOLLY
SET AFB0JES PAA DETS VEJ GENNEM ATMOSFA
EREN.Z.D.." INDTAST START DATO D,M":. DA
,M.`.N.....X.." INDTAST BREDDE OG LAENGD
E I GRADER...Y..". OG MINUTTER HUSK '-'
FORAN SYDLIG.V.Z..". BREDDE OG VESTLIG L
AENGDE...{..:."(K0BENHAVN 55,39 N OG 12
,26 0).5....:." INDTAST BREDDEN I GRADER
OG MINUTTER":. A1,A2.M....:." INDTAST L
AENGDEN I GRADER OG MINUTTER":. O1,O2...
...:." HVOR MANGE DAGE SKAL SKRIVES UD";
NR.I...."0NSKER DU ANDEN TID END GMT (J/
N)":. JN$....... JN$.."N". GM.0:GM$."GMT
. TID":. 215...C.."INDTAST FORSKEL FRA G
MT I TIMER".2.D.."(K0BENHAVN = +1).K.H..
GM:GM$."LOKAL TID"...W..:.:.:.". SKAL D
ET SKRIVES UD PAA PRINTEREN (J/N) ";LP$.
..X..:.:....Y.. LP$.."J" . 240.C.Z..:."
STEDETS NAVN ":. G$.N.... 13,4...... J.1
. 3:.13,"":. J......13,"";.20)B1$:.13,"
";.21)B2$:.13,"":.13,"".4...A3.A1.A2.60:
O3..O1.O2.60.Q...A5$." SYDLIG BREDDE; "
:. A3..0 . A5$." NORDLIG BREDDE ".....O5
$." \STLIG L[NGDE":. O3..0 . O5$." VESTL
IG L[NGDE".B...A4..(A3.100..5).100.Z...O
4..(O3.100..5).100...".RAD.57.2958:P1.3.
14159.26...,.A3.A3.RAD...6.. N(12).!.@..
I.1 . 12.,.J.. N(I).4.T.. I.E.^.. 0,31,
59,90,120,151,181,212,243,273,304,334...
H.. DER TAGES IKKE HENSYN TIL AT ET SKU
DAAR HAR 366 DAGE...R.. LP$.."J" . 410..
.|..13,"DENNE BEREGNING ER FOR: ";.(A4);
A5$;.(O4);O5$......13,"":.13,"STEDETS NA
VN : ";G$......13," ".M...K$."ALLE TIDER
ER ".GM$.", NOGLE ER ET D\GN FORSKUDT P
] GRUND AF DATOLINJEN......" ALLE TIDER
ER ";GM$.D....:." NOGLE ER FORSKUDT ET D
0GN PAA GRUND AF DATOLINJEN.L....:.....
.C$." PAA DENNE BREDDEGRAD GAAR SOLEN IK
KE OP DEN ".;.B.B$." PAA DENNE BREDDEGRA
D GAAR SOLEN IKKE NED DEN "...L.F$."DAG
SOL OP SOL NED S
OLDEKL. DAGTIMER".W.V.J$."M]NED
TIMER OG MIN......." DATO SOL
OP SOL NED DECL. TIMER DAG":....... L
P$.."J" . . 520.8....13,K$:.13,"":.13,""
.Q....13,F$:.13,J$:.13,""._...K.N(M).DA.
I...LN.17.X.... Q.1 . NR...&.LN.LN.1...0
.. LN..66 . LP$."J" . . 1050...:.DT . K.
N(M).G.D.. DT.32 . DT.1.Y.N.. K.366 . 61
0...X.M.1:DA.1:K.1...B.. M.12 . 640...L.
. K.N(M.1) . DT.K.(N(M.1)).1.V.. K.N(M.1
) . M.M.1.>...X.P1.K.7.H...K.K.1.V...D..
456.22.915..(X)..43..(2.X)..156..(3.X)..
...D.D.3.83..(X)..06..(2.X)..082..(3.X).
W...E..008..51..(X).3.197..(2.X)..106..(
3.X)..15..(4.X)... .E.E.7.317..(X).9.471
..(2.X)..391..(3.X)..242..(4.X).%...M$.D
(M):DT$.D(DT).A.... M.10 . M$.I(M$,1)."
".`.... DT.10 . DT$." ".I(DT$,1).}...DT$
.I(DT$,2)."/".I(M$,2).H.... D IS DECLIN
ATION OF SUN IN DEGREES; E ER TIDSAEKVAT
IONEN I MINUTTER.U...DE.D.RAD.....Y..(DE
)..(A3)...P.. Y..1 . 960...Z.. Y...1 . 9
90.+...AR..A(Y..(.Y.Y.1)).1.5707633.9...
AC.AR.RAD.W...RI.O3.15.AC.15:RI.RI.E.60.
U...SJ.O3.15.AC.15:SJ.SJ.E.60.....RI.RI.
GM:SJ.SJ.GM:. LOKAL TID.....LT.SJ.RI....
.. LT.0 . LT.24.LT... .. (LT..(LT))..99
. LT.(.((LT.100)..6)).100...*.LH..(LT)..
.4.LM.(LT..(LT)).60.".>.. RI.24 . RI.RI.
24.8.H.. RI.0 . RI.RI.24.G.R.. (RI..(RI)
)..99 . RI.(.((RI.100)..6)).100.T.\.R1..
(RI)...F.R2.(RI..(RI)).60. .P.. SJ.24 .
SJ.SJ.24...Z.. SJ.0 . SJ.SJ.24...... (SJ
..(SJ))..99 . SJ.(.((SJ.100)..6)).100...
..S1..(SJ):D..(D.100..5).100:D$.D(D).!..
.S2.(SJ..(SJ)).60.I...S2..(S2..5):R2..(R
2..5):LM..(LM..5).U...R1$.D(R1):R2$.D(R2
):S1$.D(S1):S2$.D(S2).....LH$.D(LH):LM$.
D(LM)...... R1.10 . R1$." ".I(R1$,1) :.
OP TIMER...... R2.10 . R2$."0".I(R2$,1)
:. OP MIN...... S1.10 . S1$." ".I(S1$,1)
:. NED TIMER.7.... S2.10 . S2$."0".I(S2
$,1) :. NED MIN.C.... LH.10 . LH$." ".I(
LH$,1) :. LYS TIMER...... LM.10 . LM$."0
".I(LM$,1) :. LYS MIN.E...RX$.I(R1$,2)."
:".I(R2$,2):SX$.I(S1$,2).":".I(S2$,2)...
..LX$.I(LH$,2).":".I(LM$,2)...... DT$;.7
);RX$;.15);SX$;.23)D$;.31)LX$.".... LP$.
."J" . 950.J....13,"";.0)DT$;.9)RX$;.10)
SX$;.8)D$;.C....13,"";.16.C(D$))LX$.N...
. 1010.{.... B$;DT$...J.. LP$."J" . .13,
"";.5)B$;DT$...T.. 1010...... C$;DT$.M..
..13,"";.16.C(D$))LX$...... LP$."J" . .1
3,"";.5)C$;DT$...... Q...... LP$."J" . .
J.0.4:.13," ":.: 13.!.....:.... J.1 .11:
.13,"":. J.X.$..13,F$:.13,J$:.13,"":LN.8
.^.......
> CLICK IMAGE PREVIEW FOR FULL MODAL