From 3076fccac3c693ccad451cedad470d5980099fdd Mon Sep 17 00:00:00 2001 From: Douglas Clowes Date: Thu, 8 May 2008 16:50:04 +1000 Subject: [PATCH] change speeds add focussing motors r2509 | dcl | 2008-05-08 16:50:04 +1000 (Thu, 08 May 2008) | 2 lines --- .../instrument/rsd/DMC2280/controller3.txt | 26 +++++++++---------- 1 file changed, 13 insertions(+), 13 deletions(-) diff --git a/site_ansto/instrument/rsd/DMC2280/controller3.txt b/site_ansto/instrument/rsd/DMC2280/controller3.txt index baa4f393..364774d8 100644 --- a/site_ansto/instrument/rsd/DMC2280/controller3.txt +++ b/site_ansto/instrument/rsd/DMC2280/controller3.txt @@ -1,9 +1,9 @@ NO TE: KOWARI - CONTROLLER 3 NO TE: -NO TE: $Revision: 1.2 $ -NO TE: $Date: 2007-05-03 06:53:56 $ +NO TE: $Revision: 1.3 $ +NO TE: $Date: 2008-05-08 06:50:04 $ NO TE: Author: Dan Bartlett -NO TE: Last revision by: $Author: dbx $ +NO TE: Last revision by: $Author: dcl $ NO TE: NO TE: A-MONOCHROMATOR FOCUS 1 NO TE: B-MONOCHROMATOR FOCUS 2 @@ -22,9 +22,9 @@ CN 1;' CONFIGURES LIMIT SWITCHES TO ACCEPT NC CONTACTS CO 0;' CONFIGURES EXTENDED IO AS INPUTS II 8,,,0;' CONFIGURES THE 8TH INPUT TO ACTIVATE THE #ININT ROUTINE IA 137,157,201,197;' CONFIGURES IP ADDRESS -AC 6000,6000,,,,,,;' SET ACELERATION -DC 6000,6000,,,,,,;' SET DECELERATION -SP 12500,12500,,,,,,;' SET SPEED +AC 12500,12500,,,,,,;' SET ACELERATION +DC 12500,12500,,,,,,;' SET DECELERATION +SP 25000,25000,,,,,,;' SET SPEED JS #THREAD0 EN NO ---------------------------------------- @@ -59,12 +59,12 @@ NO SPH=30000 NO ENDIF NO TE: PROCEDURE TO UPDATE THE RESOLVER FEEDBACK. NO TE: RESOLVER NUMBER 1 -NO AI31;' WAIT FOR XBUSY BIT -NO IOBYTE1=_TI2;' LOAD FIRST WORD -NO IOBYTE2=_TI3;' LOAD SECOND WORD -NO IOBYTE2=(IOBYTE2&63);' MASK OUT XBUSY BIT -NO IOBYTE2=(IOBYTE2*256);' SHIFT REMAINING BITS 8 POSITIONS TO RIGHT -NO DEA=(IOBYTE1+IOBYTE2);' ADD WORDS TOGETHER, LOAD INTO DEA, USE TPA FOR VALUE +AI31;' WAIT FOR XBUSY BIT +IOBYTE1=_TI2;' LOAD FIRST WORD +IOBYTE2=_TI3;' LOAD SECOND WORD +IOBYTE2=(IOBYTE2&63);' MASK OUT XBUSY BIT +IOBYTE2=(IOBYTE2*256);' SHIFT REMAINING BITS 8 POSITIONS TO RIGHT +DEA=(IOBYTE1+IOBYTE2);' ADD WORDS TOGETHER, LOAD INTO DEA, USE TPA FOR VALUE NO TE: RESOLVER NUMBER 2 AI47;' WAIT FOR XBUSY BIT IOBYTE3=_TI4;' LOAD FIRST WORD @@ -96,4 +96,4 @@ WT 500 MG _TPB {F5.0}{EA} JP #LOOPIT EN -NO ---------------------------------------- \ No newline at end of file +NO ----------------------------------------