bool CChar::NPC_SetVendorPrice( CItem * pItem, int iPrice )
{
ADDTOCALLSTACK("CChar::NPC_SetVendorPrice");
// player vendors.
// CLIMODE_PROMPT_VENDOR_PRICE
// This does not check who is setting the price if if it is valid for them to do so.
if ( ! NPC_IsVendor())
return( false );
if ( pItem == NULL ||
pItem->GetTopLevelObj() != this ||
pItem->GetParent() == this )
{
Speak( g_Cfg.GetDefaultMsg( DEFMSG_NPC_PET_INV_ONLY ) );
return( false );
}
CItemVendable * pVendItem = dynamic_cast <CItemVendable *> (pItem);
if ( pVendItem == NULL )
{
Speak( g_Cfg.GetDefaultMsg( DEFMSG_NPC_PET_CANTSELL ) );
return( false );
}
if ( iPrice < 0 ) // just a test.
return( true );
TCHAR *pszMsg = Str_GetTemp();
sprintf(pszMsg, g_Cfg.GetDefaultMsg(DEFMSG_NPC_VENDOR_SETPRICE_1), pVendItem->GetName(), iPrice);
Speak(pszMsg);
pVendItem->SetPlayerVendorPrice( iPrice );
return( true );
}
bool CChar::NPC_PetSetOwner( CChar * pChar )
{
ADDTOCALLSTACK("CChar::NPC_PetSetOwner");
// m_pNPC may not be set yet if this is a conjured creature.
if ( m_pPlayer || pChar == this || pChar == NULL )
return false;
CChar * pOwner = NPC_PetGetOwner();
if ( pOwner == pChar )
return false;
NPC_PetClearOwners(); // clear previous owner before set the new owner
m_ptHome.InitPoint(); // no longer homed
CItemSpawn * pSpawn = static_cast<CItemSpawn*>( m_uidSpawnItem.ItemFind() );
if ( pSpawn )
pSpawn->DelObj( GetUID() );
Memory_AddObjTypes(pChar, MEMORY_IPET);
NPC_Act_Follow();
if ( NPC_IsVendor() )
{
// Clear my cash total.
CItemContainer * pBank = GetBank();
pBank->m_itEqBankBox.m_Check_Amount = 0;
StatFlag_Set(STATF_INVUL);
}
if ( IsSetOF(OF_PetSlots) )
pChar->FollowersUpdate(this, static_cast<short>(maximum(1, GetDefNum("FOLLOWERSLOTS", true, true))));
return true;
}
void CChar::NPC_PetClearOwners(bool bResendTooltip)
{
ADDTOCALLSTACK("CChar::NPC_PetClearOwners");
CChar *pOwner = NPC_PetGetOwner();
Memory_ClearTypes(MEMORY_IPET|MEMORY_FRIEND);
if ( m_pNPC )
m_pNPC->m_bonded = 0; // pets without owner cannot be bonded
if ( NPC_IsVendor() )
{
StatFlag_Clear(STATF_INVUL);
if ( pOwner ) // give back to NPC owner all the stuff we are trying to sell
{
CItemContainer *pBankVendor = GetContainerCreate(LAYER_BANKBOX);
CItemContainer *pBankOwner = pOwner->GetContainerCreate(LAYER_BANKBOX);
pOwner->AddGoldToPack(pBankVendor->m_itEqBankBox.m_Check_Amount, pBankOwner);
pBankVendor->m_itEqBankBox.m_Check_Amount = 0;
for ( size_t i = 0; i < COUNTOF(sm_VendorLayers); i++ )
{
CItemContainer *pCont = GetContainerCreate(sm_VendorLayers[i]);
if ( !pCont )
continue;
CItem *pItemNext = NULL;
for ( CItem *pItem = pCont->GetContentHead(); pItem != NULL; pItem = pItemNext )
{
pItemNext = pItem->GetNext();
pBankOwner->ContentAdd(pItem);
}
}
}
}
if ( IsStatFlag(STATF_Ridden) )
{
CChar *pCharRider = Horse_GetMountChar();
if ( pCharRider )
pCharRider->Horse_UnMount();
}
if ( pOwner )
{
if ( IsSetOF(OF_PetSlots) )
pOwner->FollowersUpdate(this, static_cast<short>(-maximum(1, GetDefNum("FOLLOWERSLOTS", true))));
if ( bResendTooltip )
ResendTooltip();
}
}
size_t CChar::NPC_OnHearName( LPCTSTR pszText ) const
{
ADDTOCALLSTACK("CChar::NPC_OnHearName");
// Did I just hear my name in this text ?
// should be able to deal with "hi Dennis" in the future.
// RETURN:
// index to skip past the name.
LPCTSTR pszName = GetName();
size_t i = FindStrWord( pszText, pszName );
if ( i )
return( i );
if ( m_pNPC )
{
// My title ?
if ( m_pNPC->m_Brain == NPCBRAIN_GUARD )
{
if ( ! strnicmp( pszText, "GUARD ", 6 ))
return 6;
}
else if ( NPC_IsVendor())
{
if ( ! strnicmp( pszText, "VENDOR ", 7 ))
return 7;
}
}
CCharBase * pCharDef = Char_GetDef();
// Named the chars type ? (must come first !)
pszName = pCharDef->GetTradeName();
for ( i = 0; pszText[i] != '\0'; i++ )
{
if ( pszName[i] == '\0' )
{
// found name.
while ( ISWHITESPACE( pszText[i] ))
i++;
return( i ); // Char name found
}
if ( toupper( pszName[i] ) != toupper( pszText[i] )) // not the name.
break;
}
return( 0 );
}
int CChar::NPC_WantThisItem( CItem * pItem ) const
{
ADDTOCALLSTACK("CChar::NPC_WantThisItem");
// This should be the ULTIMATE place to check if the NPC wants this in any way.
// May not want to use it but rather just put it in my pack.
//
// NOTE:
// Don't check if i can see this or i can reach it.
// Don't check if i can carry this ?
//
// RETURN:
// 0-100 percent = how bad do we want it ?
if ( !CanMove(pItem, false) )
return 0;
CCharBase * pCharDef = Char_GetDef();
ASSERT(pCharDef != NULL);
size_t iRet = pCharDef->m_Desires.FindResourceMatch(pItem);
if ( iRet != pCharDef->m_Desires.BadIndex() )
return static_cast<int>(pCharDef->m_Desires[iRet].GetResQty());
// I'm hungry and this is food ?
int iFoodLevel = Food_GetLevelPercent();
if ( Food_CanEat(pItem) && iFoodLevel < 100 )
return 100 - iFoodLevel;
if ( NPC_IsVendor() )
{
// Vendors always want money
if ( pItem->IsType(IT_GOLD) )
return 100;
// Is it something I would buy?
CItemVendable * pItemSell = NPC_FindVendableItem(dynamic_cast<CItemVendable *>(pItem), const_cast<CChar *>(this)->GetBank(LAYER_VENDOR_BUYS), const_cast<CChar *>(this)->GetBank(LAYER_VENDOR_STOCK));
if ( pItemSell )
return pItemSell->GetVendorPrice(0);
}
return 0;
}
bool CChar::NPC_Vendor_Restock(bool bForce, bool bFillStock)
{
ADDTOCALLSTACK("CChar::NPC_Vendor_Restock");
// Restock this NPC char.
// Then Set the next restock time for this .
if ( m_pNPC == NULL )
return false;
// Make sure that we're a vendor and not a pet
if ( IsStatFlag(STATF_Pet) || !NPC_IsVendor() )
return false;
bool bRestockNow = true;
if ( !bForce && m_pNPC->m_timeRestock.IsTimeValid() )
{
// Restock occurs every 10 minutes of inactivity (unless
// region tag specifies different time)
CRegionWorld *region = GetRegion();
int64 restockIn = 10 * 60 * TICK_PER_SEC;
if( region != NULL )
{
CVarDefCont *vardef = region->m_TagDefs.GetKey("RestockVendors");
if( vardef != NULL )
restockIn = vardef->GetValNum();
if ( region->m_TagDefs.GetKey("NoRestock") != NULL )
bRestockNow = false;
}
if ( m_TagDefs.GetKey("NoRestock") != NULL )
bRestockNow = false;
if (bRestockNow)
bRestockNow = ( CServerTime::GetCurrentTime().GetTimeDiff(m_pNPC->m_timeRestock) > restockIn );
}
// At restock the containers are actually emptied
if ( bRestockNow )
{
m_pNPC->m_timeRestock.Init();
for ( size_t i = 0; i < CountOf(sm_VendorLayers); ++i )
{
CItemContainer *pCont = GetBank(sm_VendorLayers[i]);
if ( !pCont )
return false;
pCont->Empty();
}
}
if ( bFillStock )
{
// An invalid restock time means that the containers are
// waiting to be filled
if ( !m_pNPC->m_timeRestock.IsTimeValid() )
{
if ( IsTrigUsed(TRIGGER_NPCRESTOCK) )
{
CCharBase *pCharDef = Char_GetDef();
ReadScriptTrig(pCharDef, CTRIG_NPCRestock, true);
}
// we need restock vendor money as well
GetBank()->Restock();
}
// remember that the stock was filled (or considered up-to-date)
m_pNPC->m_timeRestock.SetCurrentTime();
}
return true;
}
bool CChar::NPC_OnHearPetCmd( LPCTSTR pszCmd, CChar *pSrc, bool fAllPets )
{
ADDTOCALLSTACK("CChar::NPC_OnHearPetCmd");
// This should just be another speech block !!!
// We own this char (pet or hireling)
// pObjTarget = the m_ActTarg has been set for them to attack.
// RETURN:
// true = we understand this. tho we may not do what we are told.
// false = this is not a command we know.
// if ( GetTargMode() == CLIMODE_TARG_PET_CMD ) it needs a target.
if ( !pSrc->IsClient() || m_pPlayer || !m_pNPC )
return false;
m_fIgnoreNextPetCmd = false; // We clear this incase it's true from previous pet cmds.
TALKMODE_TYPE mode = TALKMODE_SAY;
if ( OnTriggerSpeech(true, pszCmd, pSrc, mode) )
{
m_fIgnoreNextPetCmd = !fAllPets;
return true;
}
static LPCTSTR const sm_Pet_table[] =
{
"ATTACK",
"BOUGHT",
"CASH",
"COME",
"DROP", // "GIVE" ?
"DROP ALL",
"EQUIP",
"FOLLOW",
"FOLLOW ME",
"FRIEND",
"GO",
"GUARD",
"GUARD ME",
"KILL",
"PRICE", // may have args ?
"RELEASE",
"SAMPLES",
"SPEAK",
"STATUS",
"STAY",
"STOCK",
"STOP",
"TRANSFER",
"UNFRIEND"
};
PC_TYPE iCmd = static_cast<PC_TYPE>(FindTableSorted(pszCmd, sm_Pet_table, COUNTOF(sm_Pet_table)));
if ( iCmd < 0 )
{
if ( !strnicmp(pszCmd, sm_Pet_table[PC_PRICE], 5) )
iCmd = PC_PRICE;
else
return false;
}
switch ( iCmd )
{
case PC_FOLLOW:
case PC_STAY:
case PC_STOP:
{
// Pet friends can use only these commands
if ( Memory_FindObjTypes(pSrc, MEMORY_FRIEND) )
break;
}
default:
{
// All others commands are avaible only to pet owner
if ( !NPC_IsOwnedBy(pSrc, true) )
return false;
}
}
if ( IsStatFlag(STATF_DEAD) )
{
// Bonded NPCs still placed on world even when dead.
// They can listen to commands, but not to these commands below
if ( iCmd == PC_GUARD || iCmd == PC_GUARD_ME || iCmd == PC_ATTACK || iCmd == PC_KILL || iCmd == PC_TRANSFER || iCmd == PC_DROP || iCmd == PC_DROP_ALL )
return true;
}
bool bTargAllowGround = false;
bool bCheckCrime = false;
LPCTSTR pTargPrompt = NULL;
CCharBase *pCharDef = Char_GetDef();
switch ( iCmd )
{
case PC_ATTACK:
case PC_KILL:
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_ATT);
bCheckCrime = true;
break;
case PC_COME:
case PC_GUARD_ME:
case PC_FOLLOW_ME:
m_Act_Targ = pSrc->GetUID();
Skill_Start(NPCACT_FOLLOW_TARG);
break;
case PC_FOLLOW:
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_FOLLOW);
break;
case PC_FRIEND:
if ( IsStatFlag(STATF_Conjured) )
{
pSrc->SysMessage(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_FRIEND_SUMMONED));
return false;
}
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_FRIEND);
break;
case PC_UNFRIEND:
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_UNFRIEND);
break;
case PC_GO:
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_GO);
bTargAllowGround = true;
break;
case PC_GUARD:
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_GUARD);
bCheckCrime = true;
break;
case PC_STAY:
case PC_STOP:
Skill_Start(NPCACT_STAY);
break;
case PC_TRANSFER:
if ( IsStatFlag(STATF_Conjured) )
{
pSrc->SysMessage(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_TRANSFER_SUMMONED));
return true;
}
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_TRANSFER);
break;
case PC_RELEASE:
SoundChar(CRESND_RAND2);
if ( IsStatFlag(STATF_Conjured) || (m_pNPC->m_bonded && IsStatFlag(STATF_DEAD)) )
{
Delete();
return true;
}
Skill_Start(SKILL_NONE);
NPC_PetClearOwners();
ResendTooltip();
break;
case PC_DROP:
{
// Drop backpack items on ground
// NOTE: This is also called on pet release
CItemContainer *pPack = GetPack();
if ( pPack )
{
pPack->ContentsDump(GetTopPoint(), ATTR_OWNED);
break;
}
if ( NPC_CanSpeak() )
Speak(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_CARRYNOTHING));
return true;
}
case PC_DROP_ALL:
DropAll(NULL, ATTR_OWNED);
break;
case PC_SPEAK:
NPC_OnPetCommand(true, pSrc);
return true;
case PC_EQUIP:
ItemEquipWeapon(false);
ItemEquipArmor(false);
break;
case PC_STATUS:
{
if ( !NPC_CanSpeak() )
break;
unsigned int iWage = pCharDef->GetHireDayWage();
CItemContainer *pBank = GetBank();
TCHAR *pszMsg = Str_GetTemp();
if ( NPC_IsVendor() )
{
CItemContainer *pCont = GetBank(LAYER_VENDOR_STOCK);
TCHAR *pszTemp1 = Str_GetTemp();
TCHAR *pszTemp2 = Str_GetTemp();
TCHAR *pszTemp3 = Str_GetTemp();
if ( iWage )
{
sprintf(pszTemp1, g_Cfg.GetDefaultMsg(DEFMSG_NPC_VENDOR_STAT_GOLD_1), pBank->m_itEqBankBox.m_Check_Amount);
sprintf(pszTemp2, g_Cfg.GetDefaultMsg(DEFMSG_NPC_VENDOR_STAT_GOLD_2), pBank->m_itEqBankBox.m_Check_Amount / iWage);
sprintf(pszTemp3, g_Cfg.GetDefaultMsg(DEFMSG_NPC_VENDOR_STAT_GOLD_3), static_cast<int>(pCont->GetCount()));
}
else
{
sprintf(pszTemp1, g_Cfg.GetDefaultMsg(DEFMSG_NPC_VENDOR_STAT_GOLD_1), pBank->m_itEqBankBox.m_Check_Amount);
sprintf(pszTemp2, g_Cfg.GetDefaultMsg(DEFMSG_NPC_VENDOR_STAT_GOLD_4), pBank->m_itEqBankBox.m_Check_Restock, pBank->GetTimerAdjusted() / 60);
sprintf(pszTemp3, g_Cfg.GetDefaultMsg(DEFMSG_NPC_VENDOR_STAT_GOLD_3), static_cast<int>(pCont->GetCount()));
}
sprintf(pszMsg, "%s %s %s", pszTemp1, pszTemp2, pszTemp3);
}
else if ( iWage )
{
sprintf(pszMsg, g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_DAYS_LEFT), pBank->m_itEqBankBox.m_Check_Amount / iWage);
}
Speak(pszMsg);
return true;
}
case PC_CASH:
{
// Give up my cash total.
if ( !NPC_IsVendor() )
return false;
CItemContainer *pBank = GetBank();
if ( pBank )
{
unsigned int iWage = pCharDef->GetHireDayWage();
TCHAR *pszMsg = Str_GetTemp();
if ( pBank->m_itEqBankBox.m_Check_Amount > iWage )
{
sprintf(pszMsg, g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_GETGOLD_1), pBank->m_itEqBankBox.m_Check_Amount - iWage);
pSrc->AddGoldToPack(pBank->m_itEqBankBox.m_Check_Amount - iWage);
pBank->m_itEqBankBox.m_Check_Amount = iWage;
}
else
sprintf(pszMsg, g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_GETGOLD_2), pBank->m_itEqBankBox.m_Check_Amount);
Speak(pszMsg);
}
return true;
}
case PC_BOUGHT:
if ( !NPC_IsVendor() )
return false;
Speak(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_ITEMS_BUY));
pSrc->GetClient()->addBankOpen(this, LAYER_VENDOR_EXTRA);
break;
case PC_PRICE:
if ( !NPC_IsVendor() )
return false;
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_SETPRICE);
break;
case PC_SAMPLES:
if ( !NPC_IsVendor() )
return false;
Speak(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_ITEMS_SAMPLE));
pSrc->GetClient()->addBankOpen(this, LAYER_VENDOR_BUYS);
break;
case PC_STOCK:
// Magic restocking container.
if ( !NPC_IsVendor() )
return false;
Speak(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_ITEMS_SELL));
pSrc->GetClient()->addBankOpen(this, LAYER_VENDOR_STOCK);
break;
default:
return false;
}
if ( pTargPrompt )
{
pszCmd += strlen(sm_Pet_table[iCmd]);
GETNONWHITESPACE(pszCmd);
pSrc->m_pClient->m_tmPetCmd.m_iCmd = iCmd;
pSrc->m_pClient->m_tmPetCmd.m_fAllPets = fAllPets;
pSrc->m_pClient->m_Targ_UID = GetUID();
pSrc->m_pClient->m_Targ_Text = pszCmd;
pSrc->m_pClient->addTarget(CLIMODE_TARG_PET_CMD, pTargPrompt, bTargAllowGround, bCheckCrime);
return true;
}
// Make some sound to confirm we heard it
NPC_OnPetCommand(true, pSrc);
return true;
}
bool CChar::NPC_OnHearPetCmdTarg( int iCmd, CChar *pSrc, CObjBase *pObj, const CPointMap &pt, LPCTSTR pszArgs )
{
ADDTOCALLSTACK("CChar::NPC_OnHearPetCmdTarg");
// Pet commands that required a target.
if ( m_fIgnoreNextPetCmd )
{
m_fIgnoreNextPetCmd = false;
return false;
}
switch ( iCmd )
{
case PC_FOLLOW:
case PC_STAY:
case PC_STOP:
{
// Pet friends can use only these commands
if ( Memory_FindObjTypes(pSrc, MEMORY_FRIEND) )
break;
}
default:
{
// All others commands are avaible only to pet owner
if ( !NPC_IsOwnedBy(pSrc, true) )
return false;
}
}
if ( IsStatFlag(STATF_DEAD) )
{
// Bonded NPCs still placed on world even when dead.
// They can listen to commands, but not to these commands below
if ( iCmd == PC_GUARD || iCmd == PC_GUARD_ME || iCmd == PC_ATTACK || iCmd == PC_KILL || iCmd == PC_TRANSFER || iCmd == PC_DROP || iCmd == PC_DROP_ALL )
return true;
}
bool bSuccess = false;
CItem *pItemTarg = dynamic_cast<CItem *>(pObj);
CChar *pCharTarg = dynamic_cast<CChar *>(pObj);
switch ( iCmd )
{
case PC_ATTACK:
case PC_KILL:
{
if ( !pCharTarg || pCharTarg == pSrc )
break;
bSuccess = pCharTarg->OnAttackedBy(pSrc, 1, true); // we know who told them to do this.
if ( bSuccess )
bSuccess = Fight_Attack(pCharTarg, true);
break;
}
case PC_FOLLOW:
if ( !pCharTarg )
break;
m_Act_Targ = pCharTarg->GetUID();
bSuccess = Skill_Start(NPCACT_FOLLOW_TARG);
break;
case PC_FRIEND:
{
if ( !pCharTarg || !pCharTarg->m_pPlayer || pCharTarg == pSrc )
{
Speak(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_CONFUSED));
break;
}
CItemMemory *pMemory = Memory_FindObjTypes(pCharTarg, MEMORY_FRIEND);
if ( pMemory )
{
pSrc->SysMessage(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_FRIEND_ALREADY));
break;
}
pSrc->SysMessagef(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_FRIEND_SUCCESS1), GetName(), pCharTarg->GetName());
pCharTarg->SysMessagef(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_FRIEND_SUCCESS2), pSrc->GetName(), GetName());
Memory_AddObjTypes(pCharTarg, MEMORY_FRIEND);
m_Act_Targ = pCharTarg->GetUID();
bSuccess = Skill_Start(NPCACT_FOLLOW_TARG);
break;
}
case PC_UNFRIEND:
{
if ( !pCharTarg || !pCharTarg->m_pPlayer )
{
Speak(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_CONFUSED));
break;
}
CItemMemory *pMemory = Memory_FindObjTypes(pCharTarg, MEMORY_FRIEND);
if ( !pMemory )
{
pSrc->SysMessage(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_UNFRIEND_NOTFRIEND));
break;
}
pSrc->SysMessagef(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_UNFRIEND_SUCCESS1), GetName(), pCharTarg->GetName());
pCharTarg->SysMessagef(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_UNFRIEND_SUCCESS2), pSrc->GetName(), GetName());
pMemory->Delete();
m_Act_Targ = pSrc->GetUID();
bSuccess = Skill_Start(NPCACT_FOLLOW_TARG);
break;
}
case PC_GO:
if ( !pt.IsValidPoint() )
break;
m_Act_p = pt;
bSuccess = Skill_Start(NPCACT_GOTO);
break;
case PC_GUARD:
if ( !pCharTarg )
break;
pCharTarg->SysMessagef(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_GUARD_SUCCESS), GetName());
m_Act_Targ = pCharTarg->GetUID();
bSuccess = Skill_Start(NPCACT_GUARD_TARG);
break;
case PC_TRANSFER:
if ( !pCharTarg || !pCharTarg->IsClient() )
break;
if ( IsSetOF(OF_PetSlots) )
{
if ( !pCharTarg->FollowersUpdate(this, static_cast<short>(maximum(1, GetDefNum("FOLLOWERSLOTS", true, true))), true) )
{
pSrc->SysMessageDefault(DEFMSG_PETSLOTS_TRY_TRANSFER);
break;
}
}
bSuccess = NPC_PetSetOwner( pCharTarg );
break;
case PC_PRICE: // "PRICE" the vendor item.
if ( !pItemTarg || !NPC_IsVendor() || !pSrc->IsClient() )
break;
if ( IsDigit(pszArgs[0]) ) // did they name a price
return NPC_SetVendorPrice(pItemTarg, ATOI(pszArgs));
if ( !NPC_SetVendorPrice(pItemTarg, -1) ) // test if it can be priced
return false;
pSrc->m_pClient->addPromptConsole(CLIMODE_PROMPT_VENDOR_PRICE, g_Cfg.GetDefaultMsg(DEFMSG_NPC_VENDOR_SETPRICE_2), pItemTarg->GetUID(), GetUID());
return true;
default:
break;
}
// Make some sound to confirm we heard it
NPC_OnPetCommand(bSuccess, pSrc);
return bSuccess;
}
bool CChar::NPC_OnHearPetCmd(LPCTSTR pszCmd, CChar *pSrc, bool bAllPets)
{
ADDTOCALLSTACK("CChar::NPC_OnHearPetCmd");
// This should just be another speech block !!!
// We own this char (pet or hireling)
// pObjTarget = the m_ActTarg has been set for them to attack.
// RETURN:
// true = we understand this. tho we may not do what we are told.
// false = this is not a command we know.
// if ( GetTargMode() == CLIMODE_TARG_PET_CMD ) it needs a target.
if ( !m_pNPC || !pSrc->m_pClient )
return false;
m_fIgnoreNextPetCmd = false; // we clear this incase it's true from previous pet commands
TALKMODE_TYPE mode = TALKMODE_SAY;
if ( OnTriggerSpeech(true, pszCmd, pSrc, mode) )
{
m_fIgnoreNextPetCmd = !bAllPets;
return true;
}
if ((m_pNPC->m_Brain == NPCBRAIN_BERSERK) && !pSrc->IsPriv(PRIV_GM))
return false; // Berserk npcs do not listen to any command (except if src is a GM)
static LPCTSTR const sm_PetCommands[] =
{
"ATTACK",
"BOUGHT",
"CASH",
"COME",
"DROP",
"DROP ALL",
"EQUIP",
"FOLLOW",
"FOLLOW ME",
"FRIEND",
"GO",
"GUARD",
"GUARD ME",
"KILL",
"PRICE",
"RELEASE",
"SAMPLES",
"SPEAK",
"STATUS",
"STAY",
"STOCK",
"STOP",
"TRANSFER",
"UNFRIEND"
};
PC_TYPE iCmd = static_cast<PC_TYPE>(FindTableSorted(pszCmd, sm_PetCommands, COUNTOF(sm_PetCommands)));
if ( iCmd < 0 )
{
if ( !strnicmp(pszCmd, sm_PetCommands[PC_PRICE], 5) )
iCmd = PC_PRICE;
else
return false;
}
if ( !NPC_PetCheckAccess(iCmd, pSrc) )
return true;
bool bTargAllowGround = false;
bool bCheckCrime = false;
LPCTSTR pTargPrompt = NULL;
CCharBase *pCharDef = Char_GetDef();
switch ( iCmd )
{
case PC_ATTACK:
case PC_KILL:
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_ATT);
bCheckCrime = true;
break;
case PC_COME:
case PC_FOLLOW_ME:
NPC_OnHearPetCmdTarg(PC_FOLLOW, pSrc, pSrc, NULL, NULL);
break;
case PC_FOLLOW:
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_FOLLOW);
break;
case PC_FRIEND:
if ( IsStatFlag(STATF_Conjured) )
{
pSrc->SysMessage(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_FRIEND_SUMMONED));
return false;
}
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_FRIEND);
break;
case PC_UNFRIEND:
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_UNFRIEND);
break;
case PC_GO:
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_GO);
bTargAllowGround = true;
break;
case PC_GUARD:
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_GUARD);
bCheckCrime = true;
break;
case PC_GUARD_ME:
NPC_OnHearPetCmdTarg(PC_GUARD, pSrc, pSrc, NULL, NULL);
break;
case PC_STAY:
case PC_STOP:
Skill_Start(NPCACT_STAY);
break;
case PC_TRANSFER:
if ( IsStatFlag(STATF_Conjured) )
{
pSrc->SysMessage(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_TRANSFER_SUMMONED));
return true;
}
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_TRANSFER);
break;
case PC_RELEASE:
if ( IsStatFlag(STATF_Conjured) || (m_pNPC->m_bonded && IsStatFlag(STATF_DEAD)) )
{
Effect(EFFECT_XYZ, ITEMID_FX_TELE_VANISH, this, 10, 15);
Sound(SOUND_TELEPORT);
Delete();
return true;
}
SoundChar(CRESND_NOTICE);
Skill_Start(SKILL_NONE);
NPC_PetClearOwners();
ResendTooltip();
break;
case PC_DROP:
{
// Drop backpack items on ground
// NOTE: This is also called on pet release
CItemContainer *pPack = GetContainer(LAYER_PACK);
if ( pPack )
{
pPack->ContentsDump(GetTopPoint(), ATTR_OWNED);
break;
}
if ( NPC_CanSpeak() )
Speak(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_CARRYNOTHING));
return true;
}
case PC_DROP_ALL:
DropAll(NULL, ATTR_OWNED);
break;
case PC_SPEAK:
NPC_PetConfirmCommand(true, pSrc);
return true;
case PC_EQUIP:
ItemEquipWeapon(false);
ItemEquipArmor(false);
break;
case PC_STATUS:
{
if ( !NPC_CanSpeak() )
break;
CItemContainer *pBank = GetContainerCreate(LAYER_BANKBOX);
TCHAR *pszMsg = Str_GetTemp();
if ( NPC_IsVendor() )
{
CItemContainer *pCont = GetContainerCreate(LAYER_VENDOR_STOCK);
TCHAR *pszTemp1 = Str_GetTemp();
TCHAR *pszTemp2 = Str_GetTemp();
TCHAR *pszTemp3 = Str_GetTemp();
if ( pCharDef->m_iHireDayWage )
{
sprintf(pszTemp1, g_Cfg.GetDefaultMsg(DEFMSG_NPC_VENDOR_STAT_GOLD_1), pBank->m_itEqBankBox.m_Check_Amount);
sprintf(pszTemp2, g_Cfg.GetDefaultMsg(DEFMSG_NPC_VENDOR_STAT_GOLD_2), pBank->m_itEqBankBox.m_Check_Amount / pCharDef->m_iHireDayWage);
sprintf(pszTemp3, g_Cfg.GetDefaultMsg(DEFMSG_NPC_VENDOR_STAT_GOLD_3), static_cast<int>(pCont->GetCount()));
}
else
{
sprintf(pszTemp1, g_Cfg.GetDefaultMsg(DEFMSG_NPC_VENDOR_STAT_GOLD_1), pBank->m_itEqBankBox.m_Check_Amount);
sprintf(pszTemp2, g_Cfg.GetDefaultMsg(DEFMSG_NPC_VENDOR_STAT_GOLD_4), pBank->m_itEqBankBox.m_Check_Restock, pBank->GetTimerAdjusted() / 60);
sprintf(pszTemp3, g_Cfg.GetDefaultMsg(DEFMSG_NPC_VENDOR_STAT_GOLD_3), static_cast<int>(pCont->GetCount()));
}
sprintf(pszMsg, "%s %s %s", pszTemp1, pszTemp2, pszTemp3);
}
else if ( pCharDef->m_iHireDayWage )
{
sprintf(pszMsg, g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_DAYS_LEFT), pBank->m_itEqBankBox.m_Check_Amount / pCharDef->m_iHireDayWage);
}
Speak(pszMsg);
return true;
}
case PC_CASH:
{
// Give up my cash total.
if ( !NPC_IsVendor() )
return false;
CItemContainer *pBank = GetContainerCreate(LAYER_BANKBOX);
if ( pBank )
{
TCHAR *pszMsg = Str_GetTemp();
if ( pBank->m_itEqBankBox.m_Check_Amount > pCharDef->m_iHireDayWage )
{
sprintf(pszMsg, g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_GETGOLD_1), pBank->m_itEqBankBox.m_Check_Amount - pCharDef->m_iHireDayWage);
pSrc->AddGoldToPack(pBank->m_itEqBankBox.m_Check_Amount - pCharDef->m_iHireDayWage);
pBank->m_itEqBankBox.m_Check_Amount = pCharDef->m_iHireDayWage;
}
else
sprintf(pszMsg, g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_GETGOLD_2), pBank->m_itEqBankBox.m_Check_Amount);
Speak(pszMsg);
}
return true;
}
case PC_BOUGHT:
if ( !NPC_IsVendor() )
return false;
Speak(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_ITEMS_BUY));
pSrc->m_pClient->addBankOpen(this, LAYER_VENDOR_EXTRA);
break;
case PC_PRICE:
if ( !NPC_IsVendor() )
return false;
pTargPrompt = g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_SETPRICE);
break;
case PC_SAMPLES:
if ( !NPC_IsVendor() )
return false;
Speak(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_ITEMS_SAMPLE));
pSrc->m_pClient->addBankOpen(this, LAYER_VENDOR_BUYS);
break;
case PC_STOCK:
// Magic restocking container.
if ( !NPC_IsVendor() )
return false;
Speak(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_ITEMS_SELL));
pSrc->m_pClient->addBankOpen(this, LAYER_VENDOR_STOCK);
break;
default:
return false;
}
if ( pTargPrompt )
{
pszCmd += strlen(sm_PetCommands[iCmd]);
GETNONWHITESPACE(pszCmd);
pSrc->m_pClient->m_tmPetCmd.m_iCmd = iCmd;
pSrc->m_pClient->m_tmPetCmd.m_fAllPets = bAllPets;
pSrc->m_pClient->m_Targ_UID = GetUID();
pSrc->m_pClient->m_Targ_Text = pszCmd;
pSrc->m_pClient->addTarget(CLIMODE_TARG_PET_CMD, pTargPrompt, bTargAllowGround, bCheckCrime);
return true;
}
// Make some sound to confirm we heard it
NPC_PetConfirmCommand(true, pSrc);
return true;
}
bool CChar::NPC_OnHearPetCmdTarg(int iCmd, CChar *pSrc, CObjBase *pObj, const CPointMap &pt, LPCTSTR pszArgs)
{
ADDTOCALLSTACK("CChar::NPC_OnHearPetCmdTarg");
// Pet commands that required a target.
if ( m_fIgnoreNextPetCmd )
{
m_fIgnoreNextPetCmd = false;
return false;
}
if ( !NPC_PetCheckAccess(iCmd, pSrc) )
return true;
bool bSuccess = false;
CItem *pItemTarg = dynamic_cast<CItem *>(pObj);
CChar *pCharTarg = dynamic_cast<CChar *>(pObj);
switch ( iCmd )
{
case PC_ATTACK:
case PC_KILL:
{
if ( !pCharTarg || (pCharTarg == this) || (pCharTarg == pSrc) )
break;
bSuccess = pCharTarg->OnAttackedBy(pSrc, true);
if ( bSuccess )
bSuccess = Fight_Attack(pCharTarg, true);
break;
}
case PC_FOLLOW:
if ( !pCharTarg || (pCharTarg == this) )
break;
m_Act_Targ = pCharTarg->GetUID();
bSuccess = Skill_Start(NPCACT_FOLLOW_TARG);
break;
case PC_FRIEND:
{
if ( !pCharTarg || !pCharTarg->m_pPlayer || (pCharTarg == pSrc) )
{
Speak(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_CONFUSED));
break;
}
CItemMemory *pMemory = Memory_FindObjTypes(pCharTarg, MEMORY_FRIEND);
if ( pMemory )
{
pSrc->SysMessage(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_FRIEND_ALREADY));
break;
}
pSrc->SysMessagef(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_FRIEND_SUCCESS1), GetName(), pCharTarg->GetName());
pCharTarg->SysMessagef(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_FRIEND_SUCCESS2), pSrc->GetName(), GetName());
Memory_AddObjTypes(pCharTarg, MEMORY_FRIEND);
m_Act_Targ = pCharTarg->GetUID();
bSuccess = Skill_Start(NPCACT_FOLLOW_TARG);
break;
}
case PC_UNFRIEND:
{
if ( !pCharTarg || !pCharTarg->m_pPlayer )
{
Speak(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_CONFUSED));
break;
}
CItemMemory *pMemory = Memory_FindObjTypes(pCharTarg, MEMORY_FRIEND);
if ( !pMemory )
{
pSrc->SysMessage(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_UNFRIEND_NOTFRIEND));
break;
}
pSrc->SysMessagef(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_UNFRIEND_SUCCESS1), GetName(), pCharTarg->GetName());
pCharTarg->SysMessagef(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_UNFRIEND_SUCCESS2), pSrc->GetName(), GetName());
pMemory->Delete();
m_Act_Targ = pSrc->GetUID();
bSuccess = Skill_Start(NPCACT_FOLLOW_TARG);
break;
}
case PC_GO:
if ( !pt.IsValidPoint() )
break;
m_Act_p = pt;
bSuccess = Skill_Start(NPCACT_GOTO);
break;
case PC_GUARD:
if ( !pCharTarg || (pCharTarg == this) )
break;
pCharTarg->SysMessagef(g_Cfg.GetDefaultMsg(DEFMSG_NPC_PET_TARG_GUARD_SUCCESS), GetName());
m_Act_Targ = pCharTarg->GetUID();
bSuccess = Skill_Start(NPCACT_GUARD_TARG);
break;
case PC_TRANSFER:
if ( !pCharTarg || !pCharTarg->m_pClient )
break;
if ( IsSetOF(OF_PetSlots) )
{
if ( !pCharTarg->FollowersUpdate(this, static_cast<short>(maximum(1, GetDefNum("FOLLOWERSLOTS", true))), true) )
{
pSrc->SysMessageDefault(DEFMSG_PETSLOTS_TRY_TRANSFER);
break;
}
}
bSuccess = NPC_PetSetOwner(pCharTarg);
break;
case PC_PRICE:
if ( !pItemTarg || !NPC_IsVendor() || !pSrc->m_pClient )
break;
if ( IsDigit(pszArgs[0]) ) // did they name a price
return NPC_SetVendorPrice(pItemTarg, ATOI(pszArgs));
if ( !NPC_SetVendorPrice(pItemTarg, -1) ) // test if it can be priced
return false;
pSrc->m_pClient->addPromptConsole(CLIMODE_PROMPT_VENDOR_PRICE, g_Cfg.GetDefaultMsg(DEFMSG_NPC_VENDOR_SETPRICE_2), pItemTarg->GetUID(), GetUID());
return true;
default:
break;
}
// Make some sound to confirm we heard it
NPC_PetConfirmCommand(bSuccess, pSrc);
return bSuccess;
}
bool CChar::NPC_OnHearPetCmdTarg( int iCmd, CChar * pSrc, CObjBase * pObj, const CPointMap & pt, LPCTSTR pszArgs )
{
ADDTOCALLSTACK("CChar::NPC_OnHearPetCmdTarg");
// Pet commands that required a target.
if ( iCmd == PC_FOLLOW || iCmd == PC_STAY || iCmd == PC_STOP )
{
// Pet friends can use only these commands
if ( ! NPC_IsOwnedBy( pSrc ) && Memory_FindObjTypes( pSrc, MEMORY_FRIEND ) == NULL )
return false;
}
else
{
// All others commands are avaible only to pet owner
if ( ! NPC_IsOwnedBy( pSrc, true ) )
return false;
}
if ( m_fIgnoreNextPetCmd == true )
{
m_fIgnoreNextPetCmd = false;
return(false);
}
bool fSuccess = false; // No they won't do it.
// Could be NULL
CItem * pItemTarg = dynamic_cast<CItem*>(pObj);
CChar * pCharTarg = dynamic_cast<CChar*>(pObj);
switch ( iCmd )
{
case PC_GO:
// Go to the location x,y
if ( ! pt.IsValidPoint())
break;
m_Act_p = pt;
fSuccess = Skill_Start( NPCACT_GOTO );
break;
case PC_GUARD:
if ( pObj == NULL )
break;
m_Act_Targ = pObj->GetUID();
fSuccess = Skill_Start( NPCACT_GUARD_TARG );
break;
case PC_TRANSFER:
// transfer ownership via the transfer command.
if ( pCharTarg == NULL )
break;
if ( pCharTarg->IsClient() )
{
if ( IsSetOF(OF_PetSlots) )
{
if ( !pCharTarg->FollowersUpdate(this, static_cast<short>(maximum(1, GetDefNum("FOLLOWERSLOTS", true, true))), true) )
{
pSrc->SysMessageDefault( DEFMSG_PETSLOTS_TRY_TRANSFER );
break;
}
}
fSuccess = NPC_PetSetOwner( pCharTarg );
}
break;
case PC_KILL:
case PC_ATTACK:
// Attack the target.
if ( pCharTarg == NULL )
break;
// refuse to attack friends.
if ( NPC_IsOwnedBy( pCharTarg, true ))
{
fSuccess = false; // take no commands
break;
}
fSuccess = pCharTarg->OnAttackedBy( pSrc, 1, true ); // we know who told them to do this.
if ( fSuccess )
{
fSuccess = Fight_Attack( pCharTarg, true );
}
break;
case PC_FOLLOW:
if ( pCharTarg == NULL )
break;
m_Act_Targ = pCharTarg->GetUID();
fSuccess = Skill_Start( NPCACT_FOLLOW_TARG );
break;
case PC_FRIEND:
// Not the same as owner,
if ( pCharTarg == NULL )
break;
Memory_AddObjTypes( pCharTarg, MEMORY_FRIEND );
break;
case PC_PRICE: // "PRICE" the vendor item.
if ( pItemTarg == NULL )
break;
if ( ! NPC_IsVendor())
break;
// did they name a price
if ( IsDigit( pszArgs[0] ))
{
return NPC_SetVendorPrice( pItemTarg, ATOI(pszArgs) );
}
// test if it is pricable.
if ( ! NPC_SetVendorPrice( pItemTarg, -1 ))
{
return false;
}
// Now set it's price.
if ( ! pSrc->IsClient())
break;
pSrc->m_pClient->addPromptConsole( CLIMODE_PROMPT_VENDOR_PRICE, g_Cfg.GetDefaultMsg( DEFMSG_NPC_VENDOR_SETPRICE_2 ), pItemTarg->GetUID(), GetUID() );
return( true );
default:
break;
}
// Make the yes/no noise.
NPC_OnPetCommand( fSuccess, pSrc );
return fSuccess;
}
