no message
r2151 | dbx | 2007-09-24 11:29:31 +1000 (Mon, 24 Sep 2007) | 2 lines
This commit is contained in:
committed by
Douglas Clowes
parent
5bbbe9b419
commit
846d6e7b15
@@ -1,10 +1,11 @@
|
||||
NO TE: KOWARI - CONTROLLER 2
|
||||
NO TE:
|
||||
NO TE: $Revision: 1.6 $
|
||||
NO TE: $Date: 2007-06-01 06:53:25 $
|
||||
NO TE: $Revision:
|
||||
NO TE: $Date: 2007-09-24 01:25:14 $
|
||||
NO TE: Author: Dan Bartlett
|
||||
NO TE: Last revision by: $Author: dcl $
|
||||
NO TE: Last revision by: $Author: dbx $
|
||||
NO TE:
|
||||
NO TE: GALIL 31 BIT FIRMWARE IS REQUIRED FOR THIS CODE
|
||||
NO TE: A-SAMPLE RAISE FIRST SECTION
|
||||
NO TE: B-SAMPLE RAISE SECOND SECTION
|
||||
NO TE: C-SAMPLE UPPER TRANSLATION
|
||||
@@ -24,15 +25,15 @@ OP 65280;' SETS OUTPUTS 9-16 ON = RELAYS OFF
|
||||
IA 137,157,201,196;' CONFIGURES IP ADDRESS
|
||||
AC 25000,25000,25000,25000,25000,25000,,;' SET ACELERATION
|
||||
DC 25000,25000,25000,25000,25000,25000,,;' SET DECELERATION
|
||||
SP 25000,25000,25000,25000,25000,25000,,;' SET SPEED
|
||||
NO SIA=1,31,13,0<-2>2;'IVO xxxx, FIRMWARE UPGRADE NEEDED FOR 31 BIT ENCODER
|
||||
SIB=0,25,13,0<-2>2;'NOT USED, ONE CORD PULL FOR BOTH RAISE SECTIONS
|
||||
SIC=1,25,13,0<-2>2;'HEIDENHAIN ROQ425
|
||||
SID=1,25,13,0<-2>2;'HEIDENHAIN ROQ425
|
||||
SIE=1,25,13,0<-2>2;'HEIDENHAIN ROQ425
|
||||
SIF=1,25,13,0<-2>2;'HEIDENHAIN ROQ425
|
||||
SIG=0,25,13,0<-2>2;'NOT USED
|
||||
SIH=0,25,13,0<-2>2;'NOT USED
|
||||
SP 200000,200000,25000,25000,25000,25000,,;' SET SPEED
|
||||
SIA=1,31,13,0<12>2;'IVO ENCODER
|
||||
SIB=0,25,13,0<12>2;'NOT USED, ONE CORD PULL FOR BOTH RAISE SECTIONS
|
||||
SIC=1,25,13,0<12>2;'HEIDENHAIN ROQ425
|
||||
SID=1,25,13,0<12>2;'HEIDENHAIN ROQ425
|
||||
SIE=1,25,13,0<12>2;'HEIDENHAIN ROQ425
|
||||
SIF=1,25,13,0<12>2;'HEIDENHAIN ROQ425
|
||||
SIG=0,25,13,0<12>2;'NOT USED
|
||||
SIH=0,25,13,0<12>2;'NOT USED
|
||||
NO TE: FIRST TIME THROUGH MOTOR LINK NOT DONE
|
||||
REQA=0
|
||||
RSPA=0
|
||||
@@ -48,11 +49,11 @@ NO ----------------------------------------
|
||||
#THREAD0
|
||||
NO TE: THERE MUST BE A THREAD RUNNING FOR #LIMSWI, #TCPERR AND #ININT TO WORK
|
||||
NO TE: CHECKS IF SPEEDS ARE ABOVE MAXIMUM ALLOWED
|
||||
IF (_SPA>50000)
|
||||
SPA=50000
|
||||
IF (_SPA>200000)
|
||||
SPA=200000
|
||||
ENDIF
|
||||
IF (_SPB>50000)
|
||||
SPB=50000
|
||||
IF (_SPB>200000)
|
||||
SPB=200000
|
||||
ENDIF
|
||||
IF (_SPC>50000)
|
||||
SPC=50000
|
||||
@@ -132,11 +133,11 @@ OLDDCF=_DCF
|
||||
NO OLDDCG=_DCG COMMENTED OUT, AXIS NOT IN USE
|
||||
NO OLDDCH=_DCH COMMENTED OUT, AXIS NOT IN USE
|
||||
IF (_LFA = 0) | (_LRA = 0)
|
||||
DCA=100000;' DECEL FOR LIMIT HIT OCCURENCE
|
||||
DCA=400000;' DECEL FOR LIMIT HIT OCCURENCE
|
||||
STA
|
||||
ENDIF
|
||||
IF (_LFB = 0) | (_LRB = 0)
|
||||
DCB=100000;' DECEL FOR LIMIT HIT OCCURENCE
|
||||
DCB=400000;' DECEL FOR LIMIT HIT OCCURENCE
|
||||
STB
|
||||
ENDIF
|
||||
IF (_LFC = 0) | (_LRC = 0)
|
||||
|
||||
@@ -1,15 +1,15 @@
|
||||
NO TE: KOWARI - CONTROLLER 4
|
||||
NO TE:
|
||||
NO TE: $Revision: 1.1 $
|
||||
NO TE: $Date: 2007-03-20 03:10:55 $
|
||||
NO TE: $Revision: 1.2 $
|
||||
NO TE: $Date: 2007-09-24 01:25:23 $
|
||||
NO TE: Author: Dan Bartlett
|
||||
NO TE: Last revision by: $Author: dbx $
|
||||
NO TE:
|
||||
NO TE: A-PRE SAMPLE COLLIMATOR X TRANSLATION
|
||||
NO TE: B-PRE SAMPLE COLLIMATOR Y TRANSLATION
|
||||
NO TE: A-PRE SAMPLE COLLIMATOR X (ACROSS BEAM)
|
||||
NO TE: B-PRE SAMPLE COLLIMATOR Y (ALONG BEAM)
|
||||
NO TE: C-PRE SAMPLE COLLIMATOR WIDTH
|
||||
NO TE: D-POST SAMPLE COLLIMATOR X TRANSLATION
|
||||
NO TE: E-POST SAMPLE COLLIMATOR Y TRANSLATION
|
||||
NO TE: D-POST SAMPLE COLLIMATOR X (ACROSS BEAM)
|
||||
NO TE: E-POST SAMPLE COLLIMATOR Y (ALONG BEAM)
|
||||
NO TE: F-POST SAMPLE COLLIMATOR WIDTH
|
||||
NO TE: G-SPARE
|
||||
NO TE: H-SPARE
|
||||
|
||||
@@ -1,7 +1,7 @@
|
||||
NO TE: TAIPAN - CONTROLLER 4
|
||||
NO TE:
|
||||
NO TE: $Revision: 1.1 $
|
||||
NO TE: $Date: 2007-07-20 00:36:10 $
|
||||
NO TE: $Revision: 1.2 $
|
||||
NO TE: $Date: 2007-09-24 01:28:42 $
|
||||
NO TE: Author: Dan Bartlett
|
||||
NO TE: Last revision by: $Author: dbx $
|
||||
NO TE:
|
||||
@@ -13,8 +13,7 @@ NO TE: E-VIRTUAL SOURCE RIGHT, +VE OPEN, 6mm/TURN
|
||||
NO TE: F-VIRTUAL SOURCE LEFT, -VE OPEN, 6mm/TURN
|
||||
NO TE: G-SPARE
|
||||
NO TE: H-SPARE
|
||||
|
||||
NO TE: 53mm GAP AT LIMITS
|
||||
NO TE: 55mm GAP AT LIMITS, EQUAL ABOUT BEAM CL
|
||||
NO ----------------------------------------
|
||||
#AUTO
|
||||
NO TE: THIS IS THE PROGRAM THAT RUNS AUTOMATICALLY ON CONTROLLER STARTUP
|
||||
@@ -45,10 +44,10 @@ NO ENDIF
|
||||
NO IF (_SPD>50000)
|
||||
NO SPD=50000
|
||||
NO ENDIF
|
||||
IF (_SPE>12500)
|
||||
IF (_SPE<>12500)
|
||||
SPE=12500
|
||||
ENDIF
|
||||
IF (_SPF>12500)
|
||||
IF (_SPF<>12500)
|
||||
SPF=12500
|
||||
ENDIF
|
||||
NO IF (_SPG>50000)
|
||||
@@ -57,6 +56,13 @@ NO ENDIF
|
||||
NO IF (_SPH>50000)
|
||||
NO SPH=50000
|
||||
NO ENDIF
|
||||
NO TE: CHECKS TO SEE IF DECELERATIONS OK
|
||||
IF (_DCE<>25000)
|
||||
DCE=25000
|
||||
ENDIF
|
||||
IF (_DCF<>25000)
|
||||
DCF=25000
|
||||
ENDIF
|
||||
JP #THREAD0
|
||||
EN
|
||||
NO ----------------------------------------
|
||||
|
||||
@@ -1,25 +1,22 @@
|
||||
NO TE: TAIPAN - CONTROLLER 5
|
||||
NO TE:
|
||||
NO TE: $Revision: 1.1 $
|
||||
NO TE: $Date: 2007-07-20 00:36:10 $
|
||||
NO TE: $Revision: 1.2 $
|
||||
NO TE: $Date: 2007-09-24 01:29:31 $
|
||||
NO TE: Author: Dan Bartlett
|
||||
NO TE: Last revision by: $Author: dbx $
|
||||
NO TE:
|
||||
NO TE: A-SECONDARY SHUTTER, +VE OPEN, 6mm/TURN
|
||||
NO TE: B-SPARE
|
||||
NO TE: C-SPARE
|
||||
NO TE: D-SPARE
|
||||
NO TE: FOUR AXIS CONTROLLER ONLY
|
||||
NO TE: ONE AXIS CONTROLLER ONLY
|
||||
NO ----------------------------------------
|
||||
#AUTO
|
||||
NO TE: THIS IS THE PROGRAM THAT RUNS AUTOMATICALLY ON CONTROLLER STARTUP
|
||||
SHA
|
||||
MT-2,-2,-2,-2;'CONFIGURES ALL AXES AS STEPPER
|
||||
MTA=-2;'CONFIGURES ALL AXES AS STEPPER
|
||||
CN 1;' CONFIGURES LIMIT SWITCHES TO ACCEPT NC CONTACTS
|
||||
IA 137,157,203,135;' CONFIGURES IP ADDRESS
|
||||
AC 100000,0,0,0;' SET ACELERATION
|
||||
DC 100000,0,0,0;' SET DECELERATION
|
||||
SP 50000,0,0,0;' SET SPEED
|
||||
ACA=100000;' SET ACELERATION
|
||||
DCA=100000;' SET DECELERATION
|
||||
SPA=50000;' SET SPEED
|
||||
JS #THREAD0
|
||||
EN
|
||||
NO ----------------------------------------
|
||||
@@ -29,13 +26,17 @@ NO TE: INPUT 5=SECONDARY SHUTTER CLOSE SIGNAL 1
|
||||
NO TE: INPUT 6=SECONDARY SHUTTER CLOSE SIGNAL 2
|
||||
NO TE: INPUT 7=SECONDARY SHUTTER OPEN SIGNAL 1
|
||||
NO TE: INPUT 8=SECONDARY SHUTTER OPEN SIGNAL 2
|
||||
IF (_TI0=63)&(_BGA=0)&(_LFA=1)
|
||||
NO TE: INPUTS 7&8 EXCLUSIVELY ON, SECONDARY SHUTTER COMMANDED TO OPEN
|
||||
IF ((_TI0&192)=0)&(_BGA=0)&(_LFA=1)
|
||||
NO TE: INPUTS 7,8 EXCLUSIVELY ACTIVE(0) & NOT MOVING & NOT ALREADY OPEN
|
||||
NO TE: SECONDARY SHUTTER COMMANDED TO OPEN
|
||||
NO TE: INPUTS 1,2,3 AND 4 ARE MASKED OUT BY THE &192
|
||||
PRA=580000;'APROX 140mm
|
||||
BGA
|
||||
ENDIF
|
||||
IF (_TI0<>63)&(_LRA=1)
|
||||
NO TE: INPUTS 7&8 NOT EXCLUSIVELY ON, SECONDARY SHUTTER COMMANDED TO CLOSE
|
||||
IF ((_TI0&192<>0)&(_LRA=1)
|
||||
NO TE: INPUTS 7,8 NOT EXCLUSIVELY ACTIVE(0) & NOT ALREADY CLOSED
|
||||
NO TE: SECONDARY SHUTTER COMMANDED TO CLOSE
|
||||
NO TE: INPUTS 1,2,3 AND 4 ARE MASKED OUT BY THE &192
|
||||
STA;' STOP ANY MOTION
|
||||
AMA;' AFTER MOTION IS STOPPED
|
||||
PRA=-580000;' APROX 140mm
|
||||
@@ -49,3 +50,18 @@ NO ----------------------------------------
|
||||
NO TE: EMPTY ROUTINE FOR A TCP ERROR
|
||||
RE
|
||||
NO ----------------------------------------
|
||||
#CMDERR
|
||||
NO TE: THIS IS A ROUTINE TO HANDLE COMMAND ERRORS
|
||||
ZS0;' ZERO STACK
|
||||
EN1
|
||||
NO ----------------------------------------
|
||||
#MONSWI
|
||||
NO TE: THIS IS A ROUTINE TO MONITOR THE POSITION
|
||||
NO TE: OF THE SECONDARY SHUTTER
|
||||
IF (_LFA=1)&(_LRA=1)
|
||||
MG {EA}, "SS NOT OPEN, NOT CLOSED"
|
||||
WT200
|
||||
ENDIF
|
||||
JP #MONSWI
|
||||
EN
|
||||
NO ----------------------------------------
|
||||
Reference in New Issue
Block a user