Skins: |

NWN SCRIPTS

- Jump to comments -

Title

Disguises: Appearance and Attraction (CEP)

Author

Kilana

Submitted / Updated

06-02-2006 / 11-22-2006

Category

Scripting routines

Expansions

Requires All Expansions (SoU & HotU & CEP)

View Code

//::///////////////////////////////////////////////
//:: Disguise System
//:: inc_disguise
//:: Copyright (c) 2001 Bioware Corp.
//:://////////////////////////////////////////////
/*
     Include script for PC Disguise System
*/
//:://////////////////////////////////////////////
//:: Created By: Kilana Evra
//:: Created On: 5/29/06
//:://////////////////////////////////////////////
#include "inc_scriptcolors"

// returns the percieved race of oTarget
// This will return a JOBR_* value
int GetDisguiseRace(object oTarget);

// returns the percieved attraction of oTarget to oSelf
// This will return a number from -10 to 100
// 100 being Divine and -10 being Hideous
int GetDisguiseAttract(object oTarget, object oSelf = OBJECT_SELF);

// returns the percieved appearance of oTarget
// This will return a JOB_* value
// -for nPenalize
//     0, 1 = No Skill Penalties for low quality disguise
//     2 = Requires Disguise that meets requirements 1, 2
//     3 = Requires Disguise that meets requirements 1, 2, 3
//     4 = Requires Disguise that meets requirements 1, 2, 3, and 4
//    Failing to meet all the requirements will result in temporary
//     skill penalties in oTarget's Diplomacy Skills(Bluff, Persuade, Taunt)
// *A local int will be set on the PC "DISGUISE_BELIEVE" = 1,2,3, or 4
//    Tells how effective the disguise is with 1 being basic and 4 being
//    complete
int GetDisguiseAppearance(object oTarget, int nPenalize = 0);

// Returns the base armor type as a number, of oItem
// -1 if invalid, or not armor, or just plain not found.
// 0 to 8 as the value of AC got from the armor - 0 for none, 8 for Full plate.
int GetArmorType(object oItem);

//Races
const int JOBR_HUMAN     =  1; //Human
const int JOBR_ELF       =  2; //Elven
const int JOBR_HALFELF   =  3; //Half Elf
const int JOBR_HALFLING  =  4; //Halfling
const int JOBR_GNOME     =  5; //Gnome
const int JOBR_DWARF     =  6; //Dwarf
const int JOBR_HALFORC   =  7; //Half Orc
const int JOBR_HUMANOID  =  9; //Generic Humanoid

const int JOBR_FEY       = 10; //Good/Mischievous/Pleasant Creature
const int JOBR_ASTRAL    = 11; //Good Outsider
const int JOBR_ANIMALG   = 12; //Non fearsome Animal Creature
const int JOBR_GOLEM     = 13; //Artificial Machine Creature

const int JOBR_DROW      = 20; //Evil Elven Underdark Creature
const int JOBR_BEHOLDER  = 21; //Evil Giant Eye Underdark Creature
const int JOBR_ILLITHID  = 22; //Evil Telekinetic Underdark Creature

const int JOBR_MONSTERH  = 30; //Generic Humanoid/Fearsome Creature

const int JOBR_MONSTERG  = 31; //Giant

const int JOBR_MONSTER   = 32; //Generic Evil/Fearsome Creature
const int JOBR_ANIMALB   = 33; //Fearsome Animal Creature
const int JOBR_OUTSIDEC  = 34; //Chaotic Evil Outsider (DEMON)
const int JOBR_OUTSIDEN  = 35;  //Generic Outsider
const int JOBR_OUTSIDEL  = 36; //Lawful Evil Outsider (DEVIL)
const int JOBR_UNDEADV   = 37; //Vampire Undead Creature
const int JOBR_UNDEADG   = 38; //Generic Undead Creature

int GetDisguiseRace(object oTarget)
{ //Order of Importance -> AppearanceType
  //                       Helmet
  //                       Subrace or Race
  int nJobType = 9;

  //Determine Appearance Race
  int nAppearance = GetAppearanceType(oTarget);

  //Polymorph Self Spell
  if(nAppearance==APPEARANCE_TYPE_FAIRY) nJobType = JOBR_FEY; //Pixie
  else if(nAppearance==APPEARANCE_TYPE_TROLL) nJobType = JOBR_MONSTER; //Troll
  else if(nAppearance==APPEARANCE_TYPE_UMBERHULK) nJobType = JOBR_MONSTER; //UmberHulk
  else if(nAppearance==APPEARANCE_TYPE_SPIDER_GIANT) nJobType = JOBR_MONSTER; //Giant Spider
  else if(nAppearance==APPEARANCE_TYPE_ZOMBIE) nJobType = JOBR_UNDEADV; //Zombie

  //Shapechange Spell
  else if(nAppearance==APPEARANCE_TYPE_DRAGON_RED) nJobType = JOBR_MONSTER; //Dragon
  else if(nAppearance==APPEARANCE_TYPE_BALOR) nJobType = JOBR_OUTSIDEC; //Balor
  else if(nAppearance==APPEARANCE_TYPE_GIANT_FIRE) nJobType = JOBR_MONSTERG; //Giant
  else if(nAppearance==APPEARANCE_TYPE_GIANT_FIRE_FEMALE) nJobType = JOBR_MONSTERG; //Giant
  else if(nAppearance==APPEARANCE_TYPE_SLAAD_DEATH) nJobType = JOBR_OUTSIDEC; //Death Slaad
  else if(nAppearance==APPEARANCE_TYPE_GOLEM_IRON) nJobType = JOBR_GOLEM; //Iron Golem

  //Druidic Shapechange
  else if(nAppearance==APPEARANCE_TYPE_BADGER) nJobType = JOBR_ANIMALG; //Badger
  else if(nAppearance==APPEARANCE_TYPE_BADGER_DIRE) nJobType = JOBR_ANIMALG; //Dire Badger
  else if(nAppearance==APPEARANCE_TYPE_BOAR) nJobType = JOBR_ANIMALG; //Boar
  else if(nAppearance==APPEARANCE_TYPE_BOAR_DIRE) nJobType = JOBR_ANIMALB; //Dire Boar
  else if(nAppearance==APPEARANCE_TYPE_DOG_WOLF) nJobType = JOBR_ANIMALG; //Wolf
  else if(nAppearance==APPEARANCE_TYPE_DOG_DIRE_WOLF) nJobType = JOBR_ANIMALB; //Dire Wolf
  else if(nAppearance==APPEARANCE_TYPE_CAT_PANTHER) nJobType = JOBR_ANIMALB; //Panther
  else if(nAppearance==APPEARANCE_TYPE_BEAR_BROWN) nJobType = JOBR_ANIMALB; //Bear
  else if(nAppearance==APPEARANCE_TYPE_BEAR_DIRE) nJobType = JOBR_ANIMALB; //Dire Bear

  //Druidic Elemental Shapechange
  else if(nAppearance==APPEARANCE_TYPE_ELEMENTAL_AIR) nJobType = JOBR_OUTSIDEN;
  else if(nAppearance==APPEARANCE_TYPE_ELEMENTAL_AIR_ELDER) nJobType = JOBR_OUTSIDEN;
  else if(nAppearance==APPEARANCE_TYPE_ELEMENTAL_EARTH) nJobType = JOBR_OUTSIDEN;
  else if(nAppearance==APPEARANCE_TYPE_ELEMENTAL_EARTH_ELDER) nJobType = JOBR_OUTSIDEN;
  else if(nAppearance==APPEARANCE_TYPE_ELEMENTAL_FIRE) nJobType = JOBR_OUTSIDEN;
  else if(nAppearance==APPEARANCE_TYPE_ELEMENTAL_FIRE_ELDER) nJobType = JOBR_OUTSIDEN;
  else if(nAppearance==APPEARANCE_TYPE_ELEMENTAL_WATER) nJobType = JOBR_OUTSIDEN;
  else if(nAppearance==APPEARANCE_TYPE_ELEMENTAL_WATER_ELDER) nJobType = JOBR_OUTSIDEN;

  //Shifter - Wildshape I
  else if(nAppearance==APPEARANCE_TYPE_WYRMLING_BLUE) nJobType = JOBR_MONSTER;
  else if(nAppearance==APPEARANCE_TYPE_WYRMLING_GREEN) nJobType = JOBR_MONSTER;
  else if(nAppearance==APPEARANCE_TYPE_WYRMLING_WHITE) nJobType = JOBR_MONSTER;
  else if(nAppearance==APPEARANCE_TYPE_WYRMLING_RED) nJobType = JOBR_MONSTER;
  else if(nAppearance==APPEARANCE_TYPE_WYRMLING_BLACK) nJobType = JOBR_MONSTER;

  //Shifter - Wildshape II
  else if(nAppearance==APPEARANCE_TYPE_MINOTAUR) nJobType = JOBR_MONSTERH;
  else if(nAppearance==APPEARANCE_TYPE_MINOTAUR_CHIEFTAIN) nJobType = JOBR_MONSTERH;
  else if(nAppearance==APPEARANCE_TYPE_HARPY) nJobType = JOBR_MONSTERH;
  else if(nAppearance==APPEARANCE_TYPE_GARGOYLE) nJobType = JOBR_MONSTER;

  //Shifter - Wildshape III
  else if(nAppearance==APPEARANCE_TYPE_MANTICORE) nJobType = JOBR_ANIMALB;
  else if(nAppearance==APPEARANCE_TYPE_BASILISK) nJobType = JOBR_ANIMALB;
  else if(nAppearance==APPEARANCE_TYPE_DRIDER) nJobType = JOBR_DROW;
  else if(nAppearance==APPEARANCE_TYPE_DRIDER_FEMALE) nJobType = JOBR_DROW;

  //Shifter - Wildshape IV
  else if(nAppearance==APPEARANCE_TYPE_KOBOLD_A) nJobType = JOBR_MONSTERH;
  else if(nAppearance==APPEARANCE_TYPE_KOBOLD_B) nJobType = JOBR_MONSTERH;
  else if(nAppearance==APPEARANCE_TYPE_ASABI_CHIEFTAIN) nJobType = JOBR_MONSTERH;
  else if(nAppearance==APPEARANCE_TYPE_ASABI_WARRIOR) nJobType = JOBR_MONSTERH;
  else if(nAppearance==APPEARANCE_TYPE_LIZARDFOLK_A) nJobType = JOBR_MONSTERH;
  else if(nAppearance==APPEARANCE_TYPE_LIZARDFOLK_B) nJobType = JOBR_MONSTERH;
  else if(nAppearance==APPEARANCE_TYPE_DROW_CLERIC) nJobType = JOBR_DROW;
  else if(nAppearance==APPEARANCE_TYPE_DROW_FEMALE_1) nJobType = JOBR_DROW;
  else if(nAppearance==APPEARANCE_TYPE_DROW_FEMALE_2) nJobType = JOBR_DROW;
  else if(nAppearance==APPEARANCE_TYPE_DROW_FIGHTER) nJobType = JOBR_DROW;
  else if(nAppearance==APPEARANCE_TYPE_DROW_MATRON) nJobType = JOBR_DROW;
  else if(nAppearance==APPEARANCE_TYPE_DROW_SLAVE) nJobType = JOBR_DROW;
  else if(nAppearance==APPEARANCE_TYPE_DROW_WARRIOR_1) nJobType = JOBR_DROW;
  else if(nAppearance==APPEARANCE_TYPE_DROW_WARRIOR_2) nJobType = JOBR_DROW;
  else if(nAppearance==APPEARANCE_TYPE_DROW_WARRIOR_3) nJobType = JOBR_DROW;
  else if(nAppearance==APPEARANCE_TYPE_DROW_WIZARD) nJobType = JOBR_DROW;

  //Shifter - Wildshape V
  else if(nAppearance==APPEARANCE_TYPE_MEDUSA) nJobType = JOBR_MONSTERH;
  else if(nAppearance==APPEARANCE_TYPE_CAT_CAT_DIRE) nJobType = JOBR_ANIMALB;
  else if(nAppearance==APPEARANCE_TYPE_MINDFLAYER) nJobType = JOBR_ILLITHID;
  else if(nAppearance==APPEARANCE_TYPE_MINDFLAYER_2) nJobType = JOBR_ILLITHID;

  //Shifter - Construct Shape
  else if(nAppearance==APPEARANCE_TYPE_GOLEM_STONE) nJobType = JOBR_GOLEM;
  else if(nAppearance==APPEARANCE_TYPE_GOLEM_DEMONFLESH) nJobType = JOBR_UNDEADG;

  //Shifter - Dragon Shape
  else if(nAppearance==APPEARANCE_TYPE_DRAGON_BLACK) nJobType = JOBR_MONSTER;
  else if(nAppearance==APPEARANCE_TYPE_DRAGON_BLUE) nJobType = JOBR_MONSTER;
  else if(nAppearance==APPEARANCE_TYPE_DRAGON_BRASS) nJobType = JOBR_MONSTER;
  else if(nAppearance==APPEARANCE_TYPE_DRAGON_BRONZE) nJobType = JOBR_MONSTER;
  else if(nAppearance==APPEARANCE_TYPE_DRAGON_COPPER) nJobType = JOBR_MONSTER;
  else if(nAppearance==APPEARANCE_TYPE_DRAGON_GOLD) nJobType = JOBR_MONSTER;
  else if(nAppearance==APPEARANCE_TYPE_DRAGON_GREEN) nJobType = JOBR_MONSTER;
  else if(nAppearance==APPEARANCE_TYPE_DRAGON_PRIS) nJobType = JOBR_MONSTER;
  else if(nAppearance==APPEARANCE_TYPE_DRAGON_SHADOW) nJobType = JOBR_MONSTER;
  else if(nAppearance==APPEARANCE_TYPE_DRAGON_SILVER) nJobType = JOBR_MONSTER;
  else if(nAppearance==APPEARANCE_TYPE_DRAGON_WHITE) nJobType = JOBR_MONSTER;

  //Shifter - Outsider Shape
  else if(nAppearance==APPEARANCE_TYPE_AZER_MALE) nJobType = JOBR_OUTSIDEN;
  else if(nAppearance==APPEARANCE_TYPE_AZER_FEMALE) nJobType = JOBR_OUTSIDEN;
  else if(nAppearance==APPEARANCE_TYPE_RAKSHASA_TIGER_MALE) nJobType = JOBR_OUTSIDEN;
  else if(nAppearance==APPEARANCE_TYPE_RAKSHASA_TIGER_FEMALE) nJobType = JOBR_OUTSIDEN;

  //Shifter - Undead Shape
  else if(nAppearance==APPEARANCE_TYPE_VAMPIRE_MALE) nJobType = JOBR_UNDEADV;
  else if(nAppearance==APPEARANCE_TYPE_VAMPIRE_FEMALE) nJobType = JOBR_UNDEADV;
  else if(nAppearance==APPEARANCE_TYPE_SPECTRE) nJobType = JOBR_UNDEADG;
  else if(nAppearance==APPEARANCE_TYPE_LICH) nJobType = JOBR_UNDEADG;

  //More Custom
  else if(nAppearance==APPEARANCE_TYPE_BEHOLDER_EYEBALL) nJobType = JOBR_BEHOLDER;

  else
  { //Helmet Model
    object oHelm = GetItemInSlot(INVENTORY_SLOT_HEAD, oTarget);
    if(oHelm!=OBJECT_INVALID)
    { nAppearance = GetItemAppearance(oHelm, ITEM_APPR_TYPE_SIMPLE_MODEL, 0);
      if(nAppearance == 34) nJobType = JOBR_MONSTERH; //Wolf Head Helm
      else if(nAppearance == 35) nJobType = JOBR_OUTSIDEN; //Tiger/Rakshasa Head Helm
      else if(nAppearance == 36) nJobType = JOBR_MONSTERH; //Bear Head Helm
      else if(nAppearance == 37) nJobType = JOBR_MONSTERH; //Werewolf Head Helm
      else if(nAppearance == 38) nJobType = JOBR_MONSTERH; //Lizard Head Helm
      else if(nAppearance == 39) nJobType = JOBR_UNDEADG; //Zombie Head Helm
      else if(nAppearance == 40) nJobType = JOBR_UNDEADG; //Mummy Head Helm
      else if(nAppearance == 41) nJobType = JOBR_MONSTERH; //Ogre Head Helm
      else if(nAppearance == 42) nJobType = JOBR_OUTSIDEL; //Devil Head Helm
      else if(nAppearance == 43) nJobType = JOBR_MONSTERH; //Orc Head Helm
      else if(nAppearance == 44) nJobType = JOBR_MONSTER; //Troll Head Helm
      else if(nAppearance == 45) nJobType = JOBR_HUMAN; //Human Head Helm
      else if(nAppearance == 46) nJobType = JOBR_HUMAN; //Human2 Head Helm
      else nJobType = JOBR_HUMANOID; //Non-Racial Identifiable Helmet
    }

    //Race
    else
    { string sRace = GetSubRace(oTarget);
     //Subrace
      if(sRace!="")
      { if(sRace=="Drow" || sRace=="Dark Elf") nJobType = JOBR_DROW; //Drow
        else if(sRace=="Vampire" || sRace=="Undead") nJobType = JOBR_UNDEADV; //Vampire
        else if(sRace=="Tiefling" || sRace=="Fey'ri") nJobType = JOBR_OUTSIDEN; //Outsider
      }
      else
      { nJobType = GetRacialType(oTarget);
        if(nJobType == RACIAL_TYPE_ELF) nJobType = JOBR_ELF;
        else if(nJobType == RACIAL_TYPE_HALFELF) nJobType = JOBR_HALFELF;
        else if(nJobType == RACIAL_TYPE_HALFLING) nJobType = JOBR_HALFLING;
        else if(nJobType == RACIAL_TYPE_GNOME) nJobType = JOBR_GNOME;
        else if(nJobType == RACIAL_TYPE_DWARF) nJobType = JOBR_DWARF;
        else if(nJobType == RACIAL_TYPE_HALFORC) nJobType = JOBR_HALFORC;
        else if(nJobType == RACIAL_TYPE_HUMAN) nJobType = JOBR_HUMAN;
        else if(nJobType == RACIAL_TYPE_CONSTRUCT) nJobType = JOBR_GOLEM;
        else if(nJobType == RACIAL_TYPE_FEY) nJobType = JOBR_FEY;
        else if(nJobType == RACIAL_TYPE_UNDEAD) nJobType = JOBR_UNDEADG;
        else if(nJobType == RACIAL_TYPE_OUTSIDER) nJobType = JOBR_OUTSIDEN;
        else if(nJobType == RACIAL_TYPE_ABERRATION) nJobType = JOBR_MONSTER;
        else if(nJobType == RACIAL_TYPE_ANIMAL) nJobType = JOBR_ANIMALG;
        else if(nJobType == RACIAL_TYPE_BEAST) nJobType = JOBR_ANIMALB;
        else if(nJobType == RACIAL_TYPE_DRAGON) nJobType = JOBR_MONSTER;
        else if(nJobType == RACIAL_TYPE_ELEMENTAL) nJobType = JOBR_OUTSIDEN;
        else if(nJobType == RACIAL_TYPE_GIANT) nJobType = JOBR_MONSTERG;
        else if(nJobType == RACIAL_TYPE_HUMANOID_GOBLINOID) nJobType = JOBR_MONSTERH;
        else if(nJobType == RACIAL_TYPE_HUMANOID_MONSTROUS) nJobType = JOBR_MONSTER;
        else if(nJobType == RACIAL_TYPE_HUMANOID_ORC) nJobType = JOBR_MONSTERH;
        else if(nJobType == RACIAL_TYPE_HUMANOID_REPTILIAN) nJobType = JOBR_MONSTERH;
        else if(nJobType == RACIAL_TYPE_MAGICAL_BEAST) nJobType = JOBR_ANIMALB;
        else if(nJobType == RACIAL_TYPE_OOZE) nJobType = JOBR_MONSTER;
        else if(nJobType == RACIAL_TYPE_SHAPECHANGER) nJobType = JOBR_MONSTER;
        else if(nJobType == RACIAL_TYPE_VERMIN) nJobType = JOBR_MONSTER;
        else nJobType = JOBR_HUMANOID;
      }
    }

  }

return nJobType;
}

//General Trades
const int JOB_NAKED     =  0; //Streaker!
// 1. No Clothing

const int JOB_TRAVELLER =  1; //Generic Person (Default)
// 1. Meets no other requirements

const int JOB_SHADY     =  2; //Suspicious Characters
// 1. Clothing has tag: *_SHD
// 2. Helmet has tag: *_SHD
// 3. Weapon has tag: *_SHD
// 4. Attraction > 15; < 60

const int JOB_ENTERTAINER= 3; //Bards, Dancers, Performers
// 1. Clothing has tag: *_ENT
// 2. No Helmet equiped
// 3. Attraction > 40
// 4. Amulet has tag: *_ENT or Weapon has tag: *_ENT

//Poor
const int JOB_BEGGAR    = 11; //Workless Rifraff
// 1. Clothing has tag: *_BEG
// 2. Attraction < 40
// 3. No Weapon equiped
// 4. No Helmet equiped

const int JOB_SLAVE     = 12; //Owned Rifraff
// 1. Clothing, Helmet, or Amulet has tag: *_SLV
// 2. Clothing, Helmet, or Amulet has tag: *_SLV or No Clothing
// 3. No Weapon
// 4. Clothing, Helmet, or Amulet has tag: *_SLV or No Clothing

const int JOB_SERVANT   = 13; //Common Servent
// 1. Clothing has tag: *_SER
// 2. Attraction > 30
// 3. No Weapon
// 4. No Helmet

//Wealthy
const int JOB_NOBLE     = 21; //Generic Rich Person
// 1. Clothing has base AC 0 and is Valued > 150
// 2. Attraction > 40
// 3. Amulet has tag: *_NOB
// 4. Shield has tag: *_NOB


const int JOB_ROYALTY   = 22; //Famous Rich Person
// 1. Clothing has tag: *_ROY
// 2. Attraction > 60
// 3. Amulet or Weapon has tag: *_ROY
// 4. Helmet or Shield has tag: *_ROY

//Special
// 1. Clothing has tag: *_FT#
// 2. Shield has tag: *_FT#
// 3. Helmet has tag: *_FT#
// 4. Weapon or Amulet has tag: *_FT#
const int JOB_FACTION1  = 31; //Generic Special Factions - FT1_, FT2_, FT3_...
const int JOB_FACTION2  = 32;
const int JOB_FACTION3  = 33;
const int JOB_FACTION4  = 34;
const int JOB_FACTION5  = 35;
const int JOB_FACTION6  = 36;

int GetDisguiseAppearance(object oTarget, int nPenalize = 0)
{ int nAppearance = JOB_TRAVELLER;        //Default Appearance    = Traveller
  int nBelieve = 1;                       //Default Believability = 1

  object oItem = GetItemInSlot(INVENTORY_SLOT_LEFTHAND, oTarget);      //Shield/Offhand
  string sShield = GetStringRight(GetTag(oItem), 3);
  oItem = GetItemInSlot(INVENTORY_SLOT_HEAD, oTarget);          //Helmet
  string sHelmet = GetStringRight(GetTag(oItem), 3);
  oItem = GetItemInSlot(INVENTORY_SLOT_NECK, oTarget);          //Amulet
  string sCollar = GetStringRight(GetTag(oItem), 3);
  oItem = GetItemInSlot(INVENTORY_SLOT_RIGHTHAND, oTarget);     //Main Weapon
  string sWeapon = GetStringRight(GetTag(oItem), 3);
  oItem = GetItemInSlot(INVENTORY_SLOT_CHEST, oTarget);  //Clothes
  string sClothes = GetStringRight(GetTag(oItem), 3);
  int nClothes = GetArmorType(oItem);

  int nAttract = GetDisguiseAttract(oTarget, OBJECT_SELF);

//Slave?
  if(sClothes=="SLV" || sHelmet=="SLV" || sCollar=="SLV")
  { nAppearance = JOB_SLAVE;
    if(sClothes=="SLV" && sCollar=="SLV")
    { nBelieve++;
      if(sWeapon=="")
      { nBelieve++;
        if(sHelmet=="SLV") nBelieve=4;
      }
    }
    else if(sClothes=="SLV" && sHelmet=="SLV")
    { nBelieve++;
      if(sWeapon=="")
      { nBelieve++;
        if(sCollar=="SLV") nBelieve=4;
      }
    }
    else if(sClothes=="" && sCollar=="SLV")
    { nBelieve++;
      if(sWeapon=="")
      { nBelieve++;
        if(sHelmet=="SLV") nBelieve=4;
      }
    }
    else if(sClothes=="" && sHelmet=="SLV")
    { nBelieve++;
      if(sWeapon=="")
      { nBelieve++;
        if(sCollar=="SLV") nBelieve=4;
      }
    }
  }
//Naked!
  else if(sClothes=="")
  { nAppearance = JOB_NAKED;
    nBelieve=4;
  }
//Shady Character
  else if(sClothes=="SHD")
  { nAppearance = JOB_SHADY;
    if(sHelmet=="SHD")
    { nBelieve++;
      if(sWeapon=="SHD")
      { nBelieve++;
        if(nAttract>15 && nAttract<60) nBelieve=4;
      }
    }
  }
//Performer
  else if(sClothes=="ENT")
  { nAppearance = JOB_ENTERTAINER;
    if(sHelmet=="")
    { nBelieve++;
      if(nAttract>40)
      { nBelieve++;
        if(sWeapon=="ENT" || sCollar=="ENT") nBelieve=4;
      }
    }
  }
//Beggar
  else if(sClothes=="BEG")
  { nAppearance = JOB_BEGGAR;
    if(nAttract<40)
    { nBelieve++;
      if(sWeapon=="")
      { nBelieve++;
        if(sHelmet=="") nBelieve=4;
      }
    }
  }
//Servant
  else if(sClothes=="SER")
  { nAppearance = JOB_SERVANT;
    if(nAttract>30)
    { nBelieve++;
      if(sWeapon=="")
      { nBelieve++;
        if(sHelmet=="") nBelieve=4;
      }
    }
  }
//Royalty
  else if(sClothes=="ROY")
  { nAppearance = JOB_ROYALTY;
    if(nAttract>60)
    { nBelieve++;
      if(sCollar=="ROY" || sWeapon=="ROY")
      { nBelieve++;
        if(sShield=="ROY" || sHelmet=="ROY") nBelieve=4;
      }
    }
  }
//Special Factions
  else if(sClothes=="FT1")
  { nAppearance = JOB_FACTION1;
    if(sShield=="FT1")
    { nBelieve++;
      if(sHelmet=="FT1")
      { nBelieve++;
        if(sCollar=="FT1" || sWeapon=="FT1") nBelieve=4;
      }
    }
  }
  else if(sClothes=="FT2")
  { nAppearance = JOB_FACTION2;
    if(sShield=="FT2")
    { nBelieve++;
      if(sHelmet=="FT2")
      { nBelieve++;
        if(sCollar=="FT2" || sWeapon=="FT2") nBelieve=4;
      }
    }
  }
  else if(sClothes=="FT3")
  { nAppearance = JOB_FACTION3;
    if(sShield=="FT3")
    { nBelieve++;
      if(sHelmet=="FT3")
      { nBelieve++;
        if(sCollar=="FT3" || sWeapon=="FT3") nBelieve=4;
      }
    }
  }
  else if(sClothes=="FT4")
  { nAppearance = JOB_FACTION4;
    if(sShield=="FT4")
    { nBelieve++;
      if(sHelmet=="FT4")
      { nBelieve++;
        if(sCollar=="FT4" || sWeapon=="FT4") nBelieve=4;
      }
    }
  }
  else if(sClothes=="FT5")
  { nAppearance = JOB_FACTION5;
    if(sShield=="FT5")
    { nBelieve++;
      if(sHelmet=="FT5")
      { nBelieve++;
        if(sCollar=="FT5" || sWeapon=="FT5") nBelieve=4;
      }
    }
  }
  else if(sClothes=="FT6")
  { nAppearance = JOB_FACTION1;
    if(sShield=="FT6")
    { nBelieve++;
      if(sHelmet=="FT6")
      { nBelieve++;
        if(sCollar=="FT6" || sWeapon=="FT6") nBelieve=4;
      }
    }
  }
//Noble
  else if(nClothes==0 && GetGoldPieceValue(oItem)>=150)
  { nAppearance = JOB_NOBLE;
    if(nAttract>40)
    { nBelieve++;
      if(sCollar=="NOB")
      { nBelieve++;
        if(sShield=="NOB") nBelieve=4;
      }
    }
  }
  else nBelieve=4;

  SetLocalInt(oTarget, "DISGUISE_BELIEVE", nBelieve);

  if(nPenalize>1)
  { if(nBelieve<nPenalize)
    { effect eSkill1 = EffectSkillDecrease(SKILL_BLUFF, 5);
      effect eSkill2 = EffectSkillDecrease(SKILL_PERSUADE, 5);
      eSkill1 = EffectLinkEffects(eSkill1, eSkill2);
      eSkill2 = EffectSkillDecrease(SKILL_TAUNT, 5);
      eSkill1 = EffectLinkEffects(eSkill1, eSkill2);
      eSkill1 = ExtraordinaryEffect(eSkill1);
      ApplyEffectToObject(DURATION_TYPE_TEMPORARY, eSkill1, oTarget, 60.0);
    }
  }
  return nAppearance;
}



int GetDisguiseAttract(object oTarget, object oSelf = OBJECT_SELF)
{ int nCHA, nRacial, nSpells;
  //Formula is: Charisma*3 + Racial Modifier + Spell Modifier

  nCHA = GetAbilityScore(oTarget, ABILITY_CHARISMA)*3;

  if(GetIsPlayableRacialType(oSelf))
  { int nTargetRace, nSelfRace;
    nTargetRace = GetRacialType(oTarget);
    nSelfRace = GetRacialType(oSelf);
    if(nTargetRace==nSelfRace) nRacial = 10;

    //Human
    else if(nTargetRace==RACIAL_TYPE_HUMAN)
           if(nSelfRace!=RACIAL_TYPE_ELF)  nRacial = 5;
    //Elven
    else if(nTargetRace==RACIAL_TYPE_ELF)
           { if(nSelfRace==RACIAL_TYPE_HALFLING
              || nSelfRace==RACIAL_TYPE_GNOME) nRacial = 5;
             else if(nSelfRace==RACIAL_TYPE_DWARF) nRacial = 0;
             else nRacial = 10;
           }
    //Half Elven
    else if(nTargetRace==RACIAL_TYPE_HALFELF)
           { if(nSelfRace==RACIAL_TYPE_ELF) nRacial = -5;
             else nRacial = 5;
           }
    //Halfling
    else if(nTargetRace==RACIAL_TYPE_HALFLING)
           if(nSelfRace==RACIAL_TYPE_GNOME) nRacial = 5;
    //Gnome
    else if(nTargetRace==RACIAL_TYPE_GNOME)
           if(nSelfRace==RACIAL_TYPE_HALFLING) nRacial = 5;
    //Dwarf
    else if(nTargetRace==RACIAL_TYPE_DWARF)
           if(nSelfRace==RACIAL_TYPE_ELF) nRacial = -5;
    //Half Orc
    else if(nTargetRace==RACIAL_TYPE_HALFORC)
           { if(nSelfRace==RACIAL_TYPE_ELF) nRacial = -10;
             else nRacial = -5;
           }
  }
  else nRacial = 0;

  nSpells = GetLocalInt(oTarget, "stat_attract");

  int nAttraction = nCHA + nRacial + nSpells;
  if(nAttraction>=101) nAttraction = 100;
  if(nAttraction<=-10) nAttraction = -10;

  if(GetAppearanceType(oTarget)==APPEARANCE_TYPE_MEDUSA) nAttraction = -10;

  return nAttraction;
}

int GetArmorType(object oItem)
  {
    // Make sure the item is valid and is an armor.
    if (!GetIsObjectValid(oItem))
        return -1;
    if (GetBaseItemType(oItem) != BASE_ITEM_ARMOR)
        return -1;

    // Get the identified flag for safe keeping.
    int bIdentified = GetIdentified(oItem);
    SetIdentified(oItem,FALSE);

    int nType = -1;
    switch (GetGoldPieceValue(oItem))
    {
        case    1: nType = 0; break; // None
        case    5: nType = 1; break; // Padded
        case   10: nType = 2; break; // Leather
        case   15: nType = 3; break; // Studded Leather / Hide
        case  100: nType = 4; break; // Chain Shirt / Scale Mail
        case  150: nType = 5; break; // Chainmail / Breastplate
        case  200: nType = 6; break; // Splint Mail / Banded Mail
        case  600: nType = 7; break; // Half-Plate
        case 1500: nType = 8; break; // Full Plate
    }
    // Restore the identified flag, and return armor type.
    SetIdentified(oItem,bIdentified);
    return nType;
  }

Select All Text | View Code in separate window

Format

Module and Code

Type

Type - Ability Checks

Includes

Custom

Description

Requires: NWN 1.67 +SOU +HOTU +CEP 1.53
Introduces a new 'Disguise' system that is game engine based for use in PW/Single Player Modules.

Percieved Race, Profession, and Attraction(Beauty) ratings that take into account shapeshifting, spells, stats, and equiped attire.

3 new functions
*GetDisguiseAttract(oTarget, oSelf)
-Returns how attractive oSelf thinks oTarget is.

*GetDisguiseRace(oTarget)
-Returns what a perciever might think oTarget looks like
-Checks for Shapeshifted appearance, Checks Helmet appearances, Checks Subrace Field, Checks RacialType. In that order.

*GetDisguiseAppearance(oTarget, nPenalize)
-Returns what oTarget's profession looks like (i.e. Servant, Beggar, Noble, Slave, Generic Traveller...)
-Each Profession has 4 levels in it's disguise, with 1 being basic, and 4 being complete... you can specify what level the disguise needs to be or else the PC will recieve Diplomacy skill penalties(-5 Persuade, Bluff, Taunt) for a turn.
-This function is TAG based, so in order to incorperate it well, outfits will need to have custom tags.

Only the include file is required to use the system, but I have included a mod with a mirror and some scenarios/items to help demonstrate. And an erf that includes the mirror, script, and some conversation conditionals.

UPDATE 06-04-06: -Fixed Bug where Royalty or custom professions wouldnt work if their clothing value was over 200.

Files

Name	Type	Size	Downloads
Disguisev1.erfDisguisev1.erf Submitted: 06-02-2006 / Last Updated: 06-04-2006	erf	227.02Kb	223
Toolset import file which includes: The main script, mirror, some conversation conditionals. -UPDATED 06-04-06
Disguise.modDisguise.mod Submitted: 06-02-2006 / Last Updated: 06-04-2006	mod	1Mb	228
Sample Module demonstrating the new functions... explore around Venadril Castle for items and talk to the noble there, or just look at yourself in the mirrors. -UPDATED 06-04-06
Disguise.txtDisguise.txt Submitted: 06-02-2006 / Last Updated: 06-02-2006	txt	5.29Kb	310
Text file that describes the new functions in detail. Recommended that readers know basic scripting to understand.

SCORE OUT OF 10

10
1 votes
View Stats
Cast Your Vote!

PORTFOLIO

Add this entry to your portfolio so you can track it

Manage your existing portfolios or create a new one.

SCREENS

Elf - Random Traveller (Default)

Kinda bold to go out like that...

Monster!

Dangerous individual?

Right away sir!

You Must Be Logged In to Participate.

Comments (1):

Posted by jdeavila at 2009-01-01 09:37:42 Voted 10.00 on 01/01/09

wow! glad I discovered all your stuff - man these scripts get over-looked sometimes - what a shame - they are worth thier weight in gold!!! Awesome work again Kilana!!
_________________________
Imtherealthing

CCP (The Community Creature Project)

The TRIAD

You must be Logged In to post comments in this section.