Sarge-AI/sarge/code/functions/fn_AI_killed.sqf
Teh Dango 4b8641b99c Cleanup
Code cleanup, minor fixes...
2017-10-25 21:51:06 -04:00

235 lines
8.9 KiB
Plaintext

/*
# Original #
Sarge AI System 1.5
Created for Arma 2: DayZ Mod
Author: Sarge
https://github.com/Swiss-Sarge
# Fork #
Sarge AI System 2.0+
Modded for Arma 3: Epoch Mod
Changes: Dango
https://www.hod-servers.com
*/
private ["_message","_ai","_aikiller","_aikilled_type","_aikilled_side","_aikilled_group_side","_aikiller_group_side","_aikiller_type","_aikiller_name","_aikiller_side","_respect","_humankills","_banditkills","_tmp","_sphere_alpha","_sphere_red","_sphere_green","_sphere_blue","_obj_text_string","_ai_type","_ai_killer_type","_ai_xp_type"];
//if (!isServer) exitWith {};
_ai = _this select 0;
_aikiller = _this select 1;
_aikilled_type = typeof _ai;
_aikilled_side = side _ai;
_aikilled_group_side = side (group _ai);
_aikiller_type = typeof _aikiller;
if ((alive _aiKiller) && !(_aikiller_type in SAR_heli_type) && !("LandVehicle" countType [vehicle _aikiller] > 0)) then {
_aikiller_name = name _aikiller;
} else {
_aikiller_name = _aikiller_type;
};
_aikiller_side = side _aikiller;
_aikiller_group_side = side (group _aikiller);
// retrieve AI type from the killed AI
_ai_type = _ai getVariable ["SAR_AI_type",""];
// retrieve AI type from the killer AI
_ai_killer_type = _aikiller getVariable ["SAR_AI_type",""];
// retrieve experience value from the killed AI
_ai_xp = _ai getVariable ["SAR_AI_experience",0];
// retrieve experience value from the killing AI
_ai_killer_xp = _aikiller getVariable ["SAR_AI_experience",0];
if (_ai_xp < SAR_AI_XP_LVL_2) then {
_ai_xp_type = SAR_AI_XP_NAME_1;
};
if (_ai_xp >= SAR_AI_XP_LVL_2 && _ai_xp < SAR_AI_XP_LVL_3) then {
_ai_xp_type = SAR_AI_XP_NAME_2;
};
if (_ai_xp >= SAR_AI_XP_LVL_3) then {
_ai_xp_type = SAR_AI_XP_NAME_3;
};
if (_ai_killer_xp < SAR_AI_XP_LVL_2) then {
_ai_killer_xp_type = SAR_AI_XP_NAME_1;
};
if (_ai_killer_xp >= SAR_AI_XP_LVL_2 && _ai_killer_xp < SAR_AI_XP_LVL_3) then {
_ai_killer_xp_type = SAR_AI_XP_NAME_2;
};
if (_ai_killer_xp >= SAR_AI_XP_LVL_3) then {
_ai_killer_xp_type = SAR_AI_XP_NAME_3;
};
diag_log format ["Sarge AI System: _ai_xp = %1; _ai_xp_type = %2",_ai_xp,_ai_xp_type];
if (SAR_KILL_MSG) then {
if (isPlayer _aikiller) then {
_message = format["Sarge AI: A %3 %2 was killed by Player: %1",_aikiller_name,_ai_type,_ai_xp_type];
_message remoteExec ["systemChat",0];
};
if (!(isPlayer _aikiller) && !(isNull _aikiller) && (alive _aikiller)) then {
if (_ai_xp >= SAR_AI_XP_LVL_2) then {
_message = format["Sarge AI: A %3 %2 was killed by a %3 %4!",_ai_xp_type,_ai_type,_ai_killer_xp_type,_ai_killer_type];
diag_log _message;
_message remoteExec ["systemChat",0];
};
};
};
if (SAR_HITKILL_DEBUG) then {
diag_log format["SAR_HITKILL_DEBUG: AI killed - Type: %1 Side: %2 Group Side: %3",_aikilled_type, _aikilled_side,_aikilled_group_side];
diag_log format["SAR_HITKILL_DEBUG: AI Killer - Type: %1 Name: %2 Side: %3 Group Side: %4",_aikiller_type,_aikiller_name, _aikiller_side,_aikiller_group_side];
};
if ((alive _aiKiller) && (isPlayer _aikiller)) then {
if (_aikilled_group_side == SAR_AI_friendly_side) then {
_humanity = _aikiller getVariable ["humanity",0];
_humanity = _humanity - SAR_surv_kill_value;
_aikiller setVariable["humanity", _humanity,true];
if (SAR_HITKILL_DEBUG) then {
diag_log format ["Sarge's AI System: Adjusting respect for survivor or soldier kill by %2 for %1",_aikiller_name,SAR_surv_kill_value];
};
if (SAR_log_AI_kills) then {
_friendlyCount = profileNamespace getVariable["SAR_FRIENDLY_KILLS",0];
_aikiller setVariable ["SAR_FRIENDLY_KILLS",(_friendlyCount + 1),true];
};
/* _playerRespect = _aikiller getVariable ["ExileScore", 0];
_playerMoney = _aikiller getVariable ["ExileMoney", 0];
_repChange = SAR_surv_kill_value;
_playerRespect = _playerRespect - _repChange;
_aikiller setVariable ["ExileScore",_playerRespect];
_fragType = [[format ["%1 Kill",_ai_type],-_repChange]];
[_aikiller, "showFragRequest", [_fragType]] call ExileServer_system_network_send_to;
ExileClientPlayerScore = _playerRespect;
(owner _aikiller) publicVariableClient "ExileClientPlayerScore";
ExileClientPlayerScore = nil;
format ["setAccountMoneyAndRespect:%1:%2:%3",_playerMoney ,_playerRespect ,getPlayerUID _aikiller] call ExileServer_system_database_query_fireAndForget; */
if ((random 100) < 3) then {
_message = format["Sarge AI: %1 killed a friendly AI - sending reinforcements!",_aikiller_name];
_message remoteExec ["systemChat",0];
} else {
if ((random 100) < 3) then {
_message = format["Sarge AI: Tango down ... we offer a decent reward for the head of %1!",_aikiller_name];
_message remoteExec ["systemChat",0];
};
};
};
if (_aikilled_group_side == SAR_AI_unfriendly_side) then {
_humanity = _aikiller getVariable ["humanity",0];
_humanity = _humanity + SAR_band_kill_value;
_aikiller setVariable["humanity", _humanity,true];
if (SAR_HITKILL_DEBUG) then {
diag_log format ["Sarge's AI System: Adjusting respect for bandit kill by %2 for %1",_aikiller_name,SAR_band_kill_value];
};
if(SAR_log_AI_kills) then {
_hostileCount = profileNamespace getVariable["SAR_HOSTILE_KILLS",0];
_aikiller setVariable ["SAR_HOSTILE_KILLS",(_hostileCount + 1),true];
};
/* _playerRespect = _aikiller getVariable ["ExileScore", 0];
_playerMoney = _aikiller getVariable ["ExileMoney", 0];
_repChange = SAR_band_kill_value;
_playerRespect = _playerRespect + _repChange;
_aikiller setVariable ["ExileScore",_playerRespect];
_fragType = [[format ["%1 Kill",_ai_type],_repChange]];
[_aikiller, "showFragRequest", [_fragType]] call ExileServer_system_network_send_to;
ExileClientPlayerScore = _playerRespect;
(owner _aikiller) publicVariableClient "ExileClientPlayerScore";
ExileClientPlayerScore = nil;
format ["setAccountMoneyAndRespect:%1:%2:%3",_playerMoney ,_playerRespect ,getPlayerUID _aikiller] call ExileServer_system_database_query_fireAndForget; */
if ((random 100) < 3) then {
_message = format["Sarge AI: Nice bandit kill %1!",_aikiller_name];
_message remoteExec ["systemChat",0];
} else {
if ((random 100) < 3) then {
_message = format["Sarge AI: Another bandit down ... %1 is going to be the root cause of bandit extinction :]",_aikiller_name];
_message remoteExec ["systemChat",0];
};
};
};
} else {
if(SAR_AI_XP_SYSTEM) then {
if((alive _aiKiller) && (!isNull _aikiller)) then { // check if AI was killed by an AI, and not driven over / fallen to death etc
// get xp from the victim
_xp_gain = _ai_xp;
if(_xp_gain == 0) then {
_xp_gain=1;
};
// get old xp
_ai_killer_xp = _aikiller getVariable ["SAR_AI_experience",0];
// calculate new xp
_ai_killer_xp_new = _ai_killer_xp + _xp_gain;
if(_ai_killer_xp < SAR_AI_XP_LVL_3) then {
if(_ai_killer_xp < SAR_AI_XP_LVL_2 && _ai_killer_xp_new >= SAR_AI_XP_LVL_2 ) then { // from level 1 to level 2
if(SAR_SHOW_XP_LVL) then { diag_log format["Level up from 1 -> 2 for %1",_aikiller];};
_message = format["Sarge AI: A %1 %2 was promoted!",_ai_killer_xp_type,_ai_killer_type];
_message remoteExec ["systemChat",0];
// restore health to full
_aikiller setDamage 0;
// upgrades for the next level
// medium armor
_aikiller removeEventHandler ["HandleDamage",0];
_aikiller addEventHandler ["HandleDamage",{if (_this select 1!="") then {_unit=_this select 0;damage _unit+((_this select 2)-damage _unit)*SAR_AI_XP_ARMOR_2}}];
};
if(_ai_killer_xp < SAR_AI_XP_LVL_3 && _ai_killer_xp_new >= SAR_AI_XP_LVL_3 ) then { // from level 2 to level 3
if(SAR_SHOW_XP_LVL) then { diag_log format["Level up from 2 -> 3 for %1",_aikiller];};
_message = format["Sarge AI: A %1 %2 was promoted!",_ai_killer_xp_type,_ai_killer_type];
_message remoteExec ["systemChat",0];
// restore health to full
_aikiller setDamage 0;
// upgrades for the next level
// highest armor
_aikiller removeEventHandler ["HandleDamage",0];
_aikiller addEventHandler ["HandleDamage",{if (_this select 1!="") then {_unit=_this select 0;damage _unit+((_this select 2)-damage _unit)*SAR_AI_XP_ARMOR_3}}];
};
};
//diag_log format["Start XP: %1, End XP: %2",_ai_killer_xp,_ai_killer_xp+_xp_gain];
// set new xp value for AI that killed the other AI
_ai_killer_xp = _ai_killer_xp + _xp_gain;
_aikiller setVariable["SAR_AI_experience",_ai_killer_xp];
};
};
};