summaryrefslogtreecommitdiff
path: root/npc/006-1_Desert_mountains
diff options
context:
space:
mode:
Diffstat (limited to 'npc/006-1_Desert_mountains')
-rw-r--r--npc/006-1_Desert_mountains/_import.txt6
-rw-r--r--npc/006-1_Desert_mountains/_mobs.txt7
-rw-r--r--npc/006-1_Desert_mountains/_warps.txt34
-rw-r--r--npc/006-1_Desert_mountains/mika.txt8
-rw-r--r--npc/006-1_Desert_mountains/monsters.txt14
-rw-r--r--npc/006-1_Desert_mountains/pachua.txt194
6 files changed, 263 insertions, 0 deletions
diff --git a/npc/006-1_Desert_mountains/_import.txt b/npc/006-1_Desert_mountains/_import.txt
new file mode 100644
index 00000000..aa3a86de
--- /dev/null
+++ b/npc/006-1_Desert_mountains/_import.txt
@@ -0,0 +1,6 @@
+map: 006-1.gat
+npc: npc/006-1_Desert_mountains/_mobs.txt
+npc: npc/006-1_Desert_mountains/_warps.txt
+npc: npc/006-1_Desert_mountains/mika.txt
+npc: npc/006-1_Desert_mountains/monsters.txt
+npc: npc/006-1_Desert_mountains/pachua.txt
diff --git a/npc/006-1_Desert_mountains/_mobs.txt b/npc/006-1_Desert_mountains/_mobs.txt
new file mode 100644
index 00000000..0225efff
--- /dev/null
+++ b/npc/006-1_Desert_mountains/_mobs.txt
@@ -0,0 +1,7 @@
+// 006-1 Desert mountains mobs
+
+
+
+006-1.gat,0,0,0 script Mob006-1 -1,{
+ end;
+}
diff --git a/npc/006-1_Desert_mountains/_warps.txt b/npc/006-1_Desert_mountains/_warps.txt
new file mode 100644
index 00000000..6bc6e86c
--- /dev/null
+++ b/npc/006-1_Desert_mountains/_warps.txt
@@ -0,0 +1,34 @@
+// 006-1 Desert mountains warps
+
+006-1.gat,28,21 warp ToSnakeDesert -1,-1,005-1.gat,175,96
+006-1.gat,27,22 warp ToSnakeDesert -1,-1,005-1.gat,174,97
+006-1.gat,30,19 warp ToSnakeDesert -1,-1,005-1.gat,177,94
+006-1.gat,29,20 warp ToSnakeDesert -1,-1,005-1.gat,176,95
+006-1.gat,26,23 warp ToSnakeDesert -1,-1,005-1.gat,173,98
+006-1.gat,25,24 warp ToSnakeDesert -1,-1,005-1.gat,172,99
+006-1.gat,23,26 warp ToSnakeDesert -1,-1,005-1.gat,170,101
+006-1.gat,24,25 warp ToSnakeDesert -1,-1,005-1.gat,171,100
+006-1.gat,22,27 warp ToSnakeDesert -1,-1,005-1.gat,169,102
+006-1.gat,21,28 warp ToSnakeDesert -1,-1,005-1.gat,168,103
+006-1.gat,20,29 warp ToSnakeDesert -1,-1,005-1.gat,167,104
+006-1.gat,19,30 warp ToSnakeDesert -1,-1,005-1.gat,166,105
+006-1.gat,18,31 warp ToSnakeDesert -1,-1,005-1.gat,165,106
+006-1.gat,40,26 warp ToDesertMountainCaves -1,-1,006-3.gat,40,27
+006-1.gat,60,58 warp ToDesertMountainCaves -1,-1,006-3.gat,60,69
+006-1.gat,62,30 warp ToDesertMountainCaves -1,-1,006-3.gat,62,31
+006-1.gat,55,27 warp ToDesertMountainCaves -1,-1,006-3.gat,55,28
+006-1.gat,77,44 warp ToDesertMountainCaves -1,-1,006-3.gat,77,45
+006-1.gat,86,24 warp ToDesertMountainCaves -1,-1,006-3.gat,86,25
+006-1.gat,91,24 warp ToDesertMountainCaves -1,-1,006-3.gat,91,25
+006-1.gat,104,44 warp ToDesertMountainCaves -1,-1,006-3.gat,104,45
+006-1.gat,122,24 warp ToDesertMountainCaves -1,-1,006-3.gat,122,25
+006-1.gat,114,49 warp ToDesertMountainCaves -1,-1,006-3.gat,114,50
+006-1.gat,110,56 warp ToDesertMountainCaves -1,-1,006-3.gat,110,57
+006-1.gat,125,59 warp ToDesertMountainCaves -1,-1,006-3.gat,125,60
+006-1.gat,92,63 warp ToDesertMountainCaves -1,-1,006-3.gat,92,64
+006-1.gat,112,74 warp ToDesertMountainCaves -1,-1,006-3.gat,112,75
+006-1.gat,121,110 warp ToDesertMountainCaves -1,-1,006-3.gat,121,111
+006-1.gat,79,120 warp ToDesertMountainCaves -1,-1,006-3.gat,79,121
+006-1.gat,38,121 warp ToDesertMountainCaves -1,-1,006-3.gat,38,122
+006-1.gat,74,90 warp ToDesertMountainCaves -1,-1,006-3.gat,74,91
+006-1.gat,51,90 warp ToDesertMountainCaves -1,-1,006-3.gat,51,91
diff --git a/npc/006-1_Desert_mountains/mika.txt b/npc/006-1_Desert_mountains/mika.txt
new file mode 100644
index 00000000..a572b911
--- /dev/null
+++ b/npc/006-1_Desert_mountains/mika.txt
@@ -0,0 +1,8 @@
+006-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;
+}
diff --git a/npc/006-1_Desert_mountains/monsters.txt b/npc/006-1_Desert_mountains/monsters.txt
new file mode 100644
index 00000000..6942d2cf
--- /dev/null
+++ b/npc/006-1_Desert_mountains/monsters.txt
@@ -0,0 +1,14 @@
+// Map: 006-1
+// This is the Desert Mountains.
+//
+
+006-1.gat,0,0,0,0 monster MountainSnake 1026,60,0,0,Mob24::OnMountainSnake
+
+006-1.gat,0,0,0 script Mob24 -1,{
+OnMountainSnake:
+ set @mobID, 1026;
+ callfunc "MobPoints";
+ break;
+
+ end;
+}
diff --git a/npc/006-1_Desert_mountains/pachua.txt b/npc/006-1_Desert_mountains/pachua.txt
new file mode 100644
index 00000000..15d1610c
--- /dev/null
+++ b/npc/006-1_Desert_mountains/pachua.txt
@@ -0,0 +1,194 @@
+006-1.gat,23,100,0 script Pachua 143,{
+
+ set @LEATHER_PATCH, 708;
+ set @SNAKE_SKIN, 641;
+
+ set @LEATHER_PATCH_PRICE, 300;
+
+ set @wants_leather_patch, QUEST_Forestbow_state & NIBBLE_4_MASK;
+
+ mes "[Chief Pachua]";
+ mes "\"How!\"";
+ next;
+
+ if (getequipid(equip_head) == 643 || getequipid(equip_head) == 644) goto L_WearingCowboy;
+ if (getequipid(equip_legs) == 642) goto L_WearingChaps;
+
+ mes "[Chief Pachua]";
+ mes "\"For generations my tribe has been crafting special clothes out of different items.\"";
+ next;
+
+L_Check_Shops:
+ if((countitem(610) > 0 && countitem(@SNAKE_SKIN) > 9) && (countitem(524) > 0 && countitem(@SNAKE_SKIN) > 1)) goto L_Super_store;
+ if(countitem(610) > 0 && countitem(@SNAKE_SKIN) > 9) goto L_Chaps_store;
+ if(countitem(524) > 0 && countitem(@SNAKE_SKIN) > 1) goto L_Cowboy_store;
+
+ mes "[Chief Pachua]";
+ mes "\"Maybe if you bring me the right materials I can make something for you.\"";
+ next;
+
+ if (@wants_leather_patch)
+ menu "Wait, can you make a leather patch for me?", L_leather_patch,
+ "OK, bye.", -;
+
+ 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;
+ if (@wants_leather_patch)
+ menu
+ "Cowboy hat, please.", L_BuyCowboy,
+ "Snake Skin Chaps sound good.", L_BuyChaps,
+ "Can you make a leather patch?", L_leather_patch,
+ "Not now, maybe later.", L_NoDeal;
+ if (!@wants_leather_patch)
+ menu
+ "Cowboy hat, please.", L_BuyCowboy,
+ "Snake Skin Chaps sound good.", L_BuyChaps,
+ "Not now, maybe later.", L_NoDeal;
+
+L_Cowboy_store:
+ callsub L_CheckStuff;
+ 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;
+ if (@wants_leather_patch)
+ menu
+ "Yes, that's fine.", L_BuyCowboy,
+ "Can you make a leather patch?", L_leather_patch,
+ "On second thought, maybe later.", L_NoDeal;
+ if (!@wants_leather_patch)
+ menu
+ "Yes, that's fine.", L_BuyCowboy,
+ "On second thought, maybe later.", L_NoDeal;
+
+L_Chaps_store:
+ callsub L_CheckStuff;
+ 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;
+ if (!@wants_leather_patch)
+ menu
+ "Yes, that's fine.", L_BuyChaps,
+ "On second thought, maybe later.", L_NoDeal;
+ if (@wants_leather_patch)
+ menu
+ "Yes, that's fine.", L_BuyChaps,
+ "Can you make a leather patch?", L_leather_patch,
+ "On second thought, maybe later.", L_NoDeal;
+
+L_BuyChaps:
+ if (zeny < 10000) goto L_NoMoney;
+ if (countitem(610) < 1) goto L_NoJeans;
+ if (countitem(@SNAKE_SKIN) < 10) goto L_NoSkin;
+ set zeny, zeny - 10000;
+ delitem @SNAKE_SKIN, 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(@SNAKE_SKIN) < 2) goto L_NoSkin;
+ set zeny, zeny - 5000;
+ delitem @SNAKE_SKIN, 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_leather_patch:
+ mes "[Chief Pachua]";
+ mes "\"If you just want a piece of leather, then yes, I can make that. Bring me a snake skin and " + @LEATHER_PATCH_PRICE + " GP.\"";
+ next;
+
+ menu "Here you are.", -,
+ "OK, I'll be back later.", L_end,
+ "That's too expensive!.", L_NoDeal;
+
+ if (countitem(@SNAKE_SKIN) < 1) goto L_NoSkins;
+ if (zeny < @LEATHER_PATCH_PRICE) goto L_NoMoney;
+
+ set zeny, zeny - @LEATHER_PATCH_PRICE;
+ delitem @SNAKE_SKIN, 1;
+ getitem @LEATHER_PATCH, 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;
+
+L_WearingCowboy:
+ mes "[Chief Pachua]";
+ mes "\"Ah, I see that you are wearing a hat made with the ancient methods of my tribe.\"";
+ next;
+ goto L_Check_Shops;
+
+L_WearingChaps:
+ mes "[Chief Pachua]";
+ mes "\"Ah, I see that you are wearing pants made by my tribe.\"";
+ next;
+ goto L_Check_Shops;
+
+L_end:
+ close;
+}