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

Paroscientific, Inc. Technical Note

Precision Pressure Instrumentation Doc. No. G8044 25 March 2005

Appendix –A

Source Code for CR1000 to Read Pressure from Digiquartz® Instruments

'CR1000 Series Data logger Program for Digiquartz Intelligent Sensors

'Program author: Paroscientific, Inc.

'Description: This code reads and stores pressure from Digiquartz Intelligent Products.

'The code has the P3 command to read pressure

Public OutString as string * 100

Public InString as string * 100

Public Pressure as string * 100

'Define storage area in memory. Table name is Digiqrtz.

DataTable (Digiqrtz,1,-1)

DataInterval (0,10,Sec,10)

Sample (1,Pressure,String) 'Store Pressure

EndTable

'Main Program

BeginProg

'Set up communication port to send and receive data

SerialOpen (Com1,9600,0,0,10000) 'Uses COM1. Default 9600 baud rate. Change if instrument has different baud

rate.

Scan (10,Sec,0,0) 'Read data every 10 seconds. Change if needed.

OutString = "*0100P3"+CHR(13)+CHR(10)

'Send Pressure string over one communication port C1 (COM1 TX).

SerialOut (Com1,OutString,"",0,500)

'Receive String on port C2 (COM1 RX).

SerialIn (Instring, Com1,500,10,100) 'Receive timeout is 5 secs. Change if needed.

SplitStr (Pressure,InString,"*0001",1,4)

'Call Output Tables to store values

CallTable Digiqrtz

NextScan

EndProg

Note: This source code is available at Paroscientific web site. (File Name: DQReadPressure.cr1)

1 2 ... 5 6 7 8 9 10 11 12

Brak uwag

Campbell CR1000 Instrukcja Użytkownika Strona 10