size_t CResourceQtyArray::Load(LPCTSTR pszCmds)
{
ADDTOCALLSTACK("CResourceQtyArray::Load");
// clear-before-load in order not to mess with the previous data
if ( !m_mergeOnLoad )
{
RemoveAll();
}
// 0 = clear the list.
size_t iValid = 0;
ASSERT(pszCmds);
while ( *pszCmds )
{
if ( *pszCmds == '0' &&
( pszCmds[1] == '\0' || pszCmds[1] == ',' ))
{
RemoveAll(); // clear any previous stuff.
pszCmds ++;
}
else
{
CResourceQty res;
if ( !res.Load(pszCmds) )
break;
if ( res.GetResourceID().IsValidUID())
{
// Replace any previous refs to this same entry ?
size_t i = FindResourceID( res.GetResourceID() );
if ( i != BadIndex() )
{
SetAt(i, res);
}
else
{
Add(res);
}
iValid++;
}
}
if ( *pszCmds != ',' )
{
break;
}
pszCmds++;
}
return( iValid );
}
bool CChar::Use_Repair( CItem * pItemArmor )
{
ADDTOCALLSTACK("CChar::Use_Repair");
// Attempt to repair the item.
// If it is repairable.
if ( !pItemArmor || !pItemArmor->Armor_IsRepairable() )
{
SysMessageDefault(DEFMSG_REPAIR_NOT);
return false;
}
if ( pItemArmor->IsItemEquipped() )
{
SysMessageDefault(DEFMSG_REPAIR_WORN);
return false;
}
if ( !CanUse(pItemArmor, true) )
{
SysMessageDefault(DEFMSG_REPAIR_REACH);
return false;
}
// Quickly use arms lore skill, but don't gain any skill until later on
int iArmsLoreDiff = Calc_GetRandVal(30);
if ( !Skill_UseQuick(SKILL_ARMSLORE, iArmsLoreDiff, false) )
{
// apply arms lore skillgain for failure
Skill_Experience(SKILL_ARMSLORE, -iArmsLoreDiff);
SysMessageDefault(DEFMSG_REPAIR_UNK);
return false;
}
if ( pItemArmor->m_itArmor.m_Hits_Cur >= pItemArmor->m_itArmor.m_Hits_Max )
{
SysMessageDefault(DEFMSG_REPAIR_FULL);
return false;
}
m_Act_p = g_World.FindItemTypeNearby(GetTopPoint(), IT_ANVIL, 2, false);
if ( !m_Act_p.IsValidPoint() )
{
SysMessageDefault(DEFMSG_REPAIR_ANVIL);
return false;
}
CItemBase *pItemDef = pItemArmor->Item_GetDef();
ASSERT(pItemDef);
// Use up some raw materials to repair.
int iTotalHits = pItemArmor->m_itArmor.m_Hits_Max;
int iDamageHits = pItemArmor->m_itArmor.m_Hits_Max - pItemArmor->m_itArmor.m_Hits_Cur;
int iDamagePercent = IMULDIV(100, iDamageHits, iTotalHits);
size_t iMissing = ResourceConsumePart(&(pItemDef->m_BaseResources), 1, iDamagePercent / 2, true);
if ( iMissing != pItemDef->m_BaseResources.BadIndex() )
{
// Need this to repair.
const CResourceDef *pCompDef = g_Cfg.ResourceGetDef(pItemDef->m_BaseResources.GetAt(iMissing).GetResourceID());
SysMessagef(g_Cfg.GetDefaultMsg(DEFMSG_REPAIR_LACK_1), pCompDef ? pCompDef->GetName() : g_Cfg.GetDefaultMsg(DEFMSG_REPAIR_LACK_2));
return false;
}
UpdateDir(m_Act_p);
UpdateAnimate(ANIM_ATTACK_1H_SLASH);
// quarter the skill to make it.
// + more damaged items should be harder to repair.
// higher the percentage damage the closer to the skills to make it.
size_t iRes = pItemDef->m_SkillMake.FindResourceType(RES_SKILL);
if ( iRes == pItemDef->m_SkillMake.BadIndex() )
return false;
CResourceQty RetMainSkill = pItemDef->m_SkillMake[iRes];
int iSkillLevel = static_cast<int>(RetMainSkill.GetResQty()) / 10;
int iDifficulty = IMULDIV(iSkillLevel, iDamagePercent, 100);
if ( iDifficulty < iSkillLevel / 4 )
iDifficulty = iSkillLevel / 4;
// apply arms lore skillgain now
LPCTSTR pszText;
Skill_Experience(SKILL_ARMSLORE, iArmsLoreDiff);
bool fSuccess = Skill_UseQuick(static_cast<SKILL_TYPE>(RetMainSkill.GetResIndex()), iDifficulty);
if ( fSuccess )
{
pItemArmor->m_itArmor.m_Hits_Cur = static_cast<WORD>(iTotalHits);
pszText = g_Cfg.GetDefaultMsg(DEFMSG_REPAIR_1);
}
else
{
/*****************************
// not sure if this is working!
******************************/
// Failure
if ( !Calc_GetRandVal(6) )
{
pszText = g_Cfg.GetDefaultMsg(DEFMSG_REPAIR_2);
pItemArmor->m_itArmor.m_Hits_Max--;
pItemArmor->m_itArmor.m_Hits_Cur--;
}
else if ( !Calc_GetRandVal(3) )
{
pszText = g_Cfg.GetDefaultMsg(DEFMSG_REPAIR_3);
pItemArmor->m_itArmor.m_Hits_Cur--;
}
else
pszText = g_Cfg.GetDefaultMsg( DEFMSG_REPAIR_4 );
iDamagePercent = Calc_GetRandVal(iDamagePercent); // some random amount
}
ResourceConsumePart(&(pItemDef->m_BaseResources), 1, iDamagePercent / 2, false);
if ( pItemArmor->m_itArmor.m_Hits_Cur <= 0 )
pszText = g_Cfg.GetDefaultMsg(DEFMSG_REPAIR_5);
TCHAR *pszMsg = Str_GetTemp();
sprintf(pszMsg, g_Cfg.GetDefaultMsg(DEFMSG_REPAIR_MSG), pszText, pItemArmor->GetName());
Emote(pszMsg);
if ( pItemArmor->m_itArmor.m_Hits_Cur <= 0 )
pItemArmor->Delete();
else
pItemArmor->UpdatePropertyFlag(AUTOTOOLTIP_FLAG_DURABILITY);
return fSuccess;
}
bool CRandGroupDef::r_LoadVal( CScript &s )
{
ADDTOCALLSTACK("CRandGroupDef::r_LoadVal");
EXC_TRY("LoadVal");
// RES_SPAWN or RES_REGIONTYPE
switch ( FindTableSorted( s.GetKey(), sm_szLoadKeys, COUNTOF( sm_szLoadKeys )-1 ))
{
case RGC_CATEGORY:
m_sCategory = s.GetArgStr();
break;
case RGC_SUBSECTION:
m_sSubsection = s.GetArgStr();
break;
case RGC_DESCRIPTION:
{
m_sDescription = s.GetArgStr();
if ( !strcmpi(m_sDescription, "@") )
m_sDescription = m_sSubsection;
}
break;
case RGC_DEFNAME: // "DEFNAME"
return SetResourceName( s.GetArgStr());
case RGC_ID: // "ID"
case RGC_CONTAINER:
{
TCHAR *ppCmd[2];
size_t iArgs = Str_ParseCmds(s.GetArgStr(), ppCmd, COUNTOF(ppCmd));
CResourceQty rec;
rec.SetResourceID(
g_Cfg.ResourceGetID(RES_CHARDEF, const_cast<LPCTSTR &>(reinterpret_cast<LPTSTR &>(ppCmd[0]))),
( iArgs > 1 && ppCmd[1][0] ) ? Exp_GetVal(ppCmd[1]) : 1 );
m_iTotalWeight += static_cast<int>(rec.GetResQty());
m_Members.Add(rec);
}
break;
case RGC_RESOURCES:
m_Members.Load(s.GetArgStr());
CalcTotalWeight();
break;
case RGC_WEIGHT: // Modify the weight of the last item.
if ( m_Members.GetCount() > 0 )
{
int iWeight = s.GetArgVal();
m_Members[m_Members.GetCount() - 1].SetResQty(iWeight);
CalcTotalWeight();
}
break;
//default:
//Ignore the rest
//return( CResourceDef::r_LoadVal( s ));
}
return true;
EXC_CATCH;
EXC_DEBUG_START;
EXC_ADD_SCRIPT;
EXC_DEBUG_END;
return false;
}
