So something i noticed in the force skills....

   if( argument[0] == '\0' )
      argument = strdup( (const char*)ch->dest_buf );

It Really should be something like for most functions..

   if( argument[0] == '\0' )
{
    if( !ch->dest_buf )
    {
        send_to_char( "You gotta give me something to go off of.\r\n", ch );
        return;
    }
    argument = (const char *) ch->dest_buf;
}

It's calling upon a null argument which in terms goes down in no time...