diff options
Diffstat (limited to 'world/map/npc/011-6/crastur.txt')
| -rw-r--r-- | world/map/npc/011-6/crastur.txt | 221 |
1 files changed, 221 insertions, 0 deletions
diff --git a/world/map/npc/011-6/crastur.txt b/world/map/npc/011-6/crastur.txt new file mode 100644 index 00000000..f9acb0bf --- /dev/null +++ b/world/map/npc/011-6/crastur.txt @@ -0,0 +1,221 @@ +011-6.gat,172,250,0|script|Crastur the Ugly|418, +{ + set @spants_state, ((QUEST_WG_state & NIBBLE_2_MASK) >> NIBBLE_2_SHIFT); + set @inspector, ((QUEST_Hurnscald & NIBBLE_3_MASK) >> NIBBLE_3_SHIFT); + if @spants_state < 3 goto L_Regular; + if @spants_state == 3 goto L_Ask; + if (@spants_state == 4 || @spants_state == 5 || @spants_state == 6) goto L_Ask_Again; + goto L_Main; + + +L_Ask: + mes "[Crastur]"; + mes ""; + mes "\"Well, well, well\""; + next; + mes "[Crastur]"; + mes ""; + mes "\"Just look who arrived here\""; + emotion EMOTE_EVIL; + next; + mes "[Crastur]"; + mes ""; + mes "\"If this isn't the person that cleared my way to success\""; + menu + "\"Who? Me?\"", L_Unsure, + "\"Yes I killed the Bandit Lord, but not to make room for more scumbags\"", L_Insult, + "\"I heard you know a lot\"", L_Ask_Cont, + "\"Ugh, no. I have to leave now. Bye.\"", L_Close; + +L_Ask_Again: + mes "[Crastur]"; + mes ""; + mes "\"Hello again\""; + mes "\"Did you do your part of the deal yet?\""; + menu + "\"No, I wanted to know if you can tell me anything about me\"", L_Personal, + "\"Probably not, what was that again?\"", L_Pirate_Proof, + "\"Yes, check this Bandana I brought.\"", L_Bandana, + "\"No Idea, Bye.\"", L_Close; + +L_Ask_Cont: + mes "[Crastur]"; + mes ""; + mes "\"Yes I do, for a price.\""; + menu + "Explain Hetchels story", L_Jibber, + "Interesting", L_Main; + +L_Jibber: + mes "You begin to tell Crastur about Hetchel and her Problems"; + next; + mes "Crastur interrupts you"; + mes "[Crastur]"; + mes ""; + mes "\"I do not care about petty problems, get to the point!\""; + set @spants_state, 4; + callsub S_Update_Spants; + menu + "\"Hetchel needs the Plans for Cotton Trousers Stolen from Lora Tay\"", L_Jibber_Cont, + "\"Don't talk to me like that\" (Leave)", L_Close; + +L_Jibber_Cont: + mes "[Crastur]"; + mes ""; + mes "\"this can be done quickly\""; + next; + mes "Crastur pauses and checks his papers"; + mes "\"...\""; + next; + mes "[Crastur]"; + mes ""; + mes "\"The issue here is\""; + mes "\"you have literally nothing that is of any value to me\""; + next; + mes "[Crastur]"; + mes ""; + mes "\"Although... Since you claim to be a hero and everything...\""; + mes "\"I do have a problem with those pirates in Tulimshar. They are ruining my Business\""; + next; + mes "[Crastur]"; + mes ""; + mes "\"Bring me proof that you killed all of the pirates!\""; + next; + menu + "\"I have it right here\"", L_Bandana, + "\"What kind of proof?\"", L_Pirate_Proof; + + +L_Pirate_Proof: + mes "[Crastur]"; + mes ""; + mes "\"It is for sure the Pirates give their souls for the rescue of their booty.\""; + mes "\"Bring me something unique from their treasure and I will give you those plans in return.\""; + set @spants_state, 5; + callsub S_Update_Spants; + menu + "\"I have it with me.\"", L_Bandana, + "\"I will try my best.\"", L_Close; + +L_Bandana: + getinventorylist; + if (countitem("Bandana") < 1) goto L_No_Item; + if (@spants_state != 6) goto L_Wrong_Item; + mes "Crasturs gazes at the bandana in your hand. He scratches his right arm, then he nods"; + mes "[Crastur]"; + mes ""; + mes "\"I am a man of honour, I always pay my debt\""; + next; + mes "[Crastur]"; + mes ""; + mes "\"Here, I couldnt get the original Sheet but this copy should do well enough\""; + next; + mes "\"Crastur hands you a page ripped out of his Almanach that has dotted lines in green and red Ink all over it"; + next; + mes "You put the plans into a hidden pocket"; + set @spants_state, 7; + callsub S_Update_Spants; + goto L_Close; + +L_No_Item: + mes "[Crastur]"; + mes ""; + mes "\"What Bandana are we talking about? - Next time you come to me, bring your stuff.\""; + goto L_Close; + +L_Wrong_Item: + mes "Crastur takes a look at the bandana."; + next; + mes "[Crastur]"; + mes "THIS IS NOT FROM THE PIRATES FROM TULIMSHAR, it is a cheap scam."; + emotion EMOTE_PERTURBED; + mes "As far as you can tell through his mask he seems very mad"; + goto L_Insult; + +L_Regular: + mes "[Crastur]"; + mes ""; + mes "\"Well, well, well\""; + next; + mes "[Crastur]"; + mes ""; + mes "\"Just look who arrived here\""; + next; + mes "[Crastur]"; + mes ""; + mes "\"If this isn't the person that cleared my way to success\""; + menu + "\"Who? Me?\"", L_Unsure, + "\"Yes I killed the Bandit Lord, but not to make room for more scumbags\"", L_Insult, + "\"Ugh, no. I have to leave now. Bye.\"", L_Close; + +L_Insult: + mes "Die " + strcharinfo(0) + "!"; + heal -10000, 0; + emotion EMOTE_VICIOUS; + mes "[Crastur]"; + mes ""; + mes "\"Oh I am so sorry, my Dagger must have slipped\""; + goto L_Close; + +L_Unsure: + mes "[Crastur]"; + mes ""; + mes "\"Yes I hid in a corner while you killed my former master\""; + mes "\"When he left I claimed command over Argaeses Rats, Caves and Dungeons.\""; + mes "\"Do not underestimate me, I do know a lot more than you might guess\""; + goto L_Main; + +L_Main: + if((@inspector >= 1 && @inspector <= 7) || @inspector == 9) goto L_Main_Inspector; + menu + "\"What things do you know about me?\"", L_Personal, + "\"Bye\"", L_Close; + +L_Main_Inspector: + menu + "\"What things do you know about me?\"", L_Personal, + "\"Do you know anything about the Robberies in Hurnscald?\"", L_Hurnscald, + "\"Bye\"", L_Close; + +L_Personal: + mes ""; + mes "Crastur digs in a pile of old paper"; + next; + mes "[Crastur]"; + mes ""; + mes "\"Ah. Here it is:\""; + mes "\"Today you have accomplished tasks that are worth " + DailyQuestPoints + " Hours in the Northern Mines\""; + next; + if BOSSPOINTS < 1000 goto L_Worm; + emotion EMOTE_DEAD; + mes "[Crastur]"; + mes ""; + mes "\"Also you seem to be quite a hero, it appears you have a record in the Almanach\""; + mes "Crastur turns a giant book upside down"; + mes "\"According to this you have gained " + BOSSPOINTS / 1000 + "thousand Points in the eternal charts already.\""; + mes "Crastur shudders"; + goto L_Close; + +L_Worm: + emotion EMOTE_SUSPICIOUS; + mes "[Crastur]"; + mes "\"Other than that you have not done anything notable for the mana world.\""; + goto L_Close; + +L_Hurnscald: + emotion EMOTE_FACEPALM; + mes "Crastur makes a barking sound that probably was meant as a laugh."; + mes "[Crastur]"; + mes ""; + mes "\"I am sorry but it is not in my best interest to talk about my business with you.\""; + goto L_Close; + +S_Update_Spants: + set QUEST_WG_state, (QUEST_WG_state & ~(NIBBLE_2_MASK) | (@spants_state << NIBBLE_2_SHIFT)); + return; + +L_Close: + set @spants_state, 0; + close; +} |