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 36 2C 32 2C 22 |,197.CHAR,16,2,"|
000000A0: 4D 41 59 20 31 39 39 31 22 0D 43 48 41 52 2C 32 |MAY 1991".CHAR,2|
000000B0: 2C 35 2C 22 53 55 4E 22 3A 43 48 41 52 2C 32 2C |,5,"SUN":CHAR,2,|
000000C0: 38 2C 22 4D 4F 4E 22 3A 43 48 41 52 2C 32 2C 31 |8,"MON":CHAR,2,1|
000000D0: 31 2C 22 54 55 45 22 3A 43 48 41 52 2C 32 2C 31 |1,"TUE":CHAR,2,1|
000000E0: 34 2C 22 57 45 44 22 3A 43 48 41 52 2C 32 2C 31 |4,"WED":CHAR,2,1|
000000F0: 37 2C 22 54 48 55 22 3A 43 48 41 52 2C 32 2C 32 |7,"THU":CHAR,2,2|
00000100: 30 2C 22 46 52 49 22 3A 43 48 41 52 2C 32 2C 32 |0,"FRI":CHAR,2,2|
00000110: 33 2C 22 53 41 54 22 0D 43 48 41 52 2C 39 2C 35 |3,"SAT".CHAR,9,5|
00000120: 2C 22 20 22 3A 43 48 41 52 2C 39 2C 38 2C 22 20 |," ":CHAR,9,8," |
00000130: 22 3A 43 48 41 52 2C 39 2C 31 31 2C 22 20 22 3A |":CHAR,9,11," ":|
00000140: 43 48 41 52 2C 39 2C 31 34 2C 22 31 22 3A 43 48 |CHAR,9,14,"1":CH|
00000150: 41 52 2C 39 2C 31 37 2C 22 32 22 3A 43 48 41 52 |AR,9,17,"2":CHAR|
00000160: 2C 39 2C 32 30 2C 22 33 22 3A 43 48 41 52 2C 39 |,9,20,"3":CHAR,9|
00000170: 2C 32 33 2C 22 34 22 0D 43 48 41 52 2C 31 35 2C |,23,"4".CHAR,15,|
00000180: 35 2C 22 35 22 3A 43 48 41 52 2C 31 35 2C 38 2C |5,"5":CHAR,15,8,|
00000190: 22 36 22 3A 43 48 41 52 2C 31 35 2C 31 31 2C 22 |"6":CHAR,15,11,"|
000001A0: 37 22 3A 43 48 41 52 2C 31 35 2C 31 34 2C 22 38 |7":CHAR,15,14,"8|
000001B0: 22 3A 43 48 41 52 2C 31 35 2C 31 37 2C 22 39 22 |":CHAR,15,17,"9"|
000001C0: 3A 43 48 41 52 2C 31 35 2C 32 30 2C 22 31 30 22 |:CHAR,15,20,"10"|
000001D0: 3A 43 48 41 52 2C 31 35 2C 32 33 2C 22 31 31 22 |:CHAR,15,23,"11"|
000001E0: 0D 43 48 41 52 2C 32 32 2C 35 2C 22 31 32 22 3A |.CHAR,22,5,"12":|
000001F0: 43 48 41 52 2C 32 32 2C 38 2C 22 31 33 22 3A 43 |CHAR,22,8,"13":C|
00000200: 48 41 52 2C 32 32 2C 31 31 2C 22 31 34 22 3A 43 |HAR,22,11,"14":C|
00000210: 48 41 52 2C 32 32 2C 31 34 2C 22 31 35 22 3A 43 |HAR,22,14,"15":C|
00000220: 48 41 52 2C 32 32 2C 31 37 2C 22 31 36 22 3A 43 |HAR,22,17,"16":C|
00000230: 48 41 52 2C 32 32 2C 32 30 2C 22 31 37 22 3A 43 |HAR,22,20,"17":C|
00000240: 48 41 52 2C 32 32 2C 32 33 2C 22 31 38 22 0D 43 |HAR,22,23,"18".C|
00000250: 48 41 52 2C 32 39 2C 35 2C 22 31 39 22 3A 43 48 |HAR,29,5,"19":CH|
00000260: 41 52 2C 32 39 2C 38 2C 22 32 30 22 3A 43 48 41 |AR,29,8,"20":CHA|
00000270: 52 2C 32 39 2C 31 31 2C 22 32 31 22 3A 43 48 41 |R,29,11,"21":CHA|
00000280: 52 2C 32 39 2C 31 34 2C 22 32 32 22 3A 43 48 41 |R,29,14,"22":CHA|
00000290: 52 2C 32 39 2C 31 37 2C 22 32 33 22 3A 43 48 41 |R,29,17,"23":CHA|
000002A0: 52 2C 32 39 2C 32 30 2C 22 32 34 22 3A 43 48 41 |R,29,20,"24":CHA|
000002B0: 52 2C 32 39 2C 32 33 2C 22 32 35 22 0D 43 48 41 |R,29,23,"25".CHA|
000002C0: 52 2C 33 36 2C 35 2C 22 32 36 22 3A 43 48 41 52 |R,36,5,"26":CHAR|
000002D0: 2C 33 36 2C 38 2C 22 32 37 22 3A 43 48 41 52 2C |,36,8,"27":CHAR,|
000002E0: 33 36 2C 31 31 2C 22 32 38 22 3A 43 48 41 52 2C |36,11,"28":CHAR,|
000002F0: 33 36 2C 31 34 2C 22 32 39 22 3A 43 48 41 52 2C |36,14,"29":CHAR,|
00000300: 33 36 2C 31 37 2C 22 33 30 22 3A 43 48 41 52 2C |36,17,"30":CHAR,|
00000310: 33 36 2C 32 30 2C 22 33 31 22 3A 43 48 41 52 2C |36,20,"31":CHAR,|
00000320: 33 36 2C 32 33 2C 22 20 20 22 0D 53 4C 4F 57 3A |36,23," ".SLOW:|
00000330: 43 4C 4F 53 45 31 3A 50 4F 4B 45 31 35 33 2C 30 |CLOSE1:POKE153,0|
00000340: 0D |. |
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,16,2,"
MAY 1991".CHAR,2,5,"SUN":CHAR,2,8,"MON":
CHAR,2,11,"TUE":CHAR,2,14,"WED":CHAR,2,1
7,"THU":CHAR,2,20,"FRI":CHAR,2,23,"SAT".
CHAR,9,5," ":CHAR,9,8," ":CHAR,9,11," ":
CHAR,9,14,"1":CHAR,9,17,"2":CHAR,9,20,"3
":CHAR,9,23,"4".CHAR,15,5,"5":CHAR,15,8,
"6":CHAR,15,11,"7":CHAR,15,14,"8":CHAR,1
5,17,"9":CHAR,15,20,"10":CHAR,15,23,"11"
.CHAR,22,5,"12":CHAR,22,8,"13":CHAR,22,1
1,"14":CHAR,22,14,"15":CHAR,22,17,"16":C
HAR,22,20,"17":CHAR,22,23,"18".CHAR,29,5
,"19":CHAR,29,8,"20":CHAR,29,11,"21":CHA
R,29,14,"22":CHAR,29,17,"23":CHAR,29,20,
"24":CHAR,29,23,"25".CHAR,36,5,"26":CHAR
,36,8,"27":CHAR,36,11,"28":CHAR,36,14,"2
9":CHAR,36,17,"30":CHAR,36,20,"31":CHAR,
36,23," ".SLOW:CLOSE1:POKE153,0.