Steel Shovel for IAP. Add Iron Shovel for 5kGP

5 files changed, 47 insertions, 8 deletions

diff --git a/db/re/item_db.conf b/db/re/item_db.conf
index f34c168fd..d50b08419 100644
--- a/db/re/item_db.conf
+++ b/db/re/item_db.conf
@@ -453,7 +453,25 @@ item_db: (
 		doevent "legacy_heal::OnUse";
 	">
 },
-// ID 516 missing
+{
+	Id: 516
+	AegisName: "PumpkishJuice"
+	Name: "Pumpkish Juice"
+	Type: "IT_HEALING"
+	Buy: 200
+	Sell: 5
+	Weight: 5
+	Refine: false
+	ViewSprite: 527
+	Delay: 500
+	UseEffect: "EFFECT_HEAL"
+	Script: <"
+		@min = 30;
+		@max = 50;
+		@delay = 4;
+		doevent "legacy_heal::OnUse";
+	">
+},
 {
 	Id: 517
 	AegisName: "DeliciousCookie"
@@ -626,11 +644,24 @@ item_db: (
 	AegisName: "IronShovel"
 	Name: "Iron Shovel"
 	Type: "IT_USABLE"
-	Buy: 3000
-	Sell: 100
+	Buy: 5000
+	Sell: 750
+	Weight: 210
+	Refine: false
+	KeepAfterUse: true
+	Script: <"
+		doevent "Shovel::OnUse";
+	">
+},
+{
+	Id: 527
+	AegisName: "SteelShovel"
+	Name: "Steel Shovel"
+	Type: "IT_USABLE"
+	Buy: 30000
+	Sell: 10000
 	Weight: 210
 	Refine: false
-	ViewSprite: 526
 	KeepAfterUse: true
 	Script: <"
 		doevent "Shovel::OnUse";
diff --git a/npc/003-1/neko.txt b/npc/003-1/neko.txt
index 7687983c9..610c49d71 100644
--- a/npc/003-1/neko.txt
+++ b/npc/003-1/neko.txt
@@ -67,6 +67,7 @@ OnInit:
     sellitem LeatherShirt, 12000, 1;
     sellitem ShortTankTop, 8000, 1;
     sellitem TrainingBow, 990, 2;
+    sellitem IronShovel, -1, 1;
     sellitem CottonCloth, -1, 3;
     sellitem RoastedMaggot, -1, 2;
 	sellitem ArrowAmmoBox,-1,rand(5,10);
@@ -83,6 +84,7 @@ OnClock2359:
     restoreshopitem LeatherShirt, 12000, 1;
     restoreshopitem ShortTankTop, 8000, 1;
     restoreshopitem TrainingBow, 990, 2;
+    restoreshopitem IronShovel, 1;
     restoreshopitem CottonCloth, 3;
     restoreshopitem RoastedMaggot, 2;
 	restoreshopitem ArrowAmmoBox,rand(5,10);
diff --git a/npc/005-1/vincent.txt b/npc/005-1/vincent.txt
index 890ad05d4..726864905 100644
--- a/npc/005-1/vincent.txt
+++ b/npc/005-1/vincent.txt
@@ -64,7 +64,7 @@ OnInit:
     setunitdata(.@npcId, UDT_HAIRCOLOR, 4);
 
     .LegsID = BugLeg;
-    .LegsCount = 11;
+    .LegsCount = 10;
 
     .sex = G_MALE;
     .distance = 5;
diff --git a/npc/018-2-4/lv3.txt b/npc/018-2-4/lv3.txt
index d66aeb618..9dc05e106 100644
--- a/npc/018-2-4/lv3.txt
+++ b/npc/018-2-4/lv3.txt
@@ -30,7 +30,7 @@ OnInit:
 
 	sellitem Kanabo,5400;
 
-	sellitem IronShovel,2000;
+	sellitem SteelShovel,2000;
 	sellitem MercBoxA,1200;
 
 	sellitem SilverGift,480;
diff --git a/npc/items/shovel.txt b/npc/items/shovel.txt
index 4dc725249..fe96ea7a8 100644
--- a/npc/items/shovel.txt
+++ b/npc/items/shovel.txt
@@ -94,6 +94,12 @@ function	script	shovel_scatter	{
 
         .@tick = gettimetick(1);
         .@playertick = .PlayerTiredTime - (readparam(bStr)/5) - (readparam(bVit)/10);
+
+        // Dig and Bury more with Steel Shovel
+        if (countitem(SteelShovel)) {
+            .@playertick-=(.PlayerTiredTime*2)/3;
+        }
+
         if (@ShovelLastUsed + max(5, .@playertick) > .@tick) {
             mes "";
             mesc lg("You are exhausted, you should rest a bit.");
@@ -168,11 +174,11 @@ function	script	shovel_scatter	{
         // If ID is invalid, there's not enough items, it is an Iron Shovel, it is bound = Cannot bury
         // NOBODY bypass notrade check. (ITR_NONE is 0)
         if (.@id < 1) close;
-        if (.@id < 1 || countitem(.@id) < 1 || .@id == IronShovel || checkbound(.@id) ||
+        if (.@id < 1 || countitem(.@id) < 1 || .@id == IronShovel || .@id == SteelShovel || checkbound(.@id) ||
             (!getiteminfo(.@id, ITEMINFO_TRADE))
             ) {
             @ShovelLastUsed = 0;
-            if (.@id == IronShovel || checkbound(.@id))
+            if (.@id == IronShovel || .@id == SteelShovel || checkbound(.@id))
                 mesc l("You cannot bury this item!");
             else if (!getiteminfo(.@id, ITEMINFO_TRADE))
                 mesc l("This item is too precious, you cannot part with it!");