Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Jump to bottom

DEV: Modified FB_972 to include logger and proper state assignment. N… #90

Merged
merged 3 commits into from
Mar 17, 2022
Merged

DEV: Modified FB_972 to include logger and proper state assignment. N… #90

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
3 commits
Select commit Hold shift + click to select a range
9da4e3b
DEV: Modified FB_972 to include logger and proper state assignment. N…
ghalym Mar 17, 2022
0293756
FIX: VAlid upper range
ghalym Mar 17, 2022
8e5d324
Merge branch 'master' of github.com:ghalym/lcls-twincat-vacuum into f…
ghalym Mar 17, 2022
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Binary file added L2SIVacuum/LineIDs.dbg
View file
Open in desktop
Binary file not shown.
49 changes: 36 additions & 13 deletions L2SIVacuum/POUs/Functions/Gauges/FB_972.TcPOU
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -28,17 +28,22 @@ END_VAR
If (iTermBits=0) THEN iTermBits := 32767;END_IF
rV := 10*INT_TO_REAL(PG.i_iPRESS_R)/iTermBits;

IF rV > 1 THEN
IF (rV > 1) AND (rV <= 7) THEN
PG.rPRESS := LREAL_TO_REAL(EXPT(10, 2*rV-11));
PG.xPRESS_OK := TRUE;
PG.eState := Valid; //Press OK
ELSE
PG.xPRESS_OK := FALSE;
PG.eState := OoR;
IF (rV <= 1) THEN PG.eState := GaugeDisconnected;
ELSE PG.eState := OoR;
END_IF
END_IF

(* Setpoint evaluation *)
PG.xAT_VAC := PG.xPRESS_OK AND (PG.rPRESS < PG.rVAC_SP);


(*Logger*)
ACT_Logger();
(* Soft IO Mapping*)
ACT_IO();]]></ST>
</Implementation>
Expand All @@ -47,6 +52,34 @@ ACT_IO();]]></ST>
<ST><![CDATA[PG.i_iPRESS_R :=i_iPRESS_R;]]></ST>
</Implementation>
</Action>
<Action Name="ACT_Logger" Id="{e27f7c5d-a6a0-44f8-9f5b-d0a5d2ac0c45}">
<Implementation>
<ST><![CDATA[
//STATE Logger
IF ePrevState <> PG.eState THEN
CASE PG.eState OF
ValidHi:
fbLogger(sMsg:='Gauge pressure valid high.', eSevr:=TcEventSeverity.Info);
ValidLo:
fbLogger(sMsg:='Gauge pressure valid low.', eSevr:=TcEventSeverity.Info);
Valid:
fbLogger(sMsg:='Gauge pressure valid.', eSevr:=TcEventSeverity.Info);
GaugeDisconnected:
fbLogger(sMsg:='Gauge Disconnected.', eSevr:=TcEventSeverity.Critical);
PressInvalid:
fbLogger(sMsg:='Gauge pressure invalid.', eSevr:=TcEventSeverity.Warning);
OoR:
fbLogger(sMsg:='Gauge pressure out of range.', eSevr:=TcEventSeverity.Warning);
Starting:
fbLogger(sMsg:='Gauge starting.', eSevr:=TcEventSeverity.Info);
END_CASE
ePrevState := PG.eState;
END_IF


]]></ST>
</Implementation>
</Action>
<Method Name="M_SetBits" Id="{c873eda2-ce3a-4d08-a1f9-e53b8f43dbd9}">
<Declaration><![CDATA[METHOD M_SetBits : BOOL
VAR_INPUT
Expand All @@ -57,15 +90,5 @@ END_VAR
<ST><![CDATA[This^.iTermBits := TermBits;]]></ST>
</Implementation>
</Method>
<LineIds Name="FB_972">
<LineId Id="3" Count="17" />
<LineId Id="2" Count="0" />
</LineIds>
<LineIds Name="FB_972.ACT_IO">
<LineId Id="1" Count="0" />
</LineIds>
<LineIds Name="FB_972.M_SetBits">
<LineId Id="2" Count="0" />
</LineIds>
</POU>
</TcPlcObject>