//:FUNCTION vaporize
// void vaporize();
// Remove the monster in a puff of black smoke!
void vaporize()
{
simple_action(query_death_message());
filter(all_inventory(this_object()), (: $1->is_armor() :))->remove_it();
all_inventory(this_object())->move(environment());
remove();
}
void simp_names(struct regs *regs)
{
struct regs *r;
for(r=regs;r;r=r->next)
{
int ncols=count_cols(r->name);
int x;
for(x=ncols-2;x>=0;--x)
if(unique(regs,get_name(r),ncols,x))
{
remove_it(regs,get_name(r),ncols,x);
--ncols;
}
}
}
int main (int argc, char *argv[])
{
if (argc > 1) {
if (!strcasecmp ("create", argv[1]))
create_it ();
if (!strcasecmp ("remove", argv[1]))
remove_it ();
if (!strcasecmp ("receive", argv[1]))
receive_it ();
if (!strcasecmp ("send", argv[1]))
send_it ();
}
printf ("Usage: %s create | remove | receive | send \n", argv[0]);
exit (-1);
}