inherit "/std/object";
#include "move_failures.h"
object my_ob;
void create() {
set_name("liquid");
}
void set_my_ob(object ob) { my_ob = ob; }
object query_my_ob() { return my_ob; }
move(dest, str, str1) {
if (!dest->query_property("watertight")) {
write("The liquid drips all over the floor and disappears.\n");
say(this_player()->short()+" trys to put some liquid into "+dest->short()+
" and it dribbles all over the floor");
call_out("dest_me", 0);
return MOVE_OK;
} else {
dest->mix_up(my_ob);
call_out("dest_me", 0);
}
return ::move(dest, str, str1);
}