RST Flexi-Mux Instruction Manual
ELM0029B
RST Instruments Ltd.
Page 19
ipi_sn(1,4) = {47907}
ipi_sn(1,5) = {47906}
ipi_sn(1,6) = {47905}
ipi_sn(1,7) = {47904}
ipi_sn(1,8) = {47903}
ipi_sn(1,9) = {47902}
ipi_sn(1,10) = {47901}
ipi_sn(1,11) = {47900}
ipi_sn(1,12) = {47899}
ipi_sn(1,13) = {47898}
ipi_sn(2,1) = {47927}
ipi_sn(2,2) = {47926}
ipi_sn(2,3) = {47919}
ipi_sn(2,4) = {47918}
ipi_sn(2,5) = {47917}
ipi_sn(3,1) = {48244}
ipi_sn(3,2) = {48243}
ipi_sn(3,3) = {48236}
ipi_sn(3,4) = {48235}
ipi_sn(3,5) = {48234}
ipi_sn(3,6) = {48233}
ipi_sn(3,7) = {48232}
ipi_sn(3,8) = {48231}
ipi_sn(3,9) = {48230}
ipi_sn(3,10) = {48229}
ipi_sn(3,11) = {48228}
ipi_sn(4,1) = {48256}
ipi_sn(4,2) = {48255}
ipi_sn(4,3) = {48248}
ipi_sn(4,4) = {48247}
ipi_sn(4,5) = {48246}
ipi_sn(4,6) = {48245}
Scan (1,Min,0,0)
PanelTemp (PTemp,60)
Battery (Batt_volt)
If TimeIntoInterval (0,10,Min)Then
'starts every 10mins @ top of the
interval
PortSet (C2,1 )
'Reset
Delay (0,100,mSec)
'need
For p = 1 To n_ipi_strings
PulsePort (C1,5000)
'Clock
SW12 (SW12_1,1 ) 'Turn on IPI
Delay (0,2,Sec)
SerialOpen (ComC3,115200,0,0,100,0)
'SET UP RS232/485 INTERFACE
baud rate and communication mode
Delay(0,1,Sec)
SerialOut (ComC3,"MODE 0" + CHR(13),"",1,0)
SerialIn (rs485_interface,ComC3,200,CHR(13),100)
Delay(0,4,Sec)
SerialOut(ComC3,CHR(13),"",0,0)
'clear sensor buffers
Delay(0,1000,mSec)