HPT(XIN0)
100 IF HPT(XIN0)!=0 THEN /* If IN0(near-org) is on110 RMVS X_A 10000 /* Moving to opposite direction to HOME120 END_IF130 WAIT RR(X_A)==0