void create () {
::create();
seteuid(getuid());
enable_commands() ;
set("author", "nightmask");
set("short", "A citizen of Hill Valley");
set("id", ({ "citizen", query_race() }) );
void do_tests() {
object tp;
#ifndef __NO_ADD_ACTION__
SAVETP;
enable_commands();
RESTORETP;
ASSERT(!find_living("foo"));
set_living_name("foo");
ASSERT(find_living("foo") == this_object());
disable_commands();
ASSERT(!find_living("foo"));
enable_commands();
RESTORETP;
set_living_name("bar");
ASSERT(!find_living("foo"));
ASSERT(find_living("bar") == this_object());
destruct(this_object());
#endif
}
void create () {
::create();
seteuid(getuid());
enable_commands() ;
set("author", "blood");
set("short", "Kahao");
set ("long", @EndText
Kahao is a little runt who should not be here, kill it.
EndText
);
set("id", ({ "monster", "kahao" }) );
void create () {
::create();
seteuid(getuid());
enable_commands() ;
set("author", "nightmask");
set("short", "a dog");
set ("long", @EndText
This is a small cute doggy, it's brown.
EndText
);
set("id", ({ "dog", "monster" }) );
void create () {
::create();
seteuid(getuid());
enable_commands() ;
told = 0;
set("author", "nsd");
set("short", "ticket seller");
set ("long", @EndText
This guy is here to sell you as many tickets as you want.
EndText);
set("id", ({ "seller", "ticket seller" }) );
void create () {
::create();
seteuid(getuid());
enable_commands() ;
set("author", "NSD");
set("short", "NAZI Storm Trooper");
set ("long", @EndText
A foot soldier of the NAZI movement. Loyal and harmful.
EndText
);
set("id", ({ "NAZI Storm Trooper", "soldier", "demon", "nazi" }) );
void create () {
::create();
seteuid(getuid());
enable_commands() ;
set("author", "nsd");
set("short", "@@query_short") ;
set ("long", @EndText
Your image on the mirrors!
EndText
); // EndText should be on a line all by itself, with NO SPACES
set("id", ({"image"}) );
nomask void disable_player(string type)
{
if( geteuid(previous_object())!=ROOT_UID
&& previous_object()!=this_object()) return;
set("disable_type", type);
set_temp("disabled", 1);
disable_commands();
enable_commands(); // enable command again so this object would be
// marked living again. block command in alias.c
// instead of here.
}
void create () {
::create();
seteuid(getuid());
enable_commands() ;
set("author", "tyran");
set("short", "Baby Spider");
set ("long", @EndText
This small spider, newly hatched, is black with a
small white hourglass on her back.
EndText
); // EndText should be on a line all by itself, with NO SPACES
set("id", ({"spider", "widow", "baby"}) );
void create () {
::create();
seteuid(getuid());
enable_commands() ;
set("author", "blood");
set("short", "Apprentice Mage");
set ("long", @EndText
Long black hair frames the face of this student of magic. He sits here in
this room studying intently everything he has learned from the master of
the house.
EndText
);
set("id", ({ "monster", "mage", "apprentice", "apprentice mage" }) );
void do_tests() {
#ifndef __NO_ADD_ACTION__
object tp;
SAVETP;
enable_commands();
add_action( "func", "bar" );
ASSERT(remove_action( "func", "bar" ));
RESTORETP;
command("bar");
ASSERT(!called);
#endif
}
void create () {
::create();
seteuid(getuid());
enable_commands() ;
set("author", "blood");
set("short", "Gnome Worker");
set ("long", @EndText
This breed of gnome rests below the house of a great and powerful mage
because they have the unique ability to harness the powers of the
universe, more so than other beings who wield such power.
EndText
);
set("id", ({ "gnome", "gnome worker" }) );
void create() {
seteuid(getuid());
::create();
set("short", "a fishing munchkin");
enable_commands();
set("long", @ENDLONG
This little man is just fishin away. He has no cares in the world.
ENDLONG
);
set_name("munchkin");
set("id", ({
"munchkin",
"fishing munchkin"
}));
void create () {
::create();
seteuid(getuid());
enable_commands() ;
set("author", "valkyrie");
set("short", "A Dark Elf");
set ("long", @EndText
This dark-haired olive-skinned elf may seem slight, but he is quick and
fairly strong, so beware. He looks very unhappy at your intrusion into
Kyrie forest.
EndText
);
set("id", ({"monster","elf","dark elf"}) );
void create () {
::create();
seteuid(getuid());
enable_commands() ;
set("author" , "herself");
set("short" , "a scuba diver");
set("prevent_summon" , 1);
set ("long", @EndText
This is a woman who spends all her free time swimming,
and diving in the ocean. She loves looking at all the
sea life around here.
EndText
);
set("id" , ({"girl" , "diver" , "scuba" , "scuba diver"}) );
#include "../obj/living.h" /* Pell */
reset() { /* Very tough, but no law against that... /Pell */
set_heart_beat(1);
weapon_class=28;
max_hp=800;
armour_class=12; /* Pell */
hit_point=800;
alignment = -750;
level=20; /* Pell, was 18 (american inflation...) */
experience=962500;
is_npc=1;
name = "minotaur";
cap_name = "Minotaur";
set_living_name(name); /* Pell */
enable_commands();
}
void create() {
seteuid(getuid());
::create();
set("short", "a riding horse");
enable_commands();
set("long", @ENDLONG
This is a brown horse. It looks like it could travel a long way
before resting.
ENDLONG
);
set_name("horse");
set("id", ({
"horse",
"animal"
}));
void create() {
seteuid(getuid());
::create();
set("short", "warrior ant");
enable_commands();
set("long", @ENDLONG
This ant lives to fight. He is a member of a class of ants that
defend the colony from would-be intruders.
ENDLONG
);
set_name("warrior ant");
set("id", ({
"warrior",
"ant",
}));
void create () {
::create();
seteuid(getuid());
enable_commands() ;
set("author", "ragevortex");
set ("short", "Bloodluster");
set ("long", @EndText
A Savage bloodlusting son of a minotaur !! Born to kill and enjoy
doing it. Looks like a huge red bull with strong humanoid body.
He carries a wicked axe.
EndText
); // EndText should be on a line all by itself, with NO SPACES
set("id", ({ "minotaur", "monster", "beast", "enemy", "him",
"warrior", "luster", "bloodluster" }) );
void create() {
seteuid(getuid());
::create();
set("short", "busy wight");
enable_commands();
set("long", @ENDLONG
This wight is attending to his masters needs. He walks very slowly,
and does every action in a painstaking manner. It's skin is a pale
pallor, it's flesh suspended in a rotten state.
ENDLONG
);
set_alignment(-100);
set_name("wight");
set("id", ({
"wight",
}));
void create() {
seteuid(getuid());
::create();
set("short", "Slave Ant");
enable_commands();
set("long", @ENDLONG
This ant is covered with scrapes and scratches, it moves very slowly and clumsily,
By the way he acts, you believe this ant to be a slave.
ENDLONG
);
set_name("slave");
set("id", ({
"slave",
"slave ant",
"ant",
}));
void create() {
seteuid(getuid());
::create();
set("short", "stupid zombie");
enable_commands();
set("long", @ENDLONG
This zombie moves around with no real purpose. His face is contorted
in an expression of anger, rage, and bloodthirst. His jaw hangs open and
low, barely-audible moan can be heard.
ENDLONG
);
set_alignment(-80);
set_name("zombie");
set("id", ({
"zombie",
}));
void create() {
seteuid(getuid());
set( "aggressive", 1);
::create();
set("short", "cruel teacher");
enable_commands();
set("long", @ENDLONG
Mrs. Krauss is middle-aged, with a giant mole resting on her upper lip.
Her eyes are cruel.
ENDLONG
);
set_alignment(-500);
set_name("mrs. Krauss");
set("id", ({
"teacher",
"krauss",
}));
void create() {
seteuid(getuid());
::create();
set("short", "snot-nosed kid");
enable_commands();
set("long", @ENDLONG
This student is studying hard.
ENDLONG
);
set_alignment(50);
set_name("Bernice");
set("id", ({
"kid_3",
"kid",
"student",
"bernice",
}));
void create() {
seteuid(getuid());
::create();
set("short", "skeletal warrior");
enable_commands();
set("long", @ENDLONG
This is an undead warrior, animated to kill those who
trounce the battle ground
ENDLONG
);
set_alignment(-25);
set_name("warrior");
set("id", ({
"warrior",
"skeleton",
"skeletal warrior",
}));
void create() {
seteuid(getuid());
::create();
set("short", "Igor the town's executioner");
enable_commands();
set("long", @ENDLONG
This dwarf is dressed in dark black, he wears a black
hood that covers his face, showing only his cold, black
eyes .
ENDLONG
);
set_alignment(-40);
set_name("igor");
set("id", ({
"igor",
"executioner",
}));
void create() {
seteuid(getuid());
::create();
set("short", "greater mummy");
enable_commands();
set("long", @ENDLONG
This mummy is wrapped in dark bandages, and is wearing a tattered
cleric robe and pontiff. A unholy symbol hangs from it's neck. It's
eyes are sunken into his head, and what skin you can see is gray.
ENDLONG
);
set_alignment(-50);
set_name("greater mummy");
set("id", ({
"mummy",
"greater mummy",
}));
void create() {
seteuid(getuid());
::create();
set("short", "Eerie figure");
enable_commands();
set("long", @ENDLONG
The dark, ominous figure that looms over you seems to control a vast
ammount of power. He radiates a dark-black aura. His face can barely
be seen through his cloud of hatred. A faint gleam can be seen where
his face should be.
ENDLONG
);
set_alignment(-180);
set_name("figure");
set("id", ({
"figure",
}));
void create() {
seteuid(getuid());
::create();
set("short", "undead lieutenant");
enable_commands();
set("long", @ENDLONG
This undead warrior is a lietenant of a long-dead
army, markings on his nearly destroyed uniform.
ENDLONG
);
set_alignment(-25);
set_name("lieutenant");
set("id", ({
"lieutenant",
"undead lieutenant",
"skeleton",
}));
void create() {
seteuid(getuid());
::create();
set("short", "Unliving dwarf");
enable_commands();
set("long", @ENDLONG
At first glance, the dwarf seems quite normal, wearing a simply colored
tunic and having the walk of someone who is alive. However, his eyes are
colored a deep black, with no whites showing. Nothing of this plane would
have such dull, corpse-like eyes.
ENDLONG
);
set_alignment(80);
set_name("unliving dwarf");
set("id", ({
"dwarf",
"unliving dwarf",
}));