inherit "/std/object";
#include "../moria.h"

#define A "mut2"

int zalozony=0;

void
create_object()
{

ustaw_nazwe( ({"t","t","t","t","t",
	"t"}), ({"t","t","t","t",
	"t","t"}),PL_MESKI_NOS_NZYW);


set_no_show();
    set_long("Tego nie widzisz.\n");

    add_prop(OBJ_M_NO_GIVE,"Ni.\n");
    add_prop(OBJ_M_NO_DROP,"Ni.\n");
    add_prop(OBJ_M_NO_SELL,"Ni.\n");
    
}


string
query_recover()
{
    return 0;
}

string
query_auto_load()
{
    return MASTER + ":";
}

void
enter_env( object ug, object eg )
{
    if ( zalozony == 0 )
	{
TP->remove_subloc(A);
TP->add_subloc(A,TO);
TO->move(TP,A);
zalozony=1;
	}

}


string
show_subloc( string subloc, object ob, object off )
{
    if ( subloc != A ) return "";
    if ( off == ob )
	return "Zostales obdarzony wielkimi, czarnymi skrzydlami.\n";
	return "Na jego plecach dostrzegasz wielkie, smolistoczarne skrzydla.\n";
	
return MASTER+":";
}
	    

int
lot( string str )
{

    if (!str)
	{
	if (TP->query_mana() < 150 )
	    {
	    write("Jestes zbyt wyczerpany mentalnie.\n");
	    return 1;
	    }
	if (TP->query_attack())
	    {
	    write("Nie zdolasz tego zrobic podczas walki!\n");
	    return 1;
	    }
	    
	write("Rozposcierasz swe wielkie skrzydla, a po chwili "+
	    "niczym demon wybijasz sie w przestworza i przecinajac "+
	    "powietrzne bezkresy, krazac nad imperium zmierzasz ku "+
	    "wschodowi lecac wprost do olbzymiej twierdzy.\n\n"+
	    "Ladujesz bezpiecznie przy bramie do fortecy.\n");    
	    
	tell_room(environment(TP),""+QCIMIE(TP,PL_MIA)+" "+
	"rozposciera swe wielkie skrzydla, a po chwili wybija sie "+
	"w powietrze niczym demon i znika w oddali.\n",({TP}));

	TP->move("/d/Imperium/vic/twierdza/lok02.c");
	TP->set_mana(TP->query_mana()-150);
	
	return 1;
	}
	
write("Lot?\n");
return 1;

}


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