在 BASCOM 上创建开关信号灯

Question

我想在 BASCOM 中创建一个开关信号灯。我为此编写了这段代码：

$regfile = "m16def.dat"
$crystal = 1000000

Config Portc = &B11111111
Config Portd.0 = 0
Portd.0 = 1
Portc = &H00

Do
If Portd.0 = 1 Then
   Portc = &B11000011
   Waitms 500
   Portc = &H00
   Waitms 500
Else
   Portc = &B00111100
   Waitms 500
   Portc = &H00
   Waitms 500
End If
Loop

但 proteus 中的结果是这样的：

如有任何帮助，我们将不胜感激。

Answer 1

我阅读了 this，然后我将 If Portd.0 = 1 Then 更改为 If Pin = 1 Then，并且有效。我不明白为什么我的第一个命令不起作用！

在 BASCOM 上创建开关信号灯

create switching blinker on the BASCOM

microcontroller

basic

avr