CODE COMMENTARY:

100	Set the date for the calendar 
150	Display calendar for current day & call routine to update and keep current, the current time display.
300	Update the time display and keep it current using ON TIME$ GOSUB feature.
400	Convert date to Julian
500	Get input while on main screen (main input routine)
500-523	Get input while on calendar or appt/todo list
524-596	Get input while on calendar only
600-630 Get input while on appt/todo list only
700	Left Arrow on Calendar
710	Up Arrow on Calendar
720	Down Arrow on Calendar
730	Right Arrow on Calendar
750	Previous Month
760	Next Month
800	Display current day on calendar normally
820	Display current day on calendar inversed
900	Display diamond on appt/todo list
920	Remove diamond from appt/todo list
950	Left Arrow on appt/todo list
960	Up Arrow on appt/todo list
970	Down Arrow on appt/todo list
980	Right Arrow on appt/todo list
1000	Display current appt/todo list
2000	Load file into B$(100)
2500	Save file
3000	Sort (Appt.do file only)
4000	Build scroll start array for current day (SS%(12))
5000	Build current scroll (appt/todo list) array (CS%(8))
6000	Display current scroll (appt/todo list)
7000	Add new entry.  Dated entries all go into APPT.DO only.
7500	Delete current entry on appt/todo list
8000	Load a different (user specified file)
9000	Display help screen
10100	GETKEY code from CLUB100 library.  Replaces INKEY$ and recognizes F Keys, arrow keys, & Label key, etc.
20000	Display Function keys on bottom of screen/replace original screen.
20100	Check to see if Scroll Start array needs rebuilt when user moves on calendar