// TMW2 Script
// Authors:
// Jesusalva
// Description:
// Tutorial
000-0-0,30,34,0 script Elmo#sailors NPC_ELMO,{
.@q = getq(ShipQuests_Arpan);
if (.@q == 0) goto L_Step0;
if (.@q == 1) goto L_Step1;
if (.@q == 2) goto L_Step2;
if (.@q == 3) goto L_Step3;
if (.@q == 4) goto L_Step4;
if (.@q == 5) goto L_Step5;
goto L_Ready;
// Tutorial not accepted
L_Step0:
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;
}
savepoint "000-0-0", 30, 37;
setq ShipQuests_Arpan, 1;
// Tutorial accepted
L_Step1:
showavatar NPC_MAGIC_ARPAN;
mesn l("Magic Arpan");
mesq l("Let's start with something simple, yeye.");
next;
mesn l("Magic Arpan");
mesq l("You can move using @@ or, at your choice, by clicking where you want to go.", b(l("arrow keys")));
next;
setcamnpc "Chest#002-1";
mesn l("Magic Arpan");
mesq l("On mobile, the DPAD is at your left. Do you see the chest to my right?");
next;
setcamnpc;
mesn l("Magic Arpan");
mesq l("Go and talk to it.");
close;
// Clothes taken
L_Step2:
showavatar NPC_MAGIC_ARPAN;
mesn l("Magic Arpan");
mesq l("Yeye, very good, you took the clothes.");
next;
L_Step2Skip:
mesn l("Magic Arpan");
mesq l("Equipping them is easy, you must open your inventory with @@ or clicking in @@, on the top right.", b(l("F3")), b(l("INV")));
next;
mesn l("Magic Arpan");
mesq l("Most of it should be pretty intuitive, but be sure to press @@ on the bottom-left of inventory screen.", b(l("Equip")));
next;
mesn l("Magic Arpan");
mesq l("Come talk to me once you manage to equip the shirt and the shorts!");
mesc l("PS. Due a bug, they won't be displayed when you equip unless you relog."), 1;
setq1 ShipQuests_Arpan, 3;
close;
// Clothes Check
L_Step3:
if (getequipid(equip_torso) < 0 || getequipid(equip_legs) < 0)
goto L_Step2Skip;
setcamnpc;
showavatar NPC_ELMO;
mesn "Elmo";
mesq l("You learn fast, good job. These clothes aren't a mighty armor, but they'll help.");
next;
mesn "Elmo";
mesq l("Let's jump straight to action, shall we? I'll spawn a mighty @@ to fight you!", getmonsterlink(Dummy));
next;
mesn "Elmo";
mesq l("On a computer, you can press @@ to attack it. On mobile, that would be the big button with the number 1.", b(l("Ctrl")));
next;
mesn "Elmo";
mesq l("Another way to attack it is clicking on it. Now, there are some things you must know before fighting this dangerous creature!");
next;
showavatar NPC_MAGIC_ARPAN;
mesn l("Magic Arpan");
mesq l("Yayaya, by pressing @@ or clicking in @@, you'll open your char status window!", b(l("F2")), b(l("STA")));
next;
mesn l("Magic Arpan");
mesq l("You should allocate some attributes to it. You need @@, @@ and @@, on this order of importance.", b(l("Agility")), b(l("Dexterity")), b(l("Strength"))); // b(l("")),
next;
mesn l("Magic Arpan");
mesq l("Once you allocate status points, you can fight it! Good luck, @@!", strcharinfo(0));
mesc l("WARNING: NO EXPERIENCE WILL BE CARRIED OVER FROM THIS FIGHT."), 1;
percentheal 100,100;
// This is not really reliable, of course >.<
.@mct=mobcount("000-0-0", "Elmo#sailors::OnStep4");
.@x=38; .@y=43;
.@x+=.@mct;
freeloop(true);
while (.@x > 43) {
.@x-=5; .@y+=1;
}
freeloop(false);
if (.@y <= 47)
@mobTarget=monster("000-0-0", 43, 44, l("@@ Dummy", strcharinfo(0)), Dummy, 1, "Elmo#sailors::OnStep4");
setq1 ShipQuests_Arpan, 4;
close;
L_Step4:
percentheal 100,100;
mesn "Elmo";
mesq l("Did something happen?");
mesc l("This is a menu, click on the option and then on send. You can use arrow keys if you prefer.");
mes "";
select
l(">.< \"The Dummy is a real killer!\""),
l("T.T \"Someone else killed my Dummy!\""),
l("'.' \"I forgot how to allocate status!\""),
l("-.- \"I forgot how to fight!\""),
l("^.^ \"Nothing is wrong, don't worry!\"");
mes "";
switch (@menu) {
case 1:
mesn "Elmo";
mesq l("Well, you clearly don't have a weapon. So, let me explain some quick.");
next;
mesn "Elmo";
mesq l("Don't be afraid of death. Of course, in most places, dying will reduce your Experience.");
next;
mesn "Elmo";
mesq l("But you don't have any experience at the moment, so what do you have to lose?");
next;
mesn "Elmo";
mesq l("Try killing it, and if it kills you, just come back from death to continue killing it.");
mes l("What I want to say is: Kill non-stop!");
next;
mesc l("Actually, the Dummy don't fight back. Are you afraid?");
break;
case 2:
.@mct=mobcount("000-0-0", "Elmo#sailors::OnStep4");
if (.@mct) {
mesn "Elmo";
mesq l("It was just south of the island. Try walking around a bit?");
} else {
npctalk l("Hey, this Dummy is to @@ kill.", strcharinfo(0));
monster "000-0-0", 43, 44, l("@@ Dummy", strcharinfo(0)), Dummy, 1, "Elmo#sailors::OnStep4";
}
break;
case 3:
showavatar NPC_MAGIC_ARPAN;
mesn l("Magic Arpan");
mesq l("Yayaya, by pressing @@ or clicking in @@, you'll open your char status window!", b(l("F2")), b(l("STA")));
next;
mesn l("Magic Arpan");
mesq l("You should allocate some attributes to it. You need @@, @@ and @@, on this order of importance.", b(l("Agility")), b(l("Dexterity")), b(l("Strength"))); // b(l("")),
break;
case 4:
mesn "Elmo";
mesq l("On a computer, you can press @@ to attack it. On mobile, that would be the big button with the number 1.", b(l("Ctrl")));
next;
mesn "Elmo";
mesq l("Another way to attack it is clicking on it.");
break;
}
close;
OnStep4:
if (getunittype(@mobTarget) != -1 && is_staff())
dispbottom ("Hey hey, the monster seems to be alive. Mr. GM, do something about that!");
dispbottom l("You free the world from an evil Dummy.");
setq1 ShipQuests_Arpan, 5;
end;
L_Step5:
showavatar NPC_MAGIC_ARPAN;
mesn l("Magic Arpan");
mesq l("Yayaya, good job! You can collect loot by pressing @@.", b("Z"));
next;
mesn l("Magic Arpan");
mes l("I like to talk! If yeye likes too, you can press @@ to open chat box!", b(l("Enter")));
mes l("On mobile, you would click on the @@ icon!", b(l("keyboard")));
next;
mesn l("Magic Arpan");
mesq l("The @@ tab allows yeye to talk on Discord, too! Yayaya, fancy, uh?", b("#world"));
next;
mesn l("Magic Arpan");
mesq l("Yeye can press @@ to sit, which will allow you to heal faster.", b("s"));
next;
showavatar NPC_ELMO;
mesn "Elmo";
mesq l("You're ready. Let's head back to the ship before the sun sets, shall we?");
next;
getitem PiouLegs, 3; // Tutorial Reward
goto L_Ready;
L_Skip:
setq ShipQuests_Arpan, 5;
getitem CreasedShirt, 1;
getitem CreasedShorts, 1;
equip(CreasedShirt);
equip(CreasedShorts);
L_Ready:
//clearitem(); // The dummy don't drop anything :>
resetlvl(2);
restorecam;
setq General_Narrator, 0;
adddefaultskills;
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;
}
