Добрый день. МК: pic16F873A
LCD:
Код программы:
Code
Device = 16F873A
Xtal = 4
LCD_DTPin = PORTB.4
LCD_RSPin = PORTB.2
LCD_ENPin = PORTB.1
LCD_Interface = 4
LCD_Lines = 2
LCD_CommandUs = 2000
LCD_DataUs = 50
Dim io As Word
Dim WorkVar As Byte
DelayMS 1000
Print At 1, 1, "0000000000000000"
Print At 2, 1, "0000000000000000"
DelayMS 1000
main:
Button PORTC.2, 0, 200, 100, WorkVar, 1, delo
GoTo main
delo:
io=io+1
Cls
DelayMS 500
Print At 1, 1, Dec io
DelayMS 1000
GoTo main
схема:
в протеусе все супер.
в железе все почти супер.
Все правильно, за исключение того что иногда при нажатия на кнопку (у меня два проводка см ПС)
все вроде бы нормально, но программа (или lcd) сбрасывается на начало.
Но переменная io сохраняется т.е. сбрасывается именно lcd а не программа.
ПС. если два првода взять за контакты и соединить то в 50% случаев сбрасывается lcd.
если пальцами не трогать контакты то в 30% случаев.