APP. CALENDAR
FILE INFORMATION
FILENAME(S): APP. CALENDAR
FILE TYPE(S): PRG
FILE SIZE: 1.8K
FIRST SEEN: 2025-10-19 22:48:31
APPEARS ON: 1 disk(s)
FILE HASH
008523684fab959221459a15a4e13a824ef4399c18fed1c100e18dbb4cf6d7bb
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITIES U37 | APP. CALENDAR | PRG | Radd Maxx | 19 | 13 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 14 08 32 00 8F 3A 34 2F 38 34 20 47 41 5A |....2..:4/84 GAZ|
00000010: 45 54 54 45 00 5B 08 50 00 86 4D 24 28 31 32 29 |ETTE.[.P..M$(12)|
00000020: 2C 57 24 28 37 29 3A 81 49 B2 31 A4 31 32 3A 87 |,W$(7):.I.1.12:.|
00000030: 4D 24 28 49 29 3A 82 49 3A 81 49 B2 31 A4 37 3A |M$(I):.I:.I.1.7:|
00000040: 87 57 24 28 49 29 3A 82 49 3A 43 24 B2 C7 28 31 |.W$(I):.I:C$..(1|
00000050: 34 29 3A 44 24 B2 C7 28 31 35 29 00 7A 08 5A 00 |4):D$..(15).z.Z.|
00000060: 9E 36 35 35 31 37 3A 8B C2 28 37 38 31 29 B2 34 |.65517:..(781).4|
00000070: 30 A7 97 35 33 32 38 31 2C 31 00 BB 08 64 00 99 |0..53281,1...d..|
00000080: 22 93 11 20 54 48 49 53 20 50 52 4F 47 52 41 4D |".. THIS PROGRAM|
00000090: 20 50 52 49 4E 54 53 20 41 20 4D 4F 4E 54 48 4C | PRINTS A MONTHL|
000000A0: 59 22 A6 31 31 29 22 41 50 50 4F 49 4E 54 4D 45 |Y".11)"APPOINTME|
000000B0: 4E 54 20 43 41 4C 45 4E 44 41 52 00 02 09 6E 00 |NT CALENDAR...n.|
000000C0: 99 22 11 1D 50 4C 45 41 53 45 20 54 59 50 45 20 |."..PLEASE TYPE |
000000D0: 49 4E 20 54 48 45 20 1C 4D 4F 4E 54 48 9A 20 41 |IN THE .MONTH. A|
000000E0: 4E 44 20 1C 59 45 41 52 9A 20 54 48 41 54 20 20 |ND .YEAR. THAT |
000000F0: 59 4F 55 20 57 49 53 48 20 54 4F 20 50 52 49 4E |YOU WISH TO PRIN|
00000100: 54 2E 00 20 09 6F 00 99 22 11 20 28 45 58 41 4D |T.. .o..". (EXAM|
00000110: 50 4C 45 3A 20 1C 33 2C 31 39 38 34 9A 29 11 11 |PLE: .3,1984.)..|
00000120: 00 48 09 78 00 85 22 20 20 20 20 22 3B 4D 30 2C |.H.x.." ";M0,|
00000130: 59 3A 99 22 11 11 20 20 54 48 41 4E 4B 20 59 4F |Y:.".. THANK YO|
00000140: 55 21 20 4E 4F 57 2D 2D 00 88 09 82 00 99 22 11 |U! NOW--......".|
00000150: 20 50 4C 45 41 53 45 20 54 55 52 4E 20 4F 4E 20 | PLEASE TURN ON |
00000160: 54 48 45 20 50 52 49 4E 54 45 52 20 41 4E 44 20 |THE PRINTER AND |
00000170: 20 20 20 20 20 20 20 20 20 54 59 50 45 20 1C 4F | TYPE .O|
00000180: 4B 9A 11 22 3A 85 52 24 00 9A 09 96 00 8B 52 24 |K..":.R$......R$|
00000190: B3 B1 22 4F 4B 22 A7 31 33 30 00 C1 09 9B 00 99 |.."OK".130......|
000001A0: 22 50 52 49 4E 54 49 4E 47 11 22 3A 81 49 B2 31 |"PRINTING.":.I.1|
000001B0: A4 35 30 30 3A 82 3A 8D 31 32 39 32 3A 9F 31 2C |.500:.:.1292:.1,|
000001C0: 34 00 F5 09 C8 00 98 31 2C 43 24 A6 31 30 29 4D |4......1,C$.10)M|
000001D0: 24 28 4D 30 29 22 20 22 59 3A 8D 31 36 30 30 3A |$(M0)" "Y:.1600:|
000001E0: 8D 31 37 30 30 3A 81 44 B2 31 A4 45 31 3A 4A 31 |.1700:.D.1.E1:J1|
000001F0: B2 4A 31 AA 31 00 0C 0A D2 00 8D 31 30 35 30 3A |.J1.1......1050:|
00000200: 8B 44 B3 31 30 A7 47 24 B2 22 20 22 00 1D 0A D5 |.D.10.G$." "....|
00000210: 00 8B 44 B1 B2 31 30 A7 47 24 B2 22 22 00 53 0A |..D..10.G$."".S.|
00000220: D6 00 8B 44 31 B2 31 A7 98 31 2C 44 24 22 20 20 |...D1.1..1,D$" |
00000230: 22 57 24 28 44 31 29 43 24 47 24 3B 44 3B 44 24 |"W$(D1)C$G$;D;D$|
00000240: 22 28 22 4A 31 22 29 22 3A 8D 31 36 30 30 3A 89 |"("J1")":.1600:.|
00000250: 32 32 30 00 7E 0A DB 00 98 31 2C 44 24 22 20 20 |220.~....1,D$" |
00000260: 22 57 24 28 44 31 29 43 24 47 24 3B 44 3B 44 24 |"W$(D1)C$G$;D;D$|
00000270: 22 28 22 4A 31 22 29 22 3A 8D 31 36 30 30 00 85 |"("J1")":.1600..|
00000280: 0A DC 00 82 44 00 8E 0A E8 03 A0 31 3A 80 00 AA |....D......1:...|
00000290: 0A 1A 04 8B 4D 30 B2 31 A7 4D 30 B2 31 33 3A 59 |....M0.1.M0.13:Y|
000002A0: B2 59 AB 31 3A 89 31 30 38 30 00 C0 0A 24 04 8B |.Y.1:.1080...$..|
000002B0: 4D 30 B2 32 A7 4D 30 B2 31 34 3A 59 B2 59 AB 31 |M0.2.M0.14:Y.Y.1|
000002C0: 00 05 0B 38 04 4D B2 4D 30 AB 32 3A 44 31 B2 B5 |...8.M.M0.2:D1..|
000002D0: 28 32 2E 36 AC 4D AB 30 2E 32 29 AA 44 AA 59 AB |(2.6.M.0.2).D.Y.|
000002E0: 31 39 30 30 AA B5 28 28 59 AB 31 39 30 30 29 AD |1900..((Y.1900).|
000002F0: 34 29 3A 44 31 B2 44 31 AA B5 28 31 39 AD 34 29 |4):D1.D1..(19.4)|
00000300: AB 32 AC 31 39 00 2E 0B B0 04 44 31 B2 44 31 AB |.2.19.....D1.D1.|
00000310: B5 28 44 31 AD 37 29 AC 37 AA 31 3A 8B 4D 30 B2 |.(D1.7).7.1:.M0.|
00000320: 34 B0 4D 30 B2 39 A7 44 31 B2 44 31 AA 31 00 4A |4.M0.9.D1.D1.1.J|
00000330: 0B CE 04 8B 4D 30 B2 31 33 A7 4D 30 B2 31 3A 59 |....M0.13.M0.1:Y|
00000340: B2 59 AA 31 3A 89 31 32 34 35 00 68 0B D8 04 8B |.Y.1:.1245.h....|
00000350: 4D 30 B2 31 34 A7 4D 30 B2 32 3A 59 B2 59 AA 31 |M0.14.M0.2:Y.Y.1|
00000360: 3A 44 31 B2 44 31 AA 31 00 77 0B DC 04 8B 44 31 |:D1.D1.1.w....D1|
00000370: B2 38 A7 44 31 B2 31 00 A7 0B DD 04 8B 28 59 B2 |.8.D1.1......(Y.|
00000380: 32 31 30 30 AF 4D 30 B1 B2 33 29 B0 28 59 B1 32 |2100.M0..3).(Y.2|
00000390: 31 30 30 29 A7 44 31 B2 44 31 AB 31 3A 8B 44 31 |100).D1.D1.1:.D1|
000003A0: B2 30 A7 44 31 B2 37 00 D7 0B DF 04 8B 28 59 B2 |.0.D1.7......(Y.|
000003B0: 32 32 30 30 AF 4D 30 B1 B2 33 29 B0 28 59 B1 32 |2200.M0..3).(Y.2|
000003C0: 32 30 30 29 A7 44 31 B2 44 31 AB 31 3A 8B 44 31 |200).D1.D1.1:.D1|
000003D0: B2 30 A7 44 31 B2 37 00 07 0C E1 04 8B 28 59 B2 |.0.D1.7......(Y.|
000003E0: 32 33 30 30 AF 4D 30 B1 B2 33 29 B0 28 59 B1 32 |2300.M0..3).(Y.2|
000003F0: 33 30 30 29 A7 44 31 B2 44 31 AB 31 3A 8B 44 31 |300).D1.D1.1:.D1|
00000400: B2 30 A7 44 31 B2 37 00 0D 0C E2 04 8E 00 3D 0C |.0.D1.7.......=.|
00000410: 0C 05 8B 4D 30 B2 31 B0 4D 30 B2 33 B0 4D 30 B2 |...M0.1.M0.3.M0.|
00000420: 35 B0 4D 30 B2 37 B0 4D 30 B2 38 B0 4D 30 B2 31 |5.M0.7.M0.8.M0.1|
00000430: 30 B0 4D 30 B2 31 32 A7 45 31 B2 33 31 00 5D 0C |0.M0.12.E1.31.].|
00000440: 0D 05 8B 4D 30 B2 34 B0 4D 30 B2 36 B0 4D 30 B2 |...M0.4.M0.6.M0.|
00000450: 39 B0 4D 30 B2 31 31 A7 45 31 B2 33 30 00 79 0C |9.M0.11.E1.30.y.|
00000460: 0E 05 8B 4D 30 B2 32 AF 59 AD 34 B3 B1 B5 28 59 |...M0.2.Y.4...(Y|
00000470: AD 34 29 A7 45 31 B2 32 38 00 94 0C 0F 05 8B 4D |.4).E1.28......M|
00000480: 30 B2 32 AF 59 AD 34 B2 B5 28 59 AD 34 29 A7 8D |0.2.Y.4..(Y.4)..|
00000490: 31 34 30 30 00 9A 0C 10 05 8E 00 CA 0C 78 05 8B |1400.........x..|
000004A0: 28 59 AD 31 30 30 B2 B5 28 59 AD 31 30 30 29 29 |(Y.100..(Y.100))|
000004B0: AF 28 59 AD 34 30 30 B3 B1 B5 28 59 AD 34 30 30 |.(Y.400...(Y.400|
000004C0: 29 29 A7 45 31 B2 32 38 3A 8E 00 D6 0C 7D 05 45 |)).E1.28:....}.E|
000004D0: 31 B2 32 39 3A 8E 00 EF 0C 40 06 81 49 B2 31 A4 |1.29:....@..I.1.|
000004E0: 32 30 3A 98 31 2C 44 24 22 20 22 3B 3A 82 49 00 |20:.1,D$" ";:.I.|
000004F0: 11 0D 45 06 81 4B B2 31 A4 31 39 3A 98 31 2C 22 |..E..K.1.19:.1,"|
00000500: 20 20 2E 22 3B 3A 82 4B 3A 98 31 2C 22 20 22 3A | .";:.K:.1," ":|
00000510: 8E 00 20 0D A4 06 8B 4D 30 B2 31 A7 4A 31 B2 30 |.. ....M0.1.J1.0|
00000520: 00 30 0D A6 06 8B 4D 30 B2 32 A7 4A 31 B2 33 31 |.0....M0.2.J1.31|
00000530: 00 40 0D A8 06 8B 4D 30 B2 33 A7 4A 31 B2 35 39 |.@....M0.3.J1.59|
00000540: 00 50 0D AA 06 8B 4D 30 B2 34 A7 4A 31 B2 39 30 |.P....M0.4.J1.90|
00000550: 00 61 0D AB 06 8B 4D 30 B2 35 A7 4A 31 B2 31 32 |.a....M0.5.J1.12|
00000560: 30 00 72 0D AD 06 8B 4D 30 B2 36 A7 4A 31 B2 31 |0.r....M0.6.J1.1|
00000570: 35 31 00 83 0D AF 06 8B 4D 30 B2 37 A7 4A 31 B2 |51......M0.7.J1.|
00000580: 31 38 31 00 94 0D B1 06 8B 4D 30 B2 38 A7 4A 31 |181......M0.8.J1|
00000590: B2 32 31 32 00 A5 0D B3 06 8B 4D 30 B2 39 A7 4A |.212......M0.9.J|
000005A0: 31 B2 32 34 33 00 B7 0D B5 06 8B 4D 30 B2 31 30 |1.243......M0.10|
000005B0: A7 4A 31 B2 32 37 33 00 C9 0D B7 06 8B 4D 30 B2 |.J1.273......M0.|
000005C0: 31 31 A7 4A 31 B2 33 30 34 00 DB 0D B9 06 8B 4D |11.J1.304......M|
000005D0: 30 B2 31 32 A7 4A 31 B2 33 33 34 00 EE 0D BB 06 |0.12.J1.334.....|
000005E0: 8B 59 AD 34 B3 B1 B5 28 59 AD 34 29 A7 8E 00 18 |.Y.4...(Y.4)....|
000005F0: 0E BD 06 8B 28 59 AD 31 30 30 B2 B5 28 59 AD 31 |....(Y.100..(Y.1|
00000600: 30 30 29 29 AF 28 59 AD 34 30 30 B3 B1 B5 28 59 |00)).(Y.400...(Y|
00000610: AD 34 30 30 29 29 A7 8E 00 3A 0E BF 06 8B 28 59 |.400))...:....(Y|
00000620: AD 34 B2 B5 28 59 AD 34 29 29 AF 28 4D 30 B1 B2 |.4..(Y.4)).(M0..|
00000630: 33 29 A7 4A 31 B2 4A 31 AA 31 00 40 0E C2 06 8E |3).J1.J1.1.@....|
00000640: 00 91 0E D0 07 83 22 20 20 4A 41 4E 55 41 52 59 |......" JANUARY|
00000650: 2C 22 2C 22 20 46 45 42 52 55 41 52 59 2C 22 2C |,"," FEBRUARY,",|
00000660: 22 20 20 20 20 4D 41 52 43 48 2C 22 2C 22 20 20 |" MARCH,"," |
00000670: 20 41 50 52 49 4C 2C 22 2C 22 20 20 20 20 20 20 | APRIL,"," |
00000680: 4D 41 59 2C 22 2C 22 20 20 20 20 20 4A 55 4E 45 |MAY,"," JUNE|
00000690: 2C 00 E3 0E DA 07 83 22 20 20 20 20 20 4A 55 4C |,......" JUL|
000006A0: 59 2C 22 2C 22 20 20 20 41 55 47 55 53 54 2C 22 |Y,"," AUGUST,"|
000006B0: 2C 22 53 45 50 54 45 4D 42 45 52 2C 22 2C 22 20 |,"SEPTEMBER,"," |
000006C0: 20 4F 43 54 4F 42 45 52 2C 22 2C 22 20 4E 4F 56 | OCTOBER,"," NOV|
000006D0: 45 4D 42 45 52 2C 22 2C 22 20 44 45 43 45 4D 42 |EMBER,"," DECEMB|
000006E0: 45 52 2C 00 28 0F EE 07 83 22 20 20 12 53 55 4E |ER,.(...." .SUN|
000006F0: 44 41 59 92 22 2C 22 20 20 20 20 4D 4F 4E 44 41 |DAY."," MONDA|
00000700: 59 22 2C 22 20 20 20 54 55 45 53 44 41 59 22 2C |Y"," TUESDAY",|
00000710: 22 20 57 45 44 4E 45 53 44 41 59 22 2C 22 20 20 |" WEDNESDAY"," |
00000720: 54 48 55 52 53 44 41 59 00 46 0F F8 07 83 22 20 |THURSDAY.F...." |
00000730: 20 20 20 46 52 49 44 41 59 22 2C 22 20 20 53 41 | FRIDAY"," SA|
00000740: 54 55 52 44 41 59 00 00 00 |TURDAY... |
....2..:4/84 GAZETTE.[.P..M$(12),W$(7):.
I.1.12:.M$(I):.I:.I.1.7:.W$(I):.I:C$.G(1
4):D$.G(15).Z.Z..65517:.B(781).40..53281
,1...D..".. THIS PROGRAM PRINTS A MONTHL
Y".11)"APPOINTMENT CALENDAR...N.."..PLEA
SE TYPE IN THE .MONTH. AND .YEAR. THAT
YOU WISH TO PRINT.. .O..". (EXAMPLE: .3,
1984.)...H.X.." ";M0,Y:.".. THANK YO
U! NOW--......". PLEASE TURN ON THE PRIN
TER AND TYPE .OK..":.R$......R$
.."OK".130.A...."PRINTING.":.I.1.500:.:.
1292:.1,4...H..1,C$.10)M$(M0)" "Y:.1600:
.1700:.D.1.E1:J1.J1.1...R..1050:.D.10.G$
." "...U..D..10.G$."".S.V..D1.1..1,D$"
"W$(D1)C$G$;D;D$"("J1")":.1600:.220.~...
.1,D$" "W$(D1)C$G$;D;D$"("J1")":.1600..
....D..... 1:.......M0.1.M0.13:Y.Y.1:.10
80...$..M0.2.M0.14:Y.Y.1...8.M.M0.2:D1..
(2.6.M.0.2).D.Y.1900..((Y.1900).4):D1.D1
..(19.4).2.19.....D1.D1..(D1.7).7.1:.M0.
4.M0.9.D1.D1.1.J.N..M0.13.M0.1:Y.Y.1:.12
45.H.X..M0.14.M0.2:Y.Y.1:D1.D1.1.W....D1
.8.D1.1......(Y.2100.M0..3).(Y.2100).D1.
D1.1:.D1.0.D1.7.W....(Y.2200.M0..3).(Y.2
200).D1.D1.1:.D1.0.D1.7......(Y.2300.M0.
.3).(Y.2300).D1.D1.1:.D1.0.D1.7.......=.
...M0.1.M0.3.M0.5.M0.7.M0.8.M0.10.M0.12.
E1.31.]....M0.4.M0.6.M0.9.M0.11.E1.30.Y.
...M0.2.Y.4...(Y.4).E1.28......M0.2.Y.4.
.(Y.4)..1400.......J.X..(Y.100..(Y.100))
.(Y.400...(Y.400)).E1.28:..V.}.E1.29:...
.@..I.1.20:.1,D$" ";:.I...E..K.1.19:.1,"
.";:.K:.1," ":.. ....M0.1.J1.0.0....M0
.2.J1.31.@....M0.3.J1.59.P....M0.4.J1.90
.A....M0.5.J1.120.R....M0.6.J1.151......
M0.7.J1.181......M0.8.J1.212......M0.9.J
1.243......M0.10.J1.273.I....M0.11.J1.30
4......M0.12.J1.334......Y.4...(Y.4)....
....(Y.100..(Y.100)).(Y.400...(Y.400))..
.:....(Y.4..(Y.4)).(M0..3).J1.J1.1.@.B..
...P.." JANUARY,"," FEBRUARY,"," MAR
CH,"," APRIL,"," MAY,"," JUNE
,...Z.." JULY,"," AUGUST,","SEPTEM
BER,"," OCTOBER,"," NOVEMBER,"," DECEMB
ER,.(...." .SUNDAY."," MONDAY"," T
UESDAY"," WEDNESDAY"," THURSDAY.F...."
FRIDAY"," SATURDAY...
> CLICK IMAGE PREVIEW FOR FULL MODAL