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

Moved pfeiffer sensors to central IOC. MSS fields where added

Browse Source
This commit is contained in:
Bernardo Carvalho
2021-12-15 00:33:46 +00:00
parent 01cb2eec4e
commit a055c01789
8 changed files with 282 additions and 261 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
epics/iocs/ISTTOKrpi/ISTTOKrpiApp/Db/ISTTOKmachineControl.db
View File

@@ -27,7 +27,8 @@ record(bo, "$(P)$(R)TMPump1-ControllerOn" ) {
field(ZNAM, "Off" ) field(ZNAM, "Off" )
field(ONAM, "Pulse" ) field(ONAM, "Pulse" )
field(HIGH, "2.5") field(HIGH, "2.5")
field(FLNK, "$(P)$(R)TMPump1-ControllerOnInv" ) # Disabled until further notice
# field(FLNK, "$(P)$(R)TMPump1-ControllerOnInv" )
field(VAL,"0") field(VAL,"0")
} }
record(calcout, "$(P)$(R)TMPump1-ControllerOnInv") { record(calcout, "$(P)$(R)TMPump1-ControllerOnInv") {
@@ -43,7 +44,8 @@ record(bo, "$(P)$(R)TMPump1-ControllerOff" ) {
field(ZNAM, "Off" ) field(ZNAM, "Off" )
field(ONAM, "Pulse" ) field(ONAM, "Pulse" )
field(HIGH, "2.5") field(HIGH, "2.5")
field(FLNK, "$(P)$(R)TMPump1-ControllerOffInv" ) # Disabled until further notice
# field(FLNK, "$(P)$(R)TMPump1-ControllerOffInv" )
field(VAL,"0") field(VAL,"0")
} }

2
epics/iocs/ISTTOKrpi/ISTTOKrpiApp/Db/ISTTOKpcf8591.db
View File

@@ -94,6 +94,8 @@ record(ai, "$(P)$(R)Shot-TorPSCurrentImage" ) {
field(DTYP, "Raw Soft Channel" ) field(DTYP, "Raw Soft Channel" )
field(INP, "$(P)$(R)PCF8591:72:BYTE2_CH3 PP NMS") field(INP, "$(P)$(R)PCF8591:72:BYTE2_CH3 PP NMS")
field(SCAN, ".2 second") field(SCAN, ".2 second")
#Scan Disable Input Link Value
field(DISA, "1")
field(ASLO, "39.215686275" ) field(ASLO, "39.215686275" )
field(AOFF, "0.0" ) field(AOFF, "0.0" )
field(EGU, "A" ) field(EGU, "A" )

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

@@ -1,121 +1,126 @@
# vim: sta:et:sw=4:ts=4:sts=4
# 8/5/2021 Only sensor 2 is working. Running with dspIC # 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 dspIC
# 20/9/2021 sensors 1,2,3 are working. Running with tty USB # 20/9/2021 sensors 1,2,3 are working. Running with tty USB
record (longin, "$(P)$(R)P001:M") record (longin, "$(P)$(R)P001:M")
{ {
field (DESC, "getPressure001 $(bus)") field (DESC, "getPressure001 $(bus)")
field (DTYP, "stream") field (DTYP, "stream")
field (INP, "@pfeiffer.proto getPressure001($(P)$(R)P001:E) $(bus)") field (INP, "@pfeiffer.proto getPressure001($(P)$(R)P001:E) $(bus)")
# field (SCAN, "I/O Intr") # field (SCAN, "I/O Intr")
field (SCAN, "1 second") field (SCAN, "1 second")
field (FLNK, "$(P)$(R)TMPump1-PressureAdmission") field(PHAS, "1")
field (FLNK, "$(P)$(R)TMPump1-PressureAdmission")
} }
record (longin, "$(P)$(R)P001:E") record (longin, "$(P)$(R)P001:E")
{ {
field (DESC, "Pressure001 exponent $(bus)") field (DESC, "Pressure001 exponent $(bus)")
} }
record (calc, "$(P)$(R)TMPump1-PressureAdmission") record (calc, "$(P)$(R)TMPump1-PressureAdmission")
{ {
field(DESC, "ISTTOK:central:TMPump1-PressureAdmission") field(DESC, "ISTTOK:central:TMPump1-PressureAdmission")
field(INPA, "$(P)$(R)P001:M") # Maximize Status and Severity, MSS propagate all alarms
field(INPB, "$(P)$(R)P001:E") field(INPA, "$(P)$(R)P001:M MSS")
field(CALC, "(A*0.001)* 10.0**(B-20)") field(INPB, "$(P)$(R)P001:E")
field(PREC, "3") field(CALC, "(A*0.001)* 10.0**(B-20)")
field(EGU, "mBar") field(PREC, "3")
field(HIHI,"1.0e-2") field(EGU, "mBar")
field(HIGH,"1.0e-3") field(HIHI,"1.0e-2")
field(HIGH,"1.0e-3")
# field(LOW, "20.0") # field(LOW, "20.0")
# field(LOLO,"0.0") # field(LOLO,"0.0")
field(HHSV,"MAJOR") field(HHSV,"MAJOR")
field(HSV, "MINOR") field(HSV, "MINOR")
# field(LSV, "MINOR") # field(LSV, "MINOR")
# field(LLSV,"MAJOR") # field(LLSV,"MAJOR")
} }
# out "0020074002=?107"; # out "0020074002=?107";
record (longin, "$(P)$(R)P002:M") record (longin, "$(P)$(R)P002:M")
{ {
field (DESC, "getPressure002 $(bus)") field (DESC, "getPressure002 $(bus)")
field (DTYP, "stream") field (DTYP, "stream")
field (INP, "@pfeiffer.proto getPressure002($(P)$(R)P002:E) $(bus)") field (INP, "@pfeiffer.proto getPressure002($(P)$(R)P002:E) $(bus)")
# field (SCAN, "I/O Intr") # field (SCAN, "I/O Intr")
field (SCAN, "1 second") field (SCAN, "1 second")
field (FLNK, "$(P)$(R)RPump1-Pressure") field(PHAS, "0")
field (FLNK, "$(P)$(R)RPump1-Pressure")
} }
record (longin, "$(P)$(R)P002:E") record (longin, "$(P)$(R)P002:E")
{ {
field (DESC, "Pressure002 exponent $(bus)") field (DESC, "Pressure002 exponent $(bus)")
} }
record (calc, "$(P)$(R)RPump1-Pressure") record (calc, "$(P)$(R)RPump1-Pressure")
{ {
field (DESC, "ISTTOK:central:RPump1-Pressure") field (DESC, "ISTTOK:central:RPump1-Pressure")
field(INPA, "$(P)$(R)P002:M") field(INPA, "$(P)$(R)P002:M MSS")
field(INPB, "$(P)$(R)P002:E") field(INPB, "$(P)$(R)P002:E")
field(CALC, "(A*0.001)*10.0**(B-20)") field(CALC, "(A*0.001)*10.0**(B-20)")
field(PREC, "3") field(PREC, "3")
field(EGU, "mBar") field(EGU, "mBar")
field(HIHI,"1.0e-1") field(HIHI,"1.0e-1")
field(HIGH,"5.0e-2") field(HIGH,"5.0e-2")
# field(LOW, "20.0") # field(LOW, "20.0")
# field(LOLO,"0.0") # field(LOLO,"0.0")
field(HHSV,"MAJOR") field(HHSV,"MAJOR")
field(HSV, "MINOR") field(HSV, "MINOR")
# field(LSV, "MINOR") # field(LSV, "MINOR")
# field(LLSV,"MAJOR") # field(LLSV,"MAJOR")
} }
# out "0030074002=?108"; # out "0030074002=?108";
record (longin, "$(P)$(R)P003:M") record (longin, "$(P)$(R)P003:M")
{ {
field (DESC, "getPressure003 Mantissa $(bus)") field (DESC, "getPressure003 Mantissa $(bus)")
field (DTYP, "stream") field (DTYP, "stream")
field (INP, "@pfeiffer.proto getPressure003($(P)$(R)P003:E) $(bus)") field (INP, "@pfeiffer.proto getPressure003($(P)$(R)P003:E) $(bus)")
field (SCAN, "1 second") field (SCAN, "1 second")
# field (SCAN, "I/O Intr") field(PHAS, "2")
field (FLNK, "$(P)$(R)VVessel-Pressure") # field (SCAN, "I/O Intr")
field (FLNK, "$(P)$(R)VVessel-Pressure")
} }
record (longin, "$(P)$(R)P003:E") record (longin, "$(P)$(R)P003:E")
{ {
field (DESC, "Pressure003 Exponent $(bus)") field (DESC, "Pressure003 Exponent $(bus)")
} }
record (calc, "$(P)$(R)VVessel-Pressure") record (calc, "$(P)$(R)VVessel-Pressure")
{ {
field (DESC, "ISTTOK:central:VVessel-Pressure") field (DESC, "ISTTOK:central:VVessel-Pressure")
field(INPA, "$(P)$(R)P003:M") field(INPA, "$(P)$(R)P003:M MSS")
field(INPB, "$(P)$(R)P003:E") field(INPB, "$(P)$(R)P003:E")
field(CALC, "(A*0.001)*10.0**(B-20)") field(CALC, "(A*0.001)*10.0**(B-20)")
field(PREC, "3") field(PREC, "3")
field(EGU, "mBar") field(EGU, "mBar")
field(HIHI,"1.0e-1") field(HIHI,"1.0e-1")
field(HIGH,"1.0e-2") field(HIGH,"1.0e-2")
field(HHSV,"MAJOR") field(HHSV,"MAJOR")
field(HSV, "MINOR") field(HSV, "MINOR")
} }
# out "0040074002=?109"; # out "0040074002=?109";
# NOT connected 26/10/2021 # NOT connected 26/10/2021
record (longin, "$(P)$(R)P004:M") record (longin, "$(P)$(R)P004:M")
{ {
field (DESC, "getPressure004 Mantissa $(bus)") field (DESC, "getPressure004 Mantissa $(bus)")
field (DTYP, "stream") field (DTYP, "stream")
field (INP, "@pfeiffer.proto getPressure004($(P)$(R)P004:E) $(bus)") field (INP, "@pfeiffer.proto getPressure004($(P)$(R)P004:E) $(bus)")
# field (SCAN, "1 second") # field (SCAN, "1 second")
# field (SCAN, "I/O Intr") # field (SCAN, "I/O Intr")
field (FLNK, "$(P)$(R)RPump2-Pressure") field (FLNK, "$(P)$(R)RPump2-Pressure")
} }
record (longin, "$(P)$(R)P004:E") record (longin, "$(P)$(R)P004:E")
{ {
field (DESC, "Pressure004 Exponent $(bus)") field (DESC, "Pressure004 Exponent $(bus)")
} }
record (calc, "$(P)$(R)RPump2-Pressure") record (calc, "$(P)$(R)RPump2-Pressure")
{ {
field(DESC, "ISTTOK:central:RPump2-Pressure") field(DESC, "ISTTOK:central:RPump2-Pressure")
field(INPA, "$(P)$(R)P004:M") field(INPA, "$(P)$(R)P004:M MSS")
field(INPB, "$(P)$(R)P004:E") field(INPB, "$(P)$(R)P004:E")
field(CALC, "(A*0.001)* 10.0**(B-20)") field(CALC, "(A*0.001)* 10.0**(B-20)")
field(PREC, "3") field(PREC, "3")
field(EGU, "mBar") field(EGU, "mBar")
# field(HIHI,"1.0e-1") # field(HIHI,"1.0e-1")
# field(HIGH,"5.0e-3") # field(HIGH,"5.0e-3")
# field(LOW, "20.0") # field(LOW, "20.0")
@@ -123,13 +128,13 @@ record (calc, "$(P)$(R)RPump2-Pressure")
# field(HHSV,"MAJOR") # field(HHSV,"MAJOR")
# field(HSV, "MINOR") # field(HSV, "MINOR")
# field(LSV, "MINOR") # field(LSV, "MINOR")
# field(LLSV,"MAJOR") # field(LLSV,"MAJOR")
} }
record(stringout,"$(P)$(R)RS485Debug") { record(stringout,"$(P)$(R)RS485Debug") {
field(DESC, "") field(DESC, "")
field(DTYP, "stream") field(DTYP, "stream")
field(OUT, "@pfeiffer.proto debug $(bus)") field(OUT, "@pfeiffer.proto debug $(bus)")
field(VAL,"") field(VAL,"")
} }

363
epics/iocs/ISTTOKrpi/ISTTOKrpiApp/Db/ISTTOKstates.db
View File

@@ -1,3 +1,4 @@
# vim: sta:et:sw=4:ts=4:sts=4
# #
# Project : ISTTOK slow Control # Project : ISTTOK slow Control
# #
@@ -13,257 +14,267 @@
## ##
record(mbbi, "$(P)$(R)OPSTATE") { record(mbbi, "$(P)$(R)OPSTATE") {
field(DESC, "Multiple Pulse Sequence State") field(DESC, "Multiple Pulse Sequence State")
field(ZRVL, "0") field(ZRVL, "0")
field(ONVL, "1") field(ONVL, "1")
field(TWVL, "2") field(TWVL, "2")
field(THVL, "3") field(THVL, "3")
field(FRVL, "4") field(FRVL, "4")
field(FVVL, "5") field(FVVL, "5")
field(SXVL, "6") field(SXVL, "6")
field(SVVL, "7") field(SVVL, "7")
field(ZRST, "Stopped") field(ZRST, "Stopped")
field(ONST, "Starting") field(ONST, "Starting")
field(TWST, "Idle") field(TWST, "Idle")
field(THST, "Clean") field(THST, "Clean")
field(FRST, "WaitShot") field(FRST, "WaitShot")
field(FVST, "Stopping") field(FVST, "Stopping")
field(SXST, "Emergency") field(SXST, "Emergency")
field(SVST, "UPSEmergency") field(SVST, "UPSEmergency")
field(VAL, "0") field(VAL, "0")
field(FLNK, "$(P)$(R)OPCALCSTATE")
#field(PINI, "YES")
} }
record(mbbo, "$(P)$(R)LASTOPSTATE") { record(mbbo, "$(P)$(R)LASTOPSTATE") {
info(autosaveFields, "VAL") info(autosaveFields, "VAL")
field(DESC, "Pulse Sequence Last Saved State") field(DESC, "Pulse Sequence Last Saved State")
field(ZRVL, "0") field(ZRVL, "0")
field(ONVL, "1") field(ONVL, "1")
field(TWVL, "2") field(TWVL, "2")
field(THVL, "3") field(THVL, "3")
field(FRVL, "4") field(FRVL, "4")
field(FVVL, "5") field(FVVL, "5")
field(SXVL, "6") field(SXVL, "6")
field(SVVL, "7") field(SVVL, "7")
field(ZRST, "Stopped") field(ZRST, "Stopped")
field(ONST, "Starting") field(ONST, "Starting")
field(TWST, "Idle") field(TWST, "Idle")
field(THST, "Clean") field(THST, "Clean")
field(FRST, "WaitShot") field(FRST, "WaitShot")
field(FVST, "Stopping") field(FVST, "Stopping")
field(SXST, "Emergency") field(SXST, "Emergency")
field(SVST, "UPSEmergency") field(SVST, "UPSEmergency")
# field(VAL, "0") field(PINI, "YES")
# field(VAL, "0")
} }
# record for bit leds
record(calc, "$(P)$(R)OPCALCSTATE") { record(calc, "$(P)$(R)OPCALCSTATE") {
field(DESC, "Pulse Calculated State") field(DESC, "Pulse Calculated State")
field(CALC,"2^A") field(CALC,"2^A")
field(SCAN,"1 second") #field(SCAN,"1 second")
field(INPA,"$(P)$(R)OPSTATE.VAL PP NMS") field(INPA,"$(P)$(R)OPSTATE.VAL NPP NMS")
} }
record(calc, "$(P)$(R)STARTCALCSTATE") { record(calc, "$(P)$(R)STARTCALCSTATE") {
field(DESC, "Start Calculated State") field(DESC, "Start Calculated State")
field(CALC,"2^A") field(CALC,"2^A")
field(SCAN,"1 second") field(SCAN,"1 second")
field(INPA,"$(P)$(R)STARTINGSTATE.VAL PP NMS") field(INPA,"$(P)$(R)STARTINGSTATE.VAL PP NMS")
} }
record(calc, "$(P)$(R)STOPPINGCALCSTATE") { record(calc, "$(P)$(R)STOPPINGCALCSTATE") {
field(DESC, "Stop Calculated State") field(DESC, "Stop Calculated State")
field(CALC,"2^A") field(CALC,"2^A")
field(SCAN,"1 second") field(SCAN,"1 second")
field(INPA,"$(P)$(R)STOPPINGSTATE.VAL PP NMS") field(INPA,"$(P)$(R)STOPPINGSTATE.VAL PP NMS")
} }
record(calc, "$(P)$(R)CLEANCALCSTATE") { record(calc, "$(P)$(R)CLEANCALCSTATE") {
field(DESC, "Clean Automatic Calculated State") field(DESC, "Clean Automatic Calculated State")
field(CALC,"(2^(A+1))-1") field(CALC,"(2^(A+1))-1")
field(SCAN,"1 second") field(SCAN,"1 second")
field(INPA,"$(P)$(R)CLEANINGSTATE.VAL PP NMS") field(INPA,"$(P)$(R)CLEANINGSTATE.VAL PP NMS")
} }
record(calc, "$(P)$(R)WSHOTCALCSTATE") { record(calc, "$(P)$(R)WSHOTCALCSTATE") {
field(DESC, "WaitShot Calculated State") field(DESC, "WaitShot Calculated State")
field(CALC,"2^A") field(CALC,"2^A")
field(SCAN,"1 second") field(SCAN,"1 second")
field(INPA,"$(P)$(R)WSHOTINGSTATE.VAL PP NMS") field(INPA,"$(P)$(R)WSHOTINGSTATE.VAL PP NMS")
} }
#record(ai, "$(P)$(R)Temperature_0") { #record(ai, "$(P)$(R)Temperature_0") {
# field(DESC, "ISTTOK Temperature 0 Calculated") # field(DESC, "ISTTOK Temperature 0 Calculated")
# field(EGU, "C") # field(EGU, "C")
# field(SCAN,"1 second") # field(SCAN,"1 second")
#} #}
record(bo, "$(P)$(R)UPS-OnBattery") { record(bo, "$(P)$(R)UPS-OnBattery") {
info(autosaveFields, "VAL STAT") info(autosaveFields, "VAL STAT")
field(DESC, "Main APC UPS On Battery status") field(DESC, "Main APC UPS On Battery status")
field(VAL, "0") field(VAL, "0")
field(ZNAM, "OFF") field(ZNAM, "OFF")
field(ONAM, "ON") field(ONAM, "ON")
field(OSV, "MAJOR") field(OSV, "MAJOR")
} }
record(bo, "$(P)$(R)UPS-Shutdown") { record(bo, "$(P)$(R)UPS-Shutdown") {
info(autosaveFields, "VAL STAT") info(autosaveFields, "VAL STAT")
field(DESC, "Main APC UPS Shutdown request") field(DESC, "Main APC UPS Shutdown request")
# field(VAL, "0") # field(VAL, "0")
field(ZNAM, "OFF") field(ZNAM, "OFF")
field(ONAM, "ON") field(ONAM, "ON")
field(OSV, "MAJOR") field(OSV, "MAJOR")
field(PINI, "YES")
} }
record(bo, "$(P)$(R)OPREQ") { record(bo, "$(P)$(R)OPREQ") {
info(autosaveFields, "VAL") info(autosaveFields, "VAL")
field(DESC, "Pulse Sequence Start/Stop") field(DESC, "Pulse Sequence Start/Stop")
# field(VAL, "0") # field(VAL, "0")
field(ZNAM, "STOP") field(PINI, "YES")
field(ONAM, "START") field(ZNAM, "STOP")
field(ONAM, "START")
} }
record(bo, "$(P)$(R)CLEANINGMANMODE") { record(bo, "$(P)$(R)CLEANINGMANMODE") {
info(autosaveFields, "VAL") info(autosaveFields, "VAL")
field(DESC, "Cleaning Manual/Auto") field(DESC, "Cleaning Manual/Auto")
info(autosaveFields, "VAL") info(autosaveFields, "VAL")
# field(VAL, "1") # field(VAL, "1")
field(ZNAM, "M") field(ZNAM, "M")
field(ONAM, "A") field(ONAM, "A")
} }
record(bo, "$(P)$(R)FSTriggerStart") { record(bo, "$(P)$(R)FSTriggerStart") {
field(DESC, "FireSignal Trigger Start") field(DESC, "FireSignal Trigger Start")
field(VAL, "0") field(VAL, "0")
field(ZNAM, "STOP") field(PINI, "YES")
field(ONAM, "START") field(ZNAM, "STOP")
field(ONAM, "START")
} }
record(bo, "$(P)$(R)PROCESS-MODE") { record(bo, "$(P)$(R)PROCESS-MODE") {
info(autosaveFields, "VAL") info(autosaveFields, "VAL")
field(DESC, "Plasma Process Mode") field(DESC, "Plasma Process Mode")
#field(VAL, "0") #field(VAL, "0")
field(ZNAM, "CLEAN") field(PINI, "YES")
field(ONAM, "SHOT") field(ZNAM, "CLEAN")
field(ONAM, "SHOT")
} }
record(bo, "$(P)$(R)PROCESS-REQ") { record(bo, "$(P)$(R)PROCESS-REQ") {
field(DESC, "Plasma Process sub-states Start/Stop") field(DESC, "Plasma Process sub-states Start/Stop")
field(VAL, "0") field(VAL, "0")
field(ZNAM, "STOP") field(PINI, "YES")
field(ONAM, "START") field(ZNAM, "STOP")
field(ONAM, "START")
} }
record(bo, "$(P)$(R)AUTHORISATION") { record(bo, "$(P)$(R)AUTHORISATION") {
field(DESC, "Pulse Sequence Authorisation Start/Abort") field(DESC, "Pulse Sequence Authorisation Start/Abort")
field(ZNAM, "ABORT") field(ZNAM, "ABORT")
field(ONAM, "START") field(ONAM, "START")
field(VAL, "0") field(VAL, "0")
} }
record(longout, "$(P)$(R)PULSE-NUMBER") { record(longout, "$(P)$(R)PULSE-NUMBER") {
info(autosaveFields, "VAL") info(autosaveFields, "VAL")
field(DESC, "Pulse Number") field(DESC, "Pulse Number")
field(PINI, "YES")
} }
record(calc, "$(P)$(R)COUNTDOWN") { record(calc, "$(P)$(R)COUNTDOWN") {
field(DESC, "Countdown Increment") field(DESC, "Countdown Increment")
field(INPA,"$(P)$(R)COUNTDOWN") field(INPA,"$(P)$(R)COUNTDOWN")
field(SCAN,"Passive") field(SCAN,"Passive")
field(CALC,"A+1") field(CALC,"A+1")
field(VAL, "160") field(VAL, "160")
} }
record(calc, "$(P)$(R)COUNTER") { record(calc, "$(P)$(R)COUNTER") {
field(DESC, "0.1 s counter") field(DESC, "0.1 s counter")
field(INPA, "$(P)$(R)COUNTER") field(INPA, "$(P)$(R)COUNTER")
field(SCAN, ".1 second") field(SCAN, ".1 second")
field(CALC, "A + .1") field(CALC, "A + .1")
} }
record(stringin, "$(P)$(R)CurrentTime") { record(stringin, "$(P)$(R)CurrentTime") {
field(DESC, "Current Date and Time of the IOC") field(DESC, "Current Date and Time of the IOC")
field(SCAN, "1 second") field(SCAN, "1 second")
field(DTYP, "Soft Timestamp") field(DTYP, "Soft Timestamp")
field(PINI, "YES") #field(PINI, "YES")
field(INP, "@%d/%m/%Y %H:%M:%S") field(INP, "@%d/%m/%Y %H:%M:%S")
} }
record(stringout, "$(P)$(R)TraceMessage") { record(stringout, "$(P)$(R)TraceMessage") {
field(DESC, "Trace Message from IOC") field(DESC, "Trace Message from IOC")
field(VAL, "Trace mode ON") field(VAL, "Trace mode ON")
} }
record(stringout, "$(P)$(R)LogMessage") { record(stringout, "$(P)$(R)LogMessage") {
field(DESC, "Log Message ") field(DESC, "Log Message ")
# field(VAL, "Trace mode ON") # field(VAL, "Trace mode ON")
} }
record(mbbi, "$(P)$(R)STARTINGSTATE") { record(mbbi, "$(P)$(R)STARTINGSTATE") {
field(DESC, "Starting State Sequence") field(DESC, "Starting State Sequence")
field(ZRVL, "0") field(ZRVL, "0")
field(ONVL, "1") field(ONVL, "1")
field(TWVL, "2") field(TWVL, "2")
field(THVL, "3") field(THVL, "3")
field(FRVL, "4") field(FRVL, "4")
field(FVVL, "5") field(FVVL, "5")
field(ZRST, "NonStarting") field(ZRST, "NonStarting")
field(ONST, "Starting1") field(ONST, "Starting1")
field(TWST, "WaitManV") field(TWST, "WaitManV")
field(THST, "WaitPress") field(THST, "WaitPress")
field(FRST, "WaitTMP") field(FRST, "WaitTMP")
field(FVST, "StartEnd") field(FVST, "StartEnd")
field(VAL, "0") field(VAL, "0")
} }
record(mbbi, "$(P)$(R)CLEANINGSTATE") { record(mbbi, "$(P)$(R)CLEANINGSTATE") {
field(DESC, "Cleaning State Sequence") field(DESC, "Cleaning State Sequence")
field(ZRVL, "0") field(ZRVL, "0")
field(ONVL, "1") field(ONVL, "1")
field(TWVL, "2") field(TWVL, "2")
field(THVL, "3") field(THVL, "3")
field(FRVL, "4") field(FRVL, "4")
field(FVVL, "5") field(FVVL, "5")
field(ZRST, "NonCleaning") field(ZRST, "NonCleaning")
field(ONST, "Cleaning1") field(ONST, "Cleaning1")
field(TWST, "Cleaning2") field(TWST, "Cleaning2")
field(THST, "Cleaning3") field(THST, "Cleaning3")
field(FRST, "Cleaning4") field(FRST, "Cleaning4")
field(FVST, "Cleaning5") field(FVST, "Cleaning5")
field(VAL, "0") field(VAL, "0")
} }
record(mbbi, "$(P)$(R)WSHOTINGSTATE") { record(mbbi, "$(P)$(R)WSHOTINGSTATE") {
field(DESC, "Plasma Shot State Sequence") field(DESC, "Plasma Shot State Sequence")
field(ZRVL, "0") field(ZRVL, "0")
field(ONVL, "1") field(ONVL, "1")
field(TWVL, "2") field(TWVL, "2")
field(THVL, "3") field(THVL, "3")
field(FRVL, "4") field(FRVL, "4")
field(FVVL, "5") field(FVVL, "5")
field(SXVL, "6") field(SXVL, "6")
field(SVVL, "7") field(SVVL, "7")
field(EIVL, "8") field(EIVL, "8")
field(NIVL, "9") field(NIVL, "9")
field(TEVL, "10") field(TEVL, "10")
field(ELVL, "11") field(ELVL, "11")
field(TVVL, "12") field(TVVL, "12")
field(TTVL, "13") field(TTVL, "13")
field(ZRST, "NonShooting") field(ZRST, "NonShooting")
field(ONST, "ShotWTrig") field(ONST, "ShotWTrig")
field(TWST, "Shooting2") field(TWST, "Shooting2")
field(THST, "Shooting3") field(THST, "Shooting3")
field(FRST, "Shooting4") field(FRST, "Shooting4")
field(FVST, "Shooting5") field(FVST, "Shooting5")
field(SXST, "Shooting6") field(SXST, "Shooting6")
field(SVST, "Shooting7") field(SVST, "Shooting7")
field(EIST, "Shooting8") field(EIST, "Shooting8")
field(NIST, "Shooting9") field(NIST, "Shooting9")
field(TEST, "Shooting10") field(TEST, "Shooting10")
field(ELST, "Shooting11") field(ELST, "Shooting11")
field(TVST, "Shooting12") field(TVST, "Shooting12")
field(TTST, "ShotEnd") field(TTST, "ShotEnd")
field(VAL, "0") field(VAL, "0")
} }
record(mbbi, "$(P)$(R)STOPPINGSTATE") { record(mbbi, "$(P)$(R)STOPPINGSTATE") {

10
epics/iocs/ISTTOKrpi/ISTTOKrpiApp/Db/pfeiffer.proto
View File

@@ -1,18 +1,18 @@
Terminator=CR; Terminator = CR;
inTerminator = CR;
# CR and LF are control characters, respectively coded 0x0D (13 decimal) and 0x0A (10 decimal) # CR and LF are control characters, respectively coded 0x0D (13 decimal) and 0x0A (10 decimal)
# CR and LF are control characters, respectively coded 0x0D (13 decimal) and 0x0A (10 decimal) MaxInput = 20;
MaxInput = 30;
ExtraInput = Ignore; ExtraInput = Ignore;
# Values in millisecond # Values in millisecond
LockTimeout = 1000; LockTimeout = 500;
# Affects first out command in a protocol. # Affects first out command in a protocol.
# If other records currently use the device, how many milliseconds to wait for # If other records currently use the device, how many milliseconds to wait for
# exclusive access to the device before giving up? # exclusive access to the device before giving up?
#ReadTimeout = 1500; #ReadTimeout = 1500;
ReplyTimeout = 400; ReplyTimeout = 300;
#PollPeriod = $ReplyTimeout; #PollPeriod = $ReplyTimeout;
#Integer. Affects first in command in I/O Intr mode (see chapter Record Processing). #Integer. Affects first in command in I/O Intr mode (see chapter Record Processing).

7
epics/iocs/ISTTOKrpi/iocBoot/iocISTTOKrpi/iocISTTOKrpi.req
View File

@@ -1,8 +1,9 @@
ISTTOK:central:PULSE-NUMBER.VAL # P=ISTTOK:,R=central:
$(P)$(R)PULSE-NUMBER.VAL
ISTTOK:central:LogMessage.VAL ISTTOK:central:LogMessage.VAL
ISTTOK:central:LASTOPSTATE.VAL ISTTOK:central:LASTOPSTATE.VAL
ISTTOK:central:OPREQ ISTTOK:central:OPREQ.VAL
ISTTOK:central:PROCESS-MODE.VAL ISTTOK:central:PROCESS-MODE.VAL
ISTTOK:central:CLEANINGMANMODE.VAL ISTTOK:central:CLEANINGMANMODE.VAL
@@ -12,7 +13,7 @@ ISTTOK:central:Shot-TorPSCurrent
ISTTOK:central:UPS-Shutdown ISTTOK:central:UPS-Shutdown
#ALARM Limits #ALARM Limits
ISTTOK:central:RPump1-Pressure.HIGH $(P)$(R)RPump1-Pressure.HIGH
ISTTOK:central:RPump1-Pressure.HIHI ISTTOK:central:RPump1-Pressure.HIHI
#ISTTOK:central:RPump2-Pressure.HIGH #ISTTOK:central:RPump2-Pressure.HIGH
#ISTTOK:central:RPump2-Pressure.HIHI #ISTTOK:central:RPump2-Pressure.HIHI

6
epics/iocs/ISTTOKrpi/iocBoot/iocISTTOKrpi/save/iocISTTOKrpi.sav
View File

@@ -1,8 +1,8 @@
# autosave R5.3 Automatically generated - DO NOT MODIFY - 211214-141949 # autosave R5.3 Automatically generated - DO NOT MODIFY - 211215-002448
ISTTOK:central:PULSE-NUMBER.VAL 0 ISTTOK:central:PULSE-NUMBER.VAL 0
ISTTOK:central:LogMessage.VAL ISTTOK:central:LogMessage.VAL
ISTTOK:central:LASTOPSTATE.VAL 5 ISTTOK:central:LASTOPSTATE.VAL 2
ISTTOK:central:OPREQ 0 ISTTOK:central:OPREQ.VAL 1
ISTTOK:central:PROCESS-MODE.VAL 0 ISTTOK:central:PROCESS-MODE.VAL 0
ISTTOK:central:CLEANINGMANMODE.VAL 0 ISTTOK:central:CLEANINGMANMODE.VAL 0
ISTTOK:central:Emergency-UserButton.VAL 0 ISTTOK:central:Emergency-UserButton.VAL 0

10
epics/iocs/ISTTOKrpi/iocBoot/iocISTTOKrpi/st.cmd
View File

@@ -46,10 +46,10 @@ dbLoadRecords("db/sendmail.db", "P=ISTTOK:,PORT=L0,R=central:,L=0,A=0")
# Uncomment to Debug STREAMDEVICE serial activity # Uncomment to Debug STREAMDEVICE serial activity
# 2021/12/14 13:11:50.019969 RS0 ISTTOK:central:P002:M: No reply within 200 ms to "0020074002=?107<0d> # 2021/12/14 13:11:50.019969 RS0 ISTTOK:central:P002:M: No reply within 200 ms to "0020074002=?107<0d>
#var streamError 1 var streamError 1
#with this no errors on pfeiffer bus #with this no errors on pfeiffer bus
var streamDebug 1 #var streamDebug 1
streamSetLogfile("logfile.txt") #streamSetLogfile("logfile.txt")
## Run this to trace the stages of iocInit ## Run this to trace the stages of iocInit
#traceIocInit #traceIocInit
@@ -70,11 +70,11 @@ asSetFilename("${TOP}/iocBoot/${IOC}/access_security.acf")
iocInit iocInit
#asInit asInit
# Create request file and start periodic 'save’ # Create request file and start periodic 'save’
# makeAutosaveFileFromDbInfo("$(SAVE_DIR)/$(IOC).req", "autosaveFields") # makeAutosaveFileFromDbInfo("$(SAVE_DIR)/$(IOC).req", "autosaveFields")
create_monitor_set("$(IOC).req", 30) create_monitor_set("$(IOC).req", 30, "P=ISTTOK:,R=central:")
## Start any sequence programs , use safe mode ## Start any sequence programs , use safe mode
seq IsttokSeqExec "unit=ISTTOK" seq IsttokSeqExec "unit=ISTTOK"