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

no message

Browse Source 
r2149 | dbx | 2007-09-24 11:10:59 +1000 (Mon, 24 Sep 2007) | 2 lines
This commit is contained in:
Dan Bartlett
2007-09-24 11:10:59 +10:00
committed by Douglas Clowes
parent 565267647b
commit ad2b41fef2
4 changed files with 97 additions and 92 deletions
Download Patch File Download Diff File Expand all files Collapse all files

37
site_ansto/instrument/sans/DMC2280/controller4.txt
View File

@@ -1,17 +1,17 @@
NO TE: QUOKKA - CONTROLLER 4
NO TE:
NO TE: $Revision: 1.6 $
NO TE: $Date: 2007-08-23 05:48:22 $
NO TE: $Revision: 1.7 $
NO TE: $Date: 2007-09-24 01:10:59 $
NO TE: Author: Dan Bartlett
NO TE: Last revision by: $Author: dbx $
NO TE:
NO TE: A-BEAM STOPS TRANSLATION - X (ACCROSS BEAM)
NO TE: A-BEAM STOPS TRANS. X (ACCROSS BEAM) +VE=WEST
NO TE: B-BEAM STOPS TRANSLATION - RAISE
NO TE: C-BEAM STOP 1 (LARGEST DISK)
NO TE: D-BEAM STOP 2
NO TE: E-BEAM STOP 3
NO TE: F-BEAM STOP 4
NO TE: G-BEAM STOP 5 (SMALLEST DISK)
NO TE: C-BEAM STOP 1 -VE=UP (LARGEST DISK)
NO TE: D-BEAM STOP 2 -VE=UP
NO TE: E-BEAM STOP 3 +VE=UP
NO TE: F-BEAM STOP 4 -VE=UP
NO TE: G-BEAM STOP 5 +VE=UP (SMALLEST DISK)
NO TE: H-POLARISER
NO ----------------------------------------
#AUTO
@@ -22,9 +22,9 @@ CN 1;' CONFIGURES LIMIT SWITCHES TO ACCEPT NC CONTACTS
II 8,,,0;' CONFIGURES THE 8TH INPUT TO ACTIVATE THE #ININT ROUTINE
OP 65280;' SETS OUTPUTS 9-16 ON = RELAYS OFF
IA 137,157,202,70;' CONFIGURES IP ADDRESS
AC 25000,100000,15000,15000,15000,15000,15000,25000;' SET ACELERATION
DC 25000,100000,15000,15000,15000,15000,15000,25000;' SET DECELERATION
SP 25000,100000,30000,40000,40000,40000,40000,25000;' SET SPEED
AC 25000,100000,5000,15000,15000,15000,15000,25000;' SET ACELERATION
DC 25000,100000,5000,15000,15000,15000,15000,25000;' SET DECELERATION
SP 100000,100000,30000,40000,40000,40000,40000,25000;' SET SPEED
SIA=1,25,13,0<-2>2;'HEIDENHAIN ROQ425
SIB=1,25,13,0<-2>2;'HEIDENHAIN ROQ425
SIC=0,25,13,0<-2>2;'NO ENCODER
@@ -39,8 +39,8 @@ 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>100000)
SPA=100000
ENDIF
IF (_SPB>100000)
SPB=100000
@@ -71,11 +71,12 @@ SB 10;' MOTOR OFF = BRAKE DENERGISED = LOCKED
ENDIF
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
IF (_LFC=0)|(_LFD=0)|(_LFE=0)|(_LFF=0)|(_LFG=0)
SB1
ELSE
CB1
ENDIF
NO IF (_TSC&12=4)|(_TSD&12=4)|(_TSE&12=4)|(_TSF&12=4)|(_TSG&12=4)
NO TE: IF ANY OF THE 5 BEAMSTOPS IS NOT DOWN AND UP THEN SET BIT 1 HIGH
NO SB1
NO ELSE
NO CB1
NO ENDIF
JP #THREAD0
EN
NO ----------------------------------------