Campbell CR1000 Instrukcja Użytkownika Pobierz pdf (Strona 13)

Interfacing the MICROCOM DESIGN GTX Modulator to the Campbell Scientific CR1000 Data Logger PRELIMINARY

SerialOut (Com4,"RandomData=","",0,100)

SerialOut (Com4,batt_volt,"",0,100)

' Echo stuff to Debug Terminal

If DebugOnOff = 1 Then

SerialOut(Com1,Mess1,"",0,0)

SerialOut (Com1,"RandomData=","",0,100)

SerialOut (Com4, CRLF,"",0,100)

SerialOut (Com1,batt_volt,"",0,100)

SerialOut (Com1, CRLF,"",0,100)

EndIf

' Get responce from GTX

SerialIn (InString,Com4,100,10,100)

' Echo stuff to Debug Terminal

If DebugOnOff = 1 Then

SerialOut(Com1,Mess2,"",0,0)

SerialOut (Com1,InString,"",0,100)

EndIf

' Get responce from GTX

SerialIn (InString,Com4,100,10,100)

' Echo stuff to Debug Terminal

If DebugOnOff = 1 Then

SerialOut (Com1, CRLF,"",0,100)

SerialOut(Com1,Mess2,"",0,100)

SerialOut (Com1,InString,"",0,100)

EndIf

' Send CRs until getting Com4 > " >"

SerialOut (Com4,CR,">",100,100)

' Send Temperature to the Com4 in a Random Data Command

SerialOut (Com4,"RandomData=","",0,100)

SerialOut (Com4,"Temp:"+PTemp,"",0,100)

' Echo stuff to Debug Terminal

If DebugOnOff = 1 Then

SerialOut(Com1,Mess1,"",0,0)

SerialOut (Com1,"RandomData=","",0,100)

SerialOut (Com4, CRLF,"",0,100)

SerialOut (Com1,"Temp: "+PTemp,"",0,100)

SerialOut (Com1, CRLF,"",0,100)

EndIf

' Get responce from GTX

SerialIn (InString,Com4,100,10,100)

' Echo stuff to Debug Terminal

If DebugOnOff = 1 Then

SerialOut(Com1,Mess2,"",0,0)

SerialOut (Com1,InString,"",0,100)

EndIf

' Get responce from GTX

SerialIn (InString,Com4,100,10,100)

' Echo stuff to Debug Terminal

If DebugOnOff = 1 Then

SerialOut (Com1, CRLF,"",0,100)

SerialOut(Com1,Mess2,"",0,100)

SerialOut (Com1,InString,"",0,100)

EndIf

' Get Time from GTX

Call GetGTXTime()

' Set CR1000 Station CLock to the new values

ClockSet (myTime())

NextScan

EndProg

uAPP222 (v1.0) July 12, 2005 http://www.microcomdesign.com 13

1 2 ... 8 9 10 11 12 13 14 15 16 17 18 19

Komentarze do niniejszej Instrukcji

Brak uwag

Campbell CR1000 Instrukcja Użytkownika Strona 13

Komentarze do niniejszej Instrukcji

Powiązane produkty i podręczniki dla Pomiary, testowanie i kontrola Campbell CR1000