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

Inserted 3rd Relay Board and PVs

Browse Source
This commit is contained in:
Bernardo Carvalho
2022-02-04 15:42:12 +00:00
parent 0ffb996b10
commit d616a7fa1f
4 changed files with 48 additions and 32 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -275,18 +275,6 @@ record(bo, "$(P)$(R)VVessel-Filament" ) {
field(PINI,"YES")
}
##############################
# LIGHTS ON/OFF #
##############################
record(bo, "$(P)$(R)Lab-WarningLight" ) {
field(DESC," Luzes de sinalização, 220V ")
# record(bo, "$(P)$(R)LightsOnOff" ) {
field(OUT, "$(P)$(R)PCF8574:60:REGISTER.B5 PP" )
field(ZNAM, "On" )
field(ONAM, "Off" )
field(VAL,"1")
}
############
# NOT USED #
############
@@ -298,14 +286,6 @@ record(bo, "$(P)$(R)Lab-WarningLight" ) {
###############
###############
record(bo, "$(P)$(R)Shot-TorPSDisable" ) {
# field(DESC," É desligado na emergência e em qualquer estado que não seja Process ou Wait Shot.")
field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B1 PP" )
field( ZNAM, "Off" )
field( ONAM, "On" )
field(VAL,"1")
}
record(bo, "$(P)$(R)Shot-TorPSTrigger" ) {
field(DESC," Trigger da FRAEP")
field( ZNAM, "Off" )
@@ -463,6 +443,42 @@ record(bo, "$(P)$(R)Buzzer" ) {
field(OSV,"MINOR")
}
##############################
# LIGHTS ON/OFF #
##############################
record(bo, "$(P)$(R)Lab-WarningLight" ) {
field(DESC,"Luzes de sinalização, 220V ")
# ####field(OUT, "$(P)$(R)PCF8574:60:REGISTER.B5 PP" )
field(OUT,"$(P)$(R)SEEED4RELAY:19:REGISTER.B0 PP")
field(ZNAM,"OFF")
field(ONAM, "ON")
field(VAL, "0")
field(OSV,"MINOR")
}
# field(ZNAM, "On" )
# field(ONAM, "Off" )
# field(VAL,"1")
#}
######################################
# Tor Power Supply Disable #
# É desligado na emergência e em qualquer estado que
# não seja Process ou Wait Shot.
######################################
record(bo, "$(P)$(R)Shot-TorPSDisable" ) {
field(DESC,"Tor Power Supply Disable")
####field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B1 PP" )
field(OUT,"$(P)$(R)SEEED4RELAY:19:REGISTER.B1 PP")
field( ZNAM, "Enabled" )
field( ONAM, "Disabled" )
field(VAL,"0")
field(OSV,"MINOR")
}
# field( ZNAM, "Off" )
# field( ONAM, "On" )
# field(VAL,"1")
#}
# field(ZNAM, "Off" )
# field(ONAM, "Pulse" )
# field(HIGH, "2.5")

16
epics/iocs/ISTTOKrpi/ISTTOKrpiApp/src/IsttokSeqExec.stt
View File

@@ -312,7 +312,7 @@ ss PulseSequence {
IsttokGasIS_Valves = SEEED_RELAY_OFF;
pvPut(IsttokGasIS_Valves);
IsttokLab_WarningLight = PCF_RELAY_OFF;
IsttokLab_WarningLight = SEEED_RELAY_OFF;
pvPut(IsttokLab_WarningLight);
IsttokClean_TorPneuBreaker = SEEED_RELAY_OFF;
@@ -321,7 +321,7 @@ ss PulseSequence {
IsttokClean_TorContactor = SEEED_RELAY_OFF;
pvPut(IsttokClean_TorContactor);
Isttok_TorPSDisable = PCF_RELAY_OFF;
Isttok_TorPSDisable = SEEED_RELAY_OFF;
pvPut(Isttok_TorPSDisable);
Isttok_TorPSTrigger= OFF;
@@ -436,7 +436,7 @@ ss PulseSequence {
pvPut(IsttokOPSTATE);
IsttokLastOPSTATE = POS_Idle;
pvPut(IsttokLastOPSTATE);
Isttok_TorPSDisable = PCF_RELAY_OFF;
Isttok_TorPSDisable = SEEED_RELAY_OFF;
pvPut(Isttok_TorPSDisable);
IsttokProcReq = STOP;
pvPut(IsttokProcReq);
@@ -547,7 +547,7 @@ ss PulseSequence {
strcpy(msg, "Toroidal Shot Enable");
pvPut(msg);
errlogSevPrintf(NO_ALARM, "%s\n",msg);
Isttok_TorPSDisable = PCF_RELAY_ON;
Isttok_TorPSDisable = SEEED_RELAY_ON;
pvPut(Isttok_TorPSDisable);
IsttokOPSTATE = POS_WaitShot;
pvPut(IsttokOPSTATE);
@@ -597,7 +597,7 @@ ss PulseSequence {
IsttokOPSTATE = POS_Stopping;
pvPut(IsttokOPSTATE);
/*Just to be sure */
Isttok_TorPSDisable = PCF_RELAY_OFF;
Isttok_TorPSDisable = SEEED_RELAY_OFF;
pvPut(Isttok_TorPSDisable);
IsttokCapBank_Charge = SEEED_RELAY_OFF;
@@ -641,7 +641,7 @@ ss PulseSequence {
strcpy(msg, "Emergency Toroidal Shot Disable");
pvPut(msg);
errlogSevPrintf(MAJOR, "%s\n",msg);
Isttok_TorPSDisable = PCF_RELAY_OFF;
Isttok_TorPSDisable = SEEED_RELAY_OFF;
pvPut(Isttok_TorPSDisable);
strcpy(msg, "EMERGENCY: CAPBANK Charge OFF");
@@ -1123,7 +1123,7 @@ ss ShotSequence {
strcpy(msg, "Lights ON");
pvPut(msg);
errlogSevPrintf(NO_ALARM, "%s\n",msg);
IsttokLab_WarningLight = PCF_RELAY_ON;
IsttokLab_WarningLight = SEEED_RELAY_ON;
pvPut(IsttokLab_WarningLight);
WSHOTINGSTATE = WSHTST_Shooting3;
pvPut(WSHOTINGSTATE);
@@ -1305,7 +1305,7 @@ ss ShotSequence {
strcpy(msg, "Lights OFF and Recovering..." );
pvPut(msg);
errlogSevPrintf(NO_ALARM, "%s\n", msg);
IsttokLab_WarningLight = PCF_RELAY_OFF;
IsttokLab_WarningLight = SEEED_RELAY_OFF;
pvPut(IsttokLab_WarningLight);
WSHOTINGSTATE = WSHTST_ShotEnd;
pvPut(WSHOTINGSTATE);