Change PV names. state machine running

This commit is contained in:
Bernardo Carvalho
2019-11-29 11:50:11 +00:00
parent dabf6bdf9d
commit 5905d36ad3
5 changed files with 162 additions and 115 deletions

View File

@@ -1,7 +1,7 @@
# #
# Project : ISTTOK slow Control # Project : ISTTOK slow Control
# #
# File : $Id: ISTTOKcontrol.db 4709 2013-05-03 13:44:29Z bernardo $ # File :
# Description : Records for ISTTOK Control # Description : Records for ISTTOK Control
# #
## ##
@@ -10,10 +10,6 @@
# Copyright (c) : (IPFN-IST) # Copyright (c) : (IPFN-IST)
# Created 3-Mar-2013 # Created 3-Mar-2013
# #
# SVN keywords
# $Date: 2013-05-03 14:44:29 +0100 (Fri, 03 May 2013) $
# $Revision: 4709 $
# $URL: http://metis.ipfn.ist.utl.pt/svn/cdaq/ISTTOK/Software/EPICS/ISTTOKcontrol/trunk/ISTTOKApp/Db/ISTTOKcontrol.db $
## ##
record(mbbi, "$(P)$(R)OPSTATE") { record(mbbi, "$(P)$(R)OPSTATE") {
@@ -34,6 +30,24 @@ record(mbbi, "$(P)$(R)OPSTATE") {
field(SXST, "Emergency") field(SXST, "Emergency")
field(VAL, "0") field(VAL, "0")
} }
record(mbbo, "$(P)$(R)LASTOPSTATE") {
field(DESC, "Pulse Sequence Last Saved State")
field(ZRVL, "0")
field(ONVL, "1")
field(TWVL, "2")
field(THVL, "3")
field(FRVL, "4")
field(FVVL, "5")
field(SXVL, "6")
field(ZRST, "Stopped")
field(ONST, "Starting")
field(TWST, "Process")
field(THST, "Clean")
field(FRST, "WaitShot")
field(FVST, "Stopping")
field(SXST, "Emergency")
# field(VAL, "0")
}
record(calc, "$(P)$(R)OPCALCSTATE") { record(calc, "$(P)$(R)OPCALCSTATE") {
field(DESC, "Pulse Calculated State") field(DESC, "Pulse Calculated State")

View File

@@ -14,6 +14,7 @@ record(bo, "$(P)$(R)TMPump1-ControllerOn" ) {
field(ONAM, "Pulse" ) field(ONAM, "Pulse" )
field(HIGH, "2.5") field(HIGH, "2.5")
field(FLNK, "$(P)$(R)TMPump1-ControllerOnInv" ) field(FLNK, "$(P)$(R)TMPump1-ControllerOnInv" )
field(VAL,"0")
# field( FLNK, "$(P)$(R)TMPControllerOnInv" ) # field( FLNK, "$(P)$(R)TMPControllerOnInv" )
} }
@@ -33,6 +34,7 @@ record(bo, "$(P)$(R)TMPump1-ControllerOff" ) {
field(HIGH, "2.5") field(HIGH, "2.5")
#field( FLNK, "$(P)$(R)TMPControllerOffInv" ) #field( FLNK, "$(P)$(R)TMPControllerOffInv" )
field(FLNK, "$(P)$(R)TMPump1-ControllerOffInv" ) field(FLNK, "$(P)$(R)TMPump1-ControllerOffInv" )
field(VAL,"0")
} }
record(calcout, "$(P)$(R)TMPump1-ControllerOffInv") { record(calcout, "$(P)$(R)TMPump1-ControllerOffInv") {
@@ -61,6 +63,7 @@ record(bo, "$(P)$(R)TMPump1-MotorOff") {
field( ONAM, "Pulse") field( ONAM, "Pulse")
field( HIGH, "2.5") field( HIGH, "2.5")
field( FLNK, "$(P)$(R)TMPump1-MotorOffInv") field( FLNK, "$(P)$(R)TMPump1-MotorOffInv")
field(VAL,"0")
} }
record(calcout, "$(P)$(R)TMPump1-MotorOffInv") { record(calcout, "$(P)$(R)TMPump1-MotorOffInv") {
@@ -128,6 +131,7 @@ record(bi , "$(P)$(R)TMPump1-NormalOperation" ) {
record(fanout, "$(P)$(R)PCF8574:57:REGISTER:READ:FNOUT"){ record(fanout, "$(P)$(R)PCF8574:57:REGISTER:READ:FNOUT"){
field(LNK1, "$(P)$(R)TMPump2-Emergency") field(LNK1, "$(P)$(R)TMPump2-Emergency")
field(LNK2, "$(P)$(R)TMPump2-Acceleration") field(LNK2, "$(P)$(R)TMPump2-Acceleration")
field(LNK3, "$(P)$(R)TTSystem-tzero")
} }
record(bi , "$(P)$(R)TMPump2-Emergency") { record(bi , "$(P)$(R)TMPump2-Emergency") {
field(DESC," TMP2 Falha ") field(DESC," TMP2 Falha ")
@@ -143,11 +147,24 @@ record(bi , "$(P)$(R)TMPump2-Acceleration") {
field( ZNAM, "ON" ) field( ZNAM, "ON" )
field( ONAM, "OFF" ) field( ONAM, "OFF" )
} }
####################################
# TIMING TRIGGER ON/OFF #
####################################
record(bi , "$(P)$(R)TTSystem-tzero" ) {
field(DESC,"Trigger control 60s before shot")
# record(bi , "$(P)$(R)TimingTriggerSignal" ) {
field(INP, "$(P)$(R)PCF8574:57:REGISTER:READ.B7")
field(SCAN, "1 second" )
field(ZNAM, "OFF" )
field(ONAM, "ON" )
}
############################### ###############################
### TMP2 Controller Outputs ### ### TMP2 Controller Outputs ###
############################### ###############################
record(bo, "$(P)$(R)TMP2MotorOnOff" ) { record(bo, "$(P)$(R)TMPump2-Motor" ) {
field(DESC," Motor On/Off ")
# record(bo, "$(P)$(R)TMP2MotorOnOff" ) {
field( OUT, "$(P)$(R)PCF8574:57:REGISTER.B2 PP MS") field( OUT, "$(P)$(R)PCF8574:57:REGISTER.B2 PP MS")
field( ZNAM, "ON") field( ZNAM, "ON")
field( ONAM, "OFF") field( ONAM, "OFF")
@@ -157,10 +174,12 @@ record(bo, "$(P)$(R)TMP2MotorOnOff" ) {
# BUZZER ON/OFF # # BUZZER ON/OFF #
############################## ##############################
record(bo, "$(P)$(R)Buzzer" ) { record(bo, "$(P)$(R)Buzzer" ) {
field(DESC," Lab Buzzer ")
field(ZNAM, "Off" ) field(ZNAM, "Off" )
field(ONAM, "Pulse" ) field(ONAM, "Pulse" )
field(HIGH, "2.5") field(HIGH, "2.5")
field(FLNK, "$(P)$(R)BuzzerInv" ) field(FLNK, "$(P)$(R)BuzzerInv" )
field(VAL,"0")
} }
record(calcout, "$(P)$(R)BuzzerInv" ) { record(calcout, "$(P)$(R)BuzzerInv" ) {
field( INPA, "$(P)$(R)Buzzer NPP MS" ) field( INPA, "$(P)$(R)Buzzer NPP MS" )
@@ -173,7 +192,7 @@ record(calcout, "$(P)$(R)BuzzerInv" ) {
# EMERGENCY MODE # # EMERGENCY MODE #
############################## ##############################
record(bo, "$(P)$(R)EmergencyButton" ) { record(bo, "$(P)$(R)EmergencyButton" ) {
field(DESC," Botao fisico que executa a soft Emergency ") field(DESC,"Soft Emergency Button")
field(OUT, "$(P)$(R)PCF8574:57:REGISTER.B4 PP" ) field(OUT, "$(P)$(R)PCF8574:57:REGISTER.B4 PP" )
field(ZNAM, "On" ) field(ZNAM, "On" )
field(ONAM, "Off") field(ONAM, "Off")
@@ -185,15 +204,6 @@ record( bo, "$(P)$(R)EmergencyButton" ) {
#$(P)$(R)PCF8574:57:REGISTER:READ.B5 #$(P)$(R)PCF8574:57:REGISTER:READ.B5
#$(P)$(R)PCF8574:57:REGISTER:READ.B6 #$(P)$(R)PCF8574:57:REGISTER:READ.B6
####################################
# TIMING TRIGGER ON/OFF #
####################################
record(bi , "$(P)$(R)TimingTriggerSignal" ) {
field( INP, "$(P)$(R)PCF8574:57:REGISTER:READ.B7")
field( SCAN, "1 second" )
field( ZNAM, "OFF" )
field( ONAM, "ON" )
}
############### ###############
############### ###############
@@ -210,6 +220,7 @@ record( bo, "$(P)$(R)RPump1-Motor" ) {
field(OUT, "$(P)$(R)PCF8574:60:REGISTER.B0 PP" ) field(OUT, "$(P)$(R)PCF8574:60:REGISTER.B0 PP" )
field(ZNAM, "On" ) field(ZNAM, "On" )
field(ONAM, "Off" ) field(ONAM, "Off" )
field(VAL,"1")
} }
############################# #############################
@@ -221,17 +232,19 @@ record( bo, "$(P)$(R)RPump1-Valve" ) {
field( OUT, "$(P)$(R)PCF8574:60:REGISTER.B1 PP" ) field( OUT, "$(P)$(R)PCF8574:60:REGISTER.B1 PP" )
field( ZNAM, "Open" ) field( ZNAM, "Open" )
field( ONAM, "Closed" ) field( ONAM, "Closed" )
field(VAL,"1")
} }
############################# #############################
# ROTARY2 PUMP # # ROTARY2 PUMP #
############################# #############################
record( bo, "$(P)$(R)RPump2-Motor" ) { record( bo, "$(P)$(R)RPump2-Motor" ) {
field(DESC," Liga a alimentacao da bomba rotatoria 2 ") field(DESC,"Power On Rotatory Pump 2")
#record( bo, "$(P)$(R)RotatoryPump2" ) { #record( bo, "$(P)$(R)RotatoryPump2" ) {
field( OUT, "$(P)$(R)PCF8574:60:REGISTER.B2 PP" ) field( OUT, "$(P)$(R)PCF8574:60:REGISTER.B2 PP" )
field( ZNAM, "On" ) field( ZNAM, "On" )
field( ONAM, "Off" ) field( ONAM, "Off" )
field(VAL,"1")
} }
############################# #############################
@@ -243,17 +256,20 @@ record( bo, "$(P)$(R)RPump2-Valve" ) {
field(OUT, "$(P)$(R)PCF8574:60:REGISTER.B3 PP" ) field(OUT, "$(P)$(R)PCF8574:60:REGISTER.B3 PP" )
field(ZNAM, "Open" ) field(ZNAM, "Open" )
field(ONAM, "Closed" ) field(ONAM, "Closed" )
field(VAL,"1")
} }
################################ ################################
# FILAMENT ON/OFF # # FILAMENT ON/OFF #
################################ ################################
record(bo, "$(P)$(R)VVessel-Filament" ) { record(bo, "$(P)$(R)VVessel-Filament" ) {
field(DESC," Filamento dentro do TOK para pre ionizar a câmara") field(DESC,"Vacuum Vessel Filament power")
# record(bo, "$(P)$(R)FilamentOnOff" ) { # record(bo, "$(P)$(R)FilamentOnOff" ) {
field( OUT, "$(P)$(R)PCF8574:60:REGISTER.B4 PP" ) field( OUT, "$(P)$(R)PCF8574:60:REGISTER.B4 PP" )
field( ZNAM, "On" ) field( ZNAM, "On" )
field( ONAM, "Off" ) field( ONAM, "Off" )
field(VAL,"1")
field(PINI,"YES")
} }
############################## ##############################
@@ -265,6 +281,7 @@ record(bo, "$(P)$(R)Lab-WarningLight" ) {
field(OUT, "$(P)$(R)PCF8574:60:REGISTER.B5 PP" ) field(OUT, "$(P)$(R)PCF8574:60:REGISTER.B5 PP" )
field(ZNAM, "On" ) field(ZNAM, "On" )
field(ONAM, "Off" ) field(ONAM, "Off" )
field(VAL,"1")
} }
############ ############
@@ -281,6 +298,7 @@ record(bo, "$(P)$(R)Clean-TorContactor" ) {
field( OUT, "$(P)$(R)PCF8574:60:REGISTER.B7 PP" ) field( OUT, "$(P)$(R)PCF8574:60:REGISTER.B7 PP" )
field( ZNAM, "On" ) field( ZNAM, "On" )
field( ONAM, "Off" ) field( ONAM, "Off" )
field(VAL,"1")
} }
############### ###############
@@ -298,6 +316,7 @@ record(bo, "$(P)$(R)Clean-TorPneuBreaker" ) {
field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B0 PP" ) field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B0 PP" )
field( ZNAM, "On" ) field( ZNAM, "On" )
field( ONAM, "Off" ) field( ONAM, "Off" )
field(VAL,"1")
} }
record(bo, "$(P)$(R)Shot-TorPSDisable" ) { record(bo, "$(P)$(R)Shot-TorPSDisable" ) {
@@ -306,6 +325,7 @@ record(bo, "$(P)$(R)Shot-TorPSDisable" ) {
field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B1 PP" ) field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B1 PP" )
field( ZNAM, "Off" ) field( ZNAM, "Off" )
field( ONAM, "On" ) field( ONAM, "On" )
field(VAL,"1")
} }
record(bo, "$(P)$(R)Shot-TorPSTrigger" ) { record(bo, "$(P)$(R)Shot-TorPSTrigger" ) {
@@ -315,6 +335,7 @@ record(bo, "$(P)$(R)Shot-TorPSTrigger" ) {
field( ONAM, "Pulse" ) field( ONAM, "Pulse" )
field( HIGH, "2.5") field( HIGH, "2.5")
field( FLNK, "$(P)$(R)Shot-TorPSTriggerInv" ) field( FLNK, "$(P)$(R)Shot-TorPSTriggerInv" )
field(VAL,"0")
# field( FLNK, "$(P)$(R)ToroidalShotTriggerOnOffInv" ) # field( FLNK, "$(P)$(R)ToroidalShotTriggerOnOffInv" )
} }
record(calcout, "$(P)$(R)Shot-TorPSTriggerInv" ) { record(calcout, "$(P)$(R)Shot-TorPSTriggerInv" ) {
@@ -336,6 +357,7 @@ record(bo, "$(P)$(R)CapBank-Charge" ) {
field(OUT, "$(P)$(R)PCF8574:61:REGISTER.B3 PP" ) field(OUT, "$(P)$(R)PCF8574:61:REGISTER.B3 PP" )
field(ZNAM, "On" ) field(ZNAM, "On" )
field(ONAM, "Off" ) field(ONAM, "Off" )
field(VAL,"1")
} }
######################################## ########################################
@@ -347,6 +369,7 @@ record(bo, "$(P)$(R)Clean-PrimContactor" ) {
field(OUT, "$(P)$(R)PCF8574:61:REGISTER.B4 PP MS" ) field(OUT, "$(P)$(R)PCF8574:61:REGISTER.B4 PP MS" )
field(ZNAM, "On" ) field(ZNAM, "On" )
field(ONAM, "Off" ) field(ONAM, "Off" )
field(VAL,"1")
} }
#################################### ####################################
@@ -358,6 +381,7 @@ record(bo, "$(P)$(R)Clean-PrimPneuBreaker"){
field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B5 PP" ) field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B5 PP" )
field( ZNAM, "On") field( ZNAM, "On")
field( ONAM, "Off") field( ONAM, "Off")
field(VAL,"1")
} }
################################## ##################################
@@ -369,6 +393,7 @@ record(bo, "$(P)$(R)GasIS-Valves" ) {
field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B6 PP" ) field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B6 PP" )
field( ZNAM, "On" ) field( ZNAM, "On" )
field( ONAM, "Off" ) field( ONAM, "Off" )
field(VAL,"1")
} }
########################################## ##########################################
@@ -380,23 +405,26 @@ record(bo, "$(P)$(R)CapBank-Discharge" ) {
field(OUT, "$(P)$(R)PCF8574:61:REGISTER.B7 PP" ) field(OUT, "$(P)$(R)PCF8574:61:REGISTER.B7 PP" )
field(ZNAM, "On" ) field(ZNAM, "On" )
field(ONAM, "Off" ) field(ONAM, "Off" )
field(VAL,"1")
} }
######################### #########################
###Pressure Conditions### ###Pressure Conditions###
######################### #########################
record(ao,"$(P)$(R)Pressure_PrimaryCondition"){ #record(ao,"$(P)$(R)Pressure_PrimaryCondition"){
field(VAL,"5.0e-3") # field(VAL,"5.0e-3")
field(PREC,"3") # field(PREC,"3")
field(EGU,"mBar") # field(EGU,"mBar")
} #}
record(ao,"$(P)$(R)Pressure_Primary2Condition"){ #record(ao,"$(P)$(R)Pressure_Primary2Condition"){
field(VAL,"5.0e-3") # field(VAL,"5.0e-3")
field(PREC,"3") # field(PREC,"3")
field(EGU,"mBar") # field(EGU,"mBar")
} #}
record(ai,"$(P)$(R)Bypass_Condition"){ record(bo,"$(P)$(R)Primary-PressureCondition"){
field(ZNAM, "OFF" )
field(ONAM, "ON" )
field(VAL,"0") field(VAL,"0")
} }

View File

@@ -79,6 +79,10 @@ short IsttokOPSTATE;
assign IsttokOPSTATE to "ISTTOK:central:OPSTATE"; assign IsttokOPSTATE to "ISTTOK:central:OPSTATE";
monitor IsttokOPSTATE; monitor IsttokOPSTATE;
short IsttokLastOPSTATE;
assign IsttokLastOPSTATE to "ISTTOK:central:LASTOPSTATE";
monitor IsttokLastOPSTATE;
short IsttokOPREQ; short IsttokOPREQ;
assign IsttokOPREQ to "ISTTOK:central:OPREQ"; assign IsttokOPREQ to "ISTTOK:central:OPREQ";
monitor IsttokOPREQ; monitor IsttokOPREQ;
@@ -101,7 +105,7 @@ monitor IsttokSTOPPINGSTATE;
short IsttokCLEANINGSTATE; short IsttokCLEANINGSTATE;
assign IsttokCLEANINGSTATE to "ISTTOK:central:CLEANINGSTATE"; assign IsttokCLEANINGSTATE to "ISTTOK:central:CLEANINGSTATE";
monitor IsttokCLEANINGSTATE; /* monitor IsttokCLEANINGSTATE;*/
short IsttokCLEANINGMANMODE; short IsttokCLEANINGMANMODE;
assign IsttokCLEANINGMANMODE to "ISTTOK:central:CLEANINGMANMODE"; assign IsttokCLEANINGMANMODE to "ISTTOK:central:CLEANINGMANMODE";
@@ -109,43 +113,43 @@ monitor IsttokCLEANINGMANMODE;
short IsttokWSHOTINGSTATE; short IsttokWSHOTINGSTATE;
assign IsttokWSHOTINGSTATE to "ISTTOK:central:WSHOTINGSTATE"; assign IsttokWSHOTINGSTATE to "ISTTOK:central:WSHOTINGSTATE";
monitor IsttokWSHOTINGSTATE; /* monitor IsttokWSHOTINGSTATE; */
short IsttokRPump1_Motor; short IsttokRPump1_Motor;
assign IsttokRPump1_Motor to "ISTTOK:central:RPump1-Motor"; assign IsttokRPump1_Motor to "ISTTOK:central:RPump1-Motor";
monitor IsttokRPump1_Motor; /* monitor IsttokRPump1_Motor; */
short IsttokRPump1_Valve; short IsttokRPump1_Valve;
assign IsttokRPump1_Valve to "ISTTOK:central:RPump1-Valve"; assign IsttokRPump1_Valve to "ISTTOK:central:RPump1-Valve";
monitor IsttokRPump1_Valve; /*monitor IsttokRPump1_Valve;*/
short IsttokRPump2_Motor; short IsttokRPump2_Motor;
assign IsttokRPump2_Motor to "ISTTOK:central:RPump2-Motor"; assign IsttokRPump2_Motor to "ISTTOK:central:RPump2-Motor";
monitor IsttokRPump2_Motor; /* monitor IsttokRPump2_Motor; */
short IsttokRPump2_Valve; short IsttokRPump2_Valve;
assign IsttokRPump2_Valve to "ISTTOK:central:RPump2-Valve"; assign IsttokRPump2_Valve to "ISTTOK:central:RPump2-Valve";
monitor IsttokRPump2_Valve; /* monitor IsttokRPump2_Valve; */
short IsttokTMPump1_ControllerOff; short IsttokTMPump1_ControllerOff;
assign IsttokTMPump1_ControllerOff to "ISTTOK:central:TMPump1-ControllerOff"; assign IsttokTMPump1_ControllerOff to "ISTTOK:central:TMPump1-ControllerOff";
monitor IsttokTMPump1_ControllerOff; /* monitor IsttokTMPump1_ControllerOff; */
short IsttokTMPump1_ControllerOn; short IsttokTMPump1_ControllerOn;
assign IsttokTMPump1_ControllerOn to "ISTTOK:central:TMPump1-ControllerOn"; assign IsttokTMPump1_ControllerOn to "ISTTOK:central:TMPump1-ControllerOn";
monitor IsttokTMPump1_ControllerOn; /* monitor IsttokTMPump1_ControllerOn; */
short IsttokTMPump1_MotorOff; short IsttokTMPump1_MotorOff;
assign IsttokTMPump1_MotorOff to "ISTTOK:central:TMPump1-MotorOff"; assign IsttokTMPump1_MotorOff to "ISTTOK:central:TMPump1-MotorOff";
monitor IsttokTMPump1_MotorOff; /* monitor IsttokTMPump1_MotorOff; */
short IsttokTMPump1_MotorOn; short IsttokTMPump1_MotorOn;
assign IsttokTMPump1_MotorOn to "ISTTOK:central:TMPump1-MotorOn"; assign IsttokTMPump1_MotorOn to "ISTTOK:central:TMPump1-MotorOn";
monitor IsttokTMPump1_MotorOn; /* monitor IsttokTMPump1_MotorOn; */
short IsttokTMPump2_Motor; short IsttokTMPump2_Motor;
assign IsttokTMPump2_Motor to "ISTTOK:central:TMPump2-Motor"; assign IsttokTMPump2_Motor to "ISTTOK:central:TMPump2-Motor";
monitor IsttokTMPump2_Motor; /* monitor IsttokTMPump2_Motor; */
short IsttokTMPump1_NormalOperation; short IsttokTMPump1_NormalOperation;
assign IsttokTMPump1_NormalOperation to "ISTTOK:central:TMPump1-NormalOperation"; assign IsttokTMPump1_NormalOperation to "ISTTOK:central:TMPump1-NormalOperation";
@@ -177,13 +181,14 @@ float IsttokRPump2_Pressure;
assign IsttokRPump2_Pressure to "ISTTOK:central:RPump2-Pressure"; assign IsttokRPump2_Pressure to "ISTTOK:central:RPump2-Pressure";
monitor IsttokRPump2_Pressure; monitor IsttokRPump2_Pressure;
float IsttokRPump1_PressureLowLimit; /* float IsttokRPump1_PressureLowLimit;
assign IsttokRPump1_PressureLowLimit to "ISTTOK:central:RPump1-PressureLowLimit"; assign IsttokRPump1_PressureLowLimit to "ISTTOK:central:RPump1-PressureLowLimit";
monitor IsttokRPump1_PressureLowLimit; monitor IsttokRPump1_PressureLowLimit;
float IsttokRPump2_PressureLowLimit; float IsttokRPump2_PressureLowLimit;
assign IsttokRPump2_PressureLowLimit to "ISTTOK:central:RPump2-PressureLowLimit"; assign IsttokRPump2_PressureLowLimit to "ISTTOK:central:RPump2-PressureLowLimit";
monitor IsttokRPump2_PressureLowLimit; monitor IsttokRPump2_PressureLowLimit;
*/
short IsttokPrimary_PressureCondition; short IsttokPrimary_PressureCondition;
assign IsttokPrimary_PressureCondition to "ISTTOK:central:Primary-PressureCondition"; assign IsttokPrimary_PressureCondition to "ISTTOK:central:Primary-PressureCondition";
@@ -191,35 +196,35 @@ monitor IsttokPrimary_PressureCondition;
short IsttokShotBuzzer; short IsttokShotBuzzer;
assign IsttokShotBuzzer to "ISTTOK:central:Buzzer"; assign IsttokShotBuzzer to "ISTTOK:central:Buzzer";
monitor IsttokShotBuzzer; /* monitor IsttokShotBuzzer; */
short IsttokShotLab_WarningLight; short IsttokShotLab_WarningLight;
assign IsttokShotLab_WarningLight to "ISTTOK:central:Lab-WarningLight"; assign IsttokShotLab_WarningLight to "ISTTOK:central:Lab-WarningLight";
monitor IsttokShotLab_WarningLight; /* monitor IsttokShotLab_WarningLight; */
short IsttokShotGasIS_Valves; short IsttokShotGasIS_Valves;
assign IsttokShotGasIS_Valves to "ISTTOK:central:GasIS-Valves"; assign IsttokShotGasIS_Valves to "ISTTOK:central:GasIS-Valves";
monitor IsttokShotGasIS_Valves; /* monitor IsttokShotGasIS_Valves; */
short IsttokShotVVessel_Filament; short IsttokShotVVessel_Filament;
assign IsttokShotVVessel_Filament to "ISTTOK:central:VVessel-Filament"; assign IsttokShotVVessel_Filament to "ISTTOK:central:VVessel-Filament";
monitor IsttokShotVVessel_Filament; /* monitor IsttokShotVVessel_Filament; */
short IsttokShotCapBank_Charge; short IsttokShotCapBank_Charge;
assign IsttokShotCapBank_Charge to "ISTTOK:central:CapBank-Charge"; assign IsttokShotCapBank_Charge to "ISTTOK:central:CapBank-Charge";
monitor IsttokShotCapBank_Charge; /* monitor IsttokShotCapBank_Charge; */
short IsttokShotCapBank_Discharge; short IsttokShotCapBank_Discharge;
assign IsttokShotCapBank_Discharge to "ISTTOK:central:CapBank-Discharge"; assign IsttokShotCapBank_Discharge to "ISTTOK:central:CapBank-Discharge";
monitor IsttokShotCapBank_Discharge; /* monitor IsttokShotCapBank_Discharge; */
short IsttokShotClean_TorContactor; short IsttokShotClean_TorContactor;
assign IsttokShotClean_TorContactor to "ISTTOK:central:Clean-TorContactor"; assign IsttokShotClean_TorContactor to "ISTTOK:central:Clean-TorContactor";
monitor IsttokShotClean_TorContactor; /* monitor IsttokShotClean_TorContactor; */
short IsttokShotClean_TorPneuBreaker; short IsttokShotClean_TorPneuBreaker;
assign IsttokShotClean_TorPneuBreaker to "ISTTOK:central:Clean-TorPneuBreaker"; assign IsttokShotClean_TorPneuBreaker to "ISTTOK:central:Clean-TorPneuBreaker";
monitor IsttokShotClean_TorPneuBreaker; /* monitor IsttokShotClean_TorPneuBreaker; */
short IsttokShotShot_TorPSTrigger; short IsttokShotShot_TorPSTrigger;
assign IsttokShotShot_TorPSTrigger to "ISTTOK:central:Shot-TorPSTrigger"; assign IsttokShotShot_TorPSTrigger to "ISTTOK:central:Shot-TorPSTrigger";
@@ -227,23 +232,23 @@ monitor IsttokShotShot_TorPSTrigger;
short IsttokShotShot_TorPSDisable; short IsttokShotShot_TorPSDisable;
assign IsttokShotShot_TorPSDisable to "ISTTOK:central:Shot-TorPSDisable"; assign IsttokShotShot_TorPSDisable to "ISTTOK:central:Shot-TorPSDisable";
monitor IsttokShotShot_TorPSDisable; /* monitor IsttokShotShot_TorPSDisable; */
short IsttokShotClean_PrimContactor; short IsttokShotClean_PrimContactor;
assign IsttokShotClean_PrimContactor to "ISTTOK:central:Clean-PrimContactor"; assign IsttokShotClean_PrimContactor to "ISTTOK:central:Clean-PrimContactor";
monitor IsttokShotClean_PrimContactor; /* monitor IsttokShotClean_PrimContactor; */
short IsttokShotClean_PrimPneuBreaker; short IsttokShotClean_PrimPneuBreaker;
assign IsttokShotClean_PrimPneuBreaker to "ISTTOK:central:Clean-PrimPneuBreaker"; assign IsttokShotClean_PrimPneuBreaker to "ISTTOK:central:Clean-PrimPneuBreaker";
monitor IsttokShotClean_PrimPneuBreaker; /* monitor IsttokShotClean_PrimPneuBreaker; */
short IsttokShotCountdown; short IsttokShotCountdown;
assign IsttokShotCountdown to "ISTTOK:central:COUNTDOWN"; assign IsttokShotCountdown to "ISTTOK:central:COUNTDOWN";
monitor IsttokShotCountdown; /* monitor IsttokShotCountdown; */
string IsttokShotCountdownStart; string IsttokShotCountdownScan;
assign IsttokShotCountdownStart to "ISTTOK:central:COUNTDOWN.SCAN"; assign IsttokShotCountdownScan to "ISTTOK:central:COUNTDOWN.SCAN";
monitor IsttokShotCountdownStart; /* monitor IsttokShotCountdownStart; */
short IsttokEmergencyButton; short IsttokEmergencyButton;
assign IsttokEmergencyButton to "ISTTOK:central:EmergencyButton"; assign IsttokEmergencyButton to "ISTTOK:central:EmergencyButton";
@@ -331,8 +336,8 @@ ss PulseSequence {
IsttokTMPump1_MotorOn = PCF_RELAY_ON; IsttokTMPump1_MotorOn = PCF_RELAY_ON;
pvPut(IsttokTMPump1_MotorOn); pvPut(IsttokTMPump1_MotorOn);
// CHECK PRIMARY PRESSURES AND PREVENT STARTING IF REQUIRED // CHECK PRIMARY PRESSURES AND PREVENT STARTING IF REQUIRED TODO: Unfold ifs
if( (IsttokRPump1_Pressure >= IsttokRPump1_PressureLowLimit) && (IsttokRPump2_Pressure >= IsttokRPump2_PressureLowLimit) ){ if( (pvStatus(IsttokRPump1_Pressure) != pvStatOK) && (pvStatus(IsttokRPump1_Pressure) != pvStatOK)) {
IsttokOPREQ = STOP; IsttokOPREQ = STOP;
pvPut(IsttokOPREQ); pvPut(IsttokOPREQ);
} }
@@ -831,25 +836,26 @@ ss StartingSequence {
IsttokSTARTINGSTATE = STRST_NonStarting; IsttokSTARTINGSTATE = STRST_NonStarting;
pvPut(IsttokSTARTINGSTATE); pvPut(IsttokSTARTINGSTATE);
} state NonStarting } state NonStarting
when (((IsttokRPump1_Pressure < IsttokRPump1_PressureLowLimit) && (IsttokRPump2_Pressure < IsttokRPump2_PressureLowLimit)) ) { when ( (pvStatus(IsttokRPump1_Pressure) == pvStatOK) && (pvStatus(IsttokRPump1_Pressure) == pvStatOK)) {
/* TODO unfold when when (((IsttokRPump1_Pressure < IsttokRPump1_PressureLowLimit) && (IsttokRPump2_Pressure < IsttokRPump2_PressureLowLimit)) ) { */
printf("Primary1 Pressure=%f\n",IsttokRPump1_Pressure); printf("Primary1 Pressure=%f\n",IsttokRPump1_Pressure);
printf("Primary2 Pressure=%f\n",IsttokRPump2_Pressure); printf("Primary2 Pressure=%f\n",IsttokRPump2_Pressure);
if(IsttokRPump1_Pressure < IsttokRPump1_PressureLowLimit){ // if(IsttokRPump1_Pressure < IsttokRPump1_PressureLowLimit){
strcpy(msg, "TMP1 MotorOn ON" ); strcpy(msg, "TMP1 MotorOn ON" );
pvPut(msg); pvPut(msg);
errlogSevPrintf(NO_ALARM, "%s\n",msg); errlogSevPrintf(NO_ALARM, "%s\n",msg);
IsttokTMPump1_MotorOn = ON; IsttokTMPump1_MotorOn = ON;
pvPut(IsttokTMPump1_MotorOn); pvPut(IsttokTMPump1_MotorOn);
} // }
if(IsttokRPump2_Pressure < IsttokRPump2_PressureLowLimit){ // if(IsttokRPump2_Pressure < IsttokRPump2_PressureLowLimit){
strcpy(msg, "TMP2 MotorOnOff ON" ); strcpy(msg, "TMP2 MotorOnOff ON" );
pvPut(msg); pvPut(msg);
errlogSevPrintf(NO_ALARM, "%s\n",msg); errlogSevPrintf(NO_ALARM, "%s\n",msg);
IsttokTMPump2_Motor = ON; IsttokTMPump2_Motor = ON;
pvPut(IsttokTMPump2_Motor); pvPut(IsttokTMPump2_Motor);
} // }
if(IsttokTMPump1_NormalOperation == PCF_INPUT_ON){ if(IsttokTMPump1_NormalOperation == PCF_INPUT_ON){
sprintf(tmp1_stat, "ON"); sprintf(tmp1_stat, "ON");
@@ -1129,8 +1135,8 @@ ss ShotingSequence {
errlogSevPrintf(NO_ALARM, "%s\n",msg); errlogSevPrintf(NO_ALARM, "%s\n",msg);
IsttokWSHOTINGSTATE = WSHOT_NonShoting; IsttokWSHOTINGSTATE = WSHOT_NonShoting;
pvPut(IsttokWSHOTINGSTATE); pvPut(IsttokWSHOTINGSTATE);
strcpy(IsttokShotCountdownStart, "Passive"); strcpy(IsttokShotCountdownScan, "Passive");
pvPut(IsttokShotCountdownStart); pvPut(IsttokShotCountdownScan);
IsttokShotCountdown = 160; IsttokShotCountdown = 160;
pvPut(IsttokShotCountdown); pvPut(IsttokShotCountdown);
} }
@@ -1139,8 +1145,8 @@ ss ShotingSequence {
pvPut(msg); pvPut(msg);
IsttokShotCountdown = -70; IsttokShotCountdown = -70;
pvPut(IsttokShotCountdown); pvPut(IsttokShotCountdown);
strcpy(IsttokShotCountdownStart, "1 second"); strcpy(IsttokShotCountdownScan, "1 second");
pvPut(IsttokShotCountdownStart); pvPut(IsttokShotCountdownScan);
} state Shoting0 } state Shoting0
} }
state Shoting0 { state Shoting0 {
@@ -1382,8 +1388,8 @@ ss ShotingSequence {
strcpy(msg, "Terminated"); strcpy(msg, "Terminated");
pvPut(msg); pvPut(msg);
errlogSevPrintf(NO_ALARM, "%s\n", msg); errlogSevPrintf(NO_ALARM, "%s\n", msg);
strcpy(IsttokShotCountdownStart, "Passive"); strcpy(IsttokShotCountdownScan, "Passive");
pvPut(IsttokShotCountdownStart); pvPut(IsttokShotCountdownScan);
IsttokShotCountdown = 160; IsttokShotCountdown = 160;
pvPut(IsttokShotCountdown); pvPut(IsttokShotCountdown);
} state NonShoting } state NonShoting

View File

@@ -3,22 +3,21 @@ ISTTOK:central:PROCESS-MODE.VAL
ISTTOK:central:TMPump1-ManualValve.VAL ISTTOK:central:TMPump1-ManualValve.VAL
ISTTOK:central:LASTOPSTATE.VAL
ISTTOK:central:OPREQ ISTTOK:central:OPREQ
ISTTOK:central:PROCESS-MODE.VAL ISTTOK:central:PROCESS-MODE.VAL
ISTTOK:central:PROCESS-REQ.VAL ISTTOK:central:PROCESS-REQ.VAL
ISTTOK:central:STARTINGSTATE.VAL #ISTTOK:central:STARTINGSTATE.VAL
ISTTOK:central:STOPPINGSTATE.VAL #ISTTOK:central:STOPPINGSTATE.VAL
ISTTOK:central:CLEANINGSTATE.VAL #ISTTOK:central:CLEANINGSTATE.VAL
ISTTOK:central:CLEANINGMANMODE.VAL ISTTOK:central:CLEANINGMANMODE.VAL
#ISTTOK:central:CLEANINGINOUTSTATE.VAL #ISTTOK:central:WSHOTINGSTATE.VAL
#ISTTOK:central:CLEANINGINOUTSTATE0.VAL
#ISTTOK:central:CLEANINGINOUTSTATE1.VAL
#ISTTOK:central:CLEANINGINOUTSTATE2.VAL
#ISTTOK:central:CLEANINGINOUTSTATE3.VAL
#ISTTOK:central:CLEANINGINOUTSTATE4.VAL
#ISTTOK:central:CLEANINGINOUTSTATE5.VAL
ISTTOK:central:WSHOTINGSTATE.VAL
ISTTOK:central:Pressure_PrimaryCondition.VAL #ISTTOK:central:Pressure_PrimaryCondition.VAL
ISTTOK:central:Pressure_Primary2Condition.VAL #ISTTOK:central:Pressure_Primary2Condition.VAL
ISTTOK:central:EmergencyButton.VAL ISTTOK:central:EmergencyButton.VAL
ISTTOK:central:RPump1-Pressure.HIGH
ISTTOK:central:RPump1-Pressure.HIHI
ISTTOK:central:RPump2-Pressure.HIGH
ISTTOK:central:RPump2-Pressure.HIHI

View File

@@ -45,12 +45,11 @@ dbLoadRecords("db/ISTTOKpfeiffer.db","P=ISTTOK:,R=central:,bus=RS0")
save_restoreSet_status_prefix("$(IOC):") save_restoreSet_status_prefix("$(IOC):")
set_requestfile_path("$(SAVE_DIR)") set_requestfile_path("$(SAVE_DIR)")
set_savefile_path("$(SAVE_DIR)") set_savefile_path("$(SAVE_DIR)/save")
save_restoreSet_NumSeqFiles(3) save_restoreSet_NumSeqFiles(3)
save_restoreSet_SeqPeriodInSeconds(600) save_restoreSet_SeqPeriodInSeconds(600)
set_pass1_restoreFile("$(IOC).sav") set_pass1_restoreFile("$(IOC).sav")
cd "${TOP}/iocBoot/${IOC}" cd "${TOP}/iocBoot/${IOC}"
asSetFilename("${TOP}/iocBoot/${IOC}/access_security.acf") asSetFilename("${TOP}/iocBoot/${IOC}/access_security.acf")
@@ -64,4 +63,5 @@ iocInit
create_monitor_set("$(IOC).req", 30) create_monitor_set("$(IOC).req", 30)
## Start any sequence programs ## Start any sequence programs
seq IsttokSeqExec, "unit=ISTTOK" seq IsttokSeqExec
#, "unit=ISTTOK"