author | Heinz Junkes <junkes@fhi-berlin.mpg.de> |
Tue, 02 Nov 2021 13:19:46 +0100 | |
changeset 5 | 85c191e174df |
permissions | -rw-r--r-- |
5
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
1 |
record(ai, "$(P)$(R)GetRadiation_1") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
2 |
{ |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
3 |
field(DESC, "Get Radiation") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
4 |
field(DTYP, "stream") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
5 |
field(INP, "@fht.proto getRadiation(138) $(BUS)") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
6 |
field(SCAN, "1 second") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
7 |
field(EGU, "uSv/h") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
8 |
field(FLNK, "$(P)$(R)GetRadiation_1:Hour") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
9 |
} |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
10 |
|
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
11 |
record(calc, "$(P)$(R)GetRadiation_1:Add") { |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
12 |
field(INPA, "$(P)$(R)GetRadiation_1 CP NMS") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
13 |
field(INPB, "1") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
14 |
field(CALC, "B>0?VAL+A:0;B:=1") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
15 |
field(FLNK, "$(P)$(R)GetRadiation_1:Counter") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
16 |
} |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
17 |
|
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
18 |
record(calc, "$(P)$(R)GetRadiation_1:Counter") { |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
19 |
field(INPA, "$(P)$(R)GetRadiation_1:Add NPP ") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
20 |
field(CALC, "A>0?VAL+1:0") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
21 |
field(FLNK, "$(P)$(R)GetRadiation_1:SumOneHour") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
22 |
} |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
23 |
|
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
24 |
record(calc, "$(P)$(R)GetRadiation_1:SumOneHour") { |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
25 |
field(INPA, "$(P)$(R)GetRadiation_1:Add NPP ") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
26 |
field(INPB, "$(P)$(R)GetRadiation_1:Counter NPP ") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
27 |
field(CALC, "B>0?A/B:0") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
28 |
field(EGU, "uSv/h") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
29 |
} |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
30 |
|
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
31 |
record(stringin, "$(P)$(R)GetRadiation_1:Hour") { |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
32 |
field(DTYP, "Soft Timestamp") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
33 |
field(INP, "@%M") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
34 |
field(TSEL, "$(P)$(R)GetRadiation_1.TIME") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
35 |
field(FLNK, "$(P)$(R)GetRadiation_1:HourClear") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
36 |
} |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
37 |
|
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
38 |
record(calcout, "$(P)$(R)GetRadiation_1:HourClear") { |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
39 |
field(INPA, "$(P)$(R)GetRadiation_1:Hour NPP NMS") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
40 |
field(INPB, "0") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
41 |
field(CALC, "A<B?0:1;B:=A") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
42 |
field(DOPT, "Use CALC") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
43 |
field(OOPT, "When Zero") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
44 |
field(OUT, "$(P)$(R)GetRadiation_1:Add.B PP") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
45 |
} |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
46 |
|
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
47 |
|
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
48 |
record(ai, "$(P)$(R)GetRadiation_2") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
49 |
{ |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
50 |
field(DESC, "Get Radiation") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
51 |
field(DTYP, "stream") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
52 |
field(INP, "@fht.proto getRadiation(239) $(BUS)") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
53 |
field(EGU, "uSiv") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
54 |
field(SCAN, "1 second") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
55 |
field(FLNK, "$(P)$(R)GetRadiation_2:Hour") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
56 |
} |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
57 |
|
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
58 |
record(calc, "$(P)$(R)GetRadiation_2:Add") { |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
59 |
field(INPA, "$(P)$(R)GetRadiation_2 CP NMS") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
60 |
field(INPB, "1") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
61 |
field(CALC, "B>0?VAL+A:0;B:=1") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
62 |
field(FLNK, "$(P)$(R)GetRadiation_2:Counter") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
63 |
} |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
64 |
|
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
65 |
record(calc, "$(P)$(R)GetRadiation_2:Counter") { |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
66 |
field(INPA, "$(P)$(R)GetRadiation_2:Add NPP ") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
67 |
field(CALC, "A>0?VAL+1:0") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
68 |
field(FLNK, "$(P)$(R)GetRadiation_2:SumOneHour") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
69 |
} |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
70 |
|
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
71 |
record(calc, "$(P)$(R)GetRadiation_2:SumOneHour") { |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
72 |
field(INPA, "$(P)$(R)GetRadiation_2:Add NPP ") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
73 |
field(INPB, "$(P)$(R)GetRadiation_2:Counter NPP ") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
74 |
field(CALC, "B>0?A/B:0") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
75 |
field(EGU, "uSv/h") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
76 |
} |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
77 |
|
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
78 |
record(stringin, "$(P)$(R)GetRadiation_2:Hour") { |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
79 |
field(DTYP, "Soft Timestamp") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
80 |
field(INP, "@%M") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
81 |
field(TSEL, "$(P)$(R)GetRadiation_2.TIME") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
82 |
field(FLNK, "$(P)$(R)GetRadiation_2:HourClear") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
83 |
} |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
84 |
|
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
85 |
record(calcout, "$(P)$(R)GetRadiation_2:HourClear") { |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
86 |
field(INPA, "$(P)$(R)GetRadiation_2:Hour NPP NMS") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
87 |
field(INPB, "0") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
88 |
field(CALC, "A<B?0:1;B:=A") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
89 |
field(DOPT, "Use CALC") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
90 |
field(OOPT, "When Zero") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
91 |
field(OUT, "$(P)$(R)GetRadiation_2:Add.B PP") |
85c191e174df
Add Mpdbus pressure Reading
Heinz Junkes <junkes@fhi-berlin.mpg.de>
parents:
diff
changeset
|
92 |
} |