Generic Wind-Up Toy (#1039)(an instance of generic thing made by Rob)Go to location of this object, Rob. VERB SOURCE CODE: wind:
if (this.location == player)
if (this.wound < this.maximum)
this.wound = this.wound + 2;
player:tell("You wind up the ", this.name, ".");
player.location:announce(player.name, " winds up the ", this.name, ".");
if (this.wound >= this.maximum)
player:tell("The knob comes to a stop while winding.");
endif
else
player:tell("The ", this.name, " is already fully wound.");
endif
else
player:tell("You have to be holding the ", this.name, ".");
endif
.
d*rop th*row:
pass(@args);
if (this.wound)
this.location:announce_all(this.name, " ", this:startup_msg());
fork (15)
this:do_the_work();
endfork
endif
.
continue_msg: return this.(verb); . PROPERTY DATA:       wound       startup_msg       continue_msg       maximum CHILDREN: Wind-Up Duck |