SPEX 270M - Page 87

270M Rapid Scanning Imaging Spectrograph
}
void move_ device(void)
{
}
int
int
long
device num;
selection;
steppes;
printf("\nDevice number ........... •); scanf("%d",&device _ num);
printf("A) Absolute move\n•);
printf("B) Relative move\n");
selection = getchQ;
switch ((char) selection)
{
• case 'a':
}
case 'A':
printf("Absolute position ....... "); scant ("%Id" ,&steppes);
fprintf(fptr,"A %d %1d;",device _ num, steppes);
fflush (fptr);
fprintf(fptr,"Q %d;
0
,device num);
fflush (fptr);
queryQ;
break;
case 'b':
case 'B':
· printf("Relative position ....... •); scanf("%1d" ,&steppes);
fprintf(fptr,8R %d %Id;", device_num, steppes);
fflush(fptr);
fprintf(fptr, •a %d;",device num);
fflush(fptr); - ·
queryQ;
break;
void main(void)
{
int selection;
int exitflag;
exitflag = FALSE;
fptr = fopen("SPEXOOOO","r+");
78 Revised November 24. 1992
Leica Microsystems, Inc.'s Ex. 1033
Page 87 of 89