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); 
	}
}

action warlock()
{
	player = me; 
	while (1) 
	{ 
		my.skill1 = 5 * time_step; 
		my.skill2 = 0; 
		vec_set (temp, my.x); 
		temp.z -= 3000; 
		my.skill3 = c_trace (my.x, temp, IGNORE_YOU + IGNORE_PASSABLE + USE_BOX); 
		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)
			{
				c_move(my,my.skill1,nullvector,IGNORE_PASSABLE);
				ent_animate(my,"walk",my.skill46,ANM_CYCLE);
				my.skill46 += 10 * time; // "walk" animation speed 
				my.skill46 %= 100; // loop animation 
			}
			else
			{
				set(destination,INVISIBLE);
				ent_animate(my,"idle",my.skill46,ANM_CYCLE); // play "stand" frames animation 
				my.skill46 += 2 * time_step; // "stand" animation speed 
				my.skill46 %= 100; // loop animation 
			}
		}
		wait (1); 
	}
}