سلام
یه موتور پیرینتر دارم که چهار تا سیم داره خواستم خود پیرنتر رو به میکرو وصل کنم بعد ببینم پیرنتره چی می فرسه منم همونه بفرسم ولی مقدار 0 هست
برنامه ای که نوشتم
$regfile = "M32def.dat"
$crystal = 8000000
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = Porta.3 , Db5 = Porta.2 , Db6 = Porta.1 , Db7 = Porta.0 , E = Porta.4 , Rs = Porta.5
Baud = 9600
Dim A As Word
Dim B As Word
Dim C As Word
Dim D As Word
Dim F As Word
Dim G As Word
A = Portb
B = Portb
C = Portb
D = Portb
F = Portb
G = Portb
Cls
Lcd A
Print A
Waitms 600
CLS
Lcd B
Print B
Waitms 600
Cls
Lcd C
Print C
Waitms 600
CLS
Lcd D
Print D
Waitms 600
Cls
Lcd F
Print F
Waitms 600
CLS
Lcd G
Print G
End
چی کار کنم ؟
یه موتور پیرینتر دارم که چهار تا سیم داره خواستم خود پیرنتر رو به میکرو وصل کنم بعد ببینم پیرنتره چی می فرسه منم همونه بفرسم ولی مقدار 0 هست
برنامه ای که نوشتم
$regfile = "M32def.dat"
$crystal = 8000000
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = Porta.3 , Db5 = Porta.2 , Db6 = Porta.1 , Db7 = Porta.0 , E = Porta.4 , Rs = Porta.5
Baud = 9600
Dim A As Word
Dim B As Word
Dim C As Word
Dim D As Word
Dim F As Word
Dim G As Word
A = Portb
B = Portb
C = Portb
D = Portb
F = Portb
G = Portb
Cls
Lcd A
Print A
Waitms 600
CLS
Lcd B
Print B
Waitms 600
Cls
Lcd C
Print C
Waitms 600
CLS
Lcd D
Print D
Waitms 600
Cls
Lcd F
Print F
Waitms 600
CLS
Lcd G
Print G
End
چی کار کنم ؟
دیدگاه