// TMW2 Script
// Modified by Jesusalva
// Evol scripts.
// Authors:
//    Ablu
//    Qwerty Dragon
//    Jesusalva
// Description:
//    Introduction scene where two sailors talk about how the player was found on his raft.
//    Elmo will handle dialogs between both NPCs. Modified for TMW2 by Jesusalva
// Translation 
// FR translated
000-0-0,29,45,0	script	Elmo#sailors	NPC_ELMO,{

OnTalk:
    deltimer("Elmo#sailors::OnSlow");
    setcamnpc;
    showavatar NPC_ELMO;
    mesn "Elmo";
    mesq l("Hey. You. You were in need of medical attention earlier. Do you remember how to walk, talk, attack, etc?");
    next;
    select
        l("Actually, a tutorial would be good!"),
        l("Yes, I do.");

    if (@menu == 2) {
        mesn l("Magic Arpan");
        mesq l("Yeye don't need to train here anymore! Let's head back to the ship before the sun sets, shall we?");
        next;
        goto L_Skip;
    }

    // TODO
    showavatar NPC_MAGIC_ARPAN;
    mesn "Magic Arpan";
    mesq "bug report me tuto:89012";

    showavatar;
    mesn "Narrator";
    mesc l("It seems like you're finally safe. You shut your eyes and fall asleep.");
    mesc l("(Protip: Use ##Barrow keys##b to walk around once you wake up.)");
    next;

L_Skip:
    getitem CreasedShirt, 1;
    getitem CreasedShorts, 1;
    equip(CreasedShirt);
    equip(CreasedShorts);

L_Ready:
    restorecam;
    adddefaultskills;
    setq General_Narrator, 0;
    percentheal 100,100;
    addtimer(45000,"Magic Arpan::OnSlow");
    LOCATION$ = "Candor";
    warp "002-1@Candor", 53, 38;
    savepoint "002-1", 55, 40;
    closedialog;
    close;

// Prevent players from forgetting what they were meant to do
// But if they logout, this will never trigger
OnSlow:
    npctalk3 l("Hey @@! You haven't clicked on me yet!", strcharinfo(0));
    addtimer(30000,"Elmo#sailors::OnSlow2");
    end;

OnSlow2:
    npctalk3 l("@@, do you need help? Are you lost? Click me!", strcharinfo(0));
    dispbottom l("Click on Elmo or Magic Arpan to continue and begin the game...");
    addtimer(60000,"Elmo#sailors::OnSlow");
    end;

OnInit:
    .sex = G_MALE;
    end;
}

000-0-0,29,34,0	script	Magic Arpan#sailors	NPC_MAGIC_ARPAN,{
    doevent "Elmo#sailors::OnTalk";
    close;

OnInit:
    .sex = G_MALE;
    end;
}