TIME MANAGER 2
FILE INFORMATION
FILENAME(S): TIME MANAGER 2
FILE TYPE(S): PRG
FILE SIZE: 5.3K
FIRST SEEN: 2025-11-30 19:37:00
APPEARS ON: 1 disk(s)
FILE HASH
da98726f676d8ad033bb6e5fe6fe24508a359add20025386c41f75864a5d4263
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10 8 86 | TIME MANAGER 2 | PRG | Curtcool, Bo | 32 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 01 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |.......*********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 37 08 02 |************.7..| 00000020: 00 8F 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 |..* | 00000030: 20 20 20 20 20 20 2A 00 52 08 04 00 8F 2A 20 20 | *.R....* | 00000040: 20 20 20 20 20 20 2A 2A 20 20 20 20 20 20 20 20 | ** | 00000050: 20 2A 00 6D 08 05 00 8F 2A 20 4D 49 43 48 41 45 | *.m....* MICHAE| 00000060: 4C 20 54 48 59 47 45 53 45 4E 20 20 2A 00 88 08 |L THYGESEN *...| 00000070: 06 00 8F 2A 20 20 20 20 20 20 20 20 20 20 20 20 |...* | 00000080: 20 20 20 20 20 20 20 2A 00 A3 08 07 00 8F 2A 2A | *......**| 00000090: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000A0: 2A 2A 2A 00 A9 08 08 00 8F 00 C4 08 09 00 8F 2A |***............*| 000000B0: 2A 2A 2A 20 44 45 46 49 4E 45 52 49 4E 47 20 2A |*** DEFINERING *| 000000C0: 2A 2A 2A 2A 00 CA 08 0A 00 8F 00 E2 08 0B 00 96 |****............| 000000D0: 20 A5 4D 31 28 58 29 B2 58 AB B5 28 58 AD 34 29 | .M1(X).X..(X.4)| 000000E0: AC 34 00 FE 08 14 00 96 20 A5 4D 32 28 58 29 B2 |.4...... .M2(X).| 000000F0: 58 AB B5 28 58 AD 31 30 30 29 AC 31 30 30 00 1A |X..(X.100).100..| 00000100: 09 1E 00 96 20 A5 4D 33 28 58 29 B2 58 AB B5 28 |.... .M3(X).X..(| 00000110: 58 AD 34 30 30 29 AC 34 30 30 00 32 09 28 00 96 |X.400).400.2.(..| 00000120: 20 A5 4D 37 28 58 29 B2 58 AB B5 28 58 AD 37 29 | .M7(X).X..(X.7)| 00000130: AC 37 00 38 09 2C 00 8F 00 54 09 2D 00 8F 2A 2A |.7.8.,...T.-..**| 00000140: 2A 20 44 49 4D 45 4E 53 49 4F 4E 45 52 49 4E 47 |* DIMENSIONERING| 00000150: 20 2A 2A 2A 00 5A 09 2E 00 8F 00 7C 09 32 00 86 | ***.Z.....|.2..| 00000160: 20 4D 4F 24 28 31 32 29 2C 4D 44 28 31 32 29 2C | MO$(12),MD(12),| 00000170: 57 59 24 28 37 29 2C 43 28 34 32 29 00 8B 09 3C |WY$(7),C(42)...<| 00000180: 00 81 20 4D B2 31 20 A4 20 31 32 00 9E 09 46 00 |.. M.1 . 12...F.| 00000190: 87 20 4D 4F 24 28 4D 29 2C 4D 44 28 4D 29 00 A6 |. MO$(M),MD(M)..| 000001A0: 09 50 00 82 20 4D 00 B4 09 5A 00 81 20 44 B2 31 |.P.. M...Z.. D.1| 000001B0: 20 A4 20 37 00 C1 09 64 00 87 20 57 59 24 28 44 | . 7...d.. WY$(D| 000001C0: 29 00 C9 09 6E 00 82 20 44 00 F6 09 78 00 83 20 |)...n.. D...x.. | 000001D0: 4A 41 4E 55 41 52 2C 33 31 2C 46 45 42 52 55 41 |JANUAR,31,FEBRUA| 000001E0: 52 2C 32 38 2C 4D 41 52 54 53 2C 33 31 2C 41 50 |R,28,MARTS,31,AP| 000001F0: 52 49 4C 2C 33 30 00 1D 0A 82 00 83 20 4D 41 4A |RIL,30...... MAJ| 00000200: 2C 33 31 2C 4A 55 4E 49 2C 33 30 2C 4A 55 4C 49 |,31,JUNI,30,JULI| 00000210: 2C 33 31 2C 41 55 47 55 53 54 2C 33 31 00 53 0A |,31,AUGUST,31.S.| 00000220: 8C 00 83 20 53 45 50 54 45 4D 42 45 52 2C 33 30 |... SEPTEMBER,30| 00000230: 2C 4F 4B 54 4F 42 45 52 2C 33 31 2C 4E 4F 56 45 |,OKTOBER,31,NOVE| 00000240: 4D 42 45 52 2C 33 30 2C 44 45 43 45 4D 42 45 52 |MBER,30,DECEMBER| 00000250: 2C 33 31 00 82 0A 96 00 83 22 53 30 4E 22 2C 22 |,31......"S0N","| 00000260: 4D 41 4E 22 2C 22 54 49 52 22 2C 22 4F 4E 53 22 |MAN","TIR","ONS"| 00000270: 2C 22 54 4F 52 22 2C 22 46 52 45 22 2C 22 4C 30 |,"TOR","FRE","L0| 00000280: 52 22 00 8E 0A 98 00 53 31 24 B2 22 20 22 00 99 |R".....S1$." "..| 00000290: 0A 99 00 4E 55 24 B2 22 22 00 BA 0A 9A 00 51 43 |...NU$."".....QC| 000002A0: 24 B2 53 31 24 3A 51 4C B2 34 30 3A 8D 20 32 33 |$.S1$:QL.40:. 23| 000002B0: 37 30 3A 53 53 24 B2 51 53 24 00 C3 0A A0 00 44 |70:SS$.QS$.....D| 000002C0: 57 B2 35 00 CC 0A AA 00 44 4C B2 35 00 D5 0A B4 |W.5.....DL.5....| 000002D0: 00 50 52 B2 34 00 E3 0A BE 00 51 54 24 B2 C7 28 |.PR.4.....QT$..(| 000002E0: 33 34 29 00 EC 0A C8 00 43 54 B2 30 00 F6 0A D2 |34).....CT.0....| 000002F0: 00 56 57 B2 38 30 00 09 0B DC 00 4D 57 B2 B5 28 |.VW.80.....MW..(| 00000300: 28 56 57 AB 31 29 AD 37 29 00 13 0B E6 00 56 4C |(VW.1).7).....VL| 00000310: B2 36 36 00 26 0B F0 00 4D 4C B2 B5 28 28 56 4C |.66.&...ML..((VL| 00000320: AB 35 29 AD 36 29 00 35 0B FA 00 56 4C 24 B2 C7 |.5).6).5...VL$..| 00000330: 28 31 32 35 29 00 44 0B 04 01 48 4C 24 B2 C7 28 |(125).D...HL$..(| 00000340: 31 39 32 29 00 57 0B 0E 01 86 20 4D 53 24 28 33 |192).W.... MS$(3| 00000350: 31 2C 4D 4C AB 31 29 00 5D 0B 12 01 8F 00 70 0B |1,ML.1).].....p.| 00000360: 13 01 8F 2A 2A 2A 20 49 4E 50 55 54 20 2A 2A 2A |...*** INPUT ***| 00000370: 00 76 0B 14 01 8F 00 80 0B 18 01 8D 20 34 35 30 |.v.......... 450| 00000380: 00 8B 0B 22 01 8D 20 31 31 37 30 00 91 0B 26 01 |...".. 1170...&.| 00000390: 8F 00 A9 0B 27 01 8F 2A 2A 2A 20 48 4F 56 45 44 |....'..*** HOVED| 000003A0: 2D 4D 45 4E 55 20 2A 2A 2A 00 AF 0B 28 01 8F 00 |-MENU ***...(...| 000003B0: B8 0B 2C 01 99 22 93 22 00 EB 0B 36 01 99 22 13 |..,.."."...6..".| 000003C0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 000003D0: 11 11 11 11 11 11 11 11 3C 31 3E 20 4C 49 4C 4C |........<1> LILL| 000003E0: 45 20 4B 41 4C 45 4E 44 45 52 22 00 05 0C 40 01 |E KALENDER"...@.| 000003F0: 99 22 11 3C 32 3E 20 53 54 4F 52 20 4B 41 4C 45 |.".<2> STOR KALE| 00000400: 4E 44 45 52 22 00 21 0C 4A 01 99 22 11 3C 33 3E |NDER".!.J..".<3>| 00000410: 20 49 4E 44 53 4B 52 49 56 45 20 4E 4F 54 45 52 | INDSKRIVE NOTER| 00000420: 22 00 4A 0C 54 01 99 22 11 3C 34 3E 20 4C 4F 41 |".J.T..".<4> LOA| 00000430: 44 20 46 52 41 20 54 41 50 45 20 45 4C 4C 45 52 |D FRA TAPE ELLER| 00000440: 20 54 41 53 54 41 54 55 52 22 00 5B 0C 59 01 99 | TASTATUR".[.Y..| 00000450: 22 20 20 20 20 20 20 20 20 2E 22 00 6F 0C 5E 01 |" .".o.^.| 00000460: 99 22 3C 35 3E 20 4E 59 20 4D 41 4E 45 44 22 00 |."<5> NY MANED".| 00000470: 92 0C 63 01 99 22 20 20 20 20 20 20 20 20 20 20 |..c.." | 00000480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000490: 2E 22 00 BA 0C 68 01 99 22 3C 36 3E 20 53 41 56 |."...h.."<6> SAV| 000004A0: 45 20 4E 4F 54 45 52 20 4F 47 20 46 4F 52 4D 41 |E NOTER OG FORMA| 000004B0: 54 20 50 41 20 54 41 50 45 22 00 CB 0C 72 01 99 |T PA TAPE"...r..| 000004C0: 22 11 3C 37 3E 20 53 4C 55 54 22 00 D1 0C 7C 01 |".<7> SLUT"...|.| 000004D0: 99 00 EE 0C 86 01 85 22 11 56 41 4C 47 3F 20 3C |.......".VALG? <| 000004E0: 31 2D 37 3E 3A 20 22 3B 46 3A 99 22 93 22 00 04 |1-7>: ";F:."."..| 000004F0: 0D 90 01 8B 20 46 B3 31 20 B0 20 46 B1 37 20 A7 |.... F.1 . F.7 .| 00000500: 20 33 30 30 00 12 0D 9A 01 8B 20 46 B2 37 20 A7 | 300...... F.7 .| 00000510: 20 80 00 37 0D A4 01 91 20 46 20 8D 20 38 32 30 | ..7.... F . 820| 00000520: 2C 31 36 39 30 2C 32 30 37 30 2C 31 31 37 30 2C |,1690,2070,1170,| 00000530: 34 35 30 2C 39 39 30 00 41 0D AE 01 89 20 33 30 |450,990.A.... 30| 00000540: 30 00 47 0D BC 01 8F 00 5F 0D BD 01 8F 2A 2A 2A |0.G....._....***| 00000550: 53 4B 49 46 54 20 4D 41 41 4E 45 44 2A 2A 2A 00 |SKIFT MAANED***.| 00000560: 65 0D BE 01 8F 00 88 0D C2 01 97 20 35 33 32 38 |e.......... 5328| 00000570: 30 2C 38 3A 97 20 35 33 32 38 31 2C 38 20 3A 99 |0,8:. 53281,8 :.| 00000580: 20 22 93 11 11 11 11 22 00 B8 0D C3 01 99 22 90 | "....."......".| 00000590: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000005A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000005B0: 2A 2A 2A 2A 2A 2A 2A 22 00 E9 0D C4 01 99 22 2A |*******"......"*| 000005C0: 20 20 05 4E 20 4F 20 54 20 45 20 52 20 49 20 4E | .N O T E R I N| 000005D0: 20 47 20 53 20 4B 20 41 20 4C 20 45 20 4E 20 44 | G S K A L E N D| 000005E0: 20 45 20 52 90 20 20 2A 22 00 18 0E C5 01 99 22 | E R. *"......"| 000005F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000600: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000610: 2A 2A 2A 2A 2A 2A 2A 22 00 2A 0E C6 01 99 22 11 |*******".*....".| 00000620: 11 49 4E 44 53 4B 52 49 56 22 00 45 0E C7 01 99 |.INDSKRIV".E....| 00000630: 22 20 2E 20 20 20 20 2E 22 3A 99 22 4D 41 4E 45 |" . .":."MANE| 00000640: 44 2C 41 52 22 00 56 0E C8 01 99 22 11 53 4F 4D |D,AR".V....".SOM| 00000650: 20 48 45 52 3A 22 00 78 0E C9 01 99 22 11 11 05 | HER:".x...."...| 00000660: 31 2C 31 39 38 35 90 20 3D 20 28 4A 41 4E 55 41 |1,1985. = (JANUA| 00000670: 52 2C 31 39 38 35 29 22 00 A8 0E CA 01 99 22 11 |R,1985)"......".| 00000680: 20 20 20 20 20 20 20 20 20 20 20 20 2E 22 3A 99 | .":.| 00000690: 22 4B 41 4C 45 4E 44 45 52 45 4E 20 47 41 52 20 |"KALENDEREN GAR | 000006A0: 4B 55 4E 20 46 52 41 22 00 CC 0E CB 01 99 22 11 |KUN FRA"......".| 000006B0: 05 4D 41 52 54 53 2C 31 39 32 30 20 2D 20 4E 4F |.MARTS,1920 - NO| 000006C0: 56 45 4D 42 45 52 2C 32 30 30 39 22 00 F2 0E CC |VEMBER,2009"....| 000006D0: 01 99 22 11 96 20 20 20 2E 20 20 20 20 20 2E 22 |..".. . ."| 000006E0: 3A 99 22 96 20 20 4D 41 4E 45 44 2C 20 41 52 3F |:.". MANED, AR?| 000006F0: 05 22 00 FC 0E FE 01 85 20 4D 2C 59 00 09 0F 03 |."...... M,Y....| 00000700: 02 59 B2 59 AA 31 39 30 30 00 25 0F 08 02 8B 20 |.Y.Y.1900.%.... | 00000710: 59 B3 31 39 32 30 20 B0 20 59 B1 32 30 30 38 20 |Y.1920 . Y.2008 | 00000720: A7 20 34 35 30 00 3E 0F 12 02 8B 20 59 B2 31 39 |. 450.>.... Y.19| 00000730: 32 30 20 AF 20 4D B3 33 20 A7 20 34 35 30 00 58 |20 . M.3 . 450.X| 00000740: 0F 1C 02 8B 20 59 B2 32 30 30 39 20 AF 20 4D B1 |.... Y.2009 . M.| 00000750: 31 31 20 A7 20 34 35 30 00 6F 0F 26 02 8B 20 4D |11 . 450.o.&.. M| 00000760: B3 31 20 B0 20 4D B1 31 32 20 A7 20 34 35 30 00 |.1 . M.12 . 450.| 00000770: 82 0F 30 02 48 24 B2 4D 4F 24 28 4D 29 AA C4 28 |..0.H$.MO$(M)..(| 00000780: 59 29 00 8F 0F 3A 02 4C 48 B2 C3 28 48 24 29 00 |Y)...:.LH..(H$).| 00000790: 95 0F 44 02 99 00 B3 0F 4E 02 99 22 93 4F 50 42 |..D.....N..".OPB| 000007A0: 59 47 47 45 52 20 4B 41 4C 45 4E 44 45 52 20 46 |YGGER KALENDER F| 000007B0: 4F 52 22 00 C3 0F 58 02 99 3A 99 20 48 24 3B 22 |OR"...X..:. H$;"| 000007C0: 2E 2E 2E 00 D3 0F 62 02 81 20 43 4E B2 31 20 A4 |......b.. CN.1 .| 000007D0: 20 34 32 00 DF 0F 6C 02 43 28 43 4E 29 B2 30 00 | 42...l.C(CN).0.| 000007E0: E8 0F 76 02 82 20 43 4E 00 F6 0F 80 02 59 31 B2 |..v.. CN.....Y1.| 000007F0: 59 AB 31 39 32 30 00 07 10 8A 02 8B 20 4D B3 B2 |Y.1920...... M..| 00000800: 32 20 A7 20 36 38 30 00 12 10 94 02 4D 31 B2 4D |2 . 680.....M1.M| 00000810: AB 33 00 1C 10 9E 02 89 20 37 30 30 00 27 10 A8 |.3...... 700.'..| 00000820: 02 4D 31 B2 4D AA 39 00 33 10 B2 02 59 31 B2 59 |.M1.M.9.3...Y1.Y| 00000830: 31 AB 31 00 57 10 BC 02 4A 44 B2 B5 28 31 34 36 |1.1.W...JD..(146| 00000840: 31 AC 59 31 AD 34 29 AA B5 28 28 31 35 33 AC 4D |1.Y1.4)..((153.M| 00000850: 31 AA 32 29 AD 35 29 00 68 10 C6 02 57 44 B2 A5 |1.2).5).h...WD..| 00000860: 4D 37 28 4A 44 AA 31 29 00 94 10 D0 02 8B 28 A5 |M7(JD.1)......(.| 00000870: 4D 31 28 59 29 B2 30 20 AF 20 A5 4D 32 28 59 29 |M1(Y).0 . .M2(Y)| 00000880: B3 B1 30 20 B0 20 A5 4D 33 28 59 29 B2 30 29 A7 |..0 . .M3(Y).0).| 00000890: 20 37 35 30 00 9D 10 DA 02 4C 50 B2 30 00 A7 10 | 750.....LP.0...| 000008A0: E4 02 89 20 37 36 30 00 B0 10 EE 02 4C 50 B2 31 |... 760.....LP.1| 000008B0: 00 BD 10 F8 02 4C 44 B2 4D 44 28 4D 29 00 D6 10 |.....LD.MD(M)...| 000008C0: 02 03 8B 20 4C 50 B2 31 20 AF 20 4D B2 32 20 A7 |... LP.1 . M.2 .| 000008D0: 20 4C 44 B2 32 39 00 E5 10 0C 03 81 20 44 B2 31 | LD.29...... D.1| 000008E0: 20 A4 20 4C 44 00 F3 10 16 03 43 28 44 AA 57 44 | . LD.....C(D.WD| 000008F0: 29 B2 44 00 FB 10 20 03 82 20 44 00 01 11 2A 03 |).D... .. D...*.| 00000900: 8E 00 07 11 2E 03 8F 00 29 11 2F 03 8F 2A 2A 2A |........)./..***| 00000910: 20 50 52 49 4E 54 20 4C 49 4C 4C 45 20 4B 41 4C | PRINT LILLE KAL| 00000920: 45 4E 44 45 52 20 2A 2A 2A 00 2F 11 30 03 8F 00 |ENDER ***./.0...| 00000930: 3F 11 34 03 99 22 93 22 3A 8D 20 32 32 34 30 00 |?.4..".":. 2240.| 00000940: 56 11 3E 03 99 20 A3 28 32 30 AB 4C 48 29 AD 32 |V.>.. .(20.LH).2| 00000950: AA 31 29 3B 48 24 00 64 11 48 03 81 20 44 B2 31 |.1);H$.d.H.. D.1| 00000960: 20 A4 20 37 00 7C 11 52 03 99 20 C8 28 57 59 24 | . 7.|.R.. .(WY$| 00000970: 28 44 29 2C 32 29 3B 20 53 31 24 3B 00 84 11 5C |(D),2); S1$;...\| 00000980: 03 82 20 44 00 8A 11 66 03 99 00 9C 11 70 03 81 |.. D...f.....p..| 00000990: 20 44 B2 31 20 A4 20 4C 44 AA 57 44 00 AD 11 7A | D.1 . LD.WD...z| 000009A0: 03 8B 43 28 44 29 B3 B1 30 A7 39 32 30 00 BC 11 |..C(D)..0.920...| 000009B0: 84 03 99 20 53 31 24 3B 53 31 24 3B 00 C6 11 8E |... S1$;S1$;....| 000009C0: 03 89 20 39 33 30 00 DE 11 98 03 99 20 C9 28 53 |.. 930...... .(S| 000009D0: 31 24 AA C4 28 43 28 44 29 29 2C 32 29 3B 00 E9 |1$..(C(D)),2);..| 000009E0: 11 A2 03 99 20 53 31 24 3B 00 FC 11 AC 03 8B 20 |.... S1$;...... | 000009F0: A5 4D 37 28 44 29 B2 30 20 A7 20 99 00 04 12 B6 |.M7(D).0 . .....| 00000A00: 03 82 20 44 00 0A 12 C0 03 99 00 15 12 CA 03 8D |.. D............| 00000A10: 20 32 33 33 30 00 1B 12 D4 03 8E 00 21 12 D8 03 | 2330.......!...| 00000A20: 8F 00 3C 12 D9 03 8F 2A 2A 2A 20 53 41 56 45 20 |..<....*** SAVE | 00000A30: 4B 41 4C 45 4E 44 45 52 20 2A 2A 2A 00 42 12 DA |KALENDER ***.B..| 00000A40: 03 8F 00 48 12 DE 03 99 00 54 12 E8 03 59 4E 24 |...H.....T...YN$| 00000A50: B2 22 4E 22 00 5A 12 F2 03 8F 00 60 12 FC 03 8F |."N".Z.....`....| 00000A60: 00 6C 12 06 04 46 4F 24 B2 4E 55 24 00 81 12 10 |.l...FO$.NU$....| 00000A70: 04 85 22 46 49 4C 45 4E 41 56 4E 20 22 3B 46 4F |.."FILENAVN ";FO| 00000A80: 24 00 96 12 1A 04 8B 20 46 4F 24 B3 B1 4E 55 24 |$...... FO$..NU$| 00000A90: A7 20 31 30 37 30 00 AE 12 24 04 99 20 22 44 41 |. 1070...$.. "DA| 00000AA0: 54 41 20 49 4B 4B 45 20 53 41 56 45 44 22 00 B4 |TA IKKE SAVED"..| 00000AB0: 12 29 04 8E 00 C4 12 2E 04 9F 20 31 2C 31 2C 31 |.)........ 1,1,1| 00000AC0: 2C 46 4F 24 00 D6 12 30 04 8B 20 53 54 B2 30 20 |,FO$...0.. ST.0 | 00000AD0: A7 20 31 30 38 30 00 F2 12 32 04 99 22 54 41 50 |. 1080...2.."TAP| 00000AE0: 45 46 45 4A 4C 2E 20 49 4B 4B 45 20 53 41 56 45 |EFEJL. IKKE SAVE| 00000AF0: 44 22 00 F8 12 34 04 8E 00 02 13 38 04 98 31 2C |D"...4.....8..1,| 00000B00: 43 57 00 0C 13 42 04 98 31 2C 43 4C 00 1C 13 4C |CW...B..1,CL...L| 00000B10: 04 81 20 43 4E B2 31 20 A4 20 33 31 00 2D 13 56 |.. CN.1 . 31.-.V| 00000B20: 04 81 20 4C B2 31 20 A4 20 43 4C AB 31 00 46 13 |.. L.1 . CL.1.F.| 00000B30: 60 04 98 31 2C 51 54 24 3B 4D 53 24 28 43 4E 2C |`..1,QT$;MS$(CN,| 00000B40: 4C 29 3B 51 54 24 00 51 13 6A 04 82 20 4C 2C 43 |L);QT$.Q.j.. L,C| 00000B50: 4E 00 59 13 74 04 A0 20 31 00 73 13 7E 04 99 22 |N.Y.t.. 1.s.~.."| 00000B60: 44 41 54 41 20 53 41 56 45 44 20 49 4E 20 22 3B |DATA SAVED IN ";| 00000B70: 46 4F 24 00 79 13 88 04 8E 00 7F 13 8C 04 8F 00 |FO$.y...........| 00000B80: 95 13 8D 04 8F 2A 2A 2A 46 4F 52 4D 41 54 56 41 |.....***FORMATVA| 00000B90: 4C 47 2A 2A 2A 00 9B 13 8E 04 8F 00 A4 13 92 04 |LG***...........| 00000BA0: 99 22 93 22 00 BE 13 9C 04 99 22 4B 41 4C 45 4E |."."......"KALEN| 00000BB0: 44 45 52 53 54 4F 52 52 45 4C 53 45 3A 22 00 E0 |DERSTORRELSE:"..| 00000BC0: 13 A6 04 99 22 11 11 20 20 20 20 20 20 20 3C 31 |....".. <1| 00000BD0: 3E 20 20 46 52 41 20 54 41 53 54 41 54 55 52 22 |> FRA TASTATUR"| 00000BE0: 00 EE 13 A7 04 99 22 20 20 20 20 20 2F 22 00 FC |......" /"..| 00000BF0: 13 A8 04 99 20 22 56 41 4C 47 3A 22 00 0A 14 A9 |.... "VALG:"....| 00000C00: 04 99 22 20 20 20 20 20 CD 22 00 2A 14 AA 04 99 |.." .".*....| 00000C10: 22 20 20 20 20 20 20 20 3C 32 3E 20 4C 4F 41 44 |" <2> LOAD| 00000C20: 20 46 52 41 20 54 41 50 45 22 00 4C 14 AB 04 99 | FRA TAPE".L....| 00000C30: 3A 99 3A 99 22 20 20 20 31 20 22 3A 99 22 91 91 |:.:." 1 ":."..| 00000C40: 1D 1D 1D 22 3A 85 22 20 22 3B 43 44 00 67 14 C4 |...":." ";CD.g..| 00000C50: 04 8B 20 43 44 B3 B1 31 20 AF 20 43 44 B3 B1 32 |.. CD..1 . CD..2| 00000C60: 20 A7 20 31 31 37 30 00 79 14 CE 04 8B 20 43 44 | . 1170.y.... CD| 00000C70: B2 32 20 A7 20 31 34 37 30 00 7F 14 D8 04 99 00 |.2 . 1470.......| 00000C80: 9E 14 E2 04 99 20 22 53 4C 45 54 54 45 52 20 47 |..... "SLETTER G| 00000C90: 41 4D 4C 45 20 4E 4F 54 45 52 2E 2E 2E 22 00 AE |AMLE NOTER..."..| 00000CA0: 14 EC 04 81 20 43 4E B2 30 20 A4 20 33 31 00 BF |.... CN.0 . 31..| 00000CB0: 14 F6 04 81 20 4C B2 31 20 A4 20 4D 4C AB 31 00 |.... L.1 . ML.1.| 00000CC0: D1 14 00 05 4D 53 24 28 43 4E 2C 4C 29 B2 4E 55 |....MS$(CN,L).NU| 00000CD0: 24 00 DC 14 0A 05 82 20 4C 2C 43 4E 00 E2 14 14 |$...... L,CN....| 00000CE0: 05 99 00 12 15 1E 05 99 20 22 54 41 53 54 20 42 |........ "TAST B| 00000CF0: 52 45 44 44 45 20 28 34 2D 22 3B 4D 57 3B 22 29 |REDDE (4-";MW;")| 00000D00: 20 50 41 41 20 53 4B 41 45 52 4D 20 4D 41 58 20 | PAA SKAERM MAX | 00000D10: 35 22 00 2D 15 28 05 99 20 22 28 52 45 54 55 52 |5".-.(.. "(RETUR| 00000D20: 4E 3D 22 3B 44 57 3B 22 29 22 20 53 53 00 37 15 |N=";DW;")" SS.7.| 00000D30: 32 05 43 57 B2 44 57 00 40 15 3C 05 85 20 43 57 |2.CW.DW.@.<.. CW| 00000D40: 00 5A 15 5A 05 8B 20 43 57 B3 34 20 B0 20 43 57 |.Z.Z.. CW.4 . CW| 00000D50: B1 4D 57 20 A7 20 31 33 30 30 00 60 15 64 05 99 |.MW . 1300.`.d..| 00000D60: 00 8F 15 6E 05 99 20 22 54 41 53 54 20 48 4F 4A |...n.. "TAST HOJ| 00000D70: 44 45 20 28 32 2D 22 3B 4D 4C 3B 22 29 20 50 41 |DE (2-";ML;") PA| 00000D80: 41 20 53 4B 41 45 52 4D 20 4D 41 58 20 32 22 00 |A SKAERM MAX 2".| 00000D90: A7 15 78 05 99 20 22 28 52 45 54 55 52 4E 3D 22 |..x.. "(RETURN="| 00000DA0: 3B 44 4C 3B 22 29 22 00 B1 15 82 05 43 4C B2 44 |;DL;")".....CL.D| 00000DB0: 4C 00 BA 15 8C 05 85 20 43 4C 00 D4 15 AA 05 8B |L...... CL......| 00000DC0: 20 43 4C B3 32 20 B0 20 43 4C B1 4D 4C 20 A7 20 | CL.2 . CL.ML . | 00000DD0: 31 33 38 30 00 DF 15 B4 05 89 20 31 36 31 30 00 |1380...... 1610.| 00000DE0: EB 15 BE 05 59 4E 24 B2 22 4E 22 00 F1 15 C8 05 |....YN$."N".....| 00000DF0: 8F 00 F7 15 D2 05 8F 00 03 16 DC 05 46 49 24 B2 |............FI$.| 00000E00: 4E 55 24 00 18 16 E1 05 85 22 46 49 4C 45 4E 41 |NU$......"FILENA| 00000E10: 56 4E 20 22 3B 46 49 24 00 2D 16 E6 05 8B 20 46 |VN ";FI$.-.... F| 00000E20: 49 24 B3 B1 4E 55 24 A7 20 31 35 32 35 00 45 16 |I$..NU$. 1525.E.| 00000E30: EB 05 99 22 44 41 54 41 20 49 4B 4B 45 20 4C 4F |..."DATA IKKE LO| 00000E40: 41 44 45 44 22 00 50 16 F0 05 89 20 31 31 37 30 |ADED".P.... 1170| 00000E50: 00 60 16 F5 05 9F 20 31 2C 31 2C 30 2C 46 49 24 |.`.... 1,1,0,FI$| 00000E60: 00 6A 16 FA 05 84 31 2C 43 57 00 74 16 04 06 84 |.j....1,CW.t....| 00000E70: 31 2C 43 4C 00 84 16 0E 06 81 20 43 4E B2 31 20 |1,CL...... CN.1 | 00000E80: A4 20 33 31 00 95 16 18 06 81 20 4C B2 31 20 A4 |. 31...... L.1 .| 00000E90: 20 43 4C AB 31 00 A6 16 22 06 84 31 2C 4D 53 24 | CL.1..."..1,MS$| 00000EA0: 28 43 4E 2C 4C 29 00 B1 16 2C 06 82 20 4C 2C 43 |(CN,L)...,.. L,C| 00000EB0: 4E 00 B9 16 36 06 A0 20 31 00 D3 16 38 06 8B 20 |N...6.. 1...8.. | 00000EC0: 53 54 B2 30 20 B0 20 53 54 B2 36 34 20 A7 20 31 |ST.0 . ST.64 . 1| 00000ED0: 36 30 30 00 F5 16 3A 06 99 22 54 41 50 45 46 45 |600...:.."TAPEFE| 00000EE0: 4A 4C 2E 20 44 41 54 41 20 49 4B 4B 45 20 4C 4F |JL. DATA IKKE LO| 00000EF0: 41 44 45 44 22 00 12 17 3C 06 99 20 22 44 41 54 |ADED"...<.. "DAT| 00000F00: 41 20 4C 4F 41 44 45 44 20 46 52 41 20 22 3B 46 |A LOADED FRA ";F| 00000F10: 49 24 00 2E 17 40 06 99 22 44 41 54 41 20 4C 4F |I$...@.."DATA LO| 00000F20: 41 44 45 44 20 46 52 41 20 22 3B 46 49 24 00 3C |ADED FRA ";FI$.<| 00000F30: 17 4A 06 50 57 B2 43 57 AC 37 AA 31 00 48 17 54 |.J.PW.CW.7.1.H.T| 00000F40: 06 4E 42 B2 43 4C AB 31 00 5B 17 5E 06 4F 46 B2 |.NB.CL.1.[.^.OF.| 00000F50: B5 28 28 43 57 AB 33 29 AD 32 29 00 65 17 68 06 |.((CW.3).2).e.h.| 00000F60: 51 4C B2 50 57 00 71 17 72 06 51 43 24 B2 48 4C |QL.PW.q.r.QC$.HL| 00000F70: 24 00 7C 17 7C 06 8D 20 32 33 37 30 00 87 17 86 |$.|.|.. 2370....| 00000F80: 06 52 24 B2 51 53 24 00 8D 17 90 06 8E 00 93 17 |.R$.QS$.........| 00000F90: 94 06 8F 00 B4 17 95 06 8F 2A 2A 2A 20 50 52 49 |.........*** PRI| 00000FA0: 4E 54 20 53 54 4F 52 20 4B 41 4C 45 4E 44 45 52 |NT STOR KALENDER| 00000FB0: 20 2A 2A 2A 00 BA 17 96 06 8F 00 CA 17 9A 06 99 | ***............| 00000FC0: 22 93 22 3A 8D 20 32 32 34 30 00 D3 17 A4 06 99 |".":. 2240......| 00000FD0: 20 52 24 00 E9 17 AE 06 54 42 B2 B5 28 28 50 57 | R$.....TB..((PW| 00000FE0: AB 32 AB 4C 48 29 AD 32 29 00 0C 18 B8 06 99 20 |.2.LH).2)...... | 00000FF0: 56 4C 24 3B A6 54 42 29 3B 48 24 3B A6 50 57 AB |VL$;.TB);H$;.PW.| 00001000: 4C 48 AB 54 42 AB 32 29 3B 56 4C 24 00 15 18 C2 |LH.TB.2);VL$....| 00001010: 06 99 20 52 24 00 24 18 CC 06 81 20 44 41 B2 31 |.. R$.$.... DA.1| 00001020: 20 A4 20 37 00 38 18 D6 06 8B 20 44 41 B2 31 20 | . 7.8.... DA.1 | 00001030: A7 20 99 20 56 4C 24 3B 00 4D 18 E0 06 8B 20 44 |. . VL$;.M.... D| 00001040: 41 B3 B1 31 20 A7 20 99 20 53 31 24 3B 00 6B 18 |A..1 . . S1$;.k.| 00001050: EA 06 99 20 A6 4F 46 29 3B 57 59 24 28 44 41 29 |... .OF);WY$(DA)| 00001060: 3B A6 43 57 AB 34 AB 4F 46 29 3B 00 74 18 F4 06 |;.CW.4.OF);.t...| 00001070: 82 20 44 41 00 7E 18 FE 06 99 20 56 4C 24 00 87 |. DA.~.... VL$..| 00001080: 18 08 07 99 20 52 24 00 9D 18 12 07 4C 57 B2 AB |.... R$.....LW..| 00001090: B5 28 AB 28 4C 44 AA 57 44 29 AD 37 29 00 AC 18 |.(.(LD.WD).7)...| 000010A0: 1C 07 81 20 57 B2 31 20 A4 20 4C 57 00 BB 18 26 |... W.1 . LW...&| 000010B0: 07 81 20 4C B2 31 20 A4 20 4E 42 00 CA 18 30 07 |.. L.1 . NB...0.| 000010C0: 81 20 44 41 B2 31 20 A4 20 37 00 D5 18 3A 07 99 |. DA.1 . 7...:..| 000010D0: 20 56 4C 24 3B 00 E7 18 44 07 44 4E B2 44 41 AA | VL$;...D.DN.DA.| 000010E0: 28 57 AB 31 29 AC 37 00 FB 18 4E 07 4D 24 B2 4D |(W.1).7...N.M$.M| 000010F0: 53 24 28 43 28 44 4E 29 2C 4C 29 00 12 19 58 07 |S$(C(DN),L)...X.| 00001100: 99 20 4D 24 3B A6 43 57 AB C3 28 4D 24 29 AB 31 |. M$;.CW..(M$).1| 00001110: 29 3B 00 1B 19 62 07 82 20 44 41 00 25 19 6C 07 |);...b.. DA.%.l.| 00001120: 99 20 56 4C 24 00 2D 19 76 07 82 20 4C 00 3C 19 |. VL$.-.v.. L.<.| 00001130: 80 07 81 20 44 41 B2 31 20 A4 20 37 00 47 19 8A |... DA.1 . 7.G..| 00001140: 07 99 20 56 4C 24 3B 00 59 19 94 07 44 4E B2 44 |.. VL$;.Y...DN.D| 00001150: 41 AA 28 57 AB 31 29 AC 37 00 6F 19 9E 07 8B 20 |A.(W.1).7.o.... | 00001160: 43 28 44 4E 29 B3 B1 30 20 A7 20 31 39 38 30 00 |C(DN)..0 . 1980.| 00001170: 7D 19 A8 07 99 20 A6 43 57 AB 31 29 3B 00 88 19 |}.... .CW.1);...| 00001180: B2 07 89 20 32 30 30 30 00 99 19 BC 07 44 54 24 |... 2000.....DT$| 00001190: B2 C4 28 43 28 44 4E 29 29 00 B1 19 C1 07 44 54 |..(C(DN)).....DT| 000011A0: 24 B2 C9 28 44 54 24 2C C3 28 44 54 24 29 AB 31 |$..(DT$,.(DT$).1| 000011B0: 29 00 CA 19 C6 07 99 20 A6 43 57 AB C3 28 44 54 |)...... .CW..(DT| 000011C0: 24 29 AB 31 29 3B 44 54 24 3B 00 D3 19 D0 07 82 |$).1);DT$;......| 000011D0: 20 44 41 00 DD 19 DA 07 99 20 56 4C 24 00 E6 19 | DA...... VL$...| 000011E0: E4 07 99 20 52 24 00 EE 19 EE 07 82 20 57 00 F4 |... R$...... W..| 000011F0: 19 F8 07 99 00 FF 19 02 08 8D 20 32 33 33 30 00 |.......... 2330.| 00001200: 1E 1A 07 08 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |....."..........| 00001210: 1D 54 52 59 4B 20 27 53 50 41 43 45 27 22 00 24 |.TRYK 'SPACE'".$| 00001220: 1A 0C 08 8E 00 2A 1A 10 08 8F 00 44 1A 11 08 8F |.....*.....D....| 00001230: 2A 2A 2A 20 53 4B 52 49 56 45 20 4E 4F 54 45 52 |*** SKRIVE NOTER| 00001240: 20 2A 2A 2A 00 4A 1A 12 08 8F 00 50 1A 16 08 99 | ***.J.....P....| 00001250: 00 74 1A 20 08 99 22 4E 59 20 4E 4F 54 45 20 49 |.t. .."NY NOTE I| 00001260: 20 44 41 54 4F 45 4E 3F 20 28 31 2D 22 3B 4C 44 | DATOEN? (1-";LD| 00001270: 3B 22 29 22 00 7D 1A 2A 08 53 44 B2 30 00 9C 1A |;")".}.*.SD.0...| 00001280: 34 08 85 20 22 54 41 53 54 20 3C 30 3E 20 46 4F |4.. "TAST <0> FO| 00001290: 52 20 53 4C 55 54 3A 20 22 3B 53 44 00 B3 1A 3E |R SLUT: ";SD...>| 000012A0: 08 8B 20 53 44 B3 31 20 B0 20 53 44 B1 4C 44 20 |.. SD.1 . SD.LD | 000012B0: A7 20 8E 00 B9 1A 48 08 99 00 C8 1A 5C 08 81 20 |. ....H.....\.. | 000012C0: 4C B2 31 20 A4 20 4E 42 00 D8 1A 66 08 99 22 4C |L.1 . NB...f.."L| 000012D0: 49 4E 49 45 20 22 3B 4C 00 E4 1A 70 08 54 58 24 |INIE ";L...p.TX$| 000012E0: B2 4E 55 24 00 EE 1A 7A 08 85 20 54 58 24 00 12 |.NU$...z.. TX$..| 000012F0: 1B 84 08 8B 20 C3 28 54 58 24 29 B1 43 57 AB 31 |.... .(TX$).CW.1| 00001300: 20 A7 20 54 58 24 B2 C8 28 54 58 24 2C 43 57 AB | . TX$..(TX$,CW.| 00001310: 31 29 00 24 1B 8E 08 4D 53 24 28 53 44 2C 4C 29 |1).$...MS$(SD,L)| 00001320: B2 54 58 24 00 2C 1B 98 08 82 20 4C 00 32 1B A2 |.TX$.,.... L.2..| 00001330: 08 99 00 47 1B AC 08 99 20 22 54 45 4B 53 54 20 |...G.... "TEKST | 00001340: 49 4E 44 53 41 54 22 00 52 1B B6 08 89 20 32 30 |INDSAT".R.... 20| 00001350: 37 30 00 58 1B BA 08 8F 00 70 1B BB 08 8F 2A 2A |70.X.....p....**| 00001360: 2A 20 53 55 42 52 55 54 49 4E 45 52 20 2A 2A 2A |* SUBRUTINER ***| 00001370: 00 76 1B BC 08 8F 00 81 1B C0 08 4F 44 B2 31 3A |.v.........OD.1:| 00001380: 8E 00 AB 1B CA 08 99 22 93 2C 11 11 11 11 11 11 |.......".,......| 00001390: 11 11 11 11 11 11 11 11 11 11 55 44 53 4B 52 49 |..........UDSKRI| 000013A0: 46 54 20 4F 4E 53 4B 45 53 3A 22 00 C1 1B CB 08 |FT ONSKES:".....| 000013B0: 99 3A 99 3A 99 22 54 56 20 20 20 20 20 20 3C 31 |.:.:."TV <1| 000013C0: 3E 00 D6 1B CC 08 99 3A 99 22 50 52 49 4E 54 45 |>......:."PRINTE| 000013D0: 52 20 3C 32 3E 22 00 DF 1B D4 08 4F 44 B2 31 00 |R <2>".....OD.1.| 000013E0: 04 1C DE 08 99 3A 99 3A 85 20 22 56 41 4C 47 3A |.....:.:. "VALG:| 000013F0: 20 3C 31 3E 20 45 4C 4C 45 52 20 3C 32 3E 3A 20 | <1> ELLER <2>: | 00001400: 22 3B 4F 44 00 1F 1C E8 08 8B 20 4F 44 B3 B1 31 |";OD...... OD..1| 00001410: 20 AF 20 4F 44 B3 B1 32 20 A7 20 32 32 34 30 00 | . OD..2 . 2240.| 00001420: 2E 1C F2 08 8B 20 4F 44 B2 31 20 A7 20 8E 00 39 |..... OD.1 . ..9| 00001430: 1C FC 08 9F 20 4C 2C 50 52 00 41 1C 06 09 9D 20 |.... L,PR.A.... | 00001440: 31 00 47 1C 10 09 8E 00 5C 1C 1A 09 8B 20 4F 44 |1.G.....\.... OD| 00001450: B2 31 20 A7 20 8D 33 30 30 30 3A 8E 00 64 1C 24 |.1 . .3000:..d.$| 00001460: 09 98 31 2C 00 6C 1C 2E 09 A0 20 31 00 75 1C 33 |..1,.l.... 1.u.3| 00001470: 09 4F 44 B2 31 00 7F 1C 35 09 8D 33 30 30 30 00 |.OD.1...5..3000.| 00001480: 85 1C 38 09 8E 00 91 1C 42 09 51 53 24 B2 4E 55 |..8.....B.QS$.NU| 00001490: 24 00 A1 1C 4C 09 81 20 51 51 B2 31 20 A4 20 51 |$...L.. QQ.1 . Q| 000014A0: 4C 00 B1 1C 56 09 51 53 24 B2 51 53 24 AA 51 43 |L...V.QS$.QS$.QC| 000014B0: 24 00 BA 1C 60 09 82 20 51 51 00 C0 1C 6A 09 8E |$...`.. QQ...j..| 000014C0: 00 D5 1C B8 0B 8F 20 2A 2A 2A 20 50 41 55 53 45 |...... *** PAUSE| 000014D0: 20 2A 2A 2A 2A 00 E9 1C C2 0B A1 54 24 3A 8B 54 | ****......T$:.T| 000014E0: 24 B2 22 22 A7 33 30 31 30 00 EF 1C CC 0B 8E 00 |$."".3010.......| 000014F0: 0B 1D A0 0F 8F 20 53 41 56 45 20 22 54 49 4D 45 |..... SAVE "TIME| 00001500: 20 4D 41 4E 41 47 45 52 22 2C 38 00 00 00 | MANAGER",8... |
.......*********************.7....*
*.R....* **
*.M....* MICHAEL THYGESEN *......*
*......******************
***.......D....**** DEFINERING *****.J..
........ .M1(X).X..(X.4).4...... .M2(X).
X..(X.100).100...... .M3(X).X..(X.400).4
00.2.(.. .M7(X).X..(X.7).7.8.,...T.-..**
* DIMENSIONERING ***.Z.....|.2.. MO$(12)
,MD(12),WY$(7),C(42)...<.. M.1 . 12...F.
. MO$(M),MD(M)...P.. M...Z.. D.1 . 7.A.D
.. WY$(D).I.N.. D...X.. JANUAR,31,FEBRUA
R,28,MARTS,31,APRIL,30...... MAJ,31,JUNI
,30,JULI,31,AUGUST,31.S.... SEPTEMBER,30
,OKTOBER,31,NOVEMBER,30,DECEMBER,31.....
."S0N","MAN","TIR","ONS","TOR","FRE","L0
R".....S1$." ".....NU$."".....QC$.S1$:QL
.40:. 2370:SS$.QS$.C. .DW.5.L...DL.5.U..
.PR.4.....QT$.G(34)...H.CT.0...R.VW.80..
...MW..((VW.1).7).....VL.66.&...ML..((VL
.5).6).5...VL$.G(125).D...HL$.G(192).W..
.. MS$(31,ML.1).].....P....*** INPUT ***
.V.......... 450...".. 1170...&.....'..*
** HOVED-MENU ***...(.....,.."."...6..".
........................<1> LILLE KALEND
ER"...@..".<2> STOR KALENDER".!.J..".<3>
INDSKRIVE NOTER".J.T..".<4> LOAD FRA TA
PE ELLER TASTATUR".[.Y.." .".O.^.
."<5> NY MANED"...C.."
."...H.."<6> SAVE NOTER OG FORMA
T PA TAPE".K.R..".<7> SLUT".Q.|........"
.VALG? <1-7>: ";F:."."...... F.1 . F.7 .
300...... F.7 . ..7.... F . 820,1690,20
70,1170,450,990.A.... 300.G....._....***
SKIFT MAANED***.E.......B.. 53280,8:. 53
281,8 :. "....."...C..".****************
***********************"...D.."* .N O T
E R I N G S K A L E N D E R. *"...E.."
***************************************"
.*.F.."..INDSKRIV".E.G.." . .":."MANE
D,AR".V.H..".SOM HER:".X.I.."...1,1985.
= (JANUAR,1985)"...J..". .":.
"KALENDEREN GAR KUN FRA".L.K.."..MARTS,1
920 - NOVEMBER,2009"...L..".. . ."
:.". MANED, AR?."...... M,Y.....Y.Y.190
0.%.... Y.1920 . Y.2008 . 450.>.... Y.19
20 . M.3 . 450.X.... Y.2009 . M.11 . 450
.O.&.. M.1 . M.12 . 450...0.H$.MO$(M).D(
Y)...:.LH.C(H$)...D.....N..".OPBYGGER KA
LENDER FOR".C.X..:. H$;"....S.B.. CN.1 .
42...L.C(CN).0...V.. CN.....Y1.Y.1920..
.... M..2 . 680.....M1.M.3...... 700.'..
.M1.M.9.3...Y1.Y1.1.W...JD..(1461.Y1.4).
.((153.M1.2).5).H.F.WD..M7(JD.1)...P..(.
M1(Y).0 . .M2(Y)..0 . .M3(Y).0). 750...Z
.LP.0...... 760.....LP.1.....LD.MD(M).V.
... LP.1 . M.2 . LD.29...... D.1 . LD...
..C(D.WD).D... .. D...*.........)./..***
PRINT LILLE KALENDER ***./.0...?.4.."."
:. 2240.V.>.. .(20.LH).2.1);H$.D.H.. D.1
. 7.|.R.. H(WY$(D),2); S1$;...\.. D...F
.....P.. D.1 . LD.WD...Z..C(D)..0.920...
... S1$;S1$;.F.... 930...... I(S1$.D(C(D
)),2);...... S1$;...... .M7(D).0 . .....
.. D.........J.. 2330...T...!.X...<.Y..*
** SAVE KALENDER ***.B.Z...H.....T...YN$
."N".Z.....`.....L...FO$.NU$......"FILEN
AVN ";FO$...... FO$..NU$. 1070...$.. "DA
TA IKKE SAVED"...)...D.... 1,1,1,FO$.V.0
.. ST.0 . 1080...2.."TAPEFEJL. IKKE SAVE
D"...4.....8..1,CW...B..1,CL...L.. CN.1
. 31.-.V.. L.1 . CL.1.F.`..1,QT$;MS$(CN,
L);QT$.Q.J.. L,CN.Y.T. 1.S.~.."DATA SAV
ED IN ";FO$.Y...............***FORMATVA
LG***............"."......"KALENDERSTORR
ELSE:"......".. <1> FRA TASTATUR"
......" /"...... "VALG:"......"
M".*...." <2> LOAD FRA TAPE".L....
:.:." 1 ":.".....":." ";CD.G.D.. CD..1
. CD..2 . 1170.Y.N.. CD.2 . 1470..X...
..... "SLETTER GAMLE NOTER..."...... CN.
0 . 31...... L.1 . ML.1.Q...MS$(CN,L).NU
$...... L,CN............ "TAST BREDDE (4
-";MW;") PAA SKAERM MAX 5".-.(.. "(RETUR
N=";DW;")" SS.7.2.CW.DW.@.<.. CW.Z.Z.. C
W.4 . CW.MW . 1300.`.D.....N.. "TAST HOJ
DE (2-";ML;") PAA SKAERM MAX 2"...X.. "(
RETURN=";DL;")".....CL.DL...... CL.T....
CL.2 . CL.ML . 1380...... 1610.....YN$.
"N"...H.....R.......FI$.NU$......"FILENA
VN ";FI$.-.... FI$..NU$. 1525.E...."DATA
IKKE LOADED".P.... 1170.`.... 1,1,0,FI$
.J....1,CW.T....1,CL...... CN.1 . 31....
.. L.1 . CL.1..."..1,MS$(CN,L)...,.. L,C
N...6. 1.S.8.. ST.0 . ST.64 . 1600...:.
."TAPEFEJL. DATA IKKE LOADED"...<.. "DAT
A LOADED FRA ";FI$...@.."DATA LOADED FRA
";FI$.<.J.PW.CW.7.1.H.T.NB.CL.1.[.^.OF.
.((CW.3).2).E.H.QL.PW.Q.R.QC$.HL$.|.|..
2370.....R$.QS$..................*** PRI
NT STOR KALENDER ***.......J....".":. 22
40.S.... R$.....TB..((PW.2.LH).2)......
VL$;.TB);H$;.PW.LH.TB.2);VL$...B.. R$.$.
L.. DA.1 . 7.8.V.. DA.1 . . VL$;.M.... D
A..1 . . S1$;.K.... .OF);WY$(DA);.CW.4.O
F);.T.... DA.~.... VL$...... R$.....LW..
.(.(LD.WD).7)...... W.1 . LW...&.. L.1 .
NB.J.0.. DA.1 . 7.U.:.. VL$;...D.DN.DA.
(W.1).7...N.M$.MS$(C(DN),L)...X.. M$;.CW
.C(M$).1);...B.. DA.%.L.. VL$.-.V.. L.<.
... DA.1 . 7.G.... VL$;.Y...DN.DA.(W.1).
7.O.... C(DN)..0 . 1980.}.... .CW.1);...
... 2000.....DT$.D(C(DN))...A.DT$.I(DT$,
C(DT$).1).J.F.. .CW.C(DT$).1);DT$;.S.P..
DA...Z.. VL$...... R$...... W..........
.. 2330......"...........TRYK 'SPACE'".$
.....*.....D....*** SKRIVE NOTER ***.J..
...P.....T. .."NY NOTE I DATOEN? (1-";LD
;")".}.*.SD.0...4.. "TAST <0> FOR SLUT:
";SD...>.. SD.1 . SD.LD . ....H...H.\..
L.1 . NB.X.F.."LINIE ";L...P.TX$.NU$...Z
.. TX$...... C(TX$).CW.1 . TX$.H(TX$,CW.
1).$...MS$(SD,L).TX$.,.... L.2.....G....
"TEKST INDSAT".R.... 2070.X.....P....**
* SUBRUTINER ***.V.........OD.1:....J.."
.,................UDSKRIFT ONSKES:".A.K.
.:.:."TV <1>.V.L..:."PRINTER <2>"..
.T.OD.1......:.:. "VALG: <1> ELLER <2>:
";OD...... OD..1 . OD..2 . 2240...... OD
.1 . ..9.... L,PR.A.... 1.G.....\.... OD
.1 . .3000:..D.$..1,.L... 1.U.3.OD.1..
5..3000...8.....B.QS$.NU$...L.. QQ.1 . Q
L...V.QS$.QS$.QC$...`.. QQ...J...U.... *
** PAUSE ****...B..T$:.T$."".3010...L...
.. .. SAVE "TIME MANAGER",8...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL