Combat.cpp 56 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675
  1. /*
  2. EQ2Emulator: Everquest II Server Emulator
  3. Copyright (C) 2007 EQ2EMulator Development Team (http://www.eq2emulator.net)
  4. This file is part of EQ2Emulator.
  5. EQ2Emulator is free software: you can redistribute it and/or modify
  6. it under the terms of the GNU General Public License as published by
  7. the Free Software Foundation, either version 3 of the License, or
  8. (at your option) any later version.
  9. EQ2Emulator is distributed in the hope that it will be useful,
  10. but WITHOUT ANY WARRANTY; without even the implied warranty of
  11. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  12. GNU General Public License for more details.
  13. You should have received a copy of the GNU General Public License
  14. along with EQ2Emulator. If not, see <http://www.gnu.org/licenses/>.
  15. */
  16. #include "Combat.h"
  17. #include "client.h"
  18. #include "../common/ConfigReader.h"
  19. #include "classes.h"
  20. #include "../common/debug.h"
  21. #include "../common/Log.h"
  22. #include "zoneserver.h"
  23. #include "Skills.h"
  24. #include "classes.h"
  25. #include "World.h"
  26. #include "LuaInterface.h"
  27. #include "Rules/Rules.h"
  28. #include "SpellProcess.h"
  29. #include "World.h"
  30. #include <math.h>
  31. extern Classes classes;
  32. extern ConfigReader configReader;
  33. extern MasterSkillList master_skill_list;
  34. extern RuleManager rule_manager;
  35. extern LuaInterface* lua_interface;
  36. extern World world;
  37. /* ******************************************************************************
  38. DamageSpawn() - Damage equation
  39. MeleeAttack() - Melee auto attacks
  40. RangeAttack() - Range auto attacks
  41. DetermineHit() - ToHit chance as well as defender parry / dodge / block / riposte
  42. CheckInterruptSpell() - Interrupt equations
  43. No mitigation equations yet
  44. ****************************************************************************** */
  45. /* New Combat code */
  46. bool Entity::PrimaryWeaponReady() {
  47. //Can only be ready if no ranged timer
  48. if (GetPrimaryLastAttackTime() == 0 || (Timer::GetCurrentTime2() >= (GetPrimaryLastAttackTime() + GetPrimaryAttackDelay()))) {
  49. if (GetRangeLastAttackTime() == 0 || Timer::GetCurrentTime2() >= (GetRangeLastAttackTime() + GetRangeAttackDelay()))
  50. return true;
  51. }
  52. return false;
  53. }
  54. bool Entity::SecondaryWeaponReady() {
  55. //Can only be ready if no ranged timer
  56. // if(IsDualWield() && (GetPrimaryLastAttackTime()
  57. if (IsDualWield() && (GetSecondaryLastAttackTime() == 0 || (Timer::GetCurrentTime2() >= (GetSecondaryLastAttackTime() + GetSecondaryAttackDelay())))) {
  58. if(GetRangeLastAttackTime() == 0 || Timer::GetCurrentTime2() >= (GetRangeLastAttackTime() + GetRangeAttackDelay()))
  59. return true;
  60. }
  61. return false;
  62. }
  63. bool Entity::RangeWeaponReady() {
  64. //Ranged can only be ready if no other attack timers are active
  65. if(GetRangeLastAttackTime() == 0 || (Timer::GetCurrentTime2() >= (GetRangeLastAttackTime() + GetRangeAttackDelay()))) {
  66. if((GetPrimaryLastAttackTime() == 0 || (Timer::GetCurrentTime2() >= (GetPrimaryLastAttackTime() + GetPrimaryAttackDelay()))) && (GetSecondaryLastAttackTime() == 0 || Timer::GetCurrentTime2() >= (GetSecondaryLastAttackTime() + GetSecondaryAttackDelay()))){
  67. if(!IsPlayer() || ((Player*)this)->GetRangeAttack()) {
  68. return true;
  69. }
  70. }
  71. }
  72. return false;
  73. }
  74. bool Entity::AttackAllowed(Entity* target, float distance, bool range_attack) {
  75. Entity* attacker = this;
  76. Client* client = 0;
  77. if(!target || IsMezzedOrStunned() || IsDazed()) {
  78. LogWrite(COMBAT__DEBUG, 3, "AttackAllowed", "Failed to attack: no target, mezzed, stunned or dazed");
  79. return false;
  80. }
  81. if (IsPlayer())
  82. client = GetZone()->GetClientBySpawn(this);
  83. if (IsPet())
  84. attacker = ((NPC*)this)->GetOwner();
  85. if (target->IsNPC() && ((NPC*)target)->IsPet()){
  86. if (((NPC*)target)->GetOwner())
  87. target = ((NPC*)target)->GetOwner();
  88. }
  89. if (attacker == target) {
  90. LogWrite(COMBAT__DEBUG, 3, "AttackAllowed", "Failed to attack: attacker tried to attack himself or his pet.");
  91. return false;
  92. }
  93. if (IsPlayer() && target->GetAttackable() == 0) {
  94. LogWrite(COMBAT__DEBUG, 3, "AttackAllowed", "Failed to attack: target is not attackable");
  95. return false;
  96. }
  97. if (IsPlayer() && target->IsBot()) {
  98. LogWrite(COMBAT__DEBUG, 3, "AttackAllowed", "Failed to attack: players are not allowed to attack bots");
  99. return false;
  100. }
  101. if (attacker->IsPlayer() && target->IsPlayer())
  102. {
  103. bool pvp_allowed = rule_manager.GetGlobalRule(R_PVP, AllowPVP)->GetBool();
  104. if (!pvp_allowed) {
  105. LogWrite(COMBAT__DEBUG, 3, "AttackAllowed", "Failed to attack: pvp is not allowed");
  106. return false;
  107. }
  108. else
  109. {
  110. sint32 pvpLevelRange = rule_manager.GetGlobalRule(R_PVP, LevelRange)->GetSInt32();
  111. int32 attackerLevel = attacker->GetLevel();
  112. int32 defenderLevel = target->GetLevel();
  113. if ((sint32)abs((sint32)attackerLevel - (sint32)defenderLevel) > pvpLevelRange)
  114. {
  115. LogWrite(COMBAT__DEBUG, 3, "AttackAllowed", "Failed to attack: pvp range of %i exceeded abs(%i-%i).", pvpLevelRange, attackerLevel, defenderLevel);
  116. return false;
  117. }
  118. }
  119. }
  120. if (target->GetHP() <= 0) {
  121. LogWrite(COMBAT__DEBUG, 3, "AttackAllowed", "Failed to attack: target is dead");
  122. return false;
  123. }
  124. if(range_attack && distance != 0) {
  125. Item* weapon = 0;
  126. Item* ammo = 0;
  127. if(attacker->IsPlayer()) {
  128. weapon = ((Player*)attacker)->GetEquipmentList()->GetItem(EQ2_RANGE_SLOT);
  129. ammo = ((Player*)attacker)->GetEquipmentList()->GetItem(EQ2_AMMO_SLOT);
  130. }
  131. if(weapon && weapon->IsRanged() && ammo && ammo->IsAmmo() && ammo->IsThrown()) {
  132. // Distance is less then min weapon range
  133. if(distance < weapon->ranged_info->range_low) {
  134. if (client)
  135. client->SimpleMessage(CHANNEL_GENERAL_COMBAT, "Your target is too close! Move back!");
  136. LogWrite(COMBAT__DEBUG, 3, "AttackAllowed", "Failed to attack: range attack, target to close");
  137. return false;
  138. }
  139. // Distance is greater then max weapon range
  140. if (distance > (weapon->ranged_info->range_high + ammo->thrown_info->range)) {
  141. if (client)
  142. client->SimpleMessage(CHANNEL_GENERAL_COMBAT, "Your target is too far away! Move closer!");
  143. LogWrite(COMBAT__DEBUG, 3, "AttackAllowed", "Failed to attack: range attack, target is to far");
  144. return false;
  145. }
  146. }
  147. }
  148. else if (distance != 0) {
  149. if(distance >= rule_manager.GetGlobalRule(R_Combat, MaxCombatRange)->GetFloat()) {
  150. LogWrite(COMBAT__DEBUG, 3, "AttackAllowed", "Failed to attack: distance is beyond melee range");
  151. return false;
  152. }
  153. }
  154. LogWrite(MISC__TODO, 3, "TODO", "Add more AttackAllowed calculations\n\t(%s, function: %s, line #: %i)", __FILE__, __FUNCTION__, __LINE__);
  155. return true;
  156. }
  157. void Entity::MeleeAttack(Spawn* victim, float distance, bool primary, bool multi_attack) {
  158. if(!victim)
  159. return;
  160. int8 damage_type = 0;
  161. int32 min_damage = 0;
  162. int32 max_damage = 0;
  163. if(primary) {
  164. damage_type = GetPrimaryWeaponType();
  165. min_damage = GetPrimaryWeaponMinDamage();
  166. max_damage = GetPrimaryWeaponMaxDamage();
  167. }
  168. else {
  169. damage_type = GetSecondaryWeaponType();
  170. min_damage = GetSecondaryWeaponMinDamage();
  171. max_damage = GetSecondaryWeaponMaxDamage();
  172. }
  173. if (IsStealthed() || IsInvis())
  174. CancelAllStealth();
  175. int8 hit_result = DetermineHit(victim, damage_type, 0, false);
  176. if(hit_result == DAMAGE_PACKET_RESULT_SUCCESSFUL){
  177. /*if(GetAdventureClass() == MONK){
  178. max_damage*=3;
  179. crit_chance = GetLevel()/4+5;
  180. }
  181. else if(GetAdventureClass() == BRUISER){
  182. min_damage = GetLevel();
  183. max_damage*=3;
  184. crit_chance = GetLevel()/3+5;
  185. }
  186. if(rand()%100 <=crit_chance){
  187. max_damage*= 2;
  188. DamageSpawn((Entity*)victim, DAMAGE_PACKET_TYPE_SIMPLE_CRIT_DMG, damage_type, min_damage, max_damage, 0);
  189. }
  190. else*/
  191. DamageSpawn((Entity*)victim, DAMAGE_PACKET_TYPE_SIMPLE_DAMAGE, damage_type, min_damage, max_damage, 0);
  192. if (!multi_attack) {
  193. CheckProcs(PROC_TYPE_OFFENSIVE, victim);
  194. CheckProcs(PROC_TYPE_PHYSICAL_OFFENSIVE, victim);
  195. }
  196. }
  197. else{
  198. GetZone()->SendDamagePacket(this, victim, DAMAGE_PACKET_TYPE_SIMPLE_DAMAGE, hit_result, damage_type, 0, 0);
  199. if(hit_result == DAMAGE_PACKET_RESULT_RIPOSTE && victim->IsEntity())
  200. ((Entity*)victim)->MeleeAttack(this, distance, true);
  201. }
  202. //Multi Attack roll
  203. if(!multi_attack){
  204. float multi_attack = info_struct.get_multi_attack();
  205. if(multi_attack > 0){
  206. float chance = multi_attack;
  207. if (multi_attack > 100){
  208. int8 automatic_multi = (int8)floor((float)(multi_attack / 100));
  209. chance = (multi_attack - (floor((float) ((multi_attack / 100) * 100))));
  210. while(automatic_multi > 0){
  211. MeleeAttack(victim, 100, primary, true);
  212. automatic_multi--;
  213. }
  214. }
  215. if (MakeRandomFloat(0, 100) <= chance)
  216. MeleeAttack(victim, 100, primary, true);
  217. }
  218. }
  219. //Apply attack speed mods
  220. if(!multi_attack)
  221. SetAttackDelay(primary);
  222. if(victim->IsNPC() && victim->EngagedInCombat() == false) {
  223. ((NPC*)victim)->AddHate(this, 50);
  224. }
  225. if (victim->IsEntity() && victim->GetHP() > 0 && ((Entity*)victim)->HasPet()) {
  226. Entity* pet = 0;
  227. bool AddHate = false;
  228. if (victim->IsPlayer()) {
  229. if (((Player*)victim)->GetInfoStruct()->get_pet_behavior() & 1)
  230. AddHate = true;
  231. }
  232. else
  233. AddHate = true;
  234. if (AddHate) {
  235. pet = ((Entity*)victim)->GetPet();
  236. if (pet)
  237. pet->AddHate(this, 1);
  238. pet = ((Entity*)victim)->GetCharmedPet();
  239. if (pet)
  240. pet->AddHate(this, 1);
  241. }
  242. }
  243. }
  244. void Entity::RangeAttack(Spawn* victim, float distance, Item* weapon, Item* ammo, bool multi_attack) {
  245. if(!victim)
  246. return;
  247. if(weapon && weapon->IsRanged() && ammo && ammo->IsAmmo() && ammo->IsThrown()) {
  248. if(weapon->ranged_info->range_low <= distance && (weapon->ranged_info->range_high + ammo->thrown_info->range) >= distance) {
  249. int8 hit_result = DetermineHit(victim, ammo->thrown_info->damage_type, ammo->thrown_info->hit_bonus, false);
  250. if(hit_result == DAMAGE_PACKET_RESULT_SUCCESSFUL) {
  251. DamageSpawn((Entity*)victim, DAMAGE_PACKET_TYPE_RANGE_DAMAGE, ammo->thrown_info->damage_type, weapon->ranged_info->weapon_info.damage_low3, weapon->ranged_info->weapon_info.damage_high3+ammo->thrown_info->damage_modifier, 0);
  252. if (!multi_attack) {
  253. CheckProcs(PROC_TYPE_OFFENSIVE, victim);
  254. CheckProcs(PROC_TYPE_PHYSICAL_OFFENSIVE, victim);
  255. }
  256. }
  257. else
  258. GetZone()->SendDamagePacket(this, victim, DAMAGE_PACKET_TYPE_RANGE_DAMAGE, hit_result, ammo->thrown_info->damage_type, 0, 0);
  259. // If is a player subtract ammo
  260. if (IsPlayer()) {
  261. if (ammo->details.count > 1) {
  262. ammo->details.count -= 1;
  263. ammo->save_needed = true;
  264. }
  265. else
  266. ((Player*)this)->equipment_list.RemoveItem(ammo->details.slot_id, true);
  267. Client* client = GetZone()->GetClientBySpawn(this);
  268. EQ2Packet* outapp = ((Player*)this)->GetEquipmentList()->serialize(client->GetVersion(), (Player*)this);
  269. if(outapp)
  270. client->QueuePacket(outapp);
  271. }
  272. if(victim->IsNPC() && victim->EngagedInCombat() == false) {
  273. ((NPC*)victim)->AddHate(this, 50);
  274. }
  275. if (victim->IsEntity() && victim->GetHP() > 0 && ((Entity*)victim)->HasPet()) {
  276. Entity* pet = 0;
  277. bool AddHate = false;
  278. if (victim->IsPlayer()) {
  279. if (((Player*)victim)->GetInfoStruct()->get_pet_behavior() & 1)
  280. AddHate = true;
  281. }
  282. else
  283. AddHate = true;
  284. if (AddHate) {
  285. pet = ((Entity*)victim)->GetPet();
  286. if (pet)
  287. pet->AddHate(this, 1);
  288. pet = ((Entity*)victim)->GetCharmedPet();
  289. if (pet)
  290. pet->AddHate(this, 1);
  291. }
  292. }
  293. // Check Ranged attack proc
  294. CheckProcs(PROC_TYPE_RANGED_ATTACK, victim);
  295. // Check Ranged defence proc
  296. if (victim->IsEntity())
  297. ((Entity*)victim)->CheckProcs(PROC_TYPE_RANGED_DEFENSE, this);
  298. SetRangeLastAttackTime(Timer::GetCurrentTime2());
  299. }
  300. }
  301. //Multi Attack roll
  302. if(!multi_attack){
  303. float multi_attack = info_struct.get_multi_attack();
  304. if(multi_attack > 0){
  305. float chance = multi_attack;
  306. if (multi_attack > 100){
  307. int8 automatic_multi = (int8)floor((float)(multi_attack / 100));
  308. chance = (multi_attack - (floor((float)(multi_attack / 100) * 100)));
  309. while(automatic_multi > 0){
  310. RangeAttack(victim, 100, weapon, ammo, true);
  311. automatic_multi--;
  312. }
  313. }
  314. if (MakeRandomFloat(0, 100) <= chance)
  315. RangeAttack(victim, 100, weapon, ammo, true);
  316. }
  317. }
  318. //Apply attack speed mods
  319. if(!multi_attack)
  320. SetAttackDelay(false, true);
  321. }
  322. bool Entity::SpellAttack(Spawn* victim, float distance, LuaSpell* luaspell, int8 damage_type, int32 low_damage, int32 high_damage, int8 crit_mod, bool no_calcs){
  323. if(!victim || !luaspell || !luaspell->spell)
  324. return false;
  325. Spell* spell = luaspell->spell;
  326. float bonus = 0;
  327. Skill* skill = nullptr;
  328. if(spell->GetSpellData()->resistibility > 0)
  329. bonus -= (1 - spell->GetSpellData()->resistibility)*100;
  330. skill = GetSkillByID(spell->GetSpellData()->mastery_skill, false);
  331. if(skill)
  332. bonus += skill->current_val / 25;
  333. int8 hit_result = 0;
  334. bool is_tick = false; // if spell is already active, this is a tick
  335. if (GetZone()->GetSpellProcess()->GetActiveSpells()->count(luaspell)){
  336. hit_result = DAMAGE_PACKET_RESULT_SUCCESSFUL;
  337. is_tick = true;
  338. }
  339. else if(spell->GetSpellData()->type == SPELL_BOOK_TYPE_COMBAT_ART)
  340. hit_result = DetermineHit(victim, damage_type, 0, false);
  341. else
  342. hit_result = DetermineHit(victim, damage_type, 0, true);
  343. if(hit_result == DAMAGE_PACKET_RESULT_SUCCESSFUL) {
  344. luaspell->last_spellattack_hit = true;
  345. //If this spell is a tick and has already crit, force the tick to crit
  346. if(is_tick){
  347. if(luaspell->crit)
  348. crit_mod = 1;
  349. else
  350. crit_mod = 2;
  351. }
  352. if(DamageSpawn((Entity*)victim, DAMAGE_PACKET_TYPE_SPELL_DAMAGE, damage_type, low_damage, high_damage, spell->GetName(), crit_mod, is_tick, no_calcs, luaspell) && !luaspell->crit)
  353. luaspell->crit = true;
  354. CheckProcs(PROC_TYPE_OFFENSIVE, victim);
  355. CheckProcs(PROC_TYPE_MAGICAL_OFFENSIVE, victim);
  356. if(spell->GetSpellData()->success_message.length() > 0){
  357. Client* client = nullptr;
  358. if(IsPlayer())
  359. client = GetZone()->GetClientBySpawn(this);
  360. if(client){
  361. string success_message = spell->GetSpellData()->success_message;
  362. if(success_message.find("%t") < 0xFFFFFFFF)
  363. success_message.replace(success_message.find("%t"), 2, victim->GetName());
  364. client->Message(CHANNEL_YOU_CAST, success_message.c_str());
  365. //commented out the following line as it was causing a duplicate message EmemJR 5/4/2019
  366. //GetZone()->SendDamagePacket(this, victim, DAMAGE_PACKET_TYPE_SPELL_DAMAGE, hit_result, damage_type, 0, spell->GetName());
  367. }
  368. }
  369. if(spell->GetSpellData()->effect_message.length() > 0){
  370. string effect_message = spell->GetSpellData()->effect_message;
  371. if(effect_message.find("%t") < 0xFFFFFFFF)
  372. effect_message.replace(effect_message.find("%t"), 2, victim->GetName());
  373. GetZone()->SimpleMessage(CHANNEL_SPELLS, effect_message.c_str(), victim, 50);
  374. }
  375. }
  376. else {
  377. if(hit_result == DAMAGE_PACKET_RESULT_RESIST)
  378. luaspell->resisted = true;
  379. if(victim->IsNPC())
  380. ((NPC*)victim)->AddHate(this, 5);
  381. luaspell->last_spellattack_hit = false;
  382. GetZone()->SendDamagePacket(this, victim, DAMAGE_PACKET_TYPE_SPELL_DAMAGE, hit_result, damage_type, 0, spell->GetName());
  383. }
  384. if(EngagedInCombat() == false)
  385. {
  386. LogWrite(MISC__TODO, 1, "TODO", "//It would probably be better to add a column to the spells table for 'starts autoattack'\nfile: %s, func: %s, Line: %i", __FILE__, __FUNCTION__, __LINE__);
  387. int8 class1_ = GetInfoStruct()->get_class1();
  388. if(class1_ == COMMONER ||
  389. class1_ == FIGHTER ||
  390. class1_ == WARRIOR ||
  391. class1_ == GUARDIAN ||
  392. class1_ == BERSERKER ||
  393. class1_ == BRAWLER ||
  394. class1_ == MONK ||
  395. class1_ == BRUISER ||
  396. class1_ == CRUSADER ||
  397. class1_ == SHADOWKNIGHT ||
  398. class1_ == PALADIN ||
  399. class1_ == SCOUT ||
  400. class1_ == ROGUE ||
  401. class1_ == SWASHBUCKLER ||
  402. class1_ == BRIGAND ||
  403. class1_ == BARD ||
  404. class1_ == TROUBADOR ||
  405. class1_ == DIRGE ||
  406. class1_ == PREDATOR ||
  407. class1_ == RANGER ||
  408. class1_ == ASSASSIN ||
  409. class1_ == ANIMALIST ||
  410. class1_ == BEASTLORD ||
  411. class1_ == SHAPER ||
  412. class1_ == CHANNELER) //note: it would probably be better to add a column to the spells table for "starts autoattack".
  413. {
  414. if (victim->IsNPC())
  415. ((NPC*)victim)->AddHate(this, 5);
  416. else
  417. InCombat(true);
  418. }
  419. }
  420. if (victim->IsEntity() && victim->GetHP() > 0 && ((Entity*)victim)->HasPet()) {
  421. Entity* pet = 0;
  422. bool AddHate = false;
  423. if (victim->IsPlayer()) {
  424. if (((Player*)victim)->GetInfoStruct()->get_pet_behavior() & 1)
  425. AddHate = true;
  426. }
  427. else
  428. AddHate = true;
  429. if (AddHate) {
  430. pet = ((Entity*)victim)->GetPet();
  431. if (pet)
  432. pet->AddHate(this, 1);
  433. pet = ((Entity*)victim)->GetCharmedPet();
  434. if (pet)
  435. pet->AddHate(this, 1);
  436. }
  437. }
  438. return true;
  439. }
  440. bool Entity::ProcAttack(Spawn* victim, int8 damage_type, int32 low_damage, int32 high_damage, string name, string success_msg, string effect_msg) {
  441. int8 hit_result = DetermineHit(victim, damage_type, 0, true);
  442. if (hit_result == DAMAGE_PACKET_RESULT_SUCCESSFUL) {
  443. DamageSpawn((Entity*)victim, DAMAGE_PACKET_TYPE_SPELL_DAMAGE, damage_type, low_damage, high_damage, name.c_str());
  444. if (success_msg.length() > 0) {
  445. Client* client = 0;
  446. if(IsPlayer())
  447. client = GetZone()->GetClientBySpawn(this);
  448. if(client) {
  449. if(success_msg.find("%t") < 0xFFFFFFFF)
  450. success_msg.replace(success_msg.find("%t"), 2, victim->GetName());
  451. client->Message(CHANNEL_YOU_CAST, success_msg.c_str());
  452. }
  453. }
  454. if (effect_msg.length() > 0) {
  455. if(effect_msg.find("%t") < 0xFFFFFFFF)
  456. effect_msg.replace(effect_msg.find("%t"), 2, victim->GetName());
  457. GetZone()->SimpleMessage(CHANNEL_SPELLS, effect_msg.c_str(), victim, 50);
  458. }
  459. }
  460. else {
  461. if(victim->IsNPC())
  462. ((NPC*)victim)->AddHate(this, 5);
  463. GetZone()->SendDamagePacket(this, victim, DAMAGE_PACKET_TYPE_SPELL_DAMAGE, hit_result, damage_type, 0, name.c_str());
  464. }
  465. if (victim->IsEntity() && victim->GetHP() > 0 && ((Entity*)victim)->HasPet()) {
  466. Entity* pet = 0;
  467. bool AddHate = false;
  468. if (victim->IsPlayer()) {
  469. if (((Player*)victim)->GetInfoStruct()->get_pet_behavior() & 1)
  470. AddHate = true;
  471. }
  472. else
  473. AddHate = true;
  474. if (AddHate) {
  475. pet = ((Entity*)victim)->GetPet();
  476. if (pet)
  477. pet->AddHate(this, 1);
  478. pet = ((Entity*)victim)->GetCharmedPet();
  479. if (pet)
  480. pet->AddHate(this, 1);
  481. }
  482. }
  483. return true;
  484. }
  485. // this is used exclusively by LUA, heal_type is forced lower case via boost::lower(heal_type); in the LUA Functions used by this
  486. bool Entity::SpellHeal(Spawn* target, float distance, LuaSpell* luaspell, string heal_type, int32 low_heal, int32 high_heal, int8 crit_mod, bool no_calcs, string custom_spell_name){
  487. if(!target || !luaspell || !luaspell->spell)
  488. return false;
  489. if (!target->Alive())
  490. return false;
  491. if (target->GetHP() == target->GetTotalHP())
  492. return true;
  493. int32 heal_amt = 0;
  494. bool crit = false;
  495. if(high_heal < low_heal)
  496. high_heal = low_heal;
  497. if(high_heal == low_heal)
  498. heal_amt = high_heal;
  499. else
  500. heal_amt = MakeRandomInt(low_heal, high_heal);
  501. if(!no_calcs){
  502. // if spell is already active, this is a tick
  503. bool is_tick = GetZone()->GetSpellProcess()->GetActiveSpells()->count(luaspell);
  504. //if is a tick and the spell has crit, force crit, else disable
  505. if(is_tick){
  506. if(luaspell->crit)
  507. crit_mod = 1;
  508. else
  509. crit_mod = 2;
  510. }
  511. if (heal_amt > 0){
  512. if(target->IsEntity())
  513. heal_amt = (int32)CalculateHealAmount((Entity*)target, (sint32)heal_amt, crit_mod, &crit);
  514. else
  515. heal_amt = (int32)CalculateHealAmount(nullptr, (sint32)heal_amt, crit_mod, &crit);
  516. }
  517. }
  518. int16 type = 0;
  519. if (heal_type == "heal") {
  520. if(crit)
  521. type = HEAL_PACKET_TYPE_CRIT_HEAL;
  522. else
  523. type = HEAL_PACKET_TYPE_SIMPLE_HEAL;
  524. //apply heal
  525. if (target->GetHP() + (sint32)heal_amt > target->GetTotalHP())
  526. heal_amt = target->GetTotalHP() - target->GetHP();
  527. target->SetHP(target->GetHP() + heal_amt);
  528. /*
  529. if (target->GetHP() + (sint32)heal_amt > target->GetTotalHP())
  530. target->SetHP(target->GetTotalHP());
  531. else
  532. target->SetHP(target->GetHP() + heal_amt);
  533. */
  534. }
  535. else if (heal_type == "power"){
  536. if(crit)
  537. type = HEAL_PACKET_TYPE_CRIT_MANA;
  538. else
  539. type = HEAL_PACKET_TYPE_SIMPLE_MANA;
  540. //give power
  541. if (target->GetPower() + (sint32)heal_amt > target->GetTotalPower())
  542. heal_amt = target->GetTotalPower() - target->GetPower();
  543. target->SetPower(GetPower() + heal_amt);
  544. /*
  545. if (target->GetPower() + (sint32)heal_amt > target->GetTotalPower())
  546. target->SetPower(target->GetTotalPower());
  547. else
  548. target->SetPower(GetPower() + heal_amt);
  549. */
  550. }
  551. /*else if (heal_type == "Savagery"){
  552. if(crit)
  553. type = HEAL_PACKET_TYPE_CRIT_SAVAGERY;
  554. else
  555. type = HEAL_PACKET_TYPE_SAVAGERY;
  556. }
  557. else if (heal_type == "Repair"){
  558. if(crit)
  559. type = HEAL_PACKET_TYPE_CRIT_REPAIR;
  560. else
  561. type = HEAL_PACKET_TYPE_REPAIR;
  562. }*/
  563. else{ //default to heal if type cannot be determined
  564. if(crit)
  565. type = HEAL_PACKET_TYPE_CRIT_HEAL;
  566. else
  567. type = HEAL_PACKET_TYPE_SIMPLE_HEAL;
  568. if (target->GetHP() + (sint32)heal_amt > target->GetTotalHP())
  569. heal_amt = target->GetTotalHP() - target->GetHP();
  570. target->SetHP(target->GetHP() + heal_amt);
  571. /*
  572. if (target->GetHP() + (sint32)heal_amt > target->GetTotalHP())
  573. target->SetHP(target->GetTotalHP());
  574. else
  575. target->SetHP(target->GetHP() + heal_amt);
  576. */
  577. }
  578. target->GetZone()->TriggerCharSheetTimer();
  579. if (heal_amt > 0)
  580. GetZone()->SendHealPacket(this, target, type, heal_amt, custom_spell_name.length() > 0 ? (char*)custom_spell_name.c_str() : luaspell->spell->GetName());
  581. CheckProcs(PROC_TYPE_HEALING, target);
  582. CheckProcs(PROC_TYPE_BENEFICIAL, target);
  583. if (target->IsEntity()) {
  584. int32 hate_amt = heal_amt / 2;
  585. set<int32>::iterator itr;
  586. ((Entity*)target)->MHatedBy.lock();
  587. for (itr = ((Entity*)target)->HatedBy.begin(); itr != ((Entity*)target)->HatedBy.end(); itr++) {
  588. Spawn* spawn = GetZone()->GetSpawnByID(*itr);
  589. if (spawn && spawn->IsEntity() && target != this) {
  590. ((Entity*)spawn)->AddHate(this, hate_amt);
  591. }
  592. }
  593. ((Entity*)target)->MHatedBy.unlock();
  594. }
  595. return true;
  596. }
  597. int8 Entity::DetermineHit(Spawn* victim, int8 damage_type, float ToHitBonus, bool spell){
  598. if(!victim) {
  599. return DAMAGE_PACKET_RESULT_MISS;
  600. }
  601. if(victim->GetInvulnerable()) {
  602. return DAMAGE_PACKET_RESULT_INVULNERABLE;
  603. }
  604. bool behind = false;
  605. // Monk added with Brawler to 360 degree support per KoS Prima Official eGuide Fighter: Monk, pg 138, denoted '360-Degree Avoidance!'
  606. if(!victim->IsEntity() || (!spell && victim->GetAdventureClass() != BRAWLER && victim->GetAdventureClass() != MONK && (behind = BehindTarget(victim)))) {
  607. return DAMAGE_PACKET_RESULT_SUCCESSFUL;
  608. }
  609. float bonus = ToHitBonus;
  610. Skill* skill = GetSkillByWeaponType(damage_type, true);
  611. float skillAddedByWeapon = 0.0f;
  612. if(skill)
  613. {
  614. int16 skillID = master_item_list.GetItemStatIDByName(skill->name.data);
  615. if(skillID != 0xFFFFFFFF)
  616. {
  617. MStats.lock();
  618. skillAddedByWeapon = stats[skillID];
  619. MStats.unlock();
  620. }
  621. }
  622. if (skill)
  623. bonus += (skill->current_val+skillAddedByWeapon) / 25;
  624. if (victim->IsEntity())
  625. bonus -= ((Entity*)victim)->GetDamageTypeResistPercentage(damage_type);
  626. Entity* entity_victim = (Entity*)victim;
  627. float chance = 80 + bonus; //80% base chance that the victim will get hit (plus bonus)
  628. sint16 roll_chance = 100;
  629. if(skill)
  630. roll_chance -= skill->current_val / 25;
  631. if(!spell){ // melee or range attack
  632. skill = GetSkillByName("Offense", true); //add this skill for NPCs
  633. if(skill)
  634. roll_chance -= skill->current_val / 25;
  635. if(entity_victim->IsImmune(IMMUNITY_TYPE_RIPOSTE))
  636. return DAMAGE_PACKET_RESULT_RIPOSTE;
  637. // Avoidance Instructions: https://forums.daybreakgames.com/eq2/index.php?threads/avoidance-faq.482979/
  638. /*Parry: reads as parry in the avoidance tooltip, increased by items with +parry on them
  639. Caps at 70%. For plate tanks, works in the front quadrant only, for brawlers this is 360 degrees.
  640. A small % of parries will be ripostes, which not only avoid the attack but also damage your attacker
  641. */
  642. skill = entity_victim->GetSkillByName("Parry", true);
  643. if(skill){
  644. float parryChance = entity_victim->GetInfoStruct()->get_parry();
  645. float chanceValue = (100.0f - parryChance);
  646. if(rand()%roll_chance >= chanceValue){ //successful parry
  647. /* You may only riposte things in the front quadrant.
  648. Riposte is based off of parry: a certain % of parries turn into ripostes.
  649. */
  650. if(!behind && victim->InFrontSpawn((Spawn*)this, victim->GetX(), victim->GetZ())) { // if the attacker is not behind the victim, and the victim is facing the attacker (in front of spawn) then we can riposte
  651. float riposteChanceValue = parryChance / 7.0f; // Riposte is based off of parry: a certain % of parries turn into ripostes. Unknown what the value is divided by, 7 to make it 10% even.
  652. if(rand()%100 <= riposteChanceValue) {
  653. entity_victim->CheckProcs(PROC_TYPE_RIPOSTE, this);
  654. return DAMAGE_PACKET_RESULT_RIPOSTE;
  655. }
  656. }
  657. entity_victim->CheckProcs(PROC_TYPE_PARRY, this);
  658. return DAMAGE_PACKET_RESULT_PARRY;
  659. }
  660. }
  661. skill = nullptr;
  662. float blockChance = 0.0f;
  663. if(victim->GetAdventureClass() == BRAWLER)
  664. skill = entity_victim->GetSkillByName("Deflection", true);
  665. blockChance = entity_victim->GetInfoStruct()->get_block();
  666. if(blockChance > 0.0f)
  667. {
  668. blockChance += (blockChance*(entity_victim->GetInfoStruct()->get_block_chance()/100.0f));
  669. float chanceValue = (100.0f - blockChance);
  670. /* Non-brawlers may only block things in the front quadrant.
  671. Riposte is based off of parry: a certain % of parries turn into ripostes.
  672. */
  673. float rnd = rand()%roll_chance;
  674. if(rnd >= chanceValue){ //successful block
  675. if((victim->GetAdventureClass() == BRAWLER || victim->GetAdventureClass() == MONK) || (!behind && victim->InFrontSpawn((Spawn*)this, victim->GetX(), victim->GetZ()))) { // if the attacker is not behind the victim, and the victim is facing the attacker (in front of spawn) then we can block
  676. entity_victim->CheckProcs(PROC_TYPE_BLOCK, this);
  677. return (victim->GetAdventureClass() == BRAWLER) ? DAMAGE_PACKET_RESULT_DEFLECT : DAMAGE_PACKET_RESULT_BLOCK;
  678. }
  679. }
  680. }
  681. skill = entity_victim->GetSkillByName("Defense", true);
  682. float dodgeChance = entity_victim->GetInfoStruct()->get_avoidance_base();
  683. if(dodgeChance > 0.0f)
  684. {
  685. float chanceValue = (100.0f - dodgeChance);
  686. float rnd = rand()%roll_chance;
  687. if(rnd >= chanceValue){ //successful dodge
  688. entity_victim->CheckProcs(PROC_TYPE_EVADE, this);
  689. return DAMAGE_PACKET_RESULT_DODGE;//successfully dodged
  690. }
  691. }
  692. if(rand() % roll_chance >= chance)
  693. return DAMAGE_PACKET_RESULT_MISS; //successfully avoided
  694. }
  695. else{
  696. skill = entity_victim->GetSkillByName("Spell Avoidance", true);
  697. if(skill)
  698. chance -= skill->current_val / 25;
  699. if(rand()%roll_chance >= chance) {
  700. return DAMAGE_PACKET_RESULT_RESIST; //successfully resisted
  701. }
  702. }
  703. return DAMAGE_PACKET_RESULT_SUCCESSFUL;
  704. }
  705. float Entity::GetDamageTypeResistPercentage(int8 damage_type) {
  706. float ret = 1;
  707. switch(damage_type) {
  708. case DAMAGE_PACKET_DAMAGE_TYPE_CRUSH:
  709. case DAMAGE_PACKET_DAMAGE_TYPE_PIERCE:
  710. case DAMAGE_PACKET_DAMAGE_TYPE_SLASH: {
  711. Skill* skill = GetSkillByName("Defense", true);
  712. if(skill)
  713. ret += skill->current_val / 25;
  714. if(IsNPC())
  715. LogWrite(COMBAT__DEBUG, 3, "Combat", "DamageType: Crush/Pierce/Slash (%i)", damage_type, ret);
  716. break;
  717. }
  718. case DAMAGE_PACKET_DAMAGE_TYPE_HEAT: {
  719. ret += GetInfoStruct()->get_heat() / 50;
  720. LogWrite(COMBAT__DEBUG, 3, "Combat", "DamageType: Heat (%i), Amt: %.2f", damage_type, ret);
  721. break;
  722. }
  723. case DAMAGE_PACKET_DAMAGE_TYPE_COLD: {
  724. ret += GetInfoStruct()->get_cold() / 50;
  725. LogWrite(COMBAT__DEBUG, 3, "Combat", "DamageType: Cold (%i), Amt: %.2f", damage_type, ret);
  726. break;
  727. }
  728. case DAMAGE_PACKET_DAMAGE_TYPE_MAGIC: {
  729. ret += GetInfoStruct()->get_magic() / 50;
  730. LogWrite(COMBAT__DEBUG, 3, "Combat", "DamageType: Magic (%i), Amt: %.2f", damage_type, ret);
  731. break;
  732. }
  733. case DAMAGE_PACKET_DAMAGE_TYPE_MENTAL: {
  734. ret += GetInfoStruct()->get_mental() / 50;
  735. LogWrite(COMBAT__DEBUG, 3, "Combat", "DamageType: Mental (%i), Amt: %.2f", damage_type, ret);
  736. break;
  737. }
  738. case DAMAGE_PACKET_DAMAGE_TYPE_DIVINE: {
  739. ret += GetInfoStruct()->get_divine() / 50;
  740. LogWrite(COMBAT__DEBUG, 3, "Combat", "DamageType: Divine (%i), Amt: %.2f", damage_type, ret);
  741. break;
  742. }
  743. case DAMAGE_PACKET_DAMAGE_TYPE_DISEASE: {
  744. ret += GetInfoStruct()->get_disease() / 50;
  745. LogWrite(COMBAT__DEBUG, 3, "Combat", "DamageType: Disease (%i), Amt: %.2f", damage_type, ret);
  746. break;
  747. }
  748. case DAMAGE_PACKET_DAMAGE_TYPE_POISON: {
  749. ret += GetInfoStruct()->get_poison() / 50;
  750. LogWrite(COMBAT__DEBUG, 3, "Combat", "DamageType: Poison (%i), Amt: %.2f", damage_type, ret);
  751. break;
  752. }
  753. }
  754. return ret;
  755. }
  756. Skill* Entity::GetSkillByWeaponType(int8 type, bool update) {
  757. switch(type) {
  758. case DAMAGE_PACKET_DAMAGE_TYPE_SLASH: // slash
  759. return GetSkillByName("Slashing", update);
  760. case DAMAGE_PACKET_DAMAGE_TYPE_CRUSH: // crush
  761. return GetSkillByName("Crushing", update);
  762. case DAMAGE_PACKET_DAMAGE_TYPE_PIERCE: // pierce
  763. return GetSkillByName("Piercing", update);
  764. case DAMAGE_PACKET_DAMAGE_TYPE_HEAT:
  765. case DAMAGE_PACKET_DAMAGE_TYPE_COLD:
  766. case DAMAGE_PACKET_DAMAGE_TYPE_MAGIC:
  767. case DAMAGE_PACKET_DAMAGE_TYPE_MENTAL:
  768. case DAMAGE_PACKET_DAMAGE_TYPE_DIVINE:
  769. case DAMAGE_PACKET_DAMAGE_TYPE_DISEASE:
  770. case DAMAGE_PACKET_DAMAGE_TYPE_POISON:
  771. return GetSkillByName("Disruption", update);
  772. }
  773. return 0;
  774. }
  775. bool Entity::DamageSpawn(Entity* victim, int8 type, int8 damage_type, int32 low_damage, int32 high_damage, const char* spell_name, int8 crit_mod, bool is_tick, bool no_calcs, bool ignore_attacker, LuaSpell* spell) {
  776. if(!victim || victim->GetHP() == 0)
  777. return false;
  778. int8 hit_result = 0;
  779. int16 blow_type = 0;
  780. sint32 damage = 0;
  781. bool crit = false;
  782. if(low_damage > high_damage)
  783. high_damage = low_damage;
  784. if(low_damage == high_damage)
  785. damage = low_damage;
  786. else
  787. damage = MakeRandomInt(low_damage, high_damage);
  788. if(!no_calcs) {
  789. //this can be simplified by taking out the / 2, but I wanted the damage to be more consistent
  790. //damage = (rand()%((int)(high_damage/2-low_damage/2) + low_damage/2)) + (rand()%((int)(high_damage/2-low_damage/2) + low_damage/2));
  791. //damage = (rand()%((int)(high_damage-low_damage) + low_damage)) + (rand()%((int)(high_damage-low_damage) + low_damage));
  792. //DPS mod is only applied to auto attacks
  793. if (type == DAMAGE_PACKET_TYPE_SIMPLE_DAMAGE || type == DAMAGE_PACKET_TYPE_RANGE_DAMAGE ) {
  794. damage *= (info_struct.get_dps_multiplier());
  795. }
  796. //Potency and ability mod is only applied to spells/CAs
  797. else {
  798. damage = CalculateDamageAmount(victim, damage, type, damage_type, spell);
  799. }
  800. if(!crit_mod || crit_mod == 1){
  801. //force crit if crit_mod == 1
  802. if(crit_mod == 1)
  803. crit = true;
  804. // Crit Roll
  805. else {
  806. victim->MStats.lock();
  807. float chance = max((float)0, (info_struct.get_crit_chance() - victim->stats[ITEM_STAT_CRITAVOIDANCE]));
  808. victim->MStats.unlock();
  809. if (MakeRandomFloat(0, 100) <= chance)
  810. crit = true;
  811. }
  812. if(crit){
  813. //Apply total crit multiplier with crit bonus
  814. if(info_struct.get_crit_bonus() > 0)
  815. damage *= (1.3 + (info_struct.get_crit_bonus() / 100));
  816. else
  817. damage *= 1.3;
  818. // Change packet type to crit
  819. if (type == DAMAGE_PACKET_TYPE_SIMPLE_DAMAGE)
  820. type = DAMAGE_PACKET_TYPE_SIMPLE_CRIT_DMG;
  821. else if (type == DAMAGE_PACKET_TYPE_SPELL_DAMAGE)
  822. type = DAMAGE_PACKET_TYPE_SPELL_CRIT_DMG;
  823. }
  824. }
  825. // TODO: Mitigation equation from http://www.guildportal.com/Guild.aspx?GuildID=20881&TabID=189653&ForumID=95908&TopicID=9024250
  826. }
  827. LogWrite(MISC__TODO, 3, "TODO", "Take players armor into account\nfile: %s, func: %s, line: %i)", __FILE__, __FUNCTION__, __LINE__);
  828. bool useWards = false;
  829. if(damage <= 0){
  830. hit_result = DAMAGE_PACKET_RESULT_NO_DAMAGE;
  831. damage = 0;
  832. }
  833. else{
  834. hit_result = DAMAGE_PACKET_RESULT_SUCCESSFUL;
  835. sint32 return_damage = 0;
  836. if(GetZone()->CallSpawnScript(victim, SPAWN_SCRIPT_HEALTHCHANGED, this, 0, false, damage, &return_damage) && return_damage != 0)
  837. {
  838. // anything not 0 (no return) becomes considered 'immune' to the damage
  839. if(return_damage < 0) {
  840. damage = 0;
  841. hit_result = DAMAGE_PACKET_RESULT_NO_DAMAGE;
  842. }
  843. else if(return_damage != 0) {
  844. // otherwise we use what was given back to us (either less or greater)
  845. damage = return_damage;
  846. }
  847. }
  848. if(damage) {
  849. int32 prevDmg = damage;
  850. damage = victim->CheckWards(this, damage, damage_type);
  851. if (damage < (sint64)prevDmg)
  852. useWards = true;
  853. victim->TakeDamage(damage);
  854. victim->CheckProcs(PROC_TYPE_DAMAGED, this);
  855. if (IsPlayer()) {
  856. switch (damage_type) {
  857. case DAMAGE_PACKET_DAMAGE_TYPE_SLASH:
  858. case DAMAGE_PACKET_DAMAGE_TYPE_CRUSH:
  859. case DAMAGE_PACKET_DAMAGE_TYPE_PIERCE:
  860. if (((Player*)this)->GetPlayerStatisticValue(STAT_PLAYER_HIGHEST_MELEE_HIT) < damage)
  861. ((Player*)this)->UpdatePlayerStatistic(STAT_PLAYER_HIGHEST_MELEE_HIT, damage, true);
  862. victim->CheckProcs(PROC_TYPE_DAMAGED_MELEE, this);
  863. break;
  864. case DAMAGE_PACKET_DAMAGE_TYPE_HEAT:
  865. case DAMAGE_PACKET_DAMAGE_TYPE_COLD:
  866. case DAMAGE_PACKET_DAMAGE_TYPE_MAGIC:
  867. case DAMAGE_PACKET_DAMAGE_TYPE_MENTAL:
  868. case DAMAGE_PACKET_DAMAGE_TYPE_DIVINE:
  869. case DAMAGE_PACKET_DAMAGE_TYPE_DISEASE:
  870. case DAMAGE_PACKET_DAMAGE_TYPE_POISON:
  871. if (((Player*)this)->GetPlayerStatisticValue(STAT_PLAYER_HIGHEST_MAGIC_HIT) < damage)
  872. ((Player*)this)->UpdatePlayerStatistic(STAT_PLAYER_HIGHEST_MAGIC_HIT, damage, true);
  873. victim->CheckProcs(PROC_TYPE_DAMAGED_MAGIC, this);
  874. break;
  875. }
  876. }
  877. }
  878. }
  879. if(victim->IsNPC() && victim->GetHP() > 0)
  880. ((Entity*)victim)->AddHate(this, damage);
  881. Entity* attacker = nullptr;
  882. if(!ignore_attacker)
  883. attacker = this;
  884. if (damage > 0) {
  885. GetZone()->SendDamagePacket(attacker, victim, type, hit_result, damage_type, damage, spell_name);
  886. if (IsStealthed() || IsInvis())
  887. CancelAllStealth();
  888. if (victim->IsEntity())
  889. ((Entity*)victim)->CheckInterruptSpell(this);
  890. }
  891. else if (useWards)
  892. {
  893. GetZone()->SendDamagePacket(attacker, victim, DAMAGE_PACKET_TYPE_SIMPLE_DAMAGE, DAMAGE_PACKET_RESULT_NO_DAMAGE, damage_type, 0, spell_name);
  894. }
  895. if (victim->GetHP() <= 0)
  896. KillSpawn(victim, damage_type, blow_type);
  897. else {
  898. victim->CheckProcs(PROC_TYPE_DEFENSIVE, this);
  899. if (spell_name)
  900. victim->CheckProcs(PROC_TYPE_MAGICAL_DEFENSIVE, this);
  901. else
  902. victim->CheckProcs(PROC_TYPE_PHYSICAL_DEFENSIVE, this);
  903. }
  904. return crit;
  905. }
  906. void Entity::AddHate(Entity* attacker, sint32 hate) {
  907. if(!attacker || GetHP() <= 0 || attacker->GetHP() <= 0)
  908. return;
  909. // If a players pet and protect self is off
  910. if (IsPet() && ((NPC*)this)->GetOwner()->IsPlayer() && ((((Player*)((NPC*)this)->GetOwner())->GetInfoStruct()->get_pet_behavior() & 2) == 0))
  911. return;
  912. hate = attacker->CalculateHateAmount(this, hate);
  913. if (IsNPC()) {
  914. LogWrite(COMBAT__DEBUG, 3, "Combat", "Add NPC_AI Hate: Victim '%s', Attacker '%s', Hate: %i", GetName(), attacker->GetName(), hate);
  915. ((NPC*)this)->Brain()->AddHate(attacker, hate);
  916. // if encounter size is 0 then add the attacker to the encounter
  917. if (((NPC*)this)->Brain()->GetEncounterSize() == 0)
  918. ((NPC*)this)->Brain()->AddToEncounter(attacker);
  919. }
  920. if (attacker->GetThreatTransfer() && hate > 0) {
  921. Spawn* transfer_target = (Entity*)GetZone()->GetSpawnByID(attacker->GetThreatTransfer()->Target);
  922. if (transfer_target && transfer_target->IsEntity()) {
  923. sint32 transfered_hate = hate * (attacker->GetThreatTransfer()->Amount / 100);
  924. hate -= transfered_hate;
  925. this->AddHate((Entity*)transfer_target, transfered_hate);
  926. }
  927. }
  928. // If pet is adding hate add some to the pets owner as well
  929. if (attacker->IsNPC() && ((NPC*)attacker)->IsPet())
  930. AddHate(((NPC*)attacker)->GetOwner(), 1);
  931. // If player and player has a pet and protect master is set add hate to the pet
  932. if (IsPlayer() && HasPet() && (((Player*)this)->GetInfoStruct()->get_pet_behavior() & 1)) {
  933. // If we have a combat pet add hate to it
  934. if (((Player*)this)->GetPet())
  935. AddHate(((Player*)this)->GetPet(), 1);
  936. if (((Player*)this)->GetCharmedPet())
  937. AddHate(((Player*)this)->GetCharmedPet(), 1);
  938. }
  939. // If this spawn has a spawn group then add the attacker to the hate list of the other
  940. // group members if not already in their list
  941. if (HasSpawnGroup()) {
  942. vector<Spawn*>* group = GetSpawnGroup();
  943. vector<Spawn*>::iterator itr;
  944. for (itr = group->begin(); itr != group->end(); itr++) {
  945. if (!(*itr)->IsNPC())
  946. continue;
  947. NPC* spawn = (NPC*)(*itr);
  948. if (spawn->Brain()->GetHate(attacker) == 0)
  949. spawn->Brain()->AddHate(attacker, 1);
  950. }
  951. safe_delete(group);
  952. }
  953. }
  954. bool Entity::CheckFizzleSpell(LuaSpell* spell) {
  955. if(!spell || !rule_manager.GetGlobalRule(R_Spells, EnableFizzleSpells)->GetInt8()
  956. || spell->spell->GetSpellData()->can_fizzle == false)
  957. return false;
  958. float fizzleMaxSkill = rule_manager.GetGlobalRule(R_Spells, FizzleMaxSkill)->GetFloat();
  959. float baseFizzle = rule_manager.GetGlobalRule(R_Spells, DefaultFizzleChance)->GetFloat()/100.0f; // 10%
  960. float skillObtained = rule_manager.GetGlobalRule(R_Spells, FizzleDefaultSkill)->GetFloat(); // default of .2f so we don't go over the threshold if no skill
  961. Skill* skill = GetSkillByID(spell->spell->GetSpellData()->mastery_skill, false);
  962. if(skill && spell->spell->GetSpellData()->min_class_skill_req > 0)
  963. {
  964. float skillObtained = skill->current_val / spell->spell->GetSpellData()->min_class_skill_req;
  965. if(skillObtained > fizzleMaxSkill) // 120% over the skill value
  966. {
  967. skillObtained = fizzleMaxSkill;
  968. }
  969. baseFizzle = (fizzleMaxSkill - skillObtained) * baseFizzle;
  970. float totalSuccessChance = 1.0f - baseFizzle;
  971. float randResult = MakeRandomFloat(0.0f, 1.0f);
  972. if(randResult > totalSuccessChance)
  973. return true;
  974. }
  975. return false;
  976. }
  977. bool Entity::CheckInterruptSpell(Entity* attacker) {
  978. if(!IsCasting())
  979. return false;
  980. Spell* spell = GetZone()->GetSpell(this);
  981. if(!spell || spell->GetSpellData()->interruptable == 0)
  982. return false;
  983. if(GetInfoStruct()->get_no_interrupt())
  984. return false;
  985. //originally base of 30 percent chance to continue casting if attacked
  986. //modified to 50% and added global rule, 30% was too small at starting levels
  987. int8 percent = rule_manager.GetGlobalRule(R_Spells, NoInterruptBaseChance)->GetInt32();
  988. Skill* skill = GetSkillByName("Focus", true);
  989. float focusSkillPts = 0.0f;
  990. MStats.lock();
  991. focusSkillPts = stats[ITEM_STAT_FOCUS];
  992. MStats.unlock();
  993. if(skill)
  994. percent += ((skill->current_val + 1 + focusSkillPts)/6);
  995. if(MakeRandomInt(1, 100) > percent) {
  996. LogWrite(COMBAT__DEBUG, 0, "Combat", "'%s' interrupted spell for '%s': %i%%", attacker->GetName(), GetName(), percent);
  997. GetZone()->Interrupted(this, attacker, SPELL_ERROR_INTERRUPTED);
  998. return true;
  999. }
  1000. LogWrite(COMBAT__DEBUG, 0, "Combat", "'%s' failed to interrupt spell for '%s': %i%%", attacker->GetName(), GetName(), percent);
  1001. return false;
  1002. }
  1003. void Entity::KillSpawn(Spawn* dead, int8 damage_type, int16 kill_blow_type) {
  1004. if(!dead)
  1005. return;
  1006. if (IsPlayer()) {
  1007. Client* client = GetZone()->GetClientBySpawn(this);
  1008. PacketStruct* packet = configReader.getStruct("WS_EnterCombat", client->GetVersion());
  1009. if (packet) {
  1010. client->QueuePacket(packet->serialize());
  1011. }
  1012. safe_delete(packet);
  1013. ((Player*)this)->InCombat(false);
  1014. }
  1015. if (IsPlayer() && dead->IsEntity())
  1016. GetZone()->GetSpellProcess()->KillHOBySpawnID(dead->GetID());
  1017. //if (dead->IsEntity()) same code called in zone server
  1018. //((Entity*)dead)->InCombat(false);
  1019. /* just for sake of not knowing if we are in a read lock, write lock, or no lock
  1020. ** say spawnlist is locked (DismissPet arg 3 true), which means RemoveSpawn will remove the id from the spawn_list outside of the potential lock
  1021. */
  1022. if (dead->IsPet())
  1023. ((NPC*)dead)->GetOwner()->DismissPet((NPC*)dead, true, true);
  1024. else if (dead->IsEntity()) {
  1025. // remove all pets for this entity
  1026. ((Entity*)dead)->DismissAllPets(false, true);
  1027. }
  1028. // If not in combat and no one in the encounter list add this killer to the list
  1029. if(dead->EngagedInCombat() == false && dead->IsNPC() && ((NPC*)dead)->Brain()->GetEncounterSize() == 0)
  1030. ((NPC*)dead)->Brain()->AddToEncounter(this);
  1031. if (IsCasting())
  1032. GetZone()->Interrupted(this, dead, SPELL_ERROR_NOT_ALIVE);
  1033. LogWrite(COMBAT__DEBUG, 3, "Combat", "Killing '%s'", dead->GetName());
  1034. // Kill movement for the dead npc so the corpse doesn't move
  1035. GetZone()->movementMgr->StopNavigation((Entity*)dead);
  1036. dead->ClearRunningLocations();
  1037. dead->CalculateRunningLocation(true);
  1038. GetZone()->KillSpawn(true, dead, this, true, damage_type, kill_blow_type);
  1039. }
  1040. void Entity::HandleDeathExperienceDebt(Spawn* killer)
  1041. {
  1042. if(!IsPlayer())
  1043. return;
  1044. float ruleDebt = 0.0f;
  1045. if(killer && killer->IsPlayer())
  1046. ruleDebt = rule_manager.GetGlobalRule(R_Combat, PVPDeathExperienceDebt)->GetFloat()/100.0f;
  1047. else
  1048. ruleDebt = rule_manager.GetGlobalRule(R_Combat, DeathExperienceDebt)->GetFloat()/100.0f;
  1049. if(ruleDebt > 0.0f)
  1050. {
  1051. bool groupDebt = rule_manager.GetGlobalRule(R_Combat, GroupExperienceDebt)->GetBool();
  1052. if(groupDebt && ((Player*)this)->GetGroupMemberInfo())
  1053. {
  1054. world.GetGroupManager()->GroupLock(__FUNCTION__, __LINE__);
  1055. PlayerGroup* group = world.GetGroupManager()->GetGroup(((Player*)this)->GetGroupMemberInfo()->group_id);
  1056. if (group)
  1057. {
  1058. group->MGroupMembers.readlock(__FUNCTION__, __LINE__);
  1059. deque<GroupMemberInfo*>* members = group->GetMembers();
  1060. int32 size = members->size();
  1061. float xpDebtPerMember = ruleDebt/(float)size;
  1062. deque<GroupMemberInfo*>::iterator itr;
  1063. for (itr = members->begin(); itr != members->end(); itr++) {
  1064. GroupMemberInfo* gmi = *itr;
  1065. if (gmi->client && gmi->client->GetPlayer()) {
  1066. gmi->client->GetPlayer()->GetInfoStruct()->set_xp_debt(gmi->client->GetPlayer()->GetInfoStruct()->get_xp_debt()+xpDebtPerMember);
  1067. gmi->client->GetPlayer()->SetCharSheetChanged(true);
  1068. }
  1069. }
  1070. group->MGroupMembers.releasereadlock(__FUNCTION__, __LINE__);
  1071. }
  1072. world.GetGroupManager()->ReleaseGroupLock(__FUNCTION__, __LINE__);
  1073. }
  1074. else
  1075. {
  1076. ((Player*)this)->GetInfoStruct()->set_xp_debt(((Player*)this)->GetInfoStruct()->get_xp_debt()+ruleDebt);
  1077. ((Player*)this)->SetCharSheetChanged(true);
  1078. }
  1079. }
  1080. }
  1081. void Entity::ProcessCombat() {
  1082. // This is a virtual function so when a NPC calls this it will use the NPC::ProcessCombat() version
  1083. // and a player will use the Player::ProcessCombat() version, leave this function blank.
  1084. }
  1085. void NPC::ProcessCombat() {
  1086. MBrain.writelock(__FUNCTION__, __LINE__);
  1087. // Check to see if it is time to call the AI again
  1088. if (m_brain && GetHP() > 0 && Timer::GetCurrentTime2() >= (m_brain->LastTick() + m_brain->Tick())) {
  1089. // Probably never want to use the following log, will spam the console for every NPC in a zone 4 times a second
  1090. //LogWrite(NPC_AI__DEBUG, 9, "NPC_AI", "%s is thinking...", GetName());
  1091. m_brain->Think();
  1092. // Set the time for when the brain was last called
  1093. m_brain->SetLastTick(Timer::GetCurrentTime2());
  1094. }
  1095. MBrain.releasewritelock(__FUNCTION__, __LINE__);
  1096. }
  1097. void Player::ProcessCombat() {
  1098. // if not in combat OR casting a spell OR dazed OR feared return out
  1099. if (!EngagedInCombat() || IsCasting() || IsDazed() || IsFeared())
  1100. return;
  1101. //If no target delete combat_target and return out
  1102. Spawn* Target = GetZone()->GetSpawnByID(target);
  1103. if (!Target) {
  1104. combat_target = 0;
  1105. if (target > 0) {
  1106. SetTarget(0);
  1107. }
  1108. return;
  1109. }
  1110. // If is not an entity return out
  1111. if (!Target->IsEntity())
  1112. return;
  1113. // Reset combat target
  1114. combat_target = 0;
  1115. if (Target->HasTarget()) {
  1116. if (Target->IsPlayer() || (Target->IsNPC() && Target->IsPet() && ((NPC*)Target)->GetOwner()->IsPlayer())){
  1117. Spawn* secondary_target = Target->GetTarget();
  1118. if (secondary_target->IsNPC() && secondary_target->appearance.attackable) {
  1119. if (!secondary_target->IsPet() || (secondary_target->IsPet() && ((NPC*)secondary_target)->GetOwner()->IsNPC())) {
  1120. combat_target = secondary_target;
  1121. }
  1122. }
  1123. }
  1124. }
  1125. // If combat_target wasn't set in the above if set it to the original target
  1126. if (!combat_target)
  1127. combat_target = Target;
  1128. // this if may not be required as at the min combat_target will be Target, which we already check at the begining
  1129. if(!combat_target)
  1130. return;
  1131. float distance = 0;
  1132. distance = GetDistance(combat_target);
  1133. // Check to see if we are doing ranged auto attacks if not check to see if we are in melee range
  1134. if (GetRangeAttack()) {
  1135. // We are doing ranged auto attacks
  1136. //check to see if we can attack the target AND the ranged weapon is ready
  1137. if(AttackAllowed((Entity*)combat_target, distance, true) && RangeWeaponReady()) {
  1138. Item* weapon = 0;
  1139. Item* ammo = 0;
  1140. // Get the currently equiped weapon and ammo for the ranged attack
  1141. weapon = GetEquipmentList()->GetItem(EQ2_RANGE_SLOT);
  1142. ammo = GetEquipmentList()->GetItem(EQ2_AMMO_SLOT);
  1143. LogWrite(COMBAT__DEBUG, 1, "Combat", "Weapon '%s', Ammo '%s'", ( weapon )? weapon->name.c_str() : "None", ( ammo ) ? ammo->name.c_str() : "None");
  1144. // If weapon and ammo are both valid perform the ranged attack else send a message to the client
  1145. if(weapon && ammo) {
  1146. LogWrite(COMBAT__DEBUG, 1, "Combat", "Weapon: Primary, Fighter: '%s', Target: '%s', Distance: %.2f", GetName(), combat_target->GetName(), distance);
  1147. RangeAttack(combat_target, distance, weapon, ammo);
  1148. }
  1149. else {
  1150. Client* client = GetZone()->GetClientBySpawn(this);
  1151. if (client) {
  1152. // Need to get messages from live, made these up so the player knows what is wrong in game if weapon or ammo are not valid
  1153. if (!ammo)
  1154. client->SimpleMessage(CHANNEL_COLOR_YELLOW, "Out of ammo.");
  1155. if (!weapon)
  1156. client->SimpleMessage(CHANNEL_COLOR_YELLOW, "No ranged weapon found.");
  1157. }
  1158. }
  1159. }
  1160. }
  1161. else if(distance <= rule_manager.GetGlobalRule(R_Combat, MaxCombatRange)->GetFloat()) {
  1162. // We are doing melee auto attacks and are within range
  1163. // Check to see if we can attack the target
  1164. if(AttackAllowed((Entity*)combat_target)) {
  1165. // Check to see if the primary melee weapon is ready
  1166. if(PrimaryWeaponReady()) {
  1167. // Set the time of the last melee attack with the primary weapon and perform the melee attack with primary weapon
  1168. SetPrimaryLastAttackTime(Timer::GetCurrentTime2());
  1169. MeleeAttack(combat_target, distance, true);
  1170. }
  1171. // Check to see if the secondary weapon is ready
  1172. if(SecondaryWeaponReady()) {
  1173. // set the time of the last melee attack with the secondary weapon and perform the melee attack with the secondary weapon
  1174. SetSecondaryLastAttackTime(Timer::GetCurrentTime2());
  1175. MeleeAttack(combat_target, distance, false);
  1176. }
  1177. }
  1178. }
  1179. }
  1180. void Entity::SetAttackDelay(bool primary, bool ranged) {
  1181. float mod = CalculateAttackSpeedMod();
  1182. bool dual_wield = IsDualWield();
  1183. //Note: Capping all attack speed increases at 125% normal speed (from function CalculateAttackSpeedMod())
  1184. //Add 33% longer delay if dual wielding
  1185. if(dual_wield && ! ranged) {
  1186. if(primary)
  1187. SetPrimaryAttackDelay((GetPrimaryWeaponDelay() * 1.33) / mod);
  1188. else
  1189. SetSecondaryAttackDelay((GetSecondaryWeaponDelay() * 1.33) / mod);
  1190. }
  1191. else {
  1192. if(primary)
  1193. SetPrimaryAttackDelay(GetPrimaryWeaponDelay() / mod);
  1194. else if(ranged)
  1195. SetRangeAttackDelay(GetRangeWeaponDelay() / mod);
  1196. else
  1197. SetSecondaryAttackDelay(GetSecondaryWeaponDelay() / mod);
  1198. }
  1199. }
  1200. float Entity::CalculateAttackSpeedMod(){
  1201. float aspeed = info_struct.get_attackspeed();
  1202. if(aspeed > 0) {
  1203. if (aspeed <= 100)
  1204. return (aspeed / 100 + 1);
  1205. else if (aspeed <= 200)
  1206. return 2.25;
  1207. }
  1208. return 1;
  1209. }
  1210. void Entity::AddProc(int8 type, float chance, Item* item, LuaSpell* spell) {
  1211. if (type == 0) {
  1212. LogWrite(COMBAT__ERROR, 0, "Proc", "Entity::AddProc called with an invalid type.");
  1213. return;
  1214. }
  1215. if (!item && !spell) {
  1216. LogWrite(COMBAT__ERROR, 0, "Proc", "Entity::AddProc must have a valid item or spell.");
  1217. return;
  1218. }
  1219. MProcList.writelock(__FUNCTION__, __LINE__);
  1220. Proc* proc = new Proc();
  1221. proc->chance = chance;
  1222. proc->item = item;
  1223. proc->spell = spell;
  1224. proc->spellid = spell->spell->GetSpellID();
  1225. m_procList[type].push_back(proc);
  1226. MProcList.releasewritelock(__FUNCTION__, __LINE__);
  1227. }
  1228. void Entity::RemoveProc(Item* item, LuaSpell* spell) {
  1229. if (!item && !spell) {
  1230. LogWrite(COMBAT__ERROR, 0, "Proc", "Entity::RemoveProc must have a valid item or spell.");
  1231. return;
  1232. }
  1233. MProcList.writelock(__FUNCTION__, __LINE__);
  1234. map<int8, vector<Proc*> >::iterator proc_itr;
  1235. vector<Proc*>::iterator itr;
  1236. for (proc_itr = m_procList.begin(); proc_itr != m_procList.end(); proc_itr++) {
  1237. itr = proc_itr->second.begin();
  1238. while (itr != proc_itr->second.end()) {
  1239. Proc* proc = *itr;
  1240. if ((item && proc->item == item) || (spell && proc->spell == spell)) {
  1241. itr = proc_itr->second.erase(itr);
  1242. safe_delete(proc);
  1243. }
  1244. else
  1245. itr++;
  1246. }
  1247. }
  1248. MProcList.releasewritelock(__FUNCTION__, __LINE__);
  1249. }
  1250. bool Entity::CastProc(Proc* proc, int8 type, Spawn* target) {
  1251. lua_State* state = 0;
  1252. bool item_proc = false;
  1253. int8 num_args = 3;
  1254. if (proc->spell) {
  1255. state = proc->spell->state;
  1256. }
  1257. else if (proc->item) {
  1258. state = lua_interface->GetItemScript(proc->item->GetItemScript());
  1259. item_proc = true;
  1260. }
  1261. if (!state) {
  1262. LogWrite(COMBAT__ERROR, 0, "Proc", "No valid lua_State* found");
  1263. return false;
  1264. }
  1265. lua_getglobal(state, "proc");
  1266. if (item_proc) {
  1267. num_args++;
  1268. lua_interface->SetItemValue(state, proc->item);
  1269. }
  1270. lua_interface->SetSpawnValue(state, this);
  1271. lua_interface->SetSpawnValue(state, target);
  1272. lua_interface->SetInt32Value(state, type);
  1273. /*
  1274. Add spell data from db in case of a spell proc here...
  1275. */
  1276. if (!item_proc) {
  1277. // Append spell data to the param list
  1278. vector<LUAData*>* data = proc->spell->spell->GetLUAData();
  1279. for(int32 i = 0; i < data->size(); i++) {
  1280. switch(data->at(i)->type) {
  1281. case 0:{
  1282. lua_interface->SetSInt32Value(proc->spell->state, data->at(i)->int_value);
  1283. break;
  1284. }
  1285. case 1:{
  1286. lua_interface->SetFloatValue(proc->spell->state, data->at(i)->float_value);
  1287. break;
  1288. }
  1289. case 2:{
  1290. lua_interface->SetBooleanValue(proc->spell->state, data->at(i)->bool_value);
  1291. break;
  1292. }
  1293. case 3:{
  1294. lua_interface->SetStringValue(proc->spell->state, data->at(i)->string_value.c_str());
  1295. break;
  1296. }
  1297. default:{
  1298. LogWrite(SPELL__ERROR, 0, "Spell", "Error: Unknown LUA Type '%i' in Entity::CastProc for Spell '%s'", (int)data->at(i)->type, proc->spell->spell->GetName());
  1299. return false;
  1300. }
  1301. }
  1302. num_args++;
  1303. }
  1304. }
  1305. if (lua_pcall(state, num_args, 0, 0) != 0) {
  1306. LogWrite(COMBAT__ERROR, 0, "Proc", "Unable to call the proc function for spell %i tier %i", proc->spell->spell->GetSpellID(), proc->spell->spell->GetSpellTier());
  1307. lua_pop(state, 1);
  1308. return false;
  1309. }
  1310. return true;
  1311. }
  1312. void Entity::CheckProcs(int8 type, Spawn* target) {
  1313. if (type == 0) {
  1314. LogWrite(COMBAT__ERROR, 0, "Proc", "Entity::CheckProcs called with an invalid type.");
  1315. return;
  1316. }
  1317. float roll = MakeRandomFloat(0, 100);
  1318. vector<Proc*> tmpList;
  1319. MProcList.readlock(__FUNCTION__, __LINE__);
  1320. for (int8 i = 0; i < m_procList[type].size(); i++) {
  1321. Proc* proc = m_procList[type].at(i);
  1322. if (roll <= proc->chance)
  1323. {
  1324. Proc* tmpProc = new Proc();
  1325. tmpProc->chance = proc->chance;
  1326. tmpProc->item = proc->item;
  1327. tmpProc->spell = proc->spell;
  1328. tmpProc->spellid = proc->spellid;
  1329. tmpList.push_back(tmpProc);
  1330. }
  1331. }
  1332. MProcList.releasereadlock(__FUNCTION__, __LINE__);
  1333. vector<Proc*>::iterator proc_itr;
  1334. for (proc_itr = tmpList.begin(); proc_itr != tmpList.end();) {
  1335. Proc* tmpProc = *proc_itr;
  1336. CastProc(tmpProc, type, target);
  1337. proc_itr++;
  1338. safe_delete(tmpProc);
  1339. }
  1340. }
  1341. void Entity::ClearProcs() {
  1342. MProcList.writelock(__FUNCTION__, __LINE__);
  1343. map<int8, vector<Proc*> >::iterator proc_itr;
  1344. vector<Proc*>::iterator itr;
  1345. for (proc_itr = m_procList.begin(); proc_itr != m_procList.end(); proc_itr++) {
  1346. itr = proc_itr->second.begin();
  1347. while (itr != proc_itr->second.end()) {
  1348. safe_delete(*itr);
  1349. itr = proc_itr->second.erase(itr);
  1350. }
  1351. proc_itr->second.clear();
  1352. }
  1353. m_procList.clear();
  1354. MProcList.releasewritelock(__FUNCTION__, __LINE__);
  1355. }
  1356. sint32 Entity::CalculateHateAmount(Spawn* target, sint32 amt) {
  1357. amt = CalculateFormulaByStat(amt, ITEM_STAT_TAUNT_AMOUNT);
  1358. amt = CalculateFormulaByStat(amt, ITEM_STAT_TAUNT_AND_COMBAT_ART_DAMAGE);
  1359. amt = CalculateFormulaByStat(amt, ITEM_STAT_ABILITY_MODIFIER);
  1360. return amt;
  1361. }
  1362. sint32 Entity::CalculateHealAmount(Spawn* target, sint32 amt, int8 crit_mod, bool* crit, bool skip_crit_mod) {
  1363. amt = CalculateFormulaByStat(amt, ITEM_STAT_HEAL_AMOUNT);
  1364. amt = CalculateFormulaByStat(amt, ITEM_STAT_SPELL_AND_HEAL);
  1365. //Potency Mod
  1366. amt = CalculateFormulaByStat(amt, ITEM_STAT_POTENCY);
  1367. //Ability Mod
  1368. amt += (int32)min((int32)GetInfoStruct()->get_ability_modifier(), (int32)(amt / 2));
  1369. if(!skip_crit_mod){
  1370. if(!crit_mod || crit_mod == 1){
  1371. if(crit_mod == 1)
  1372. *crit = true;
  1373. else if(!*crit) {
  1374. // Crit Roll
  1375. float chance = (float)max((float)0, (float)GetInfoStruct()->get_crit_chance());
  1376. *crit = (MakeRandomFloat(0, 100) <= chance);
  1377. }
  1378. if(*crit){
  1379. //Apply total crit multiplier with crit bonus
  1380. amt *= ((GetInfoStruct()->get_crit_bonus() / 100) + 1.3);
  1381. }
  1382. }
  1383. }
  1384. return amt;
  1385. }
  1386. sint32 Entity::CalculateDamageAmount(Spawn* target, sint32 damage, int8 base_type, int8 damage_type, LuaSpell* spell) {
  1387. return CalculateDamageAmount(target, damage, base_type, damage_type, (spell && spell->spell) ? spell->spell->GetSpellData()->target_type : 0);
  1388. }
  1389. sint32 Entity::CalculateDamageAmount(Spawn* target, sint32 damage, int8 base_type, int8 damage_type, int8 target_type) {
  1390. // only spells may add spell damage item stat
  1391. if(damage_type >= DAMAGE_PACKET_DAMAGE_TYPE_HEAT && damage_type <= DAMAGE_PACKET_DAMAGE_TYPE_POISON)
  1392. {
  1393. // https://forums.daybreakgames.com/eq2/index.php?threads/potency-and-ability-mod-what.4316/
  1394. // Spell damage model assuming 100% crit chance:
  1395. // (Spell base damage * Base damage modifier * Int bonus * Skill bonus * Potency + Ability modifier) * Crit bonus * Spell double attack
  1396. /** Spell base damage: Get all master spells
  1397. Base damage modifier: Very very rare. Available from Wizard aa Wisdom line(Brainstorm). Get it, cherish it.
  1398. Int bonus: Past 1200 or so int, you will get a 10% increase in spell damage per 30% increase in int. Look at int tooltip to see the numerical value.
  1399. Skill bonus: Past skill cap, 100 points skill is worth 2% increase in minimum spell damage, which translates to 1% overall increase. Looks at the skill that the spell uses, for wizards mostly disruption. Cap is 6.5*level.
  1400. Potency: A straight damage modifier, the more you can get the better. No practical cap.
  1401. Ability modifier: A straight damage modifier. Limited to 50% of the spell base damage, but for a wizard this usually has little consequence. However note that this is not affected by Potency.
  1402. Crit bonus: A straight damage modifier, the more you can get the better. No practical cap. Wizards got 50% intrinsic Crit Bonus that does not show up in the stat window, just add 50 to stat value for calculations.
  1403. Spell double cast: A straight damage modifier, the more you can get the better. You won't be able to get very much of this.
  1404. Makes the spell cast twice with some limitations.
  1405. **/
  1406. damage = CalculateFormulaByStat(damage, ITEM_STAT_SPELL_DAMAGE);
  1407. }
  1408. if(base_type == DAMAGE_PACKET_TYPE_SPELL_DAMAGE)
  1409. damage = CalculateFormulaByStat(damage, ITEM_STAT_SPELL_AND_COMBAT_ART_DAMAGE);
  1410. // combat abilities only bonus
  1411. if(damage_type <= DAMAGE_PACKET_DAMAGE_TYPE_PIERCE)
  1412. damage = CalculateFormulaByStat(damage, ITEM_STAT_TAUNT_AND_COMBAT_ART_DAMAGE);
  1413. // Potency mod
  1414. damage = CalculateFormulaByStat(damage, ITEM_STAT_POTENCY);
  1415. int32 modifier = 2;
  1416. if(target_type == SPELL_TARGET_GROUP_AE || target_type == SPELL_TARGET_RAID_AE || target_type == SPELL_TARGET_OTHER_GROUP_AE)
  1417. {
  1418. modifier = 3;
  1419. }
  1420. // Ability mod can only give up to half of damage after potency
  1421. int32 mod = (int32)min(info_struct.get_ability_modifier(), (float)(damage / modifier));
  1422. damage += mod;
  1423. return damage;
  1424. }
  1425. sint32 Entity::CalculateFormulaByStat(sint32 value, int16 stat) {
  1426. sint32 outValue = value;
  1427. MStats.lock();
  1428. std::map<int16, float>::iterator itr = stats.find(stat);
  1429. if(itr != stats.end())
  1430. outValue = (sint32)((float)value * ((itr->second / 100.0f) + 1.0f));
  1431. MStats.unlock();
  1432. return outValue;
  1433. }
  1434. int32 Entity::CalculateFormulaByStat(int32 value, int16 stat) {
  1435. int32 outValue = value;
  1436. MStats.lock();
  1437. std::map<int16, float>::iterator itr = stats.find(stat);
  1438. if(itr != stats.end())
  1439. outValue = (int32)((float)value * ((itr->second / 100.0f) + 1.0f));
  1440. MStats.unlock();
  1441. return outValue;
  1442. }
  1443. int32 Entity::CalculateFormulaBonus(int32 value, float percent_bonus) {
  1444. return (int32)((float)value * ((percent_bonus / 100.0f) + 1.0f));
  1445. }