/* Karczma "Pod Wielkim Dzikiem: */

inherit "/d/Imperium/std/room";
#include <stdproperties.h>
#include <macros.h>
#include "silvy.h"

// object ksiega;

void
create_imperium_room()
{
        set_short("Sala wejsciowa");

        set_long("Jestes w podrzednej karczmie. Nad szynkiem widzisz glowe wielkiego"
                +" dzika. Dookola ciebie stoi kilkanascie stolikow, przy ktory siedza lub leza"
                +" goscie. W powietrzu wisza opary taniego piwa i wina. Na"
                +" ktoryms ze stolikow na wpol rozneglizowana kobieta probuje"
                +" tanczyc, ze wszystkich stron otaczaja ja wyglodniali"
                +" pijacy. Czasami ktos probuje rozpetac jakas bojke, ale te"
                +" szybko sa konczone przez dwoch dobrze zbudowanych jegomosciow"
                +", wygladajacych na jedynych trzezwych w tej budzie. Na wschodzie " +
                "widzisz szynk"
                +" przy ktorym krzata sie ogromny karczmarz." +
                "\nNa scianie zauwazasz przybita krzywym gwozdziem, niewielka kartke.\n");

        add_prop(ROOM_M_NO_ATTACK, "Dwaj ochroniarze zblizaja sie w twoim kierunku,"
                                +" chyba zrezygnujesz na razie z walki.\n");
        add_prop(ROOM_I_INSIDE,1);

/* Ksiega z FAQ dla poczatkujacych graczy. Bedzie zawierac najwazniesze porady
 *
 * 31.12.1997 Wstawiona do lokacji startowych
 *
 */
//	ksiega = clone_object("/d/Arkadia/obj/ksiega.c");
//	ksiega ->move(this_object());

        add_exit(NPATH + "sklepy/karczma2.c", "wschod",0);
        add_exit(NPATH + "lokacje/ulica3.c", "zachod",0);
        
        add_item(({"glowe","glowe dzika","glowe wielkiego dzika"}),
            "Tuz nad szynkiem wisi wyprawiona glowa dorodnego dzika. Wypolerowane " +
            "kly blyszcza w swietle lamp.\n");
        add_item(({"ochroniarzy","jegomosciow"}),
            "Dwoch barczystych ochroniarzy siedzi przy stoliku niedaleko wyjscia. " +
            "Leniwie sacza jakis mlecznobialy trunek, bacznie przygladajac sie " +
            "gosciom.\n");
        add_item(({"szynk","kontuar","lade"}),
            "Mozesz do niego dotrzec kierujac sie na wschod.\n");
        add_item(({"kobiete","rozneglizowana kobiete","tancerke"}),
            "Kobieta ta nie jest juz pierwszej mlodosci. Ty to zauwazasz, lecz " +
            "podpite lumpy najwyrazniej nie.\n");
        add_item(({"pijakow","lumpy","gosci"}),
            "Klientami tej speluny sa ludzie ktorych oglednie okreslic mozna jako " +
            "lumpow i margines. Masz szczera nadzieje ze wyjdziesz stad bez trudnosci.\n");
        add_item("karczmarza","Otyly karczmarz uwija sie przy barze.\n");

    add_item(({"kartke","ogloszenie"}), "Nieco podniszczona kartka, wyglada na jakies " +
             "publiczne ogloszenie.\n");

    add_cmd_item( ({ "kartke", "ogloszenie" }), ({ "przeczytaj" }),
             "@@hints");

    
    set_event_time(10.0,160.0);
    add_event("Glosne chrapanie rozlega sie spod jednego ze stolikow.\n");
    add_event("Jakis podpity krasnolud zaczyna sie awanturowac. Dwaj ochroniarze szybko " +
        "jednak reaguja i po chwili delikwent wylatuje za drzwi z glosnym hukiem.\n");
    add_event("Tanczaca na stole kobieta wywoluje burze oklaskow i gwizdow wsrod " +
        "kibicujacych jej pijakow.\n");
    set_events_on(1);
} 

int start(string str)
{
    notify_fail("Gdzie chcesz startowac?\n");

    if (str != "tu" && str != "tutaj")
        return 0;

    if (this_player()->set_default_start_location(file_name(this_object())))
        write("Od teraz bedziesz rozpoczynal gre w tej karczmie.\n");
    else
        write("Hmm... cos jest nie tak. Arkadia bedzie ci wdzieczna za "
            + "zgloszenie bledu, " + this_player()->query_wolacz() + ".\n");

    return 1;
}

int
strof(string str)
{
    notify_fail("Komendy na Arkadii wystepuja w formie dokonanej; jesli chcesz "
    + "cos przeczytac uzyj polecenia <przeczytaj ...>.\n");
    return 0;
}

void
init()
{
    ::init();
    add_action(start,"startuj");
    add_action(start,"zaczynaj");
    add_action(strof,"czytaj");
}


string
hints()
{
    string str="\n"
+"                        Witaj w swiecie Arkadii                            "
+"\nArkadia jest pierwszym w pelni polskim MUD'em, czyli miejscem w ktorym "
+"wiele\nosob jednoczesnie moze wspoluczesniczyc w grze toczonej w swiecie "
+"Fantasy. Do\nkierowania stworzona sobie postacia mozna uzywac komend "
+"dostepnych w dosc\nszerokim wachlarzu. Aby uzyskac pomoc do komendy, sprobuj "
+"wpisac <?komenda>.\nPoruszac "
+"sie po swiecie mozna glownie za pomoca komend - kierunkow\ngeograficznych, jak "
+"<polnocny-zachod>, czy <poludnie> (na standardowe\nkierunki sa zalozone "
+"angielskie aliasy <n,s,w,e,ne,nw,se,sw>). Lista wszystkich\nwidocznych wyjsc "
+"z kazdej lokacji, podana jest na koncu jej opisu, czasem moga\nwystepowac "
+"takze wyjscia ukryte. Inne podstawowe komendy to <obejrzyj ...>\n(uwaga: "
+"obejrzyj kogo? co?, nie kto? co?, wszystkie komendy na Arkadii oczekuja\n"
+"prawidlowej polskiej gramatyki), <powiedz ...>, <zapros ...>, itp.\n"
+"Rozwoj postaci uwarunkowany jest zdobywanym przez nia dosiadczeniem, ktore\n"
+"mozna otrzymac za wygrana walke, lub za wykonanie zleconego zadania "
+"ktore mozna\nw niektorych miejscach otrzymac. Pieniadze zdobyc mozna glownie "
+"z lupow\nzdobytych na wrogach, sa jednak takze inne sposoby, jak np: zbieranie "
+"ziol, i\nodsprzedaz ich zielarzowi. Posiadany majatek roztrwonic mozna na "
+"wiele\nsposobow, warto jednak zainwestowac w zdobywanie i rozwoj umiejetnosci "
+"przez\nswoja postac (mozna to zrobic w dostepnych w niektorych miejscach "
+"gildiach\npodroznikow).\n"
+"Mamy nadzieje, ze ta garsc informacji pomoze Ci w pierwszych spedzonych "
+"tu\nchwilach. Zapewne wkrotce sam odkryjesz znacznie wiecej niz moglibysmy "
+"napisac.\n\nTworcy Arkadii.\n\n"
+"P.S. Jesli zaczynasz gre w innym miejscu, a chcialbys zaczynac tu, mozesz "
+"uzyc\nkomendy <startuj tutaj>.\n"
+"\nP.S.S. Pamietaj! Zanim zaczniesz grac PRZECZYTAJ ZASADY! <?zasady>."
+" Ich\nnieznajomosc moze byc bardzo szkodliwa!\n";

this_player()->more(str,0);
return "";
}