/
mudtem/
mudtem/area/scripts/
mudtem/bin/
mudtem/log/
mudtem/player/
mudtem/slang/autoconf/
mudtem/slang/doc/
mudtem/slang/doc/OLD/help/
mudtem/slang/doc/internal/
mudtem/slang/doc/text/
mudtem/slang/doc/tm/tools/
mudtem/slang/examples/
mudtem/slang/modules/
mudtem/slang/slsh/
mudtem/slang/slsh/lib/
mudtem/slang/slsh/scripts/
mudtem/slang/src/mkfiles/
mudtem/slang/src/util/
mudtem/src/CVS/
mudtem/src/include/
mudtem/src/include/CVS/
mudtem/src/var/CVS/ 
#PROG
vnum 1200
descripcion oprog cama~
code if (isimmort(actor))

{

mob(ent,"say Bienvenido, " + nombre(actor) + "!");

mob(ent,"cast heal " + nombre(actor));

}

else

{

mob(ent,"say Eres arrogante, mortal.");

act("$n desaparece!", actor, NULL, NULL, TO_ROOM);

mob(ent,"transfer " + nombre(actor) + " random");

}

~
#END