inherit "/std/guild/guild_occ_sh";

#include <ss_types.h>
#include <macros.h>
#include <stdproperties.h>
#include <pl.h>
#include "../mag.h"



#define TYTULY ({"Poczatkujacy Uczen",\
		 "Spetany Zgnilizna",\
		 "Poczatkujacy Nekromanta",\
		 "Nekromanta",\
		 "Potezny Nekromanta, Wieczny Koszmar",\
		 "Straznik Bram Khemrii",\
		 "Wyklety Cien Arabskich Pustyn",\
		  })


query_guild_tax_occ()
{
    return 20;
}


public string
query_guild_name_occ()
{
return "Mages of Death";
}



public string
query_guild_title_occ()
{
if ( shadow_who->query_real_name() == "xerokses" )
return "Niesmiertelny Wladca Czarnej Piramidy Nagasha";
if ( shadow_who->query_real_name() == "vegeta" )
return "Alab'ben Rashid, Upiorny Lord Nieumarlych Dusz";

switch( shadow_who->query_stat(7) )
{
    case 0..20:
	return TYTULY[0];
   case 21..30:
       return TYTULY[1];
    case 31..40:
	return TYTULY[2];
   case 41..60:
       return TYTULY[3];
   case 61..100:
       return TYTULY[4];
   case 101..135:
       return TYTULY[5];
         
   default:
       return TYTULY[6];

}

}



mixed
query_guild_trainer_occ()
{

    return "/d/Imperium/Necro/npc/trener.c";
}



/*

public void
do_die( object kto )
{
    int i;
    object *livs = all_inventory(environment(TP));
    livs = FILTER_LIVE(livs);

    shadow_who->heal_hp(400);
    shadow_who->catch_msg("Zdajesz sobie sprawe, ze energia trzymajaca cie w tym swiecie zaczyna sie konczyc."+
        " Ogarnia cie gniew. Blyskawicznym ruchem wyrzucasz dlonie w gore i krzyczysz potezne slowa mocy,"+
        " przerazajaca inkantacje zwiastujaca smierc. Po chwili zaczynaja wypelniac cie nowe sily wysysane"+
        " z otaczajacago cie zycia.\n");
    tell_room(environment(shadow_who),QCIMIE(shadow_who,PL_MIA)+
        " wybucha gniewem. Blyskawicznym ruchem wyrzuca dlonie w gore i krzyczy potezne slowa mocy,"+
	" przerazajaca inkantacje nieodparcie zwiastujaca smierc.\n",({shadow_who}));
    for ( i = 0; i < sizeof(livs); i++ )
    {
        if (livs[i] != shadow_who)
	{
    	    if (!livs[i]->query_prop(LIVE_I_UNDEAD))
	    {
    	    livs[i]->reduce_hit_point(400);
    	    shadow_who->heal_hp(400);
    	    livs[i]->catch_msg("Jakas potezna sila wdziera sie do twego umyslu wysysajac czesc twej energii zyciowej...\n");
    	    if (livs[i]->query_hp()<1)
		livs[i]->do_die(shadow_who);
    	    shadow_who->catch_msg("Potezna sila twej magii wysysa zycie z " +QIMIE(livs[i],PL_DOP)+
    		" napelniajac cie nowa energia.\n");
	    tell_room(environment(livs[i]),QCIMIE(livs[i],PL_MIA)+
	        " zwija sie z bolu, gdy potezna energia wysysa zen zycie.\n",({livs[i],shadow_who}));
	    
	    }
	}
    }
    shadow_who->catch_msg("Konczysz zaklecie i opuszczasz dlonie, pewien swej potegi.\n");
    tell_room(environment(shadow_who),QCIMIE(shadow_who,PL_MIA)+ " konczy zaklecie i opuszcza dlonie,"+
	" a ty zdajesz sobie sprawe z przerazajacej potegi, jaka dysponuje to przeklete stworzenie.\n",({shadow_who}));
}

*/

public int
query_panic()
{
    return 0;
}

public int
query_fatigue()
{
    return shadow_who->query_max_fatigue();
}