Witam wsumie to cały problem zawarłem w temacie, szukałem na forum, prubowałem na wiele sposobów ale cały czas niewiem jak to zrobic, a dokładnie chodzi mi o to zeby mogł odczytac na lcd jaki stan logiczny jest na tym wejsciu, tak by sie wydawało prost rzecz a ja sie mecze juz pół nocy i mam dosc, za konkretna pomoc będe bardzo wdzieczny. oczywiscie lcd działa i wiele innych rzeczy działa a taka prosta sprawa i eh:( jak skonfigórowc portb zeby był wjesiciem!! Pozdrawiam
Dodano po 14 [minuty]:
chodzi o cos takiego
$regfile = "m162def.dat" 'informuje kompilator o pliku
'dyrektyw mikrokontrolera
$crystal = 8000000
Config Lcd = 20 * 2
Config Lcdpin = Pin , Db4 = Portc.3 , Db5 = Portc.2 , Db6 = Portc.4 , Db7 = Portc.5 , E = Portc.1 , Rs = Portc.0
Config Portb = Input
Dim D As Byte
Cursor Off
Do
D = Portb
D = D And Portb
Locate 1 , 1
Lcd "portb="
Lcd D
Loop
Dodano po 14 [minuty]:
chodzi o cos takiego
$regfile = "m162def.dat" 'informuje kompilator o pliku
'dyrektyw mikrokontrolera
$crystal = 8000000
Config Lcd = 20 * 2
Config Lcdpin = Pin , Db4 = Portc.3 , Db5 = Portc.2 , Db6 = Portc.4 , Db7 = Portc.5 , E = Portc.1 , Rs = Portc.0
Config Portb = Input
Dim D As Byte
Cursor Off
Do
D = Portb
D = D And Portb
Locate 1 , 1
Lcd "portb="
Lcd D
Loop