// Evol scripts.
// Authors:
//    4144
//    Qwerty Dragon
//    Reid
//    Vasily_Makarov
//    Jesusalva
// Description:
//    Starting script of Evol Online.

000-0,23,20,0	script	Sailors	NPC_SAILORS,6,6,{

OnTouch:
    checkclientversion;
    .@lang = requestlang();
    if (.@lang >= 0 && .@lang <= MAX_LANG) Lang = .@lang;

    mesn l("Narrator");
    mesc(l("You are on a raft, adrift in the sea."), 9);
    next;
    mesc(l("With hunger, thirst, and sleep as your only companions, you have the disturbing realization that you can't remember anything of your former life or identity."), 9);
    next;
    mesc(l("All of a sudden, you hear voices from above."), 9);
    next;
    mesc(l("Your body aches, even your hair hurts, and the bright daylight is painful."), 9);
    next;
    mesc(l("But still, you open your eyes and see a large ship before you!"), 9);
    next;
    mesc(l("Aboard stand sailors trying to communicate with you."), 9);
    next;

    setcamnpc "Sailors", -64, -32;
    mesn l("Kralog Voice");
    mesq l("Hey Frenchy!");
    next;

    setcamnpc "Sailors", 0, -32;
    mesn l("Human Voice");
    mesq l("Nah, clearly from the East...");
    next;

    setcamnpc "Sailors", 144, -80;
    mesn l("Tritan Voice");
    mesq l("What are you guys saying ? It's a Yoiis!");
    next;

    setcamnpc;
    mesn l("Raijin Voice");
    mesq l("From the East? As in... Ancea?");
    next;
    mesq l("Hey you! Can you hear us? Are you okay?");
    next;
    restorecam;

    asklanguage(LANG_ON_SEA);

    // Players coming from TMW Legacy didn't got a chance to do this yet.
    // So allow them now.
    if (islegacyaccount()) {
        // Rebirth system
        if (getlegacylevel() > 90)
            REBIRTH=1;

        // Race selection
        BarberChangeRace();
    }

    setcamnpc;
    mes "";
    mesn;
    mesq l("Oh, still alive? What a relive!");
    next;
    setcamnpc "Sailors", 144, -80;
    mesq l("This castaway needs help, on to the rescue!");
    next;
    restorecam;

    mesn l("Narrator");
    mesc(l("The sailors take you aboard their ship."), 9);
    next;
    mesc(l("Click on the NPCs (Non-Player Characters) around you to continue the introduction."), 9);
    next;

    addtimer(15000,"Elmo#sailors::OnSlow");
    warp "000-0-0", 26, 28;

    closeclientdialog;
    close;

OnInit:
    end;
}