Skip to Content

Register Login

Industry Online Support

Technical Forum

Navigation

software program modification

Created by: ahmed_abdelhady at: 6/5/2013 7:53 PM (27 Replies)

Rating (1)

Thanks 2

Result pages:: |; 1 | 2 | 3; |

28 Entries

Entries per page: 10 | 20 | all

6/27/2013 12:50 PM	Rate (0)
ahmed_abdelhady Posts: 49 Rating: (0)	Hiiiii minhajie thxs for yr help.but i need more illustration. 1- can u provide me acapture that indicate yr suggestion to caculate average by using SCL function ? 2- SCL function not availlable in my librarry so which simillar function to it ? 3- what u meant by change the Sample input on the blocks? pls help quickly best regards ahmed
ahmed_abdelhady Posts: 49 Rating: (0)	Last edited by: ahmed_abdelhady at: 6/27/2013 12:53 PM
Suggestion To thank Quote Answer

6/27/2013 1:39 PM	Rate (0)
minhajie Posts: 96 Rating: (10)	Hi Ahmed, SCL is a application in which you design your block. The language use is like c , vb or to some extent STL. When you design a block in SCL it is saved under source folder in your program in the component view. If you want to make new SCL code then go to SCL folder( under program folder which also contain the block and chart folder) right click and add new file. The sample input is available on almost all standard block, it might be hidden so you have to go to the block properties then I/O tab and make it visible. I did design a block in SCL for averaging in some previous project. I will lok for it but it will take some time as I am going back home very late from site at present. Hope this was helpful.
minhajie Posts: 96 Rating: (10)	Last edited by: minhajie at: 6/27/2013 1:43 PM
Suggestion To thank Quote Answer

6/27/2013 5:10 PM	Rate (0)
ahmed_abdelhady Posts: 49 Rating: (0)	hii minhajie first of all i wanna to thank u for yr respond. 1- i will wait your answer Anxiously 2-for change sample that u mean as in my attachment this right or not ? best regard ahmed Attachment sample.pdf (260 Downloads)
ahmed_abdelhady Posts: 49 Rating: (0)
Suggestion To thank Quote Answer

6/27/2013 7:01 PM	Rate (0)
minhajie Posts: 96 Rating: (10)	Hi Ahmed, I am talking about the sample input, it is not a block e.g. if you look at the IO of timer block there is one input which is Sample_Time you can vary that to change the scan cycle of that block only and not the complete OB. I will try my best to get back to you asap regarding the code. cheers
minhajie Posts: 96 Rating: (10)
Suggestion To thank Quote Answer

6/28/2013 7:38 AM	Rate (0)
ahmed_abdelhady Posts: 49 Rating: (0)	hii minhajie thxs for yr answer i understand what u means. 1-i will wait yr code and please till how i can add it to my software ? 2-how i can convert from real out to integer? to connect 2 blocks as in attachments Attachment real-integer.pdf (282 Downloads)
ahmed_abdelhady Posts: 49 Rating: (0)
Suggestion To thank Quote Answer

6/28/2013 12:42 PM	Rate (0)
TerminalBuzz Silver Member Joined: 11/4/2011 Last visit: 8/25/2024 Posts: 253 Rating: (53)	Hi ahmed_abdelhady, You need to use FC106 "R_I" from "CFC Library". P.S. It is better to set up blocks in CFC in a way that they would be located one by one according to their logical runtime sequence. For example, in your last attachment your block SEL_R has position of 15 and it is sending some information to the block DEADT_P with position of 14. So basically in the first place the DEADT_P would be processed and only then — the SEL_R would be processed. So you would have unnecessary delay (for 1 cycle of OB35) in your program. But indeed SEL_R should be called in the first place and then the DEADT_P right after SEL_R or after the convertion. Attachment Convert R_I.jpg (231 Downloads)

Suggestion To thank Quote Answer

6/28/2013 8:44 PM	Rate (0)
ahmed_abdelhady Posts: 49 Rating: (0)	*hii* thxs alot 1-can u help me about how i can calculate the average?!! best regards hady
ahmed_abdelhady Posts: 49 Rating: (0)
Suggestion To thank Quote Answer

7/9/2013 9:31 AM	Rate (0)
TerminalBuzz Silver Member Joined: 11/4/2011 Last visit: 8/25/2024 Posts: 253 Rating: (53)	I have not enough knowledge to create this FB. But I've found such function at the Russian Siemens forum and I'd asked the author for a permission to publish his code here. I'd just translated the comments. There are 3 functions needed, the main is FilterAI. I've not tested them, but only compiled. Sources in attachment. [code]FUNCTION FAST_TCK : TIME TITLE = 'debugging ticks' AUTHOR : 'BETEP59' (* wrapper for SFC time_tck() for test timer overflow acceleration factor = 1 displacement 16#7FFF_0000 (overflow after ~65sec) ) VAR_TEMP now : DINT; t : DINT; b AT t : ARRAY[0..7] OF BOOL; // MSB of t END_VAR BEGIN now := TIME_TO_DINT(time_tck()); // current time IF now = 0 OR now = 16#7fff_ffff THEN // replace special values now := 1; END_IF; t := now 1; // apply acceleration factor b[7] := 0; t := t + 16#7FFF_0000; // apply displacement b[7] := 0; // exclude negative numbers now := t; fast_tck := DINT_TO_TIME(now); OK := true; END_FUNCTION[/code] [code]FUNCTION T_ABS : DINT TITLE = 'time difference module' AUTHOR : 'BETEP59' VAR_INPUT d: DINT; // time difference (now-t) END_VAR VAR_TEMP t: DINT; END_VAR BEGIN t := d; IF t < 0 THEN t := 16#7fff_ffff - ABS(t); END_IF; t_abs := t; OK := true; END_FUNCTION[/code] [code]FUNCTION_BLOCK FilterAI TITLE = 'Analog value filtering for period of Ti. Rolling/Sliding average' AUTHOR : 'BETEP59' VAR_INPUT Ti: TIME; //accumulation period Val: REAL; //current value Err: BOOL; //input fault rst: BOOL; //reset to current state END_VAR VAR_OUTPUT Res: BOOL; //got result (=ENO) Vavg: REAL; //average value over the period Vsum: REAL; //current sum in buffer END_VAR VAR full: BOOL; //buffer overflow (Ti passed) oldV: REAL; //max value vx: ARRAY[0..255] OF REAL; //circular buffer on time Ti px: INT; //pointer at the current position in buffer tx: DINT:=0; //time of the last entry in buffer t_err: DINT:=0; //fault time sum: REAL; //temp sum before saving to buffer cnt: INT; //number of accumulated values END_VAR VAR_TEMP t_now, t_i: DINT; END_VAR BEGIN t_i := TIME_TO_DINT(Ti); // when reset or if the integration period is not set (==0) - initial state IF rst OR t_i <= 0 THEN tx := 0; t_err := 0; Vavg := 0.0; Res := NOT(rst) AND NOT(Err); ELSE t_now := TIME_TO_DINT(fast_tck()); // current time IF Err THEN IF t_err = 0 THEN // latch the fault time t_err := t_now; END_IF; // if the duration of fault is greater than the integration period - reset calculation IF T_ABS(d:=t_now-t_err) >= t_i THEN tx := 0; END_IF; ELSE // in this cycle the pre-fault value would be added - oldV t_err := 0; // reset fault time oldV := Val; // add current value END_IF; // don’t start calculation if fault Res := NOT(Err AND (tx = 0)); IF Res THEN // during start of calculations IF tx = 0 THEN px := 0; sum := 0.0; cnt := 0; full := false; Vsum := 0.0; vx[0] := 0.0; tx := t_now; // set the last buffer update time END_IF; // summing up current values (during update period) sum := sum + oldV; cnt := cnt + 1; // if the time that passed after the last update is more than the buffer update period (Ti/size) IF T_ABS(d:=t_now-tx) >= (t_i/256) THEN // add to buffer IF full THEN Vsum := Vsum - vx[px]; // subtract old value from sum END_IF; vx[px] := sum / cnt; // add new Vsum := Vsum + vx[px]; // recalculate sum px := px + 1; // next sum := 0; cnt := 0; tx := t_now; // latch the last buffer update time // filling the circular buffer IF px >= 256 THEN full := 1; px := 0; END_IF; // if buffer is full after every update - recalc result IF full THEN Vavg := Vsum / 256.0; END_IF; END_IF; Res := full; // if buffer is overflown - got the result END_IF; END_IF; OK := Res; // set result to output END_FUNCTION_BLOCK[/code] Attachment SCL Source FilterAI. By BETEP59 (3 in 1).zip (274 Downloads)

Suggestion To thank Quote Answer

Result pages:: |; 1 | 2 | 3; |

28 Entries

Entries per page: 10 | 20 | all

|

Share this page:

Share this page on...

Follow us on