三菱st语言 fb块

zhou

//##########################初始化#########################//
IF ldp(TRUE,bool_[2] OR bool_[5]) OR bool_[3] OR bool_[6] OR SM402 THEN
( `' h5 u$ s; l+ `& ^        int_[0]:=0; int_[1]:=0;
4 R6 T% c( q" K- }  m6 WEND_IF;
//##########################叫载具###########################//
IF bool_[2] AND int_[0]=0 AND int_[1]=0 AND NOT time_[0].s THEN
        int_[0]:=1;
        ELSIF time_[0].s THEN
7 j; e) E4 u) O9 L! J  g3 O- G        int_[0]:=0;
) `6 E4 U2 b! E        int_[1]:=0;
( m* w8 t$ j5 V% g' jEND_IF;
; Y1 V/ q" t1 b5 K0 N; uout_t((*bool_[2] AND*) int_[0]=1 AND int_[1]=0 OR time_[0].s AND andfi(TRUE,SM413),time_[0],200);//回应超时
out_t((*bool_[2] AND *)int_[1]=51 AND bool_[8] AND bool_[10],time_[1],30);//叫载具成功
4 @" [' p2 X* ~" jout_t((*bool_[2] AND*) int_[1]=51 AND(NOT bool_[8] OR NOT bool_[10]),time_[2],30);//叫载具失败       
/ ]3 w7 @% w' V0 Jbool_[3]:=time_[1].s;//叫载具正常结束
bool_[4]:=time_[2].s;//叫载具异常结束