/*
 * Shadow dla gildii zolnierzy najemnych
 * by Morley '98
 */

#pragma strict_types

inherit "/std/guild/guild_occ_sh";

#include "najemnicy.h"
#include <ss_types.h>

string *no_join = NOT_ALLOWED_GUILDS;
string *no_join_reasons = NOT_ALLOW_REASONS;

public int
query_guild_tax_occ()
{
    return 25;
}

public string
query_guild_name_occ()
{
    "Wolna Kompania Stirlandu";
}

public string
query_guild_style_occ()
{
    return "fighter";
}

public string
query_guild_title_occ()
{
    int stat = this_object()->query_stat (SS_OCCUP);
    string str;

    switch (stat)
    {
    case 1..5:
	str = "Szeregowy";
	break;

    case 6..10:
	str = "Starszy szeregowy";
	break;

    case 11..15:
	str = "Kapral";
	break;

    case 16..20:
	str = "Starszy kapral";
	break;

    case 21..25:
	str = "Plutonowy";
	break;

    case 26..30:
	str = "Starszy plutonowy";
	break;

    case 31..35:
	str = "Sierzant";
	break;

    case 36..40:
	str = "Starszy sierzant";
	break;

    case 41..45:
	str = "Sierzant sztabowy";
	break;

    case 46..50:
	str = "Starszy sierzant sztabowy";
	break;

    case 51..55:
	str = "Mlodszy chorazy";
	break;

    case 56..60:
	str = "Chorazy";
	break;

    case 61..65:
	str = "Starzy chorazy";
	break;

    case 66..70:
	str = "Mlodszy chorazy sztabowy";
	break;

    case 71..75:
	str = "Chorazy sztabowy";
	break;

    case 76..80:
	str = "Starszy chorazy sztabowy";
	break;

    case 81..85:
	str = "Podporucznik";
	break;

    case 86..90:
	str = "Porucznik";
	break;

    case 91..95:
	str = "Kapitan";
	break;

    case 96..100:
	str = "Major";
	break;

    case 101..105:
	str = "Podpulkownik";
	break;

    default:
	str = "Pulkownik";
    }
    str += " Wolnej Kompanii Stirlandu";

    return str;
}

public int
query_guild_not_allow_join_occ(object player, string type, string style, string name)
{
    int tmp;

    if (type == "occupational")
    {
	notify_fail("Mozesz nalezec tylko do jednej gildii zawodowej. " +
		    "(W tej chwili oddzial zolnierzy najemnych).\n");
	return 1;
    }

    if (tmp = member_array (name, no_join) != -1)
    {
	notify_fail (no_join_reasons[tmp]);
	return 1;
    }

    return 0;
}

public mixed
query_guild_trainer_occ()
{
    return 0;
}

public mixed
query_guild_skill_name(int type)
{
    if (type == SS_FORMACJE)
	return "formacje";

    return 0;
}
