我们的全部技术支持人员不监督这个论坛。如果您需要我们工作人员的帮助,请从“问一个问题”页面提交你的问题


登录或者注册在论坛上发表/回复。

代码没有写入我的表


长腿的人。J 2021年9月27日上午03:06

这似乎是个愚蠢的问题,但希望能尽快解决。请看下面我的代码。不是写在我的桌子上,有人知道为什么吗?应该是件简单的事情。

'CR6 Datalogger.

日期:24/09/2021

'程序authour:j shanks

'程序版:v1.0

'#################接线#######################

'VW1 = GEOKON 4427 SN 2129518 = U1 U2 U3 U4红色U1黑色U2绿色U3白色U4

'VW1 = GEOKON 4427 SN 2129519 = U5 U6 U7 U8红色U5黑色U6绿色U7白色U8

'Weatherstation Vaisala WXT536

“红色、地面力量

'棕色,电源12V,Pin1 ,, SW12-2

蓝色和白色,SDI12,必须组合,C3

“绿色,是地面,不是电力

'SDI12地址设置为“3”

'tbo3.

“红色,U9

“黑、地面

'Garmin GPS16x-HVS

'红色,电源12V,Pin1,红色,SW12-1

'灰色,PPS信号,pin2,白色,C1

'白色,信号Tx,Pin3,蓝色,C2

'蓝色,地面Rx,Pin4,黑色,地面

黄色,电源开关G, pin4,黑色,接地

“黑色,Power Ground, pin4,黑色,Ground。

'清除,盾牌,Pin4,黑色,地面

'SDI12地址设置为“0”(默认)

'################# 变量 #################

“公共变量

公共PTemp

公共Batt_volt (2)

公共WXT (7)7个变量,模型:WXT536

公共TB03Rain_mm

公共TBO3Rain_tips

公共GPS_SDI12 (15)Garmin GPS的线。注意,Garmin GPS留下的是默认的SDI12地址

“VW1

公共VW1_Sensor_Change

public vw1_freq,vw1_digits,vw1_eng_units,vw1_temp

VW1_Set_Zero作为布尔值

“VW2

公共VW2_Sensor_Change

公共VW2_Freq, VW2_Digits, VW2_Eng_Units, VW2_Temp

公共VW2_Set_Zero作为Boolean

“模糊变量

“VW1

昏暗的VW1_Dest (6)

昏暗的VW1_C

昏暗的VW1_Install__Eng_Units

DIM vw1_install_temp.

昏暗的VW1_Temp_Corr

昏暗的VW1_K

“VW2

昏暗的VW2_Dest (6)

昏暗的VW2_C

昏暗的vw2_install__eng_units.

昏暗的VW2_Install_Temp

昏暗的VW2_Temp_Corr

昏暗的VW2_K

'##########输出字符串##########

'内部电池测量

Alias Batt_volt(1) = SupplyVolts

Alias Batt_volt(2) = LithiumVolts

“Vaisala weatherstation

别名WXT(1)= Winddir

别名WXT (2) = WindSpd

别名WXT(3)= Airtemp

别名WXT(4)= relhhimity

别名WXT (5) = AirPressure

别名WXT (6) = wtxRain

别名wxt(7)= hail_cm2

'Garmin GPS.

GPS_SDI12(1) = latitude_a '纬度(+ =北;- =南)

别名GPS_SDI12(2)= Latitude_B'分钟纬度

Alias GPS_SDI12(3) =经度(+ =东;- =西)

Alias GPS_SDI12(4) = longitude '分钟经度

Alias GPS_SDI12(5) = speed '对地速度

别名GPS_SDI12(6) = course ' course over ground

别名GPS_SDI12(7)= legence_variation'从真正的北(+ =东方; - = West)的磁场

别名GPS_SDI12(8) = fix_quality 'GPS定位质量:0 =无效,1 = GPS, 2 =差分GPS, 6 =估计

别名GPS_SDI12(9) = nmbr_satellite '用于修复的卫星数

别名GPS_SDI12(10) = altitude '天线高度

别名GPS_SDI12(11) =当pps上升沿发生时,pps 'usec into sec of system clock,通常是99万次同步

别名GPS_SDI12(12) = dt_since_gprmc '距离最后一个GPRMC字符串的时间,通常小于1秒

别名GPS_SDI12(13)= GPS_READY'从0到10,10 =准备就绪

别名GPS_SDI12(14)= MAX_CLOCK_CHANGE'最大值时钟在MSEC中更改

Alias GPS_SDI12(15) = nmbr_clock_change '时钟被改变的次数

'#################常量################

“普通大众

const t_a = 1.4051e-3

const t_b = 2.369e-4

Const T_C = 1.019e-7

const k_m = 0.000376

Const K_B = 0.328

“VW1 (SN: 2129518)

const vw1_a = 1.7854e-6

Const VW1_B = 0.6242

const vw1_g = 0.6400

'VW2(SN:2129519)

Const VW2_A = 2.6922E-7

Const VW2_B = 0.6104

Const VW2_G = 0.6128

#################数据表#################

DataTable(表1,true,-1)

DataInterval(0, 10分钟10)

“VW1

示例(1,VW1_ENG_UNITS,IEE4)

样本(1 VW1_Temp IEEE4)

样本(1 VW1_Sensor_Change IEEE4)

“VW2

样本(1 VW2_Eng_Units IEEE4)

示例(1,VW2_TEMP,IEEE4)

样本(1 VW2_Sensor_Change IEEE4)

最小(1,Batt_Volt,FP2,False,False)

样品(1,PTEMP,FP2)

'悲伤部分

WindVector (1 WindSpd WindDir FP2,假的,900年,0,0)

FieldNames(“WindSpd_Mean WindDir_MeanUnitVector WindDir_SD1”)

平均水平(1 AirTemp FP2,假)

样本(1 RelHumidity FP2)

样本(1 AirPressure IEEE4)

总计(1 wtxRain FP2,假)

总计(1 Hail_cm2 FP2,假)

'雨量

占(1,TB03Rain_mm,FP2,False)

总计(1 TBO3Rain_tips FP2,假)

茶几

的系统操作参数

preservevarialbles.

顺序显示器

'#################主程序################

BeginProg

扫描(1分钟,0,0)

PanelTemp (PTemp, 50)

电池(BATT_VOLT)

'气象站

的开关

If TimeIsBetween (720,725,1440,Min) Then '在中午1200点到1205点之间

SW12(2,0)'turn off SW2 ()

别的

SW12(2,1)'打开SW2()

EndIf

'主要页面

'winddir','windspd','airtemp','relhumity','autpressure','wtxrain'和'hail_cm2'

SDI12Recorder(WXT520天气发射机测量,C3,“3”,“M!”,1,0)'

“TB-03'Rain_mm”

pulsecount(tb03rain_mm,1,u9,1,0.2,0)

TBO3Rain_tips = TB03Rain_mm* 5

“VW1

“测量VW1传感器

VibratingWire (VW1_Dest (), 1, U1, 1400年,3500年,1,0.01,“”,50岁,T_A, T_B, T_C)

VW1_FREQ = VW1_DEST(1)

VW1_Temp = VW1_Dest (6)

'VW1转换频率为数字

vw1_digits =(vw1_freq ^ 2)/ 1000

VW1计算工程单位

VW1_Eng_Units = (VW1_Digits^2) * VW1_A + VW1_Digits * VW1_B + VW1_C

'VW1计算和应用温度补偿

VW1_K =((VW1_DIGITS * K_M) - K_B)* VW1_G'示例适用于4420-1-50毫米

VW1_Temp = (VW1_Temp - VW1_Install_Temp) * VW1_K

vw1_eng_units = vw1_eng_units + vw1_temp_corr

'计算运动

vw1_sensor_change = vw1_eng_units - vw1_install__units

“VW2

'测量VW2传感器

U5 VibratingWire (VW2_Dest(), 1日,1400年,3500年,1,0.01,“”,50岁,T_A, T_B, T_C)

VW2_FREQ = VW2_DEST(1)

VW2_Temp = VW2_Dest (6)

'VW2将FREQ转换为数字

vw2_digits =(vw2_freq ^ 2)/ 1000

计算工程单位

vw2_eng_units =(vw2_digits ^ 2)* vw2_a + vw2_digits * vw2_b + vw2_c

'VW2计算和应用温度补偿

VW2_K = ((VW2_Digits * K_M) - K_B) * VW2_G '示例为4420-1-50mm

VW2_Temp_Corr = (VW2_Temp - VW2_Install_Temp) * VW2_K

vw2_eng_units = vw2_eng_units + vw2_temp_corr

'计算运动

VW2_Sensor_Change = VW2_Eng_Units - VW2_Install__Eng_Units

'vw zeros.

“VW2设置零点(安装)点

如果vw2_set_zero = true那么

VW2_C = ((VW2_Digits^2) * VW2_A + VW2_Digits * VW2_B) * -1

VW2_Install_Temp = VW2_Temp

VW2_Install__Eng_Units = VW2_Eng_Units

vw2_set_zero = false.

EndIf

'VW1设置零(安装)点

如果VW1_Set_Zero = True那么

VW1_C = ((VW1_Digits^2) * VW1_A + VW1_Digits * VW1_B) * -1

VW1_Install_Temp = VW1_Temp

VW1_Install__Eng_Units = VW1_Eng_Units

VW1_Set_Zero = False

EndIf

“叫输出表

Calltable Table1.

NextScan

GPS时钟每60分钟修正5分钟

SlowSequence

扫描(60,min,0,0)

SW12 (1, 1)

延迟(0 5分钟)

GPS(GPS_SDI12(),-Comc1,0,100)

SW12 (1,0)

NextScan

endprog.


长腿的人。J 2021年9月27日08:09 PM

解决:不得不将CR6更新至最新操作系统//m.ocbeachreo.com/downloads/cr6-o.

登录或者注册在论坛上发表/回复。
Baidu