Initial data commit

Task/System-time/Commodore-BASIC/system-time-1.basic

@@ -0,0 +1,13 @@
+1 rem time since last reset
+5 print chr$(147);chr$(14);
+10 t$=ti$
+20 h$=left$(t$,2)
+30 m$=mid$(t$,3,2)
+40 s$=right$(t$,2)
+50 print chr$(19);"Roughly ";tab(9);h$;" hours "
+51 print tab(9);m$;" minutes"
+52 print tab(9);s$; " seconds":print
+60 print "has elapsed since TI$ was last reset or"
+65 print "the system was powered on.":print
+70 print "Press any key to quit."
+80 get k$:if k$="" then goto 10