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)