/* -*- LPC -*- */
#include "path.h"
inherit "/obj/monster";
void respond_to_soul(object play);
void setup() {
int i;
string *types = ({ "playful", "quiet", "thin", "fat", "noisy",
"thoughtful", "happy", "sad", "boring", "interesting" });
set_name( "child" );
i = random( sizeof( types ) );
set_short( types[ i ] +" child" );
add_adjective( types[ i ] );
set_main_plural( types[ i ] +" children" );
set_race( "human" );
set_gender( 1 + random( 2 ) );
/* Some sort of "young" property for the race object to check? */
i = (int)"/std/races/human"->query_weight();
i += (int)"/std/races/human"->modifier( weight );
set_base_weight( ( 3 * i ) / ( 4 + random( 6 ) ) );
i = (int)"/std/races/human"->query_height();
i += (int)"/std/races/human"->modifier( height );
set_height( ( 2 * i ) / ( 3 + random( 4 ) ) );
set_con( ( 2 * query_con() ) / ( 3 + random( 4 ) ) );
set_dex( ( 2 * query_dex() ) / ( 3 + random( 4 ) ) );
set_str( ( 2 * query_str() ) / ( 3 + random( 4 ) ) );
set_al( -50 + (int)HOSPITAL->pick_al() / 10 );
set_level( random( 5 ) );
set_wimpy( 90 );
set_long( "This is one of the inhabitants of Pumpkin.\n" );
add_effect( "/std/effects/npc/gossip", 5);
load_chat(40, ({ 1, "#do_gossip_say:$mess$" }));
add_respond_to_with(({ ({ "@skick", "@spunch", "@jump", "@push",
"@shove", "@knee" }) }),
(: respond_to_soul :));
} /* setup() */
void respond_to_soul(object play) {
switch (random(6)) {
case 0:
do_command("'Thats not very nice!");
break;
case 1:
do_command("'Pick on someone your own size.");
do_command("glare " + player->query_name());
break;
case 2:
do_command("cry");
do_command("accuse " + player->query_name() + " of child abuse");
break;
case 3:
do_command("spunch " + player->query_name());
do_command("'Take that! and that!");
do_command("skick " + player->query_name());
break;
case 4:
do_command("accuse " + player->query_name() + " of child abuse");
break;
case 5:
do_command("'I will tell my brother!");
break;
}
call_out("run_away", 2);
} /* respond_to_soul() */
