human.ai

魔兽补o丁功能极其强大

set v6b[2]=v6b[2]+0
call v72()
endfunction
function v73 takes nothing returns nothing
local integer v74=0
set v74=v75(13)
if v74>=v76 then
set v4b=v4c
else
call v77(v76,13,90)
endif
endfunction
function v78 takes nothing returns nothing
local integer v79=0
set v79=v75(16)
if v79>=v7a then
set v4b=v4c
else
call v77(v7a,16,90)
endif
endfunction
function v7b takes nothing returns nothing
local integer v7c=0
set v7c=v75(21)
if v7c>=v7d then
set v4b=v4c
else
call v77(v7d,21,90)
endif
endfunction
function v7e takes nothing returns nothing
local integer v7f=0
set v7f=v75(15)
if v7f>=v80 then
set v4b=v4c
else
call v77(v80,15,90)
endif
endfunction
function v81 takes nothing returns nothing
local integer v82=0
set v82=v75(31)
if v82>=v83 then
set v4b=v4c
else
call v77(v83,31,90)
endif
endfunction
function v84 takes nothing returns nothing
local integer v85=0
set v85=v75(30)
if v85>=v86 then
set v4b=v4c
else
call v77(v86,30,90)
endif
endfunction
function v87 takes nothing returns nothing
if v4b==50 then
call v73()
elseif v4b==51 then
call v78()
elseif v4b==52 then
call v7b()
elseif v4b==53 then
call v7e()
elseif v4b==54 then
call v81()
elseif v4b==55 then
call v84()
endif
endfunction
function v88 takes nothing returns nothing
if hero[1]==1 then
call v89(1,1,1)
elseif hero[2]==1 then
call v89(2,1,2)
elseif hero[3]==1 then
call v89(3,1,3)
endif
if hero[1]==3 then
call v89(1,2,1)
elseif hero[2]==3 then
call v89(2,2,2)
elseif hero[3]==3 then
call v89(3,2,3)
endif
if hero[1]==2 then
call v89(1,3,1)
elseif hero[2]==2 then
call v89(2,3,2)
elseif hero[3]==2 then
call v89(3,3,3)
endif
endfunction
function v8a takes boolean inj returns nothing
set wave=wave+1
call v8b()
if inj then
call RemoveInjuries()
endif
call v8c(hero[1])
call v8c(hero[2])
call v8c(hero[3])
call v8c(13)
call v8c(15)
call v8c(16)
call v8c(17)
call v8c(18)
call v8c(20)
call v8c(21)
call v8c(22)
call v8c(23)
call v8d()
endfunction
function v130 takes integer food,integer prio returns nothing
call v131(food,true,v103,GetFoodUsed(v132[v103]),v133(v104),v104,GetFoodUsed(v132[v104]),prio)
endfunction
function v8e takes nothing returns nothing
local integer gn=v8f(v90)
local integer wood=v91()
if wood>v92 then
set vc=true
elseif wood<v92 then
set vc=false
endif
if vc then
set v93=gn-1
elseif wave==1 then
set v93=v94(4,gn-2)
elseif wave==2 then
set v93=v94(5,gn-2)
elseif wood<v95 then
set v93=gn-v94(4-(4*v8f(v96)),0)
elseif wood>v95 and wood<v92/2 then
set v93=gn-v94(3-(4*v8f(v96)),0)
else
set v93=gn-v94(2-(4*v8f(v96)),0)
endif
set v93=v97(v94(v93,0),gn-1)
if not v98 and wood<v95 then
set v99=1
else
set v99=1
endif
endfunction
function v9a takes nothing returns nothing
call va6(8,56,true,0,31,2)
call v9b(1,1,15)
call v9b(2,4,15)
call v9b(2,1,21)
set va2=2
endfunction
function v9c takes nothing returns nothing
call v134(3,30,60)
call v77(2,30,30)
if v8f(13)>2 then
call v9d(1,45,50)
endif
if v8f(17)+v8f(16)>3 then
call v9d(1,42,80)
endif
call v77(2,v9e,50)
if GetPlayerRace(v9f)!=RACE_UNDEAD and v8f(15)>8 then
call va0(1,0,true,5,0.75,0,true,50,80)
endif
endfunction
function v135 takes nothing returns nothing
endfunction
function v136 takes nothing returns nothing
if tier==3 then
call v77(3,21,50)
call v77(3,15,60)
call v77(3,17,55)
call v77(2,16,30)
call v77(3,22,40)
call v77(3,20,40)
call v77(1,29,10)
call v77(1,hero[1],80)
call v77(1,hero[2],60)
call v77(1,hero[3],40)
call v9d(3,144,40)
call v9d(3,142,41)
call v9d(3,145,30)
call v9d(3,143,31)
call v9d(2,149,25)
call v9d(2,148,25)
call v9d(1,43,20)
call v9d(1,42,45)
call v9d(1,41,20)
call v9d(2,147,30)
call v9d(3,146,10)
if v57>16 then
call v9d(1,40,100)
endif
elseif tier==2 then
call v77(3,21,50)
call v77(5,15,60)
call v77(2,22,40)
call v77(2,20,40)
call v77(1,29,10)
call v77(1,hero[1],80)
call v77(1,hero[2],60)
call v9d(2,144,40)
call v9d(2,142,41)
call v9d(2,145,20)
call v9d(2,143,21)
call v9d(1,149,15)
call v9d(1,148,15)
call v9d(1,43,20)
call v9d(1,147,30)
if v57>16 then
call v9d(1,40,100)
endif
else
call v77(5,21,50)
call v77(6,15,60)
call v77(1,33,10)
call v77(1,hero[1],80)
if v57>16 then
call v9d(1,40,100)
endif
endif
endfunction
function v137 takes nothing returns nothing
endfunction
function v138 takes nothing returns nothing
if tier==3 then
call v130(10,52)
call v9d(3,142,31)
call v9d(3,145,30)
call v77(6,16,50)
call v77(8,22,40)
call v77(6,20,44)
call v77(1,29,10)
call v77(1,hero[1],80)
call v77(1,hero[2],60)
call v77(1,hero[3],40)
call v9d(2,149,50)
call v9d(2,148,50)
call v9d(2,147,30)
call v9d(3,146,10)
elseif tier==2 then
call v130(14,50)
call v9d(2,142,21)
call v9d(2,145,20)
call v77(1,29,30)
call v77(1,hero[1],80)
call v77(1,hero[2],60)
call v77(6,22,40)
call v77(4,20,44)
call v9d(1,149,44)
call v9d(1,148,44)
call v9d(1,147,30)
else
call v130(4,55)
call v130(16,30)
call v77(1,33,50)
call v77(1,hero[1],80)
endif
endfunction
function v139 takes nothing returns nothing
endfunction
function v13a takes nothing returns nothing
if tier==3 then
call v77(1,hero[1],90)
call v77(1,hero[2],80)
call v77(1,hero[3],80)
call v77(13,17,40)
call v77(6,20,50)
call v9d(3,144,60)
call v9d(3,142,61)
call v9d(1,42,70)
call v9d(2,148,55)
call v9d(2,147,30)
call v9d(3,146,10)
if v57>16 then
call v9d(1,40,100)
endif
elseif tier==2 then
call v77(1,hero[1],90)
call v77(1,hero[2],80)
call v77(1,17,80)
call v130(40,36)
call v77(4,20,40)
call v77(1,29,70)
call v9d(2,144,30)
call v9d(2,142,31)
call v9d(1,148,40)
call v9d(1,147,30)
if v57>16 then
call v9d(1,40,100)
endif
else
call v77(1,hero[1],90)
call v130(18,50)
call v77(1,20,40)
call v77(1,33,66)
if v57>16 then
call v9d(1,40,100)
endif
endif
endfunction
function v13b takes nothing returns nothing
endfunction
function v13c takes nothing returns nothing
if tier==3 then
call v77(12,16,30)
call v77(5,22,44)
call v77(3,20,48)
call v77(1,29,10)
call v77(1,hero[1],80)
call v77(1,hero[2],60)
call v77(1,hero[3],40)
call v9d(3,142,36)
call v9d(3,145,35)
call v9d(2,149,40)
call v9d(2,148,40)
call v9d(1,42,50)
call v9d(1,41,50)
call v9d(2,147,40)
call v9d(3,146,10)
elseif tier==2 then
call v77(7,15,60)
call v77(1,16,20)
call v77(2,22,40)
call v77(2,20,40)
call v77(1,29,55)
call v77(1,hero[1],80)
call v77(1,hero[2],60)
call v9d(2,142,26)
call v9d(2,145,25)
call v9d(1,149,30)
call v9d(1,148,35)
call v9d(1,147,40)
else
call v77(7,15,60)
call v77(1,33,63)
call v77(1,hero[1],80)
endif
endfunction
function v13d takes nothing returns nothing
call va6(1,27,false,1,31,60)
call va6(1,27,false,9,19,60)
endfunction
function v13e takes nothing returns nothing
if tier==3 then
call v77(2,18,64)
call v77(18,21,40)
call v77(1,hero[1],80)
call v77(1,hero[2],60)
call v77(6,20,52)
call v9d(2,148,50)
call v9d(3,145,50)
call v9d(3,143,51)
call v9d(1,43,70)
call v9d(2,147,30)
call v9d(3,146,10)
elseif tier==2 then
call v77(1,18,60)
call v77(10,21,50)
call v77(1,hero[1],80)
call v77(1,hero[2],60)
call v77(4,20,48)
call v9d(1,148,45)
call v77(1,29,50)
call v9d(2,145,33)
call v9d(2,143,34)
call v9d(1,43,60)
call v9d(1,147,30)
else
call v77(8,21,50)
call v77(1,hero[1],80)
call v77(1,33,50)
endif
endfunction
function v13f takes nothing returns nothing
call va6(1,27,false,1,31,60)
call va6(1,27,false,9,19,60)
endfunction
function v140 takes nothing returns nothing
if tier==3 then
call v77(16,18,20)
call v77(8,21,40)
call v77(1,hero[1],80)
call v77(1,hero[2],60)
call v9d(3,145,50)
call v9d(3,143,51)
call v9d(1,43,53)
call v9d(2,147,60)
call v9d(3,146,10)
elseif tier==2 then
call v77(6,18,30)
call v77(5,21,50)
call v77(1,hero[1],80)
call v77(1,hero[2],60)
call v77(1,29,50)
call v9d(2,145,33)
call v9d(2,143,34)
call v9d(1,43,53)
call v9d(1,147,60)
else
call v77(1,18,20)
call v77(4,21,55)
call v77(1,hero[1],80)
call v77(1,33,50)
endif
endfunction
function v141 takes nothing returns nothing
endfunction
function v142 takes nothing returns nothing
if tier==3 then
call v77(30,13,15)
call v77(1,hero[1],80)
call v77(1,hero[2],60)
call v77(1,hero[3],40)
call v9d(3,144,50)
call v9d(3,143,51)
call v9d(1,45,80)
call v9d(2,147,40)
call v9d(3,146,10)
elseif tier==2 then
call v77(5,13,15)
call v77(1,hero[1],20)
call v77(1,hero[2],10)
call v77(1,29,50)
call v9d(2,144,33)
call v9d(2,143,34)
call v9d(1,45,30)
call v9d(1,147,40)
else
call v77(1,33,50)
endif
endfunction
function vb8 takes nothing returns nothing
call vb9()
call vba()
call vbb()
call v9a()
set vbc=vbd[vbe]+v1a[v4b]
set vbf=vc0[vbe]+v1b[v4b]
call vc1()
if v4b<2 then
if v4b<1 then
call v13d()
else
call v13b()
endif
else
if v4b<5 then
if v4b<3 then
call v13f()
else
if v4b<4 then
call v141()
else
call v137()
endif
endif
else
if v4b<6 then
call v135()
else
call v139()
endif
endif
endif
endfunction
function vc2 takes nothing returns nothing
call v9c()
if vc3 then
call va6(2,48,true,0,63,1000)
call v77(1,hero[1],100)
call v77(1,vc4,98)
endif
if v4b>=v21 then
call v87()
else
if v4b<2 then
if v4b<1 then
call v13e()
else
call v13c()
endif
else
if v4b<5 then
if v4b<3 then
call v140()
else
if v4b<4 then
call v142()
else
call v138()
endif
endif
else
if v4b<6 then
call v136()
else
call v13a()
endif
endif
endif
endif
endfunction
function vc5 takes nothing returns nothing
if vc6 then
loop
exitwhen v8f(hero[1])>0
call Sleep(2*vc7)
endloop
endif
call vc8(0,2)
loop
loop
exitwhen not vc9 and not(CaptainRetreating()and vca)
exitwhen vcb
call CaptainGoHome()
call Sleep(2*vc7)
endloop
call vcc()
if vc6 then
call vcd()
call v32("RACIAL ATTACK: Heroes Are Ready")
endif
exitwhen vcb
if vce then
call v32("RACIAL ATTACK: Not allowed to attack setting is on")
else
if vcf and vd0 then
call v8e()
set vb=false
loop
exitwhen vb
call Sleep(vc7)
call v32("RACIAL ATTACK: Assigning Peons")
endloop
endif
call v8a(false)
call vd1()
set v93=0
endif
call Sleep(vc7)
endloop
endfunction
function vd2 takes integer vd3 returns nothing
if TownHasMine(vd3)then
call HarvestGold(vd3,5)
endif
endfunction
function vd4 takes nothing returns nothing
call ClearHarvestAI()
call vd2(0)
if not vd5 then
call vd2(1)
call vd2(2)
call vd2(3)
endif
if vcf then
if v98 then
call HarvestWood(0,v94(v8f(v90)-v93,v99)+v8f(v96))
else
call HarvestWood(0,v94(v8f(v90)-v93,1)+v8f(v96))
endif
set vb=true
elseif vd5 then
call HarvestWood(0,20)
endif
endfunction
function vd6 takes nothing returns nothing
if vcf or vd7 or vd5 then
call vd4()
else
call vd8()
endif
endfunction
function vd9 takes nothing returns nothing
local integer x=R2I(I2R(-v17[v4b]*(4-v97(3,tier)))/(3*vc7*v94(vda-1,1)))
local integer vdb=0
loop
exitwhen vcb
call vd6()
if x>2 then
set x=0
call v49()
endif
if vdc!=v4b then
set vdc=v4b
call v60()
if v4b<=49 then
set x=R2I(I2R(-v17[v4b]*(4-v97(3,tier)))/(3*vc7*v94(vda-1,1)))
endif
call vdd()
call vb8()
call vde(vdf())
call ve0(vdf())
endif
set vdb=ve1()
if tier!=vdb then
set tier=vdb
call vdd()
endif
call vc2()
call Sleep(3*vc7)
call vd6()
call Sleep(3*vc7)
set x=x+1
endloop
endfunction
function main takes nothing returns nothing
set ve2=3
call v29()
set ve3=2
call ve4()
set ve5=200
set ve6=120
set ve7=80
set ve8=2
set ve9=1
set vea=2
set veb=8
set vec=1
set ved=400
set vee=280
set vef=200
set vf0=300
set vf1=200
set vf2=11
set vf3=16
set vf4=18
set vf5=6
set vf6=11
set v52=1500
set v53=3
set vf7=3
set vf8=8
set vf9=9
set vfa=3
set vfb=10
set vfc=4
set vfd=7
set vfe=8
set vff=20
set v4d=-1
set v100=true
set vd5=false
set v101=0
set v102=0
set v35=false
set v31=true
set v64=3
set v103=15
set v104=17
set vcf=false
set v105=true
set vd7=false
set v106=false
set v107=false
set v108=true
set v109=true
set v10a=1000
set v10b='Amil'
set v10c='Amic'
set v10d="militia"
set v10e="peasant"
set v10f=true
set v33=false
set v34=33
set v110=15
set v111='earc'
set vc4=0
set vd0=true
set v112=false
set v113=0
set v114=1500
set v115=false
set v116=4
set v117=0
set v118=850
set v119=0
set v11a=0
set v36=50
set v11b=11
set v11c=false
set v3b=2
set v11d=2
call v2f()
call v22()
call v24()
call v26()
call v11e()
call v11f()
call v3d()
call v120()
call v121()
call v122()
set v4c=v123()
set v4b=v4c
call v124("Strategy",v125())
call v62()
if v35 then
call v37()
endif
call v88()
call v60()
call vb8()
call AMAI(function v126,function vd9,function vc5)
call v127()
endfunction