CALENDAR MAKER
FILE INFORMATION
FILENAME(S): CALENDAR MAKER
FILE TYPE(S): PRG
FILE SIZE: 4.3K
FIRST SEEN: 2025-11-30 18:12:15
APPEARS ON: 1 disk(s)
FILE HASH
6f8f3426793959dc2273ae4bc3452607a3d17b058a80908b23044fd64d3749a6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 38 S 1 | CALENDAR MAKER | PRG | Sailor, Ganheden | 12 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 C8 00 8D 36 30 31 30 30 3A 9C 00 39 |.......60100:..9|
00000010: 08 D2 00 86 20 44 28 33 35 29 2C 4D 4F 24 28 31 |.... D(35),MO$(1|
00000020: 32 29 2C 4D 24 28 31 32 2C 37 29 2C 44 4D 28 31 |2),M$(12,7),DM(1|
00000030: 32 29 2C 46 44 28 31 32 29 00 59 08 DC 00 81 20 |2),FD(12).Y.... |
00000040: 58 20 B2 20 31 20 A4 20 31 32 20 3A 20 87 20 4D |X . 1 . 12 : . M|
00000050: 4F 24 28 58 29 20 3A 20 82 00 7C 08 E6 00 83 20 |O$(X) : ..|.... |
00000060: 4A 41 4E 55 41 52 59 2C 46 45 42 52 55 41 52 59 |JANUARY,FEBRUARY|
00000070: 2C 4D 41 52 43 48 2C 41 50 52 49 4C 00 A1 08 F0 |,MARCH,APRIL....|
00000080: 00 83 20 4D 41 59 2C 4A 55 4E 45 2C 4A 55 4C 59 |.. MAY,JUNE,JULY|
00000090: 2C 41 55 47 55 53 54 2C 53 45 50 54 45 4D 42 45 |,AUGUST,SEPTEMBE|
000000A0: 52 00 C1 08 FA 00 83 20 4F 43 54 4F 42 45 52 2C |R...... OCTOBER,|
000000B0: 4E 4F 56 45 4D 42 45 52 2C 44 45 43 45 4D 42 45 |NOVEMBER,DECEMBE|
000000C0: 52 00 E0 08 04 01 81 20 58 20 B2 20 31 20 A4 20 |R...... X . 1 . |
000000D0: 31 32 20 3A 20 87 20 44 4D 28 58 29 20 3A 20 82 |12 : . DM(X) : .|
000000E0: 00 0A 09 0E 01 83 20 33 31 2C 32 38 2C 33 31 2C |...... 31,28,31,|
000000F0: 33 30 2C 33 31 2C 33 30 2C 33 31 2C 33 31 2C 33 |30,31,30,31,31,3|
00000100: 30 2C 33 31 2C 33 30 2C 33 31 00 29 09 18 01 81 |0,31,30,31.)....|
00000110: 20 58 20 B2 20 31 20 A4 20 31 32 20 3A 20 87 20 | X . 1 . 12 : . |
00000120: 46 44 28 58 29 20 3A 20 82 00 49 09 22 01 83 20 |FD(X) : ..I.".. |
00000130: 30 2C 33 2C 33 2C 2D 31 2C 31 2C 34 2C 2D 31 2C |0,3,3,-1,1,4,-1,|
00000140: 32 2C 35 2C 30 2C 33 2C 35 00 78 09 2C 01 53 50 |2,5,0,3,5.x.,.SP|
00000150: 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |$." |
00000160: 20 20 20 20 20 20 20 20 20 20 20 22 3A 8F 20 32 | ":. 2|
00000170: 34 20 53 50 41 43 45 53 00 9B 09 36 01 44 4E 24 |4 SPACES...6.DN$|
00000180: B2 22 20 53 55 20 4D 4F 20 54 55 20 57 45 20 54 |." SU MO TU WE T|
00000190: 48 20 46 52 20 53 41 20 20 20 22 00 C7 09 40 01 |H FR SA "...@.|
000001A0: 44 4C 24 B2 22 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |DL$."-----------|
000001B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A 8F 20 32 31 |----------":. 21|
000001C0: 20 44 41 53 48 45 53 00 EE 09 4A 01 99 20 22 93 | DASHES...J.. ".|
000001D0: 20 20 20 20 20 20 20 20 20 20 20 20 12 20 43 41 | . CA|
000001E0: 4C 45 4E 44 41 52 20 4D 41 4B 45 52 20 22 00 13 |LENDAR MAKER "..|
000001F0: 0A 4F 01 99 22 20 20 20 20 20 20 20 20 20 20 20 |.O.." |
00000200: 20 12 42 59 20 20 42 52 55 43 45 20 4A 45 41 47 | .BY BRUCE JEAG|
00000210: 45 52 22 00 19 0A 54 01 99 00 35 0A 59 01 99 22 |ER"...T...5.Y.."|
00000220: 45 4E 54 45 52 20 12 20 51 20 92 20 54 4F 20 51 |ENTER . Q . TO Q|
00000230: 55 49 54 2E 22 00 63 0A 5E 01 99 20 22 45 4E 54 |UIT.".c.^.. "ENT|
00000240: 45 52 20 53 54 41 52 54 49 4E 47 20 59 45 41 52 |ER STARTING YEAR|
00000250: 3A 22 3B 3A 8D 36 30 35 30 30 3A 59 31 B2 C5 28 |:";:.60500:Y1..(|
00000260: 42 24 29 00 7B 0A 63 01 8B 42 24 B2 22 51 22 A7 |B$).{.c..B$."Q".|
00000270: 8D 36 30 30 30 30 3A 89 33 34 35 00 99 0A 68 01 |.60000:.345...h.|
00000280: 8B 20 59 31 B3 31 37 35 32 20 A7 20 8D 20 36 32 |. Y1.1752 . . 62|
00000290: 30 30 30 3A 89 20 33 33 30 00 9F 0A 72 01 99 00 |000:. 330...r...|
000002A0: BF 0A 7C 01 99 20 22 28 20 52 45 54 55 52 4E 20 |..|.. "( RETURN |
000002B0: 41 4C 4F 4E 45 20 3D 22 20 59 31 20 22 29 22 00 |ALONE =" Y1 ")".|
000002C0: C9 0A 86 01 59 32 B2 59 31 00 CF 0A 90 01 99 00 |....Y2.Y1.......|
000002D0: 12 0B 9A 01 99 20 22 45 4E 54 45 52 20 45 4E 44 |..... "ENTER END|
000002E0: 49 4E 47 20 59 45 41 52 3A 20 20 20 20 20 9D 9D |ING YEAR: ..|
000002F0: 9D 9D 9D 22 3B 3A 8D 36 30 35 30 30 3A 59 32 B2 |...";:.60500:Y2.|
00000300: C5 28 42 24 29 3A 8B 42 24 B2 22 22 A7 59 32 B2 |.(B$):.B$."".Y2.|
00000310: 59 31 00 2B 0B 9B 01 8B 42 24 B2 22 51 22 B0 42 |Y1.+....B$."Q".B|
00000320: 24 B2 22 D1 22 20 A7 20 33 33 30 00 3C 0B 9C 01 |$."." . 330.<...|
00000330: 8B 42 24 B2 22 22 A7 59 32 B2 59 31 00 57 0B 9F |.B$."".Y2.Y1.W..|
00000340: 01 8B 59 32 B3 59 31 20 A7 20 8D 20 36 32 31 30 |..Y2.Y1 . . 6210|
00000350: 30 3A 89 20 34 31 30 00 73 0B A4 01 8B 20 59 32 |0:. 410.s.... Y2|
00000360: B3 31 37 35 32 20 A7 20 8D 36 32 30 30 30 3A 89 |.1752 . .62000:.|
00000370: 33 33 30 00 89 0B A9 01 8D 39 30 30 30 3A 8B A8 |330......9000:..|
00000380: 28 4F 4B 29 A7 8A 32 31 30 00 8F 0B AE 01 99 00 |(OK)..210.......|
00000390: A9 0B B8 01 99 20 3A 20 99 22 43 41 4C 43 55 4C |..... : ."CALCUL|
000003A0: 41 54 49 4E 47 2E 2E 2E 22 00 B7 0B C2 01 A0 34 |ATING..."......4|
000003B0: 20 3A 20 9F 34 2C 34 00 CA 0B CC 01 81 20 59 52 | : .4,4...... YR|
000003C0: 20 B2 20 59 31 20 A4 20 59 32 00 DB 0B D6 01 99 | . Y1 . Y2......|
000003D0: 20 3A 20 99 C7 28 31 38 29 59 52 00 00 0C E0 01 | : ..(18)YR.....|
000003E0: 5A B2 28 59 52 AD 31 30 30 29 20 3A 20 43 B2 B5 |Z.(YR.100) : C..|
000003F0: 28 59 52 AD 31 30 30 29 20 3A 20 41 B2 5A AB 43 |(YR.100) : A.Z.C|
00000400: 00 10 0C EA 01 8B 20 41 B2 30 20 A7 20 35 33 30 |...... A.0 . 530|
00000410: 00 31 0C F4 01 5A B2 28 59 52 AD 34 29 20 3A 20 |.1...Z.(YR.4) : |
00000420: 43 B2 B5 28 59 52 AD 34 29 20 3A 20 41 B2 5A AB |C..(YR.4) : A.Z.|
00000430: 43 00 4A 0C FE 01 8B 20 41 B2 30 20 A7 20 58 44 |C.J.... A.0 . XD|
00000440: B2 31 20 3A 20 89 20 35 36 30 00 54 0C 08 02 89 |.1 : . 560.T....|
00000450: 20 35 35 30 00 79 0C 12 02 5A B2 28 59 52 AD 34 | 550.y...Z.(YR.4|
00000460: 30 30 29 20 3A 20 43 B2 B5 28 59 52 AD 34 30 30 |00) : C..(YR.400|
00000470: 29 20 3A 20 41 B2 5A AB 43 00 92 0C 1C 02 8B 20 |) : A.Z.C...... |
00000480: 41 B2 30 20 A7 20 58 44 B2 31 20 3A 20 89 20 35 |A.0 . XD.1 : . 5|
00000490: 36 30 00 9B 0C 26 02 58 44 B2 30 00 C5 0C 30 02 |60...&.XD.0...0.|
000004A0: 46 B2 B5 28 59 52 AD 34 29 20 3A 20 47 B2 B5 28 |F..(YR.4) : G..(|
000004B0: 59 52 AD 34 30 30 29 20 3A 20 48 B2 B5 28 59 52 |YR.400) : H..(YR|
000004C0: AD 31 30 30 29 00 D1 0C 3A 02 4A B2 46 AA 47 AB |.100)...:.J.F.G.|
000004D0: 48 00 F0 0C 44 02 4C B2 28 59 52 AA 4A 29 AD 37 |H...D.L.(YR.J).7|
000004E0: 20 3A 20 4D B2 B5 28 28 59 52 AA 4A 29 AD 37 29 | : M..((YR.J).7)|
000004F0: 00 11 0D 4E 02 51 B2 28 4C AB 4D 29 AC 37 20 3A |...N.Q.(L.M).7 :|
00000500: 20 59 53 B2 B5 28 51 29 20 3A 20 52 B2 51 AB 59 | YS..(Q) : R.Q.Y|
00000510: 53 00 27 0D 58 02 8B 20 52 B1 30 2E 39 20 A7 20 |S.'.X.. R.0.9 . |
00000520: 59 53 B2 59 53 AA 31 00 34 0D 62 02 59 53 B2 59 |YS.YS.1.4.b.YS.Y|
00000530: 53 AB 58 44 00 49 0D 6C 02 8B 20 59 53 B3 30 20 |S.XD.I.l.. YS.0 |
00000540: A7 20 59 53 B2 59 53 AA 37 00 59 0D 76 02 81 20 |. YS.YS.7.Y.v.. |
00000550: 4D 48 B2 31 20 A4 20 31 32 00 7C 0D 80 02 4D 4E |MH.1 . 12.|...MN|
00000560: 24 B2 4D 4F 24 28 4D 48 29 20 3A 20 99 20 C8 28 |$.MO$(MH) : . .(|
00000570: 4D 4E 24 AA 53 50 24 2C 32 30 29 3B 00 A0 0D 8A |MN$.SP$,20);....|
00000580: 02 44 4D 20 B2 20 44 4D 28 4D 48 29 20 3A 20 8B |.DM . DM(MH) : .|
00000590: 20 4D 48 B2 32 20 A7 20 44 4D B2 44 4D AA 58 44 | MH.2 . DM.DM.XD|
000005A0: 00 C5 0D 94 02 46 44 B2 59 53 AA 46 44 28 4D 48 |.....FD.YS.FD(MH|
000005B0: 29 AA 58 44 20 3A 20 8B 20 4D 48 B2 31 20 A7 20 |).XD : . MH.1 . |
000005C0: 46 44 B2 59 53 00 DA 0D 9E 02 8B 20 4D 48 B2 32 |FD.YS...... MH.2|
000005D0: 20 A7 20 46 44 B2 59 53 AA 33 00 EF 0D A8 02 8B | . FD.YS.3......|
000005E0: 20 46 44 B1 36 20 A7 20 46 44 B2 46 44 AB 37 00 | FD.6 . FD.FD.7.|
000005F0: 04 0E B2 02 8B 20 46 44 B3 30 20 A7 20 46 44 B2 |..... FD.0 . FD.|
00000600: 46 44 AA 37 00 0D 0E BC 02 57 B2 32 30 00 1A 0E |FD.7.....W.20...|
00000610: C6 02 59 52 B2 B5 28 59 52 29 00 35 0E D0 02 4D |..YR..(YR).5...M|
00000620: 24 28 4D 48 2C 30 29 B2 C8 28 4D 4E 24 AA 53 50 |$(MH,0)..(MN$.SP|
00000630: 24 2C 32 34 29 00 46 0E DA 02 4D 24 28 4D 48 2C |$,24).F...M$(MH,|
00000640: 31 29 B2 44 4E 24 00 57 0E E4 02 4D 24 28 4D 48 |1).DN$.W...M$(MH|
00000650: 2C 32 29 B2 44 4C 24 00 75 0E EE 02 81 20 58 20 |,2).DL$.u.... X |
00000660: B2 20 31 20 A4 20 33 35 20 3A 20 44 28 58 29 B2 |. 1 . 35 : D(X).|
00000670: 30 20 3A 20 82 00 9E 0E F8 02 59 B2 31 20 3A 20 |0 : ......Y.1 : |
00000680: 5A B2 59 20 3A 20 81 20 58 20 B2 20 46 44 AA 31 |Z.Y : . X . FD.1|
00000690: 20 A4 20 33 35 20 3A 20 44 28 58 29 B2 5A 00 BD | . 35 : D(X).Z..|
000006A0: 0E 02 03 59 B2 59 AA 31 20 3A 20 5A B2 59 20 3A |...Y.Y.1 : Z.Y :|
000006B0: 20 8B 20 5A B1 44 4D 20 A7 20 5A B2 30 00 D0 0E | . Z.DM . Z.0...|
000006C0: 0C 03 82 20 3A 20 57 45 B2 30 20 3A 20 59 B2 30 |... : WE.0 : Y.0|
000006D0: 00 F7 0E 16 03 81 20 58 20 B2 20 31 20 A4 20 33 |...... X . 1 . 3|
000006E0: 35 20 3A 20 59 B2 59 AA 31 20 3A 20 8B 20 59 B1 |5 : Y.Y.1 : . Y.|
000006F0: 36 20 A7 20 59 B2 30 00 2B 0F 20 03 8B 20 44 28 |6 . Y.0.+. .. D(|
00000700: 58 29 B2 30 20 A7 20 4D 24 28 4D 48 2C 57 45 AA |X).0 . M$(MH,WE.|
00000710: 33 29 B2 4D 24 28 4D 48 2C 57 45 AA 33 29 AA 22 |3).M$(MH,WE.3)."|
00000720: 20 20 20 22 20 3A 20 89 38 32 30 00 61 0F 2A 03 | " : .820.a.*.|
00000730: 4D 24 28 4D 48 2C 57 45 AA 33 29 20 B2 20 4D 24 |M$(MH,WE.3) . M$|
00000740: 28 4D 48 2C 57 45 AA 33 29 20 AA 20 C9 28 20 22 |(MH,WE.3) . .( "|
00000750: 20 20 20 20 22 AA 20 C4 28 44 28 58 29 29 2C 33 | ". .(D(X)),3|
00000760: 29 00 75 0F 34 03 8B 20 59 B2 30 20 A7 20 57 45 |).u.4.. Y.0 . WE|
00000770: B2 57 45 AA 31 00 7D 0F 3E 03 82 20 58 00 86 0F |.WE.1.}.>.. X...|
00000780: 48 03 82 20 4D 48 00 93 0F 52 03 98 34 3A 98 34 |H.. MH...R..4:.4|
00000790: 2C 59 52 00 A2 0F 5C 03 98 34 3A 98 34 3A 4C 4E |,YR...\..4:.4:LN|
000007A0: B2 34 00 C1 0F 66 03 81 20 58 20 B2 20 30 20 A4 |.4...f.. X . 0 .|
000007B0: 20 31 32 20 3A 20 81 20 59 20 B2 20 30 20 A4 20 | 12 : . Y . 0 . |
000007C0: 37 00 E1 0F 70 03 4D 24 28 58 2C 59 29 20 B2 20 |7...p.M$(X,Y) . |
000007D0: C8 28 4D 24 28 58 2C 59 29 AA 53 50 24 2C 32 34 |.(M$(X,Y).SP$,24|
000007E0: 29 00 EF 0F 7A 03 82 20 59 20 3A 20 82 20 58 00 |)...z.. Y : . X.|
000007F0: 21 10 84 03 81 20 58 B2 30 A4 37 3A 98 34 2C 22 |!.... X.0.7:.4,"|
00000800: 20 20 20 22 4D 24 28 31 2C 58 29 4D 24 28 32 2C | "M$(1,X)M$(2,|
00000810: 58 29 4D 24 28 33 2C 58 29 3A 82 3A 98 34 3A 98 |X)M$(3,X):.:.4:.|
00000820: 34 00 53 10 8E 03 81 20 58 B2 30 A4 37 3A 98 34 |4.S.... X.0.7:.4|
00000830: 2C 22 20 20 20 22 4D 24 28 34 2C 58 29 4D 24 28 |," "M$(4,X)M$(|
00000840: 35 2C 58 29 4D 24 28 36 2C 58 29 3A 82 3A 98 34 |5,X)M$(6,X):.:.4|
00000850: 3A 98 34 00 85 10 98 03 81 20 58 B2 30 A4 37 3A |:.4...... X.0.7:|
00000860: 98 34 2C 22 20 20 20 22 4D 24 28 37 2C 58 29 4D |.4," "M$(7,X)M|
00000870: 24 28 38 2C 58 29 4D 24 28 39 2C 58 29 3A 82 3A |$(8,X)M$(9,X):.:|
00000880: 98 34 3A 98 34 00 BA 10 A2 03 81 20 58 B2 30 A4 |.4:.4...... X.0.|
00000890: 37 3A 98 34 2C 22 20 20 20 22 4D 24 28 31 30 2C |7:.4," "M$(10,|
000008A0: 58 29 4D 24 28 31 31 2C 58 29 4D 24 28 31 32 2C |X)M$(11,X)M$(12,|
000008B0: 58 29 3A 82 3A 98 34 3A 98 34 00 D4 10 AC 03 81 |X):.:.4:.4......|
000008C0: 20 58 20 B2 20 31 20 A4 20 32 32 20 3A 20 98 34 | X . 1 . 22 : .4|
000008D0: 20 3A 20 82 00 E2 10 B6 03 82 20 59 52 20 3A 20 | : ....... YR : |
000008E0: A0 34 00 EB 10 C0 03 8A 32 31 30 00 0A 11 28 23 |.4......210...(#|
000008F0: 4F 4B B2 AB 31 3A 9F 31 35 2C 34 2C 31 35 3A A0 |OK..1:.15,4,15:.|
00000900: 31 35 3A 8B 53 54 B2 2E A7 8E 00 37 11 32 23 4F |15:.ST.....7.2#O|
00000910: 4B B2 2E 3A 99 22 11 20 20 20 20 20 45 52 52 4F |K..:.". ERRO|
00000920: 52 3A 20 50 52 49 4E 54 45 52 20 4E 4F 54 20 4F |R: PRINTER NOT O|
00000930: 4E 4C 49 4E 45 21 22 00 58 11 37 23 81 41 B2 31 |NLINE!".X.7#.A.1|
00000940: A4 35 30 3A 97 35 34 32 39 36 2C 31 35 3A 97 35 |.50:.54296,15:.5|
00000950: 34 32 39 36 2C 2E 3A 82 00 6A 11 3C 23 81 41 B2 |4296,.:..j.<#.A.|
00000960: 31 A4 33 30 30 30 3A 82 3A 8E 00 9A 11 60 EA 99 |1.3000:.:....`..|
00000970: 22 91 91 20 20 20 20 20 20 20 20 20 20 20 20 20 |".. |
00000980: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000990: 20 20 20 20 20 20 20 20 20 22 00 C8 11 6A EA 99 | "...j..|
000009A0: 22 20 20 41 52 45 20 59 4F 55 20 53 55 52 45 20 |" ARE YOU SURE |
000009B0: 59 4F 55 20 57 41 4E 54 20 54 4F 20 51 55 49 54 |YOU WANT TO QUIT|
000009C0: 3F 20 28 59 2F 4E 29 22 00 E8 11 74 EA 41 B2 C2 |? (Y/N)"...t.A..|
000009D0: 28 32 30 33 29 3A 8B 41 B3 B1 32 35 AF 41 B3 B1 |(203):.A..25.A..|
000009E0: 33 39 A7 36 30 30 32 30 00 21 12 7E EA 8B 41 B2 |39.60020.!.~..A.|
000009F0: 33 39 A7 99 22 91 20 20 20 20 20 20 20 20 20 20 |39..". |
00000A00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A10: 20 20 20 20 20 20 20 20 20 20 20 20 91 91 22 3A | ..":|
00000A20: 8E 00 5A 12 88 EA 9F 31 35 2C 38 2C 31 35 2C 22 |..Z....15,8,15,"|
00000A30: 52 30 3A 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 |R0:HELLO CONNECT|
00000A40: 3D 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 3A |=HELLO CONNECT":|
00000A50: 84 31 35 2C 45 52 3A A0 31 35 00 68 12 92 EA 8B |.15,ER:.15.h....|
00000A60: 45 52 B3 B1 36 33 A7 80 00 7F 12 9C EA 93 22 48 |ER..63........"H|
00000A70: 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 2C 38 00 |ELLO CONNECT",8.|
00000A80: 95 12 C4 EA 97 35 33 32 38 30 2C 31 3A 97 35 33 |.....53280,1:.53|
00000A90: 32 38 31 2C 31 00 CF 12 CE EA 99 C7 28 31 34 32 |281,1.......(142|
00000AA0: 29 22 93 08 95 D5 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |)"..............|
00000AB0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000AC0: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C9 22 3B 00 |.............";.|
00000AD0: EA 12 D8 EA 81 41 B2 31 A4 32 33 3A 99 22 DD 22 |.....A.1.23:."."|
00000AE0: A6 33 38 29 22 DD 22 3B 3A 82 00 1D 13 E2 EA 99 |.38)".";:.......|
00000AF0: 22 CA C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |"...............|
00000B00: C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |................|
00000B10: C0 C0 C0 C0 C0 C0 C0 CB 9D 94 C0 13 22 00 3A 13 |............".:.|
00000B20: EC EA 81 41 B2 32 31 37 A4 32 34 32 3A 97 41 2C |...A.217.242:.A,|
00000B30: C2 28 41 29 B0 31 32 38 3A 82 00 63 13 F6 EA 99 |.(A).128:..c....|
00000B40: 22 13 11 11 1D 20 20 20 20 20 20 20 20 20 20 1C |".... .|
00000B50: 4C 4F 41 44 53 54 41 52 20 50 52 45 53 45 4E 54 |LOADSTAR PRESENT|
00000B60: 53 3A 22 00 91 13 00 EB 99 22 11 11 11 11 11 1D |S:"......"......|
00000B70: 20 20 20 20 20 20 20 1F 12 20 20 20 20 20 20 20 | .. |
00000B80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000B90: 22 00 BC 13 0A EB 99 22 1D 20 20 20 20 20 20 20 |"......". |
00000BA0: 1F 12 20 20 20 20 43 41 4C 45 4E 44 41 52 20 20 |.. CALENDAR |
00000BB0: 4D 41 4B 45 52 20 20 20 20 9B 20 22 00 E7 13 14 |MAKER . "....|
00000BC0: EB 99 22 1D 20 20 20 20 20 20 20 1F 12 20 20 20 |..". .. |
00000BD0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000BE0: 20 20 20 20 9B 20 22 00 12 14 1E EB 99 22 1D 20 | . "......". |
00000BF0: 20 20 20 20 20 20 1F 12 20 20 20 20 42 59 20 42 | .. BY B|
00000C00: 52 55 43 45 20 4A 45 41 47 45 52 20 20 20 20 9B |RUCE JEAGER .|
00000C10: 20 22 00 3D 14 28 EB 99 22 1D 20 20 20 20 20 20 | ".=.(..". |
00000C20: 20 1F 12 20 20 20 20 20 20 20 20 20 20 20 20 20 | .. |
00000C30: 20 20 20 20 20 20 20 20 20 20 9B 20 22 00 68 14 | . ".h.|
00000C40: 32 EB 99 22 1D 20 20 20 20 20 20 20 1F 12 20 20 |2..". .. |
00000C50: 20 20 43 4F 50 59 52 49 47 48 54 20 20 31 39 38 | COPYRIGHT 198|
00000C60: 37 20 20 20 20 9B 20 22 00 93 14 3C EB 99 22 1D |7 . "...<..".|
00000C70: 20 20 20 20 20 20 20 1F 12 20 20 20 20 20 20 20 | .. |
00000C80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000C90: 9B 20 22 00 BC 14 46 EB 99 22 1D 20 20 20 20 20 |. "...F..". |
00000CA0: 20 20 20 12 20 20 20 20 20 20 20 20 20 20 20 20 | . |
00000CB0: 20 20 20 20 20 20 20 20 20 20 20 22 00 EB 14 50 | "...P|
00000CC0: EB 99 22 11 11 11 11 11 11 1D 20 20 20 20 20 20 |.."....... |
00000CD0: 20 20 1C 50 52 45 53 53 20 53 50 41 43 45 20 54 | .PRESS SPACE T|
00000CE0: 4F 20 43 4F 4E 54 49 4E 55 45 22 00 01 15 5A EB |O CONTINUE"...Z.|
00000CF0: 8B C2 28 32 30 33 29 B3 B1 36 30 A7 36 30 32 35 |..(203)..60.6025|
00000D00: 30 00 07 15 64 EB 8E 00 1E 15 54 EC 42 24 B2 22 |0...d.....T.B$."|
00000D10: 22 3A 99 22 A4 22 3B 3A 81 41 B2 31 A4 35 00 33 |":.".";:.A.1.5.3|
00000D20: 15 5E EC A1 41 24 3A 8B 41 24 B2 22 22 A7 36 30 |.^..A$:.A$."".60|
00000D30: 35 31 30 00 49 15 68 EC 8B 41 24 B2 C7 28 31 33 |510.I.h..A$..(13|
00000D40: 29 A7 99 22 9D 20 22 3A 8E 00 81 15 72 EC 8B 41 |)..". ":....r..A|
00000D50: 24 B2 C7 28 32 30 29 AF 41 B1 31 A7 99 22 9D 9D |$..(20).A.1.."..|
00000D60: 20 20 9D 9D A4 22 3B 3A 41 B2 41 AB 31 3A 42 24 | ...";:A.A.1:B$|
00000D70: B2 C8 28 42 24 2C 41 AB 31 29 3A 89 36 30 35 31 |..(B$,A.1):.6051|
00000D80: 30 00 92 15 77 EC 8B 28 41 B2 35 29 A7 36 30 35 |0...w..(A.5).605|
00000D90: 31 30 00 AB 15 7C EC 8B 41 24 B2 22 51 22 B0 41 |10...|..A$."Q".A|
00000DA0: 24 B2 22 D1 22 A7 36 30 35 36 30 00 C4 15 86 EC |$.".".60560.....|
00000DB0: 8B 41 24 B3 22 30 22 B0 41 24 B1 22 39 22 A7 36 |.A$."0".A$."9".6|
00000DC0: 30 35 31 30 00 DE 15 90 EC 99 22 9D 22 41 24 22 |0510......"."A$"|
00000DD0: A4 22 3B 3A 42 24 B2 42 24 AA 41 24 3A 82 00 EC |.";:B$.B$.A$:...|
00000DE0: 15 30 F2 99 22 13 11 11 11 11 11 22 00 14 16 3A |.0.."......"...:|
00000DF0: F2 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 |..".............|
00000E00: 1F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000E10: 20 20 20 22 00 3E 16 3B F2 99 22 1D 1D 1D 1D 1D | ".>.;..".....|
00000E20: 1D 1D 1D 1D 1D 1D 1D 12 1F 20 20 53 54 41 52 54 |......... START|
00000E30: 49 4E 47 20 44 41 54 45 20 20 20 98 20 22 00 68 |ING DATE . ".h|
00000E40: 16 3C F2 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |.<.."...........|
00000E50: 1D 12 1F 20 53 48 4F 55 4C 44 20 42 45 20 4C 41 |... SHOULD BE LA|
00000E60: 52 47 45 52 20 98 20 22 00 92 16 3F F2 99 22 1D |RGER . "...?..".|
00000E70: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 1F 20 20 20 |............. |
00000E80: 20 54 48 41 4E 20 31 37 35 31 20 20 20 20 20 98 | THAN 1751 .|
00000E90: 20 22 00 BC 16 44 F2 99 22 1D 1D 1D 1D 1D 1D 1D | "...D..".......|
00000EA0: 1D 1D 1D 1D 1D 12 1F 20 20 20 20 20 20 20 20 20 |....... |
00000EB0: 20 20 20 20 20 20 20 20 20 98 20 22 00 E6 16 45 | . "...E|
00000EC0: F2 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 20 |.."............ |
00000ED0: 12 98 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00000EE0: 20 20 20 20 1C 22 00 F6 16 49 F2 81 58 B2 31 A4 | ."...I..X.1.|
00000EF0: 32 35 30 30 3A 82 00 FC 16 4E F2 8E 00 0D 17 94 |2500:....N......|
00000F00: F2 99 22 13 11 11 11 11 11 11 11 11 22 00 35 17 |..".........".5.|
00000F10: 9E F2 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |..."............|
00000F20: 12 1F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.. |
00000F30: 20 20 20 20 22 00 5F 17 9F F2 99 22 1D 1D 1D 1D | "._...."....|
00000F40: 1D 1D 1D 1D 1D 1D 1D 1D 12 1F 20 20 20 45 4E 44 |.......... END|
00000F50: 49 4E 47 20 20 44 41 54 45 20 20 20 98 20 22 00 |ING DATE . ".|
00000F60: 89 17 A0 F2 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |....."..........|
00000F70: 1D 1D 12 1F 20 53 48 4F 55 4C 44 20 42 45 20 4C |.... SHOULD BE L|
00000F80: 41 52 47 45 52 20 98 20 22 00 B5 17 A3 F2 99 22 |ARGER . "......"|
00000F90: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 12 1F 20 20 |.............. |
00000FA0: 20 20 54 48 41 4E 20 22 C4 28 59 31 29 22 20 20 | THAN ".(Y1)" |
00000FB0: 20 20 98 20 22 00 DF 17 A8 F2 99 22 1D 1D 1D 1D | . "......"....|
00000FC0: 1D 1D 1D 1D 1D 1D 1D 1D 12 1F 20 20 20 20 20 20 |.......... |
00000FD0: 20 20 20 20 20 20 20 20 20 20 20 20 98 20 22 00 | . ".|
00000FE0: 09 18 A9 F2 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |....."..........|
00000FF0: 1D 1D 20 12 98 20 20 20 20 20 20 20 20 20 20 20 |.. .. |
00001000: 20 20 20 20 20 20 20 1C 22 00 19 18 AD F2 81 58 | ."......X|
00001010: B2 31 A4 32 35 30 30 3A 82 00 2A 18 B2 F2 99 22 |.1.2500:..*...."|
00001020: 13 11 11 11 11 11 11 11 11 22 00 50 18 B3 F2 99 |.........".P....|
00001030: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 20 20 20 |"............ |
00001040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00001050: 00 77 18 B4 F2 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D |.w....".........|
00001060: 1D 1D 1D 20 20 20 20 20 20 20 20 20 20 20 20 20 |... |
00001070: 20 20 20 20 20 20 22 00 9E 18 B5 F2 99 22 1D 1D | "......"..|
00001080: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 20 20 20 20 20 20 |.......... |
00001090: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 C5 | "..|
000010A0: 18 B6 F2 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |...."...........|
000010B0: 1D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
000010C0: 20 20 20 20 22 00 EC 18 B7 F2 99 22 1D 1D 1D 1D | "......"....|
000010D0: 1D 1D 1D 1D 1D 1D 1D 1D 20 20 20 20 20 20 20 20 |........ |
000010E0: 20 20 20 20 20 20 20 20 20 20 20 22 00 1D 19 B8 | "....|
000010F0: F2 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 20 |.."............ |
00001100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001110: 20 20 20 20 13 11 11 11 11 11 11 11 22 00 23 19 | ........".#.|
00001120: BC F2 8E 00 00 00 |...... |
....H..60100:..9.R.. D(35),MO$(12),M$(12
,7),DM(12),FD(12).Y.... X . 1 . 12 : . M
O$(X) : ..|.... JANUARY,FEBRUARY,MARCH,A
PRIL...... MAY,JUNE,JULY,AUGUST,SEPTEMBE
R.A.... OCTOBER,NOVEMBER,DECEMBER......
X . 1 . 12 : . DM(X) : ....... 31,28,31,
30,31,30,31,31,30,31,30,31.).... X . 1 .
12 : . FD(X) : ..I.".. 0,3,3,-1,1,4,-1,
2,5,0,3,5.X.,.SP$."
":. 24 SPACES...6.DN$." SU MO TU WE T
H FR SA ".G.@.DL$."-------------------
--":. 21 DASHES...J.. ". . CA
LENDAR MAKER "...O.." .BY BR
UCE JEAGER"...T...5.Y.."ENTER . Q . TO Q
UIT.".C.^.. "ENTER STARTING YEAR:";:.605
00:Y1.E(B$).{.C..B$."Q"..60000:.345...H.
. Y1.1752 . . 62000:. 330...R.....|.. "(
RETURN ALONE =" Y1 ")".I...Y2.Y1.O.....
..... "ENTER ENDING YEAR: .....";:.6
0500:Y2.E(B$):.B$."".Y2.Y1.+....B$."Q".B
$."Q" . 330.<....B$."".Y2.Y1.W....Y2.Y1
. . 62100:. 410.S.... Y2.1752 . .62000:.
330......9000:..(OK)..210............ :
."CALCULATING..."...B. 4 : .4,4.J.L.. YR
. Y1 . Y2...V.. : .G(18)YR.....Z.(YR.10
0) : C..(YR.100) : A.Z.C...... A.0 . 530
.1...Z.(YR.4) : C..(YR.4) : A.Z.C.J....
A.0 . XD.1 : . 560.T.... 550.Y...Z.(YR.4
00) : C..(YR.400) : A.Z.C...... A.0 . XD
.1 : . 560...&.XD.0.E.0.F..(YR.4) : G..(
YR.400) : H..(YR.100).Q.:.J.F.G.H...D.L.
(YR.J).7 : M..((YR.J).7)...N.Q.(L.M).7 :
YS..(Q) : R.Q.YS.'.X.. R.0.9 . YS.YS.1.
4.B.YS.YS.XD.I.L.. YS.0 . YS.YS.7.Y.V..
MH.1 . 12.|...MN$.MO$(MH) : . H(MN$.SP$,
20);. ...DM . DM(MH) : . MH.2 . DM.DM.XD
.E...FD.YS.FD(MH).XD : . MH.1 . FD.YS.Z.
... MH.2 . FD.YS.3...... FD.6 . FD.FD.7.
..... FD.0 . FD.FD.7.....W.20...F.YR..(Y
R).5.P.M$(MH,0).H(MN$.SP$,24).F.Z.M$(MH,
1).DN$.W...M$(MH,2).DL$.U.... X . 1 . 35
: D(X).0 : ......Y.1 : Z.Y : . X . FD.1
. 35 : D(X).Z.....Y.Y.1 : Z.Y : . Z.DM
. Z.0.P.... : WE.0 : Y.0...... X . 1 . 3
5 : Y.Y.1 : . Y.6 . Y.0.+. .. D(X).0 . M
$(MH,WE.3).M$(MH,WE.3)." " : .820.A.*.
M$(MH,WE.3) . M$(MH,WE.3) . I( " ". D
(D(X)),3).U.4.. Y.0 . WE.WE.1.}.>.. X...
H.. MH...R..4:.4,YR...\..4:.4:LN.4.A.F..
X . 0 . 12 : . Y . 0 . 7...P.M$(X,Y) .
H(M$(X,Y).SP$,24)...Z.. Y : . X.!.... X.
0.7:.4," "M$(1,X)M$(2,X)M$(3,X):.:.4:.
4.S.... X.0.7:.4," "M$(4,X)M$(5,X)M$(6
,X):.:.4:.4...... X.0.7:.4," "M$(7,X)M
$(8,X)M$(9,X):.:.4:.4...... X.0.7:.4,"
"M$(10,X)M$(11,X)M$(12,X):.:.4:.4.T....
X . 1 . 22 : .4 : ....... YR : 4......
210...(#OK..1:.15,4,15: 15:.ST.....7.2#O
K..:.". ERROR: PRINTER NOT ONLINE!".
X.7#.A.1.50:.54296,15:.54296,.:..J.<#.A.
1.3000:.:....`.."..
".H.J.." ARE YOU SURE
YOU WANT TO QUIT? (Y/N)"...T.A.B(203):.A
..25.A..39.60020.!.~..A.39..".
..":..Z....1
5,8,15,"R0:HELLO CONNECT=HELLO CONNECT":
.15,ER: 15.H....ER..63......."HELLO CON
NECT",8...D..53280,1:.53281,1.O.N..G(142
)"...U..................................
....I";...X..A.1.23:.".".38)".";:.......
"J.....................................K
....".:....A.217.242:.A,B(A).128:..C....
".... .LOADSTAR PRESENTS:".....
."...... ..
"......". .. CALENDAR MAKER
. "......". ..
. "......". .. BY BRUCE JEA
GER . ".=.(..". ..
. ".H.2..". .. COPYRI
GHT 1987 . "...<..". ..
. "...F..". .
"...P..".......
.PRESS SPACE TO CONTINUE"...Z..B(203).
.60.60250...D.....T.B$."":.".";:.A.1.5.3
.^..A$:.A$."".60510.I.H..A$.G(13)..". ":
....R..A$.G(20).A.1..".. ...";:A.A.1:B$
.H(B$,A.1):.60510...W..(A.5).60510...|..
A$."Q".A$."Q".60560.D....A$."0".A$."9".6
0510......"."A$".";:B$.B$.A$:....0.."...
..."...:.."..............
".>.;..".............. STARTING DATE
. ".H.<..".............. SHOULD BE LA
RGER . "...?..".............. THAN 17
51 . "...D.."..............
. "...E.."............ ..
."...I..X.1.2500:....N......
..".........".5...."..............
"._....".............. END
ING DATE . "... ..".............. SHO
ULD BE LARGER . "......"..............
THAN "D(Y1)" . "......"............
.. . "......"..........
.. .. ."......X.1.2500:
..*....".........".P...."............
".W...."............
"......"............
".E...."............
"......"............
"......"............
........".#.......
> CLICK IMAGE PREVIEW FOR FULL MODAL