bernardo/ISTTOK
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

added Inficon gauges

Browse Source 
Signed-off-by: Bernardo Carvalho <bernardo.carvalho@tecnico.ulisboa.pt>
This commit is contained in:
Bernardo Carvalho
2024-12-11 17:00:23 +00:00
parent 0ea59f7cfe
commit 17bab67ce7
7 changed files with 177 additions and 106 deletions
Download Patch File Download Diff File Expand all files Collapse all files

161
epics/iocs/ISTTOKrpi/ISTTOKrpiApp/Db/ISTTOKpfeiffer.db
View File

@@ -2,47 +2,49 @@
# 8/5/2021 Only sensor 2 is working. Running with dspIC
# 20/9/2021 sensors 1,2,3 are working. Running with dspIC
# 20/9/2021 sensors 1,2,3 are working. Running with tty USB
record (longin, "$(P)$(R)P001:M")
{
field (DESC, "getPressure001 $(bus)")
field (DTYP, "stream")
field (INP, "@pfeiffer.proto getPressure001($(P)$(R)P001:E) $(bus)")
# 11/12/2024 replaced with Inficon Probes
#record (longin, "$(P)$(R)P001:M")
#{
# field (DESC, "getPressure001 $(bus)")
# field (DTYP, "stream")
# field (INP, "@pfeiffer.proto getPressure001($(P)$(R)P001:E) $(bus)")
# field (SCAN, "I/O Intr")
field (SCAN, "1 second")
field(PHAS, "1")
field (FLNK, "$(P)$(R)VVessel-Pressure")
}
record (longin, "$(P)$(R)P001:E")
{
field (DESC, "Pressure001 exponent $(bus)")
}
record (calc, "$(P)$(R)VVessel-Pressure")
{
field (DESC, "ISTTOK:central:VVessel-Pressure")
# Maximize Status and Severity, MSS propagate all alarms
field(INPA, "$(P)$(R)P001:M MSS")
field(INPB, "$(P)$(R)P001:E")
field(CALC, "(A*0.001)* 10.0**(B-20)")
field(PREC, "3")
field(EGU, "mBar")
field(HIHI,"1.0e-2")
field(HIGH,"1.0e-3")
field(LOW,"1.0e-9")
field(LOLO,"0.5e-9")
# field (SCAN, "1 second")
# field(PHAS, "1")
# field (FLNK, "$(P)$(R)VVessel-Pressure")
#}
#record (longin, "$(P)$(R)P001:E")
#{
# field (DESC, "Pressure001 exponent $(bus)")
#}
#record (ao, "$(P)$(R)VVessel-Pressure")
#{
# field (DESC, "ISTTOK:central:VVessel-Pressure")
#
# field(VAL,"2.0E-9")
# # Maximize Status and Severity, MSS propagate all alarms
# field(INPA, "$(P)$(R)P001:M MSS")
# field(INPB, "$(P)$(R)P001:E")
# field(CALC, "(A*0.001)* 10.0**(B-20)")
# field(PREC, "3")
# field(EGU, "mBar")
# field(HIHI,"1.0e-2")
# field(HIGH,"1.0e-3")
# field(LOW,"1.0e-9")
# field(LOLO,"0.5e-9")
# field(LOW, "20.0")
# field(LOLO,"0.0")
field(HHSV,"MAJOR")
field(HSV, "MINOR")
field(LSV, "MINOR")
field(LLSV,"MAJOR")
}
# field(HHSV,"MAJOR")
# field(HSV, "MINOR")
# field(LSV, "MINOR")
# field(LLSV,"MAJOR")
#}
# out "0020074002=?107";
record (longin, "$(P)$(R)P002:M")
{
field (DESC, "getPressure002 $(bus)")
field (DTYP, "stream")
field (INP, "@pfeiffer.proto getPressure002($(P)$(R)P002:E) $(bus)")
# field (SCAN, "I/O Intr")
field (SCAN, "1 second")
field(PHAS, "0")
field (FLNK, "$(P)$(R)RPump1-Pressure")
@@ -69,74 +71,43 @@ record (calc, "$(P)$(R)RPump1-Pressure")
# field(LLSV,"MAJOR")
}
# out "0030074002=?108";
record (longin, "$(P)$(R)P003:M")
{
field (DESC, "getPressure003 Mantissa $(bus)")
field (DTYP, "stream")
field (INP, "@pfeiffer.proto getPressure003($(P)$(R)P003:E) $(bus)")
field (SCAN, "1 second")
field(PHAS, "2")
# # out "0030074002=?108";
#record (longin, "$(P)$(R)P003:M")
#{
# field (DESC, "getPressure003 Mantissa $(bus)")
# field (DTYP, "stream")
# field (INP, "@pfeiffer.proto getPressure003($(P)$(R)P003:E) $(bus)")
# field (SCAN, "1 second")
# field(PHAS, "2")
# field (SCAN, "I/O Intr")
field (FLNK, "$(P)$(R)TMPump1-PressureAdmission")
}
# field (FLNK, "$(P)$(R)TMPump1-PressureAdmission")
#}
record (longin, "$(P)$(R)P003:E")
{
field (DESC, "Pressure003 Exponent $(bus)")
}
record (calc, "$(P)$(R)TMPump1-PressureAdmission")
{
field(DESC, "ISTTOK:central:TMPump1-PressureAdmission")
field(INPA, "$(P)$(R)P003:M MSS")
field(INPB, "$(P)$(R)P003:E")
field(CALC, "(A*0.001)*10.0**(B-20)")
field(PREC, "3")
field(EGU, "mBar")
field(HIHI,"1.0e-1")
field(HIGH,"1.0e-2")
field(LOW,"1.0e-9")
field(LOLO,"0.5e-9")
field(HHSV,"MAJOR")
field(HSV, "MINOR")
field(LSV, "MINOR")
field(LLSV,"MAJOR")
}
#record (longin, "$(P)$(R)P003:E")
#{
# field (DESC, "Pressure003 Exponent $(bus)")
#}
#
#record (calc, "$(P)$(R)TMPump1-PressureAdmission")
#{
# field(DESC, "ISTTOK:central:TMPump1-PressureAdmission")
# field(INPA, "$(P)$(R)P003:M MSS")
# field(INPB, "$(P)$(R)P003:E")
# field(CALC, "(A*0.001)*10.0**(B-20)")
# field(PREC, "3")
# field(EGU, "mBar")
# field(HIHI,"1.0e-1")
# field(HIGH,"1.0e-2")
# field(LOW,"1.0e-9")
# field(LOLO,"0.5e-9")
# field(HHSV,"MAJOR")
# field(HSV, "MINOR")
# field(LSV, "MINOR")
# field(LLSV,"MAJOR")
#}
# out "0040074002=?109";
# NOT connected 26/10/2021
record (longin, "$(P)$(R)P004:M")
{
field (DESC, "getPressure004 Mantissa $(bus)")
field (DTYP, "stream")
field (INP, "@pfeiffer.proto getPressure004($(P)$(R)P004:E) $(bus)")
# field (SCAN, "1 second")
# field (SCAN, "I/O Intr")
field (FLNK, "$(P)$(R)RPump2-Pressure")
}
record (longin, "$(P)$(R)P004:E")
{
field (DESC, "Pressure004 Exponent $(bus)")
}
record (calc, "$(P)$(R)RPump2-Pressure")
{
field(DESC, "ISTTOK:central:RPump2-Pressure")
field(INPA, "$(P)$(R)P004:M MSS")
field(INPB, "$(P)$(R)P004:E")
field(CALC, "(A*0.001)* 10.0**(B-20)")
field(PREC, "3")
field(EGU, "mBar")
# field(HIHI,"1.0e-1")
# field(HIGH,"5.0e-3")
# field(LOW, "20.0")
# field(LOLO,"0.0")
# field(HHSV,"MAJOR")
# field(HSV, "MINOR")
# field(LSV, "MINOR")
# field(LLSV,"MAJOR")
}
record(stringout,"$(P)$(R)RS485Debug") {
field(DESC, "")