SFELPHOTON-1190/SFELPHOTON-1191/SFELPHOTON-1192

-SFELPHOTON-1190: Finish slow-Y implementation
-SFELPHOTON-1191: Update default values in EXPMX1 deltatau EVR
-SFELPHOTON-1192: Zero position of detector stage needs to be updates
This commit is contained in:
2024-06-24 16:07:49 +02:00
parent 98b1d068b9
commit 08872841b5
5 changed files with 67 additions and 8 deletions

View File

@@ -1,4 +1,5 @@
define(PLC_Homing='1')
define(PLC_HomingCY='2')
define(statusHoming='P100')
statusHoming=0
@@ -133,3 +134,39 @@ N1: //ENDPLC
disable plc PLC_Homing
close
open plc PLC_HomingCY
define(timer='L1')
statusHoming=0
if (Motor[3].PlusLimit==1){
jog3:-2000 // move out of limit switch
statusHoming|=16
while(Motor[3].DesVelZero!=0){}
}
Motor[3].pLimits=0
Motor[3].HomeVel=1
Motor[3].HomeOffset=-1000
timer = Sys.RunTime + 2. ;while (Sys.RunTime < timer){} //wait x sec
statusHoming|=1
home3 //homing to +lim, moving to relative position HomeOffset=-1000 and set this position to 0
timer = Sys.RunTime + .5 ;while (Sys.RunTime < timer){} //wait x sec
while(Motor[3].HomeInProgress){}
if(Motor[3].HomeComplete)
statusHoming=statusHoming|2
else
{
statusHoming|=256
send 1"CY_Achse home failed\n"
}
statusHoming|=4
timer = Sys.RunTime + 1.;while (Sys.RunTime < timer){} //wait x sec
Motor[3].pLimits=PowerBrick[0].Chan[2].Status.a //seset limit switches
Motor[3].HomePos-=14000 //set this position to 14000um
//timer = Sys.RunTime + 2.;while (Sys.RunTime < timer){} //wait x sec
//jog3:-1000 // move 1000um out of limit switch
statusHoming|=8
disable plc PLC_HomingCY
close