home *** CD-ROM | disk | FTP | other *** search
/ Transactor / Transactor_19_1987_Transactor_Publishing.d64 / sys65478.aug.87 < prev    next >
Text File  |  2023-02-26  |  814b  |  19 lines

  1. up$=chr$(145)+chr$(145)+chr$(145):poke53280,6:poke53281,6:printchr$(147)chr$(5);
  2. print up$"            august 1987             "
  3. print up$" sun  mon  tues  wed thur  fri  sat "
  4. print up$"+----+----+----+----+----+----+----+"
  5. print up$"                                 1  "
  6. print up$"+----+----+----+----+----+----+----+"
  7. print up$"   2    3    4    5    6    7    8  "
  8. print up$"+----+----+----+----+----+----+----+"
  9. print up$"   9   10   11   12   13   14   15  "
  10. print up$"+----+----+----+----+----+----+----+"
  11. print up$"  16   17   18   19   20   21   22  "
  12. print up$"+----+----+----+----+----+----+----+"
  13. print up$"  23   24   25   26   27   28   29  "
  14. print up$"+----+----+----+----+----+----+----+"
  15. print up$"  30   31                           "
  16. print up$"+----+----+----+----+----+----+----+"
  17. poke 153,0
  18.  
  19. -