DMH-Online

NWScript:

//Function Prototypes
//Checks if oCreature is one of the playable races.
//  nRacist = TRUE means not to consider a HalfOrc a Basic Race
int IsBasicRace(object oCreature, int nRacist);
//Returns the nearest NPC to calling object
// -nGender: only get NPCs of a certain gender
//    GENDER_MALE
//    GENDER_FEMALE
//    GENDER_BOTH (Default)
// -nBasicRacesOnly: Only consider creatures of a playable race
// -nNth: Return the nNth closest NPC
object GetNearestNPC(int nGender = GENDER_BOTH, int nBasicRacesOnly = TRUE, int nNth=1);
//Functions
int IsBasicRace(object oCreature, int nRacist = FALSE){
    if(GetRacialType(oCreature) == RACIAL_TYPE_DWARF){
        //SpeakString("oCreature is a Dwarf");
        return TRUE;
    }
    if(GetRacialType(oCreature) == RACIAL_TYPE_ELF){
        //SpeakString("oCreature is an Elf");
        return TRUE;
    }
    if(GetRacialType(oCreature) == RACIAL_TYPE_GNOME){
        //SpeakString("oCreature is a Gnome");
        return TRUE;
    }
    if(GetRacialType(oCreature) == RACIAL_TYPE_HALFELF){
        //SpeakString("oCreature is a Half Elf");
        return TRUE;
    }
    if(GetRacialType(oCreature) == RACIAL_TYPE_HALFLING){
        //SpeakString("oCreature is a Halfling");
        return TRUE;
    }
    if(GetRacialType(oCreature) == RACIAL_TYPE_HUMAN){
        //SpeakString("oCreature is a Human");
        return TRUE;
    }
    if(GetRacialType(oCreature) == RACIAL_TYPE_HALFORC && nRacist == FALSE){
        //SpeakString("oCreature is a Half Orc");
        return TRUE;
    }
    return FALSE;
}
object GetNearestNPC(int nGender = GENDER_BOTH, int nBasicRacesOnly = TRUE, int nNth=1){
    int nFound = FALSE;
    object oCreature;
    while(nFound == FALSE){
        object oCreature = GetNearestCreature(CREATURE_TYPE_PLAYER_CHAR, PLAYER_CHAR_NOT_PC, OBJECT_SELF, nNth);
        //SpeakString("Checking out " + GetTag(oCreature));
        if(GetIsObjectValid(oCreature) && oCreature != OBJECT_SELF & !GetIsDM(oCreature)){
            if(GetRacialType(oCreature) == GetRacialType(OBJECT_SELF)){
                if(GetGender(oCreature) == nGender){
                    //SpeakString("oCreature is a Basic Race");
                    return oCreature;
                }
            }else{
                if(IsBasicRace(oCreature) && GetGender(oCreature) == nGender){
                    //SpeakString("oCreature is a Basic Race");
                    return oCreature;
                }
            }
        }
        nNth++;
    }
    //SpeakString("Found one!");
    if(nFound == TRUE){
        return oCreature;
    }else{
        return OBJECT_INVALID;
    }
}

I use this to cause NPCs to initiate conversations with other nearby NPCs. Since I do not want them wandering a mile just to talk with another NPC. It is also a bit racist in that the NPC will prefer another NPC of it's own race. Still some work left for that part but works as is.

_________________
----
Jaks
A mind so closed can only find life a small, sad cage