![](/images/new-backgrounds/1173968/173968305x1.webp)
Programming
ModuleOutput.3=OFF
Endif
‘Decrease the fill amount once every time ModuleInput.4 is pressed. If ((ModuleInput.4=ON) AND (ModuleOutput.4=OFF)) Then Index.1.Dist = Index.1.Dist - 0.10 ‘ounces ModuleOutput.4=ON
‘ModuleOutput.4 is used to make sure that the distance is ‘incremented only once each time ModuleInput.4 is pressed.
If (Index.1.Dist < 12) Then |
|
ModuleOutput.2=ON | ‘Short index output |
Else |
|
ModuleOutput.2=OFF |
|
Endif |
|
Endif |
|
If((ModuleInput.4=OFF) AND (ModuleOutput.4=ON)) Then
ModuleOutput.4=OFF
Endif
Loop
Sequence Learn and Playback
This example consists of three programs. The first program is used to learn 3 positions using “Jog+”,
Learn Program (Program 0)
Home.0.Initiate | |
Index.1.Initiate | ‘Move to position 1 |
Wait For Index.AnyCommandComplete |
|
Call Program.1 | ‘Program 1 allows the axis to be jogged |
| ‘into position |
If (ModuleInput.1=ON) Then | ‘Learn the new position if the “Learn” |
| ‘input is on |
Index.1.Dist = PosnCommand | ‘Read the Position Command into Index.1’s |
| ‘absolute position. |
Endif |
|
Wait For ModuleInput.1=OFF | ‘Wait until the “Learn” input goes off |
Wait For ModuleInput.2=OFF | ‘Wait until the “Skip” input goes off |
Index.2.Initiate | ‘Move to position 2 |
Wait For Index.AnyCommandComplete |
|
Call Program.1 | ‘Program 1 allows the axis to be jogged |
| ‘into position |
139