fast shutter code added

r2140 | dbx | 2007-08-23 15:48:22 +1000 (Thu, 23 Aug 2007) | 2 lines
This commit is contained in:
Dan Bartlett
2007-08-23 15:48:22 +10:00
committed by Douglas Clowes
parent e76c3922f0
commit 88489adc49
2 changed files with 29 additions and 14 deletions

View File

@@ -1,14 +1,14 @@
NO TE: QUOKKA - CONTROLLER 1 NO TE: QUOKKA - CONTROLLER 1
NO TE: NO TE:
NO TE: $Revision: 1.6 $ NO TE: $Revision: 1.7 $
NO TE: $Date: 2007-08-16 04:31:07 $ NO TE: $Date: 2007-08-23 05:47:30 $
NO TE: Author: Dan Bartlett NO TE: Author: Dan Bartlett
NO TE: Last revision by: $Author: dbx $ NO TE: Last revision by: $Author: dbx $
NO TE: NO TE:
NO TE: A-SAMPLE UPPER TILT NO TE: A-SAMPLE UPPER TILT
NO TE: B-SAMPLE LOWER TILT NO TE: B-SAMPLE LOWER TILT
NO TE: C-SAMPLE TRANSLATION Y (ACROSS BEAM) NO TE: C-SAMPLE TRANSLATION Y (ALONG BEAM)
NO TE: D-SAMPLE TRANSLATION X (ALONG BEAM) NO TE: D-SAMPLE TRANSLATION X (ACROSS BEAM)
NO TE: E-SAMPLE RAISE NO TE: E-SAMPLE RAISE
NO TE: F-SAMPLE ROTATE NO TE: F-SAMPLE ROTATE
NO TE: G-DETECTOR Y (ALONG BEAM) NO TE: G-DETECTOR Y (ALONG BEAM)
@@ -70,14 +70,29 @@ ELSE
SB 13;' MOTOR OFF = BRAKE DENERGISED = LOCKED SB 13;' MOTOR OFF = BRAKE DENERGISED = LOCKED
ENDIF ENDIF
NO TE: CONTROLS THE FAST SHUTTER NO TE: CONTROLS THE FAST SHUTTER
NO TE: FAST SHUTTER MUST BE UP WHEN DETECTOR Z AXIS ACTIVE NO TE:
NO TE: INPUT 13 = FAST SHUTTER CLOSED NO TE: FAST SHUTTER MUST BE CLOSED WHEN DETECTOR Z AXIS ACTIVE
NO TE: INPUT 14 = FAST SHUTTER OPEN NO TE: INPUT 13 = FAST SHUTTER OPEN
NO TE: INPUT 15 = ONE OR MORE BEAM STOPS RAISED (FROM CONTROLLER 4) NO TE: INPUT 14 = FAST SHUTTER CLOSED
IF (_MOG=1) & (_TI1&64) NO TE: INPUT 5 = ONE OR MORE BEAM STOPS RAISED (FROM CONTROLLER 4)
NO TE: DETECTOR Z INACTIVE AND ONE OR MORE BEAM STOPS UP IF (_MOG=1) & (@IN[5]=0)
NO TE: DETECTOR Y INACTIVE AND ONE OR MORE BEAM STOPS UP
CB 15;' ENERGISE FAST SHUTTER SOLENOID = SHUTTER OPEN CB 15;' ENERGISE FAST SHUTTER SOLENOID = SHUTTER OPEN
ENDIF ENDIF
IF (_MOG=0)&(@IN[14])
NO TE: DETECTOR Y AXIS IS ACTIVE AND FAST SHUTTER NOT CLOSED
SB15;' CLOSE FAST SHUTTER
IF (_BGG=1)
STG;' DETECTOR Y MOVING, COMMANDED TO STOP
AMG;'WAIT UNTIL STOPPED
ENDIF
MOG;' TURN DETECTOR Y OFF UNTIL FAST SHUTTER IS CLOSED
AI13;' WAIT FOR SHUTTER TO CLOSE
IF (@IN[14]=0)
NO TE: FAST SHUTTER IS CLOSED
SHG
ENDIF
ENDIF
JP #THREAD0 JP #THREAD0
EN EN
NO ---------------------------------------- NO ----------------------------------------

View File

@@ -1,7 +1,7 @@
NO TE: QUOKKA - CONTROLLER 4 NO TE: QUOKKA - CONTROLLER 4
NO TE: NO TE:
NO TE: $Revision: 1.5 $ NO TE: $Revision: 1.6 $
NO TE: $Date: 2007-08-16 04:31:07 $ NO TE: $Date: 2007-08-23 05:48:22 $
NO TE: Author: Dan Bartlett NO TE: Author: Dan Bartlett
NO TE: Last revision by: $Author: dbx $ NO TE: Last revision by: $Author: dbx $
NO TE: NO TE:
@@ -72,9 +72,9 @@ ENDIF
NO TE: SETS AN OUTPUT IF ONE OR MORE BEAM STOPS ARE FULLY RAISED NO TE: SETS AN OUTPUT IF ONE OR MORE BEAM STOPS ARE FULLY RAISED
NO TE: OUTPUT 5 ON IF ONE OR MORE BEAMS TOPS RAISED NO TE: OUTPUT 5 ON IF ONE OR MORE BEAMS TOPS RAISED
IF (_LFC=0)|(_LFD=0)|(_LFE=0)|(_LFF=0)|(_LFG=0) IF (_LFC=0)|(_LFD=0)|(_LFE=0)|(_LFF=0)|(_LFG=0)
SB 5 SB1
ELSE ELSE
CB5 CB1
ENDIF ENDIF
JP #THREAD0 JP #THREAD0
EN EN