Program jam digital AVR AT90S8535

$regfile = "m8535.dat"
$crystal = 4000000

Enable Interrupts
Config Portd = Output
Config Lcd = 16 * 2
Config Lcdpin = Pin , Rs = Portd.4 , E = Portd.5 , Db4 = Portd.0
Config Lcdpin = Pin , Db5 = Portd.1 , Db6 = Portd.2 , Db7 = Portd.3

Config Date = Dmy , Separator = /
Config Clock = Soft

Date$ = "26/12/12"
Time$ = "07:20:00"
'-----------------------
Cls
Do
Locate 1 , 1
Lcd "Tanggal:" ; Date$
Locate 2 , 1
Lcd "Pukul:" ; Time$
Loop
End