* --- globais genericasglobal genna

*---Global genericasgenname global _ UTPB-Ngenname global _ UTPBgenname global PVIgenname global KALKU-Cgenname MC-2 globalgenname global MC-3genname TM globalgenname SW globalgenname global PID*---local variables Global integer TSTESTQ1 (), FUNC_TM1 ()Global integer N, flag1, iGlobal char * 14 C_TIMERGlobal char * 16 cTMAUX* Edited by MPi in 11/11/2009:float TMINA, TMENTAB global* Waits is in "READY"wait until (%%. BSTS == "READY")* Start command in SFMONL4ACLX monitoring%%. BSTS = "MSTART"! Shoot the monitoracaoQuit

* --- Global generic
global genname _UTPB-N
global genname _UTPB
global PVI genname
global genname Calcu-C

global genname MC-2
Global genname MC-3
global genname TM
global genname SW
global genname PID

* --- local variables
global integer TSTESTQ1 () FUNC_TM1 ()
global integer N, flag1, i
global char * 14 C_TIMER
char * 16 global cTMAUX

* Edited by MPi on 11/11/2009:
global float TMINA, TMENTAB


* Pending if is in "READY"
wait until (%%. BSTS == "READY")

* start command in monitoring SFMONL4ACLX
%%. BSTS = "MSTART"! Shoots monitoring

quit

* - Global genericasGlobal genname _ utpb - nGlobal genname _ utpbGlobal genname PVIGlobal genname derived - CGlobal genname MC - 2Global genname MC - 3Global genname TMGlobal genname SWGlobal genname PID* - local variablesGlobal integer tstestq1 () function _ TM1 ()Global integer n, flag1, i.Global char * 14 C _ timer.Global char * 16 ctmaux* edited by MPI on 11 / 11 / 2009:Global float tmina, tmentab* awaits if is in a "ready"Wait until (%%.Bsts = = "ready")* command to start monitoring sfmonl4aclx%%.Bsts = "mstart"! Shoot the monitoracaoQuit