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: 41 50 52 49 4C 20 31 39 39 31 22 0D 43 48 41 52 |APRIL 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 20 22 3A 43 48 41 52 2C 39 2C 38 2C |,5," ":CHAR,9,8,|
00000130: 22 31 22 3A 43 48 41 52 2C 39 2C 31 31 2C 22 32 |"1":CHAR,9,11,"2|
00000140: 22 3A 43 48 41 52 2C 39 2C 31 34 2C 22 33 22 3A |":CHAR,9,14,"3":|
00000150: 43 48 41 52 2C 39 2C 31 37 2C 22 34 22 3A 43 48 |CHAR,9,17,"4":CH|
00000160: 41 52 2C 39 2C 32 30 2C 22 35 22 3A 43 48 41 52 |AR,9,20,"5":CHAR|
00000170: 2C 39 2C 32 33 2C 22 36 22 0D 43 48 41 52 2C 31 |,9,23,"6".CHAR,1|
00000180: 35 2C 35 2C 22 37 22 3A 43 48 41 52 2C 31 35 2C |5,5,"7":CHAR,15,|
00000190: 38 2C 22 38 22 3A 43 48 41 52 2C 31 35 2C 31 31 |8,"8":CHAR,15,11|
000001A0: 2C 22 39 22 3A 43 48 41 52 2C 31 35 2C 31 34 2C |,"9":CHAR,15,14,|
000001B0: 22 31 30 22 3A 43 48 41 52 2C 31 35 2C 31 37 2C |"10":CHAR,15,17,|
000001C0: 22 31 31 22 3A 43 48 41 52 2C 31 35 2C 32 30 2C |"11":CHAR,15,20,|
000001D0: 22 31 32 22 3A 43 48 41 52 2C 31 35 2C 32 33 2C |"12":CHAR,15,23,|
000001E0: 22 31 33 22 0D 43 48 41 52 2C 32 32 2C 35 2C 22 |"13".CHAR,22,5,"|
000001F0: 31 34 22 3A 43 48 41 52 2C 32 32 2C 38 2C 22 31 |14":CHAR,22,8,"1|
00000200: 35 22 3A 43 48 41 52 2C 32 32 2C 31 31 2C 22 31 |5":CHAR,22,11,"1|
00000210: 36 22 3A 43 48 41 52 2C 32 32 2C 31 34 2C 22 31 |6":CHAR,22,14,"1|
00000220: 37 22 3A 43 48 41 52 2C 32 32 2C 31 37 2C 22 31 |7":CHAR,22,17,"1|
00000230: 38 22 3A 43 48 41 52 2C 32 32 2C 32 30 2C 22 31 |8":CHAR,22,20,"1|
00000240: 39 22 3A 43 48 41 52 2C 32 32 2C 32 33 2C 22 32 |9":CHAR,22,23,"2|
00000250: 30 22 0D 43 48 41 52 2C 32 39 2C 35 2C 22 32 31 |0".CHAR,29,5,"21|
00000260: 22 3A 43 48 41 52 2C 32 39 2C 38 2C 22 32 32 22 |":CHAR,29,8,"22"|
00000270: 3A 43 48 41 52 2C 32 39 2C 31 31 2C 22 32 33 22 |:CHAR,29,11,"23"|
00000280: 3A 43 48 41 52 2C 32 39 2C 31 34 2C 22 32 34 22 |:CHAR,29,14,"24"|
00000290: 3A 43 48 41 52 2C 32 39 2C 31 37 2C 22 32 35 22 |:CHAR,29,17,"25"|
000002A0: 3A 43 48 41 52 2C 32 39 2C 32 30 2C 22 32 36 22 |:CHAR,29,20,"26"|
000002B0: 3A 43 48 41 52 2C 32 39 2C 32 33 2C 22 32 37 22 |:CHAR,29,23,"27"|
000002C0: 0D 43 48 41 52 2C 33 36 2C 35 2C 22 32 38 22 3A |.CHAR,36,5,"28":|
000002D0: 43 48 41 52 2C 33 36 2C 38 2C 22 32 39 22 3A 43 |CHAR,36,8,"29":C|
000002E0: 48 41 52 2C 33 36 2C 31 31 2C 22 33 30 22 3A 43 |HAR,36,11,"30":C|
000002F0: 48 41 52 2C 33 36 2C 31 34 2C 22 20 20 22 0D 53 |HAR,36,14," ".S|
00000300: 4C 4F 57 3A 43 4C 4F 53 45 31 3A 50 4F 4B 45 31 |LOW:CLOSE1:POKE1|
00000310: 35 33 2C 30 0D |53,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,"
APRIL 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," ":CHAR,9,8,"1":CHAR,9,11,"2
":CHAR,9,14,"3":CHAR,9,17,"4":CHAR,9,20,
"5":CHAR,9,23,"6".CHAR,15,5,"7":CHAR,15,
8,"8":CHAR,15,11,"9":CHAR,15,14,"10":CHA
R,15,17,"11":CHAR,15,20,"12":CHAR,15,23,
"13".CHAR,22,5,"14":CHAR,22,8,"15":CHAR,
22,11,"16":CHAR,22,14,"17":CHAR,22,17,"1
8":CHAR,22,20,"19":CHAR,22,23,"20".CHAR,
29,5,"21":CHAR,29,8,"22":CHAR,29,11,"23"
:CHAR,29,14,"24":CHAR,29,17,"25":CHAR,29
,20,"26":CHAR,29,23,"27".CHAR,36,5,"28":
CHAR,36,8,"29":CHAR,36,11,"30":CHAR,36,1
4," ".SLOW:CLOSE1:POKE153,0.