- Код: Выделить всё
$regfile = "m8def.dat"
$crystal = 8000000
Config Portb = Output
Config Portc = Output
Config Portd = Output
Config Pind.0 = Output
Config Pind.1 = Output
Config Pind.2 = Output
Config Pind.3 = Output
Config Pind.4 = Output
Config Pind.5 = Output
Config Pind.6 = Output
Config Pind.7 = Output
Portd = 255
Portc.5 = 1
Portc.4 = 1
Do
Portd = 6
Wait 2
Portd = 91
Wait 2
Portd = 79
Wait 2
Portd = 102
Wait 2
Portd = 109
Wait 2
Portd = 125
Wait 2
Portd = 7
Wait 2
Portd = 127
Wait 2
Portd = 111
Wait 2
Portd = 63
Wait 2
Portd.7 = 1
Wait 2
Loop
End
Вот новый код. Сегмент F перемаргивает в обоих разрядах. он подсоединен на PD5 - вроде альтернативная функция, таймер/счетчик.
Вот схема: