komisch auf einmal läuft es wieder mit dem Grundprog. Vielen Dank für die tolle Hilfe
Code:
$regfile "m8def.dat"
$crystal = 7000000
$sim
Config Timer1 = Timer , Prescale = 1
Config Int0 = Rising
Config Lcdpin = Pin , Db4 = Portd.4 , Db5 = Portd.5 , Db6 = Portd.6 , Db7 = Portd.7 , E = Portd.1 , Rs = Portd.0
Enable Timer1
Enable Interrupts
Enable Int0
On Int0 Sprung:
Config Lcd = 16 * 2
Config Portd.1 = Output
Config Portd.7 = Output
Config Portd.6 = Output
Config Portd.5 = Output
Config Portd.4 = Output
Start Timer1
Cls
Do
Loop
Sprung:
Cls
Lcd Timer1
Timer1 = 0
Return
Lesezeichen