Scribd
Upload
67 views

Utility

The document contains code for functions that manage gas measurement data including time, date, gas composition values, and calculations for properties like Wobbe index. The code loads data, performs calculations, and includes loops to continuously perform updates.

Uploaded by

Dio Masera
Copyright
© Attribution Non-Commercial (BY-NC)
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
67 views

Utility

The document contains code for functions that manage gas measurement data including time, date, gas composition values, and calculations for properties like Wobbe index. The code loads data, performs calculations, and includes loops to continuously perform updates.

Uploaded by

Dio Masera
Copyright
© Attribution Non-Commercial (BY-NC)
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
You are on page 1/ 2

function util() const const const const const const const const const CALCALMITEM_GASDP_REALCV = 12; CALCALMITEM_GASDP_IDEALCV = 11;

CALCALMITEM_GASDP_BASECOMPZB = 10; CALCALMITEM_GASDP_WOBBEINDEX = 37; CALCALMITEM_GASDP_REALRDSG = 6; KPINTARR_SYS_TIMEANDDATE = 10; KPINT_SYS_DLOADTIMEACCEPT = 22; KPINTARR_GAS_TIMEANDDATE = 7; KPINT_GAS_DLOADTIMEACCEPT = 41; dload_year(0, "KPINTARR", KPINTARR_SYS_TIMEANDDATE, "0"); dload_month(0, "KPINTARR", KPINTARR_SYS_TIMEANDDATE, "1"); dload_day(0, "KPINTARR", KPINTARR_SYS_TIMEANDDATE, "2"); dload_hour(0, "KPINTARR", KPINTARR_SYS_TIMEANDDATE, "3"); dload_minute(0, "KPINTARR", KPINTARR_SYS_TIMEANDDATE, "4"); dload_second(0, "KPINTARR", KPINTARR_SYS_TIMEANDDATE, "5"); year(station(1), "KPINTARR", KPINTARR_GAS_TIMEANDDATE, "10"); month(station(1), "KPINTARR", KPINTARR_GAS_TIMEANDDATE, "11"); day(station(1), "KPINTARR", KPINTARR_GAS_TIMEANDDATE, "12"); hour(station(1), "KPINTARR", KPINTARR_GAS_TIMEANDDATE, "13"); minute(station(1), "KPINTARR", KPINTARR_GAS_TIMEANDDATE, "14"); second(station(1), "KPINTARR", KPINTARR_GAS_TIMEANDDATE, "15"); time_accept(0, "KPINT", KPINT_SYS_DLOADTIMEACCEPT, "VALUE"); time_synch(station(1), "KPINT", KPINT_GAS_DLOADTIMEACCEPT, "VALUE"); Real_CV_Str01(stream(1), "CALCALMITEM", CALCALMITEM_GASDP_REALCV, "CALC1 Real_CV_Str02(stream(2), "CALCALMITEM", CALCALMITEM_GASDP_REALCV, "CALC1 Ideal_CV_Str01(stream(1), "CALCALMITEM", CALCALMITEM_GASDP_IDEALCV, "INU Ideal_CV_Str02(stream(2), "CALCALMITEM", CALCALMITEM_GASDP_IDEALCV, "INU Zb_Str01(stream(1), "CALCALMITEM", CALCALMITEM_GASDP_BASECOMPZB, "INUSE" Zb_Str02(stream(2), "CALCALMITEM", CALCALMITEM_GASDP_BASECOMPZB, "INUSE" WI_Str01(stream(1), "CALCALMITEM", CALCALMITEM_GASDP_WOBBEINDEX, "CALC1" WI_Str02(stream(2), "CALCALMITEM", CALCALMITEM_GASDP_WOBBEINDEX, "CALC1" RD_Str01(stream(1), "CALCALMITEM", CALCALMITEM_GASDP_REALRDSG, "INUSE"); RD_Str02(stream(2), "CALCALMITEM", CALCALMITEM_GASDP_REALRDSG, "INUSE");

connect connect connect connect connect connect connect connect connect connect connect connect connect connect connect "); connect "); connect SE"); connect SE"); connect ); connect ); connect ); connect ); connect connect

connect connect connect connect connect connect connect connect

dyear(0, "KPINTARR", KPINTARR_SYS_TIMEANDDATE, "0"); dmonth(0, "KPINTARR", KPINTARR_SYS_TIMEANDDATE, "1"); dday(0, "KPINTARR", KPINTARR_SYS_TIMEANDDATE, "2"); dhour(0, "KPINTARR", KPINTARR_SYS_TIMEANDDATE, "3"); dminute(0, "KPINTARR", KPINTARR_SYS_TIMEANDDATE, "4"); dsecond(0, "KPINTARR", KPINTARR_SYS_TIMEANDDATE, "5"); dloadtime(0, "KPINT", KPINT_SYS_DLOADTIMEACCEPT, "VALUE"); timeaccept (0, "KPINT", KPINT_SYS_DLOADTIMEACCEPT, "VALUE");

while (1) do

dload_year = year; dload_month = month; dload_day = day; dload_hour = hour; dload_minute = minute; dload_second = second; if time_synch = 1 then time_accept = 1; time_synch = 0; endif; if Zb_Str01 > 0.001 then Real_CV_Str01 = Ideal_CV_Str01 / Zb_Str01; Real_CV_Str02 = Real_CV_Str01; endif; if (RD_Str01 > 0.001) then WI_Str01 = Real_CV_Str01 / pow(RD_Str01, 0.5); WI_Str02 = WI_Str01; endif; wend; end;

You might also like