action warlock
{
	player = me; 
	while (1) 
	{ 
		my.skill1 = 5 * time; 
		my.skill2 = 0; 
		vec_set (temp, my.x); 
		temp.z -= 3000; 
		trace_mode = ignore_you + ignore_passable + use_box; 
		
		my.skill3 = -trace (my.x, temp); 
		if (destination != null)
		{
			vec_set (temp.x, destination.x); 
			vec_sub (temp.x, my.x);
			vec_to_angle (my.pan, temp); // turn towards the destination
			my.tilt = 0; // don't bow :)
			if (vec_dist (my.x, destination.x) > 40)
			{
				move_mode = ignore_passable; 
				ent_move (my.skill1, nullvector); // moves using skill1..3
				ent_cycle("walk", my.skill46); 
				my.skill46 += 10 * time; // "walk" animation speed 
				my.skill46 %= 100; // loop animation 
			}
			else
			{
				destination.invisible = on;
				ent_cycle("idle", my.skill46); // play "stand" frames animation 
				my.skill46 += 2 * time; // "stand" animation speed 
				my.skill46 %= 100; // loop animation 
			}
		}
		wait (1); 
	}
}