Quiver Prototype

2 files changed, 79 insertions, 7 deletions

diff --git a/db/re/item_db.conf b/db/re/item_db.conf
index 397679716..f77785f1e 100644
--- a/db/re/item_db.conf
+++ b/db/re/item_db.conf
@@ -4834,6 +4834,35 @@ item_db: (
 	BuyingStore: true
 },
 {
+	Id: 1172
+	AegisName: "LeatherQuiver"
+	Name: "Leather Quiver"
+	Type: "IT_ARMOR"
+	Buy: 120000
+	Sell: 2700
+	Weight: 60
+	Def: 0
+	Loc: "EQP_ACC_L"
+	WeaponLv: 0
+	EquipLv: 30
+	Refine: false
+	BuyingStore: true
+	Script: <"
+        // Bow: Subtype W_BOW (ITEMINFO_SUBTYPE)
+        // Arrow: EQP_AMMO
+        // Check if you are using bow and arrows
+        if (
+            (getiteminfo(getequipid(EQI_HAND_R), ITEMINFO_SUBTYPE) == W_BOW) &&
+            (getiteminfo(getequipid(EQI_AMMO), ITEMINFO_LOC) == EQP_AMMO)
+            ) {
+        		bonus bHitRate,10;
+                bonus bAddMaxWeight,100;
+            }
+		bonus bMaxSPrate,-10;
+        bonus bLuk,-1;
+	">
+},
+{
 	Id: 1300
 	AegisName: "CreasedShirt"
 	Name: "Creased Shirt"
diff --git a/npc/012-5/nicholas.txt b/npc/012-5/nicholas.txt
index 45caeb065..b6dd5c1d3 100644
--- a/npc/012-5/nicholas.txt
+++ b/npc/012-5/nicholas.txt
@@ -3,6 +3,7 @@
 //    Jesusalva
 // Description:
 //    Nicholas is Hurnscald's blakcsmith. He forges some stuff, and sell other stuff.
+//    Perhaps he should not forge armor? Remember he cannot forge EVERYTHING...
 //
 // PS.
 // Iridium + Platyna        Platinum
@@ -21,6 +22,14 @@
 012-5,36,26,0	script	Nicholas	NPC_CHELIOS,{
     goto L_Menu;
 
+    // blacksmith_header()
+    function blacksmith_header {
+        mesn;
+        mesq l("Very well! We have seven class of items: Wood, Iron, Terranite, Bronze, Silver, Gold and Platinum.");
+        mesq l("Each of them require different items, I'll sort from weakest to strongest, so choose wisely.");
+        return;
+    }
+
     // blacksmith_create( BaseItem1, Amount, BaseItem2, Amount, PrizeItem, Price )
     function blacksmith_create {
         .@base1=getarg(0);
@@ -68,6 +77,7 @@ L_Menu:
         l("I just want to trade."),
         l("I want to forge Weapons!"),
         l("I want to forge Shields!"),
+        rif(is_admin(), l("I want to forge Quivers!")),
         l("Nothing, thanks!");
 
     mes "";
@@ -81,6 +91,8 @@ L_Menu:
         goto L_Weapon;
     case 3:
         goto L_Shield;
+    case 4:
+        goto L_Quiver;
 
     }
     close;
@@ -95,9 +107,7 @@ L_Menu:
 
 
 L_Weapon:
-    mesn;
-    mesq l("Very well! We have seven class of items: Wood, Iron, Terranite, Bronze, Silver, Gold and Platinum.");
-    mesq l("Each of them require different items, I'll sort from weakest to strongest, so choose wisely.");
+    blacksmith_header();
     select
         l("Nothing, sorry!"),
         l("Wooden Sword"),
@@ -129,9 +139,7 @@ L_Weapon:
 
 
 L_Shield:
-    mesn;
-    mesq l("Very well! We have seven class of items: Wood, Iron, Terranite, Bronze, Silver, Gold and Platinum.");
-    mesq l("Each of them require different items, I'll sort from weakest to strongest, so choose wisely.");
+    blacksmith_header();
     select
         l("Nothing, sorry!"),
         l("Wooden Shield");
@@ -143,7 +151,42 @@ L_Shield:
         blacksmith_create(WoodenLog, 40, BottleOfTonoriWater, 1, WoodenShield, 5000);
         break;
     }
-    goto L_Weapon;
+    goto L_Shield;
+
+
+
+
+
+
+L_Quiver:
+    blacksmith_header();
+    select
+        l("Nothing, sorry!"),
+        l("Leather Quiver"),
+        l("Terranite Quiver"),
+        l("Platinum Quiver");
+
+    switch (@menu) {
+    case 1:
+        goto L_Menu;
+    case 2:
+        blacksmith_create(LeatherPatch, 40, TitaniumIngot, 1, WoodenShield, 20000);
+        break;
+    case 3:
+        blacksmith_create(TerraniteOre, 324, Coal, 80, WoodenShield, 20000); // TODO: Terranite Ingot
+        break;
+    case 4:
+        blacksmith_create(PlatinumIngot, 40, IridiumIngot, 20, WoodenShield, 20000);
+        break;
+    }
+    goto L_Quiver;
+
+
+
+
+
+
+
 
 OnInit:
 	tradertype(NST_MARKET);