CALENDAR MAKER
FILE INFORMATION
FILENAME(S): CALENDAR MAKER
FILE TYPE(S): PRG
FILE SIZE: 7.8K
FIRST SEEN: 2025-11-30 18:12:24
APPEARS ON: 1 disk(s)
FILE HASH
d0703459a7d6eb304d970c232b2658f4fc5e59190e90474e07bf090b8ce0e143
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 50 S 3 | CALENDAR MAKER | PRG | Sailor, Ganheden | 11 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 47 08 00 00 97 35 33 32 38 30 2C 36 3A 97 |..G....53280,6:.| 00000010: 35 33 32 38 31 2C 2E 3A 99 22 93 08 0E 05 11 11 |53281,.:."......| 00000020: 11 11 11 11 11 11 11 11 11 11 1D 1D 1D 20 20 20 |............. | 00000030: 20 20 1D 1D 1D 1D 1D D0 4C 45 41 53 45 20 D7 41 | ......LEASE .A| 00000040: 49 54 2E 2E 2E 2E 22 00 69 08 01 00 8B 41 B2 30 |IT....".i....A.0| 00000050: A7 41 B2 31 3A 93 22 43 41 4C 45 4E 44 41 52 46 |.A.1:."CALENDARF| 00000060: 4F 4E 54 32 22 2C 38 2C 31 00 8C 08 02 00 97 35 |ONT2",8,1......5| 00000070: 36 2C 35 36 3A 97 35 32 2C 35 36 3A 97 35 33 32 |6,56:.52,56:.532| 00000080: 37 32 2C 33 31 3A 97 32 35 31 2C 30 00 A0 08 05 |72,31:.251,0....| 00000090: 00 97 35 33 32 38 31 2C 2E 3A 97 36 34 36 2C 37 |..53281,.:.646,7| 000000A0: 00 DD 08 0A 00 53 B2 35 34 32 37 32 3A 81 4E B2 |.....S.54272:.N.| 000000B0: 53 A4 53 AA 32 34 3A 97 4E 2C 30 3A 82 3A 97 53 |S.S.24:.N,0:.:.S| 000000C0: AA 32 34 2C 31 33 3A 97 53 AA 35 2C 32 34 30 3A |.24,13:.S.5,240:| 000000D0: 97 53 AA 36 2C 34 34 3A 8D 31 32 30 30 00 1C 09 |.S.6,44:.1200...| 000000E0: 0B 00 4D 4E 24 28 31 29 B2 22 20 20 1F CD 9B 41 |..MN$(1)." ...A| 000000F0: 4B 45 2F 45 44 49 54 20 4E 4F 54 45 53 22 3A 4D |KE/EDIT NOTES":M| 00000100: 4E 24 28 32 29 B2 22 20 20 20 20 1F C3 9B 41 4E |N$(2)." ...AN| 00000110: 43 45 4C 20 4E 4F 54 45 53 20 20 22 00 5B 09 0C |CEL NOTES ".[..| 00000120: 00 4D 4E 24 28 33 29 B2 22 20 20 20 1F D6 9B 49 |.MN$(3)." ...I| 00000130: 45 57 20 4E 4F 54 45 28 53 29 20 20 20 22 3A 4D |EW NOTE(S) ":M| 00000140: 4E 24 28 34 29 B2 22 20 20 20 20 1F D3 9B 41 56 |N$(4)." ...AV| 00000150: 45 20 43 41 4C 45 4E 44 41 52 22 00 9C 09 0D 00 |E CALENDAR".....| 00000160: 4D 4E 24 28 35 29 B2 22 20 20 20 20 1F CC 9B 4F |MN$(5)." ...O| 00000170: 41 44 20 43 41 4C 45 4E 44 41 52 20 20 22 3A 4D |AD CALENDAR ":M| 00000180: 4E 24 28 36 29 B2 22 20 20 20 20 1F D0 9B 52 49 |N$(6)." ...RI| 00000190: 4E 54 20 43 41 4C 45 4E 44 41 52 22 00 D4 09 0E |NT CALENDAR"....| 000001A0: 00 4D 4E 24 28 37 29 B2 22 20 20 20 20 20 1F CE |.MN$(7)." ..| 000001B0: 9B 45 57 20 43 41 4C 45 4E 44 41 52 20 20 20 22 |.EW CALENDAR "| 000001C0: 3A 4D 4E 24 28 38 29 B2 22 20 20 20 20 1F D1 9B |:MN$(8)." ...| 000001D0: 55 49 54 22 00 1B 0A 14 00 86 20 4D 4F 24 28 31 |UIT"...... MO$(1| 000001E0: 32 29 2C 4E 44 28 31 32 29 2C 4D 4D 28 35 30 29 |2),ND(12),MM(50)| 000001F0: 2C 58 4D 24 28 35 30 2C 35 29 2C 4D 32 24 28 31 |,XM$(50,5),M2$(1| 00000200: 32 29 3A 55 24 B2 C7 28 32 32 31 29 3A 43 48 24 |2):U$..(221):CH$| 00000210: B2 22 4D 43 56 53 4C 50 4E 51 22 00 37 0A 1E 00 |."MCVSLPNQ".7...| 00000220: 81 49 B2 31 A4 31 32 3A 87 4D 4F 24 28 49 29 2C |.I.1.12:.MO$(I),| 00000230: 4E 44 28 49 29 3A 82 00 4D 0A 23 00 81 49 B2 31 |ND(I):..M.#..I.1| 00000240: A4 31 32 3A 87 4D 32 24 28 49 29 3A 82 00 78 0A |.12:.M2$(I):..x.| 00000250: 28 00 81 49 B2 30 A4 36 3A 87 44 24 3A 44 59 24 |(..I.0.6:.D$:DY$| 00000260: B2 44 59 24 AA 44 24 AA 22 20 20 22 3A 44 41 24 |.DY$.D$." ":DA$| 00000270: 28 49 29 B2 44 24 3A 82 00 9A 0A 29 00 81 4E B2 |(I).D$:....)..N.| 00000280: 30 A4 36 3A 87 44 24 3A 50 44 24 B2 50 44 24 AA |0.6:.D$:PD$.PD$.| 00000290: 44 24 AA 22 20 20 20 22 3A 82 00 AE 0A 2D 00 8B |D$." ":....-..| 000002A0: C2 28 32 35 31 29 B2 30 A7 8D 31 33 35 30 00 EC |.(251).0..1350..| 000002B0: 0A 32 00 81 49 B2 30 A4 39 3A 53 24 B2 53 24 AA |.2..I.0.9:S$.S$.| 000002C0: 22 20 22 3A 82 3A 81 49 B2 30 A4 37 37 3A 48 24 |" ":.:.I.0.77:H$| 000002D0: B2 48 24 AA C7 28 34 35 29 3A 82 3A 53 31 24 B2 |.H$..(45):.:S1$.| 000002E0: 22 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 22 00 36 0B 33 |"..........".6.3| 000002F0: 00 48 24 28 31 29 B2 22 B0 C0 C0 C0 C0 C0 C0 C0 |.H$(1)."........| 00000300: C0 C0 C0 B2 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 B2 C0 |................| 00000310: C0 C0 C0 C0 C0 C0 C0 C0 C0 B2 C0 C0 C0 C0 C0 C0 |................| 00000320: C0 C0 C0 C0 B2 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 B2 |................| 00000330: C0 C0 C0 C0 C0 22 00 5A 0B 34 00 48 24 28 31 29 |.....".Z.4.H$(1)| 00000340: B2 48 24 28 31 29 AA 22 C0 C0 C0 C0 C0 B2 C0 C0 |.H$(1)."........| 00000350: C0 C0 C0 C0 C0 C0 C0 C0 AE 22 00 A4 0B 35 00 48 |........."...5.H| 00000360: 24 28 32 29 B2 22 AB C0 C0 C0 C0 C0 C0 C0 C0 C0 |$(2)."..........| 00000370: C0 DB C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 DB C0 C0 C0 |................| 00000380: C0 C0 C0 C0 C0 C0 C0 DB C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000390: C0 C0 DB C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 DB C0 C0 |................| 000003A0: C0 C0 C0 22 00 C8 0B 36 00 48 24 28 32 29 B2 48 |..."...6.H$(2).H| 000003B0: 24 28 32 29 AA 22 C0 C0 C0 C0 C0 DB C0 C0 C0 C0 |$(2)."..........| 000003C0: C0 C0 C0 C0 C0 C0 B3 22 00 12 0C 37 00 48 24 28 |......."...7.H$(| 000003D0: 33 29 B2 22 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 B1 |3)."............| 000003E0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 |................| 000003F0: C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................| 00000400: B1 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 |................| 00000410: C0 22 00 36 0C 38 00 48 24 28 33 29 B2 48 24 28 |.".6.8.H$(3).H$(| 00000420: 33 29 AA 22 C0 C0 C0 C0 C0 B1 C0 C0 C0 C0 C0 C0 |3)."............| 00000430: C0 C0 C0 C0 BD 22 00 51 0C 39 00 8B C2 28 32 35 |.....".Q.9...(25| 00000440: 31 29 B2 30 A7 8D 31 33 30 30 3A 97 32 35 31 2C |1).0..1300:.251,| 00000450: 31 00 6B 0C 3A 00 81 4E B2 31 A4 33 39 3A 4C 24 |1.k.:..N.1.39:L$| 00000460: B2 4C 24 AA C7 28 33 32 29 3A 82 00 9F 0C 3B 00 |.L$..(32):....;.| 00000470: 43 42 24 B2 22 13 11 11 11 11 11 11 11 11 11 11 |CB$."...........| 00000480: 11 11 11 11 11 11 22 AA 4C 24 AA 4C 24 AA 4C 24 |......".L$.L$.L$| 00000490: AA 4C 24 AA 4C 24 AA 4C 24 AA 22 20 20 20 22 00 |.L$.L$.L$." ".| 000004A0: D9 0C 3C 00 55 53 24 B2 55 24 AA 53 24 3A 99 22 |..<.US$.U$.S$:."| 000004B0: 93 11 11 20 20 40 20 D0 45 52 50 45 54 55 41 4C |... @ .ERPETUAL| 000004C0: 20 C3 41 4C 45 4E 44 41 52 20 CD 41 4B 45 52 20 | .ALENDAR .AKER | 000004D0: 5F 22 3A 99 3A 8D 35 36 30 00 E2 0C 46 00 8D 36 |_":.:.560...F..6| 000004E0: 33 30 00 F3 0C 50 00 97 31 39 38 2C 30 3A 8D 33 |30...P..198,0:.3| 000004F0: 36 30 3A 00 11 0D 5A 00 81 4E B2 31 A4 38 3A 8B |60:...Z..N.1.8:.| 00000500: 41 24 B2 CA 28 43 48 24 2C 4E 2C 31 29 A7 4B B2 |A$..(CH$,N,1).K.| 00000510: 4E 00 17 0D 64 00 82 00 27 0D 6E 00 8B 4B B3 31 |N...d...'.n..K.1| 00000520: B0 4B B1 38 A7 38 30 00 77 0D 78 00 8B 4B B2 37 |.K.8.80.w.x..K.7| 00000530: A7 99 43 42 24 3B 4C 24 3B 4C 24 3A 99 22 13 11 |..CB$;L$;L$:."..| 00000540: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00000550: 11 20 20 20 20 20 20 22 4D 4E 24 28 37 29 3A 99 |. "MN$(7):.| 00000560: 22 11 20 20 20 CF 4E 45 20 53 45 43 4F 4E 44 2E |". .NE SECOND.| 00000570: 2E 2E 22 3A 8A 31 30 00 87 0D 82 00 8B 4B B2 38 |..":.10......K.8| 00000580: A7 89 31 34 39 30 30 00 A0 0D 87 00 81 4E B2 31 |..14900......N.1| 00000590: 39 38 35 A4 32 30 32 33 3A 97 4E 2C 33 32 3A 82 |985.2023:.N,32:.| 000005A0: 00 C3 0D 8C 00 91 4B 8D 31 35 30 2C 33 38 30 2C |......K.150,380,| 000005B0: 39 38 30 2C 37 39 30 2C 38 35 30 2C 34 31 30 3A |980,790,850,410:| 000005C0: 89 37 30 00 F8 0D 96 00 99 43 42 24 3B 4C 24 3B |.70......CB$;L$;| 000005D0: 4C 24 3A 99 22 13 11 11 11 11 11 11 11 11 11 11 |L$:."...........| 000005E0: 11 11 11 11 11 11 11 11 20 20 20 20 20 20 20 20 |........ | 000005F0: 20 22 4D 4E 24 28 31 29 00 32 0E 9B 00 99 22 11 | "MN$(1).2....".| 00000600: 20 20 20 20 20 20 1F CF 9B 4E 45 20 44 41 59 2C | ...NE DAY,| 00000610: 20 1F D7 9B 45 45 4B 4C 59 2C 20 4F 52 20 1F C5 | ...EEKLY, OR ..| 00000620: 9B 56 45 52 59 20 44 41 59 9E 20 22 3B 3A A1 44 |.VERY DAY. ";:.D| 00000630: 44 24 00 5E 0E A0 00 8B 44 44 24 B3 B1 22 4F 22 |D$.^....DD$.."O"| 00000640: AF 44 44 24 B3 B1 22 57 22 AF 44 44 24 B3 B1 22 |.DD$.."W".DD$.."| 00000650: 45 22 A7 99 22 91 91 91 22 3A 89 31 35 35 00 6A |E".."...":.155.j| 00000660: 0E A5 00 99 22 91 91 22 53 24 00 A1 0E AA 00 43 |....".."S$.....C| 00000670: 55 B2 31 3A 53 50 B2 31 3A 8B 44 44 24 B2 22 45 |U.1:SP.1:.DD$."E| 00000680: 22 A7 43 55 B2 4E 44 28 4D 4F 29 3A 4D 53 24 B2 |".CU.ND(MO):MS$.| 00000690: 22 54 4F 20 45 4E 44 20 4F 46 20 4D 4F 4E 54 48 |"TO END OF MONTH| 000006A0: 22 00 D3 0E B4 00 8B 44 44 24 B2 22 57 22 A7 53 |"......DD$."W".S| 000006B0: 50 B2 37 3A 43 55 B2 4E 44 28 4D 4F 29 3A 4D 53 |P.7:CU.ND(MO):MS| 000006C0: 24 B2 22 20 26 20 57 45 45 4B 4C 59 20 41 46 54 |$." & WEEKLY AFT| 000006D0: 45 52 22 00 DC 0E BE 00 8D 33 33 30 00 06 0F C8 |ER"......330....| 000006E0: 00 99 22 93 11 11 20 CE 4F 54 45 53 20 46 4F 52 |.."... .OTES FOR| 000006F0: 20 22 4D 4F 24 28 4D 4F 29 44 54 3B 4D 53 24 3A | "MO$(MO)DT;MS$:| 00000700: 4D 53 24 B2 22 22 00 4A 0F D2 00 99 22 11 20 20 |MS$."".J....". | 00000710: 20 20 20 2E 2E 2E 2E 2E 2E 2E 2E 2E 2E 20 20 20 | .......... | 00000720: 31 30 20 43 48 41 52 41 43 54 45 52 20 4D 41 58 |10 CHARACTER MAX| 00000730: 49 4D 55 4D 22 3A 99 A6 32 34 29 22 50 45 52 20 |IMUM":..24)"PER | 00000740: 4C 49 4E 45 22 3A 8D 33 31 30 00 7E 0F DC 00 99 |LINE":.310.~....| 00000750: 22 91 91 91 91 91 22 3A 81 49 B2 30 A4 35 3A 99 |".....":.I.0.5:.| 00000760: 22 1D 1D 1D 1D 22 3B 3A 4C 4E B2 31 30 3A 4E 55 |"....";:LN.10:NU| 00000770: B2 30 3A 8D 31 31 30 30 3A 58 24 B2 59 24 00 9D |.0:.1100:X$.Y$..| 00000780: 0F E6 00 8B C3 28 58 24 29 B3 31 30 A7 58 24 B2 |.....(X$).10.X$.| 00000790: 58 24 AA C7 28 33 32 29 3A 89 32 33 30 00 D0 0F |X$..(32):.230...| 000007A0: F0 00 58 4D 24 28 44 54 AA 4A 2C 49 29 B2 58 24 |..XM$(DT.J,I).X$| 000007B0: 3A 82 49 3A 99 3A 99 22 20 D4 48 45 53 45 20 41 |:.I:.:." .HESE A| 000007C0: 52 45 20 54 48 45 20 4E 4F 54 45 53 3A 22 3A 99 |RE THE NOTES:":.| 000007D0: 00 F9 0F FA 00 8D 33 32 31 3A 99 22 11 20 20 9B |......321:.". .| 000007E0: C1 52 45 20 54 48 45 59 20 43 4F 52 52 45 43 54 |.RE THEY CORRECT| 000007F0: 20 28 59 2F 4E 29 3F 9E 22 00 15 10 04 01 8D 33 | (Y/N)?."......3| 00000800: 36 30 3A 8B 41 24 B3 B1 22 59 22 A7 46 32 B2 31 |60:.A$.."Y".F2.1| 00000810: 3A 89 32 30 30 00 26 10 0E 01 8B 44 44 24 B2 22 |:.200.&....DD$."| 00000820: 4F 22 A7 33 30 30 00 41 10 18 01 81 4E B2 44 54 |O".300.A....N.DT| 00000830: AA 4A A4 43 55 AA 4A A9 53 50 3A 81 49 B2 30 A4 |.J.CU.J.SP:.I.0.| 00000840: 35 00 6A 10 22 01 58 4D 24 28 4E 2C 49 29 B2 58 |5.j.".XM$(N,I).X| 00000850: 4D 24 28 44 54 AA 4A 2C 49 29 3A 82 49 3A 4D 4D |M$(DT.J,I):.I:MM| 00000860: 28 4E AB 4A 29 B2 31 3A 82 4E 00 70 10 2C 01 8E |(N.J).1:.N.p.,..| 00000870: 00 9B 10 36 01 81 49 B2 30 A4 35 3A 8B 58 4D 24 |...6..I.0.5:.XM$| 00000880: 28 44 54 AA 4A 2C 49 29 B2 22 22 A7 58 4D 24 28 |(DT.J,I)."".XM$(| 00000890: 44 54 AA 4A 2C 49 29 B2 53 31 24 00 B0 10 37 01 |DT.J,I).S1$...7.| 000008A0: 46 33 B2 31 38 3A 8B 46 32 B2 31 A7 46 33 B2 30 |F3.18:.F2.1.F3.0| 000008B0: 00 E9 10 40 01 99 49 AA 31 A6 31 29 20 20 20 20 |...@..I.1.1) | 000008C0: 20 20 20 20 58 4D 24 28 44 54 AA 4A 2C 49 29 3A | XM$(DT.J,I):| 000008D0: 82 3A 46 32 B2 30 3A 8D 33 32 35 3A 8E 20 3A 8F |.:F2.0:.325:. :.| 000008E0: 20 43 48 52 24 28 46 33 29 00 14 11 41 01 81 49 | CHR$(F3)...A..I| 000008F0: B2 30 A4 35 3A 8B 58 4D 24 28 44 54 AA 4A 2C 49 |.0.5:.XM$(DT.J,I| 00000900: 29 B2 22 22 A7 58 4D 24 28 44 54 AA 4A 2C 49 29 |)."".XM$(DT.J,I)| 00000910: B2 53 31 24 00 2F 11 42 01 99 49 AA 31 A6 31 29 |.S1$./.B..I.1.1)| 00000920: 58 4D 24 28 44 54 AA 4A 2C 49 29 3A 82 3A 8E 00 |XM$(DT.J,I):.:..| 00000930: 54 11 45 01 99 22 13 11 11 11 11 11 11 11 11 22 |T.E.."........."| 00000940: A6 32 30 29 22 54 4F 20 45 44 49 54 2C 20 52 45 |.20)"TO EDIT, RE| 00000950: 54 59 50 45 00 6E 11 46 01 99 A6 32 32 29 22 45 |TYPE.n.F...22)"E| 00000960: 4E 54 49 52 45 20 4C 49 4E 45 2E 22 3A 8E 00 9B |NTIRE LINE.":...| 00000970: 11 4A 01 99 22 11 20 20 20 9B C4 41 54 45 20 46 |.J..". ..ATE F| 00000980: 4F 52 20 4E 4F 54 45 53 3A 20 28 31 20 2D 22 4E |OR NOTES: (1 -"N| 00000990: 44 28 4D 4F 29 22 9D 29 20 22 3B 00 C0 11 4F 01 |D(MO)".) ";...O.| 000009A0: 4C 4E B2 32 3A 4E 55 B2 32 3A 8D 31 31 30 30 3A |LN.2:NU.2:.1100:| 000009B0: 44 54 24 B2 59 24 3A 44 54 B2 C5 28 44 54 24 29 |DT$.Y$:DT..(DT$)| 000009C0: 00 E0 11 54 01 8B 44 54 B3 31 B0 44 54 B1 4E 44 |...T..DT.1.DT.ND| 000009D0: 28 4D 4F 29 A7 99 22 91 91 91 22 3A 89 33 33 30 |(MO).."...":.330| 000009E0: 00 EF 11 5E 01 4D 4D 28 44 54 29 B2 31 3A 8E 00 |...^.MM(DT).1:..| 000009F0: 08 12 68 01 41 24 B2 22 22 3A A1 41 24 3A 8B 41 |..h.A$."":.A$:.A| 00000A00: 24 B2 22 22 A7 33 36 30 00 0E 12 72 01 8E 00 40 |$."".360...r...@| 00000A10: 12 7C 01 99 43 42 24 3B 4C 24 3B 4C 24 3A 99 22 |.|..CB$;L$;L$:."| 00000A20: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00000A30: 11 11 11 20 20 20 20 20 20 22 4D 4E 24 28 32 29 |... "MN$(2)| 00000A40: 00 59 12 81 01 8D 33 33 30 3A 4D 4D 28 44 54 29 |.Y....330:MM(DT)| 00000A50: B2 30 3A 81 49 B2 30 A4 35 00 6E 12 86 01 58 4D |.0:.I.0.5.n...XM| 00000A60: 24 28 44 54 AA 4A 2C 49 29 B2 53 24 3A 82 00 74 |$(DT.J,I).S$:..t| 00000A70: 12 90 01 8E 00 A6 12 9A 01 99 43 42 24 3B 4C 24 |..........CB$;L$| 00000A80: 3B 4C 24 3A 99 22 13 11 11 11 11 11 11 11 11 11 |;L$:."..........| 00000A90: 11 11 11 11 11 11 11 11 11 20 20 20 20 20 20 22 |......... "| 00000AA0: 4D 4E 24 28 36 29 00 C4 12 9F 01 99 22 20 20 D0 |MN$(6)......" .| 00000AB0: 52 49 4E 54 45 52 20 52 45 41 44 59 20 28 59 2F |RINTER READY (Y/| 00000AC0: 4E 29 3F 22 00 D9 12 A4 01 8D 20 33 36 30 3A 8B |N)?"...... 360:.| 00000AD0: 41 24 B3 B1 22 59 22 A7 8E 00 FB 12 A9 01 99 22 |A$.."Y"........"| 00000AE0: 11 20 20 47 52 41 50 48 49 43 53 20 50 52 49 4E |. GRAPHICS PRIN| 00000AF0: 54 45 52 20 28 59 2F 4E 29 3F 22 00 37 13 AA 01 |TER (Y/N)?".7...| 00000B00: 8D 20 33 36 30 3A 55 24 B2 22 DD 22 3A 4D 4D B2 |. 360:U$.".":MM.| 00000B10: 31 3A 8B 41 24 B2 22 4E 22 A7 55 24 B2 C7 28 33 |1:.A$."N".U$..(3| 00000B20: 33 29 3A 4D 4D B2 2E 3A 55 53 24 B2 55 24 AA 53 |3):MM..:US$.U$.S| 00000B30: 24 3A 89 31 34 30 30 00 45 13 AB 01 55 53 24 B2 |$:.1400.E...US$.| 00000B40: 55 24 AA 53 24 00 5E 13 AE 01 A0 34 3A 9F 34 2C |U$.S$.^....4:.4,| 00000B50: 34 3A 43 B2 30 3A 43 31 B2 31 3A 4E B2 30 00 8E |4:C.0:C1.1:N.0..| 00000B60: 13 B8 01 4C B2 C3 28 4D 32 24 28 4D 4F 29 29 AD |...L..(M2$(MO)).| 00000B70: 32 3A 98 34 2C C7 28 31 34 29 A6 31 36 AB 4C 29 |2:.4,.(14).16.L)| 00000B80: 4D 32 24 28 4D 4F 29 22 20 2D 20 22 59 52 00 B7 |M2$(MO)" - "YR..| 00000B90: 13 C2 01 98 34 2C C7 28 31 33 29 C7 28 31 33 29 |....4,.(13).(13)| 00000BA0: C7 28 31 34 29 C8 28 50 44 24 2C 33 39 29 3A 98 |.(14).(PD$,39):.| 00000BB0: 34 2C C7 28 31 35 29 00 CE 13 C4 01 8B 28 4D 4D |4,.(15)......(MM| 00000BC0: B2 2E 29 A7 98 34 2C 48 24 3A 89 34 36 30 00 DB |..)..4,H$:.460..| 00000BD0: 13 C7 01 98 34 2C 48 24 28 31 29 00 F3 13 CC 01 |....4,H$(1).....| 00000BE0: 81 49 B2 31 A4 59 3A 81 54 B2 30 A4 36 3A 43 B2 |.I.1.Y:.T.0.6:C.| 00000BF0: 43 AA 31 00 14 14 D6 01 8B 43 B2 B3 4A B0 4E B2 |C.1......C..J.N.| 00000C00: B1 4E 44 28 4D 4F 29 A7 98 34 2C 55 53 24 3B 3A |.ND(MO)..4,US$;:| 00000C10: 89 35 30 30 00 2F 14 E0 01 4E B2 4E AA 31 3A 4E |.500./...N.N.1:N| 00000C20: 24 B2 22 20 22 AA CA 28 C4 28 4E 29 2C 32 29 00 |$." "..(.(N),2).| 00000C30: 51 14 EA 01 98 34 2C C8 28 55 53 24 2C 37 29 C7 |Q....4,.(US$,7).| 00000C40: 28 31 34 29 C9 28 4E 24 2C 32 29 C7 28 31 35 29 |(14).(N$,2).(15)| 00000C50: 3B 00 5E 14 F4 01 82 54 3A 98 34 2C 55 24 00 72 |;.^....T:.4,U$.r| 00000C60: 14 FE 01 81 54 31 B2 30 A4 35 3A 81 54 32 B2 30 |....T1.0.5:.T2.0| 00000C70: A4 36 00 96 14 08 02 8B 20 58 4D 24 28 43 31 AA |.6...... XM$(C1.| 00000C80: 54 32 2C 54 31 29 B2 22 22 A7 98 34 2C 55 53 24 |T2,T1).""..4,US$| 00000C90: 3B 3A 89 35 34 30 00 AF 14 12 02 98 34 2C 55 24 |;:.540......4,U$| 00000CA0: AA 58 4D 24 28 43 31 AA 54 32 2C 54 31 29 3B 00 |.XM$(C1.T2,T1);.| 00000CB0: DC 14 1C 02 82 54 32 3A 98 34 2C 55 24 3A 82 54 |.....T2:.4,U$:.T| 00000CC0: 31 3A 43 31 B2 43 31 AA 37 3A 8B 28 4D 4D B2 2E |1:C1.C1.7:.(MM..| 00000CD0: 29 A7 98 34 2C 48 24 3A 89 35 35 30 00 F5 14 21 |)..4,H$:.550...!| 00000CE0: 02 8B 28 49 B2 59 29 A7 98 34 2C 48 24 28 33 29 |..(I.Y)..4,H$(3)| 00000CF0: 3A 89 35 35 30 00 02 15 23 02 98 34 2C 48 24 28 |:.550...#..4,H$(| 00000D00: 32 29 00 11 15 26 02 82 49 3A 98 34 3A A0 34 3A |2)...&..I:.4:.4:| 00000D10: 8E 00 44 15 30 02 4C 4E B2 32 3A 4E 55 B2 32 3A |..D.0.LN.2:NU.2:| 00000D20: 99 22 20 20 20 20 20 9B D7 48 49 43 48 20 4D 4F |." ..HICH MO| 00000D30: 4E 54 48 20 28 31 2D 31 32 29 20 9E 22 3B 3A 8D |NTH (1-12) .";:.| 00000D40: 31 31 30 30 00 68 15 35 02 4D 4F B2 C5 28 59 24 |1100.h.5.MO..(Y$| 00000D50: 29 3A 8B 4D 4F B3 31 B0 4D 4F B1 31 32 A7 99 22 |):.MO.1.MO.12.."| 00000D60: 91 91 22 3A 89 35 36 30 00 9A 15 3A 02 4C 4E B2 |..":.560...:.LN.| 00000D70: 35 3A 4E 55 B2 32 3A 99 22 11 20 20 20 20 20 9B |5:NU.2:.". .| 00000D80: D7 48 41 54 20 59 45 41 52 20 28 58 58 58 58 29 |.HAT YEAR (XXXX)| 00000D90: 20 9E 22 3B 3A 8D 31 31 30 30 00 BC 15 3F 02 59 | .";:.1100...?.Y| 00000DA0: 52 B2 C5 28 59 24 29 3A 8B 59 52 B3 31 35 38 33 |R..(Y$):.YR.1583| 00000DB0: A7 99 22 91 91 91 22 3A 89 35 37 30 00 04 16 44 |.."...":.570...D| 00000DC0: 02 51 B2 59 52 AA 28 4D 4F B3 33 29 3A 4A B2 B5 |.Q.YR.(MO.3):J..| 00000DD0: 28 32 37 35 AC 4D 4F AD 39 29 AB B5 28 28 37 AC |(275.MO.9)..((7.| 00000DE0: 51 AA 37 29 AD 34 29 AA 33 36 37 AC 59 52 AA 31 |Q.7).4).367.YR.1| 00000DF0: AB B5 28 28 B5 28 51 AD 31 30 30 29 AA 31 29 AC |..((.(Q.100).1).| 00000E00: 33 AD 34 29 00 3C 16 4E 02 4A B2 4A AB 34 AB 37 |3.4).<.N.J.J.4.7| 00000E10: AC B5 28 28 4A AB 34 29 AD 37 29 3A 58 B2 28 4E |..((J.4).7):X.(N| 00000E20: 44 28 4D 4F 29 AA 4A 29 AD 37 3A 59 B2 B5 28 58 |D(MO).J).7:Y..(X| 00000E30: 29 3A 8B 58 B1 59 A7 59 B2 59 AA 31 00 5B 16 58 |):.X.Y.Y.Y.1.[.X| 00000E40: 02 8B 4D 4F B3 B1 32 B0 28 59 52 AD 34 29 B3 B1 |..MO..2.(YR.4)..| 00000E50: B5 28 59 52 AD 34 29 A7 36 32 30 00 77 16 5D 02 |.(YR.4).620.w.].| 00000E60: 8B 28 59 52 AD 34 30 30 29 B2 B5 28 59 52 AD 34 |.(YR.400)..(YR.4| 00000E70: 30 30 29 A7 36 31 35 00 93 16 62 02 8B 28 59 52 |00).615...b..(YR| 00000E80: AD 31 30 30 29 B2 B5 28 59 52 AD 31 30 30 29 A7 |.100)..(YR.100).| 00000E90: 36 32 30 00 A1 16 67 02 4E 44 28 4D 4F 29 B2 32 |620...g.ND(MO).2| 00000EA0: 39 00 A7 16 6C 02 8E 00 D2 16 76 02 99 22 93 11 |9...l.....v.."..| 00000EB0: 20 20 20 20 20 20 20 20 20 40 20 9F D0 45 52 50 | @ ..ERP| 00000EC0: 45 54 55 41 4C 20 C3 41 4C 45 4E 44 41 52 20 9E |ETUAL .ALENDAR .| 00000ED0: 5F 22 00 FF 16 80 02 99 22 9A 11 22 A6 31 30 AB |_"......"..".10.| 00000EE0: C3 28 4D 4F 24 28 4D 4F 29 29 AD 32 29 4D 4F 24 |.(MO$(MO)).2)MO$| 00000EF0: 28 4D 4F 29 3A 99 22 91 22 A6 32 36 29 59 52 00 |(MO):.".".26)YR.| 00000F00: 1A 17 8A 02 99 3A 99 A6 33 29 44 59 24 3A 99 22 |.....:..3)DY$:."| 00000F10: 9E 22 3A 43 B2 30 3A 4E B2 30 00 42 17 94 02 81 |.":C.0:N.0.B....| 00000F20: 49 B2 31 A4 59 3A 81 54 B2 31 A4 37 3A 43 B2 43 |I.1.Y:.T.1.7:C.C| 00000F30: AA 31 3A 8B 43 B2 B3 4A A7 99 A6 35 29 3A 89 37 |.1:.C..J...5):.7| 00000F40: 30 30 00 55 17 9E 02 8B 4E B2 B1 4E 44 28 4D 4F |00.U....N..ND(MO| 00000F50: 29 A7 37 30 30 00 70 17 A8 02 4E B2 4E AA 31 3A |).700.p...N.N.1:| 00000F60: 4E 24 B2 22 20 22 AA CA 28 C4 28 4E 29 2C 32 29 |N$." "..(.(N),2)| 00000F70: 00 97 17 B2 02 99 A6 33 29 C9 28 4E 24 2C 32 29 |.......3).(N$,2)| 00000F80: C7 28 31 34 36 29 3B 3A 8B 4D 4D 28 4E 29 A7 99 |.(146);:.MM(N)..| 00000F90: 22 1E 2A 9D 9E 22 3B 00 A5 17 BC 02 82 54 3A 99 |".*..";......T:.| 00000FA0: 3A 99 3A 82 49 00 B7 17 C6 02 99 4D 4E 24 28 31 |:.:.I......MN$(1| 00000FB0: 29 4D 4E 24 28 32 29 00 C9 17 D0 02 99 4D 4E 24 |)MN$(2)......MN$| 00000FC0: 28 33 29 4D 4E 24 28 34 29 00 DB 17 DA 02 99 4D |(3)MN$(4)......M| 00000FD0: 4E 24 28 35 29 4D 4E 24 28 36 29 00 ED 17 DF 02 |N$(5)MN$(6).....| 00000FE0: 99 4D 4E 24 28 37 29 4D 4E 24 28 38 29 00 17 18 |.MN$(7)MN$(8)...| 00000FF0: E4 02 99 22 11 20 20 20 20 20 1E 2A 9B 20 4D 45 |...". .*. ME| 00001000: 41 4E 53 20 54 48 49 53 20 44 41 54 45 20 48 41 |ANS THIS DATE HA| 00001010: 53 20 4E 4F 54 45 53 00 45 18 EE 02 99 A6 35 29 |S NOTES.E.....5)| 00001020: 22 1F 40 20 9B D4 59 50 45 20 49 4E 20 4C 45 54 |".@ ..YPE IN LET| 00001030: 54 45 52 20 4F 46 20 43 48 4F 49 43 45 20 1F 5F |TER OF CHOICE ._| 00001040: 13 9E 22 3A 8E 00 8E 18 F8 02 83 22 CA 41 4E 55 |..":.......".ANU| 00001050: 41 52 59 22 2C 33 31 2C 22 C6 45 42 52 55 41 52 |ARY",31,".EBRUAR| 00001060: 59 22 2C 32 38 2C 22 CD 41 52 43 48 22 2C 33 31 |Y",28,".ARCH",31| 00001070: 2C 22 C1 50 52 49 4C 22 2C 33 30 2C 22 CD 41 59 |,".PRIL",30,".AY| 00001080: 22 2C 33 31 2C 22 CA 55 4E 45 22 2C 33 30 00 9E |",31,".UNE",30..| 00001090: 18 F9 02 83 20 22 CA 55 4C 59 22 2C 33 31 00 E7 |.... ".ULY",31..| 000010A0: 18 02 03 83 22 C1 55 47 55 53 54 22 2C 33 31 2C |....".UGUST",31,| 000010B0: 22 D3 45 50 54 45 4D 42 45 52 22 2C 33 30 2C 22 |".EPTEMBER",30,"| 000010C0: CF 43 54 4F 42 45 52 22 2C 33 31 2C 22 CE 4F 56 |.CTOBER",31,".OV| 000010D0: 45 4D 42 45 52 22 2C 33 30 2C 22 C4 45 43 45 4D |EMBER",30,".ECEM| 000010E0: 42 45 52 22 2C 33 31 00 30 19 03 03 83 4A 41 4E |BER",31.0....JAN| 000010F0: 55 41 52 59 2C 46 45 42 52 55 41 52 59 2C 4D 41 |UARY,FEBRUARY,MA| 00001100: 52 43 48 2C 41 50 52 49 4C 2C 4D 41 59 2C 4A 55 |RCH,APRIL,MAY,JU| 00001110: 4E 45 2C 4A 55 4C 59 2C 41 55 47 55 53 54 2C 53 |NE,JULY,AUGUST,S| 00001120: 45 50 54 45 4D 42 45 52 2C 4F 43 54 4F 42 45 52 |EPTEMBER,OCTOBER| 00001130: 00 48 19 04 03 83 20 4E 4F 56 45 4D 42 45 52 2C |.H.... NOVEMBER,| 00001140: 44 45 43 45 4D 42 45 52 00 77 19 0C 03 83 22 D3 |DECEMBER.w....".| 00001150: 55 4E 22 2C 22 CD 4F 4E 22 2C 22 D4 55 45 22 2C |UN",".ON",".UE",| 00001160: 22 D7 45 44 22 2C 22 D4 48 55 22 2C 22 C6 52 49 |".ED",".HU",".RI| 00001170: 22 2C 22 D3 41 54 22 00 98 19 0D 03 83 53 55 4E |",".AT"......SUN| 00001180: 2C 4D 4F 4E 2C 54 55 45 2C 57 45 44 2C 54 48 55 |,MON,TUE,WED,THU| 00001190: 2C 46 52 49 2C 53 41 54 00 C9 19 16 03 99 43 42 |,FRI,SAT......CB| 000011A0: 24 3B 4C 24 3B 4C 24 3A 99 22 13 11 11 11 11 11 |$;L$;L$:."......| 000011B0: 11 11 11 11 11 11 11 11 11 11 11 11 20 20 20 20 |............ | 000011C0: 20 20 22 4D 4E 24 28 34 29 00 0A 1A 1B 03 4C 4E | "MN$(4).....LN| 000011D0: B2 31 32 3A 4E 55 B2 30 3A 99 22 11 20 20 9B CE |.12:NU.0:.". ..| 000011E0: 41 4D 45 20 4F 46 20 46 49 4C 45 3A 20 22 3B 3A |AME OF FILE: ";:| 000011F0: 8D 31 31 30 30 3A 53 55 24 B2 59 24 3A 53 55 24 |.1100:SU$.Y$:SU$| 00001200: B2 C8 28 53 55 24 2C 31 32 29 00 32 1A 1C 03 9F |..(SU$,12).2....| 00001210: 33 2C 38 2C 33 2C AA 53 55 24 AA 22 20 22 AA C8 |3,8,3,.SU$." "..| 00001220: 28 4D 4F 24 28 4D 4F 29 2C 33 29 AA 22 2C 53 2C |(MO$(MO),3).",S,| 00001230: 57 22 00 58 1A 20 03 99 22 11 20 20 D3 41 56 49 |W".X. ..". .AVI| 00001240: 4E 47 20 22 53 55 24 AA 22 20 22 AA C8 28 4D 4F |NG "SU$." "..(MO| 00001250: 24 28 4D 4F 29 2C 33 29 00 97 1A 2A 03 81 4E B2 |$(MO),3)...*..N.| 00001260: 4A A4 4E 44 28 4D 4F 29 AA 4A 3A 81 52 B2 30 A4 |J.ND(MO).J:.R.0.| 00001270: 35 3A 8B 58 4D 24 28 4E 2C 52 29 B2 53 24 B0 58 |5:.XM$(N,R).S$.X| 00001280: 4D 24 28 4E 2C 52 29 B2 22 22 A7 58 4D 24 28 4E |M$(N,R)."".XM$(N| 00001290: 2C 52 29 B2 22 2E 22 00 AB 1A 34 03 98 33 2C 58 |,R)."."...4..3,X| 000012A0: 4D 24 28 4E 2C 52 29 3A 82 3A 82 00 C4 1A 3E 03 |M$(N,R):.:....>.| 000012B0: 8D 39 35 30 3A 8B 46 4C B2 31 A7 46 4C B2 30 3A |.950:.FL.1.FL.0:| 000012C0: 89 38 34 30 00 CD 1A 48 03 A0 33 3A 8E 00 FE 1A |.840...H..3:....| 000012D0: 52 03 99 43 42 24 3B 4C 24 3B 4C 24 3A 99 22 13 |R..CB$;L$;L$:.".| 000012E0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 000012F0: 11 20 20 20 20 20 20 22 4D 4E 24 28 35 29 00 3F |. "MN$(5).?| 00001300: 1B 57 03 4C 4E B2 31 32 3A 4E 55 B2 30 3A 99 22 |.W.LN.12:NU.0:."| 00001310: 11 20 20 9B CE 41 4D 45 20 4F 46 20 46 49 4C 45 |. ..AME OF FILE| 00001320: 3A 20 22 3B 3A 8D 31 31 30 30 3A 53 55 24 B2 59 |: ";:.1100:SU$.Y| 00001330: 24 3A 53 55 24 B2 C8 28 53 55 24 2C 31 32 29 00 |$:SU$..(SU$,12).| 00001340: 67 1B 58 03 9F 33 2C 38 2C 33 2C AA 53 55 24 AA |g.X..3,8,3,.SU$.| 00001350: 22 20 22 AA C8 28 4D 4F 24 28 4D 4F 29 2C 33 29 |" "..(MO$(MO),3)| 00001360: AA 22 2C 53 2C 52 22 00 8F 1B 66 03 99 22 11 20 |.",S,R"...f..". | 00001370: 20 20 CC 4F 41 44 49 4E 47 20 22 53 55 24 AA 22 | .OADING "SU$."| 00001380: 20 22 AA C8 28 4D 4F 24 28 4D 4F 29 2C 33 29 00 | "..(MO$(MO),3).| 00001390: A6 1B 6B 03 81 4E B2 31 A4 33 37 3A 4D 4D 28 44 |..k..N.1.37:MM(D| 000013A0: 54 29 B2 30 3A 82 00 BF 1B 70 03 81 4E B2 4A A4 |T).0:....p..N.J.| 000013B0: 4E 44 28 4D 4F 29 AA 4A 3A 81 52 B2 30 A4 35 00 |ND(MO).J:.R.0.5.| 000013C0: CF 1B 7A 03 84 33 2C 58 4D 24 28 4E 2C 52 29 00 |..z..3,XM$(N,R).| 000013D0: F2 1B 84 03 8B 58 4D 24 28 4E 2C 52 29 B2 22 2E |.....XM$(N,R).".| 000013E0: 22 A7 58 4D 24 28 4E 2C 52 29 B2 53 24 3A 89 39 |".XM$(N,R).S$:.9| 000013F0: 32 30 00 00 1C 8E 03 4D 4D 28 4E AB 4A 29 B2 31 |20.....MM(N.J).1| 00001400: 00 08 1C 98 03 82 3A 82 00 21 1C A2 03 8D 39 35 |......:..!....95| 00001410: 30 3A 8B 46 4C B2 31 A7 46 4C B2 30 3A 89 38 34 |0:.FL.1.FL.0:.84| 00001420: 30 00 2A 1C AC 03 89 38 34 30 00 4F 1C B6 03 A0 |0.*....840.O....| 00001430: 31 35 3A 9F 31 35 2C 38 2C 31 35 3A 84 31 35 2C |15:.15,8,15:.15,| 00001440: 58 2C 59 24 3A 8B 58 B2 30 A7 A0 31 35 3A 8E 00 |X,Y$:.X.0..15:..| 00001450: 85 1C C0 03 99 22 20 20 20 20 C4 49 53 4B 20 45 |....." .ISK E| 00001460: 52 52 4F 52 3A 22 58 2C 59 24 3A 46 4C B2 31 3A |RROR:"X,Y$:FL.1:| 00001470: 8B 41 24 B2 22 53 22 A7 81 52 B2 31 A4 31 34 30 |.A$."S"..R.1.140| 00001480: 30 3A 82 3A 8E 00 B8 1C CA 03 81 4E B2 31 A4 33 |0:.:.......N.1.3| 00001490: 37 3A 4D 4D 28 4E 29 B2 30 3A 81 52 B2 30 A4 35 |7:MM(N).0:.R.0.5| 000014A0: 3A 58 4D 24 28 4E AA 4A 2C 52 29 B2 53 24 3A 82 |:XM$(N.J,R).S$:.| 000014B0: 3A 82 3A A0 31 35 3A 8E 00 EC 1C D4 03 99 43 42 |:.:.15:.......CB| 000014C0: 24 3B 4C 24 3B 4C 24 3A 99 22 13 11 11 11 11 11 |$;L$;L$:."......| 000014D0: 11 11 11 11 11 11 11 11 11 11 11 11 11 20 20 20 |............. | 000014E0: 20 20 20 20 20 22 4D 4E 24 28 33 29 00 1B 1D D9 | "MN$(3)....| 000014F0: 03 99 22 11 20 20 20 20 20 20 1F CF 9B 4E 45 20 |..". ...NE | 00001500: 44 41 59 20 4F 52 20 1F C5 9B 56 45 52 59 20 44 |DAY OR ...VERY D| 00001510: 41 59 3F 20 22 3B 3A A1 44 44 24 00 3E 1D DE 03 |AY? ";:.DD$.>...| 00001520: 8B 44 44 24 B3 B1 22 4F 22 AF 44 44 24 B3 B1 22 |.DD$.."O".DD$.."| 00001530: 45 22 A7 99 22 91 91 91 22 3A 89 39 38 35 00 5A |E".."...":.985.Z| 00001540: 1D E8 03 43 55 B2 31 3A 8B 44 44 24 B2 22 45 22 |...CU.1:.DD$."E"| 00001550: A7 43 55 B2 4E 44 28 4D 4F 29 00 96 1D F2 03 99 |.CU.ND(MO)......| 00001560: 3A 99 22 11 20 20 9B D7 48 49 43 48 20 44 41 54 |:.". ..HICH DAT| 00001570: 45 3F 20 22 3B 3A 4C 4E B2 32 3A 4E 55 B2 32 3A |E? ";:LN.2:NU.2:| 00001580: 8D 31 31 30 30 3A 44 54 24 B2 59 24 3A 44 54 B2 |.1100:DT$.Y$:DT.| 00001590: C5 28 44 54 24 29 00 B7 1D FC 03 8B 44 54 B3 31 |.(DT$)......DT.1| 000015A0: B0 44 54 B1 4E 44 28 4D 4F 29 A7 99 22 91 91 91 |.DT.ND(MO).."...| 000015B0: 22 3A 89 31 30 31 30 00 EA 1D 06 04 81 4E B2 44 |":.1010......N.D| 000015C0: 54 AA 4A A4 43 55 AA 4A 3A 44 54 B2 4E AB 4A 3A |T.J.CU.J:DT.N.J:| 000015D0: 99 22 93 11 11 20 CE 4F 54 45 53 20 46 4F 52 20 |."... .OTES FOR | 000015E0: 22 4D 4F 24 28 4D 4F 29 44 54 00 F8 1D 10 04 99 |"MO$(MO)DT......| 000015F0: 22 11 22 3A 8D 33 32 31 00 3F 1E 1A 04 99 22 11 |".":.321.?....".| 00001600: 20 9B D0 52 45 53 53 20 41 4E 59 20 4B 45 59 20 | ..RESS ANY KEY | 00001610: 54 4F 20 43 4F 4E 54 49 4E 55 45 22 3A 8B 44 44 |TO CONTINUE":.DD| 00001620: 24 B3 B1 22 4F 22 A7 99 22 20 20 20 20 20 20 20 |$.."O".." | 00001630: 20 20 20 20 D1 20 54 4F 20 51 55 49 54 9E 22 00 | . TO QUIT.".| 00001640: 48 1E 24 04 8D 33 36 30 00 59 1E 2E 04 8B 41 24 |H.$..360.Y....A$| 00001650: B2 22 51 22 A7 4E B2 36 30 00 61 1E 38 04 82 3A |."Q".N.60.a.8..:| 00001660: 8E 00 9F 1E 4C 04 97 31 39 38 2C 30 3A 59 24 B2 |....L..198,0:Y$.| 00001670: 22 22 3A 97 53 AA 35 2C 31 32 39 3A 97 53 AA 36 |"":.S.5,129:.S.6| 00001680: 2C 31 32 39 3A 99 22 20 20 20 20 20 20 20 20 20 |,129:." | 00001690: 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 1E 40 22 3B 00 | ...........@";.| 000016A0: C6 1E 51 04 99 22 5F 9D 92 22 3B 3A 81 4E B2 31 |..Q.."_..";:.N.1| 000016B0: A4 32 30 3A 82 3A 99 22 20 9D 22 3B 3A 81 4E B2 |.20:.:." .";:.N.| 000016C0: 31 A4 32 30 3A 82 00 DA 1E 56 04 A1 5A 24 3A 8B |1.20:....V..Z$:.| 000016D0: 5A 24 B2 22 22 A7 31 31 30 35 00 FF 1E 57 04 97 |Z$."".1105...W..| 000016E0: 53 AA 34 2C 33 33 3A 97 53 AA 31 2C 32 33 3A 81 |S.4,33:.S.1,23:.| 000016F0: 4E B2 31 A4 31 30 3A 82 3A 97 53 AA 31 2C 30 00 |N.1.10:.:.S.1,0.| 00001700: 1C 1F 5B 04 4C B2 C3 28 59 24 29 3A 8B 5A 24 B2 |..[.L..(Y$):.Z$.| 00001710: C7 28 31 33 29 A7 99 22 9E 22 3A 8E 00 47 1F 60 |.(13)..".":..G.`| 00001720: 04 8B 5A 24 B2 C7 28 32 30 29 AF 4C A7 99 22 20 |..Z$..(20).L.." | 00001730: 9D 9D 22 3B 3A 59 24 B2 C8 28 59 24 2C 4C AB 31 |..";:Y$..(Y$,L.1| 00001740: 29 3A 89 31 31 30 35 00 77 1F 65 04 8B 4E 55 B2 |):.1105.w.e..NU.| 00001750: 30 A7 8B 28 5A 24 B3 22 20 22 B0 5A 24 B1 22 5F |0..(Z$." ".Z$."_| 00001760: 22 29 AF 28 5A 24 B3 22 C1 22 B0 5A 24 B1 22 DA |").(Z$.".".Z$.".| 00001770: 22 29 A7 31 31 30 35 00 A7 1F 6A 04 8B 4E 55 B2 |").1105...j..NU.| 00001780: 31 A7 8B 28 5A 24 B3 22 41 22 B0 5A 24 B1 22 5A |1..(Z$."A".Z$."Z| 00001790: 22 29 AF 28 5A 24 B3 22 C1 22 B0 5A 24 B1 22 DA |").(Z$.".".Z$.".| 000017A0: 22 29 A7 31 31 30 35 00 C7 1F 6F 04 8B 4E 55 B2 |").1105...o..NU.| 000017B0: 32 A7 8B 28 5A 24 B3 22 30 22 B0 5A 24 B1 22 39 |2..(Z$."0".Z$."9| 000017C0: 22 29 A7 31 31 30 35 00 D7 1F 74 04 8B 4C B1 B2 |").1105...t..L..| 000017D0: 4C 4E A7 31 31 30 35 00 E9 1F 79 04 99 5A 24 3B |LN.1105...y..Z$;| 000017E0: 3A 59 24 B2 59 24 AA 5A 24 00 F3 1F 7E 04 89 31 |:Y$.Y$.Z$...~..1| 000017F0: 31 30 35 00 03 20 B0 04 8B C2 28 32 35 31 29 B2 |105.. ....(251).| 00001800: 31 A7 8E 00 39 20 B1 04 54 24 B2 22 50 45 52 50 |1...9 ..T$."PERP| 00001810: 45 54 55 41 4C 20 43 41 4C 45 4E 44 41 52 20 4D |ETUAL CALENDAR M| 00001820: 41 4B 45 52 22 3A 99 22 93 22 3A 97 36 34 36 2C |AKER":.".":.646,| 00001830: BB 28 31 29 AC 31 35 AA 31 00 70 20 B5 04 81 4E |.(1).15.1.p ...N| 00001840: B2 33 A4 31 35 3A 99 A6 4E 29 54 24 3A 97 53 AA |.3.15:..N)T$:.S.| 00001850: 34 2C 33 33 3A 97 53 AA 31 2C 4E AC 31 30 3A 81 |4,33:.S.1,N.10:.| 00001860: 52 B2 31 A4 33 30 3A 82 3A 97 53 AA 34 2C 31 37 |R.1.30:.:.S.4,17| 00001870: 00 87 20 B6 04 81 52 B2 31 A4 33 30 3A 82 3A 97 |.. ...R.1.30:.:.| 00001880: 53 AA 34 2C 30 3A 82 00 B9 20 BA 04 99 22 91 22 |S.4,0:... ..."."| 00001890: 3A 99 22 28 43 29 20 31 39 38 38 20 42 59 22 3A |:."(C) 1988 BY":| 000018A0: 97 53 AA 32 2C 31 38 37 3A 97 53 AA 33 2C 31 36 |.S.2,187:.S.3,16| 000018B0: 35 3A 97 53 AA 34 2C 36 35 00 E2 20 BB 04 97 53 |5:.S.4,65.. ...S| 000018C0: AA 31 2C 31 32 3A 81 52 B2 31 A4 32 30 30 3A 82 |.1,12:.R.1.200:.| 000018D0: 3A 97 53 AA 34 2C 30 3A 81 52 B2 31 A4 31 30 30 |:.S.4,0:.R.1.100| 000018E0: 3A 82 00 F0 20 BC 04 99 22 11 11 11 11 11 11 22 |:... ..."......"| 000018F0: 00 2A 21 BF 04 81 4E B2 32 32 A4 31 36 A9 AB 31 |.*!...N.22.16..1| 00001900: 3A 99 22 91 91 22 A6 4E 29 22 57 2E 20 4D 2E 20 |:."..".N)"W. M. | 00001910: 53 48 4F 43 4B 4C 45 59 22 3A 97 53 AA 34 2C 31 |SHOCKLEY":.S.4,1| 00001920: 37 3A 97 53 AA 31 2C 4E AC 39 00 54 21 C0 04 81 |7:.S.1,N.9.T!...| 00001930: 52 B2 31 A4 34 30 3A 82 3A 97 53 AA 34 2C 33 33 |R.1.40:.:.S.4,33| 00001940: 3A 81 52 B2 31 A4 33 30 3A 82 3A 97 53 AA 34 2C |:.R.1.30:.:.S.4,| 00001950: 33 32 3A 82 00 7F 21 C4 04 99 22 11 11 11 11 11 |32:...!...".....| 00001960: 11 11 11 20 20 20 20 20 20 20 20 20 20 20 20 20 |... | 00001970: 46 4F 52 20 1F CC CF C1 C4 D3 D4 C1 D2 13 22 00 |FOR ..........".| 00001980: 85 21 C9 04 8E 00 AF 21 14 05 99 22 93 11 20 20 |.!.....!...".. | 00001990: 20 20 20 20 20 20 20 20 20 20 9E C9 4E 53 54 52 | ..NSTR| 000019A0: 55 43 54 49 4F 4E 53 22 3A 97 31 39 38 2C 30 00 |UCTIONS":.198,0.| 000019B0: DB 21 19 05 99 22 11 20 20 9B D4 48 49 53 20 43 |.!...". ..HIS C| 000019C0: 41 4C 45 4E 44 41 52 20 4D 41 4B 45 52 20 4D 41 |ALENDAR MAKER MA| 000019D0: 4B 45 53 20 53 49 4E 47 4C 45 22 00 07 22 1E 05 |KES SINGLE".."..| 000019E0: 99 22 11 20 20 4D 4F 4E 54 48 20 50 52 49 4E 54 |.". MONTH PRINT| 000019F0: 4F 55 54 53 2E 20 20 C5 41 43 48 20 44 41 59 20 |OUTS. .ACH DAY | 00001A00: 49 4E 20 54 48 45 22 00 34 22 23 05 99 22 11 20 |IN THE".4"#..". | 00001A10: 20 4D 4F 4E 54 48 20 43 41 4E 20 48 41 56 45 20 | MONTH CAN HAVE | 00001A20: 41 20 4E 4F 54 45 20 4F 46 20 55 50 20 54 4F 20 |A NOTE OF UP TO | 00001A30: 53 49 58 22 00 5D 22 28 05 99 22 11 20 20 4C 49 |SIX".]"(..". LI| 00001A40: 4E 45 53 20 28 31 30 20 43 48 41 52 41 43 54 45 |NES (10 CHARACTE| 00001A50: 52 53 20 50 45 52 20 4C 49 4E 45 29 2E 00 8A 22 |RS PER LINE)..."| 00001A60: 2D 05 99 22 11 20 20 C6 49 52 53 54 20 50 49 43 |-..". .IRST PIC| 00001A70: 4B 20 54 48 45 20 4D 4F 4E 54 48 2C 20 54 48 45 |K THE MONTH, THE| 00001A80: 4E 20 54 48 45 20 59 45 41 52 00 B6 22 32 05 99 |N THE YEAR.."2..| 00001A90: 22 11 20 20 28 41 46 54 45 52 20 31 35 36 33 29 |". (AFTER 1563)| 00001AA0: 2E 20 20 D4 48 45 20 52 45 53 54 20 49 53 20 4F |. .HE REST IS O| 00001AB0: 42 56 49 4F 55 53 00 E3 22 37 05 99 22 11 20 20 |BVIOUS.."7..". | 00001AC0: 46 52 4F 4D 20 54 48 45 20 4D 45 4E 55 2E 20 20 |FROM THE MENU. | 00001AD0: CA 55 53 54 20 54 59 50 45 20 54 48 45 20 46 49 |.UST TYPE THE FI| 00001AE0: 52 53 54 00 11 23 38 05 99 22 11 20 20 4C 45 54 |RST..#8..". LET| 00001AF0: 54 45 52 20 4F 46 20 59 4F 55 52 20 43 48 4F 49 |TER OF YOUR CHOI| 00001B00: 43 45 20 2D 2D 20 54 48 45 20 4C 45 54 54 45 52 |CE -- THE LETTER| 00001B10: 22 00 3F 23 39 05 99 22 11 20 20 49 4E 20 42 4C |".?#9..". IN BL| 00001B20: 55 45 2E 20 20 D7 48 45 4E 20 41 20 46 49 4C 45 |UE. .HEN A FILE| 00001B30: 20 49 53 20 53 41 56 45 44 2C 20 54 48 45 22 00 | IS SAVED, THE".| 00001B40: 64 23 3A 05 99 22 11 20 20 4D 4F 4E 54 48 20 49 |d#:..". MONTH I| 00001B50: 53 20 41 44 44 45 44 20 54 4F 20 54 48 45 20 4E |S ADDED TO THE N| 00001B60: 41 4D 45 2E 00 8E 23 3C 05 99 22 11 20 20 20 20 |AME...#<..". | 00001B70: 20 20 20 20 20 9E D0 52 45 53 53 20 41 4E 59 20 | ..RESS ANY | 00001B80: 4B 45 59 20 54 4F 20 42 45 47 49 4E 2E 22 00 99 |KEY TO BEGIN."..| 00001B90: 23 41 05 8D 33 36 30 3A 8E 00 D0 23 46 05 97 53 |#A..360:...#F..S| 00001BA0: AA 35 2C 31 32 39 3A 97 53 AA 36 2C 31 32 39 3A |.5,129:.S.6,129:| 00001BB0: 97 53 AA 34 2C 31 37 3A 81 4E B2 31 A4 34 35 3A |.S.4,17:.N.1.45:| 00001BC0: 8B C2 28 31 39 37 29 B3 B1 36 34 A7 4E B2 34 36 |..(197)..64.N.46| 00001BD0: 00 00 24 47 05 97 36 34 36 2C BB 28 31 29 AC 31 |..$G..646,.(1).1| 00001BE0: 35 AA 31 3A 97 32 31 34 2C BB 28 31 29 AC 32 32 |5.1:.214,.(1).22| 00001BF0: 3A 99 3A 97 32 31 31 2C BB 28 31 29 AC 33 32 3A |:.:.211,.(1).32:| 00001C00: 00 2E 24 4B 05 99 4D 4F 24 28 BB 28 31 29 AC 31 |..$K..MO$(.(1).1| 00001C10: 32 AA 31 29 3A 97 53 AA 31 2C BB 28 31 29 AC 32 |2.1):.S.1,.(1).2| 00001C20: 35 AA 31 30 3A 81 52 B2 31 A4 37 30 3A 82 00 5E |5.10:.R.1.70:..^| 00001C30: 24 4C 05 97 36 34 36 2C BB 28 31 29 AC 31 35 AA |$L..646,.(1).15.| 00001C40: 31 3A 97 32 31 34 2C BB 28 31 29 AC 32 32 3A 99 |1:.214,.(1).22:.| 00001C50: 3A 97 32 31 31 2C BB 28 31 29 AC 33 32 3A 00 8B |:.211,.(1).32:..| 00001C60: 24 4D 05 99 44 41 24 28 BB 28 31 29 AC 36 AA 31 |$M..DA$(.(1).6.1| 00001C70: 29 3A 97 53 AA 31 2C BB 28 31 29 AC 34 35 AA 32 |):.S.1,.(1).45.2| 00001C80: 30 3A 81 52 B2 31 A4 35 30 3A 82 00 9B 24 50 05 |0:.R.1.50:...$P.| 00001C90: 82 3A 97 53 AA 34 2C 30 3A 20 8E 00 B4 24 78 05 |.:.S.4,0: ...$x.| 00001CA0: A0 34 3A 9F 34 2C 34 3A 43 B2 30 3A 43 31 B2 31 |.4:.4,4:C.0:C1.1| 00001CB0: 3A 4E B2 30 00 CE 24 82 05 98 34 2C A6 32 36 29 |:N.0..$...4,.26)| 00001CC0: 4D 32 24 28 4D 4F 29 22 20 2D 20 22 59 52 00 0A |M2$(MO)" - "YR..| 00001CD0: 25 8C 05 98 34 2C C7 28 31 33 29 C7 28 31 33 29 |%...4,.(13).(13)| 00001CE0: 22 20 20 53 55 4E 20 20 20 20 20 20 20 20 4D 4F |" SUN MO| 00001CF0: 4E 20 20 20 20 20 20 20 20 54 55 45 53 20 20 20 |N TUES | 00001D00: 20 20 20 20 20 57 45 44 22 3B 00 3C 25 8D 05 98 | WED";.<%...| 00001D10: 34 2C 22 20 20 20 20 20 20 20 20 54 48 55 52 20 |4," THUR | 00001D20: 20 20 20 20 20 20 20 46 52 49 20 20 20 20 20 20 | FRI | 00001D30: 20 20 53 41 54 22 3A 98 34 2C 48 24 00 54 25 96 | SAT":.4,H$.T%.| 00001D40: 05 81 49 B2 31 A4 59 3A 81 54 B2 30 A4 36 3A 43 |..I.1.Y:.T.0.6:C| 00001D50: B2 43 AA 31 00 76 25 A0 05 8B 43 B2 B3 4A B0 4E |.C.1.v%...C..J.N| 00001D60: B2 B1 4E 44 28 4D 4F 29 A7 98 34 2C 55 53 24 3B |..ND(MO)..4,US$;| 00001D70: 3A 89 31 34 37 30 00 91 25 AA 05 4E B2 4E AA 31 |:.1470..%..N.N.1| 00001D80: 3A 4E 24 B2 22 20 22 AA CA 28 C4 28 4E 29 2C 32 |:N$." "..(.(N),2| 00001D90: 29 00 AF 25 B4 05 98 34 2C C8 28 55 53 24 2C 37 |)..%...4,.(US$,7| 00001DA0: 29 22 20 22 C9 28 4E 24 2C 32 29 22 20 22 3B 00 |)" ".(N$,2)" ";.| 00001DB0: BC 25 BE 05 82 54 3A 98 34 2C 55 24 00 D0 25 C8 |.%...T:.4,U$..%.| 00001DC0: 05 81 54 31 B2 30 A4 35 3A 81 54 32 B2 30 A4 36 |..T1.0.5:.T2.0.6| 00001DD0: 00 F5 25 D2 05 8B 20 58 4D 24 28 43 31 AA 54 32 |..%... XM$(C1.T2| 00001DE0: 2C 54 31 29 B2 22 22 A7 98 34 2C 55 53 24 3B 3A |,T1).""..4,US$;:| 00001DF0: 89 31 35 31 30 00 0E 26 DC 05 98 34 2C 55 24 AA |.1510..&...4,U$.| 00001E00: 58 4D 24 28 43 31 AA 54 32 2C 54 31 29 3B 00 2E |XM$(C1.T2,T1);..| 00001E10: 26 E6 05 82 54 32 3A 98 34 2C 55 24 3A 82 54 31 |&...T2:.4,U$:.T1| 00001E20: 3A 43 31 B2 43 31 AA 37 3A 98 34 2C 48 24 00 3D |:C1.C1.7:.4,H$.=| 00001E30: 26 F0 05 82 49 3A 98 34 3A A0 34 3A 8E 00 70 26 |&...I:.4:.4:..p&| 00001E40: 34 3A 99 43 42 24 3B 4C 24 3B 4C 24 3A 99 22 13 |4:.CB$;L$;L$:.".| 00001E50: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................| 00001E60: 11 11 20 20 20 20 20 20 20 20 20 20 20 20 20 22 |.. "| 00001E70: 00 BA 26 3E 3A 99 22 20 20 20 20 20 9B C1 52 45 |..&>:." ..RE| 00001E80: 20 59 4F 55 20 53 55 52 45 20 59 4F 55 20 57 41 | YOU SURE YOU WA| 00001E90: 4E 54 20 54 4F 22 3A 99 22 20 20 20 20 20 20 52 |NT TO":." R| 00001EA0: 45 54 55 52 4E 20 54 4F 20 CC CF C1 C4 D3 D4 C1 |ETURN TO .......| 00001EB0: D2 20 28 59 2F 4E 29 3F 9E 22 00 D1 26 48 3A 8D |. (Y/N)?."..&H:.| 00001EC0: 33 36 30 3A 8B 41 24 B2 22 59 22 A7 31 35 30 30 |360:.A$."Y".1500| 00001ED0: 30 00 D9 26 52 3A 89 37 30 00 12 27 98 3A 9F 31 |0..&R:.70..'.:.1| 00001EE0: 35 2C 38 2C 31 35 2C 22 52 30 3A 48 45 4C 4C 4F |5,8,15,"R0:HELLO| 00001EF0: 20 43 4F 4E 4E 45 43 54 3D 48 45 4C 4C 4F 20 43 | CONNECT=HELLO C| 00001F00: 4F 4E 4E 45 43 54 22 3A 84 31 35 2C 45 52 3A A0 |ONNECT":.15,ER:.| 00001F10: 31 35 00 30 27 A2 3A 97 35 36 2C 31 36 30 3A 97 |15.0'.:.56,160:.| 00001F20: 35 32 2C 31 36 30 3A 97 35 33 32 37 32 2C 32 31 |52,160:.53272,21| 00001F30: 00 3E 27 A7 3A 8B 45 52 B3 B1 36 33 A7 80 00 55 |.>'.:.ER..63...U| 00001F40: 27 AC 3A 93 22 48 45 4C 4C 4F 20 43 4F 4E 4E 45 |'.:."HELLO CONNE| 00001F50: 43 54 22 2C 38 00 00 00 |CT",8... |
..G....53280,6:.53281,.:."..............
..... .....PLEASE WAIT....".I....A.0
.A.1:."CALENDARFONT2",8,1......56,56:.52
,56:.53272,31:.251,0. ....53281,.:.646,7
.....S.54272:.N.S.S.24:.N,0:.:.S.24,13:.
S.5,240:.S.6,44:.1200.....MN$(1)." .M.A
KE/EDIT NOTES":MN$(2)." .C.ANCEL NOTE
S ".[...MN$(3)." .V.IEW NOTE(S) ":M
N$(4)." .S.AVE CALENDAR".....MN$(5)."
.L.OAD CALENDAR ":MN$(6)." .P.RI
NT CALENDAR".T...MN$(7)." .N.EW CALE
NDAR ":MN$(8)." .Q.UIT"...... MO$(1
2),ND(12),MM(50),XM$(50,5),M2$(12):U$.G(
221):CH$."MCVSLPNQ".7....I.1.12:.MO$(I),
ND(I):..M.#..I.1.12:.M2$(I):..X.(..I.0.6
:.D$:DY$.DY$.D$." ":DA$(I).D$:....)..N.
0.6:.D$:PD$.PD$.D$." ":....-..B(251).0
..1350...2..I.0.9:S$.S$." ":.:.I.0.77:H$
.H$.G(45):.:S1$."..........".6.3.H$(1)."
........................................
.....................".Z.4.H$(1).H$(1)."
................."...5.H$(2)."..........
........................................
...........".H.6.H$(2).H$(2)."..........
......."...7.H$(3)."....................
........................................
.".6.8.H$(3).H$(3).".................".Q
.9..B(251).0..1300:.251,1.K.:..N.1.39:L$
.L$.G(32):....;.CB$.".................".
L$.L$.L$.L$.L$.L$." ".Y.<.US$.U$.S$:."
... @ PERPETUAL CALENDAR MAKER _":.:.56
0...F..630...P..198,0:.360:...Z..N.1.8:.
A$.J(CH$,N,1).K.N...D...'.N..K.1.K.8.80.
W.X..K.7..CB$;L$;L$:."..................
. "MN$(7):.". ONE SECOND...":.10.
.....K.8..14900. ....N.1985.2023:.N,32:.
.C....K.150,380,980,790,850,410:.70.....
.CB$;L$;L$:."...................
"MN$(1).2....". .O.NE DAY, .W.EEKL
Y, OR .E.VERY DAY. ";:.DD$.^. ..DD$.."O"
.DD$.."W".DD$.."E".."...":.155.J....".."
S$.....CU.1:SP.1:.DD$."E".CU.ND(MO):MS$.
"TO END OF MONTH".S....DD$."W".SP.7:CU.N
D(MO):MS$." & WEEKLY AFTER"......330...H
.."... NOTES FOR "MO$(MO)DT;MS$:MS$."".J
.R..". .......... 10 CHARACTER MAX
IMUM":..24)"PER LINE":.310.~....".....":
.I.0.5:."....";:LN.10:NU.0:.1100:X$.Y$..
....C(X$).10.X$.X$.G(32):.230.P...XM$(DT
.J,I).X$:.I:.:." THESE ARE THE NOTES:":.
......321:.". .ARE THEY CORRECT (Y/N)?.
"......360:.A$.."Y".F2.1:.200.&....DD$."
O".300.A....N.DT.J.CU.J.SP:.I.0.5.J.".XM
$(N,I).XM$(DT.J,I):.I:MM(N.J).1:.N.P.,..
...6..I.0.5:.XM$(DT.J,I)."".XM$(DT.J,I).
S1$...7.F3.18:.F2.1.F3.0...@..I.1.1)
XM$(DT.J,I):.:F2.0:.325:. :. CHR$(F3
)...A..I.0.5:.XM$(DT.J,I)."".XM$(DT.J,I)
.S1$./.B..I.1.1)XM$(DT.J,I):.:..T.E.."..
.......".20)"TO EDIT, RETYPE.N.F...22)"E
NTIRE LINE.":....J..". .DATE FOR NOTES
: (1 -"ND(MO)".) ";...O.LN.2:NU.2:.1100:
DT$.Y$:DT.E(DT$)...T..DT.1.DT.ND(MO)..".
..":.330...^.MM(DT).1:....H.A$."":.A$:.A
$."".360...R...@.|..CB$;L$;L$:."........
........... "MN$(2).Y....330:MM(DT)
.0:.I.0.5.N...XM$(DT.J,I).S$:..T........
..CB$;L$;L$:."................... "
MN$(6).D...." PRINTER READY (Y/N)?".Y..
.. 360:.A$.."Y"........". GRAPHICS PRIN
TER (Y/N)?".7.... 360:U$.".":MM.1:.A$."N
".U$.G(33):MM..:US$.U$.S$:.1400.E...US$.
U$.S$.^... 4:.4,4:C.0:C1.1:N.0.....L.C(M
2$(MO)).2:.4,G(14).16.L)M2$(MO)" - "YR..
.B..4,G(13)G(13)G(14)H(PD$,39):.4,G(15).
N.D..(MM..)..4,H$:.460...G..4,H$(1)...L.
.I.1.Y:.T.0.6:C.C.1...V..C..J.N..ND(MO).
.4,US$;:.500./...N.N.1:N$." ".J(D(N),2).
Q....4,H(US$,7)G(14)I(N$,2)G(15);.^....T
:.4,U$.R....T1.0.5:.T2.0.6...... XM$(C1.
T2,T1).""..4,US$;:.540......4,U$.XM$(C1.
T2,T1);......T2:.4,U$:.T1:C1.C1.7:.(MM..
)..4,H$:.550...!..(I.Y)..4,H$(3):.550...
#..4,H$(2)...&..I:.4: 4:..D.0.LN.2:NU.2:
." .WHICH MONTH (1-12) .";:.1100.H.5
.MO.E(Y$):.MO.1.MO.12.."..":.560...:.LN.
5:NU.2:.". .WHAT YEAR (XXXX) .";:.11
00...?.YR.E(Y$):.YR.1583.."...":.570...D
.Q.YR.(MO.3):J..(275.MO.9)..((7.Q.7).4).
367.YR.1..((.(Q.100).1).3.4).<.N.J.J.4.7
..((J.4).7):X.(ND(MO).J).7:Y..(X):.X.Y.Y
.Y.1.[.X..MO..2.(YR.4)...(YR.4).620.W.].
.(YR.400)..(YR.400).615...B..(YR.100)..(
YR.100).620...G.ND(MO).29...L...R.V.."..
@ .PERPETUAL CALENDAR ._"......
"..".10.C(MO$(MO)).2)MO$(MO):.".".26)YR.
.....:..3)DY$:.".":C.0:N.0.B....I.1.Y:.T
.1.7:C.C.1:.C..J...5):.700.U....N..ND(MO
).700.P...N.N.1:N$." ".J(D(N),2).......3
)I(N$,2)G(146);:.MM(N)..".*..";......T:.
:.:.I...F..MN$(1)MN$(2).I.P..MN$(3)MN$(4
)...Z..MN$(5)MN$(6)......MN$(7)MN$(8)...
...". .*. MEANS THIS DATE HAS NOTES.
E.....5)".@ .TYPE IN LETTER OF CHOICE ._
..":......."JANUARY",31,"FEBRUARY",28,"M
ARCH",31,"APRIL",30,"MAY",31,"JUNE",30..
.... "JULY",31......"AUGUST",31,"SEPTEMB
ER",30,"OCTOBER",31,"NOVEMBER",30,"DECEM
BER",31.0....JANUARY,FEBRUARY,MARCH,APRI
L,MAY,JUNE,JULY,AUGUST,SEPTEMBER,OCTOBER
.H.... NOVEMBER,DECEMBER.W...."SUN","MON
","TUE","WED","THU","FRI","SAT"......SUN
,MON,TUE,WED,THU,FRI,SAT.I....CB$;L$;L$:
.".................. "MN$(4).....LN
.12:NU.0:.". .NAME OF FILE: ";:.1100:SU
$.Y$:SU$.H(SU$,12).2....3,8,3,.SU$." ".H
(MO$(MO),3).",S,W".X. ..". SAVING "SU$.
" ".H(MO$(MO),3)...*..N.J.ND(MO).J:.R.0.
5:.XM$(N,R).S$.XM$(N,R)."".XM$(N,R).".".
..4..3,XM$(N,R):.:..D.>..950:.FL.1.FL.0:
.840.M.H. 3:....R..CB$;L$;L$:.".........
......... "MN$(5).?.W.LN.12:NU.0:."
. .NAME OF FILE: ";:.1100:SU$.Y$:SU$.H(
SU$,12).G.X..3,8,3,.SU$." ".H(MO$(MO),3)
.",S,R"...F..". LOADING "SU$." ".H(MO$
(MO),3)...K..N.1.37:MM(DT).0:....P..N.J.
ND(MO).J:.R.0.5.O.Z..3,XM$(N,R)......XM$
(N,R).".".XM$(N,R).S$:.920.....MM(N.J).1
......:..!....950:.FL.1.FL.0:.840.*....8
40.O... 15:.15,8,15:.15,X,Y$:.X.0. 15:..
....." DISK ERROR:"X,Y$:FL.1:.A$."S".
.R.1.1400:.:....J..N.1.37:MM(N).0:.R.0.5
:XM$(N.J,R).S$:.:.: 15:....T..CB$;L$;L$:
."................... "MN$(3)...Y
..". .O.NE DAY OR .E.VERY DAY? ";:.
DD$.>....DD$.."O".DD$.."E".."...":.985.Z
...CU.1:.DD$."E".CU.ND(MO)......:.". .W
HICH DATE? ";:LN.2:NU.2:.1100:DT$.Y$:DT.
E(DT$)......DT.1.DT.ND(MO).."...":.1010.
.....N.DT.J.CU.J:DT.N.J:."... NOTES FOR
"MO$(MO)DT......".":.321.?....". .PRESS
ANY KEY TO CONTINUE":.DD$.."O".."
Q TO QUIT.".H.$..360.Y....A$."Q".N.6
0.A.8..:....L..198,0:Y$."":.S.5,129:.S.6
,129:." ...........@";.F.Q.."_.
.";:.N.1.20:.:." .";:.N.1.20:..Z.V..Z$:.
Z$."".1105...W..S.4,33:.S.1,23:.N.1.10:.
:.S.1,0...[.L.C(Y$):.Z$.G(13)..".":..G.`
..Z$.G(20).L.." ..";:Y$.H(Y$,L.1):.1105.
W.E..NU.0..(Z$." ".Z$."_").(Z$."A".Z$."Z
").1105...J..NU.1..(Z$."A".Z$."Z").(Z$."
A".Z$."Z").1105.G.O..NU.2..(Z$."0".Z$."9
").1105.W.T..L..LN.1105...Y..Z$;:Y$.Y$.Z
$...~..1105.. ...B(251).1...9 ..T$."PERP
ETUAL CALENDAR MAKER":.".":.646,.(1).15.
1.P ...N.3.15:..N)T$:.S.4,33:.S.1,N.10:.
R.1.30:.:.S.4,17.. ...R.1.30:.:.S.4,0:..
. ...".":."(C) 1988 BY":.S.2,187:.S.3,16
5:.S.4,65.. ...S.1,12:.R.1.200:.:.S.4,0:
.R.1.100:... ..."......".*!...N.22.16..1
:."..".N)"W. M. SHOCKLEY":.S.4,17:.S.1,N
.9.T!...R.1.40:.:.S.4,33:.R.1.30:.:.S.4,
32:..!D.."........ FOR .LOA
DSTAR."..!I....!...".. .INSTR
UCTIONS":.198,0..!...". .THIS CALENDAR
MAKER MAKES SINGLE".."...". MONTH PRINT
OUTS. EACH DAY IN THE".4"#..". MONTH C
AN HAVE A NOTE OF UP TO SIX".]"(..". LI
NES (10 CHARACTERS PER LINE)..."-..". F
IRST PICK THE MONTH, THEN THE YEAR.."2..
". (AFTER 1563). THE REST IS OBVIOUS..
"7..". FROM THE MENU. JUST TYPE THE FI
RST..#8..". LETTER OF YOUR CHOICE -- TH
E LETTER".?#9..". IN BLUE. WHEN A FILE
IS SAVED, THE".D#:..". MONTH IS ADDED
TO THE NAME...#<..". .PRESS ANY
KEY TO BEGIN."..#A..360:..P#F..S.5,129:.
S.6,129:.S.4,17:.N.1.45:.B(197)..64.N.46
..$G..646,.(1).15.1:.214,.(1).22:.:.211,
.(1).32:..$K..MO$(.(1).12.1):.S.1,.(1).2
5.10:.R.1.70:..^$L..646,.(1).15.1:.214,.
(1).22:.:.211,.(1).32:..$M..DA$(.(1).6.1
):.S.1,.(1).45.20:.R.1.50:...$P..:.S.4,0
: ...$X. 4:.4,4:C.0:C1.1:N.0.N$...4,.26)
M2$(MO)" - "YR..%...4,G(13)G(13)" SUN
MON TUES WED";.<%...
4," THUR FRI SAT":.
4,H$.T%...I.1.Y:.T.0.6:C.C.1.V% ..C..J.N
..ND(MO)..4,US$;:.1470..%..N.N.1:N$." ".
J(D(N),2)..%...4,H(US$,7)" "I(N$,2)" ";.
.%...T:.4,U$.P%H..T1.0.5:.T2.0.6..%R.. X
M$(C1.T2,T1).""..4,US$;:.1510..&...4,U$.
XM$(C1.T2,T1);..&...T2:.4,U$:.T1:C1.C1.7
:.4,H$.=&...I:.4: 4:..P&4:.CB$;L$;L$:.".
.................. "..&>:."
.ARE YOU SURE YOU WANT TO":." R
ETURN TO LOADSTAR (Y/N)?.".Q&H:.360:.A$.
"Y".15000.Y&R:.70..'.:.15,8,15,"R0:HELLO
CONNECT=HELLO CONNECT":.15,ER: 15.0'.:.
56,160:.52,160:.53272,21.>'.:.ER..63...U
'.:."HELLO CONNECT",8...
> CLICK IMAGE PREVIEW FOR FULL MODAL