How about there's a random chance your bottle falls out of the bucket and you lose it? That way, if there is an alternative use for the bottles, people might not use it that much. I took rand(5) just to get an idea, but different chances are of course an option. Also this time, they have to try to drink first before they have the option to fill a bottle, that way it's more annoying to fill huge amounts of bottles.
Code: Select all
new_1-1.gat,26,98,0 script empty 127,{
mes "[Well]";
mes "(Do you want to drink from the well?)";
next;
menu
"(That's what I'm here for.)",L_drink,
"(No, I'm fine)",L_no;
L_drink:
mes "[Well]";
mes "(The bucket is leaking; it's empty by the time you've pulled it up...)";
if(countitem(540) >= 1)goto L_bottle;
close;
L_bottle:
mes "[Well]";
mes "(Do you want to place an empty bottle into the bucket to fill it?)";
next;
menu
"(That's the best Idea I've heard all day.)",L_yes,
"(No, I need it for something else.)",L_no;
L_yes:
delitem 540,1;
set @Temp1,rand(5);
if (@Temp1 == 0) goto L_succes;
mes "(Your bottle fell out of the bucket.)";
close;
L_no:
close;
L_succes:
getitem 541,1;
mes "[Well]";
mes "(You've got a bottle of water.)";
close;
}