Commit 5c39762a authored by claes's avatar claes

Work in On/Off burners

parent d29de810
/* /*
* Proview $Id: rt_plc_bcomp.c,v 1.3 2007-01-30 07:15:04 claes Exp $ * Proview $Id: rt_plc_bcomp.c,v 1.4 2007-02-05 09:44:21 claes Exp $
* Copyright (C) 2005 SSAB Oxelsund AB. * Copyright (C) 2005 SSAB Oxelsund AB.
* *
* This program is free software; you can redistribute it and/or * This program is free software; you can redistribute it and/or
...@@ -401,7 +401,7 @@ void CompOnOffBurnerFo_exec( plc_sThread *tp, ...@@ -401,7 +401,7 @@ void CompOnOffBurnerFo_exec( plc_sThread *tp,
if ( !co->Executing) { if ( !co->Executing) {
o->Status = co->Status = 0; o->Status = co->Status = 0;
co->BrTime = 0; co->BrTime = 0;
co->TrendStatus = co->Number; co->TrendStatus = (pwr_tFloat32) co->Number;
return; return;
} }
...@@ -418,7 +418,7 @@ void CompOnOffBurnerFo_exec( plc_sThread *tp, ...@@ -418,7 +418,7 @@ void CompOnOffBurnerFo_exec( plc_sThread *tp,
if ( (o->Status && !co->ManStatus) || (!o->Status && co->ManStatus)) if ( (o->Status && !co->ManStatus) || (!o->Status && co->ManStatus))
co->BrTime = 0; co->BrTime = 0;
o->Status = co->Status = co->ManStatus; o->Status = co->Status = co->ManStatus;
co->TrendStatus = co->Number + (co->Status ? 1 : 0); co->TrendStatus = (pwr_tFloat32) co->Number + 0.8 * (co->Status ? 1 : 0);
co->BrTime += *o->ScanTime; co->BrTime += *o->ScanTime;
return; return;
} }
...@@ -452,7 +452,7 @@ void CompOnOffBurnerFo_exec( plc_sThread *tp, ...@@ -452,7 +452,7 @@ void CompOnOffBurnerFo_exec( plc_sThread *tp,
co->BrTime = 0; co->BrTime = 0;
} }
co->BrTime += *o->ScanTime; co->BrTime += *o->ScanTime;
co->TrendStatus = co->Number + (co->Status ? 1 : 0); co->TrendStatus = (pwr_tFloat32) co->Number + 0.8 * (co->Status ? 1 : 0);
o->Status = co->Status; o->Status = co->Status;
} }
......
...@@ -60088,7 +60088,7 @@ Alarm HH, H, L, LL" ...@@ -60088,7 +60088,7 @@ Alarm HH, H, L, LL"
Body SysBody 04-OCT-2005 10:53:23.13 Body SysBody 04-OCT-2005 10:53:23.13
Attr PgmName = "AlarmStatus" Attr PgmName = "AlarmStatus"
Attr TypeRef = "pwrs:Type-$Boolean" Attr TypeRef = "pwrs:Type-$Boolean"
Attr GraphName = "val" Attr GraphName = "ala"
EndBody EndBody
EndObject EndObject
Object PlcConnect $Intern 4 04-OCT-2005 10:53:23.13 Object PlcConnect $Intern 4 04-OCT-2005 10:53:23.13
...@@ -107833,7 +107833,7 @@ Err (error) = err" ...@@ -107833,7 +107833,7 @@ Err (error) = err"
Body SysBody 25-JAN-2007 13:58:55.48 Body SysBody 25-JAN-2007 13:58:55.48
Attr PgmName = "TrendStatus" Attr PgmName = "TrendStatus"
Attr Flags = 1040 Attr Flags = 1040
Attr TypeRef = "pwrs:Type-$Int32" Attr TypeRef = "pwrs:Type-$Float32"
EndBody EndBody
EndObject EndObject
Object PulseOn $Attribute 10 25-JAN-2007 13:34:02.65 Object PulseOn $Attribute 10 25-JAN-2007 13:34:02.65
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment