دوستان.من میخام تغییرات q میکرو دوم رو بفرستم به میکرو اول و اونو ال سی دی کنم.ولی هر کار میکنم نمیشه،اول عدد 2 رو نشون میده و بعد صفر رو.
میتونید بگید مشکل کجاست :cry2:
برنامه میکرو اول:
میتونید بگید مشکل کجاست :cry2:
برنامه میکرو اول:
$regfile = "m16def.dat" : $crystal = 1000000
Config Lcdpin = Pin , Db4 = Portb.1 , Db5 = Portb.2 , Db6 = Portb.3 , Db7 = Portb.4 , E = Portb.5 , Rs = Portb.6
Config Lcd = 16 * 2
$baud = 9600
Config Portc = Input : Config Porta = Output
Dim A As Byte , Q As Byte
Do
Locate 1 , 1
Input A
Lcd A
waitms 100
Loop
End
برنامه میکرو دوم:Config Lcdpin = Pin , Db4 = Portb.1 , Db5 = Portb.2 , Db6 = Portb.3 , Db7 = Portb.4 , E = Portb.5 , Rs = Portb.6
Config Lcd = 16 * 2
$baud = 9600
Config Portc = Input : Config Porta = Output
Dim A As Byte , Q As Byte
Do
Locate 1 , 1
Input A
Lcd A
waitms 100
Loop
End
$regfile = "m16def.dat" : $crystal = 1000000
$baud = 9600
Config Portc = Input : Config Porta = Output
Dim A As Byte : Dim Q As Byte
Q = 2
Do
Print Q
Waitms 100
Incr Q
Loop
End
چیو دقت نکردم؟ :cry2: ب $baud = 9600
Config Portc = Input : Config Porta = Output
Dim A As Byte : Dim Q As Byte
Q = 2
Do
Print Q
Waitms 100
Incr Q
Loop
End

دیدگاه