(* @PATH := '\/TASK0_VOID' *) (* @SYMFILEFLAGS := '59392' *) PROGRAM Signal_Gen VAR mRamp : SlewLimit ; mRampOut : REAL ; END_VAR (* @END_DECLARATION := '0' *) gTask0Cycle_Time := UDINT_TO_REAL (gSystem_Task_Info [1].cycleTime) / 10000000; IF gTime_sec<>0 THEN Omegat := 2 * gP_Greek * gTime_sec * 5 / 60 ; END_IF mRamp(i_InValue:= 0.4 * gBlenderNomSpeed * BOOL_TO_INT (gClock_120s),i_SlewMax:=(0.4 * gBlenderNomSpeed / 10) ,i_Cycle:=gTask0Cycle_Time, out:=mRampOut ) ; Ramp_Sgn := mRampOut ; IF gFirstProd_Done AND NOT gBlenderAlarm AND gInFillerProductReq THEN gFillerProductFlow := gBlenderNomSpeed * 0.55 + Ramp_Sgn ; ELSE gFillerProductFlow := 0 ; END_IF END_PROGRAM