前两篇都是做个简单的介绍,今天投入一次实战,来测电压(Single Ended)
上个电路图吧,要不然看起来糊里糊涂的(图是来自CR1000的手册,侵删)
按照上面的图接好线,我们就来写程序吧!
'Declare Public & Dim Variables
Public batt_volt
Public Panel_temp
Public VOL(32)
Public RecRetrieved As String * 2048
Dim I
public VV
'Define Data Tables
DataTable(Dat32,1,-1)
DataInterval(0,40,Sec,10)
Sample(1,VV,IEEE4)
EndTable
'Main Program
BeginProg
SerialOpen(ComRS232,9600,0,0,10000)
SerialFlush(ComRS232)
Scan(1,Sec,0,0)
VoltSe(VV,1,mV5000,1,True,0,_60Hz,1,0)
GetRecord (RecRetrieved,Dat32,1)
SerialOut(ComRS232,RecRetrieved,"",0,100)
CallTable Dat32
NextScan
SerialClose(ComRS232)
EndProg
做一点简单的解释吧:
VoltSe()是用于测量电压的函数,第一个参数Dest就是目标变量,第二个参数Reps是重复测量的次数,第三个参数Range是测量的范围值,第四个参数SeChan表示测量第几通道,后面的就在说了,自己查查用户手册就行!
有个关于CR的公众号,大家有空可以关注下哦!