Hi Asloluteman. Regarding commenting out the 'gives' procedure in your child.lpc instead of:

/*
return 1;
}

gives(str)
{

if (query_money()>5)
{
command("smile");
command("say Bless you.");
call_out("gobottleshop",3);
}
else
{
command("mumble");
if (query_money()>0)
command("say Thanks .... cheap skate.");
else
command("say I want money! Don't give me anything useless!");
}
}
*\

It should be:

/*
gives(str)
{

if (query_money()>5)
{
command("smile");
command("say Bless you.");
call_out("gobottleshop",3);
}
else
{
command("mumble");
if (query_money()>0)
command("say Thanks .... cheap skate.");
else
command("say I want money! Don't give me anything useless!");
}
}
*/