linse/sics
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Turn axis F motor on/off

Browse Source 
r2180 | dcl | 2007-10-09 11:44:16 +1000 (Tue, 09 Oct 2007) | 2 lines
This commit is contained in:
Douglas Clowes
2007-10-09 11:44:16 +10:00
parent 4c569fcd5e
commit e04b31a2b8
1 changed files with 9 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

27
site_ansto/instrument/rsd/DMC2280/controller2.txt
View File

@@ -1,7 +1,7 @@
NO TE: KOWARI - CONTROLLER 2 NO TE: KOWARI - CONTROLLER 2
NO TE: NO TE:
NO TE: $Revision: NO TE: $Revision:
NO TE: $Date: 2007-10-08 23:28:53 $ NO TE: $Date: 2007-10-09 01:44:16 $
NO TE: Author: Dan Bartlett NO TE: Author: Dan Bartlett
NO TE: Last revision by: $Author: dcl $ NO TE: Last revision by: $Author: dcl $
NO TE: NO TE:
@@ -74,30 +74,20 @@ IF (_SPH>50000)
SPH=50000 SPH=50000
ENDIF ENDIF
NO TE: CONTROLS LINKED MOTORS NO TE: CONTROLS LINKED MOTORS
IF (_MOA=0)&(RSPA=0);'SAMPLE RAISE MOTOR IS ON
REQA=1
ENDIF
IF (_MOA=1)&(RSPA=1);'SAMPLE RAISE MOTOR IS OFF
REQA=0
ENDIF
IF (REQA=1)&(RSPA=0);' SAMPLE RAISE MOTOR IS REQUIRED IF (REQA=1)&(RSPA=0);' SAMPLE RAISE MOTOR IS REQUIRED
SH AB SH AB;'TURN MOTOR ON
RSPA=1 RSPA=1
ENDIF ENDIF
IF (REQA=0)&(RSPA=1);' SAMPLE RAISE MOTOR IS NOT REQUIRED IF (REQA=0)&(RSPA=1);' SAMPLE RAISE MOTOR IS NOT REQUIRED
MO AB MO AB;'TURN MOTOR OFF
RSPA=0 RSPA=0
ENDIF ENDIF
NO TE: CONTROLS THE AIRPAD SOLENOID VALVES NO TE: CONTROLS THE AIRPAD SOLENOID VALVES
IF (_MOF=0)&(RSPF=0);'DETECTOR ROTATE MOTOR IS ON
REQF=1
ENDIF
IF (_MOF=1)&(RSPF=1);'DETECTOR ROTATE MOTOR IS OFF
REQF=0
ENDIF
IF (REQF=1)&(RSPF=0);' DETECTOR ROTATE MOTOR IS REQUIRED IF (REQF=1)&(RSPF=0);' DETECTOR ROTATE MOTOR IS REQUIRED
SH F;'TURN MOTOR ON
SB 10;'DETECTOR AIR PAD OFF-SOLENOID OFF SB 10;'DETECTOR AIR PAD OFF-SOLENOID OFF
CB 9;'DETECTOR AIR PAD ON-SOLENOID ON CB 9;'DETECTOR AIR PAD ON-SOLENOID ON
WT 1000;'WAIT FOR PADS TO LIFT
RSPF=1 RSPF=1
ENDIF ENDIF
IF (REQF=0)&(RSPF=1);' DETECTOR ROTATE MOTOR IS NOT REQUIRED IF (REQF=0)&(RSPF=1);' DETECTOR ROTATE MOTOR IS NOT REQUIRED
@@ -105,6 +95,7 @@ SB 9;'DETECTOR AIR PAD ON-SOLENOID OFF
CB 10;'DETECTOR AIR PAD OFF-SOLENOID ON CB 10;'DETECTOR AIR PAD OFF-SOLENOID ON
WT500;'WAIT 1/2 SEC WT500;'WAIT 1/2 SEC
SB 10;'DETECTOR AIR PAD OFF-SOLENOID OFF SB 10;'DETECTOR AIR PAD OFF-SOLENOID OFF
MO F;'TURN MOTOR OFF
RSPF=0 RSPF=0
ENDIF ENDIF
JP #THREAD0 JP #THREAD0
@@ -130,8 +121,8 @@ OLDDCC=_DCC
OLDDCD=_DCD OLDDCD=_DCD
OLDDCE=_DCE OLDDCE=_DCE
OLDDCF=_DCF OLDDCF=_DCF
NO OLDDCG=_DCG COMMENTED OUT, AXIS NOT IN USE NO OLDDCG=_DCG;' COMMENTED OUT, AXIS NOT IN USE
NO OLDDCH=_DCH COMMENTED OUT, AXIS NOT IN USE NO OLDDCH=_DCH;' COMMENTED OUT, AXIS NOT IN USE
IF (_LFA = 0) | (_LRA = 0) IF (_LFA = 0) | (_LRA = 0)
DCA=400000;' DECEL FOR LIMIT HIT OCCURENCE DCA=400000;' DECEL FOR LIMIT HIT OCCURENCE
STA STA
@@ -156,7 +147,7 @@ IF (_LFF = 0) | (_LRF = 0)
DCF=50000;' DECEL FOR LIMIT HIT OCCURENCE DCF=50000;' DECEL FOR LIMIT HIT OCCURENCE
STF STF
ENDIF ENDIF
NO IF (_LFG = 0) | (_LRG = 0) COMMENTED OUT, AXIS NOT IN USE NO IF (_LFG = 0) | (_LRG = 0);' COMMENTED OUT, AXIS NOT IN USE
NO DCG=100000;' DECEL FOR LIMIT HIT OCCURENCE NO DCG=100000;' DECEL FOR LIMIT HIT OCCURENCE
NO STG NO STG
NO ENDIF NO ENDIF