Sprache von GASP

Interface für naive-programmer


hands(int object_no)
{
  float (*points)[3]; long *indices; int nmax, fmax, i;
  char *atomic_name, *object_name;
  for (i = 0; i < object_no; i++) {
    get_polyhedron(&points, &indices, &nmax, &fmax, 
	&atomic_name, &object_name);
    Begin_atomic(atomic_name);
    Create_polyhedron(object_name, nmax, fmax, points, indices);
    End_atomic();
  }
  Begin_atomic("Rotate");
  Rotate_world();
  End_atomic();
}