ClrHome
Output(1,1,"START PR0GRAM")
Input "1st COMMAND=",A
Input "TIME=",B
Input "2nd COMMAND=",C
Input "TIME=",D
Input "3rd COMMAND=",E
Input "TIME=",F
Input "4tH COMMAND=",G
Input "TIME=",H
Input "LAST CMMD=",I
Input "TIME=",J
Lbl S
ClrHome
Disp "COMMAND",A
Disp "TIME",B
Send({A,B})
Get(R)
ClrHome
Disp "COMMAND",C
Disp "TIME",D
Send({C,D})
Get(R)
ClrHome
Disp "COMMAND",E
Disp "TIME",F
Send({E,F})
Get(R)
ClrHome
Disp "COMMAND",G
Disp "TIME",H
Send({G,H})
Get(R)
ClrHome
Disp "COMMAND",I
Disp "TIME",J
Send({I,J})
Get(R)
ClrHome
Disp "   THANK YOU"
Disp "     FROM"
Disp "NORLAND RESEARCH"
Menu("AGAIN?","YES",S,"NO",E)
Lbl E