+ return 1;
+}
+
+int main(int argc,char **argv)
+{
+ u32 max_x,max_y,max_z,x,y,z,x_c,y_c,z_c;
+ int i,quit,escape,nowait;
+ double a_el,b_el,a_cd,b_cd,a_ap,b_ap;
+ int cc,steps,range,refresh;
+ char s_file[MAX_CHARS];
+ char l_file[MAX_CHARS];
+ char r_file[MAX_CHARS];
+ d3_lattice d3_l;
+
+ max_x=X;
+ max_y=Y;
+ max_z=Z;
+ x=X/2-1;
+ y=Y/2-1;
+ z=Z/2-1;
+ steps=STEPS;
+ range=RANGE;
+ refresh=REFRESH;
+ a_el=A_EL;
+ b_el=B_EL;
+ a_cd=A_CD;
+ b_cd=B_CD;
+ a_ap=A_AP;
+ b_ap=B_AP;
+ cc=CC;
+ nowait=0;
+ strcpy(s_file,"");
+ strcpy(l_file,"");
+ strcpy(r_file,"");
+
+ for(i=1,i<argc,i++)
+ {
+ if(argv[i][0]=='-')
+ {
+ switch(argv[i][1])
+ {
+ case 'h':
+ usage();
+ return -1;
+ case 'n':
+ nowait=1;
+ break;
+ case 'a':
+ a_el=atof(argv[++i]);
+ break;
+ case 'b':
+ b_el=atof(argv[++i]);
+ break;
+ case 'x':
+ max_x=atoi(argv[++i]);
+ break;
+ case 'y':
+ max_y=atoi(argv[++i]);
+ break;
+ case 'z':
+ max_z=atoi(argv[++i]);
+ break;
+ case 'X':
+ x=atoi(argv[++i]);
+ break;
+ case 'Y':
+ y=atoi(argv[++i]);
+ break;
+ case 'Z':
+ z=atoi(argv[++i]);
+ break;
+ case 's':
+ steps=atoi(argv[++i]);
+ break;
+ case 'd':
+ refresh=atoi(argv[++i]);
+ break;
+ case 'r':
+ range=atoi(argv[++i]);
+ break;
+ case 'f':
+ a_ap=atof(argv[++i]);
+ break;
+ case 'p':
+ b_ap=atof(argv[++i]);
+ break;
+ case 'A':
+ a_cd=atof(argv[++i]);
+ break;
+ case 'B':
+ b_cd=atof(argv[++i]);
+ break;
+ case 'C':
+ cc=atoi(argv[++i]);
+ break;
+ case 'L':
+ strcpy(l_file,argv[++i]);
+ break;
+ case 'S':
+ strcpy(s_file,argv[++i]);
+ break;
+ case 'R':
+ strcpy(r_file,argv[++i]);
+ break;
+ default:
+ usage();
+ return -1;
+ }
+ } else usage();
+ }
+
+