code:

---

VAR earthgravity[3] = 0,0, -386;

ACTION physik_ball
	{
	ph_setgravity( earthgravity );

	phent_settype(my, PH_RIGID, PH_SPHERE);
	phent_setmass(my, 50, PH_SPHERE);
	phent_setfriction(my, 90);	phent_setelasticity(my, 90, 10);
	phent_setdamping(my, 30, 20 );
	}

---

code:

---

...the warlock is a great dancer!

---

Damned! I told him not to drink more than 6 glases of whisky! (ACTION: patrol_path() with a simple event_function()).

code:

---

 Example 1
 
VAR earthgravity[3];
earthgravity[0] = 0;
earthgravity[1] = 0;
earthgravity[2] = 386;
 
VAR watergravity[3];
watergravity[0] = 0;
watergravity[1] = 0;
watergravity[2] = 6;
 
WHILE(1)
	{
	IF (IN_PASSABLE == 1)
		{
		ph_setgravity( watergravity );
		}
	ELSE
		{
		ph_setgravity( earthgravity );
		}
	wait (1);
	}
 
 Example 2
 
VAR force_up_in_passable[3];
force_up_in_passable[0] = 0;
force_up_in_passable[1] = 0;
force_up_in_passable[2] = 50;
 	
WHILE(1)
	{
	IF (IN_PASSABLE == 1)
		{
		phent_addforceglobal(my,force_up_in_passable,nullvector);
		}
	wait (1);
	}

---