Funktioniert immer noch nicht.
der code sieht jetzt so aus:
Code:
$regfile = "m16def.dat"
$crystal = 12000000
$hwstack = 32
$swstack = 10
$framesize = 40
Config Porta = Output
Config Portb = Output
Config Portd = Output
Config Lcd = 20 * 2
Config Lcdpin = Pin , Port = Portb , E = Portd.4 , Rs = Portd.2
Config Lcdbus = 8
Enable Interrupts
Config Date = Dmy , Separator = .
Config Clock = Soft , Gosub = Sectic
Date$ = "14/02/11"
Time$ = "12:00:00"
Porta = 1
Initlcd
Do
Cls
Lcd Time$
Waitms 500
Loop
End
Sectic:
Toggle Porta.0
return
Lesezeichen