Our full technical support staff does not monitor this forum. If you need assistance from a member of our staff, please submit your question from the Ask a Question page.


Log in or register to post/reply in the forum.

Load cell CR1000 program help please?


BronwynH Nov 25, 2015 05:09 AM

Hi
I have a LPS ME load cell with a capacity of 15kg.

I would like to use it to log the weight of water which elutes from a lysimeter over time using a CR1000 datalogger. I am using PC400 software, a rechargeable battery to power the datalogger and I have direct communication with the CR1000 via a laptop.

I am quite rusty on my CR1000 programming code and I was wondering if someone could please review the following code that I have attempted to write?

Any help would be greatfully received.

Kind regards
Bronwyn Humphries

'CR1000 Series Datalogger
'Program: Unsaturated Flow
'date:25/11/2015
'program author:Bronwyn Humphries
'Declare Public Variables
'Example:
Public Weight As Float
'Declare Other Variables
DataTable (Weightoutput,True,-1)
DataInterval (0,1,Min,0)
Sample (2,Weight(),FP2)
EndTable

BeginProg
scan (1,Min,0,0)

BrFull(Weight(),1,mV7_5,8,Vx3,1,2500,True,True,0,_50Hz,7.8853093,-1.2626697)

EndIf
CallTable Weightoutput
NextScan
EndProg


BronwynH Nov 26, 2015 01:29 AM

Hi everyone
I think I have solved my own problem!

Please see below for a program that works for a LPS ME load cell in case someone wants to use it.

'CR1000 Series Datalogger
'To create a different opening program template, type in new
'instructions and select Template | Save as Default Template
'date: 26 Nov 2015
'program author: Bronwyn Humphries

'Declare Public Variables
'Example:
Public Weight As Float

'Declare Other Variables
'Example:
'Dim Counter

'Declare Constants
'Example:
'CONST PI = 3.141592654

'Define Data Tables
DataTable (Weightoutput,1,-1)
DataInterval (0,30,Sec,0)
Minimum (1,Weight,FP2,0,False)
Sample (1,Weight,FP2)
EndTable

'Define Subroutines
'Sub
'EnterSub instructions here
'EndSub

'Main Program
BeginProg
Scan (30,Sec,0,0)
BrFull(Weight(),1,mV7_5,8,Vx3,1,2500,True,True,0,_50Hz,7.8853093,-1.2626697)
'Enter other measurement instructions
'Call Output Tables
'Example:
CallTable Weightoutput
NextScan
EndProg

Log in or register to post/reply in the forum.