00000000: 55 24 3D 43 48 52 24 28 31 34 35 29 2B 43 48 52 |U$=CHR$(145)+CHR|
00000010: 24 28 31 34 35 29 2B 43 48 52 24 28 31 34 35 29 |$(145)+CHR$(145)|
00000020: 0D 50 52 49 4E 54 43 48 52 24 28 31 34 37 29 43 |.PRINTCHR$(147)C|
00000030: 48 52 24 28 35 29 3B 0D 43 4F 4C 4F 52 30 2C 37 |HR$(5);.COLOR0,7|
00000040: 3A 43 4F 4C 4F 52 34 2C 37 3A 43 4F 4C 4F 52 31 |:COLOR4,7:COLOR1|
00000050: 2C 32 0D 46 41 53 54 0D 47 52 41 50 48 49 43 31 |,2.FAST.GRAPHIC1|
00000060: 2C 31 3A 42 4F 58 2C 32 2C 32 2C 33 31 38 2C 31 |,1:BOX,2,2,318,1|
00000070: 39 39 3A 42 4F 58 2C 34 2C 33 32 2C 35 30 2C 31 |99:BOX,4,32,50,1|
00000080: 39 37 3A 42 4F 58 2C 35 32 2C 33 32 2C 33 31 36 |97:BOX,52,32,316|
00000090: 2C 31 39 37 0D 43 48 41 52 2C 31 35 2C 32 2C 22 |,197.CHAR,15,2,"|
000000A0: 4D 41 52 43 48 20 31 39 39 31 22 0D 43 48 41 52 |MARCH 1991".CHAR|
000000B0: 2C 32 2C 35 2C 22 53 55 4E 22 3A 43 48 41 52 2C |,2,5,"SUN":CHAR,|
000000C0: 32 2C 38 2C 22 4D 4F 4E 22 3A 43 48 41 52 2C 32 |2,8,"MON":CHAR,2|
000000D0: 2C 31 31 2C 22 54 55 45 22 3A 43 48 41 52 2C 32 |,11,"TUE":CHAR,2|
000000E0: 2C 31 34 2C 22 57 45 44 22 3A 43 48 41 52 2C 32 |,14,"WED":CHAR,2|
000000F0: 2C 31 37 2C 22 54 48 55 22 3A 43 48 41 52 2C 32 |,17,"THU":CHAR,2|
00000100: 2C 32 30 2C 22 46 52 49 22 3A 43 48 41 52 2C 32 |,20,"FRI":CHAR,2|
00000110: 2C 32 33 2C 22 53 41 54 22 0D 43 48 41 52 2C 39 |,23,"SAT".CHAR,9|
00000120: 2C 35 2C 22 33 31 22 3A 43 48 41 52 2C 39 2C 38 |,5,"31":CHAR,9,8|
00000130: 2C 22 20 22 3A 43 48 41 52 2C 39 2C 31 31 2C 22 |," ":CHAR,9,11,"|
00000140: 20 22 3A 43 48 41 52 2C 39 2C 31 34 2C 22 20 22 | ":CHAR,9,14," "|
00000150: 3A 43 48 41 52 2C 39 2C 31 37 2C 22 20 22 3A 43 |:CHAR,9,17," ":C|
00000160: 48 41 52 2C 39 2C 32 30 2C 22 31 22 3A 43 48 41 |HAR,9,20,"1":CHA|
00000170: 52 2C 39 2C 32 33 2C 22 32 22 0D 43 48 41 52 2C |R,9,23,"2".CHAR,|
00000180: 31 35 2C 35 2C 22 33 22 3A 43 48 41 52 2C 31 35 |15,5,"3":CHAR,15|
00000190: 2C 38 2C 22 34 22 3A 43 48 41 52 2C 31 35 2C 31 |,8,"4":CHAR,15,1|
000001A0: 31 2C 22 35 22 3A 43 48 41 52 2C 31 35 2C 31 34 |1,"5":CHAR,15,14|
000001B0: 2C 22 36 22 3A 43 48 41 52 2C 31 35 2C 31 37 2C |,"6":CHAR,15,17,|
000001C0: 22 37 22 3A 43 48 41 52 2C 31 35 2C 32 30 2C 22 |"7":CHAR,15,20,"|
000001D0: 38 22 3A 43 48 41 52 2C 31 35 2C 32 33 2C 22 39 |8":CHAR,15,23,"9|
000001E0: 22 0D 43 48 41 52 2C 32 32 2C 35 2C 22 31 30 22 |".CHAR,22,5,"10"|
000001F0: 3A 43 48 41 52 2C 32 32 2C 38 2C 22 31 31 22 3A |:CHAR,22,8,"11":|
00000200: 43 48 41 52 2C 32 32 2C 31 31 2C 22 31 32 22 3A |CHAR,22,11,"12":|
00000210: 43 48 41 52 2C 32 32 2C 31 34 2C 22 31 33 22 3A |CHAR,22,14,"13":|
00000220: 43 48 41 52 2C 32 32 2C 31 37 2C 22 31 34 22 3A |CHAR,22,17,"14":|
00000230: 43 48 41 52 2C 32 32 2C 32 30 2C 22 31 35 22 3A |CHAR,22,20,"15":|
00000240: 43 48 41 52 2C 32 32 2C 32 33 2C 22 31 36 22 0D |CHAR,22,23,"16".|
00000250: 43 48 41 52 2C 32 39 2C 35 2C 22 31 37 22 3A 43 |CHAR,29,5,"17":C|
00000260: 48 41 52 2C 32 39 2C 38 2C 22 31 38 22 3A 43 48 |HAR,29,8,"18":CH|
00000270: 41 52 2C 32 39 2C 31 31 2C 22 31 39 22 3A 43 48 |AR,29,11,"19":CH|
00000280: 41 52 2C 32 39 2C 31 34 2C 22 32 30 22 3A 43 48 |AR,29,14,"20":CH|
00000290: 41 52 2C 32 39 2C 31 37 2C 22 32 31 22 3A 43 48 |AR,29,17,"21":CH|
000002A0: 41 52 2C 32 39 2C 32 30 2C 22 32 32 22 3A 43 48 |AR,29,20,"22":CH|
000002B0: 41 52 2C 32 39 2C 32 33 2C 22 32 33 22 0D 43 48 |AR,29,23,"23".CH|
000002C0: 41 52 2C 33 36 2C 35 2C 22 32 34 22 3A 43 48 41 |AR,36,5,"24":CHA|
000002D0: 52 2C 33 36 2C 38 2C 22 32 35 22 3A 43 48 41 52 |R,36,8,"25":CHAR|
000002E0: 2C 33 36 2C 31 31 2C 22 32 36 22 3A 43 48 41 52 |,36,11,"26":CHAR|
000002F0: 2C 33 36 2C 31 34 2C 22 32 37 22 3A 43 48 41 52 |,36,14,"27":CHAR|
00000300: 2C 33 36 2C 31 37 2C 22 32 38 22 3A 43 48 41 52 |,36,17,"28":CHAR|
00000310: 2C 33 36 2C 32 30 2C 22 32 39 22 3A 43 48 41 52 |,36,20,"29":CHAR|
00000320: 2C 33 36 2C 32 33 2C 22 33 30 22 0D 53 4C 4F 57 |,36,23,"30".SLOW|
00000330: 3A 43 4C 4F 53 45 31 3A 50 4F 4B 45 31 35 33 2C |:CLOSE1:POKE153,|
00000340: 30 0D |0. |
U$=CHR$(145)+CHR$(145)+CHR$(145).PRINTCH
R$(147)CHR$(5);.COLOR0,7:COLOR4,7:COLOR1
,2.FAST.GRAPHIC1,1:BOX,2,2,318,199:BOX,4
,32,50,197:BOX,52,32,316,197.CHAR,15,2,"
MARCH 1991".CHAR,2,5,"SUN":CHAR,2,8,"MON
":CHAR,2,11,"TUE":CHAR,2,14,"WED":CHAR,2
,17,"THU":CHAR,2,20,"FRI":CHAR,2,23,"SAT
".CHAR,9,5,"31":CHAR,9,8," ":CHAR,9,11,"
":CHAR,9,14," ":CHAR,9,17," ":CHAR,9,20
,"1":CHAR,9,23,"2".CHAR,15,5,"3":CHAR,15
,8,"4":CHAR,15,11,"5":CHAR,15,14,"6":CHA
R,15,17,"7":CHAR,15,20,"8":CHAR,15,23,"9
".CHAR,22,5,"10":CHAR,22,8,"11":CHAR,22,
11,"12":CHAR,22,14,"13":CHAR,22,17,"14":
CHAR,22,20,"15":CHAR,22,23,"16".CHAR,29,
5,"17":CHAR,29,8,"18":CHAR,29,11,"19":CH
AR,29,14,"20":CHAR,29,17,"21":CHAR,29,20
,"22":CHAR,29,23,"23".CHAR,36,5,"24":CHA
R,36,8,"25":CHAR,36,11,"26":CHAR,36,14,"
27":CHAR,36,17,"28":CHAR,36,20,"29":CHAR
,36,23,"30".SLOW:CLOSE1:POKE153,0.