Add eastern mountain pass walkmaps and scripts. Extends map 7 to the south-east.

1 files changed, 136 insertions, 0 deletions

diff --git a/npc/eastern-desert-pass/npcs.txt b/npc/eastern-desert-pass/npcs.txt
new file mode 100644
index 00000000..3452e124
--- /dev/null
+++ b/npc/eastern-desert-pass/npcs.txt
@@ -0,0 +1,136 @@
+new_24-1.gat,39,27,0 script	Mika 114,{
+    mes "[Mika]";
+    mes "My father told me about a man living in this desert who makes clothes out of snake skin.";
+    next;
+    mes "[Mika]";
+    mes "Maybe you can find him, but be careful you don't get lost in the tunnels!";
+    close;
+}
+
+new_24-1.gat,23,100,0 script	Pachua 143,{
+    mes "[Chief Pachua]";
+    mes "How!";
+    next;
+    
+    mes "[Chief Pachua]";
+    mes "For generations my tribe has been crafting special clothes out of different items.";
+    next;
+
+    if((countitem(610)>0 && countitem(641)>9) && (countitem(524)>0 && countitem(641)>1)) goto L_Super_store;
+    if(countitem(610)>0 && countitem(641)>9) goto L_Chaps_store;
+    if(countitem(524)>0 && countitem(641)>1) goto L_Cowboy_store;
+    goto L_Mysterious;
+
+    L_Mysterious:
+        mes "[Chief Pachua]";
+        mes "Maybe if you bring me the right materials I can make something for you?";
+        close;
+
+    L_CheckStuff:
+        mes "[Chief Pachua]";
+        mes "Let me see what you have there.";
+        next;
+        return;
+	
+    L_Super_store:
+        callsub L_CheckStuff;
+        mes "[Chief Pachua]";
+        mes "Ahh you have lots of good items to work with.";
+        mes "";
+        mes "With them I can make you either";
+        mes "a Cowboy hat or Snake Skin Chaps";
+        next;
+        menu "Cowboy hat, please.",L_Cowboy_store2,"Snake Skin Chaps sound good.",L_Chaps_store2,"Not now, maybe later.",L_NoDeal;
+
+    L_Cowboy_store:
+        callsub L_CheckStuff;
+        goto L_Cowboy_store2;
+
+    L_Chaps_store:
+        callsub L_CheckStuff;
+        goto  L_Chaps_store2;
+	
+    L_Cowboy_store2:
+        mes "[Chief Pachua]";
+        mes "To make you a Cowboy hat I will need:";
+        mes "1 Fancy hat";
+        mes "2 Snake skins";
+        mes "5.000 GP";
+        mes "";
+        mes "Do we have a deal?";
+        next;
+        menu "Yes, that's fine.",L_BuyCowboy,"On second thoughts, maybe later.",L_NoDeal;
+
+    L_Chaps_store2:
+        mes "[Chief Pachua]";
+        mes "To make you a pair of Snake Skin Chaps I will need:";
+        mes "1 Jeans Shorts";
+        mes "10 Snake skins";
+        mes "10.000 GP";
+        mes "";
+        mes "Do we have a deal?";
+        next;
+        menu "Yes, that's fine.",L_BuyChaps,"On second thoughts, maybe later.",L_NoDeal;
+
+    L_BuyChaps:
+        if (zeny<10000) goto L_NoMoney;
+        if (countitem(610)<1) goto L_NoJeans;
+        if (countitem(641)<10) goto L_NoSkin;
+        set zeny, zeny-10000;
+        delitem 641,10;
+        delitem 610,1;
+        getitem 642,1;
+        goto L_DealDone;
+	
+    L_BuyCowboy:
+        if (zeny<5000) goto L_NoMoney;
+        if (countitem(524)<1) goto L_NoFancy;
+        if (countitem(641)<2) goto L_NoSkin;
+        set zeny, zeny-5000;
+        delitem 641,2;
+        delitem 524,1;
+        set @temp,rand(2);
+        if(@temp == 0) goto L_Cowboy_white;
+        goto L_Cowboy_black;
+	
+    L_Cowboy_white:
+        getitem 643,1;
+        goto L_DealDone;
+	
+    L_Cowboy_black:
+        getitem 644,1;
+        goto L_DealDone;
+
+    L_DealDone:
+        mes "[Chief Pachua]";
+        mes "Here you are!";
+        mes "";
+        mes "Come back any time.";
+        close;
+
+    L_NoDeal:
+        mes "[Chief Pachua]";
+        mes "Alright, but you wont get a better deal anywhere else!";
+        close;
+
+    L_NoMoney:
+        mes "[Chief Pachua]";
+        mes "Oh dear, it seems you don't have enough money.";
+        close;
+
+    L_NoJeans:
+        mes "[Chief Pachua]";
+        mes "Oh dear, it seems you don't have enough jeans shorts.";
+        close;
+	
+    L_NoFancy:
+        mes "[Chief Pachua]";
+        mes "Oh dear, it seems you don't have enough fancy hats.";
+        close;
+
+    L_NoSkins:
+        mes "[Chief Pachua]";
+        mes "Oh dear, it seems you don't have enough snake skins.";
+        close;
+
+}