Good Day,
Next, I show how I inserted it into a program that I use frequently:
CLEAR
option=' '
set color to n+/b
@ 24,1 say 'Date:'
@ 24,6 say date()
@ 24,65 say 'Hour:'
set color to gr+/r
@ 24,30 say ' Press any to Start '
store 0 to ab,ac,ad,cd,ct...