DEが1か2以外にならないように、 15行目を、 IF B<3&&B>0&&CMOOD==0THEN CONMAND0 B OUT X,Y に変えてみて下さい。