// A little orc who is the punchline of a pretty stupid joke. // Mobydick, 10-2-92. inherit "/std/monster" ; void create () { object ob1, ob2, ob3 ; ::create() ; seteuid(getuid()) ; set ("short", "a wet orc") ; set("long", "This orc is taking a shower and has a fresh clean smell.\n") ; set ("id", ({ "orc", "wet orc" }) ) ; set ("capacity", 10000) ; set ("volume", 10000) ; set ("mass", 3000) ; set ("bulk", 250) ; set_name("orc") ; enable_commands() ; ob1 = clone_object ("/obj/sword") ; ob1 -> move (this_object()) ; ob2 = clone_object ("/obj/shield") ; ob2 -> move (this_object()) ; ob3 = clone_object ("/d/Fooland/items/soap") ; ob3 -> move (this_object()) ; set_living_name("orc") ; enable_commands() ; set ("hit_points", 10) ; set ("armor_class", 2) ; set ("max_hp",10) ; set ("attack_strength", 6) ; set ("damage", ({ 2,7 }) ) ; set ("weapon_name", "sword") ; set ("stat/strength", 4) ; set ("stat/dexterity", 6) ; set_skill("attack", 3, "strength") ; set_skill("defense", 8, "dexterity") ; set_verbs( ({ "poke at", "hack at", "wave at" }) ) ; }