Flight tube air pad control modified

r1501 | dbx | 2007-02-17 10:32:19 +1100 (Sat, 17 Feb 2007) | 2 lines
This commit is contained in:
Dan Bartlett
2007-02-17 10:32:19 +11:00
committed by Douglas Clowes
parent 2c1e6357d3
commit 085e49dc0b

View File

@@ -1,7 +1,7 @@
NO TE: WOMBAT - CONTROLLER 1 NO TE: WOMBAT - CONTROLLER 1
NO TE: NO TE:
NO TE: $Revision: 1.4 $ NO TE: $Revision: 1.5 $
NO TE: $Date: 2007-02-16 23:12:02 $ NO TE: $Date: 2007-02-16 23:32:19 $
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:
@@ -71,8 +71,7 @@ NO TE: THE APDONE BIT IS USED SO THAT THE CODE ONLY RUNS WHEN THE
NO TE: STATE OF FTUBE CHANGES - THE DELAYS ARENT RUNNING EVERY CYCLE NO TE: STATE OF FTUBE CHANGES - THE DELAYS ARENT RUNNING EVERY CYCLE
NO TE: IN THE 2ND IF, THE OFF-SOLENOIDS ARENT HELD ENERGISED IN CASE THE NO TE: IN THE 2ND IF, THE OFF-SOLENOIDS ARENT HELD ENERGISED IN CASE THE
NO TE: VALVE MANUAL OVER RIDE IS NEEDED. NO TE: VALVE MANUAL OVER RIDE IS NEEDED.
IF (FTUBE=1)&(APDONE=0);'REQUESTING FLIGHT TUBE BE MOVABLE IF (MOF=0)&(APDONE=0);'REQUESTING FLIGHT TUBE BE MOVABLE
SHF;' TURN MOTOR ON
WT500;' WAIT FOR MOTOR TO STABILISE WT500;' WAIT FOR MOTOR TO STABILISE
SB 12;' DRIVE WHEEL UP-SOLENOID OFF SB 12;' DRIVE WHEEL UP-SOLENOID OFF
CB 11;' DRIVE WHEEL DOWN-SOLENOID ON CB 11;' DRIVE WHEEL DOWN-SOLENOID ON
@@ -81,7 +80,8 @@ SB 10;' SAMPLE STAGE AIR PAD OFF-SOLENOID OFF
CB 9;' SAMPLE STAGE AIR PAD ON-SOLENOID ON CB 9;' SAMPLE STAGE AIR PAD ON-SOLENOID ON
APDONE=1 APDONE=1
ENDIF ENDIF
IF (FTUBE=0)&(APDONE=1);'FLIGHT TUBE MOTION FINISHED IF (MOF=1)&(APDONE=1);'FLIGHT TUBE MOTION FINISHED
SHF;' FOLLOWING STEPS MUST BE RUN BEFORE MOTOR CAN BE TURNED OFF
WT1000;' WAIT FOR FLIGHT TUBE TO SETTLE WT1000;' WAIT FOR FLIGHT TUBE TO SETTLE
SB 9;' SAMPLE STAGE AIR PAD ON-SOLENOID OFF SB 9;' SAMPLE STAGE AIR PAD ON-SOLENOID OFF
CB 10;' SAMPLE STAGE AIR PAD OFF-SOLENOID ON CB 10;' SAMPLE STAGE AIR PAD OFF-SOLENOID ON