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

Change PV names and state machine

Browse Source
This commit is contained in:
Bernardo Carvalho
2019-11-27 18:07:24 +00:00
parent 1ef0124eed
commit dabf6bdf9d
9 changed files with 1503 additions and 2317 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
epics/iocs/ISTTOKrpi/ISTTOKrpiApp/Db/ISTTOKpcf8574.db
View File

@@ -44,8 +44,8 @@ record( mbboDirect, "$(P)$(R)PCF8574:57:REGISTER") {
field(OUT, "@pcf8574.proto wReg(57) I2C") field(OUT, "@pcf8574.proto wReg(57) I2C")
field(SHFT, "0") field(SHFT, "0")
field(NOBT, "8") field(NOBT, "8")
field(VAL, 255) # field(VAL, 255)
field(PINI,"YES") # field(PINI,"YES")
} }
record( mbbiDirect, "$(P)$(R)PCF8574:57:REGISTER:READ" ) { record( mbbiDirect, "$(P)$(R)PCF8574:57:REGISTER:READ" ) {
@@ -53,7 +53,8 @@ record( mbbiDirect, "$(P)$(R)PCF8574:57:REGISTER:READ" ) {
field(INP, "@pcf8574.proto rReg(57) I2C") field(INP, "@pcf8574.proto rReg(57) I2C")
field(NOBT, "8") field(NOBT, "8")
field(SCAN, "1 second") field(SCAN, "1 second")
field(PINI,"YES") field(FLNK, "$(P)$(R)PCF8574:57:REGISTER:READ:FNOUT")
# field(PINI,"YES")
} }
##################################################### #####################################################
@@ -64,8 +65,8 @@ record( mbboDirect, "$(P)$(R)PCF8574:60:REGISTER") {
field( OUT, "@pcf8574.proto wReg(60) I2C") field( OUT, "@pcf8574.proto wReg(60) I2C")
field( SHFT, "0") field( SHFT, "0")
field( NOBT, "8") field( NOBT, "8")
field(VAL, 255) #field(VAL, 255)
field(PINI,"YES") #field(PINI,"YES")
} }
record( mbbiDirect, "$(P)$(R)PCF8574:60:REGISTER:READ" ) { record( mbbiDirect, "$(P)$(R)PCF8574:60:REGISTER:READ" ) {
@@ -73,7 +74,8 @@ record( mbbiDirect, "$(P)$(R)PCF8574:60:REGISTER:READ" ) {
field( INP, "@pcf8574.proto rReg(60) I2C") field( INP, "@pcf8574.proto rReg(60) I2C")
field(NOBT, "8") field(NOBT, "8")
field(SCAN, "1 second") field(SCAN, "1 second")
field(PINI,"YES") # field(FLNK, "$(P)$(R)PCF8574:60:REGISTER:READ:FNOUT")
#field(PINI,"YES")
} }
##################################################### #####################################################
@@ -84,8 +86,8 @@ record( mbboDirect, "$(P)$(R)PCF8574:61:REGISTER") {
field( OUT, "@pcf8574.proto wReg(61) I2C") field( OUT, "@pcf8574.proto wReg(61) I2C")
field( SHFT, "0") field( SHFT, "0")
field( NOBT, "8") field( NOBT, "8")
field(VAL, 255) #field(VAL, 255)
field(PINI,"YES") #field(PINI,"YES")
} }
record( mbbiDirect, "$(P)$(R)PCF8574:61:REGISTER:READ" ) { record( mbbiDirect, "$(P)$(R)PCF8574:61:REGISTER:READ" ) {
@@ -93,5 +95,6 @@ record( mbbiDirect, "$(P)$(R)PCF8574:61:REGISTER:READ" ) {
field( INP, "@pcf8574.proto rReg(61) I2C") field( INP, "@pcf8574.proto rReg(61) I2C")
field(NOBT, "8") field(NOBT, "8")
field(SCAN, "1 second") field(SCAN, "1 second")
field(PINI,"YES") #field(PINI,"YES")
# field(FLNK, "$(P)$(R)PCF8574:61:REGISTER:READ:FNOUT")
} }

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

@@ -9,7 +9,7 @@
# ### ### # # ### ### #
# ### macros: ID I2C address of ADC ### # # ### macros: ID I2C address of ADC ### #
# ### Description: ### # # ### Description: ### #
# ### This is an example DB file using ### # # ### This DB file is using ### #
# ### stream(asynI2C) to read/write ### # # ### stream(asynI2C) to read/write ### #
# ### an PCF8591 ADDA chip ### # # ### an PCF8591 ADDA chip ### #
####################################################### #######################################################
@@ -29,7 +29,6 @@ record( mbboDirect, "$(P)$(R)PCF8591:72:CTRLREGISTER") {
record( longin, "$(P)$(R)PCF8591:72:ADC_CH1" ) { record( longin, "$(P)$(R)PCF8591:72:ADC_CH1" ) {
field(DTYP, "stream") field(DTYP, "stream")
field(INP, "@pcf8591.proto rConvAdc0(72) I2C") field(INP, "@pcf8591.proto rConvAdc0(72) I2C")
# field( FLNK, "$(P)$(R)PCF8591:72:CHANNEL1" )
} }
record( calc, "$(P)$(R)PCF8591:72:BYTE2_CH1" ) { record( calc, "$(P)$(R)PCF8591:72:BYTE2_CH1" ) {
field(INPA, "$(P)$(R)PCF8591:72:ADC_CH1 PP NMS") field(INPA, "$(P)$(R)PCF8591:72:ADC_CH1 PP NMS")
@@ -37,7 +36,8 @@ record( calc, "$(P)$(R)PCF8591:72:BYTE2_CH1" ) {
field(CALC, " (A & 255 )" ) field(CALC, " (A & 255 )" )
} }
record( ai, "$(P)$(R)TMP2Speed" ) { record( ai, "$(P)$(R)TMPump2-Speed" ) {
field(DESC, "TMPump2-Speed")
field(DTYP, "Raw Soft Channel" ) field(DTYP, "Raw Soft Channel" )
field(INP, "$(P)$(R)PCF8591:72:BYTE2_CH1 PP NMS") field(INP, "$(P)$(R)PCF8591:72:BYTE2_CH1 PP NMS")
field(SCAN, "1 second") field(SCAN, "1 second")
@@ -47,11 +47,14 @@ record( ai, "$(P)$(R)TMP2Speed" ) {
field(PREC, "3" ) field(PREC, "3" )
field(HOPR, "5000" ) field(HOPR, "5000" )
field(LOPR, "0" ) field(LOPR, "0" )
field(LOW, "200.0")
# # field(LOLO,"0.0")
field(LSV, "MINOR")
# # field(LLSV,"MAJOR")
} }
record( longin, "$(P)$(R)PCF8591:72:ADC_CH2" ) { record( longin, "$(P)$(R)PCF8591:72:ADC_CH2" ) {
field(DTYP, "stream") field(DTYP, "stream")
field(INP, "@pcf8591.proto rConvAdc1(72) I2C") field(INP, "@pcf8591.proto rConvAdc1(72) I2C")
#field( FLNK, "
} }
record( calc, "$(P)$(R)PCF8591:72:BYTE2_CH2" ) { record( calc, "$(P)$(R)PCF8591:72:BYTE2_CH2" ) {
field(INPA, "$(P)$(R)PCF8591:72:ADC_CH2 PP NMS") field(INPA, "$(P)$(R)PCF8591:72:ADC_CH2 PP NMS")
@@ -59,7 +62,8 @@ record( calc, "$(P)$(R)PCF8591:72:BYTE2_CH2" ) {
field(CALC, " (A & 255)" ) field(CALC, " (A & 255)" )
} }
record( ai, "$(P)$(R)TMP2Current" ) { record( ai, "$(P)$(R)TMPump2-Current" ) {
field(DESC, "TMPump2-Current")
field(DTYP, "Raw Soft Channel" ) field(DTYP, "Raw Soft Channel" )
field(INP, "$(P)$(R)PCF8591:72:BYTE2_CH2 PP NMS") field(INP, "$(P)$(R)PCF8591:72:BYTE2_CH2 PP NMS")
field(SCAN, "1 second") field(SCAN, "1 second")
@@ -69,4 +73,8 @@ record( ai, "$(P)$(R)TMP2Current" ) {
field(PREC, "3" ) field(PREC, "3" )
field(HOPR, "50" ) field(HOPR, "50" )
field(LOPR, "0" ) field(LOPR, "0" )
field(LOW, "2.0")
# # field(LOLO,"0.0")
field(LSV, "MINOR")
# # field(LLSV,"MAJOR")
} }

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

@@ -40,6 +40,14 @@ record (calc, "$(P)$(R)RPump1-Pressure")
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(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 (longin, "$(P)$(R)P003:M") record (longin, "$(P)$(R)P003:M")
@@ -88,6 +96,14 @@ record (calc, "$(P)$(R)RPump2-Pressure")
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(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") { record(stringout,"$(P)$(R)RS485Debug") {

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

@@ -42,35 +42,35 @@ record(calc, "$(P)$(R)OPCALCSTATE") {
field(INPA,"$(P)$(R)OPSTATE.VAL PP NMS") field(INPA,"$(P)$(R)OPSTATE.VAL PP NMS")
} }
record(calc, "$(P)$(R)OPCALCSTARTSTATE") { 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)OPCALCSTOPSTATE") { record(calc, "$(P)$(R)STOPCALCSTATE") {
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)OPCALCACLEANSTATE") { 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)OPCALCMCLEANSTATE") { #record(calc, "$(P)$(R)OPCALCMCLEANSTATE") {
field(DESC, "Clean Manual Calculated State") # field(DESC, "Clean Manual Calculated State")
field(CALC,"2^A") # field(CALC,"2^A")
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)OPCALCWSHOTSTATE") { 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")
@@ -90,49 +90,15 @@ record(bo, "$(P)$(R)OPREQ") {
field(ONAM, "START") field(ONAM, "START")
} }
record(bo, "$(P)$(R)CLEANINGMASTATE") { record(bo, "$(P)$(R)CLEANINGMANMODE") {
field(DESC, "Cleaning Manual/Auto") field(DESC, "Cleaning Manual/Auto")
field(VAL, "1") field(VAL, "1")
field(ZNAM, "M") field(ZNAM, "M")
field(ONAM, "A") field(ONAM, "A")
} }
record(ai, "$(P)$(R)CLEANINGINOUTSTATE") {
field(DESC, "Cleaning Automatic In/Out")
field(VAL, "1")
}
record(ai, "$(P)$(R)CLEANINGINOUTSTATE0") { record(bo, "$(P)$(R)FSTriggerStart") {
field(DESC, "Cleaning Automatic In/Out")
field(VAL, "-2")
}
record(ai, "$(P)$(R)CLEANINGINOUTSTATE1") {
field(DESC, "Cleaning Automatic In/Out")
field(VAL, "-2")
}
record(ai, "$(P)$(R)CLEANINGINOUTSTATE2") {
field(DESC, "Cleaning Automatic In/Out")
field(VAL, "-2")
}
record(ai, "$(P)$(R)CLEANINGINOUTSTATE3") {
field(DESC, "Cleaning Automatic In/Out")
field(VAL, "-2")
}
record(ai, "$(P)$(R)CLEANINGINOUTSTATE4") {
field(DESC, "Cleaning Automatic In/Out")
field(VAL, "-2")
}
record(ai, "$(P)$(R)CLEANINGINOUTSTATE5") {
field(DESC, "Cleaning Automatic In/Out")
field(VAL, "-2")
}
record(bo, "$(P)$(R)FSTriggerState") {
field(DESC, "FireSignal Trigger Start") field(DESC, "FireSignal Trigger Start")
field(VAL, "0") field(VAL, "0")
field(ZNAM, "STOP") field(ZNAM, "STOP")
@@ -246,7 +212,7 @@ record(mbbi, "$(P)$(R)CLEANINGSTATE") {
} }
record(mbbi, "$(P)$(R)WSHOTINGSTATE") { record(mbbi, "$(P)$(R)WSHOTINGSTATE") {
field(DESC, "Shoting State Sequence") field(DESC, "Shooting State Sequence")
field(ZRVL, "0") field(ZRVL, "0")
field(ONVL, "1") field(ONVL, "1")
field(TWVL, "2") field(TWVL, "2")
@@ -259,18 +225,18 @@ record(mbbi, "$(P)$(R)WSHOTINGSTATE") {
field(NIVL, "9") field(NIVL, "9")
field(TEVL, "10") field(TEVL, "10")
field(ELVL, "11") field(ELVL, "11")
field(ZRST, "NonShoting") field(ZRST, "NonShooting")
field(ONST, "Shoting1") field(ONST, "Shooting1")
field(TWST, "Shoting2") field(TWST, "Shooting2")
field(THST, "Shoting3") field(THST, "Shooting3")
field(FRST, "Shoting4") field(FRST, "Shooting4")
field(FVST, "Shoting5") field(FVST, "Shooting5")
field(SXST, "Shoting6") field(SXST, "Shooting6")
field(SVST, "Shoting7") field(SVST, "Shooting7")
field(EIST, "Shoting8") field(EIST, "Shooting8")
field(NIST, "Shoting9") field(NIST, "Shooting9")
field(TEST, "Shoting10") field(TEST, "Shooting10")
field(ELST, "Shoting11") field(ELST, "Shooting11")
field(VAL, "0") field(VAL, "0")
} }

167
epics/iocs/ISTTOKrpi/ISTTOKrpiApp/Db/ISTTOKvacummPumps.db → epics/iocs/ISTTOKrpi/ISTTOKrpiApp/Db/ISTTOKvacuumPumps.db
View File

@@ -7,57 +7,64 @@
##################################### #####################################
### 24V commands - Optocoupler Out### ### 24V commands - Optocoupler Out###
##################################### #####################################
record(bo, "$(P)$(R)TMPControllerOn" ) { record(bo, "$(P)$(R)TMPump1-ControllerOn" ) {
# field(DESC,"Sinal p/ TMP 1, Liga a alimentação do controlador, vai a HIGH e depois a LOW")
# field( ZNAM, "Off" )record(bo, "$(P)$(R)TMPControllerOn" ) {
field(ZNAM, "Off" ) field(ZNAM, "Off" )
field(ONAM, "Pulse" ) field(ONAM, "Pulse" )
field(HIGH, "2.5") field(HIGH, "2.5")
field( FLNK, "$(P)$(R)TMPControllerOnInv" ) field(FLNK, "$(P)$(R)TMPump1-ControllerOnInv" )
}
record(calcout, "$(P)$(R)TMPControllerOnInv" ) { # field( FLNK, "$(P)$(R)TMPControllerOnInv" )
}
record(calcout, "$(P)$(R)TMPump1-ControllerOnInv" ) {
#record(calcout, "$(P)$(R)TMPControllerOnInv" ) {
field( INPA, "$(P)$(R)TMPControllerOn NPP MS" ) field( INPA, "$(P)$(R)TMPControllerOn NPP MS" )
field( OUT, "$(P)$(R)PCF8574:56:REGISTER.B0 PP MS" ) field( OUT, "$(P)$(R)PCF8574:56:REGISTER.B0 PP MS" )
field( OOPT, "On Change" ) field( OOPT, "On Change" )
field( CALC, "A?0:1" ) field( CALC, "A?0:1" )
} }
record(bo, "$(P)$(R)TMPControllerOff" ) { record(bo, "$(P)$(R)TMPump1-ControllerOff" ) {
# field(DESC," Sinal p/ TMP 1, desliga a alimentação do controlador, LOW->HIGH-> LOW")
# record(bo, "$(P)$(R)TMPControllerOff" ) {
field(ZNAM, "Off" ) field(ZNAM, "Off" )
field(ONAM, "Pulse" ) field(ONAM, "Pulse" )
field(HIGH, "2.5") field(HIGH, "2.5")
field( FLNK, "$(P)$(R)TMPControllerOffInv" ) #field( FLNK, "$(P)$(R)TMPControllerOffInv" )
field(FLNK, "$(P)$(R)TMPump1-ControllerOffInv" )
} }
record(calcout, "$(P)$(R)TMPControllerOffInv") { record(calcout, "$(P)$(R)TMPump1-ControllerOffInv") {
field( INPA, "$(P)$(R)TMPControllerOff NPP MS" ) field( INPA, "$(P)$(R)TMPump1-ControllerOff NPP MS" )
field( OUT, "$(P)$(R)PCF8574:56:REGISTER.B1 PP MS") field( OUT, "$(P)$(R)PCF8574:56:REGISTER.B1 PP MS")
field( OOPT, "On Change" ) field( OOPT, "On Change" )
field( CALC, "A?0:1" ) field( CALC, "A?0:1" )
} }
record(bo, "$(P)$(R)TMPMotorOn" ) { record(bo, "$(P)$(R)TMPump1-MotorOn" ) {
field( ZNAM, "Off") field( ZNAM, "Off")
field( ONAM, "Pulse") field( ONAM, "Pulse")
field( HIGH, "2.5") field( HIGH, "2.5")
field( FLNK, "$(P)$(R)TMPMotorOnInv") field( FLNK, "$(P)$(R)TMPump1-MotorOnInv")
} }
record(calcout, "$(P)$(R)TMPMotorOnInv" ) { record(calcout, "$(P)$(R)TMPump1-MotorOnInv" ) {
field( INPA, "$(P)$(R)TMPMotorOn NPP MS") field( INPA, "$(P)$(R)TMPump1-MotorOn NPP MS")
field( OUT, "$(P)$(R)PCF8574:56:REGISTER.B2 PP MS") field( OUT, "$(P)$(R)PCF8574:56:REGISTER.B2 PP MS")
field( OOPT, "On Change") field( OOPT, "On Change")
field( CALC, "A?0:1" ) field( CALC, "A?0:1" )
} }
record(bo, "$(P)$(R)TMPMotorOff") { record(bo, "$(P)$(R)TMPump1-MotorOff") {
field( ZNAM, "Off") field( ZNAM, "Off")
field( ONAM, "Pulse") field( ONAM, "Pulse")
field( HIGH, "2.5") field( HIGH, "2.5")
field( FLNK, "$(P)$(R)TMPMotorOffInv") field( FLNK, "$(P)$(R)TMPump1-MotorOffInv")
} }
record(calcout, "$(P)$(R)TMPMotorOffInv") { record(calcout, "$(P)$(R)TMPump1-MotorOffInv") {
field( INPA, "$(P)$(R)TMPMotorOff NPP MS") field( INPA, "$(P)$(R)TMPump1-MotorOff NPP MS")
field( OUT, "$(P)$(R)PCF8574:56:REGISTER.B3 PP MS") field( OUT, "$(P)$(R)PCF8574:56:REGISTER.B3 PP MS")
field( OOPT, "On Change") field( OOPT, "On Change")
field( CALC, "A?0:1") field( CALC, "A?0:1")
@@ -67,35 +74,46 @@ record(calcout, "$(P)$(R)TMPMotorOffInv") {
### TMP1 Controller inputs### ### TMP1 Controller inputs###
############################# #############################
record(fanout, "$(P)$(R)PCF8574:56:REGISTER:READ:FNOUT"){ record(fanout, "$(P)$(R)PCF8574:56:REGISTER:READ:FNOUT"){
field(LNK1, "$(P)$(R)Turbo_PW_Ind") field(LNK1, "$(P)$(R)TMPump1-Power")
field(LNK2, "$(P)$(R)Turbo_Emergency") field(LNK2, "$(P)$(R)TMPump1-Emergency")
field(LNK3, "$(P)$(R)TMPump1-Acceleration")
field(LNK4, "$(P)$(R)TMPump1-NormalOperation")
# field(LNK2, "$(P)$(R)Turbo_Emergency")
} }
record(bi , "$(P)$(R)Turbo_PW_Ind" ) { record(bi , "$(P)$(R)TMPump1-Power" ) {
field(DESC," TMP1 – Alimentada 220V ")
#record(bi , "$(P)$(R)Turbo_PW_Ind" ) {
field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B4 NPP NMS") field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B4 NPP NMS")
# field( SCAN, "1 second") # field( SCAN, "1 second")
field( ZNAM, "ON" ) field( ZNAM, "ON" )
field( ONAM, "OFF" ) field( ONAM, "OFF" )
# field(FLNK, "$(P)$(R)Turbo_Emergency") # field(FLNK, "$(P)$(R)Turbo_Emergency")
} }
record(bi , "$(P)$(R)TMPump1-Emergency") {
record(bi , "$(P)$(R)Turbo_Emergency") { field(DESC," TMP1 – Falha ")
#record(bi , "$(P)$(R)Turbo_Emergency") {
field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B5 NPP NMS") field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B5 NPP NMS")
field( ZNAM, "ON" ) field( ZNAM, "ON" )
field( ONAM, "OFF" ) field( ONAM, "OFF" )
field(FLNK, "$(P)$(R)Turbo_Acceleration") field(ZSV,"MAJOR")
# field(FLNK, "$(P)$(R)Turbo_Acceleration")
} }
record(bi , "$(P)$(R)TMPump1-Acceleration") {
record(bi , "$(P)$(R)Turbo_Acceleration") { field(DESC," TMP1 – Motor em aceleração ")
#record(bi , "$(P)$(R)Turbo_Acceleration") {
field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B6 NPP NMS") field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B6 NPP NMS")
field( ZNAM, "ON" ) field( ZNAM, "ON" )
field( ONAM, "OFF" ) field( ONAM, "OFF" )
field(FLNK, "$(P)$(R)Turbo_NormalOperation") # field(FLNK, "$(P)$(R)Turbo_NormalOperation")
} }
record(bi , "$(P)$(R)Turbo_NormalOperation" ) { record(bi , "$(P)$(R)TMPump1-NormalOperation" ) {
field(DESC," TMP1 – Operação Normal ")
#record(bi , "$(P)$(R)Turbo_NormalOperation" ) {
field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B7 NPP NMS") field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B7 NPP NMS")
field( ZNAM, "ON" ) field( ZNAM, "ON" )
field( ONAM, "OFF" ) field( ONAM, "OFF" )
field(OSV,"MINOR")
} }
############### ###############
@@ -107,14 +125,20 @@ record(bi , "$(P)$(R)Turbo_NormalOperation" ) {
############################## ##############################
### TMP2 Controller Inputs ### ### TMP2 Controller Inputs ###
############################## ##############################
record(bi , "$(P)$(R)Turbo2_Emergency") { record(fanout, "$(P)$(R)PCF8574:57:REGISTER:READ:FNOUT"){
field(LNK1, "$(P)$(R)TMPump2-Emergency")
field(LNK2, "$(P)$(R)TMPump2-Acceleration")
}
record(bi , "$(P)$(R)TMPump2-Emergency") {
field(DESC," TMP2 – Falha ")
field( INP, "$(P)$(R)PCF8574:57:REGISTER:READ.B0 NPP NMS") field( INP, "$(P)$(R)PCF8574:57:REGISTER:READ.B0 NPP NMS")
field( ZNAM, "ON" ) field( ZNAM, "ON" )
field( ONAM, "OFF" ) field( ONAM, "OFF" )
field(FLNK, "$(P)$(R)Turbo2_Acceleration") # field(FLNK, "$(P)$(R)Turbo2_Acceleration")
} }
record(bi , "$(P)$(R)Turbo2_Acceleration") { record(bi , "$(P)$(R)TMPump2-Acceleration") {
field(DESC," TMP2 – START until Normal ")
field( INP, "$(P)$(R)PCF8574:57:REGISTER:READ.B1 NPP NMS") field( INP, "$(P)$(R)PCF8574:57:REGISTER:READ.B1 NPP NMS")
field( ZNAM, "ON" ) field( ZNAM, "ON" )
field( ONAM, "OFF" ) field( ONAM, "OFF" )
@@ -132,14 +156,14 @@ record(bo, "$(P)$(R)TMP2MotorOnOff" ) {
############################## ##############################
# BUZZER ON/OFF # # BUZZER ON/OFF #
############################## ##############################
record(bo, "$(P)$(R)BuzzerOnOff" ) { record(bo, "$(P)$(R)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)BuzzerOnOffInv" ) field( FLNK, "$(P)$(R)BuzzerInv" )
} }
record(calcout, "$(P)$(R)BuzzerOnOffInv" ) { record(calcout, "$(P)$(R)BuzzerInv" ) {
field( INPA, "$(P)$(R)BuzzerOnOff NPP MS" ) field( INPA, "$(P)$(R)Buzzer NPP MS" )
field( OUT, "$(P)$(R)PCF8574:57:REGISTER.B3 PP MS" ) field( OUT, "$(P)$(R)PCF8574:57:REGISTER.B3 PP MS" )
field( OOPT, "On Change" ) field( OOPT, "On Change" )
field( CALC, "A?0:1" ) field( CALC, "A?0:1" )
@@ -148,7 +172,8 @@ record(calcout, "$(P)$(R)BuzzerOnOffInv" ) {
############################## ##############################
# EMERGENCY MODE # # EMERGENCY MODE #
############################## ##############################
record( bo, "$(P)$(R)EmergencyOnOff" ) { record( bo, "$(P)$(R)EmergencyButton" ) {
field(DESC," Botao fisico que executa a soft Emergency ")
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")
@@ -179,7 +204,9 @@ record(bi , "$(P)$(R)TimingTriggerSignal" ) {
############################# #############################
# ROTARY1 PUMP # # ROTARY1 PUMP #
############################# #############################
record( bo, "$(P)$(R)RotatoryPump" ) { record( bo, "$(P)$(R)RPump1-Motor" ) {
# field(DESC," Liga a alimentação da bomba rotatória 1 ")
#record( bo, "$(P)$(R)RotatoryPump" ) {
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" )
@@ -188,7 +215,9 @@ record( bo, "$(P)$(R)RotatoryPump" ) {
############################# #############################
# ROTARY1 VALVE # # ROTARY1 VALVE #
############################# #############################
record( bo, "$(P)$(R)RotatoryValve" ) { record( bo, "$(P)$(R)RPump1-Valve" ) {
field(DESC," Abre a valvula da bomba rotatoria 1 ")
# record( bo, "$(P)$(R)RotatoryValve" ) {
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" )
@@ -197,7 +226,9 @@ record( bo, "$(P)$(R)RotatoryValve" ) {
############################# #############################
# ROTARY2 PUMP # # ROTARY2 PUMP #
############################# #############################
record( bo, "$(P)$(R)RotatoryPump2" ) { record( bo, "$(P)$(R)RPump2-Motor" ) {
field(DESC," Liga a alimentacao da bomba rotatoria 2 ")
#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" )
@@ -206,7 +237,9 @@ record( bo, "$(P)$(R)RotatoryPump2" ) {
############################# #############################
# ROTARY2 VALVE # # ROTARY2 VALVE #
############################# #############################
record( bo, "$(P)$(R)RotatoryValve2" ) { record( bo, "$(P)$(R)RPump2-Valve" ) {
field(DESC," Abre a valvula da bomba rotatoria 2 ")
#record( bo, "$(P)$(R)RotatoryValve2" ) {
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" )
@@ -215,7 +248,9 @@ record( bo, "$(P)$(R)RotatoryValve2" ) {
################################ ################################
# FILAMENT ON/OFF # # FILAMENT ON/OFF #
################################ ################################
record(bo, "$(P)$(R)FilamentOnOff" ) { record(bo, "$(P)$(R)VVessel-Filament" ) {
field(DESC," Filamento dentro do TOK para pre ionizar a câmara")
# 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" )
@@ -224,7 +259,9 @@ record(bo, "$(P)$(R)FilamentOnOff" ) {
############################## ##############################
# LIGHTS ON/OFF # # LIGHTS ON/OFF #
############################## ##############################
record(bo, "$(P)$(R)LightsOnOff" ) { 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( OUT, "$(P)$(R)PCF8574:60:REGISTER.B5 PP" )
field( ZNAM, "On" ) field( ZNAM, "On" )
field( ONAM, "Off" ) field( ONAM, "Off" )
@@ -238,7 +275,9 @@ record(bo, "$(P)$(R)LightsOnOff" ) {
############################## ##############################
# TOR CLEAN CONTACTOR ON/OFF # # TOR CLEAN CONTACTOR ON/OFF #
############################## ##############################
record(bo, "$(P)$(R)ToroidalCleanContactorOnOff" ) { record(bo, "$(P)$(R)Clean-TorContactor" ) {
# field(DESC," Contactor 220V do transformador para a fonte de campo toroidal das descargas de limpeza (500 A) ")
# record(bo, "$(P)$(R)ToroidalCleanContactorOnOff" ) {
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" )
@@ -253,25 +292,34 @@ record(bo, "$(P)$(R)ToroidalCleanContactorOnOff" ) {
############################ ############################
# TOR CLEAN BREAKER ON/OFF # # TOR CLEAN BREAKER ON/OFF #
############################ ############################
record(bo, "$(P)$(R)ToroidalCleanBreakerOnOff" ) { record(bo, "$(P)$(R)Clean-TorPneuBreaker" ) {
## field(DESC," Interruptor de ar comprimido do transformador para a fonte de campo toroidal das descargas de limpeza (500 A)")
#record(bo, "$(P)$(R)ToroidalCleanBreakerOnOff" ) {
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" )
} }
record(bo, "$(P)$(R)ToroidalShotEnableOnOff" ) { record(bo, "$(P)$(R)Shot-TorPSDisable" ) {
# field(DESC," É desligado na emergência e em qualquer estado que não seja Process ou Wait Shot.")
# record(bo, "$(P)$(R)ToroidalShotEnableOnOff" ) {
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" )
} }
record(bo, "$(P)$(R)ToroidalShotTriggerOnOff" ) { record(bo, "$(P)$(R)Shot-TorPSTrigger" ) {
field(DESC," Trigger da FRAEP")
# record(bo, "$(P)$(R)ToroidalShotTriggerOnOff" ) {
field( ZNAM, "Off" ) field( ZNAM, "Off" )
field( ONAM, "Pulse" ) field( ONAM, "Pulse" )
field( HIGH, "2.5") field( HIGH, "2.5")
field( FLNK, "$(P)$(R)ToroidalShotTriggerOnOffInv" ) field( FLNK, "$(P)$(R)Shot-TorPSTriggerInv" )
# field( FLNK, "$(P)$(R)ToroidalShotTriggerOnOffInv" )
} }
record(calcout, "$(P)$(R)ToroidalShotTriggerOnOffInv" ) { record(calcout, "$(P)$(R)Shot-TorPSTriggerInv" ) {
# field(DESC," $(R)")
#record(calcout, "$(P)$(R)ToroidalShotTriggerOnOffInv" ) {
field( INPA, "$(P)$(R)ToroidalShotTriggerOnOff NPP MS" ) field( INPA, "$(P)$(R)ToroidalShotTriggerOnOff NPP MS" )
field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B2 PP MS" ) field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B2 PP MS" )
field( OOPT, "On Change" ) field( OOPT, "On Change" )
@@ -282,7 +330,9 @@ record(calcout, "$(P)$(R)ToroidalShotTriggerOnOffInv" ) {
####################################### #######################################
# CAP BANK CHARGE ON/OFF # # CAP BANK CHARGE ON/OFF #
####################################### #######################################
record(bo, "$(P)$(R)CapBankChargeOnOff" ) { record(bo, "$(P)$(R)CapBank-Charge" ) {
## field(DESC," Contactor 220V do circuito de carga do banco de condensadores p/ SHOT (ELCO) ")
#record(bo, "$(P)$(R)CapBankChargeOnOff" ) {
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" )
@@ -291,7 +341,9 @@ record(bo, "$(P)$(R)CapBankChargeOnOff" ) {
######################################## ########################################
# PRIMARY CLEAN CONTACTOR ON/OFF # # PRIMARY CLEAN CONTACTOR ON/OFF #
######################################## ########################################
record(bo, "$(P)$(R)PrimaryCleanContactorOnOff" ) { record(bo, "$(P)$(R)Clean-PrimContactor" ) {
# field(DESC," Contactor 220V do para o primário das descargas de limpeza ")
# record(bo, "$(P)$(R)PrimaryCleanContactorOnOff" ) {
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" )
@@ -300,7 +352,8 @@ record(bo, "$(P)$(R)PrimaryCleanContactorOnOff" ) {
#################################### ####################################
### PRIMARY CLEAN BREAKER ON/OFF ### ### PRIMARY CLEAN BREAKER ON/OFF ###
#################################### ####################################
record(bo, "$(P)$(R)PrimaryCleanBreakerOnOff"){ record(bo, "$(P)$(R)Clean-PrimPneuBreaker"){
#record(bo, "$(P)$(R)PrimaryCleanBreakerOnOff"){
field( DESC, "Primary Cleaning OnOff") field( DESC, "Primary Cleaning OnOff")
field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B5 PP" ) field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B5 PP" )
field( ZNAM, "On") field( ZNAM, "On")
@@ -310,7 +363,9 @@ record(bo, "$(P)$(R)PrimaryCleanBreakerOnOff"){
################################## ##################################
# GIS VALVES ON/OFF # # GIS VALVES ON/OFF #
################################## ##################################
record(bo, "$(P)$(R)GISValvesOnOff" ) { record(bo, "$(P)$(R)GasIS-Valves" ) {
# field(DESC," 2 válvulas pneumáticas de corte do sistema de injecção de H/D/Ne/He no TOK, 24V out = deixa passar")
# record(bo, "$(P)$(R)GISValvesOnOff" ) {
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" )
@@ -319,7 +374,9 @@ record(bo, "$(P)$(R)GISValvesOnOff" ) {
########################################## ##########################################
# CAP BANK DISCHARGE ON/OFF # # CAP BANK DISCHARGE ON/OFF #
########################################## ##########################################
record(bo, "$(P)$(R)CapBankDischargeOnOff" ) { record(bo, "$(P)$(R)CapBank-Discharge" ) {
field(DESC," Liga o circuito de descarga do ELCO ")
# record(bo, "$(P)$(R)CapBankDischargeOnOff" ) {
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" )
@@ -343,7 +400,9 @@ record(ai,"$(P)$(R)Bypass_Condition"){
field(VAL,"0") field(VAL,"0")
} }
record(ai,"$(P)$(R)Turbo2_Speed"){ record(ai,"$(P)$(R)TMPump2-Speed"){
# field(DESC," ADC Pump speed 0-10V ")
#record(ai,"$(P)$(R)Turbo2_Speed"){
field(PREC,"3") field(PREC,"3")
field(EGU,"RPM") field(EGU,"RPM")
field(VAL,"0") field(VAL,"0")
@@ -352,7 +411,9 @@ record(ai,"$(P)$(R)Turbo2_Speed"){
####################### #######################
###TMP1 Manual Valve### ###TMP1 Manual Valve###
####################### #######################
record(bo, "$(P)$(R)TMPManualValve"){ record(bo, "$(P)$(R)TMPump1-ManualValve"){
# field(DESC," $(R)")
#record(bo, "$(P)$(R)TMPManualValve"){
info(autosaveFields, "VAL") info(autosaveFields, "VAL")
field( DESC, "State of manual valve") field( DESC, "State of manual valve")
field( ZNAM, "Closed") field( ZNAM, "Closed")

2
epics/iocs/ISTTOKrpi/ISTTOKrpiApp/Db/Makefile
View File

@@ -5,7 +5,7 @@ include $(TOP)/configure/CONFIG
# Install databases, templates & substitutions like this # Install databases, templates & substitutions like this
DB += ISTTOKstates.db DB += ISTTOKstates.db
DB += ISTTOKvacummPumps.db DB += ISTTOKvacuumPumps.db
DB += ISTTOKpcf8574.db DB += ISTTOKpcf8574.db
DB += ISTTOKpcf8591.db DB += ISTTOKpcf8591.db
DB += ISTTOKpfeiffer.db DB += ISTTOKpfeiffer.db

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

File diff suppressed because it is too large Load Diff

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

@@ -1,7 +1,7 @@
ISTTOK:central:PULSE-NUMBER.VAL ISTTOK:central:PULSE-NUMBER.VAL
ISTTOK:central:PROCESS-MODE.VAL ISTTOK:central:PROCESS-MODE.VAL
ISTTOK:central:TMPManualValve.VAL ISTTOK:central:TMPump1-ManualValve.VAL
ISTTOK:central:OPREQ ISTTOK:central:OPREQ
ISTTOK:central:PROCESS-MODE.VAL ISTTOK:central:PROCESS-MODE.VAL
@@ -9,16 +9,16 @@ 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:CLEANINGMASTATE.VAL ISTTOK:central:CLEANINGMANMODE.VAL
ISTTOK:central:CLEANINGINOUTSTATE.VAL #ISTTOK:central:CLEANINGINOUTSTATE.VAL
ISTTOK:central:CLEANINGINOUTSTATE0.VAL #ISTTOK:central:CLEANINGINOUTSTATE0.VAL
ISTTOK:central:CLEANINGINOUTSTATE1.VAL #ISTTOK:central:CLEANINGINOUTSTATE1.VAL
ISTTOK:central:CLEANINGINOUTSTATE2.VAL #ISTTOK:central:CLEANINGINOUTSTATE2.VAL
ISTTOK:central:CLEANINGINOUTSTATE3.VAL #ISTTOK:central:CLEANINGINOUTSTATE3.VAL
ISTTOK:central:CLEANINGINOUTSTATE4.VAL #ISTTOK:central:CLEANINGINOUTSTATE4.VAL
ISTTOK:central:CLEANINGINOUTSTATE5.VAL #ISTTOK:central:CLEANINGINOUTSTATE5.VAL
ISTTOK:central:WSHOTINGSTATE.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:EmergencyOnOff.VAL ISTTOK:central:EmergencyButton.VAL

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

@@ -17,23 +17,11 @@ ISTTOKrpi_registerRecordDeviceDriver pdbbase
## Load I2C drivers ## Load I2C drivers
drvAsynI2CConfigure( "I2C", "/dev/i2c-1", 1 ) drvAsynI2CConfigure( "I2C", "/dev/i2c-1", 1 )
## Load Serial drivers
#drvAsynSerialPortConfigure("RS0","/dev/ttyUSB0")
#asynSetOption("RS0", 0, "baud", "9600")
#asynSetOption("RS0", 0, "bits", "8")
#asynSetOption("RS0", 0, "parity", "none")
#asynSetOption("RS0", 0, "stop", "1")
#asynSetOption("RS0", 0, "clocal", "Y")
#asynSetOption("RS0", 0, "crtscts", "N")
## Load record instances ## Load record instances
dbLoadRecords("db/ISTTOKstates.db","P=ISTTOK:,R=central:") dbLoadRecords("db/ISTTOKstates.db","P=ISTTOK:,R=central:")
dbLoadRecords("db/ISTTOKpcf8574.db","P=ISTTOK:,R=central:") dbLoadRecords("db/ISTTOKpcf8574.db","P=ISTTOK:,R=central:")
dbLoadRecords("db/ISTTOKpcf8591.db","P=ISTTOK:,R=central:") dbLoadRecords("db/ISTTOKpcf8591.db","P=ISTTOK:,R=central:")
#dbLoadRecords("db/ISTTOKpcf8574.db","P=ISTTOK:,R=central:,ID=57") dbLoadRecords("db/ISTTOKvacuumPumps.db","P=ISTTOK:,R=central:")
dbLoadRecords("db/ISTTOKvacummPumps.db","P=ISTTOK:,R=central:")
## Load Serial drivers ## Load Serial drivers
drvAsynSerialPortConfigure("RS0","/dev/ttyUSB0") drvAsynSerialPortConfigure("RS0","/dev/ttyUSB0")