三菱st语言 fb块

zhou

//##########################初始化#########################//
2 c, t; P3 h$ J+ b3 ~, kIF ldp(TRUE,bool_[2] OR bool_[5]) OR bool_[3] OR bool_[6] OR SM402 THEN
& J2 e: ^" a7 f# f6 a1 s        int_[0]:=0; int_[1]:=0;
  h+ }$ j( D3 H' p; v* IEND_IF;
* k2 W! s) q0 `) d: t/ h; }//##########################叫载具###########################//
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
' r- K$ n" Z! I8 ~: w        int_[0]:=0;
        int_[1]:=0;
END_IF;
2 M9 u6 m4 m( |$ Z. q' Xout_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);//叫载具成功
7 E9 \7 j# R! \) y2 n0 x( Fout_t((*bool_[2] AND*) int_[1]=51 AND(NOT bool_[8] OR NOT bool_[10]),time_[2],30);//叫载具失败       
. z/ k& K5 Q  b; abool_[3]:=time_[1].s;//叫载具正常结束
! y# F  f2 h" `# J5 @# O; W# Nbool_[4]:=time_[2].s;//叫载具异常结束
1 o) [/ D8 y/ m6 J" H4 d/ I+ E6 k
& u( M1 Y8 h" }. k" h  {: Y