no message

r2151 | dbx | 2007-09-24 11:29:31 +1000 (Mon, 24 Sep 2007) | 2 lines

site_ansto/instrument/rsd/DMC2280/controller2.txt

@@ -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)

site_ansto/instrument/rsd/DMC2280/controller4.txt

@@ -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

site_ansto/instrument/tas/DMC2280/controller4.txt

@@ -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 ----------------------------------------
@@ -71,4 +77,4 @@ STA,B,C,D,E,F,G,H
 AM
 MO
 RI
-NO ----------------------------------------
+NO ----------------------------------------

site_ansto/instrument/tas/DMC2280/controller5.txt

@@ -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 ----------------------------------------