Kód: Egész kijelölése
$regfile = "m16def.dat"
$crystal = 8000000
Config Adc = Single , Prescaler = Auto , Reference = Avcc
Start Adc
Config Lcd = 20 * 4
Config Lcdpin = Pin , Db4 = Portd.3 , Db5 = Portd.2 , Db6 = Portd.1 , Db7 = Portd.0 , E = Portd.4 , Rs = Portd.5
Config Lcdmode = Port
Deflcdchar 0 , 10 , 32 , 14 , 17 , 17 , 17 , 14 , 32 'chr(0) = ö
Deflcdchar 1 , 8 , 4 , 14 , 17 , 31 , 16 , 14 , 32 'chr(1) = é
Deflcdchar 2 , 10 , 32 , 17 , 17 , 17 , 19 , 13 , 32 'chr(2) = ű
Deflcdchar 3 , 2 , 4 , 14 , 1 , 15 , 17 , 15 , 32 'chr(3) = á
Deflcdchar 4 , 5 , 10 , 14 , 17 , 17 , 17 , 14 , 32 'chr(4) = ő
Initlcd
Cls
Config Portd = Output
Config Portb = Output
Config Portc = Input
.
.
.
olvasgattam visszafelé és láttam valahol, hogy az initlcd parancs duplázva volt. reggel kipróbálom....