Adott ez az egyszerű program:
Kód: Egész kijelölése
Enable Interrupts
Config Clock = Soft 'This command inits the clock
$baud = 9600
Config Date = Ymd , Separator = - ' ANSI-Format
Input "Enter the time (hh:mm:ss):" , Time$
Input "Enter the date (mm/dd/yy):" , Date$
Cls
Cursor Off
Locate 1 , 1
Lcd "Real Time Clock"
Do
Locate 1, 1
Lcd Time$
Locate 2 , 1
Lcd Date$
Waitms 10
Loop