summaryrefslogtreecommitdiff
path: root/npc/items/shovel.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/items/shovel.txt')
-rw-r--r--npc/items/shovel.txt33
1 files changed, 19 insertions, 14 deletions
diff --git a/npc/items/shovel.txt b/npc/items/shovel.txt
index f01a0fcbe..f510d2f1b 100644
--- a/npc/items/shovel.txt
+++ b/npc/items/shovel.txt
@@ -1,6 +1,8 @@
+// TMW2 Script
// Evol scripts.
// Author:
// Travolta
+// Jesusalva
// Description:
// NPC to use shovel (dig, bury etc)
@@ -44,7 +46,7 @@
function PlayerIsTired {
.@tick = gettimetick(1);
- .@playertick = .PlayerTiredTime - readparam(bStr);
+ .@playertick = .PlayerTiredTime - (readparam(bStr)/5);
if (@ShovelLastUsed + max(4, .@playertick) > .@tick)
{
narrator S_FIRST_BLANK_LINE,
@@ -84,19 +86,24 @@
function Bury {
narrator S_FIRST_BLANK_LINE | S_LAST_BLANK_LINE, l("What would you like to bury?");
.@items$ = "";
- getinventorylist;
- for (.@i = 0; .@i < @inventorylist_count; .@i++)
- {
- .@items$ = .@items$ + getitemname(@inventorylist_id[.@i]) + ":";
- debugmes getitemname(@inventorylist_id[.@i]);
+
+ mes "##B" + l("Drag and drop an item from your inventory.") + "##b";
+
+ .@id = requestitem();
+
+ if (.@id < 1 || countitem(.@id) < 1 || .@id == IronShovel) {
+ if (.@id == IronShovel)
+ mesc l("Uh... You can't bury your own shovel!");
+ else
+ mesc l("You give up.");
+ return -6;
}
- .@idx = select(.@items$) - 1;
- .@id = @inventorylist_id[.@idx];
+
.@amount = 1;
- if (@inventorylist_amount[.@idx] > 1)
+ if (countitem(.@id) > 1)
{
narrator S_FIRST_BLANK_LINE | S_LAST_BLANK_LINE, l("Amount?");
- input .@amount, 1, @inventorylist_amount[.@idx];
+ input .@amount, 1, countitem(.@id);
}
getmapxy(.@map$, .@x, .@y, 0);
@@ -133,15 +140,13 @@
}
OnUse:
- if (!CheckDigLocation())
- {
+ if (!CheckDigLocation()) {
message strcharinfo(0), l("I can't use the shovel here.");
close;
}
narrator S_LAST_BLANK_LINE,
- l("You hold the shovel in your hands."),
- l("What are you going to do?");
+ l("You hold the shovel in your hands. What are you going to do?");
.@action = select(
l("Dig."),