DC_INTERACTION_OPPORTUNITIES=500; DC_INTERACTION_RUN_ID='interactions_canonical_20261030'
local ORIGIN=Vector(-4500,0,256)
-- Isolated numeric observations only. Never run in a normal/user match.
local function json(v)
 local t=type(v);if t=='number' then return v==v and math.abs(v)<math.huge and tostring(v) or 'null' elseif t=='boolean' then return tostring(v) elseif t=='string' then return '"'..v:gsub('\\','\\\\'):gsub('"','\\"'):gsub('\n','\\n'):gsub('\r','\\r')..'"' elseif t=='table' then local out={};for k,x in pairs(v)do out[#out+1]=json(tostring(k))..':'..json(x)end;return '{'..table.concat(out,',')..'}' end;return 'null'
end
local function send(v)v.runId=DC_INTERACTION_RUN_ID or 'unlabelled';local r=CreateHTTPRequestScriptVM('POST','http://127.0.0.1:5213/interaction-native');r:SetHTTPRequestRawPostBody('application/json',json(v));r:Send(function(reply)print('DC_INTERACTION '..(v.id or v.kind)..' HTTP '..tostring(reply.StatusCode))end)end
local function snapshot(u)
 local m={};for _,x in ipairs(u:FindAllModifiers())do local k=x:GetName();if not k:find('dc_interaction')then m[k]={remaining=x:GetRemainingTime(),duration=x:GetDuration(),stacks=x:GetStackCount()}end end
 return {hp=u:GetHealth(),maxHp=u:GetMaxHealth(),mana=u:GetMana(),healthRegen=u:GetHealthRegen(),manaRegen=u:GetManaRegen(),x=u:GetAbsOrigin().x,y=u:GetAbsOrigin().y,damageMin=u:GetBaseDamageMin(),damageMax=u:GetBaseDamageMax(),damage=u:GetAverageTrueAttackDamage(nil),armor=u:GetPhysicalArmorValue(false),attackInterval=u:GetSecondsPerAttack(false),moveSpeed=u:GetMoveSpeedModifier(u:GetBaseMoveSpeed(),false),baseMoveSpeed=u:GetBaseMoveSpeed(),statusResistance=u:GetStatusResistance(),magicResistance=u:Script_GetMagicalArmorValue(nil),stunned=u:IsStunned(),hexed=u:IsHexed(),channeling=u:IsChanneling(),alive=u:IsAlive(),modifiers=m}
end
local function make(hero,team,x)
 local u=CreateUnitByName('npc_dota_hero_'..hero,ORIGIN+Vector(x,0,0),true,nil,nil,team);for i=2,25 do u:HeroLevelUp(false)end;for i=0,31 do local a=u:GetAbilityByIndex(i);if a then local innate=false;pcall(function()innate=a:IsInnateAbility()end);if a:GetAbilityName():find('special_bonus_')or not innate then a:SetLevel(0)end end end;u:SetIdleAcquire(false);u:SetAcquisitionRange(0);u:RemoveModifierByName('modifier_special_bonus_attributes');u:RemoveModifierByName('modifier_lich_chain_frost_ondeath');u.DCInteraction={};u:AddNewModifier(u,nil,'modifier_dc_interaction',{});u:CalculateStatBonus(true);return u
end
local function skill(u,k,n)local a=u:FindAbilityByName(k);if not a then error('missing_ability')end;a:SetLevel(n);return a end
local function casts(a,b,k,point)local s=a:FindAbilityByName(k);if not s then error('missing_cast')end;if point then ExecuteOrderFromTable({UnitIndex=a:entindex(),OrderType=DOTA_UNIT_ORDER_CAST_POSITION,Position=b:GetAbsOrigin(),AbilityIndex=s:entindex(),Queue=false})else ExecuteOrderFromTable({UnitIndex=a:entindex(),OrderType=DOTA_UNIT_ORDER_CAST_TARGET,TargetIndex=b:entindex(),AbilityIndex=s:entindex(),Queue=false})end end
local function nearbySpire(a)local out={};for _,u in ipairs(FindUnitsInRadius(a:GetTeamNumber(),ORIGIN+Vector(250,0,0),nil,2000,DOTA_UNIT_TARGET_TEAM_FRIENDLY,DOTA_UNIT_TARGET_ALL,DOTA_UNIT_TARGET_FLAG_INVULNERABLE+DOTA_UNIT_TARGET_FLAG_OUT_OF_WORLD,FIND_ANY_ORDER,false))do if u:GetUnitName()=='npc_dota_lich_ice_spire'then out[#out+1]=u end end;return out end
function Precache(ctx)for _,h in ipairs({'lich','lion','viper','sven','sniper'})do PrecacheUnitByNameSync('npc_dota_hero_'..h,ctx)end end
function Activate()
 LinkLuaModifier('modifier_dc_interaction','addon_game_mode',LUA_MODIFIER_MOTION_NONE)
 pcall(function()GameRules:SetCreepSpawningEnabled(false)end);GameRules:SetHeroSelectionTime(0);GameRules:SetStrategyTime(0);GameRules:SetShowcaseTime(0);GameRules:SetPreGameTime(0);GameRules:GetGameModeEntity():SetCustomGameForceHero('npc_dota_hero_sniper')
 local cases={
 {id='hex_basic',hero='lion',ability='lion_voodoo',purge='basic',seconds=3},
 {id='hex_strong',hero='lion',ability='lion_voodoo',purge='strong',seconds=3},
 {id='impale_basic',hero='lion',ability='lion_impale',point=true,purge='basic',seconds=3},
 {id='impale_strong',hero='lion',ability='lion_impale',point=true,purge='strong',seconds=3},
 {id='impale_resistance_25',hero='lion',ability='lion_impale',point=true,resistance=25,seconds=4},
 {id='poison_satanic',hero='viper',ability='viper_poison_attack',poison=true,item='satanic',seconds=5},
 {id='poison_bkb',hero='viper',ability='viper_poison_attack',poison=true,item='black_king_bar',seconds=5},
 {id='lich_gaze_scepter_cast',hero='lich',ability='lich_sinister_gaze',scepter=true,follow='lich_frost_nova',seconds=3},
 {id='lich_death_chain_frost',hero='lich',death=true,seconds=4},
 {id='lich_spire_chain',hero='lich',spire=true,seconds=5},
 {id='lich_spire_attacks',hero='lich',spire=true,spireAttacks=true,seconds=5},
 }
 if not DC_INTERACTION_SKIP_NATURAL then
  cases[#cases+1]={id='natural_crit_30',hero='sniper',natural=true,items={'greater_crit'},seconds=1500}
  cases[#cases+1]={id='natural_mkb_80',hero='sniper',natural=true,items={'monkey_king_bar'},seconds=1500}
  cases[#cases+1]={id='natural_maelstrom_25',hero='sniper',natural=true,items={'maelstrom'},seconds=1500}
  cases[#cases+1]={id='natural_combo_evasion',hero='sniper',natural=true,items={'greater_crit','monkey_king_bar','maelstrom','satanic'},evasion=true,seconds=1500}
 end
 if DC_INTERACTION_ONLY then local selected={};for _,c in ipairs(cases)do if DC_INTERACTION_ONLY[c.id]then selected[#selected+1]=c end end;cases=selected end
 local phase=0;local a,b,c,d;local sent,failed=0,0
 local function remove()GameRules.DCInteraction=nil;if a and not a:IsNull()then for _,u in ipairs(FindUnitsInRadius(DOTA_TEAM_GOODGUYS,ORIGIN,nil,4000,DOTA_UNIT_TARGET_TEAM_BOTH,DOTA_UNIT_TARGET_ALL,DOTA_UNIT_TARGET_FLAG_INVULNERABLE+DOTA_UNIT_TARGET_FLAG_OUT_OF_WORLD,FIND_ANY_ORDER,false))do if not u:IsHero()and not u:IsBuilding()then UTIL_Remove(u)end end;a:Stop();UTIL_Remove(a)end;if b and not b:IsNull()then b:Stop();UTIL_Remove(b)end;a=nil;b=nil end
 GameRules:GetGameModeEntity():SetContextThink('dc_interaction_suite',function()
  local ok,result=pcall(function()
   if phase==0 then
    if GameRules:State_Get()==DOTA_GAMERULES_STATE_CUSTOM_GAME_SETUP then GameRules:FinishCustomGameSetup();return .2 end;if GameRules:State_Get()<DOTA_GAMERULES_STATE_PRE_GAME then return .5 end
    c=table.remove(cases,1);if not c then send({kind='done',cases=sent,failed=failed});print('DC_INTERACTION_COMPLETE');return nil end
    for _,u in ipairs(FindUnitsInRadius(DOTA_TEAM_GOODGUYS,ORIGIN,nil,4000,DOTA_UNIT_TARGET_TEAM_BOTH,DOTA_UNIT_TARGET_ALL,DOTA_UNIT_TARGET_FLAG_INVULNERABLE+DOTA_UNIT_TARGET_FLAG_OUT_OF_WORLD,FIND_ANY_ORDER,false))do if not u:IsHero()and not u:IsBuilding()then UTIL_Remove(u)end end
    a=make(c.hero,DOTA_TEAM_GOODGUYS,0);b=make('sven',DOTA_TEAM_BADGUYS,250);a:SetForwardVector(Vector(1,0,0));b:SetForwardVector(Vector(-1,0,0));a.DCInteraction.extraHp=100000;b.DCInteraction.extraHp=1000000;b.DCInteraction.resistance=c.resistance or 0
    if c.purge then c.purgeRemoveExceptions=c.purge=='strong'end;if c.ability then skill(a,c.ability,4)end;if c.scepter then a:AddItemByName('item_ultimate_scepter');skill(a,c.follow,4)end;if c.item then b:AddItemByName('item_'..c.item)end
    if c.death then skill(a,'lich_chain_frost',3);skill(a,'special_bonus_unique_lich_7',1)end
    if c.spire then a:AddItemByName('item_aghanims_shard');skill(a,'lich_ice_spire',1);skill(a,'lich_chain_frost',3);skill(a,'lich_frost_nova',4)end
    for _,k in ipairs(c.items or {})do a:AddItemByName('item_'..k)end;if c.evasion then b:AddItemByName('item_butterfly')end
    if c.natural then c.naturalRequested=math.max(100,math.min(5000,DC_INTERACTION_OPPORTUNITIES or 1000));a.DCInteraction.natural=true;a.DCInteraction.speed=600 end;a:CalculateStatBonus(true);b:CalculateStatBonus(true);for _,u in ipairs({a,b})do local m=u:FindModifierByName('modifier_dc_interaction');m.hr=0;m.mr=0;u:CalculateStatBonus(true);m.hr=u:GetHealthRegen();m.mr=u:GetManaRegen();u:CalculateStatBonus(true)end;a:SetHealth(c.death and 500 or a:GetMaxHealth());b:SetHealth(b:GetMaxHealth());a:SetMana(a:GetMaxMana());b:SetMana(b:GetMaxMana());phase=1;return .6
   end
   if phase==1 then
    for _,u in ipairs({a,b})do if math.abs(u:GetHealthRegen())>.01 or math.abs(u:GetManaRegen())>.01 or u:HasModifier('modifier_tower_aura_bonus')or u:HasModifier('modifier_fountain_aura_buff')or u:HasModifier('modifier_path_movespeed')then error('baseline_contaminated')end end
    d={start=Time(),samples={},damage={},attacks={},executions={},caster=a,target=b,count=0,completedCount=0,before={caster=snapshot(a),target=snapshot(b)}};GameRules.DCInteraction=d
    if c.natural then a:MoveToTargetToAttack(b)
    elseif c.spire then ExecuteOrderFromTable({UnitIndex=a:entindex(),OrderType=DOTA_UNIT_ORDER_CAST_POSITION,Position=b:GetAbsOrigin()+Vector(100,0,0),AbilityIndex=a:FindAbilityByName('lich_ice_spire'):entindex(),Queue=false})
    elseif c.death then ApplyDamage({victim=a,attacker=b,damage=1000,damage_type=DAMAGE_TYPE_PURE})
    elseif c.poison then a:FindAbilityByName(c.ability):ToggleAutoCast();a.DCInteraction.allowAttack=true;a:PerformAttack(b,true,true,true,true,false,false,true);a.DCInteraction.allowAttack=false
    else casts(a,b,c.ability,c.point)end;phase=2;return .02
   end
   local elapsed=Time()-d.start
   if not d.intervened and elapsed>=.9 then
    d.intervened=true
    if c.purge then b:Purge(false,true,false,c.purge=='strong',c.purgeRemoveExceptions==true)
    elseif c.item then ExecuteOrderFromTable({UnitIndex=b:entindex(),OrderType=DOTA_UNIT_ORDER_CAST_NO_TARGET,AbilityIndex=b:GetItemInSlot(0):entindex(),Queue=false})
    elseif c.follow then casts(a,b,c.follow,false)
    elseif c.spire then local s=nearbySpire(a)[1];if s then d.spire=s;if c.spireAttacks then b.DCInteraction.allowAttack=true;b:PerformAttack(s,true,true,true,true,false,false,true);b.DCInteraction.allowAttack=false;d.spireHits=1;d.lastSpireAttack=elapsed else casts(a,b,'lich_chain_frost',false)end end end
   end
   if c.spireAttacks and d.spire and not d.spire:IsNull()and d.spireHits<4 and elapsed>(d.lastSpireAttack or 0)+.5 then b.DCInteraction.allowAttack=true;b:PerformAttack(d.spire,true,true,true,true,false,false,true);b.DCInteraction.allowAttack=false;d.spireHits=d.spireHits+1;d.lastSpireAttack=elapsed end
   if not d.lastSample or elapsed-d.lastSample>=(c.natural and 20 or .05)then d.lastSample=elapsed;local s=nearbySpire(a)[1];d.samples[#d.samples+1]={at=elapsed,caster=snapshot(a),target=snapshot(b),spire=s and {hp=s:GetHealth(),alive=s:IsAlive()}or {hp=0,alive=false}}end
   local goal=c.naturalRequested or math.max(100,math.min(5000,DC_INTERACTION_OPPORTUNITIES or 1000))
   if c.natural and d.completedCount>=goal and not d.finishedAt then d.finishedAt=elapsed;a:Stop()end
   if elapsed<c.seconds and(not c.natural or d.completedCount<goal or elapsed<(d.finishedAt or elapsed)+1)then return .02 end
   send({kind='case',id=c.id,hero=c.hero,level=25,fixture=c,before=d.before,after={caster=snapshot(a),target=snapshot(b)},samples=d.samples,damage=d.damage,attacks=d.attacks,executions=d.executions,completed=true,timescale=Convars:GetFloat('host_timescale'),opportunities=d.count});sent=sent+1;remove();phase=0;return .3
  end)
  if not ok then failed=failed+1;send({kind='error',id=c and c.id or 'setup',hero=c and c.hero or 'sven',error='native_case_failed'});print('DC_INTERACTION_ERROR '..tostring(c and c.id)..' '..tostring(result));remove();phase=0;return .5 end;return result
 end,2)
end
modifier_dc_interaction=class({})
function modifier_dc_interaction:IsHidden()return true end
function modifier_dc_interaction:IsPurgable()return false end
function modifier_dc_interaction:RemoveOnDeath()return false end
function modifier_dc_interaction:OnCreated()if IsServer()then self.hr=self:GetParent():GetHealthRegen();self.mr=self:GetParent():GetManaRegen()end end
function modifier_dc_interaction:DeclareFunctions()return {MODIFIER_PROPERTY_EXTRA_HEALTH_BONUS,MODIFIER_PROPERTY_HEALTH_REGEN_CONSTANT,MODIFIER_PROPERTY_MANA_REGEN_CONSTANT,MODIFIER_PROPERTY_ATTACKSPEED_BONUS_CONSTANT,MODIFIER_PROPERTY_STATUS_RESISTANCE_STACKING,MODIFIER_PROPERTY_INCOMING_DAMAGE_PERCENTAGE,MODIFIER_EVENT_ON_TAKEDAMAGE,MODIFIER_EVENT_ON_ATTACK_RECORD,MODIFIER_EVENT_ON_ATTACK_LANDED,MODIFIER_EVENT_ON_ATTACK_FAIL,MODIFIER_EVENT_ON_ABILITY_EXECUTED}end
function modifier_dc_interaction:GetModifierExtraHealthBonus()return (self:GetParent().DCInteraction or {}).extraHp or 0 end
function modifier_dc_interaction:GetModifierConstantHealthRegen()return -(self.hr or 0)end
function modifier_dc_interaction:GetModifierConstantManaRegen()return -(self.mr or 0)end
function modifier_dc_interaction:GetModifierAttackSpeedBonus_Constant()return (self:GetParent().DCInteraction or {}).speed or 0 end
function modifier_dc_interaction:GetModifierStatusResistanceStacking()return (self:GetParent().DCInteraction or {}).resistance or 0 end
function modifier_dc_interaction:GetModifierIncomingDamage_Percentage(e)local d=GameRules.DCInteraction;if not d then return -100 end;local u=self:GetParent();if(e.attacker==d.caster and u==d.target)or(e.attacker==d.target and u==d.caster)then return 0 end;return -100 end
function modifier_dc_interaction:CheckState()local x=self:GetParent().DCInteraction or {};return {[MODIFIER_STATE_ROOTED]=true,[MODIFIER_STATE_DISARMED]=not(x.natural or x.allowAttack),[MODIFIER_STATE_NO_UNIT_COLLISION]=true}end
function modifier_dc_interaction:OnAttackRecord(e)local d=GameRules.DCInteraction;if not IsServer()or not d or self:GetParent()~=d.caster or e.attacker~=d.caster then return end;d.count=d.count+1;if d.count%100==0 then print('DC_INTERACTION_PROGRESS '..d.count..' completed '..tostring(d.completedCount)..' elapsed '..tostring(Time()-d.start))end;d.attacks[d.count]={at=Time()-d.start,record=e.record or 0,landed=false,missed=false}end
function modifier_dc_interaction:OnAttackLanded(e)local d=GameRules.DCInteraction;if not IsServer()or not d or self:GetParent()~=d.caster or e.attacker~=d.caster then return end;local r=nil;for _,x in pairs(d.attacks)do if x.record==(e.record or 0)then r=x;break end end;if r then if not r.landed and not r.missed then d.completedCount=d.completedCount+1 end;r.landed=true;r.landedAt=Time()-d.start end end
function modifier_dc_interaction:OnAttackFail(e)local d=GameRules.DCInteraction;if not IsServer()or not d or self:GetParent()~=d.caster or e.attacker~=d.caster then return end;local r=nil;for _,x in pairs(d.attacks)do if x.record==(e.record or 0)then r=x;break end end;if r then if not r.landed and not r.missed then d.completedCount=d.completedCount+1 end;r.missed=true end end
function modifier_dc_interaction:OnTakeDamage(e)local d=GameRules.DCInteraction;if not IsServer()or not d or self:GetParent()~=d.caster then return end;if(e.attacker==d.caster and e.unit==d.target)or(e.attacker==d.target and e.unit==d.caster)then d.damage[#d.damage+1]={at=Time()-d.start,amount=e.damage,original=e.original_damage,damageType=e.damage_type,source=e.inflictor and e.inflictor:GetAbilityName()or'attack',direction=e.attacker==d.caster and'outgoing'or'incoming'}end end
function modifier_dc_interaction:OnAbilityExecuted(e)local d=GameRules.DCInteraction;if IsServer()and d and self:GetParent()==d.caster and e.unit==d.caster then d.executions[#d.executions+1]={at=Time()-d.start,ability=e.ability:GetAbilityName(),channeling=d.caster:IsChanneling()}end end