14f257c2ab
- Fixed ei interrupt bug in tasdrive.c - Made eiger A2 driving work - Added force start facility to devexec for POLDI HV SKIPPED: psi/eigera2.c psi/polterwrite.c
57 lines
1.7 KiB
C
57 lines
1.7 KiB
C
|
|
/*----------------------------------------------------------------------
|
|
SICS interface to the triple axis spectrometer calculation
|
|
module.
|
|
|
|
copyright: see file COPYRIGHT
|
|
|
|
Mark Koennecke, April-May 2005
|
|
----------------------------------------------------------------------*/
|
|
#ifndef TASUB
|
|
#define TASUB
|
|
#include <stdio.h>
|
|
#include "tasublib.h"
|
|
#include "cell.h"
|
|
#include "motor.h"
|
|
|
|
/*------------------- defines for tasMode -----------------------------------*/
|
|
typedef struct{
|
|
pObjectDescriptor pDes;
|
|
tasMachine machine;
|
|
int reflectionList;
|
|
lattice cell;
|
|
tasQEPosition target;
|
|
tasQEPosition current;
|
|
int tasMode;
|
|
int outOfPlaneAllowed;
|
|
double targetEn, actualEn;
|
|
int mustRecalculate;
|
|
int mustDrive;
|
|
pMotor motors[12];
|
|
tasReflection r1, r2;
|
|
int ubValid;
|
|
int silent;
|
|
char *updater;
|
|
}tasUB, *ptasUB;
|
|
|
|
|
|
/*--------------------- the tas virtual motor data structure ---------------------*/
|
|
typedef struct {
|
|
pObjectDescriptor pDes;
|
|
pIDrivable pDriv;
|
|
ptasUB math;
|
|
int code;
|
|
}tasMot, *ptasMot;
|
|
|
|
/*--------------------------------------------------------------------*/
|
|
|
|
int TasUBFactory(SConnection *pCon,SicsInterp *pSics, void *pData,
|
|
int argc, char *argv[]);
|
|
int TasUBWrapper(SConnection *pCon,SicsInterp *pSics, void *pData,
|
|
int argc, char *argv[]);
|
|
|
|
|
|
int findReflection(int list, int idx, ptasReflection r);
|
|
int tasUpdate(SConnection *pCon, ptasUB self);
|
|
#endif
|