Appendixes – Rockwell Automation 1398-PDM-xxx IQ Master Version 3.2.4 for IA-2000 and IQ-5000 Positioning Drive Modules, IQ-55 User Manual
Page 411

Application Examples • In-line Bottle Filler
389
Publication 1398-PM601A-EN-P — October 2000
APPENDIXES
;Source File Name: FILLER.QPS
;Version 3.00 2/29/96
TITLE "FILLER"
PGMTYPE = MAINPGM
;
G Variable Assignments
ASSIGN BOTL_LEN
G1
;Length between each bottle
ASSIGN BOTL_NUM
G2
;Number of bottles being filled in one operation
ASSIGN LAST_BTL
G3
;Position of last bottle where fillerhead began
; tracking conveyor speed
ASSIGN POS_LIM
G4
;Fillerhead forward position limit
;
V Variable Assignments
ASSIGN FILL_LEN
V1
;Length between bottle 1 and botl_num + 1
ASSIGN NEXT_BTL
V2
;Next position where fillerhead will begin
; tracking conveyor
ASSIGN TEMP1
V3
;Botl_num - 1 position in counts (Scale2)
ASSIGN FILLER_HOM V4
;Fillerhead home position
ASSIGN REL_POS
V5
;Relative position between bottles and fillerhead
ASSIGN MAKE_UP
V6
;Correction move distance
ASSIGN CBOTL_LEN
V7
;Length between each bottle in counts (Scale2)
ASSIGN CFILL_LEN
V8
;Length between bottle 1 and botl_num + 1 in
; counts (Scale2)
ASSIGN CFILLER_HOM V9
;Fillerhead home position in counts (Scale)
;
Input Assignments
ASSIGN FILL_CMPLT I10
;I10 is the fill operation complete input
;
Output Assignments
ASSIGN FILL_EN
O1
;O1 is the fill operation enable output
ASSIGN POS_ERR
O2
;O2 is the fillerhead’s position error output
;
Scanned Events
S1:IF POS1 > POS_LIM
;If fillerhead travels past the forward limit, then:
{
FILL_EN=OFF
;Turn off fill operation output
GEAREN=OFF
;Deactivate electronic gearing
POS_ERR=ON
;Turn on fillerhead position error output
}
;
Xkey Routines
;The X1 key routine is used for operator entry of the
; length between each bottle for the bottle
; filling operation.
X1:
CLEAR
PRINT "BOTTLE LENGTH"
READ 2,1 ,SHOW BOTL_LEN,7,3
CLEAR
PRINT "LENGTH = " ,BOTL_LEN
PRINT 2,1 "NUMBER = " ,BOTL_NUM
PRINT 3,1 "LIMIT = " ,POS_LIM
PRINT 4,1 "X1:LEN X2:NUM X3:LIM"
XEND
;The X2 key routine allows operator entry of the number
; of bottles being filled in each operation.
X2:
CLEAR
PRINT "NUMBER OF BOTTLES"
READ 2,1 ,SHOW BOTL_NUM,7,0
CLEAR
PRINT "LENGTH = " ,BOTL_LEN
PRINT 2,1 "NUMBER = " ,BOTL_NUM
PRINT 3,1 "LIMIT = " ,POS_LIM
PRINT 4,1 "X1:LEN X2:NUM X3:LIM"
XEND
;The X3 key routine allows operator entry of the
; forward travel limit of the fillerhead.