|
本帖最后由 taotie 于 2020-12-10 21:33 編輯
程序:
rem Main.bas file generated by New Project wizard
rem
rem Created: 周二 5月 12 2020 TAOTIE
rem Processor: ATmega8
rem Compiler: BASCOM-AVR控制數(shù)字電位器AD5206仿真
rem Write your code here
$regfile = "m8def.dat"
$crystal = 8000000
Dim c As Byte '通道變量
Dim X As Byte '電阻變量
Config Pinb.2 = Output '寫入控制
Config Spi = Hard , Interrupt = Off , Data Order = Msb , Master = Yes , Polarity = Low , Phase = 0 , Clockrate = 128 , Noss = 1
Spiinit
'調(diào)整各通道滑臂在下方輸出電壓為0v
For C = 0 To 5
x= 0
Portb.2 = 0 '寫入
Spiout c, 1 '寫入通道
Spiout X , 1 '寫入電阻值
Portb.2 = 1 '寫入停止
Waitms 10
Next C
'頻道0--5循環(huán),上臂A--W電阻值由小變大
Do
'For C = 0 To 5
c=0
For x= 0 To 255 Step 51
Portb.2 = 0 '寫入
Spiout c, 1 '寫入通道
Spiout X , 1 '寫入電阻值
Portb.2 = 1 '寫入停止
Waitms 10
Next x
Loop
End
'*******************************************************************************
'數(shù)字電位器控制
' 本示例控制了Analog Devices AD5206數(shù)字電位器。
' AD5206具有6個(gè)電位器通道。 每個(gè)通道的引腳都標(biāo)有標(biāo)簽A,W,B
' A-將其連接到電壓
' W-這是電阻的滑動(dòng)觸點(diǎn),設(shè)置后會(huì)改變
' B-將其接地。
' AD5206與SPI兼容,要發(fā)送命令,請(qǐng)發(fā)送兩個(gè)字節(jié),
' 一個(gè)帶有通道號(hào)(0-5),另一個(gè)帶有電阻值 (0-255)。
' 電路:
' AD5206的所有A引腳都連接到+ 5V
' AD5206的所有B引腳都接地
' CS--------(SS引腳)
' SDI--------(MOSI引腳)
' CLK-------(SCK引腳)
|
評(píng)分
-
查看全部評(píng)分
|