Skip to content
classicladder.hal 4.74 KiB
Newer Older
electrolab's avatar
electrolab committed
loadrt classicladder_rt numPhysInputs=80 numPhysOutputs=80 numSymbols=300 numTimersIec=40
electrolab's avatar
electrolab committed
addf classicladder.0.refresh servo-thread
loadusr classicladder maurice.clp

#==============================================================
#ClassicLadder Inputs
#==============================================================

#Drive Logic -> 00>19

net X-stat-home		classicladder.0.in-00
net X-stat-pos		classicladder.0.in-01
net X-homingok		classicladder.0.in-02
net X-athome		classicladder.0.in-03
net Z-stat-home		classicladder.0.in-04
net Z-stat-pos		classicladder.0.in-05
net Z-homingok		classicladder.0.in-06
net Z-athome		classicladder.0.in-07
net Home-All		classicladder.0.in-08
net Home-X		classicladder.0.in-09
net Home-Z		classicladder.0.in-10

electrolab's avatar
electrolab committed
#Power On Logic

net MachineReadyFin	classicladder.0.in-17
net MachineIsOn		classicladder.0.in-18
net ModeManual		classicladder.0.in-19

#Tool Change Logic -> 20-35

net TurretLS9		classicladder.0.in-20
net TurretLS10		classicladder.0.in-21
net TurretLS11		classicladder.0.in-22
net TurretLS12          classicladder.0.in-23
net TurretLS13		classicladder.0.in-24
net TurretIndex		classicladder.0.in-25
net ToolChangeRequest	classicladder.0.in-26
net ToolPrepPocket	classicladder.0.s32in-00
net ToolChange		classicladder.0.in-27


electrolab's avatar
electrolab committed
#Panel Logic -> 30-49

electrolab's avatar
electrolab committed
net ToolChangeBtn	classicladder.0.in-30
net CycleStartBtn	classicladder.0.in-31
net XJogPlus		classicladder.0.in-32
net ZJogPlus		classicladder.0.in-33
net FeedHoldBtn		classicladder.0.in-34
net ModeSelect1		classicladder.0.in-35
electrolab's avatar
electrolab committed
net ModeSelect2		classicladder.0.in-36
net ModeSelect3		classicladder.0.in-37
net ModeSelect4		classicladder.0.in-38
electrolab's avatar
electrolab committed
#net FeedOv1		classicladder.0.in-39
#net FeedOv2		classicladder.0.in-40
#net FeedOv3		classicladder.0.in-41
#net FeedOv4		classicladder.0.in-42
electrolab's avatar
electrolab committed
net RapidOv1		classicladder.0.in-43
net RapidOv2		classicladder.0.in-44
net BlockDeleteBtn	classicladder.0.in-45
net OptStopBtn		classicladder.0.in-46
net SingleBlockBtn	classicladder.0.in-47
electrolab's avatar
electrolab committed
net PowerOnSw		classicladder.0.in-48
net STBEstop		classicladder.0.in-49
electrolab's avatar
electrolab committed
# Chuck & Interlock Logic -> 50-59
electrolab's avatar
electrolab committed

net ChuckOpenBtn	classicladder.0.in-50
net ChuckCloseBtn	classicladder.0.in-51
net ChuckInsideClamp	classicladder.0.in-52
net PressureSwitch	classicladder.0.in-53
net ChuckOpenLimit	classicladder.0.in-54
net ChuckCloseLimit	classicladder.0.in-55
net DoorSwitchs		classicladder.0.in-56
electrolab's avatar
electrolab committed
net SpindleSpeedFB	classicladder.0.floatin-01

#Error Handling -> 60-69

net MachineErrorIn	classicladder.0.in-60

#Program Handling -> 70-79

net ProgramIsRunning	classicladder.0.in-70
net ProgramIsIdle	classicladder.0.in-71
net ProgramIsPaused	classicladder.0.in-72

#==============================================================
#ClassicLadder Inputs
#==============================================================


#==============================================================
#ClassicLadder Outputs
#==============================================================

#Drive Logic -> 00>19

net X-homed		classicladder.0.out-00
net Z-homed		classicladder.0.out-01
net X-inhibit		classicladder.0.out-02
electrolab's avatar
electrolab committed
net Y-Homed		classicladder.0.out-03
net X-ctrl-home		classicladder.0.out-04
net X-ctrl-pos		classicladder.0.out-05
net Z-ctrl-home		classicladder.0.out-06
net Z-ctrl-pos		classicladder.0.out-07
net X-homestart		classicladder.0.out-08
net Z-homestart		classicladder.0.out-09

electrolab's avatar
electrolab committed
#Power On Logic

net MachineOn		classicladder.0.out-16
net ServoFaultReset	classicladder.0.out-17
net AuxiliariesPower	classicladder.0.out-18
net ServoPower		classicladder.0.out-19

#Tool Change Logic -> 20-29

net TurretUnclamp	classicladder.0.out-20
net TurretClamp		classicladder.0.out-21
net TurretReverse	classicladder.0.out-22
net TurretSpin		classicladder.0.out-23

net ToolChangeRuning	classicladder.0.out-24
net ToolChangeOk	classicladder.0.out-25
net ToolChangeFailed	classicladder.0.out-26

electrolab's avatar
electrolab committed
net ManualTC		classicladder.0.out-27
net ToolChangeLed	classicladder.0.out-28

#Panel Logic -> 30 -

net ModeAuto		classicladder.0.out-41
net ModeMDI		classicladder.0.out-42
net ModeMan		classicladder.0.out-43

#Chuck Logic -> 50 -

net ChuckCloseRelay	classicladder.0.out-50
net ChuckOpenRelay	classicladder.0.out-51
net SpindleInhibit	classicladder.0.out-52
net ChuckClampLed	classicladder.0.out-53

# Error Handling -> 60-69

net HydraulicError	classicladder.0.out-60
net AuxiliariesError	classicladder.0.out-61
net ChuckError		classicladder.0.out-62

net MachineErrorLamp	classicladder.0.out-64

net ProgrammInhibit	classicladder.0.out-66
net EstopCL		classicladder.0.out-67
net FeedHoldCL		classicladder.0.out-68
net MachineOff		classicladder.0.out-69

#Program Handling -> 70-79
electrolab's avatar
electrolab committed
net ProgramEnd		classicladder.0.out-70
net CycleStart		classicladder.0.out-71
net ProgramResume	classicladder.0.out-72
net ProgramStep		classicladder.0.out-73
net ProgramPause	classicladder.0.out-74