/*
 * Gildia Tropicieli z Averlandu
 */

inherit "/d/Imperium/std/room";
#include "../mag.h"
#include <formulas.h>
#include <macros.h>
#include <ss_types.h>

int
wyj()
{
if (TP->query_prop("medytuje"))
{
write("Wstajesz z ziemi schodzac na dol.\n");
TP->remove_prop("medytuje");
return 0;
}
return 0;
}


void
loop()
{
int i;
object *liv = all_inventory(TO);

    for ( i = 0; i < sizeof(liv); i++ )
	{
	if (liv[i]->query_prop("medytuje"))
	    liv[i]->set_mana(liv[i]->query_mana()+5);
	
	}


set_alarm(10.0,0.0,"loop");
}







void
create_imperium_room()
{
 add_prop(ROOM_I_LIGHT, 2);

 add_prop(ROOM_I_INSIDE, 1);

 set_short("Szczyt wiezy");
 set_long("Sala medytacji.\n");
 
 add_exit(PATH+"gildia1.c","dol","@@wyj",0,1);

    set_alarm(1.0,0.0,"loop");
}




int
medytuj( string str )
{
    if (str != 0)
	{
	write("Medytuj?\n");
	return 1;
	}
    if (TP->query_prop("medytuje"))
	{
	write("Przeciez juz medytujesz.\n");
	return 1;
	}
	
    write("Klekasz na ziemi i zaczynasz medytowac.\n");
	say(QCIMIE(TP,PL_MIA)+" kleka na ziemi i zaczyna medytowac.\n");

    TP->add_prop("medytuje",1);

    
    return 1;
}


void
init()
{
::init();
add_action("medytuj","medytuj");
}