void extra_create() { set_name( "a beholder" ); add_alias( "beholder" ); set_short( "a beholder" ); set_long( "This is a beholder. It is essentially a floating head " "with one single, cyclops-like eye surrounded by ten smaller eye " "stalks. Its massive, gaping maw is set in a permanent grin. " "It looks like a sphere covered in eyes, with extra eyes " "growing out of it. Little eye sprouts if you will." ); set_gender( "unknown" ); set_race( MON "beholder_race" ); //set_guild() //set_specialization set_skill( "dodge", 50 ); set_alignment( -4000 ); set_stat( "str", random( 5000 ) ); set_stat( "con", random( 5000 ) ); set_proficiency( "hands", 50 ); set_move_rate( 60 ); set_move_chance( 50 ); set_aggressive( 3 ); add_combat_message( "smack", "smacks" ); add_combat_message( "slup", "slurps" ); add_combat_message( "grab", "grabs" ); set_type( "blunt" ); set_hit_bonus( 2 ); //So many eyes. set_heal_rate( 30 ); set_heal_amount( random( THISO->query_max_hp() ) - random( 300 ) ); set_natural_ac( 5 ); set( "loot", 1 ); add_money( random( 1000 ) ); add_special_attack( "blastem", THISO, 10 ); }
void create_object(void) { ::create_object(); set_name("keeper"); add_id("dungeon keeper"); set_short("a dungeon keeper"); set_long("One of the darklings serving in the dungeons of the castle. " + "He looks human, but has pale skin and long, black hair. Long, " + "He has two long, protruding teeth in his lower jaw. He " + "observes you coldy with his small, black, pupilless eyes.\n"); set_level(14); set_unarmed(0); set_db(3); set_hp(210); set_skill("combat",85); set_skill("longblade",85); set_skill("resist",85); set_skill("perception",85); set_aggressive(1); set_walking(); set_wc(25); set_new_ac(25); add_money(random(200)); make(ARMOUR + "dark_plate"); make(WEAPON + "dark_lsword"); make(ARMOUR + "dark_lshield"); make(ARMOUR + "dark_helmet"); make(ARMOUR + "dark_glove"); make(ARMOUR + "dark_boot"); make(ARMOUR + "dark_amulet"); init_command("wear all"); init_command("wield sword"); make(OBJECT + "cell_key"); load_a_chat(15,({ "The darkling tries to bite you!\n" }));
void extra_create() { set_name("pamela"); add_alias("pam"); set_short(SHORT); set("sdesc", SHORT); set_long("DOH! What you are looking at probably has to " "be the finest specimen of human anatomy ever " "created. Everything is in the right proportion " "and she knows how to use it. The fact that she is " "naked almost drives you crazy, and you feel a " "sudden urge to stare at her.\n"); set_race("human"); set_gender("female"); set_stat("str",120); set_stat("int",20); set_stat("wil",100); set_stat("con",250); set_stat("dex",100); set_stat("chr",300); set_proficiency("hands", 10 + random(5)); set_aggressive(0); set_alignment("neutral"); set_natural_ac(2); //Silicone implants set(MonsterP, 1); set_chat_chance(95); set_chat_rate(random(10)+60); add_phrase("Pamela giggles.\n"); add_phrase("Pamela wonders where the beach is.\n"); add_phrase("Pamela looks at you.\n"); }
void setup() { object obj; set_name("shayman"); set_gender( "female" ); add_adj("orc"); add_ids("orc", "orc shayman"); set_short("Orc shayman"); set_long("An ugly orc shayman. This thing looks wilder than your average " + "orc."); set_race("orc"); set_level(10); set_aggressive(1); set_spell_chance(20); set_spell_damage(20); set_spell_message("The shayman casts a magic missile at $t."); set_hit_skill("combat/unarmed"); set_skill("combat/unarmed", 50); set_skill("combat/defense", 100); obj = clone_object(DIR + "/obj/gold_staff.c"); obj->setup(); obj->move(this_object()); obj = clone_object(DIR + "/obj/orc_slayer.c"); obj->setup(); obj->move(this_object()); do_wield(obj); }
create_monster() { int i; set_name("goblin"); set_living_name("goblin"); set_long("It's very small but it looks back on you and shows its teeth.\n"); set_race_name("goblin"); set_adj("small"); set_gender(2); /* male = 0, female = 1, other = 2 */ default_config_mobile(10); set_alignment(-70); set_aggressive(1); /* This monster is aggressive to all living objects comming close. He will try * to make the standard kill command. If the dis is not enough to attack * someone he won't. * * It's of course possible to make monstyers aggressive only to elves and so * on. You just redefine the init_attack() function, or make one on your * own. */ }
void extra_create() { set_name( "tendrils" ); add_alias( "tendril" ); add_alias( "tendrils" ); set_short( "some writhing black tendrils" ); set_ansi_short ( sprintf( "%ssome writhing black tendrils%s", HIK, NORM ) ); set_long( "These horrible black tendrils writhe and grip about wildly." ); set_alignment( DEMONIC_AL ); set_stat( "str" , 200 ); set_stat( "con" , 300 ); set_stat( "wil" , 300 ); set_stat( "dex" , 130 ); set_skill( "dodge", 65 ); set( NoStealP ); set( NoStunP ); set_natural_ac( 3 ); set_heal_rate( 30 ); set_heal_amount( 6 ); set_max_damage( 10 ); set_aggressive( 1 ); add_combat_message( "grope", "gropes" ); add_combat_message( "slither on", "slither on" ); }
static void create() { ::create(); set_aggressive(1); set_log_file("fort"); add_property("guardian"); }
void setup() { set_name("troll"); add_adj("smelly"); set_short("A large smelly troll"); set_long("The troll looks like a messed up tree."); set_race("troll"); set_hit_skill("combat/unarmed"); set_skill("combat/unarmed", 50); set_skill("combat/defense", 100); set_level(8); set_aggressive(1); }
void setup(void) { set_name("trazom"); set_short("Trazom the vampire"); set_long("Trazom's cold dead flesh is desiccated, pulling his maw open " + "in a permament groaning position. His eyes are sunk deep in his " + "boney face. His hair is incredibly thin and wispy. He seems to " + "miss the days when he walked among the living as one from them."); set_race("vampire"); set_level(40); set_hit_skill("combat/unarmed"); set_skill("combat/defense", 100); set_aggressive(1); }
static void create() { ::create(); set_name("skeleton"); add_long("It is tattered with dried flesh."); scale_level(14, 17); scale_hp(250, 325); scale_wc(28, 32); scale_ac(4, 7); set_al(-500); set_aggressive(1); setmin("stumbles in"); setmout("stumbles"); add_money(random(600)); add_property("unarmed_damage_type", ({ "claw", "bite" }));
void setup() { set_name("apep"); add_id("serpent", "chaosserpent", "chaos serpent"); set_short("Apep the chaos serpent"); set_long("Apep the chaos serpent is a giant beast with a strong " + "hiss and long sharp fangs that look like they hit hard."); set_race("demon"); set_level(50); set_hit_skill("combat/unarmed"); set_skill("combat/defense", 1); set_skill("combat/unarmed", 200); set_aggressive(0); set_spell_chance(50); set_spell_damage(1); set_spell_message("Apep casts a chaotic brain scrambling spell at $t."); set_hit_string("bite"); }
void extra_create() { set_name( "a horror" ); add_alias( "creature" ); add_alias( "horror" ); add_alias( "indescribable horror" ); set_short( "an indescribable horror" ); set_ansi_short( "an indescribable horror", HIK ); set_long( "Parts, parts, and more parts! This thing has tentacles, " "it has arms, legs, and many mouths. You notice it is missing " "eyes. It is coated in a thick gelatinous black slime. The tentacles " "writhe around its back and its mouths chomp. It flicks its tongues " "out into the air." ); set_gender( "other" ); set_damage_bonus( 2 ); set_alignment( EVIL_AL ); set_stat( "str" , 100 ); set_stat( "con" , 50 ); set_stat( "wil" , 500 ); set_stat( "dex" , 200 ); set_proficiency( "hands", 75 ); set_skill( "dodge", 65 ); set_type( "pyschic" ); set( NoStunP, 1 ); set_aggressive( 4 ); set_natural_ac( 3 ); set_chat_rate( 20 ); set_chat_chance( 20 ); add_phrase( "#say Ack'cthun." ); add_phrase( "#say Masr'snaff. ct'oon." ); add_phrase( "#say Snaral d'fan ar'marak" ); }
void setup() { object obj; set_name("giant"); set_gender( "male" ); add_adj("fire"); set_short("A fire giant"); set_long("A mighty hot big guy."); set_race("giant"); set_level(15); set_aggressive(1); set_hit_skill("combat/unarmed"); set_skill("combat/unarmed", 50); set_skill("combat/defense", 100); obj = clone_object(DIR + "/obj/fire_sword"); obj->setup(); obj->move(this_object()); do_wield(obj); }
void extra_create() { set_name( "the ghost of Rifrad" ); add_alias( "rifrad" ); add_alias( "ghost" ); add_alias( "doctor" ); add_alias( "ghost of rifrad" ); set_short( "the ghost of Rifrad" ); set_ansi_short( sprintf( "%sthe ghost of Rifrad", HIK ) ); set_long( "Where there was once a being, there is now a fluctuating " "darkness. A cold ghastly presence. All that remains of Rifrad " "is his incorporal form." ); set_gender( "male" ); set_alignment( NEUTRAL_AL ); set_stat( "str" , 200 ); set_stat( "con" , 200 ); set_stat( "wil" , 500 ); set_stat( "dex" , 200 ); set_proficiency( "hands", 75 ); set_skill( "dodge", 65 ); set_type( "psychic" ); set( NoStunP, 1 ); set( UndeadP, 1 ); set_aggressive( 1 ); set_natural_ac( 3 ); call_out( "hello", 1 ); add_special_attack( "soulwell", THISO, 8 ); }
void setup(void) { object obj; set_name("slim"); set_gender( "male" ); add_adj("large"); set_short("Slim shady"); set_long("This guy is skinny, he is also kind of creepy looking. He " + "reminds you of an anemic scarecrow."); set_race("human"); set_level(1); set_hit_skill("combat/unarmed"); set_skill("combat/unarmed", 50); set_skill("combat/defense", 100); set_aggressive(0); obj = clone_object(DIR + "/obj/10ghat.c"); obj->setup(); obj->move(this_object()); do_wear(obj); }
void extra_create() { set_name( "a goblin digger" ); add_alias( "goblin" ); add_alias( "goblin digger" ); add_alias( "digger" ); set_short( "a goblin digger" ); set_long( "This ugly goblin looks really worn out. " "It's dressed in just a loin cloth. It's nails are " "yellow with fungus, and dirt is lodged underneath them. " "It toils away digging for something valuable." ); if( random( 2 ) ) set_gender( "male" ); else set_gender( "female" ); set_race( "goblin" ); set_alignment( random( -4000 ) ); if( random( 2 ) ) set_alignment( random(4000 ) ); set_stat( "str", 100 + random( 100 ) ); set_stat( "wil", 150 + random( 100 ) ); set_stat( "int", random( 100 ) ); set_stat( "con", 140 + random( 40 ) ); set_skill( "dodge", 40 ); set_proficiency( "hands", 60 ); set_aggressive( 0 ); switch( random( 3 ) + 1 ) { case 1 : THISO->ogre(); break; case 2 : THISO->body(); break; case 3 : break; default : break; } }
void create_object(void) { ::create_object(); set_aggressive(1); }
void extra_create() { string variety; string mrace; int strmod = random( 50 ); int wilmod = random( 100 ); int intmod = random(200); set_name( "an insane researcher" ); add_alias("creature"); add_alias("possessed"); add_alias("researcher"); add_alias("doctor"); add_alias("scientist"); add_alias("beast"); add_alias("insane"); add_alias( "insane researcher" ); switch(random( 4 ) ) { case 0 : mrace = "gnome"; break; case 1 : mrace = "human"; break; case 2 : mrace = "drow_elf"; break; case 3 : mrace = "dwarf"; break; } switch( random( 5 ) ) { case 0 : variety = "huddled in the corner"; break; case 1 : variety = "ripping at its own face"; break; case 2 : variety = "covered in its own blood"; break; case 3 : variety = "wheezing through a broken nose"; break; case 4 : variety = "vomiting all over itself"; break; } set_short( sprintf( "a researcher, %s", variety ) ); set_long( "You can't tell whether this was a man or a woman. " "It has long since passed beyond gender and " "into the inhuman. Scabs fester, crack, and " "bleed all over its skin. Its eyes are gone " "the sockets stained with blood. It appears that " "the wounds were self inflicted." ); set_alignment( EVIL_AL ); set_gender( "unknown" ); set_aggressive( 5 ); set_proficiency( "hands", 100 ); add_combat_message( "rip", "rips" ); set_chat_chance( 90 ); set_chat_rate( 50 ); add_phrase( "#say We went too far, " "and yet it's all smiles here." ); add_phrase( "#say The Darkness has shown me the " "light!" ); add_phrase( "#say I found the taste of sentient beings " "to be so much sweeter than that of others." ); add_phrase( "#say Is this my blood?" ); add_phrase( "#say I will flay your skin and put you " "with the rest of them." ); add_phrase( "#say Lost, lost, lost, lost, lost..." ); add_phrase( "#say Stop screaming! "); add_combat_phrase( "#say I will swallow your soul!" ); add_combat_phrase( "#say You will feed the old ones!" ); add_combat_phrase( "#say Finish me, I crave the embrace!" ); add_combat_phrase( "#say Who will lock you in the cellar..." ); add_combat_phrase( "#say My pain has no meaning!" ); set_avoid_props( ({ NoWanderRoomP }) );