action gondel01 {
gondel1 = my;
my.passable = on;
phent_settype(my,PH_RIGID,PH_SPHERE);
phent_setmass(my,1,PH_SPHERE);
phent_setdamping(my,0,30);
phent_setfriction(my,10);
phent_setgroup(my,2);
cmolen = phcon_add(PH_HINGE,my,molen_arm);
phcon_setparams1(cmolen,my.x,vector(1,0,0),nullvector);
phcon_setparams2(cmolen,vector(-360,360,0),nullvector,nullvector);
while(my) {
vec_for_vertex(temp,molen_arm,460);
my.x = temp.x;
my.y = temp.y;
my.z = temp.z;
my.pan = molen_arm.pan+190;
wait(1);
}
}