CALENDAR.C
FILE INFORMATION
FILENAME(S): CALENDAR.C
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-11-30 21:07:09
APPEARS ON: 1 disk(s)
FILE HASH
438af3caecb89b6cca6c4db8cdecd904f13b54a8b438fe43996df23b6af38567
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TPUG MAY 85 C | CALENDAR.C | PRG | DuncanTwain | 31 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 E8 03 8F 22 D0 52 4F 47 52 41 4D 4D |.......".ROGRAMM|
00000010: 45 20 C3 C1 CC C5 CE C4 D2 C9 C5 D2 00 35 08 F2 |E ...........5..|
00000020: 03 8F 22 D0 52 4F 47 52 41 4D 20 20 20 C3 C1 CC |..".ROGRAM ...|
00000030: C5 CE C4 C1 D2 00 3B 08 FC 03 8F 00 57 08 06 04 |......;.....W...|
00000040: 8F 22 50 41 52 2F 42 59 20 20 20 D0 41 54 52 49 |."PAR/BY .ATRI|
00000050: 43 4B 20 D9 C1 CE C7 00 7B 08 10 04 8F 22 50 4F |CK .....{...."PO|
00000060: 55 52 2F 46 4F 52 20 20 20 C3 C2 CD 20 36 34 20 |UR/FOR ... 64 |
00000070: 20 20 41 56 45 43 2F 57 49 54 48 00 9F 08 1A 04 | AVEC/WITH.....|
00000080: 8F 22 49 4D 50 52 49 4D 41 4E 54 45 20 C7 C5 CD |."IMPRIMANTE ...|
00000090: C9 CE C9 2D 31 30 D8 20 50 52 49 4E 54 45 52 00 |...-10. PRINTER.|
000000A0: CD 08 24 04 8F 22 49 4E 54 45 52 46 41 43 45 20 |..$.."INTERFACE |
000000B0: 55 53 45 44 2F 55 54 49 4C 49 53 45 20 D3 45 43 |USED/UTILISE .EC|
000000C0: 4F 4E 44 41 52 59 20 41 44 52 45 53 53 00 18 09 |ONDARY ADRESS...|
000000D0: 2E 04 8F 20 20 20 20 20 20 20 20 20 20 20 20 20 |... |
000000E0: 20 20 20 20 20 20 20 20 20 20 20 35 20 50 52 49 | 5 PRI|
000000F0: 4E 54 45 52 20 43 48 41 52 41 43 54 45 52 20 53 |NTER CHARACTER S|
00000100: 45 54 20 20 4E 4F 20 4C 49 4E 45 20 46 45 45 44 |ET NO LINE FEED|
00000110: 20 49 53 20 53 45 4E 54 00 64 09 38 04 8F 20 20 | IS SENT.d.8.. |
00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000130: 20 20 20 20 20 20 37 20 55 50 50 45 52 2F 4C 4F | 7 UPPER/LO|
00000140: 57 45 52 20 43 41 53 45 20 20 20 20 20 20 20 41 |WER CASE A|
00000150: 46 54 45 52 20 43 41 52 52 49 41 47 45 20 52 45 |FTER CARRIAGE RE|
00000160: 54 55 52 4E 00 6A 09 42 04 8F 00 83 09 4C 04 86 |TURN.j.B.....L..|
00000170: 20 4D 24 28 35 30 2C 31 29 2C 44 55 52 45 45 28 | M$(50,1),DUREE(|
00000180: 31 31 29 00 B6 09 56 04 99 20 C7 28 31 34 37 29 |11)...V.. .(147)|
00000190: C7 28 31 34 29 3B A3 36 29 22 2A 2A 2A 20 C3 C1 |.(14);.6)"*** ..|
000001A0: CC C5 CE C4 D2 C9 C5 D2 2F C3 C1 CC C5 CE C4 C1 |......../.......|
000001B0: D2 20 2A 2A 2A 22 00 C5 09 60 04 81 20 49 B2 30 |. ***"...`.. I.0|
000001C0: 20 A4 20 32 39 00 D3 09 6A 04 81 20 4A B2 30 20 | . 29...j.. J.0 |
000001D0: A4 20 31 00 E1 09 74 04 87 20 4D 24 28 49 2C 4A |. 1...t.. M$(I,J|
000001E0: 29 00 EB 09 7E 04 82 20 4A 2C 49 00 FF 09 88 04 |)...~.. J,I.....|
000001F0: 99 3A 99 3A 99 3A 99 20 4D 24 28 30 2C 31 29 00 |.:.:.:. M$(0,1).|
00000200: 1D 0A 92 04 81 20 49 B2 30 20 A4 20 31 31 3A 87 |..... I.0 . 11:.|
00000210: 20 44 55 52 45 45 28 49 29 3A 82 20 49 00 2D 0A | DUREE(I):. I.-.|
00000220: 9C 04 99 3A 99 20 4D 24 28 30 2C 30 29 00 3A 0A |...:. M$(0,0).:.|
00000230: A6 04 45 24 B2 C7 28 32 37 29 00 52 0A B0 04 A1 |..E$..(27).R....|
00000240: 20 52 24 3A 8B 20 52 24 B2 22 22 20 A7 20 31 32 | R$:. R$."" . 12|
00000250: 30 30 00 8C 0A BA 04 8B 20 52 24 B2 22 45 22 20 |00...... R$."E" |
00000260: B0 20 52 24 B2 22 C5 22 20 B0 20 52 24 B2 22 41 |. R$."." . R$."A|
00000270: 22 20 B0 20 52 24 B2 22 C1 22 20 A7 20 4C 41 4E |" . R$."." . LAN|
00000280: 47 55 45 B2 31 3A 89 20 31 32 34 30 00 B0 0A C4 |GUE.1:. 1240....|
00000290: 04 8B 20 52 24 B2 22 46 22 20 B0 20 52 24 B2 22 |.. R$."F" . R$."|
000002A0: C6 22 20 A7 20 4C 41 B2 30 3A 89 20 31 32 34 30 |." . LA.0:. 1240|
000002B0: 00 CC 0A CE 04 99 22 C5 2C C6 20 4F 55 2F 4F 52 |......".,. OU/OR|
000002C0: 20 C1 20 21 22 3A 89 20 31 32 30 30 00 DD 0A D8 | . !":. 1200....|
000002D0: 04 99 3A 99 20 4D 24 28 31 2C 4C 41 29 00 EE 0A |..:. M$(1,LA)...|
000002E0: E2 04 99 3A 99 20 4D 24 28 32 2C 4C 41 29 00 06 |...:. M$(2,LA)..|
000002F0: 0B EC 04 A1 20 52 24 3A 8B 20 52 24 B2 22 22 20 |.... R$:. R$."" |
00000300: A7 20 31 32 36 30 00 3E 0B F6 04 8B 20 52 24 B2 |. 1260.>.... R$.|
00000310: 22 41 22 20 B0 20 52 24 B2 22 C1 22 20 B0 20 52 |"A" . R$."." . R|
00000320: 24 B2 22 59 22 20 B0 20 52 24 B2 22 D9 22 20 A7 |$."Y" . R$."." .|
00000330: 20 46 4C 41 47 B2 31 3A 89 20 31 33 30 30 00 64 | FLAG.1:. 1300.d|
00000340: 0B 00 05 8B 20 52 24 B2 22 4D 22 20 B0 20 52 24 |.... R$."M" . R$|
00000350: B2 22 CD 22 20 A7 20 46 4C 41 47 B2 32 3A 89 20 |."." . FLAG.2:. |
00000360: 31 33 30 30 00 81 0B 0A 05 99 20 22 C1 2C D9 20 |1300...... ".,. |
00000370: 4F 55 2F 4F 52 20 CD 20 21 22 3A 89 20 31 32 36 |OU/OR . !":. 126|
00000380: 30 00 A1 0B 14 05 8B 20 46 4C 41 47 B2 31 20 A7 |0...... FLAG.1 .|
00000390: 20 42 31 B2 31 3A 42 32 B2 31 32 3A 89 31 33 33 | B1.1:B2.12:.133|
000003A0: 30 00 BC 0B 1E 05 99 20 4D 24 28 34 2C 4C 41 29 |0...... M$(4,LA)|
000003B0: 3B 3A 85 20 42 31 3A 42 32 B2 42 31 00 D6 0B 28 |;:. B1:B2.B1...(|
000003C0: 05 8B 20 42 31 B3 31 20 B0 20 42 31 B1 31 32 20 |.. B1.1 . B1.12 |
000003D0: A7 20 31 33 31 30 00 F9 0B 32 05 99 20 4D 24 28 |. 1310...2.. M$(|
000003E0: 33 2C 4C 41 29 3B 22 20 28 3E 31 35 38 32 29 22 |3,LA);" (>1582)"|
000003F0: 3B 3A 85 20 41 4E 4E 45 45 00 0E 0C 3C 05 8B 20 |;:. ANNEE...<.. |
00000400: 41 4E B3 31 35 38 32 20 A7 20 31 33 33 30 00 23 |AN.1582 . 1330.#|
00000410: 0C 46 05 59 45 41 52 24 B2 C9 28 C4 28 41 4E 29 |.F.YEAR$..(.(AN)|
00000420: 2C 34 29 00 50 0C 50 05 81 20 49 B2 31 20 A4 20 |,4).P.P.. I.1 . |
00000430: 34 3A 41 4E 4E 45 45 24 B2 41 4E 24 AA 22 20 20 |4:ANNEE$.AN$." |
00000440: 22 AA CA 28 59 45 24 2C 49 2C 31 29 3A 82 20 49 |"..(YE$,I,1):. I|
00000450: 00 74 0C 5A 05 9F 20 34 2C 34 2C 35 3A 98 34 2C |.t.Z.. 4,4,5:.4,|
00000460: 45 24 22 40 22 45 24 22 45 22 45 24 22 47 22 3B |E$"@"E$"E"E$"G";|
00000470: 3A A0 20 34 00 84 0C 64 05 81 20 49 B2 42 31 20 |:. 4...d.. I.B1 |
00000480: A4 20 42 32 00 9C 0C 6E 05 45 53 B2 32 38 AB C3 |. B2...n.ES.28..|
00000490: 28 4D 24 28 49 AA 34 2C 4C 41 29 29 00 CE 0C 78 |(M$(I.4,LA))...x|
000004A0: 05 9F 20 34 2C 34 2C 35 3A 98 34 2C 45 24 22 57 |.. 4,4,5:.4,E$"W|
000004B0: 22 C7 28 31 29 45 24 22 2D 22 C7 28 30 29 45 24 |".(1)E$"-".(0)E$|
000004C0: C7 28 39 37 29 C7 28 35 29 3B 3A A0 20 34 00 F8 |.(97).(5);:. 4..|
000004D0: 0C 82 05 9F 20 34 2C 34 2C 37 3A 98 34 2C 4D 24 |.... 4,4,7:.4,M$|
000004E0: 28 49 AA 34 2C 4C 41 29 3B 3A 98 34 2C A6 45 53 |(I.4,LA);:.4,.ES|
000004F0: 29 41 4E 24 3A A0 20 34 00 1C 0D 8C 05 9F 20 34 |)AN$:. 4...... 4|
00000500: 2C 34 2C 35 3A 98 34 2C 45 24 22 57 22 C7 28 30 |,4,5:.4,E$"W".(0|
00000510: 29 45 24 C7 28 34 35 29 C7 28 31 29 00 33 0D 96 |)E$.(45).(1).3..|
00000520: 05 98 34 2C 45 24 C7 28 39 37 29 C7 28 37 29 3A |..4,E$.(97).(7):|
00000530: A0 20 34 00 3F 0D A0 05 9F 20 34 2C 34 2C 37 00 |. 4.?.... 4,4,7.|
00000540: 5A 0D AA 05 81 20 4A B2 31 20 A4 20 38 30 3A 98 |Z.... J.1 . 80:.|
00000550: 34 2C 22 2D 22 3B 3A 82 20 4A 00 92 0D B4 05 81 |4,"-";:. J......|
00000560: 20 4A B2 30 20 A4 20 35 3A 98 34 2C 4D 24 28 4A | J.0 . 5:.4,M$(J|
00000570: AA 31 37 2C 4C 41 29 AA 22 20 20 22 3B 3A 82 20 |.17,LA)." ";:. |
00000580: 4A 3A 98 34 2C 4D 24 28 32 33 2C 4C 41 29 3A A0 |J:.4,M$(23,LA):.|
00000590: 20 34 00 AB 0D BE 05 9F 20 34 2C 34 2C 35 3A 98 | 4...... 4,4,5:.|
000005A0: 34 2C 45 24 22 2D 22 C7 28 30 29 00 C2 0D C8 05 |4,E$"-".(0).....|
000005B0: 98 34 2C 45 24 C7 28 39 37 29 C7 28 35 29 3A A0 |.4,E$.(97).(5):.|
000005C0: 20 34 00 D1 0D D2 05 44 55 B2 44 55 28 49 AB 31 | 4.....DU.DU(I.1|
000005D0: 29 00 E6 0D DC 05 8B 20 44 55 B1 32 38 20 A7 20 |)...... DU.28 . |
000005E0: 89 20 31 35 34 30 00 05 0E E6 05 4A B2 32 39 3A |. 1540.....J.29:|
000005F0: 4D B2 32 3A 41 B2 41 4E 3A 8D 20 31 37 38 30 3A |M.2:A.AN:. 1780:|
00000600: 4A 31 B2 4A 53 00 23 0E F0 05 4A B2 31 3A 4D B2 |J1.JS.#...J.1:M.|
00000610: 33 3A 41 B2 41 4E 3A 8D 20 31 37 38 30 3A 4A 32 |3:A.AN:. 1780:J2|
00000620: B2 4A 53 00 38 0E FA 05 8B 20 4A 32 B3 B1 4A 31 |.JS.8.... J2..J1|
00000630: 20 A7 20 44 55 B2 32 39 00 52 0E 04 06 9F 20 34 | . DU.29.R.... 4|
00000640: 2C 34 2C 35 3A 98 34 2C 45 24 22 57 22 C7 28 31 |,4,5:.4,E$"W".(1|
00000650: 29 3B 00 6E 0E 0E 06 4A B2 31 3A 4D B2 49 3A 41 |);.n...J.1:M.I:A|
00000660: B2 41 4E 3A 8D 20 31 37 38 30 3A 4B B2 32 00 89 |.AN:. 1780:K.2..|
00000670: 0E 18 06 4A 53 B2 4A 53 AB 31 3A 8B 20 4A 53 B2 |...JS.JS.1:. JS.|
00000680: AB 31 20 A7 20 4A 53 B2 36 00 AD 0E 22 06 45 53 |.1 . JS.6...".ES|
00000690: B2 35 AC 28 4A 53 AA 32 29 3A 98 34 2C A6 36 AC |.5.(JS.2):.4,.6.|
000006A0: 4A 53 AA 31 29 3B 31 3B 22 20 20 22 3B 00 CC 0E |JS.1);1;" ";...|
000006B0: 2C 06 4B 24 B2 C4 28 4B 29 3A 8B 20 4B B3 31 30 |,.K$..(K):. K.10|
000006C0: 20 A7 20 4B 24 B2 22 20 22 AA 4B 24 00 EE 0E 36 | . K$." ".K$...6|
000006D0: 06 8B 20 45 53 B1 33 39 20 A7 20 98 34 2C 45 24 |.. ES.39 . .4,E$|
000006E0: C7 28 39 37 29 C7 28 34 29 3A 45 53 B2 35 00 FA |.(97).(4):ES.5..|
000006F0: 0E 40 06 45 53 B2 45 53 AA 35 00 09 0F 4A 06 98 |.@.ES.ES.5...J..|
00000700: 34 2C 4B 24 3B A6 33 29 3B 00 22 0F 54 06 4B B2 |4,K$;.3);.".T.K.|
00000710: 4B AA 31 3A 8B 20 4B B3 B2 44 55 20 A7 20 31 35 |K.1:. K..DU . 15|
00000720: 38 30 00 3E 0F 5E 06 A0 20 34 3A 4C B2 32 39 2E |80.>.^.. 4:L.29.|
00000730: 35 33 30 35 38 39 3A 9F 20 34 2C 34 2C 35 00 5D |530589:. 4,4,5.]|
00000740: 0F 68 06 98 34 2C 45 24 C7 28 38 37 29 C7 28 30 |.h..4,E$.(87).(0|
00000750: 29 45 24 C7 28 36 36 29 C7 28 33 29 3B 00 7C 0F |)E$.(66).(3);.|.|
00000760: 72 06 98 34 2C 45 24 C7 28 39 37 29 C7 28 33 29 |r..4,E$.(97).(3)|
00000770: 3A A0 20 34 3A 9F 20 34 2C 34 2C 39 00 92 0F 7C |:. 4:. 4,4,9...||
00000780: 06 81 20 4A B2 31 20 A4 20 31 35 3A 8D 20 31 37 |.. J.1 . 15:. 17|
00000790: 38 30 00 AB 0F 86 06 4C 55 B2 28 46 AB 37 32 32 |80.....LU.(F.722|
000007A0: 39 38 39 29 AD 4C AA 35 30 30 30 00 CB 0F 90 06 |989).L.5000.....|
000007B0: 4C 55 B2 B5 28 28 4C 55 AB B5 28 4C 55 29 29 AC |LU..((LU..(LU)).|
000007C0: 4C AC 31 30 AA 2E 35 29 AD 31 30 00 D9 0F 9A 06 |L.10..5).10.....|
000007D0: 50 48 B2 4C 55 AD 37 2E 34 00 F6 0F A4 06 8B 20 |PH.LU.7.4...... |
000007E0: 28 50 48 AB B5 28 50 48 29 29 B1 31 AD 37 2E 34 |(PH..(PH)).1.7.4|
000007F0: 20 A7 20 82 20 4A 00 18 10 AE 06 98 34 2C 4D 24 | . . J......4,M$|
00000800: 28 32 34 AA 50 48 2C 4C 41 29 4D 24 28 32 39 2C |(24.PH,LA)M$(29,|
00000810: 4C 41 29 3B B5 28 4A 29 00 4C 10 B8 06 4A B2 4A |LA);.(J).L...J.J|
00000820: AA 37 2E 34 3A 8B 20 4A B3 44 55 20 A7 20 50 48 |.7.4:. J.DU . PH|
00000830: B2 AB 28 50 48 B3 33 2E 35 29 AC 50 48 3A 50 48 |..(PH.3.5).PH:PH|
00000840: B2 50 48 AA 31 3A 89 20 31 37 31 30 00 59 10 C2 |.PH.1:. 1710.Y..|
00000850: 06 98 34 2C C7 28 31 30 29 00 69 10 CC 06 A0 20 |..4,.(10).i.... |
00000860: 34 3A 9F 20 34 2C 34 2C 35 00 76 10 D6 06 98 34 |4:. 4,4,5.v....4|
00000870: 2C C7 28 31 32 29 00 82 10 E0 06 A0 20 34 3A 82 |,.(12)...... 4:.|
00000880: 20 49 00 88 10 EA 06 80 00 99 10 F4 06 8B 20 4D | I............ M|
00000890: B1 32 20 A7 20 31 38 30 30 00 DC 10 FE 06 46 B2 |.2 . 1800.....F.|
000008A0: 33 36 35 AC 41 AA 4A AA 33 31 AC 28 4D AB 31 29 |365.A.J.31.(M.1)|
000008B0: AA B5 28 28 41 AB 31 29 AD 34 29 AB B5 28 2E 37 |..((A.1).4)..(.7|
000008C0: 35 AC 28 B5 28 28 28 41 AB 31 29 AD 31 30 30 29 |5.(.(((A.1).100)|
000008D0: AA 31 29 29 29 3A 89 20 31 38 31 30 00 21 11 08 |.1))):. 1810.!..|
000008E0: 07 46 B2 33 36 35 AC 41 AA 4A AA 33 31 AC 28 4D |.F.365.A.J.31.(M|
000008F0: AB 31 29 AB B5 28 2E 34 AC 4D AA 32 2E 33 29 AA |.1)..(.4.M.2.3).|
00000900: B5 28 41 AD 34 29 AB B5 28 2E 37 35 AC 28 B5 28 |.(A.4)..(.75.(.(|
00000910: 41 AD 31 30 30 29 AA 31 29 29 3A 89 20 31 38 31 |A.100).1)):. 181|
00000920: 30 00 35 11 12 07 4A 53 B2 46 AB 28 B5 28 46 AD |0.5...JS.F.(.(F.|
00000930: 37 29 AC 37 29 00 3B 11 1C 07 8E 00 41 11 26 07 |7).7).;.....A.&.|
00000940: 80 00 7E 11 30 07 83 20 22 D6 4F 55 4C 45 5A 2D |..~.0.. ".OULEZ-|
00000950: 56 4F 55 53 20 4C 41 20 56 45 52 53 49 4F 4E 20 |VOUS LA VERSION |
00000960: 28 C6 29 52 41 4E 43 41 49 53 45 20 4F 55 20 20 |(.)RANCAISE OU |
00000970: 20 28 C1 29 4E 47 4C 41 49 53 45 20 3F 22 00 B8 | (.)NGLAISE ?"..|
00000980: 11 3A 07 83 20 22 C4 4F 20 59 4F 55 20 57 41 4E |.:.. ".O YOU WAN|
00000990: 54 20 54 48 45 20 28 C5 29 4E 47 4C 49 53 48 20 |T THE (.)NGLISH |
000009A0: 4F 52 20 28 C6 29 52 45 4E 43 48 20 20 20 56 45 |OR (.)RENCH VE|
000009B0: 52 53 49 4F 4E 20 3F 22 00 F3 11 44 07 83 20 22 |RSION ?"...D.. "|
000009C0: D6 4F 55 53 20 41 56 45 5A 20 43 48 4F 49 53 49 |.OUS AVEZ CHOISI|
000009D0: 20 4C 45 20 46 52 41 4E 43 41 49 53 2E 22 2C 22 | LE FRANCAIS.","|
000009E0: D9 4F 55 20 43 48 4F 53 45 20 45 4E 47 4C 49 53 |.OU CHOSE ENGLIS|
000009F0: 48 2E 22 00 2F 12 4E 07 83 20 22 D6 4F 55 4C 45 |H."./.N.. ".OULE|
00000A00: 5A 2D 56 4F 55 53 20 55 4E 45 20 28 C1 29 4E 4E |Z-VOUS UNE (.)NN|
00000A10: 45 45 20 43 4F 4D 50 4C 45 54 45 20 4F 55 20 55 |EE COMPLETE OU U|
00000A20: 4E 20 20 53 45 55 4C 20 28 CD 29 4F 49 53 22 00 |N SEUL (.)OIS".|
00000A30: 6E 12 58 07 83 20 22 C4 4F 20 59 4F 55 20 57 41 |n.X.. ".O YOU WA|
00000A40: 4E 54 20 41 20 43 4F 4D 50 4C 45 54 45 20 28 D9 |NT A COMPLETE (.|
00000A50: 29 45 41 52 20 4F 52 20 41 20 20 20 20 20 20 53 |)EAR OR A S|
00000A60: 49 4E 47 4C 45 20 28 CD 29 4F 4E 54 48 22 00 AD |INGLE (.)ONTH"..|
00000A70: 12 62 07 83 20 22 CC 27 41 4E 4E 45 45 22 2C 22 |.b.. ".'ANNEE","|
00000A80: D4 48 45 20 59 45 41 52 22 2C 22 CC 45 20 4D 4F |.HE YEAR",".E MO|
00000A90: 49 53 20 28 31 2D 31 32 29 22 2C 22 D4 48 45 20 |IS (1-12)",".HE |
00000AA0: 4D 4F 4E 54 48 20 28 31 2D 31 32 29 22 00 DF 12 |MONTH (1-12)"...|
00000AB0: 6C 07 83 20 22 CA 20 20 C1 20 20 CE 20 20 D6 20 |l.. ". . . . |
00000AC0: 20 C9 20 20 C5 20 20 D2 22 2C 22 CA 20 20 C1 20 | . . .",". . |
00000AD0: 20 CE 20 20 D5 20 20 C1 20 20 D2 20 20 D9 22 00 | . . . . .".|
00000AE0: 14 13 76 07 83 20 22 C6 20 20 C5 20 20 D6 20 20 |..v.. ". . . |
00000AF0: D2 20 20 C9 20 20 C5 20 20 D2 22 2C 22 C6 20 20 |. . . .",". |
00000B00: C5 20 20 C2 20 20 D2 20 20 D5 20 20 C1 20 20 D2 |. . . . . .|
00000B10: 20 20 D9 22 00 51 13 80 07 83 20 22 CD 20 20 C1 | .".Q.... ". .|
00000B20: 20 20 D2 20 20 D3 22 2C 22 CD 20 20 C1 20 20 D2 | . .",". . .|
00000B30: 20 20 C3 20 20 C8 22 20 20 20 20 20 20 20 20 20 | . ." |
00000B40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000B50: 20 00 77 13 8A 07 83 20 22 C1 20 20 D6 20 20 D2 | .w.... ". . .|
00000B60: 20 20 C9 20 20 CC 22 2C 22 C1 20 20 D0 20 20 D2 | . .",". . .|
00000B70: 20 20 C9 20 20 CC 22 00 91 13 94 07 83 20 22 CD | . ."...... ".|
00000B80: 20 20 C1 20 20 C9 22 2C 22 CD 20 20 C1 20 20 D9 | . .",". . .|
00000B90: 22 00 B1 13 9E 07 83 20 22 CA 20 20 D5 20 20 C9 |"...... ". . .|
00000BA0: 20 20 CE 22 2C 22 CA 20 20 D5 20 20 CE 20 20 C5 | .",". . . .|
00000BB0: 22 00 DA 13 A8 07 83 20 22 CA 20 20 D5 20 20 C9 |"...... ". . .|
00000BC0: 20 20 CC 20 20 CC 20 20 C5 20 20 D4 22 2C 22 CA | . . . .",".|
00000BD0: 20 20 D5 20 20 CC 20 20 D9 22 00 00 14 B2 07 83 | . . ."......|
00000BE0: 20 22 C1 20 20 CF 20 20 D5 20 20 D4 22 2C 22 C1 | ". . . .",".|
00000BF0: 20 20 D5 20 20 C7 20 20 D5 20 20 D3 20 20 D4 22 | . . . . ."|
00000C00: 00 3E 14 BC 07 83 20 22 D3 20 20 C5 20 20 D0 20 |.>.... ". . . |
00000C10: 20 D4 20 20 C5 20 20 CD 20 20 C2 20 20 D2 20 20 | . . . . . |
00000C20: C5 22 2C 22 D3 20 20 C5 20 20 D0 20 20 D4 20 20 |.",". . . . |
00000C30: C5 20 20 CD 20 20 C2 20 20 C5 20 20 D2 22 00 70 |. . . . .".p|
00000C40: 14 C6 07 83 20 22 CF 20 20 C3 20 20 D4 20 20 CF |.... ". . . .|
00000C50: 20 20 C2 20 20 D2 20 20 C5 22 2C 22 CF 20 20 C3 | . . .",". .|
00000C60: 20 20 D4 20 20 CF 20 20 C2 20 20 C5 20 20 D2 22 | . . . . ."|
00000C70: 00 A8 14 D0 07 83 20 22 CE 20 20 CF 20 20 D6 20 |...... ". . . |
00000C80: 20 C5 20 20 CD 20 20 C2 20 20 D2 20 20 C5 22 2C | . . . . .",|
00000C90: 22 CE 20 20 CF 20 20 D6 20 20 C5 20 20 CD 20 20 |". . . . . |
00000CA0: C2 20 20 C5 20 20 D2 22 00 E0 14 DA 07 83 20 22 |. . ."...... "|
00000CB0: C4 20 20 C5 20 20 C3 20 20 C5 20 20 CD 20 20 C2 |. . . . . .|
00000CC0: 20 20 D2 20 20 C5 22 2C 22 C4 20 20 C5 20 20 C3 | . .",". . .|
00000CD0: 20 20 C5 20 20 CD 20 20 C2 20 20 C5 20 20 D2 22 | . . . . ."|
00000CE0: 00 1A 15 E4 07 83 20 22 C4 49 4D 41 4E 43 48 45 |...... ".IMANCHE|
00000CF0: 20 20 22 2C 22 D3 55 4E 44 41 59 20 20 20 20 22 | ",".UNDAY "|
00000D00: 2C 22 CC 55 4E 44 49 20 20 20 20 20 22 2C 22 CD |,".UNDI ",".|
00000D10: 4F 4E 44 41 59 20 20 20 20 22 00 54 15 EE 07 83 |ONDAY ".T....|
00000D20: 20 22 CD 41 52 44 49 20 20 20 20 20 22 2C 22 D4 | ".ARDI ",".|
00000D30: 55 45 53 44 41 59 20 20 20 22 2C 22 CD 45 52 43 |UESDAY ",".ERC|
00000D40: 52 45 44 49 20 20 22 2C 22 D7 45 44 4E 45 53 44 |REDI ",".EDNESD|
00000D50: 41 59 20 22 00 8E 15 F8 07 83 20 22 CA 45 55 44 |AY "...... ".EUD|
00000D60: 49 20 20 20 20 20 22 2C 22 D4 48 55 52 53 44 41 |I ",".HURSDA|
00000D70: 59 20 20 22 2C 22 D6 45 4E 44 52 45 44 49 20 20 |Y ",".ENDREDI |
00000D80: 22 2C 22 C6 52 49 44 41 59 20 20 20 20 22 00 AA |",".RIDAY "..|
00000D90: 15 02 08 83 20 22 D3 41 4D 45 44 49 20 20 22 2C |.... ".AMEDI ",|
00000DA0: 22 D3 41 54 55 52 44 41 59 22 00 CB 15 0C 08 83 |".ATURDAY"......|
00000DB0: 20 22 CE 4F 55 56 45 4C 4C 45 20 4C 55 4E 45 22 | ".OUVELLE LUNE"|
00000DC0: 2C 22 CE 45 57 20 4D 4F 4F 4E 22 00 F4 15 16 08 |,".EW MOON".....|
00000DD0: 83 20 22 D0 52 45 4D 49 45 52 20 51 55 41 52 54 |. ".REMIER QUART|
00000DE0: 49 45 52 22 2C 22 C6 49 52 53 54 20 51 55 41 52 |IER",".IRST QUAR|
00000DF0: 54 45 52 22 00 14 16 20 08 83 20 22 D0 4C 45 49 |TER"... .. ".LEI|
00000E00: 4E 45 20 4C 55 4E 45 22 2C 22 C6 55 4C 4C 20 4D |NE LUNE",".ULL M|
00000E10: 4F 4F 4E 22 00 3C 16 2A 08 83 20 22 C4 45 52 4E |OON".<.*.. ".ERN|
00000E20: 49 45 52 20 51 55 41 52 54 49 45 52 22 2C 22 CC |IER QUARTIER",".|
00000E30: 41 53 54 20 51 55 41 52 54 45 52 22 00 5D 16 34 |AST QUARTER".].4|
00000E40: 08 83 20 22 CE 4F 55 56 45 4C 4C 45 20 4C 55 4E |.. ".OUVELLE LUN|
00000E50: 45 22 2C 22 CE 45 57 20 4D 4F 4F 4E 22 00 75 16 |E",".EW MOON".u.|
00000E60: 3E 08 83 20 22 2C 20 4C 45 22 2C 22 2C 20 4F 4E |>.. ", LE",", ON|
00000E70: 20 54 48 45 22 00 9F 16 48 08 83 20 33 31 2C 32 | THE"...H.. 31,2|
00000E80: 38 2C 33 31 2C 33 30 2C 33 31 2C 33 30 2C 33 31 |8,31,30,31,30,31|
00000E90: 2C 33 31 2C 33 30 2C 33 31 2C 33 30 2C 33 31 00 |,31,30,31,30,31.|
00000EA0: 00 00 |.. |
......."PROGRAMME CALENDRIER.5...."PROGR
AM CALENDAR.;.....W...."PAR/BY PATRI
CK YANG.{...."POUR/FOR CBM 64 AVEC/W
ITH......"IMPRIMANTE GEMINI-10X PRINTER.
M.$.."INTERFACE USED/UTILISE SECONDARY A
DRESS...... 5 PRI
NTER CHARACTER SET NO LINE FEED IS SENT
.D.8.. 7 UPPER/LO
WER CASE AFTER CARRIAGE RETURN.J.B
.....L.. M$(50,1),DUREE(11)...V.. G(147)
G(14);.6)"*** CALENDRIER/CALENDAR ***".E
.`.. I.0 . 29.S.J.. J.0 . 1...T.. M$(I,J
)...~.. J,I......:.:.:. M$(0,1)...... I.
0 . 11:. DUREE(I):. I.-....:. M$(0,0).:.
..E$.G(27).R.... R$:. R$."" . 1200......
R$."E" . R$."E" . R$."A" . R$."A" . LAN
GUE.1:. 1240...D.. R$."F" . R$."F" . LA.
0:. 1240.L.N.."E,F OU/OR A !":. 1200...X
..:. M$(1,LA)......:. M$(2,LA)...... R$:
. R$."" . 1260.>.... R$."A" . R$."A" . R
$."Y" . R$."Y" . FLAG.1:. 1300.D.... R$.
"M" . R$."M" . FLAG.2:. 1300...... "A,Y
OU/OR M !":. 1260...... FLAG.1 . B1.1:B2
.12:.1330...... M$(4,LA);:. B1:B2.B1.V.(
.. B1.1 . B1.12 . 1310...2.. M$(3,LA);"
(>1582)";:. ANNEE...<.. AN.1582 . 1330.#
.F.YEAR$.I(D(AN),4).P.P.. I.1 . 4:ANNEE$
.AN$." ".J(YE$,I,1):. I.T.Z.. 4,4,5:.4,
E$"@"E$"E"E$"G";: 4...D.. I.B1 . B2...N
.ES.28.C(M$(I.4,LA)).N.X.. 4,4,5:.4,E$"W
"G(1)E$"-"G(0)E$G(97)G(5);: 4...... 4,4
,7:.4,M$(I.4,LA);:.4,.ES)AN$: 4...... 4
,4,5:.4,E$"W"G(0)E$G(45)G(1).3....4,E$G(
97)G(7): 4.?. .. 4,4,7.Z.... J.1 . 80:.
4,"-";:. J...... J.0 . 5:.4,M$(J.17,LA).
" ";:. J:.4,M$(23,LA): 4...... 4,4,5:.
4,E$"-"G(0).B.H..4,E$G(97)G(5): 4.Q.R.D
U.DU(I.1)...... DU.28 . . 1540.....J.29:
M.2:A.AN:. 1780:J1.JS.#...J.1:M.3:A.AN:.
1780:J2.JS.8.... J2..J1 . DU.29.R.... 4
,4,5:.4,E$"W"G(1);.N...J.1:M.I:A.AN:. 17
80:K.2.....JS.JS.1:. JS..1 . JS.6...".ES
.5.(JS.2):.4,.6.JS.1);1;" ";.L.,.K$.D(K
):. K.10 . K$." ".K$...6.. ES.39 . .4,E$
G(97)G(4):ES.5...@.ES.ES.5...J..4,K$;.3)
;.".T.K.K.1:. K..DU . 1580.>.^. 4:L.29.
530589:. 4,4,5.].H..4,E$G(87)G(0)E$G(66)
G(3);.|.R..4,E$G(97)G(3): 4:. 4,4,9...|
.. J.1 . 15:. 1780.....LU.(F.722989).L.5
000.K...LU..((LU..(LU)).L.10..5).10.Y...
PH.LU.7.4...... (PH..(PH)).1.7.4 . . J..
....4,M$(24.PH,LA)M$(29,LA);.(J).L...J.J
.7.4:. J.DU . PH..(PH.3.5).PH:PH.PH.1:.
1710.Y.B..4,G(10).I.L. 4:. 4,4,5.V.V..4
,G(12)..... 4:. I............ M.2 . 180
0.....F.365.A.J.31.(M.1)..((A.1).4)..(.7
5.(.(((A.1).100).1))):. 1810.!...F.365.A
.J.31.(M.1)..(.4.M.2.3)..(A.4)..(.75.(.(
A.100).1)):. 1810.5...JS.F.(.(F.7).7).;.
....A.&...~.0.. "VOULEZ-VOUS LA VERSION
(F)RANCAISE OU (A)NGLAISE ?"...:.. "DO
YOU WANT THE (E)NGLISH OR (F)RENCH VE
RSION ?"...D.. "VOUS AVEZ CHOISI LE FRAN
CAIS.","YOU CHOSE ENGLISH."./.N.. "VOULE
Z-VOUS UNE (A)NNEE COMPLETE OU UN SEUL
(M)OIS".N.X.. "DO YOU WANT A COMPLETE (Y
)EAR OR A SINGLE (M)ONTH"...B.. "L'
ANNEE","THE YEAR","LE MOIS (1-12)","THE
MONTH (1-12)"...L.. "J A N V I E R
","J A N U A R Y"...V.. "F E V
R I E R","F E B R U A R Y".Q..
.. "M A R S","M A R C H"
.W.... "A V R I L",
"A P R I L"...... "M A I","M A Y
"...... "J U I N","J U N E".Z....
"J U I L L E T","J U L Y"......
"A O U T","A U G U S T".>.... "
S E P T E M B R E","S E P T
E M B E R".P.F.. "O C T O B R
E","O C T O B E R"...P.. "N O V
E M B R E","N O V E M B E R"
...Z.. "D E C E M B R E","D E C
E M B E R"...... "DIMANCHE ","SUN
DAY ","LUNDI ","MONDAY ".T....
"MARDI ","TUESDAY ","MERCREDI ",
"WEDNESDAY "...... "JEUDI ","THURSDA
Y ","VENDREDI ","FRIDAY "...... "SA
MEDI ","SATURDAY".K.... "NOUVELLE LUNE"
,"NEW MOON"...... "PREMIER QUARTIER","FI
RST QUARTER"... .. "PLEINE LUNE","FULL M
OON".<.*.. "DERNIER QUARTIER","LAST QUAR
TER".].4.. "NOUVELLE LUNE","NEW MOON".U.
>.. ", LE",", ON THE"...H.. 31,28,31,30,
31,30,31,31,30,31,30,31...
> CLICK IMAGE PREVIEW FOR FULL MODAL