在BASCOM上创建切换指示灯

时间:2018-11-09 10:14:51

标签: microcontroller avr basic micro

我想在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中的结果: enter image description here

任何帮助将不胜感激。

1 个答案:

答案 0 :(得分:0)

我读了this,然后将If Portd.0 = 1 Then更改为If Pin = 1 Then,它可以工作了。我不确定为什么我的第一个命令不起作用!