Parker Hannifin
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
EPL Network
#DEFINE ResetEPLNetwork BIT150
PROGRAM
GOSUB EnableEPLNetwork : REM GO TO SUBROUTINE EnableEPLNetwork
END
'SUBROUTINE OF EnableEPLNetwork
_EnableEPLNetwork
INH 16648 : REM CHECK FOR CONTROLLER TO ACKNOWLEDGE EPL CARD
IF (NOT Bit16649) THEN EPLC ON
REM IF EPL NETWORK NOT OPERATIONAL, THEN START EPLC NETWORK
DWL 0.2
WHILE (BIT 16640)
REM INFINITE LOOP THAT WAITS TO EPL NETWORK TO START
WEND
IF (BIT 16649) THEN PRINT "EPL NETWORK OPERATIONAL"
REM IF NETwoRK OPERATIONAL, PRINT MESSAGE TO SCREEN
'IF THE NETWORK IS NOT OPERATIONAL AT
'THIS POINT THEN TRY TO RESET IT
'IF NETWORK IS NOT OPERATIONAL, PRINT MESSAGE TO SCREEN
IF (BIT 16650) THEN PRINT "EPL NETWORK START FAILED, GOING TO RESET
NETWORK"
IF (NOT BIT 16649)
EPLC OFF : REM RESET EPL NETWORK
SET ResetEPLNetwork : REM SET RESET EPL NETWORK LATCHED BIT
INH -16657 : REM INHIBIT PROGRAM UNTIL EPL NETWORK RESETS
EPLC ON : REM START EPL NETWORK AGAIN
INH
-16656
REM INHIBIT PROGRAM UNTIL START EPL NETWORK HAS FINISHED
ENDIF
'CHECK IF EPL NETWORK IS STILL NOT OPERATIONAL
'AND ALREADY RESET NETWORK
IF ((NOT BIT 16649) AND (ResetEPLNetwork))
PRINT "EPL network problem occurred."
ENDIF
ENDP
92 Programmer’s Guide
