Code: Select all
PROGRAM:Timer :ClrHome :Input "Seconds? ",X :X*38->S :For(T,0,S) :Output(5,6,X-(T/38)) :End :ClrHome
What it does, is asks you how many seconds you want to put in.
Once you hit Enter, it begins a countdown, displaying how many seconds are left on the screen.
Once it hits zero, it clears the screen for next time.
What other programs have you either done or would like to see?