void GrassLod()
{
	while(Hero == 0)
	{
		wait(1);
	}
	set(my, PASSABLE);
	
	while(1)
	{
		if ((vec_dist(Hero->x, my.x) >= 5000) && is(my,FLAG1) == false)  
		{
		   my.z += 40000;
                   set(my,FLAG1);
		}
                if(is(my,FLAG1) == true) && (vec_dist(Hero->x,my->x) < 5000))
                {
		   my.z -= 40000;
                   reset(my,FLAG1);
	        }
		wait(64);
	}		
}