Manual
Appendix G 17-3
670 ! if status has another "?", ignore it:
680 IF Ans$[1,1]="?" THEN Ans$=Ans$[2]
690 Stat=VAL(Ans$)
700 IF (Stat DIV 512) MOD 2=0 THEN 730
710 PRINT "Motor slip has occurred."
720 STOP
730 IF (Stat DIV 16) MOD 2=0 THEN 760
740 PRINT "Emergency Stop has occurred."
750 STOP
760 OUTPUT Rs232;"OE;"; ! request ACL error
770 ENTER Rs232;Ans$ ! read the error code
780 PRINT "An ACL error ";Ans$;" has occurred."
790 END