BCX Console Demonstration Program s142.bas

 ? "Printing TIME$   "; TIME$
 ? "-----------------"
 ? "Printing HOUR    "; TIME$(1)
 ? "Printing MINUTE  "; TIME$(2)
 ? "Printing SECOND  "; TIME$(3)
 ? "Printing AMPM    "; TIME$(4)
 ? "-----------------"
 ? "Printing YEAR    "; TIME$(5)
 ? "Printing MONTH   "; TIME$(6)
 ? "Printing DAY     "; TIME$(7)
 ? "-----------------"
 ? "Printing DAYNAME "; TIME$(8)
 ? "Printing WEEKDAY "; TIME$(9)
 ? "Printing YEARDAY "; TIME$(10)
 ? "Printing WEEK    "; TIME$(11)