/* -*- LPC -*- */
/*
* $Locker: $
* $Id: ink.c,v 1.1 1998/01/06 04:28:23 ceres Exp $
* $Log: ink.c,v $
* Revision 1.1 1998/01/06 04:28:23 ceres
* Initial revision
*
*/
/*
* Ink defintion file...
*/
int splash_func(object ob) {
ob->add_extra_look(this_object());
ob->add_property("splashed with", previous_object()->query_liquid_name());
return 1;
}
int query_ink() { return 1; }
string extra_look() {
return capitalize((string)previous_object()->query_name())+
" has been splashed with "+
previous_object()->query_property("splashed with");
}