diff options
Diffstat (limited to 'npc/002-3/nard.txt')
-rw-r--r-- | npc/002-3/nard.txt | 319 |
1 files changed, 319 insertions, 0 deletions
diff --git a/npc/002-3/nard.txt b/npc/002-3/nard.txt new file mode 100644 index 000000000..b37495104 --- /dev/null +++ b/npc/002-3/nard.txt @@ -0,0 +1,319 @@ +// TMW2 scripts. +// Authors: +// Qwerty Dragon +// Reid +// Jesusalva +// Description: +// Captain Nard dialogs. +// Nard is a fair merchant ship's captain. +// Original Nard's from Evol by Qwerty Dragon and Reid + +002-3,36,25,0 script Nard NPC_NARD,{ + showavatar NPC_NARD; // this is handled by avatars.xml + + .@narrator = getq(General_Narrator); + .@price=1200; + +L_Checker: + if (.@narrator) goto L_Travel; + if (getq(ShipQuests_Julia) >= 3) goto L_NotYet; + // Introduction + mesn; + mesq l("Hello."); + next; + mesq l("Let me introduce myself, I am Nard, captain of this ship."); + next; + mesq lg("I am pleased to see that you have woken up and are active. Elmo came here to tell me this good news!"); + next; + mesn; + mesq l("Hehehe, he is a bit nervous, please forgive him, it is not everyday we have a new member in the crew!"); + next; + mesq l("So, how do you feel? I see that Juliet did a marvellous job! You look like you're in good health now."); + next; + +L_Menu: + menu + lg("I feel ok."), L_Ok, + l("Who's this Juliet?"), L_Juliet, + lg("I'm a bit sick..."), -; + + mes ""; + mesn; + mesq l("Oh, I was going to ask you if you wanted to help the crew search for some food and explore the island out there."); + next; + +L_MenuQuest: + menu + l("What do you need?"), -, + l("Is there a reward?"), L_NeedHead, + l("Wait, you never came here before?"), L_CandorIsland; + + mes ""; + mesn; + mesq l("Ship travels are not free. See if you can gather some money, and I'll bring you to Tulimshar!"); + next; + showavatar NPC_ELMO; + setcamnpc "Elmo"; + mesn l("Elmo"); + mesq l("I, Elmo, captain's deputy, will help you to make the maximum possible money in Candor!"); + next; + showavatar NPC_NARD; + mesn; + mesq l("Why we're going Tulimshar, you may ask? Because well, believe me, if you want to find out anything, the best place to ask around is Tulim!"); + LOCATION$ = "Candor"; + setq ShipQuests_Julia, 3; + + // Referral program + if (#REFERRAL_PROG == 0 && $REFERRAL_ENABLED) { + next; + clear; + showavatar NPC_LOF_RICH; + mesc l("But before, a message from our developers!"), 3; + next; + mesn l("TMW2 Staff"); + mesc l("Hello, and welcome to TMW2: Moubootaur Legends!"), 3; + next; + mesn l("TMW2 Staff"); + mesc l("Did you came here by someone advise? If yes, write their name here!"), 3; + mesc l("If this is not the case, just click on \"Send\"."), 3; + .@ref$=""; + do + { + input .@ref$; + debugmes "Hercules is bugged: "+.@ref$; + mes ""; + if (.@ref$ != "") { + .@ref=gf_accid(strip(.@ref$)); + if (.@ref > 0) { + if (.@ref == getcharid(3)) { + mesn l("TMW2 Staff"); + mesc l("Hahah, silly, that's yourself!"), 3; + mesc l("Try again!"), 3; + next; + .@ref$=""; + } else { + #REFERRAL_PROG=.@ref; + getitembound FriendGift, 1, 1; + mesn l("TMW2 Staff"); + mesc l("Well, welcome to the game! If you have any doubt, shout on #world for help!"), 3; + mesc l("Your friend also sent you a gift - open it when you get level 5!"), 3; + next; + } + } else { + mesn l("TMW2 Staff"); + mesc l("Oops, there is nobody known as @@ on this game.", .@ref$), 3; + mesc l("Could you try again? There could be a typo!"), 3; + next; + .@ref$=""; + } + } else { + .@ref$="None"; + mesn l("TMW2 Staff"); + mesc l("I see. Well, welcome to the game! If you have any doubt, shout on #world for help!"), 3; + next; + } + } while (.@ref$ == ""); + showavatar NPC_NARD; + } + + close; + + +L_NeedHead: + mes ""; + mesn; + mesq l("You're pretty much stranded on this forsaken island if you don't help me!"); + next; + mesq l("Also, I believe hard work always pay off."); + next; + goto L_MenuQuest; + +L_Ok: + mes ""; + mesn; + mesq l("Good to know."); + next; + mesq l("We have made a stop at a little island, before making it on to the port of Tulimshar."); + next; + mesq l("It would be good for you to do some exercise, the ship isn't big enough for that."); + next; + + goto L_SpecialTask; + +L_Juliet: + mes ""; + mesn; + mesq l("You have an awful case of amnesia."); + next; + mesq l("She is the nurse and shipkeeper of this ship."); + next; + mesq lg("But most important, she is the one who took care of you when you were unconscious."); + next; + +L_SpecialTask: + mesq l("I know that you are just starting to feel better, but I'd like you to explore the island we're currently at."); + next; + + goto L_MenuQuest; + +L_CandorIsland: + mes ""; + mesn; + mesq l("I never said that. I come here frequently to trade. It is you who should explore the island."); + next; + mesq l("This is ##BCandor Island##b. A very small community lives here."); + next; + mesq l("If they were any bigger, monsters would come and kill everyone."); + next; + + goto L_MenuQuest; + +L_NotYet: + mesn; + menu + l("I've brought the money you've asked for."),-, + l("Please excuse me, captain."), L_Close; + + mes ""; + if (Zeny >= .@price) { + mesq l("Ten, fifty, thousand... Yep, this is the amount I've asked for."); + next; + setq General_Narrator, 1; + mesq l("Set sail! We're going to Tulimshar!"); + next; + showavatar; + setcam 0, 0; + mesc l("Some time later..."); + next; + restorecam; + showavatar NPC_NARD; // this is handled by avatars.xml + mesn; + mesq l("Welcome to Tulimshar, @@!", strcharinfo(0)); + next; + Zeny = Zeny-.@price; + LOCATION$="Tulim"; + mesn; + mesq l("You can explore the city as you want, but if I were you, I would ##Btouch the Soul Menhir##b, north of here, to don't respawn at Candor."); + next; + mesn; + mesq l("Other than that, you can explore the city as you want, but as you had a memory loss, You should visit the townhall."); + next; + mesn; + mesq l("When you get out of the ship, it is the first building you'll see. Talk to ##BLua##b, she is an alliance representative."); + next; + mesn; + mesq l("The Alliance have records of everyone. And if you need another trip, talk to me!"); + + } else { + mesq l("You still haven't completed your tasks."); + next; + mesq l("You still need @@ GP for the trip to Tulimshar.", (.@price-Zeny)); + } + close; + +L_Travel: + if (nard_reputation() >= 15) + .@price-=1150; + else if (nard_reputation() >= 13) + .@price-=1000; + else if (nard_reputation() >= 11) + .@price-=750; + else if (nard_reputation() >= 9) + .@price-=600; + else if (nard_reputation() >= 7) + .@price-=350; + else if (nard_reputation() >= 5) + .@price-=200; + mesn; + mesq l("Hi @@.", strcharinfo(0)); + next; + mesq l("You are currently at @@.", LOCATION$); + mes ""; + mes l("A ship travel will cost you @@ GP.", .@price); + + if (Zeny >= .@price) { + menu + rif(LOCATION$ != "Candor", l("To Candor Island.")), L_TCandor, + rif(LOCATION$ != "Tulim", l("To Tulimshar.")), L_TTulim, + rif(ST_TIER == 7 && gettimetick(2) < QUEST_ELEVARTEMPO ,l("Help me, I need Jesusaves Grimorie!")), L_Tier2, + rif(ST_TIER == 9 && countitem(Lifestone) && gettimetick(2) < QUEST_ELEVARTEMPO ,l("Help me, I need Jesusaves Grimorie!")), L_Tier2Ok, + l("No, I'll save my money."), -; + } else { + mes l("You still need @@ GP to afford it.", (.@price-Zeny)); + } + + close; + +L_TCandor: + Zeny=Zeny-.@price; + PC_DEST$="Candor"; + + mes ""; + mesn; + mesq l("Candor Island, then? Yes, that is a pretty island, right?"); + next; + mesq l("I was planning to go there soon, anyway. All aboard!"); + close2; + addtimer nard_time(PC_DEST$), "#NardShip::OnEvent"; + @timer_navio_running = 1; + warp "002-5", 39, 26; + end; + +L_TTulim: + Zeny=Zeny-.@price; + PC_DEST$="Tulim"; + @timer_navio_running = 1; + + mes ""; + mesn; + mesq l("Tulimshar, right? The oldest human city-state!"); + next; + mesq l("I was planning to go there soon, anyway. All aboard!"); + close2; + addtimer nard_time(PC_DEST$), "#NardShip::OnEvent"; + @timer_navio_running = 1; + warp "002-5", 39, 26; + end; + +L_Tier2: + mes ""; + mesn; + mesq l("WHAT?! ARE YOU OUT OF MIND?!?!"); + next; + mesn; + if (nard_reputation() < 8) { + mesq l("THAT GRIMORIE IS A SUPER DUPER MEGA UPER RARE BOOK, I CANNOT GIVE IT TO ANYBODY ASKING ME ABOUT!!"); + next; + mesn; + mesq l("GET OUT OF HERE, YOUR NOBODY!"); + close; + } + mesq l("That is a rare, precious book, which writes itself!"); + next; + mesn; + mesq l("I cannot just give it to you for nothing. Run to Elanore and fetch me a @@. You need to make a new one, an old one I won't accept.", getitemlink(Lifestone)); + ST_TIER=8; + close; + +L_Tier2Ok: + mes ""; + mesn; + mesc l("*tut*"); + next; + inventoryplace JesusalvaGrimorium, 1; + delitem Lifestone, 1; + getitem "JesusalvaGrimorium", 1; + getexp 200, 0; + ST_TIER=10; + mesn; + mesq l("Here, take it. If the mana goes out of your body, I'll have your class master to return the book to me."); + close; + +L_Close: + close; + +OnInit: + .sex = G_MALE; + .distance = 5; + end; +} |