drvI2C working ?
This commit is contained in:
Bernardo Carvalho
@@ -1,8 +1,8 @@
|
||||
#############################################
|
||||
## Project : ISTTOK slow Control
|
||||
##
|
||||
## File :
|
||||
## Description : Records for ISTTOK Control I/O channels connected to 2 Velleman board
|
||||
## File :
|
||||
## Description : Records for ISTTOK Control I/O channels connected to 2 Velleman board
|
||||
##
|
||||
##
|
||||
## Author : Bernardo Carvalho (IPFN-IST)
|
||||
@@ -23,108 +23,103 @@
|
||||
### 24V commands - Optocoupler Out###
|
||||
#####################################
|
||||
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(ONAM, "Pulse" )
|
||||
field(HIGH, "2.5")
|
||||
field(FLNK, "$(P)$(R)TMPump1-ControllerOnInv" )
|
||||
field(VAL,"0")
|
||||
|
||||
# field( FLNK, "$(P)$(R)TMPControllerOnInv" )
|
||||
field(DESC,"Signal to TMP 1, goes HIGH and LW")
|
||||
field(ZNAM, "Off" )
|
||||
field(ONAM, "Pulse" )
|
||||
field(HIGH, "2.5")
|
||||
field(FLNK, "$(P)$(R)TMPump1-ControllerOnInv" )
|
||||
field(VAL,"0")
|
||||
}
|
||||
record(calcout, "$(P)$(R)TMPump1-ControllerOnInv" ) {
|
||||
#record(calcout, "$(P)$(R)TMPControllerOnInv" ) {
|
||||
field( INPA, "$(P)$(R)TMPControllerOn NPP MS" )
|
||||
field( OUT, "$(P)$(R)PCF8574:56:REGISTER.B0 PP MS" )
|
||||
field( OOPT, "On Change" )
|
||||
field( CALC, "A?0:1" )
|
||||
record(calcout, "$(P)$(R)TMPump1-ControllerOnInv") {
|
||||
field(INPA, "$(P)$(R)TMPump1-ControllerOn NPP MS")
|
||||
field(OUT, "$(P)$(R)PCF8574:56:REGISTER.B0 PP MS")
|
||||
field(OOPT, "On Change")
|
||||
field(CALC, "A?0:1")
|
||||
}
|
||||
|
||||
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(ONAM, "Pulse" )
|
||||
field(HIGH, "2.5")
|
||||
#field( FLNK, "$(P)$(R)TMPControllerOffInv" )
|
||||
field(FLNK, "$(P)$(R)TMPump1-ControllerOffInv" )
|
||||
field(VAL,"0")
|
||||
field(ZNAM, "Off" )
|
||||
field(ONAM, "Pulse" )
|
||||
field(HIGH, "2.5")
|
||||
field(FLNK, "$(P)$(R)TMPump1-ControllerOffInv" )
|
||||
field(VAL,"0")
|
||||
}
|
||||
|
||||
record(calcout, "$(P)$(R)TMPump1-ControllerOffInv") {
|
||||
field( INPA, "$(P)$(R)TMPump1-ControllerOff NPP MS" )
|
||||
field( OUT, "$(P)$(R)PCF8574:56:REGISTER.B1 PP MS")
|
||||
field( OOPT, "On Change" )
|
||||
field( CALC, "A?0:1" )
|
||||
field(INPA, "$(P)$(R)TMPump1-ControllerOff NPP MS" )
|
||||
field(OUT, "$(P)$(R)PCF8574:56:REGISTER.B1 PP MS")
|
||||
field(OOPT, "On Change")
|
||||
field(CALC, "A?0:1")
|
||||
}
|
||||
|
||||
record(bo, "$(P)$(R)TMPump1-MotorOn" ) {
|
||||
field( ZNAM, "Off")
|
||||
field( ONAM, "Pulse")
|
||||
field( HIGH, "2.5")
|
||||
field( FLNK, "$(P)$(R)TMPump1-MotorOnInv")
|
||||
field( ZNAM, "Off")
|
||||
field( ONAM, "Pulse")
|
||||
field( HIGH, "2.5")
|
||||
field( FLNK, "$(P)$(R)TMPump1-MotorOnInv")
|
||||
}
|
||||
|
||||
record(calcout, "$(P)$(R)TMPump1-MotorOnInv" ) {
|
||||
field( INPA, "$(P)$(R)TMPump1-MotorOn NPP MS")
|
||||
field( OUT, "$(P)$(R)PCF8574:56:REGISTER.B2 PP MS")
|
||||
field( OOPT, "On Change")
|
||||
field( CALC, "A?0:1" )
|
||||
field( INPA, "$(P)$(R)TMPump1-MotorOn NPP MS")
|
||||
field( OUT, "$(P)$(R)PCF8574:56:REGISTER.B2 PP MS")
|
||||
field( OOPT, "On Change")
|
||||
field( CALC, "A?0:1" )
|
||||
}
|
||||
|
||||
record(bo, "$(P)$(R)TMPump1-MotorOff") {
|
||||
field( ZNAM, "Off")
|
||||
field( ONAM, "Pulse")
|
||||
field( HIGH, "2.5")
|
||||
field( FLNK, "$(P)$(R)TMPump1-MotorOffInv")
|
||||
field(VAL,"0")
|
||||
field( ZNAM, "Off")
|
||||
field( ONAM, "Pulse")
|
||||
field( HIGH, "2.5")
|
||||
field( FLNK, "$(P)$(R)TMPump1-MotorOffInv")
|
||||
field(VAL,"0")
|
||||
}
|
||||
|
||||
record(calcout, "$(P)$(R)TMPump1-MotorOffInv") {
|
||||
field( INPA, "$(P)$(R)TMPump1-MotorOff NPP MS")
|
||||
field( OUT, "$(P)$(R)PCF8574:56:REGISTER.B3 PP MS")
|
||||
field( OOPT, "On Change")
|
||||
field( CALC, "A?0:1")
|
||||
field( INPA, "$(P)$(R)TMPump1-MotorOff NPP MS")
|
||||
field( OUT, "$(P)$(R)PCF8574:56:REGISTER.B3 PP MS")
|
||||
field( OOPT, "On Change")
|
||||
field( CALC, "A?0:1")
|
||||
}
|
||||
|
||||
#############################
|
||||
### TMP1 Controller inputs###
|
||||
#############################
|
||||
record(fanout, "$(P)$(R)PCF8574:56:REGISTER:READ:FNOUT"){
|
||||
field(LNK1, "$(P)$(R)TMPump1-Power")
|
||||
field(LNK2, "$(P)$(R)TMPump1-Emergency")
|
||||
field(LNK3, "$(P)$(R)TMPump1-Acceleration")
|
||||
field(LNK4, "$(P)$(R)TMPump1-NormalOperation")
|
||||
field(LNK1, "$(P)$(R)TMPump1-Power")
|
||||
field(LNK2, "$(P)$(R)TMPump1-Emergency")
|
||||
field(LNK3, "$(P)$(R)TMPump1-Acceleration")
|
||||
field(LNK4, "$(P)$(R)TMPump1-NormalOperation")
|
||||
}
|
||||
record(bi , "$(P)$(R)TMPump1-Power" ) {
|
||||
field(DESC," TMP1 – Alimentada 220V ")
|
||||
field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B4 NPP NMS")
|
||||
field( ZNAM, "ON" )
|
||||
field( ONAM, "OFF" )
|
||||
field(DESC," TMP1 – Alimentada 220V ")
|
||||
field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B4 NPP NMS")
|
||||
field( ZNAM, "ON" )
|
||||
field( ONAM, "OFF" )
|
||||
}
|
||||
record(bi , "$(P)$(R)TMPump1-Emergency") {
|
||||
field(DESC," TMP1 – Falha ")
|
||||
field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B6 NPP NMS")
|
||||
field(DESC," TMP1 – Falha ")
|
||||
field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B6 NPP NMS")
|
||||
# field(VAL,"1")
|
||||
field( ZNAM, "ON" )
|
||||
field( ONAM, "OFF" )
|
||||
field(ZSV,"MAJOR")
|
||||
field( ZNAM, "ON" )
|
||||
field( ONAM, "OFF" )
|
||||
field(ZSV,"MAJOR")
|
||||
}
|
||||
record(bi , "$(P)$(R)TMPump1-Acceleration") {
|
||||
field(DESC," TMP1 – Motor em aceleração ")
|
||||
field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B5 NPP NMS")
|
||||
field( ZNAM, "ON" )
|
||||
field( ONAM, "OFF" )
|
||||
field(ZSV,"MINOR")
|
||||
field(DESC," TMP1 – Motor em aceleração ")
|
||||
field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B5 NPP NMS")
|
||||
field( ZNAM, "ON" )
|
||||
field( ONAM, "OFF" )
|
||||
field(ZSV,"MINOR")
|
||||
}
|
||||
|
||||
record(bi , "$(P)$(R)TMPump1-NormalOperation" ) {
|
||||
field(DESC," TMP1 – Operação Normal ")
|
||||
field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B7 NPP NMS")
|
||||
field( ZNAM, "ON" )
|
||||
field(ONAM, "OFF" )
|
||||
field(OSV,"MINOR")
|
||||
field(DESC," TMP1 – Operação Normal ")
|
||||
field( INP, "$(P)$(R)PCF8574:56:REGISTER:READ.B7 NPP NMS")
|
||||
field( ZNAM, "ON" )
|
||||
field(ONAM, "OFF" )
|
||||
field(OSV,"MINOR")
|
||||
}
|
||||
|
||||
###############
|
||||
@@ -137,87 +132,87 @@ record(bi , "$(P)$(R)TMPump1-NormalOperation" ) {
|
||||
### TMP2 Controller Inputs ###
|
||||
##############################
|
||||
record(fanout, "$(P)$(R)PCF8574:57:REGISTER:READ:FNOUT"){
|
||||
field(LNK1, "$(P)$(R)TMPump2-Emergency")
|
||||
field(LNK2, "$(P)$(R)TMPump2-Acceleration")
|
||||
field(LNK3, "$(P)$(R)TTSystem-tzero")
|
||||
field(LNK4, "$(P)$(R)Emergency-PhysButton")
|
||||
field(LNK1, "$(P)$(R)TMPump2-Emergency")
|
||||
field(LNK2, "$(P)$(R)TMPump2-Acceleration")
|
||||
field(LNK3, "$(P)$(R)TTSystem-tzero")
|
||||
field(LNK4, "$(P)$(R)Emergency-PhysButton")
|
||||
}
|
||||
record(bi , "$(P)$(R)TMPump2-Emergency") {
|
||||
field(DESC," TMP2 – Falha ")
|
||||
field(DESC," TMP2 – Falha ")
|
||||
# field(INP, "$(P)$(R)PCF8574:57:REGISTER:READ.B0 NPP NMS")
|
||||
field(VAL,"1")
|
||||
field(ZNAM, "ON" )
|
||||
field(ONAM, "OFF" )
|
||||
field(ZSV,"MAJOR")
|
||||
field(VAL,"1")
|
||||
field(ZNAM, "ON" )
|
||||
field(ONAM, "OFF" )
|
||||
field(ZSV,"MAJOR")
|
||||
}
|
||||
|
||||
record(bi , "$(P)$(R)TMPump2-Acceleration") {
|
||||
field(DESC," TMP2 – START until Normal ")
|
||||
field( INP, "$(P)$(R)PCF8574:57:REGISTER:READ.B1 NPP NMS")
|
||||
field( ZNAM, "ON" )
|
||||
field( ONAM, "OFF" )
|
||||
field(DESC," TMP2 – START until Normal ")
|
||||
field( INP, "$(P)$(R)PCF8574:57:REGISTER:READ.B1 NPP NMS")
|
||||
field( ZNAM, "ON" )
|
||||
field( ONAM, "OFF" )
|
||||
}
|
||||
####################################
|
||||
# TIMING TRIGGER ON/OFF #
|
||||
####################################
|
||||
record(bi , "$(P)$(R)TTSystem-tzero" ) {
|
||||
field(DESC,"Trigger control 60s before shot")
|
||||
field(INP, "$(P)$(R)PCF8574:57:REGISTER:READ.B7")
|
||||
field(DESC,"Trigger control 60s before shot")
|
||||
field(INP, "$(P)$(R)PCF8574:57:REGISTER:READ.B7")
|
||||
# field(VAL,"1")
|
||||
field(ZNAM, "OFF" )
|
||||
field(ONAM, "ON" )
|
||||
field(ZNAM, "OFF" )
|
||||
field(ONAM, "ON" )
|
||||
}
|
||||
|
||||
###############################
|
||||
### TMP2 Controller Outputs ###
|
||||
###############################
|
||||
record(bo, "$(P)$(R)TMPump2-Motor" ) {
|
||||
field(DESC," Motor On/Off ")
|
||||
field(DESC," Motor On/Off ")
|
||||
# record(bo, "$(P)$(R)TMP2MotorOnOff" ) {
|
||||
field( OUT, "$(P)$(R)PCF8574:57:REGISTER.B2 PP MS")
|
||||
field( ZNAM, "ON")
|
||||
field( ONAM, "OFF")
|
||||
field( OUT, "$(P)$(R)PCF8574:57:REGISTER.B2 PP MS")
|
||||
field( ZNAM, "ON")
|
||||
field( ONAM, "OFF")
|
||||
}
|
||||
|
||||
##############################
|
||||
# BUZZER ON/OFF #
|
||||
##############################
|
||||
record(bo, "$(P)$(R)Buzzer" ) {
|
||||
field(DESC," Lab Buzzer ")
|
||||
field(ZNAM, "Off" )
|
||||
field(ONAM, "Pulse" )
|
||||
field(HIGH, "2.5")
|
||||
field(FLNK, "$(P)$(R)BuzzerInv" )
|
||||
field(VAL, "0")
|
||||
field(DESC," Lab Buzzer ")
|
||||
field(ZNAM, "Off" )
|
||||
field(ONAM, "Pulse" )
|
||||
field(HIGH, "2.5")
|
||||
field(FLNK, "$(P)$(R)BuzzerInv" )
|
||||
field(VAL, "0")
|
||||
}
|
||||
record(calcout, "$(P)$(R)BuzzerInv" ) {
|
||||
field(INPA, "$(P)$(R)Buzzer NPP MS" )
|
||||
field(OUT, "$(P)$(R)PCF8574:57:REGISTER.B3 PP MS" )
|
||||
field(OOPT, "On Change" )
|
||||
field(CALC, "A?0:1" )
|
||||
field(INPA, "$(P)$(R)Buzzer NPP MS" )
|
||||
field(OUT, "$(P)$(R)PCF8574:57:REGISTER.B3 PP MS" )
|
||||
field(OOPT, "On Change" )
|
||||
field(CALC, "A?0:1" )
|
||||
}
|
||||
|
||||
##############################
|
||||
# EMERGENCY MODE #
|
||||
##############################
|
||||
record(bi, "$(P)$(R)Emergency-PhysButton" ) {
|
||||
field(DESC,"External Physical Emergency Button")
|
||||
field(INP, "$(P)$(R)PCF8574:57:REGISTER:READ.B4 NPP NMS")
|
||||
field(ZNAM, "ON")
|
||||
field(ONAM, "OFF" )
|
||||
field(FLNK, "$(P)$(R)Emergency" )
|
||||
field(DESC,"External Physical Emergency Button")
|
||||
field(INP, "$(P)$(R)PCF8574:57:REGISTER:READ.B4 NPP NMS")
|
||||
field(ZNAM, "ON")
|
||||
field(ONAM, "OFF" )
|
||||
field(FLNK, "$(P)$(R)Emergency" )
|
||||
}
|
||||
record(bo, "$(P)$(R)Emergency-UserButton" ) {
|
||||
field(DESC,"Soft User Emergency Button")
|
||||
field(ZNAM, "OFF" )
|
||||
field(ONAM, "ON")
|
||||
field(FLNK, "$(P)$(R)Emergency" )
|
||||
field(DESC,"Soft User Emergency Button")
|
||||
field(ZNAM, "OFF" )
|
||||
field(ONAM, "ON")
|
||||
field(FLNK, "$(P)$(R)Emergency" )
|
||||
}
|
||||
record(calc, "$(P)$(R)Emergency" ) {
|
||||
field(DESC, "Emergency State")
|
||||
field(INPA, "$(P)$(R)Emergency-PhysButton.RVAL NPP" )
|
||||
field(INPB, "$(P)$(R)Emergency-UserButton.RVAL NPP" )
|
||||
field(CALC, "A || B" ) # ! Not
|
||||
field(DESC, "Emergency State")
|
||||
field(INPA, "$(P)$(R)Emergency-PhysButton.RVAL NPP" )
|
||||
field(INPB, "$(P)$(R)Emergency-UserButton.RVAL NPP" )
|
||||
field(CALC, "A || B" ) # ! Not
|
||||
}
|
||||
|
||||
############
|
||||
@@ -237,71 +232,71 @@ record(calc, "$(P)$(R)Emergency" ) {
|
||||
# ROTARY1 PUMP #
|
||||
#############################
|
||||
record( bo, "$(P)$(R)RPump1-Motor" ) {
|
||||
field(DESC,"Power to Rotatory Pump 1. Relay 5")
|
||||
field(OUT, "$(P)$(R)PCF8574:60:REGISTER.B0 PP" )
|
||||
field(ZNAM, "Off" )
|
||||
field(ONAM, "On" )
|
||||
field(VAL,"1")
|
||||
field(ZSV,"MINOR")
|
||||
field(DESC,"Power to Rotatory Pump 1. Relay 5")
|
||||
field(OUT, "$(P)$(R)PCF8574:60:REGISTER.B0 PP" )
|
||||
field(ZNAM, "Off" )
|
||||
field(ONAM, "On" )
|
||||
field(VAL,"1")
|
||||
field(ZSV,"MINOR")
|
||||
}
|
||||
|
||||
#############################
|
||||
# ROTARY1 VALVE #
|
||||
#############################
|
||||
record( bo, "$(P)$(R)RPump1-Valve" ) {
|
||||
field(DESC,"Abre a valvula da bomba rot. Relay 4")
|
||||
field(OUT, "$(P)$(R)PCF8574:60:REGISTER.B1 PP" )
|
||||
field(ZNAM, "Closed" )
|
||||
field(ONAM, "Open" )
|
||||
field(VAL,"1")
|
||||
field(DESC,"Abre a valvula da bomba rot. Relay 4")
|
||||
field(OUT, "$(P)$(R)PCF8574:60:REGISTER.B1 PP" )
|
||||
field(ZNAM, "Closed" )
|
||||
field(ONAM, "Open" )
|
||||
field(VAL,"1")
|
||||
}
|
||||
|
||||
#############################
|
||||
# ROTARY2 PUMP #
|
||||
#############################
|
||||
record( bo, "$(P)$(R)RPump2-Motor" ) {
|
||||
field(DESC,"Power On Rotatory Pump 2")
|
||||
field(OUT, "$(P)$(R)PCF8574:60:REGISTER.B2 PP" )
|
||||
field(ZNAM, "Off" )
|
||||
field(ONAM, "On" )
|
||||
field(VAL,"1")
|
||||
field(ZSV,"MINOR")
|
||||
field(DESC,"Power On Rotatory Pump 2")
|
||||
field(OUT, "$(P)$(R)PCF8574:60:REGISTER.B2 PP" )
|
||||
field(ZNAM, "Off" )
|
||||
field(ONAM, "On" )
|
||||
field(VAL,"1")
|
||||
field(ZSV,"MINOR")
|
||||
}
|
||||
|
||||
#############################
|
||||
# ROTARY2 VALVE #
|
||||
#############################
|
||||
record( bo, "$(P)$(R)RPump2-Valve" ) {
|
||||
field(DESC," Abre a valvula da bomba rotatoria 2 ")
|
||||
field(OUT,"$(P)$(R)PCF8574:60:REGISTER.B3 PP" )
|
||||
field(ZNAM,"Closed" )
|
||||
field(ONAM,"Open" )
|
||||
field(VAL,"1")
|
||||
field(DESC," Abre a valvula da bomba rotatoria 2 ")
|
||||
field(OUT,"$(P)$(R)PCF8574:60:REGISTER.B3 PP" )
|
||||
field(ZNAM,"Closed" )
|
||||
field(ONAM,"Open" )
|
||||
field(VAL,"1")
|
||||
}
|
||||
|
||||
################################
|
||||
# FILAMENT ON/OFF #
|
||||
################################
|
||||
record(bo, "$(P)$(R)VVessel-Filament" ) {
|
||||
field(DESC,"Vacuum Vessel Filament power")
|
||||
field(DESC,"Vacuum Vessel Filament power")
|
||||
# record(bo, "$(P)$(R)FilamentOnOff" ) {
|
||||
field( OUT, "$(P)$(R)PCF8574:60:REGISTER.B4 PP" )
|
||||
field( ZNAM, "On" )
|
||||
field( ONAM, "Off" )
|
||||
field(VAL,"1")
|
||||
field(PINI,"YES")
|
||||
field( OUT, "$(P)$(R)PCF8574:60:REGISTER.B4 PP" )
|
||||
field( ZNAM, "On" )
|
||||
field( ONAM, "Off" )
|
||||
field(VAL,"1")
|
||||
field(PINI,"YES")
|
||||
}
|
||||
|
||||
##############################
|
||||
# LIGHTS ON/OFF #
|
||||
##############################
|
||||
record(bo, "$(P)$(R)Lab-WarningLight" ) {
|
||||
field(DESC," Luzes de sinalização, 220V ")
|
||||
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")
|
||||
field(OUT, "$(P)$(R)PCF8574:60:REGISTER.B5 PP" )
|
||||
field(ZNAM, "On" )
|
||||
field(ONAM, "Off" )
|
||||
field(VAL,"1")
|
||||
}
|
||||
|
||||
############
|
||||
@@ -314,10 +309,10 @@ record(bo, "$(P)$(R)Lab-WarningLight" ) {
|
||||
##############################
|
||||
record(bo, "$(P)$(R)Clean-TorContactor" ) {
|
||||
# field(DESC," Contactor 220V do transformador para a fonte de campo toroidal das descargas de limpeza (500 A) ")
|
||||
field( OUT, "$(P)$(R)PCF8574:60:REGISTER.B7 PP" )
|
||||
field( ZNAM, "On" )
|
||||
field( ONAM, "Off" )
|
||||
field(VAL,"1")
|
||||
field( OUT, "$(P)$(R)PCF8574:60:REGISTER.B7 PP" )
|
||||
field( ZNAM, "On" )
|
||||
field( ONAM, "Off" )
|
||||
field(VAL,"1")
|
||||
}
|
||||
|
||||
###############
|
||||
@@ -331,34 +326,34 @@ record(bo, "$(P)$(R)Clean-TorContactor" ) {
|
||||
############################
|
||||
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)")
|
||||
field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B0 PP" )
|
||||
field( ZNAM, "On" )
|
||||
field( ONAM, "Off" )
|
||||
field(VAL,"1")
|
||||
field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B0 PP" )
|
||||
field( ZNAM, "On" )
|
||||
field( ONAM, "Off" )
|
||||
field(VAL,"1")
|
||||
}
|
||||
|
||||
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")
|
||||
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" )
|
||||
field( ONAM, "Pulse" )
|
||||
field( HIGH, "2.5")
|
||||
field( FLNK, "$(P)$(R)Shot-TorPSTriggerInv" )
|
||||
field(VAL,"0")
|
||||
field(DESC," Trigger da FRAEP")
|
||||
field( ZNAM, "Off" )
|
||||
field( ONAM, "Pulse" )
|
||||
field( HIGH, "2.5")
|
||||
field( FLNK, "$(P)$(R)Shot-TorPSTriggerInv" )
|
||||
field(VAL,"0")
|
||||
}
|
||||
record(calcout, "$(P)$(R)Shot-TorPSTriggerInv" ) {
|
||||
# field(DESC," $(R)")
|
||||
field( INPA, "$(P)$(R)ToroidalShotTriggerOnOff NPP MS" )
|
||||
field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B2 PP MS" )
|
||||
field( OOPT, "On Change" )
|
||||
field( CALC, "A?0:1" )
|
||||
field( INPA, "$(P)$(R)ToroidalShotTriggerOnOff NPP MS" )
|
||||
field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B2 PP MS" )
|
||||
field( OOPT, "On Change" )
|
||||
field( CALC, "A?0:1" )
|
||||
}
|
||||
############################################################
|
||||
|
||||
@@ -368,10 +363,10 @@ record(calcout, "$(P)$(R)Shot-TorPSTriggerInv" ) {
|
||||
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(ZNAM, "On" )
|
||||
field(ONAM, "Off" )
|
||||
field(VAL,"1")
|
||||
field(OUT, "$(P)$(R)PCF8574:61:REGISTER.B3 PP" )
|
||||
field(ZNAM, "On" )
|
||||
field(ONAM, "Off" )
|
||||
field(VAL,"1")
|
||||
}
|
||||
|
||||
########################################
|
||||
@@ -380,10 +375,10 @@ record(bo, "$(P)$(R)CapBank-Charge" ) {
|
||||
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(ZNAM, "On" )
|
||||
field(ONAM, "Off" )
|
||||
field(VAL,"1")
|
||||
field(OUT, "$(P)$(R)PCF8574:61:REGISTER.B4 PP MS" )
|
||||
field(ZNAM, "On" )
|
||||
field(ONAM, "Off" )
|
||||
field(VAL,"1")
|
||||
}
|
||||
|
||||
####################################
|
||||
@@ -391,11 +386,11 @@ record(bo, "$(P)$(R)Clean-PrimContactor" ) {
|
||||
####################################
|
||||
record(bo, "$(P)$(R)Clean-PrimPneuBreaker"){
|
||||
#record(bo, "$(P)$(R)PrimaryCleanBreakerOnOff"){
|
||||
field( DESC, "Primary Cleaning OnOff")
|
||||
field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B5 PP" )
|
||||
field( ZNAM, "On")
|
||||
field( ONAM, "Off")
|
||||
field(VAL,"1")
|
||||
field( DESC, "Primary Cleaning OnOff")
|
||||
field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B5 PP" )
|
||||
field( ZNAM, "On")
|
||||
field( ONAM, "Off")
|
||||
field(VAL,"1")
|
||||
}
|
||||
|
||||
##################################
|
||||
@@ -404,22 +399,22 @@ record(bo, "$(P)$(R)Clean-PrimPneuBreaker"){
|
||||
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( ZNAM, "On" )
|
||||
field( ONAM, "Off" )
|
||||
field(VAL,"1")
|
||||
field( OUT, "$(P)$(R)PCF8574:61:REGISTER.B6 PP" )
|
||||
field( ZNAM, "On" )
|
||||
field( ONAM, "Off" )
|
||||
field(VAL,"1")
|
||||
}
|
||||
|
||||
##########################################
|
||||
# CAP BANK DISCHARGE ON/OFF #
|
||||
##########################################
|
||||
record(bo, "$(P)$(R)CapBank-Discharge" ) {
|
||||
field(DESC," Liga o circuito de descarga do ELCO ")
|
||||
field(DESC," Liga o circuito de descarga do ELCO ")
|
||||
# record(bo, "$(P)$(R)CapBankDischargeOnOff" ) {
|
||||
field(OUT, "$(P)$(R)PCF8574:61:REGISTER.B7 PP" )
|
||||
field(ZNAM, "On" )
|
||||
field(ONAM, "Off" )
|
||||
field(VAL,"1")
|
||||
field(OUT, "$(P)$(R)PCF8574:61:REGISTER.B7 PP" )
|
||||
field(ZNAM, "On" )
|
||||
field(ONAM, "Off" )
|
||||
field(VAL,"1")
|
||||
}
|
||||
|
||||
#record(bo,"$(P)$(R)Primary-PressureCondition"){
|
||||
@@ -431,9 +426,9 @@ record(bo, "$(P)$(R)CapBank-Discharge" ) {
|
||||
record(ai,"$(P)$(R)TMPump2-Speed"){
|
||||
# field(DESC," ADC Pump speed 0-10V ")
|
||||
#record(ai,"$(P)$(R)Turbo2_Speed"){
|
||||
field(PREC,"3")
|
||||
field(EGU,"RPM")
|
||||
field(VAL,"0")
|
||||
field(PREC,"3")
|
||||
field(EGU,"RPM")
|
||||
field(VAL,"0")
|
||||
}
|
||||
|
||||
#######################
|
||||
@@ -442,8 +437,8 @@ record(ai,"$(P)$(R)TMPump2-Speed"){
|
||||
record(bo, "$(P)$(R)TMPump1-ManualValve"){
|
||||
# field(DESC," $(R)")
|
||||
#record(bo, "$(P)$(R)TMPManualValve"){
|
||||
info(autosaveFields, "VAL")
|
||||
field( DESC, "State of manual valve")
|
||||
field( ZNAM, "Closed")
|
||||
field( ONAM, "Open")
|
||||
info(autosaveFields, "VAL")
|
||||
field( DESC, "State of manual valve")
|
||||
field( ZNAM, "Closed")
|
||||
field( ONAM, "Open")
|
||||
}
|
||||
|
||||
@@ -18,20 +18,20 @@
|
||||
# ### Read/Write pcf8574 address 0x38=56 register ### #
|
||||
###################################################
|
||||
record( mbboDirect, "$(P)$(R)PCF8574:56:REGISTER") {
|
||||
field(DTYP, "stream")
|
||||
field(OUT, "@pcf8574.proto wReg(56) I2C")
|
||||
field(SHFT, "0")
|
||||
field(NOBT, "8")
|
||||
field(VAL, 255)
|
||||
field(DTYP, "stream")
|
||||
field(OUT, "@pcf8574.proto wReg(56) $(BUS)")
|
||||
field(SHFT, "0")
|
||||
field(NOBT, "8")
|
||||
field(VAL, 255)
|
||||
# field(PINI,"YES")
|
||||
}
|
||||
|
||||
record( mbbiDirect, "$(P)$(R)PCF8574:56:REGISTER:READ" ) {
|
||||
field(DTYP, "stream")
|
||||
field(INP, "@pcf8574.proto rReg(56) I2C")
|
||||
field(NOBT, "8")
|
||||
field(SCAN, "1 second")
|
||||
field(FLNK, "$(P)$(R)PCF8574:56:REGISTER:READ:FNOUT")
|
||||
field(DTYP, "stream")
|
||||
field(INP, "@pcf8574.proto rReg(56) $(BUS)")
|
||||
field(NOBT, "8")
|
||||
field(SCAN, "1 second")
|
||||
field(FLNK, "$(P)$(R)PCF8574:56:REGISTER:READ:FNOUT")
|
||||
}
|
||||
|
||||
#####################################################
|
||||
@@ -39,7 +39,7 @@ record( mbbiDirect, "$(P)$(R)PCF8574:56:REGISTER:READ" ) {
|
||||
###################################################
|
||||
record( mbboDirect, "$(P)$(R)PCF8574:57:REGISTER") {
|
||||
field(DTYP, "stream")
|
||||
field(OUT, "@pcf8574.proto wReg(57) I2C")
|
||||
field(OUT, "@pcf8574.proto wReg(57) $(BUS)")
|
||||
field(SHFT, "0")
|
||||
field(NOBT, "8")
|
||||
field(VAL, 255)
|
||||
@@ -48,7 +48,7 @@ record( mbboDirect, "$(P)$(R)PCF8574:57:REGISTER") {
|
||||
|
||||
record( mbbiDirect, "$(P)$(R)PCF8574:57:REGISTER:READ" ) {
|
||||
field(DTYP, "stream")
|
||||
field(INP, "@pcf8574.proto rReg(57) I2C")
|
||||
field(INP, "@pcf8574.proto rReg(57) $(BUS)")
|
||||
field(NOBT, "8")
|
||||
field(SCAN, "1 second")
|
||||
field(FLNK, "$(P)$(R)PCF8574:57:REGISTER:READ:FNOUT")
|
||||
@@ -59,7 +59,7 @@ record( mbbiDirect, "$(P)$(R)PCF8574:57:REGISTER:READ" ) {
|
||||
###################################################
|
||||
record( mbboDirect, "$(P)$(R)PCF8574:60:REGISTER") {
|
||||
field( DTYP, "stream")
|
||||
field( OUT, "@pcf8574.proto wReg(60) I2C")
|
||||
field( OUT, "@pcf8574.proto wReg(60) $(BUS)")
|
||||
field( SHFT, "0")
|
||||
field( NOBT, "8")
|
||||
field(VAL, 255)
|
||||
@@ -68,7 +68,7 @@ record( mbboDirect, "$(P)$(R)PCF8574:60:REGISTER") {
|
||||
|
||||
record( mbbiDirect, "$(P)$(R)PCF8574:60:REGISTER:READ" ) {
|
||||
field( DTYP, "stream")
|
||||
field( INP, "@pcf8574.proto rReg(60) I2C")
|
||||
field( INP, "@pcf8574.proto rReg(60) $(BUS)")
|
||||
field(NOBT, "8")
|
||||
field(SCAN, "1 second")
|
||||
# field(FLNK, "$(P)$(R)PCF8574:60:REGISTER:READ:FNOUT")
|
||||
@@ -80,7 +80,7 @@ record( mbbiDirect, "$(P)$(R)PCF8574:60:REGISTER:READ" ) {
|
||||
###################################################
|
||||
record( mbboDirect, "$(P)$(R)PCF8574:61:REGISTER") {
|
||||
field( DTYP, "stream")
|
||||
field( OUT, "@pcf8574.proto wReg(61) I2C")
|
||||
field( OUT, "@pcf8574.proto wReg(61) $(BUS)")
|
||||
field( SHFT, "0")
|
||||
field( NOBT, "8")
|
||||
field(VAL, 255)
|
||||
@@ -89,7 +89,7 @@ record( mbboDirect, "$(P)$(R)PCF8574:61:REGISTER") {
|
||||
|
||||
record( mbbiDirect, "$(P)$(R)PCF8574:61:REGISTER:READ" ) {
|
||||
field( DTYP, "stream")
|
||||
field( INP, "@pcf8574.proto rReg(61) I2C")
|
||||
field( INP, "@pcf8574.proto rReg(61) $(BUS)")
|
||||
field(NOBT, "8")
|
||||
field(SCAN, "1 second")
|
||||
#field(PINI,"YES")
|
||||
|
||||
@@ -17,18 +17,18 @@
|
||||
#####################################################
|
||||
# Read/Write pcf8591 register @ address 0x48=d72 ### #
|
||||
#####################################################
|
||||
record( mbboDirect, "$(P)$(R)PCF8591:72:CTRLREGISTER") {
|
||||
field(DTYP, "stream")
|
||||
field(OUT, "@pcf8591.proto wReg(72) I2C")
|
||||
field(SHFT, "0")
|
||||
field(NOBT, "8")
|
||||
field(VAL, 255)
|
||||
field(PINI,"YES")
|
||||
record(mbboDirect, "$(P)$(R)PCF8591:72:CTRLREGISTER") {
|
||||
field(DTYP, "stream")
|
||||
field(OUT, "@pcf8591.proto wReg(72) $(BUS)")
|
||||
field(SHFT, "0")
|
||||
field(NOBT, "8")
|
||||
field(VAL, 255)
|
||||
field(PINI,"YES")
|
||||
}
|
||||
# Receiving two bytes. last one counts
|
||||
record( longin, "$(P)$(R)PCF8591:72:ADC_CH1" ) {
|
||||
field(DTYP, "stream")
|
||||
field(INP, "@pcf8591.proto rConvAdc0(72) I2C")
|
||||
field(DTYP, "stream")
|
||||
field(INP, "@pcf8591.proto rConvAdc0(72) $(BUS)")
|
||||
}
|
||||
record( calc, "$(P)$(R)PCF8591:72:BYTE2_CH1" ) {
|
||||
field(INPA, "$(P)$(R)PCF8591:72:ADC_CH1 PP NMS")
|
||||
@@ -37,29 +37,29 @@ record( calc, "$(P)$(R)PCF8591:72:BYTE2_CH1" ) {
|
||||
}
|
||||
|
||||
record( ai, "$(P)$(R)TMPump2-Speed" ) {
|
||||
field(DESC, "TMPump2-Speed")
|
||||
field(DTYP, "Raw Soft Channel" )
|
||||
field(INP, "$(P)$(R)PCF8591:72:BYTE2_CH1 PP NMS")
|
||||
field(DESC, "TMPump2-Speed")
|
||||
field(DTYP, "Raw Soft Channel" )
|
||||
field(INP, "$(P)$(R)PCF8591:72:BYTE2_CH1 PP NMS")
|
||||
# field(SCAN, "1 second")
|
||||
field(ASLO, "16" )
|
||||
field(AOFF, "0" )
|
||||
field(EGU, "RPM" )
|
||||
field(PREC, "3" )
|
||||
field(HOPR, "5000" )
|
||||
field(LOPR, "0" )
|
||||
field(LOW, "200.0")
|
||||
# # field(LOLO,"0.0")
|
||||
field(LSV, "MINOR")
|
||||
# # field(LLSV,"MAJOR")
|
||||
field(ASLO, "16" )
|
||||
field(AOFF, "0" )
|
||||
field(EGU, "RPM" )
|
||||
field(PREC, "3" )
|
||||
field(HOPR, "5000" )
|
||||
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" ) {
|
||||
field(DTYP, "stream")
|
||||
field(INP, "@pcf8591.proto rConvAdc1(72) I2C")
|
||||
field(DTYP, "stream")
|
||||
field(INP, "@pcf8591.proto rConvAdc1(72) $(BUS)")
|
||||
}
|
||||
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")
|
||||
# LSB i=last byte received
|
||||
field(CALC, " (A & 255)" )
|
||||
field(CALC, "(A & 255)" )
|
||||
}
|
||||
|
||||
record( ai, "$(P)$(R)TMPump2-Current" ) {
|
||||
@@ -82,7 +82,7 @@ record( ai, "$(P)$(R)TMPump2-Current" ) {
|
||||
# Receiving two bytes. last one counts
|
||||
record( longin, "$(P)$(R)PCF8591:72:ADC_CH3" ) {
|
||||
field(DTYP, "stream")
|
||||
field(INP, "@pcf8591.proto rConvAdc2(72) I2C")
|
||||
field(INP, "@pcf8591.proto rConvAdc2(72) $(BUS)")
|
||||
}
|
||||
record( calc, "$(P)$(R)PCF8591:72:BYTE2_CH3" ) {
|
||||
field(INPA, "$(P)$(R)PCF8591:72:ADC_CH3 PP NMS")
|
||||
@@ -110,7 +110,7 @@ record(ai, "$(P)$(R)Shot-TorPSCurrentImage" ) {
|
||||
|
||||
record( longout, "$(P)$(R)PCF8591:72:DAC") {
|
||||
field(DTYP, "stream")
|
||||
field(OUT, "@pcf8591.proto wDac(72) I2C")
|
||||
field(OUT, "@pcf8591.proto wDac(72) $(BUS)")
|
||||
field(DRVH, "255" )
|
||||
field(DRVL, "0" )
|
||||
field(VAL, 128)
|
||||
|
||||
@@ -1,5 +1,5 @@
|
||||
Terminator = "";
|
||||
LockTimeout = 200;
|
||||
LockTimeout = 500;
|
||||
ReplyTimeout = 100;
|
||||
ReadTimeout = 100;
|
||||
WriteTimeout = 100;
|
||||
|
||||
@@ -1,11 +1,11 @@
|
||||
Terminator = "";
|
||||
LockTimeout = 500;
|
||||
LockTimeout = 200;
|
||||
ReplyTimeout = 100;
|
||||
ReadTimeout = 100;
|
||||
WriteTimeout = 100;
|
||||
MaxInput = 2;
|
||||
ExtraInput = Error;
|
||||
|
||||
|
||||
rReg {
|
||||
out ${1};
|
||||
in "%01r";
|
||||
@@ -17,7 +17,7 @@ rReg {
|
||||
# Bits 4,5 ADC configuration . 00 = four single ended channels
|
||||
# Bits 6 : DAC Output enable bit
|
||||
# Bits 7 : =0
|
||||
|
||||
|
||||
rConvAdc0 {
|
||||
out ${1} 64;
|
||||
in "%02r";
|
||||
|
||||
@@ -1,4 +1,5 @@
|
||||
# autosave R5.3 Automatically generated - DO NOT MODIFY - 210511-172433
|
||||
# autosave R5.3 Automatically generated - DO NOT MODIFY - 210512-110358
|
||||
! 1 channel(s) not connected - or not all gets were successful
|
||||
ISTTOK:central:PULSE-NUMBER.VAL 0
|
||||
ISTTOK:central:LogMessage.VAL
|
||||
ISTTOK:central:LASTOPSTATE.VAL 5
|
||||
@@ -7,5 +8,5 @@ ISTTOK:central:PROCESS-MODE.VAL 0
|
||||
ISTTOK:central:CLEANINGMANMODE.VAL 0
|
||||
ISTTOK:central:Emergency-UserButton.VAL 0
|
||||
ISTTOK:central:TMPump1-ManualValve.VAL 0
|
||||
ISTTOK:central:Shot-TorPSCurrent 1
|
||||
#ISTTOK:central:Shot-TorPSCurrent Search Issued
|
||||
<END>
|
||||
|
||||
@@ -21,7 +21,7 @@ drvAsynI2CConfigure( "I2C", "/dev/i2c-1", 1 )
|
||||
dbLoadRecords("db/ISTTOKstates.db","P=ISTTOK:,R=central:")
|
||||
dbLoadRecords("db/ISTTOKpcf8574.db","P=ISTTOK:,R=central:,BUS=I2C")
|
||||
dbLoadRecords("db/ISTTOKpcf8591.db","P=ISTTOK:,R=central:,BUS=I2C")
|
||||
dbLoadRecords("db/ISTTOKtda8444.db","P=ISTTOK:,R=central:,BUS=I2C")
|
||||
#dbLoadRecords("db/ISTTOKtda8444.db","P=ISTTOK:,R=central:,BUS=I2C")
|
||||
dbLoadRecords("db/ISTTOKmachineControl.db","P=ISTTOK:,R=central:")
|
||||
|
||||
## Load Serial drivers
|
||||
@@ -44,7 +44,7 @@ drvAsynIPPortConfigure("L0","193.136.136.3:25",0,1,0)
|
||||
|
||||
dbLoadRecords("db/sendmail.db", "P=ISTTOK:,PORT=L0,R=central:,L=0,A=0")
|
||||
|
||||
# Uncomment to Debug STREAM serial activity
|
||||
# Uncomment to Debug STREAMDEVICE serial activity
|
||||
#var streamError 1
|
||||
#var streamDebug 1
|
||||
streamSetLogfile("logfile.txt")
|
||||
|
||||
Reference in New Issue
Block a user