PROGRAM

GOSUB ENABLEDRIVE : REM GO TO SUBROUTINE "ENABLEDRIVE"

END 

'SUBROUTINE OF ENABLEDRIVE
_ENABLEDRIVE

DRIVE ON X Y : REM TURNS ON OUTPUT TO ENABLE DRIVE

DWL 0.2 : REM WAIT 2ms

IF (BIT 8465) THEN PRINT "Axis0 is enable" : REM AXIS0 IS ENABLE, PRINT MESSAGE
IF (bit 8497) THEN PRINT "Axis1 is enable" : REM AXIS1 IS ENABLE, PRINT MESSAGE

IF (NOT BIT8465) THEN PRINT "Axis0 is not enable" : REM AXIS0 IS NOT ENABLE, PRINT MESSAGE
IF (NOT bit8467) THEN PRINT "Axis1 is not enable" : REM AXIS1 IS NOT ENABLE, PRINT MESSAGE

RETURN : REM RETURN BACK TO GOSUB

ENDP