55 lines
1.3 KiB
C
55 lines
1.3 KiB
C
#include <lib.h>
|
|
|
|
inherit LIB_VERB;
|
|
|
|
static void create() {
|
|
verb::create();
|
|
SetVerb("rock");
|
|
SetRules("","OBJ", "WRD OBJ", "STR on OBJ");
|
|
SetErrorMessage("Rock what? Or rock what on what?");
|
|
SetHelp("Syntax: <rock OBJECT>\n"
|
|
" <rock THING on OBJECT>\n\n"
|
|
"Allows you to rock an object, or perhaps a thing on the "
|
|
"object. For example, you might want to "
|
|
"\"rock the halo\", or simply \"rock in rocking chair\".\n\n"
|
|
"");
|
|
}
|
|
|
|
mixed can_rock(){
|
|
return 1;
|
|
}
|
|
|
|
mixed can_rock_obj(){
|
|
return this_player()->CanManipulate();
|
|
}
|
|
|
|
mixed can_rock_wrd_obj(){
|
|
return this_player()->CanManipulate();
|
|
}
|
|
|
|
mixed can_rock_str_on_obj(){
|
|
return this_player()->CanManipulate();
|
|
}
|
|
|
|
mixed do_rock(){
|
|
object furn = this_player()->GetProperty("furniture_object");
|
|
if(furn && objectp(furn)){
|
|
return furn->eventRock(this_player());
|
|
}
|
|
write("You rock back and forth.");
|
|
say(this_player()->GetCapName()+" rocks back and forth.");
|
|
return 1;
|
|
}
|
|
|
|
mixed do_rock_obj(object target){
|
|
return target->eventRock(this_player());
|
|
}
|
|
|
|
mixed do_rock_wrd_obj(string wrd, object target){
|
|
return target->eventRock(this_player());
|
|
}
|
|
|
|
varargs mixed do_rock_str_on_obj(string thing, object target){
|
|
return target->eventRock(this_player(), remove_article(lower_case(thing)));
|
|
}
|