TIME MANAGER
FILE INFORMATION
FILENAME(S): TIME MANAGER
FILE TYPE(S): PRG
FILE SIZE: 5.3K
FIRST SEEN: 2025-11-30 19:37:00
APPEARS ON: 1 disk(s)
FILE HASH
480cf879fb33600e3c02f25258351417f08788c09fe014f7b94b5eb3df37ef7b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10 8 86 | TIME MANAGER | PRG | Curtcool, Bo | 3 | 0 | 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 76 0E C9 01 99 22 11 11 05 | HER:".v...."...|
00000660: 31 2C 38 35 90 20 3D 20 28 4A 41 4E 55 41 52 2C |1,85. = (JANUAR,|
00000670: 31 39 38 35 29 22 00 A6 0E CA 01 99 22 11 20 20 |1985)"......". |
00000680: 20 20 20 20 20 20 20 20 20 20 2E 22 3A 99 22 4B | .":."K|
00000690: 41 4C 45 4E 44 45 52 45 4E 20 47 41 52 20 4B 55 |ALENDEREN GAR KU|
000006A0: 4E 20 46 52 41 22 00 CA 0E CB 01 99 22 11 05 4D |N FRA"......"..M|
000006B0: 41 52 54 53 2C 31 39 32 30 20 2D 20 4E 4F 56 45 |ARTS,1920 - NOVE|
000006C0: 4D 42 45 52 2C 32 30 30 39 22 00 F0 0E CC 01 99 |MBER,2009"......|
000006D0: 22 11 96 20 20 20 2E 20 20 20 20 20 2E 22 3A 99 |".. . .":.|
000006E0: 22 96 20 20 4D 41 4E 45 44 2C 20 41 52 3F 05 22 |". MANED, AR?."|
000006F0: 00 FA 0E FE 01 85 20 4D 2C 59 00 07 0F 03 02 59 |...... M,Y.....Y|
00000700: B2 59 AA 31 39 30 30 00 23 0F 08 02 8B 20 59 B3 |.Y.1900.#.... Y.|
00000710: 31 39 32 30 20 B0 20 59 B1 32 30 30 38 20 A7 20 |1920 . Y.2008 . |
00000720: 34 35 30 00 3C 0F 12 02 8B 20 59 B2 31 39 32 30 |450.<.... Y.1920|
00000730: 20 AF 20 4D B3 33 20 A7 20 34 35 30 00 56 0F 1C | . M.3 . 450.V..|
00000740: 02 8B 20 59 B2 32 30 30 39 20 AF 20 4D B1 31 31 |.. Y.2009 . M.11|
00000750: 20 A7 20 34 35 30 00 6D 0F 26 02 8B 20 4D B3 31 | . 450.m.&.. M.1|
00000760: 20 B0 20 4D B1 31 32 20 A7 20 34 35 30 00 80 0F | . M.12 . 450...|
00000770: 30 02 48 24 B2 4D 4F 24 28 4D 29 AA C4 28 59 29 |0.H$.MO$(M)..(Y)|
00000780: 00 8D 0F 3A 02 4C 48 B2 C3 28 48 24 29 00 93 0F |...:.LH..(H$)...|
00000790: 44 02 99 00 B1 0F 4E 02 99 22 93 4F 50 42 59 47 |D.....N..".OPBYG|
000007A0: 47 45 52 20 4B 41 4C 45 4E 44 45 52 20 46 4F 52 |GER KALENDER FOR|
000007B0: 22 00 C1 0F 58 02 99 3A 99 20 48 24 3B 22 2E 2E |"...X..:. H$;"..|
000007C0: 2E 00 D1 0F 62 02 81 20 43 4E B2 31 20 A4 20 34 |....b.. CN.1 . 4|
000007D0: 32 00 DD 0F 6C 02 43 28 43 4E 29 B2 30 00 E6 0F |2...l.C(CN).0...|
000007E0: 76 02 82 20 43 4E 00 F4 0F 80 02 59 31 B2 59 AB |v.. CN.....Y1.Y.|
000007F0: 31 39 32 30 00 05 10 8A 02 8B 20 4D B3 B2 32 20 |1920...... M..2 |
00000800: A7 20 36 38 30 00 10 10 94 02 4D 31 B2 4D AB 33 |. 680.....M1.M.3|
00000810: 00 1A 10 9E 02 89 20 37 30 30 00 25 10 A8 02 4D |...... 700.%...M|
00000820: 31 B2 4D AA 39 00 31 10 B2 02 59 31 B2 59 31 AB |1.M.9.1...Y1.Y1.|
00000830: 31 00 55 10 BC 02 4A 44 B2 B5 28 31 34 36 31 AC |1.U...JD..(1461.|
00000840: 59 31 AD 34 29 AA B5 28 28 31 35 33 AC 4D 31 AA |Y1.4)..((153.M1.|
00000850: 32 29 AD 35 29 00 66 10 C6 02 57 44 B2 A5 4D 37 |2).5).f...WD..M7|
00000860: 28 4A 44 AA 31 29 00 92 10 D0 02 8B 28 A5 4D 31 |(JD.1)......(.M1|
00000870: 28 59 29 B2 30 20 AF 20 A5 4D 32 28 59 29 B3 B1 |(Y).0 . .M2(Y)..|
00000880: 30 20 B0 20 A5 4D 33 28 59 29 B2 30 29 A7 20 37 |0 . .M3(Y).0). 7|
00000890: 35 30 00 9B 10 DA 02 4C 50 B2 30 00 A5 10 E4 02 |50.....LP.0.....|
000008A0: 89 20 37 36 30 00 AE 10 EE 02 4C 50 B2 31 00 BB |. 760.....LP.1..|
000008B0: 10 F8 02 4C 44 B2 4D 44 28 4D 29 00 D4 10 02 03 |...LD.MD(M).....|
000008C0: 8B 20 4C 50 B2 31 20 AF 20 4D B2 32 20 A7 20 4C |. LP.1 . M.2 . L|
000008D0: 44 B2 32 39 00 E3 10 0C 03 81 20 44 B2 31 20 A4 |D.29...... D.1 .|
000008E0: 20 4C 44 00 F1 10 16 03 43 28 44 AA 57 44 29 B2 | LD.....C(D.WD).|
000008F0: 44 00 F9 10 20 03 82 20 44 00 FF 10 2A 03 8E 00 |D... .. D...*...|
00000900: 05 11 2E 03 8F 00 27 11 2F 03 8F 2A 2A 2A 20 50 |......'./..*** P|
00000910: 52 49 4E 54 20 4C 49 4C 4C 45 20 4B 41 4C 45 4E |RINT LILLE KALEN|
00000920: 44 45 52 20 2A 2A 2A 00 2D 11 30 03 8F 00 3D 11 |DER ***.-.0...=.|
00000930: 34 03 99 22 93 22 3A 8D 20 32 32 34 30 00 54 11 |4..".":. 2240.T.|
00000940: 3E 03 99 20 A3 28 32 30 AB 4C 48 29 AD 32 AA 31 |>.. .(20.LH).2.1|
00000950: 29 3B 48 24 00 5A 11 43 03 99 00 68 11 48 03 81 |);H$.Z.C...h.H..|
00000960: 20 44 B2 31 20 A4 20 37 00 80 11 52 03 99 20 C8 | D.1 . 7...R.. .|
00000970: 28 57 59 24 28 44 29 2C 32 29 3B 20 53 31 24 3B |(WY$(D),2); S1$;|
00000980: 00 88 11 5C 03 82 20 44 00 8E 11 66 03 99 00 A0 |...\.. D...f....|
00000990: 11 70 03 81 20 44 B2 31 20 A4 20 4C 44 AA 57 44 |.p.. D.1 . LD.WD|
000009A0: 00 B1 11 7A 03 8B 43 28 44 29 B3 B1 30 A7 39 32 |...z..C(D)..0.92|
000009B0: 30 00 C0 11 84 03 99 20 53 31 24 3B 53 31 24 3B |0...... S1$;S1$;|
000009C0: 00 CA 11 8E 03 89 20 39 33 30 00 E2 11 98 03 99 |...... 930......|
000009D0: 20 C9 28 53 31 24 AA C4 28 43 28 44 29 29 2C 32 | .(S1$..(C(D)),2|
000009E0: 29 3B 00 ED 11 A2 03 99 20 53 31 24 3B 00 00 12 |);...... S1$;...|
000009F0: AC 03 8B 20 A5 4D 37 28 44 29 B2 30 20 A7 20 99 |... .M7(D).0 . .|
00000A00: 00 08 12 B6 03 82 20 44 00 12 12 C0 03 8D 33 35 |...... D......35|
00000A10: 30 30 00 1D 12 CA 03 8D 20 32 33 33 30 00 23 12 |00...... 2330.#.|
00000A20: D4 03 8E 00 29 12 D8 03 8F 00 44 12 D9 03 8F 2A |....).....D....*|
00000A30: 2A 2A 20 53 41 56 45 20 4B 41 4C 45 4E 44 45 52 |** SAVE KALENDER|
00000A40: 20 2A 2A 2A 00 4A 12 DA 03 8F 00 50 12 DE 03 99 | ***.J.....P....|
00000A50: 00 5C 12 E8 03 59 4E 24 B2 22 4E 22 00 62 12 F2 |.\...YN$."N".b..|
00000A60: 03 8F 00 68 12 FC 03 8F 00 74 12 06 04 46 4F 24 |...h.....t...FO$|
00000A70: B2 4E 55 24 00 89 12 10 04 85 22 46 49 4C 45 4E |.NU$......"FILEN|
00000A80: 41 56 4E 20 22 3B 46 4F 24 00 9E 12 1A 04 8B 20 |AVN ";FO$...... |
00000A90: 46 4F 24 B3 B1 4E 55 24 A7 20 31 30 37 30 00 B6 |FO$..NU$. 1070..|
00000AA0: 12 24 04 99 20 22 44 41 54 41 20 49 4B 4B 45 20 |.$.. "DATA IKKE |
00000AB0: 53 41 56 45 44 22 00 BC 12 29 04 8E 00 CC 12 2E |SAVED"...)......|
00000AC0: 04 9F 20 31 2C 31 2C 31 2C 46 4F 24 00 DE 12 30 |.. 1,1,1,FO$...0|
00000AD0: 04 8B 20 53 54 B2 30 20 A7 20 31 30 38 30 00 FA |.. ST.0 . 1080..|
00000AE0: 12 32 04 99 22 54 41 50 45 46 45 4A 4C 2E 20 49 |.2.."TAPEFEJL. I|
00000AF0: 4B 4B 45 20 53 41 56 45 44 22 00 00 13 34 04 8E |KKE SAVED"...4..|
00000B00: 00 0A 13 38 04 98 31 2C 43 57 00 14 13 42 04 98 |...8..1,CW...B..|
00000B10: 31 2C 43 4C 00 24 13 4C 04 81 20 43 4E B2 31 20 |1,CL.$.L.. CN.1 |
00000B20: A4 20 33 31 00 35 13 56 04 81 20 4C B2 31 20 A4 |. 31.5.V.. L.1 .|
00000B30: 20 43 4C AB 31 00 4E 13 60 04 98 31 2C 51 54 24 | CL.1.N.`..1,QT$|
00000B40: 3B 4D 53 24 28 43 4E 2C 4C 29 3B 51 54 24 00 59 |;MS$(CN,L);QT$.Y|
00000B50: 13 6A 04 82 20 4C 2C 43 4E 00 61 13 74 04 A0 20 |.j.. L,CN.a.t.. |
00000B60: 31 00 7B 13 7E 04 99 22 44 41 54 41 20 53 41 56 |1.{.~.."DATA SAV|
00000B70: 45 44 20 49 4E 20 22 3B 46 4F 24 00 81 13 88 04 |ED IN ";FO$.....|
00000B80: 8E 00 87 13 8C 04 8F 00 9D 13 8D 04 8F 2A 2A 2A |.............***|
00000B90: 46 4F 52 4D 41 54 56 41 4C 47 2A 2A 2A 00 A3 13 |FORMATVALG***...|
00000BA0: 8E 04 8F 00 AC 13 92 04 99 22 93 22 00 C6 13 9C |........."."....|
00000BB0: 04 99 22 4B 41 4C 45 4E 44 45 52 53 54 4F 52 52 |.."KALENDERSTORR|
00000BC0: 45 4C 53 45 3A 22 00 E8 13 A6 04 99 22 11 11 20 |ELSE:"......".. |
00000BD0: 20 20 20 20 20 20 3C 31 3E 20 20 46 52 41 20 54 | <1> FRA T|
00000BE0: 41 53 54 41 54 55 52 22 00 F6 13 A7 04 99 22 20 |ASTATUR"......" |
00000BF0: 20 20 20 20 2F 22 00 04 14 A8 04 99 20 22 56 41 | /"...... "VA|
00000C00: 4C 47 3A 22 00 12 14 A9 04 99 22 20 20 20 20 20 |LG:"......" |
00000C10: CD 22 00 32 14 AA 04 99 22 20 20 20 20 20 20 20 |.".2...." |
00000C20: 3C 32 3E 20 4C 4F 41 44 20 46 52 41 20 54 41 50 |<2> LOAD FRA TAP|
00000C30: 45 22 00 54 14 AB 04 99 3A 99 3A 99 22 20 20 20 |E".T....:.:." |
00000C40: 31 20 22 3A 99 22 91 91 1D 1D 1D 22 3A 85 22 20 |1 ":.".....":." |
00000C50: 22 3B 43 44 00 6F 14 C4 04 8B 20 43 44 B3 B1 31 |";CD.o.... CD..1|
00000C60: 20 AF 20 43 44 B3 B1 32 20 A7 20 31 31 37 30 00 | . CD..2 . 1170.|
00000C70: 81 14 CE 04 8B 20 43 44 B2 32 20 A7 20 31 34 37 |..... CD.2 . 147|
00000C80: 30 00 87 14 D8 04 99 00 A6 14 E2 04 99 20 22 53 |0............ "S|
00000C90: 4C 45 54 54 45 52 20 47 41 4D 4C 45 20 4E 4F 54 |LETTER GAMLE NOT|
00000CA0: 45 52 2E 2E 2E 22 00 B6 14 EC 04 81 20 43 4E B2 |ER..."...... CN.|
00000CB0: 30 20 A4 20 33 31 00 C7 14 F6 04 81 20 4C B2 31 |0 . 31...... L.1|
00000CC0: 20 A4 20 4D 4C AB 31 00 D9 14 00 05 4D 53 24 28 | . ML.1.....MS$(|
00000CD0: 43 4E 2C 4C 29 B2 4E 55 24 00 E4 14 0A 05 82 20 |CN,L).NU$...... |
00000CE0: 4C 2C 43 4E 00 EA 14 14 05 99 00 1A 15 1E 05 99 |L,CN............|
00000CF0: 20 22 54 41 53 54 20 42 52 45 44 44 45 20 28 34 | "TAST BREDDE (4|
00000D00: 2D 22 3B 4D 57 3B 22 29 20 50 41 41 20 53 4B 41 |-";MW;") PAA SKA|
00000D10: 45 52 4D 20 4D 41 58 20 35 22 00 32 15 28 05 99 |ERM MAX 5".2.(..|
00000D20: 20 22 28 52 45 54 55 52 4E 3D 22 3B 44 57 3B 22 | "(RETURN=";DW;"|
00000D30: 29 22 00 3C 15 32 05 43 57 B2 44 57 00 45 15 3C |)".<.2.CW.DW.E.<|
00000D40: 05 85 20 43 57 00 5F 15 5A 05 8B 20 43 57 B3 34 |.. CW._.Z.. CW.4|
00000D50: 20 B0 20 43 57 B1 4D 57 20 A7 20 31 33 30 30 00 | . CW.MW . 1300.|
00000D60: 65 15 64 05 99 00 94 15 6E 05 99 20 22 54 41 53 |e.d.....n.. "TAS|
00000D70: 54 20 48 4F 4A 44 45 20 28 32 2D 22 3B 4D 4C 3B |T HOJDE (2-";ML;|
00000D80: 22 29 20 50 41 41 20 53 4B 41 45 52 4D 20 4D 41 |") PAA SKAERM MA|
00000D90: 58 20 32 22 00 AC 15 78 05 99 20 22 28 52 45 54 |X 2"...x.. "(RET|
00000DA0: 55 52 4E 3D 22 3B 44 4C 3B 22 29 22 00 B6 15 82 |URN=";DL;")"....|
00000DB0: 05 43 4C B2 44 4C 00 BF 15 8C 05 85 20 43 4C 00 |.CL.DL...... CL.|
00000DC0: D9 15 AA 05 8B 20 43 4C B3 32 20 B0 20 43 4C B1 |..... CL.2 . CL.|
00000DD0: 4D 4C 20 A7 20 31 33 38 30 00 E4 15 B4 05 89 20 |ML . 1380...... |
00000DE0: 31 36 31 30 00 F0 15 BE 05 59 4E 24 B2 22 4E 22 |1610.....YN$."N"|
00000DF0: 00 F6 15 C8 05 8F 00 FC 15 D2 05 8F 00 08 16 DC |................|
00000E00: 05 46 49 24 B2 4E 55 24 00 1D 16 E1 05 85 22 46 |.FI$.NU$......"F|
00000E10: 49 4C 45 4E 41 56 4E 20 22 3B 46 49 24 00 32 16 |ILENAVN ";FI$.2.|
00000E20: E6 05 8B 20 46 49 24 B3 B1 4E 55 24 A7 20 31 35 |... FI$..NU$. 15|
00000E30: 32 35 00 4A 16 EB 05 99 22 44 41 54 41 20 49 4B |25.J...."DATA IK|
00000E40: 4B 45 20 4C 4F 41 44 45 44 22 00 55 16 F0 05 89 |KE LOADED".U....|
00000E50: 20 31 31 37 30 00 65 16 F5 05 9F 20 31 2C 31 2C | 1170.e.... 1,1,|
00000E60: 30 2C 46 49 24 00 6F 16 FA 05 84 31 2C 43 57 00 |0,FI$.o....1,CW.|
00000E70: 79 16 04 06 84 31 2C 43 4C 00 89 16 0E 06 81 20 |y....1,CL...... |
00000E80: 43 4E B2 31 20 A4 20 33 31 00 9A 16 18 06 81 20 |CN.1 . 31...... |
00000E90: 4C B2 31 20 A4 20 43 4C AB 31 00 AB 16 22 06 84 |L.1 . CL.1..."..|
00000EA0: 31 2C 4D 53 24 28 43 4E 2C 4C 29 00 B6 16 2C 06 |1,MS$(CN,L)...,.|
00000EB0: 82 20 4C 2C 43 4E 00 BE 16 36 06 A0 20 31 00 D8 |. L,CN...6.. 1..|
00000EC0: 16 38 06 8B 20 53 54 B2 30 20 B0 20 53 54 B2 36 |.8.. ST.0 . ST.6|
00000ED0: 34 20 A7 20 31 36 30 30 00 FA 16 3A 06 99 22 54 |4 . 1600...:.."T|
00000EE0: 41 50 45 46 45 4A 4C 2E 20 44 41 54 41 20 49 4B |APEFEJL. DATA IK|
00000EF0: 4B 45 20 4C 4F 41 44 45 44 22 00 17 17 3C 06 99 |KE LOADED"...<..|
00000F00: 20 22 44 41 54 41 20 4C 4F 41 44 45 44 20 46 52 | "DATA LOADED FR|
00000F10: 41 20 22 3B 46 49 24 00 33 17 40 06 99 22 44 41 |A ";FI$.3.@.."DA|
00000F20: 54 41 20 4C 4F 41 44 45 44 20 46 52 41 20 22 3B |TA LOADED FRA ";|
00000F30: 46 49 24 00 41 17 4A 06 50 57 B2 43 57 AC 37 AA |FI$.A.J.PW.CW.7.|
00000F40: 31 00 4D 17 54 06 4E 42 B2 43 4C AB 31 00 60 17 |1.M.T.NB.CL.1.`.|
00000F50: 5E 06 4F 46 B2 B5 28 28 43 57 AB 33 29 AD 32 29 |^.OF..((CW.3).2)|
00000F60: 00 6A 17 68 06 51 4C B2 50 57 00 76 17 72 06 51 |.j.h.QL.PW.v.r.Q|
00000F70: 43 24 B2 48 4C 24 00 81 17 7C 06 8D 20 32 33 37 |C$.HL$...|.. 237|
00000F80: 30 00 8C 17 86 06 52 24 B2 51 53 24 00 92 17 90 |0.....R$.QS$....|
00000F90: 06 8E 00 98 17 94 06 8F 00 B9 17 95 06 8F 2A 2A |..............**|
00000FA0: 2A 20 50 52 49 4E 54 20 53 54 4F 52 20 4B 41 4C |* PRINT STOR KAL|
00000FB0: 45 4E 44 45 52 20 2A 2A 2A 00 BF 17 96 06 8F 00 |ENDER ***.......|
00000FC0: CF 17 9A 06 99 22 93 22 3A 8D 20 32 32 34 30 00 |.....".":. 2240.|
00000FD0: D8 17 A4 06 99 20 52 24 00 EE 17 AE 06 54 42 B2 |..... R$.....TB.|
00000FE0: B5 28 28 50 57 AB 32 AB 4C 48 29 AD 32 29 00 11 |.((PW.2.LH).2)..|
00000FF0: 18 B8 06 99 20 56 4C 24 3B A6 54 42 29 3B 48 24 |.... VL$;.TB);H$|
00001000: 3B A6 50 57 AB 4C 48 AB 54 42 AB 32 29 3B 56 4C |;.PW.LH.TB.2);VL|
00001010: 24 00 1A 18 C2 06 99 20 52 24 00 29 18 CC 06 81 |$...... R$.)....|
00001020: 20 44 41 B2 31 20 A4 20 37 00 3D 18 D6 06 8B 20 | DA.1 . 7.=.... |
00001030: 44 41 B2 31 20 A7 20 99 20 56 4C 24 3B 00 52 18 |DA.1 . . VL$;.R.|
00001040: E0 06 8B 20 44 41 B3 B1 31 20 A7 20 99 20 53 31 |... DA..1 . . S1|
00001050: 24 3B 00 70 18 EA 06 99 20 A6 4F 46 29 3B 57 59 |$;.p.... .OF);WY|
00001060: 24 28 44 41 29 3B A6 43 57 AB 34 AB 4F 46 29 3B |$(DA);.CW.4.OF);|
00001070: 00 79 18 F4 06 82 20 44 41 00 83 18 FE 06 99 20 |.y.... DA...... |
00001080: 56 4C 24 00 8C 18 08 07 99 20 52 24 00 A2 18 12 |VL$...... R$....|
00001090: 07 4C 57 B2 AB B5 28 AB 28 4C 44 AA 57 44 29 AD |.LW...(.(LD.WD).|
000010A0: 37 29 00 B1 18 1C 07 81 20 57 B2 31 20 A4 20 4C |7)...... W.1 . L|
000010B0: 57 00 C0 18 26 07 81 20 4C B2 31 20 A4 20 4E 42 |W...&.. L.1 . NB|
000010C0: 00 CF 18 30 07 81 20 44 41 B2 31 20 A4 20 37 00 |...0.. DA.1 . 7.|
000010D0: DA 18 3A 07 99 20 56 4C 24 3B 00 EC 18 44 07 44 |..:.. VL$;...D.D|
000010E0: 4E B2 44 41 AA 28 57 AB 31 29 AC 37 00 00 19 4E |N.DA.(W.1).7...N|
000010F0: 07 4D 24 B2 4D 53 24 28 43 28 44 4E 29 2C 4C 29 |.M$.MS$(C(DN),L)|
00001100: 00 17 19 58 07 99 20 4D 24 3B A6 43 57 AB C3 28 |...X.. M$;.CW..(|
00001110: 4D 24 29 AB 31 29 3B 00 20 19 62 07 82 20 44 41 |M$).1);. .b.. DA|
00001120: 00 2A 19 6C 07 99 20 56 4C 24 00 32 19 76 07 82 |.*.l.. VL$.2.v..|
00001130: 20 4C 00 41 19 80 07 81 20 44 41 B2 31 20 A4 20 | L.A.... DA.1 . |
00001140: 37 00 4C 19 8A 07 99 20 56 4C 24 3B 00 5E 19 94 |7.L.... VL$;.^..|
00001150: 07 44 4E B2 44 41 AA 28 57 AB 31 29 AC 37 00 74 |.DN.DA.(W.1).7.t|
00001160: 19 9E 07 8B 20 43 28 44 4E 29 B3 B1 30 20 A7 20 |.... C(DN)..0 . |
00001170: 31 39 38 30 00 82 19 A8 07 99 20 A6 43 57 AB 31 |1980...... .CW.1|
00001180: 29 3B 00 8D 19 B2 07 89 20 32 30 30 30 00 9E 19 |);...... 2000...|
00001190: BC 07 44 54 24 B2 C4 28 43 28 44 4E 29 29 00 B6 |..DT$..(C(DN))..|
000011A0: 19 C1 07 44 54 24 B2 C9 28 44 54 24 2C C3 28 44 |...DT$..(DT$,.(D|
000011B0: 54 24 29 AB 31 29 00 CF 19 C6 07 99 20 A6 43 57 |T$).1)...... .CW|
000011C0: AB C3 28 44 54 24 29 AB 31 29 3B 44 54 24 3B 00 |..(DT$).1);DT$;.|
000011D0: D8 19 D0 07 82 20 44 41 00 E2 19 DA 07 99 20 56 |..... DA...... V|
000011E0: 4C 24 00 EB 19 E4 07 99 20 52 24 00 F3 19 EE 07 |L$...... R$.....|
000011F0: 82 20 57 00 FD 19 F8 07 8D 33 35 30 30 00 08 1A |. W......3500...|
00001200: 02 08 8D 20 32 33 33 30 00 27 1A 07 08 99 22 1D |... 2330.'....".|
00001210: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 54 52 59 4B 20 27 |..........TRYK '|
00001220: 53 50 41 43 45 27 22 00 2D 1A 0C 08 8E 00 33 1A |SPACE'".-.....3.|
00001230: 10 08 8F 00 4D 1A 11 08 8F 2A 2A 2A 20 53 4B 52 |....M....*** SKR|
00001240: 49 56 45 20 4E 4F 54 45 52 20 2A 2A 2A 00 53 1A |IVE NOTER ***.S.|
00001250: 12 08 8F 00 59 1A 16 08 99 00 7D 1A 20 08 99 22 |....Y.....}. .."|
00001260: 4E 59 20 4E 4F 54 45 20 49 20 44 41 54 4F 45 4E |NY NOTE I DATOEN|
00001270: 3F 20 28 31 2D 22 3B 4C 44 3B 22 29 22 00 86 1A |? (1-";LD;")"...|
00001280: 2A 08 53 44 B2 30 00 A5 1A 34 08 85 20 22 54 41 |*.SD.0...4.. "TA|
00001290: 53 54 20 3C 30 3E 20 46 4F 52 20 53 4C 55 54 3A |ST <0> FOR SLUT:|
000012A0: 20 22 3B 53 44 00 BC 1A 3E 08 8B 20 53 44 B3 31 | ";SD...>.. SD.1|
000012B0: 20 B0 20 53 44 B1 4C 44 20 A7 20 8E 00 C2 1A 48 | . SD.LD . ....H|
000012C0: 08 99 00 D1 1A 5C 08 81 20 4C B2 31 20 A4 20 4E |.....\.. L.1 . N|
000012D0: 42 00 E1 1A 66 08 99 22 4C 49 4E 49 45 20 22 3B |B...f.."LINIE ";|
000012E0: 4C 00 ED 1A 70 08 54 58 24 B2 4E 55 24 00 F7 1A |L...p.TX$.NU$...|
000012F0: 7A 08 85 20 54 58 24 00 1B 1B 84 08 8B 20 C3 28 |z.. TX$...... .(|
00001300: 54 58 24 29 B1 43 57 AB 31 20 A7 20 54 58 24 B2 |TX$).CW.1 . TX$.|
00001310: C8 28 54 58 24 2C 43 57 AB 31 29 00 2D 1B 8E 08 |.(TX$,CW.1).-...|
00001320: 4D 53 24 28 53 44 2C 4C 29 B2 54 58 24 00 35 1B |MS$(SD,L).TX$.5.|
00001330: 98 08 82 20 4C 00 3B 1B A2 08 99 00 50 1B AC 08 |... L.;.....P...|
00001340: 99 20 22 54 45 4B 53 54 20 49 4E 44 53 41 54 22 |. "TEKST INDSAT"|
00001350: 00 5B 1B B6 08 89 20 32 30 37 30 00 61 1B BA 08 |.[.... 2070.a...|
00001360: 8F 00 79 1B BB 08 8F 2A 2A 2A 20 53 55 42 52 55 |..y....*** SUBRU|
00001370: 54 49 4E 45 52 20 2A 2A 2A 00 7F 1B BC 08 8F 00 |TINER ***.......|
00001380: 8A 1B C0 08 4F 44 B2 31 3A 8E 00 B4 1B CA 08 99 |....OD.1:.......|
00001390: 22 93 2C 11 11 11 11 11 11 11 11 11 11 11 11 11 |".,.............|
000013A0: 11 11 11 55 44 53 4B 52 49 46 54 20 4F 4E 53 4B |...UDSKRIFT ONSK|
000013B0: 45 53 3A 22 00 CA 1B CB 08 99 3A 99 3A 99 22 54 |ES:"......:.:."T|
000013C0: 56 20 20 20 20 20 20 3C 31 3E 00 DF 1B CC 08 99 |V <1>......|
000013D0: 3A 99 22 50 52 49 4E 54 45 52 20 3C 32 3E 22 00 |:."PRINTER <2>".|
000013E0: E8 1B D4 08 4F 44 B2 31 00 0D 1C DE 08 99 3A 99 |....OD.1......:.|
000013F0: 3A 85 20 22 56 41 4C 47 3A 20 3C 31 3E 20 45 4C |:. "VALG: <1> EL|
00001400: 4C 45 52 20 3C 32 3E 3A 20 22 3B 4F 44 00 28 1C |LER <2>: ";OD.(.|
00001410: E8 08 8B 20 4F 44 B3 B1 31 20 AF 20 4F 44 B3 B1 |... OD..1 . OD..|
00001420: 32 20 A7 20 32 32 34 30 00 37 1C F2 08 8B 20 4F |2 . 2240.7.... O|
00001430: 44 B2 31 20 A7 20 8E 00 42 1C FC 08 9F 20 4C 2C |D.1 . ..B.... L,|
00001440: 50 52 00 4A 1C 06 09 9D 20 31 00 50 1C 10 09 8E |PR.J.... 1.P....|
00001450: 00 65 1C 1A 09 8B 20 4F 44 B2 31 20 A7 20 8D 33 |.e.... OD.1 . .3|
00001460: 30 30 30 3A 8E 00 6D 1C 24 09 98 31 2C 00 75 1C |000:..m.$..1,.u.|
00001470: 2E 09 A0 20 31 00 7E 1C 33 09 4F 44 B2 31 00 88 |... 1.~.3.OD.1..|
00001480: 1C 35 09 8D 33 30 30 30 00 8E 1C 38 09 8E 00 9A |.5..3000...8....|
00001490: 1C 42 09 51 53 24 B2 4E 55 24 00 AA 1C 4C 09 81 |.B.QS$.NU$...L..|
000014A0: 20 51 51 B2 31 20 A4 20 51 4C 00 BA 1C 56 09 51 | QQ.1 . QL...V.Q|
000014B0: 53 24 B2 51 53 24 AA 51 43 24 00 C3 1C 60 09 82 |S$.QS$.QC$...`..|
000014C0: 20 51 51 00 C9 1C 6A 09 8E 00 DE 1C B8 0B 8F 20 | QQ...j........ |
000014D0: 2A 2A 2A 20 50 41 55 53 45 20 2A 2A 2A 2A 00 F2 |*** PAUSE ****..|
000014E0: 1C C2 0B A1 54 24 3A 8B 54 24 B2 22 22 A7 33 30 |....T$:.T$."".30|
000014F0: 31 30 00 F8 1C CC 0B 8E 00 35 1D AC 0D 99 22 13 |10.......5....".|
00001500: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00001510: 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001520: 1D 12 20 54 52 59 4B 20 27 20 53 50 41 43 45 20 |.. TRYK ' SPACE |
00001530: 27 20 92 22 3B 00 3B 1D B6 0D 8E 00 5D 1D A0 0F |' .";.;.....]...|
00001540: 8F 20 53 41 56 45 20 22 54 49 4D 45 20 4D 41 4E |. SAVE "TIME MAN|
00001550: 41 47 45 52 20 56 20 31 2E 32 22 2C 38 00 00 00 |AGER V 1.2",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:".V.I.."...1,85. =
(JANUAR,1985)"...J..". .":."K
ALENDEREN GAR KUN FRA".J.K.."..MARTS,192
0 - NOVEMBER,2009"...L..".. . .":.
". MANED, AR?."...... M,Y.....Y.Y.1900.
#.... Y.1920 . Y.2008 . 450.<.... Y.1920
. M.3 . 450.V.... Y.2009 . M.11 . 450.M
.&.. M.1 . M.12 . 450...0.H$.MO$(M).D(Y)
...:.LH.C(H$)...D.....N..".OPBYGGER KALE
NDER FOR".A.X..:. H$;"....Q.B.. CN.1 . 4
2...L.C(CN).0...V.. CN.....Y1.Y.1920....
.. M..2 . 680.....M1.M.3...... 700.%...M
1.M.9.1...Y1.Y1.1.U...JD..(1461.Y1.4)..(
(153.M1.2).5).F.F.WD..M7(JD.1)...P..(.M1
(Y).0 . .M2(Y)..0 . .M3(Y).0). 750...Z.L
P.0...... 760.....LP.1.....LD.MD(M).T...
. LP.1 . M.2 . LD.29...... D.1 . LD.....
C(D.WD).D... .. D...*.........'./..*** P
RINT LILLE KALENDER ***.-.0...=.4..".":.
2240.T.>.. .(20.LH).2.1);H$.Z.C...H.H..
D.1 . 7...R.. H(WY$(D),2); S1$;...\.. D
...F... .P.. D.1 . LD.WD...Z..C(D)..0.92
0...... S1$;S1$;.J.... 930...... I(S1$.D
(C(D)),2);...... S1$;...... .M7(D).0 . .
...... D......3500...J.. 2330.#.T...).X.
..D.Y..*** SAVE KALENDER ***.J.Z...P....
.\...YN$."N".B.....H.....T...FO$.NU$....
.."FILENAVN ";FO$...... FO$..NU$. 1070..
.$.. "DATA IKKE SAVED"...)...L.... 1,1,1
,FO$...0.. ST.0 . 1080...2.."TAPEFEJL. I
KKE SAVED"...4.....8..1,CW...B..1,CL.$.L
.. CN.1 . 31.5.V.. L.1 . CL.1.N.`..1,QT$
;MS$(CN,L);QT$.Y.J.. L,CN.A.T. 1.{.~.."
DATA SAVED IN ";FO$..................***
FORMATVALG***............".".F...."KALEN
DERSTORRELSE:"......".. <1> FRA T
ASTATUR"......" /"...... "VALG:"....
.." M".2...." <2> LOAD FRA TAP
E".T....:.:." 1 ":.".....":." ";CD.O.D
.. CD..1 . CD..2 . 1170...N.. CD.2 . 147
0...X........ "SLETTER GAMLE NOTER..."..
.... CN.0 . 31.G.... L.1 . ML.1.Y...MS$(
CN,L).NU$...... L,CN............ "TAST B
REDDE (4-";MW;") PAA SKAERM MAX 5".2.(..
"(RETURN=";DW;")".<.2.CW.DW.E.<.. CW._.
Z.. CW.4 . CW.MW . 1300.E.D.....N.. "TAS
T HOJDE (2-";ML;") PAA SKAERM MAX 2"...X
.. "(RETURN=";DL;")".....CL.DL...... CL.
Y.... CL.2 . CL.ML . 1380...... 1610....
.YN$."N"...H.....R.......FI$.NU$......"F
ILENAVN ";FI$.2.... FI$..NU$. 1525.J....
"DATA IKKE LOADED".U.... 1170.E.... 1,1,
0,FI$.O....1,CW.Y....1,CL...... CN.1 . 3
1...... L.1 . CL.1..."..1,MS$(CN,L)...,.
. L,CN...6. 1.X.8.. ST.0 . ST.64 . 1600
...:.."TAPEFEJL. DATA IKKE LOADED"...<..
"DATA LOADED FRA ";FI$.3.@.."DATA LOADE
D FRA ";FI$.A.J.PW.CW.7.1.M.T.NB.CL.1.`.
^.OF..((CW.3).2).J.H.QL.PW.V.R.QC$.HL$..
.|.. 2370.....R$.QS$..................**
* PRINT STOR KALENDER ***.......O...."."
:. 2240.X.... R$.....TB..((PW.2.LH).2)..
.... VL$;.TB);H$;.PW.LH.TB.2);VL$...B..
R$.).L.. DA.1 . 7.=.V.. DA.1 . . VL$;.R.
... DA..1 . . S1$;.P.... .OF);WY$(DA);.C
W.4.OF);.Y.... DA...... VL$...... R$....
.LW...(.(LD.WD).7)...... W.1 . LW...&..
L.1 . NB.O.0.. DA.1 . 7.Z.:.. VL$;...D.D
N.DA.(W.1).7...N.M$.MS$(C(DN),L)...X.. M
$;.CW.C(M$).1);. .B.. DA.*.L.. VL$.2.V..
L.A.... DA.1 . 7.L.... VL$;.^...DN.DA.(
W.1).7.T.... C(DN)..0 . 1980...... .CW.1
);...... 2000.....DT$.D(C(DN))...A.DT$.I
(DT$,C(DT$).1).O.F.. .CW.C(DT$).1);DT$;.
X.P.. DA...Z.. VL$...... R$...... W.....
.3500...... 2330.'...."...........TRYK '
SPACE'".-.....3.....M....*** SKRIVE NOTE
R ***.S.....Y.....}. .."NY NOTE I DATOEN
? (1-";LD;")"...*.SD.0...4.. "TAST <0> F
OR SLUT: ";SD...>.. SD.1 . SD.LD . ..B.H
...Q.\.. L.1 . NB...F.."LINIE ";L...P.TX
$.NU$...Z.. TX$...... C(TX$).CW.1 . TX$.
H(TX$,CW.1).-...MS$(SD,L).TX$.5.... L.;.
....P.... "TEKST INDSAT".[.... 2070.A...
..Y....*** SUBRUTINER ***..........OD.1
:....J..".,................UDSKRIFT ONSK
ES:".J.K..:.:."TV <1>...L..:."PRINT
ER <2>"...T.OD.1......:.:. "VALG: <1> EL
LER <2>: ";OD.(.... OD..1 . OD..2 . 2240
.7.... OD.1 . ..B.... L,PR.J.... 1.P....
.E.... OD.1 . .3000:..M.$..1,.U... 1.~.
3.OD.1...5..3000...8.....B.QS$.NU$...L..
QQ.1 . QL...V.QS$.QS$.QC$.C.`.. QQ.I.J.
....... *** PAUSE ****...B..T$:.T$."".30
10...L...5....".........................
.......... TRYK ' SPACE ' .";.;.....]. .
. SAVE "TIME MANAGER V 1.2",8...
> CLICK IMAGE PREVIEW FOR FULL MODAL