%{ /*hpf.tmc: telemetry variable definitions * $Log: hpf.tmc,v $ * Revision 1.1 2000/11/03 16:42:14 nort * Initial revision * # 10 Oct 96 nmd # new UV power on 8 bit, some flows from 12 to 8 bit, fXS on 12 bit, 3 special 12 bit # #Rev 1.5 1996/07/22 nmd # software variables # # Revision 1.4 1993/08/26 18:57:27 nmd # autorunning # # Revision 1.3 1993/07/24 21:42:14 nmd # Supports new D/A and DIGIO # # Revision 1.2 1993/07/14 16:00:05 nmd # bug fix -- missing quote on rcs log message string # # Revision 1.1 1993/07/14 15:35:11 nmd # Initial revision # */ #pragma off (unreferenced) static char hpfrcsid[] = "$Id: hpf.tmc,v 1.1 2000/11/03 16:42:14 nort Exp $"; #pragma on (unreferenced) #include "softdata.h" %} TM MAXCOLS=120; TM 0 Hz UINT MFCtr; TM 0 Hz UINT Synch; TM 1 Hz DStat HPFStat; /* System Status */ TM 1Hz DStat FlowStat; TM 1Hz DStat ValveStat1; TM 1Hz DStat ValveStat2; TM 1 Hz Ct16 Det1; /* Detector 1 counter */ TM 1 Hz Ct16 Det2; /* Detector 2 counter */ TM 1 Hz Ct16 Det3; /* Detector 3 counter */ TM 1 Hz Ct16 Det4; /* Detector 4 counter */ TM 1 Hz Ct16 Det5; /* Detector 5 counter */ TM 1 Hz Ct16 OHCell; /* OH Cell counter */ TM 1 Hz Ct16 Freq; /* Frequency counter */ TM 1 Hz Ct16 UVSig; /* UV Absorption counter */ TM 1 Hz AD12_1000TORR P_TOT; /* System pressure */ TM 1 Hz AD12_1000TORRx10 P_TOT10; /* System pressure x 10 */ TM 1 Hz AD12_1000TORR P_MAN; /* Manifold 1 (manual valves) */ TM 1 Hz AD12_1000TORR P__XS; /* Acid Manifold */ TM 1 Hz AD12_1000TORR P_NO2; /* Manifold 2 (automatic) */ TM 1 Hz AD12_1000TORR P__H2; /* Source */ TM 1 Hz AD12_DTORR P_PITOT; /* Pitot tube */ TM 1 Hz AD12_DTORRx10 P_DIF10; /* System gradient x 10 */ TM 1 Hz AD8 F___5; TM 1 Hz AD8 F__50; TM 1 Hz AD8 F_200; TM 1 Hz AD12 F_NO2; /* NO2 in OH source */ TM 1 Hz AD12 F_H2; /* H2 in OH source */ TM 1 Hz AD12 F_XSN2; /* N2 makeup for XS */ TM 1 Hz AD8 F_WHITE; /* White Cell Purge Flow */ TM 1 Hz AD12 F_XS; TM 1 Hz AD12 SPECIAL1; TM 1 Hz AD12 SPECIAL2; TM 1 Hz AD12 SPECIAL3; TM 1 Hz AD8 T_SYS; TM 1 Hz AD8 HEAT1; TM 1 Hz AD8 T_LAB; /* ÿneed T200 conversion */ TM 1 Hz AD8 HEAT2; TM 1 Hz AD8 HEAT3; TM 1 Hz AD8 HEAT4; TM 1 Hz AD8 T_XS; /* need T200 conversion */ TM 1 Hz AD8 HEAT5; TM 1 Hz AD8 HEAT6; TM 1 Hz AD8 TUV1; TM 1 Hz AD8 TUV2; TM 1 Hz AD12 LFLUX; TM 1 Hz AD8_POS POS_3; TM 1 Hz AD8 LFLUX1; TM 1 Hz AD8 LFLUX2; TM 1 Hz AD8 LFLUX3; TM 1 Hz AD8 LFLUX4; TM 1 Hz AD8 LFLUX5; TM 1 Hz AD8 LFLUX6; TM 1 Hz SINT SWEtalonPos; TM 1 Hz SINT SWEtalonLine; TM 1 Hz SINT SWEtalonTarget; TM 1 Hz SINT SWEtalonMove; TM 1 Hz SINT SWEtalonRate; TM 1 Hz SINT SWLineWidth; TM 1 Hz SINT SWStepsOffline; TM 1 Hz SINT SWPowerNormalize; TM 1 Hz SINT SWNominalPRF; TM 1 Hz SINT SWScanningCycle; TM 1 Hz SINT SWDataRecieverMessage; TM 1 Hz SINT SWPSysSet; TM 1 Hz SINT SWPGain; TM 1 Hz SINT SWPPhase; TM 1 Hz SINT SWPFCFullScale; TM 1 Hz SINT SWPFCMax; TM 1 Hz SINT SWPFCMin; TM 1 Hz AD8 FC1Set; TM 1 Hz AD8 FC2Set; TM 1 Hz AD8 FC3Set; TM 1 Hz AD8 FC4Set; TM 1 Hz AD8 FC5Set; TM 1 Hz AD8 FC6Set; TM 1 Hz AD8 FC7Set; TM 1 Hz AD8 FC8Set; TM "Receive" SWData 0; collect SWEtalonPos = SWData.etalonStep; collect SWEtalonLine = SWData.onlineStep; collect SWEtalonTarget = SWData.etalonTarget; collect SWEtalonMove = SWData.etalonMove; collect SWEtalonRate = SWData.etalonRate; collect SWLineWidth = SWData.lineWidth; collect SWStepsOffline = SWData.numStepsOffline; collect SWPowerNormalize = SWData.powerNormalize; collect SWNominalPRF = SWData.nominalPRF; collect SWScanningCycle = SWData.scanningCycle; collect SWDataRecieverMessage = SWData.dataRecieverMessage; collect SWPSysSet = SWData.pressureSetpoint; collect SWPGain = SWData.pressureGain; collect SWPPhase = SWData.pressurePhase; collect SWPFCFullScale = SWData.pressureFCFullScale; collect SWPFCMax = SWData.pressureFCMax; collect SWPFCMin = SWData.pressureFCMin; Address HPFStat 0x88A; /* DigIO 2B */ Address FlowStat 0x888; Address ValveStat1 0x868; Address ValveStat2 0x86C; Address Det1 0x600; Address Det2 0x604; Address Det3 0x610; Address Det4 0x614; Address Det5 0x620; Address OHCell 0x624; Address Freq 0x630; Address UVSig 0x634; Address P_TOT 0xC9E; Address P_TOT10 0xC84; Address P__XS 0xC80; Address P_NO2 0xC9A; Address P__H2 0xC98; Address F_WHITE 0xC1E; Address P_DIF10 0xC82; Address P_PITOT 0xC94; Address F___5 0xC1C; Address SPECIAL1 0xC92; Address SPECIAL2 0xC8C; Address SPECIAL3 0xC8E; Address P_MAN 0xC96; Address F__50 0xC1A; Address F_200 0xC18; Address F_XS 0xC90; Address F_NO2 0xC88; Address F_H2 0xC9C; Address F_XSN2 0xC86; Address T_SYS 0xC0F; Address T_XS 0xC03; Address T_LAB 0xC05; Address HEAT1 0xC0D; Address HEAT2 0xC0B; Address HEAT3 0xC1B; Address HEAT4 0xC09; Address HEAT5 0xC1D; Address HEAT6 0xC1F; Address TUV1 0xC19; Address TUV2 0xC17; Address POS_3 0xC15; Address LFLUX 0xC8A; Address LFLUX1 0xC0E; Address LFLUX2 0xC0C; Address LFLUX3 0xC0A; Address LFLUX4 0xC08; Address LFLUX5 0xC06; Address LFLUX6 0xC04; Address FC1Set 0xE40; Address FC2Set 0xE42; Address FC3Set 0xE44; Address FC4Set 0xE46; Address FC5Set 0xE50; Address FC6Set 0xE52; Address FC7Set 0xE54; Address FC8Set 0xE56; Group Counters ( Det1, Det2, Det3, Det4, Det5, OHCell, Freq, UVSig ){ sbwr(0x60E,0); Det1=sbw(Det1.address); Det2=sbw(Det2.address); Det3=sbw(Det3.address); Det4=sbw(Det4.address); Det5=sbw(Det5.address); OHCell=sbw(OHCell.address); Freq=sbw(Freq.address); UVSig=sbw(UVSig.address); }