📄 undead.ai
字号:
if v4c[4]>0 then
set v71[0]=v71[0]+0
set v71[1]=v71[1]+0
set v71[2]=v71[2]+0
set v71[3]=v71[3]+0
set v71[4]=v71[4]+0
set v71[5]=v71[5]+0
set v71[6]=v71[6]+0
set v71[7]=v71[7]+0
set v71[8]=v71[8]+0
set v71[9]=v71[9]+0
set v71[10]=v71[10]+0
set v71[11]=v71[11]+0
endif
set v71[0]=v71[0]+-20
set v71[1]=v71[1]+-14
set v71[2]=v71[2]+-18
set v71[3]=v71[3]+-8
set v71[4]=v71[4]+-10
set v71[5]=v71[5]+-5
set v71[6]=v71[6]+-19
set v71[7]=v71[7]+-3
set v71[8]=v71[8]+20
set v71[9]=v71[9]+-10
set v71[10]=v71[10]+10
set v71[11]=v71[11]+-10
set v75=v76()
set v71[0]=v71[0]--20
set v71[1]=v71[1]--14
set v71[2]=v71[2]--18
set v71[3]=v71[3]--8
set v71[4]=v71[4]--10
set v71[5]=v71[5]--5
set v71[6]=v71[6]--19
set v71[7]=v71[7]--3
set v71[8]=v71[8]-20
set v71[9]=v71[9]--10
set v71[10]=v71[10]-10
set v71[11]=v71[11]--10
set v71[0]=v71[0]+-7
set v71[1]=v71[1]+-5
set v71[2]=v71[2]+-6
set v71[3]=v71[3]+-3
set v71[4]=v71[4]+-3
set v71[5]=v71[5]+-2
set v71[6]=v71[6]+-6
set v71[7]=v71[7]+-1
set v71[8]=v71[8]+0
set v71[9]=v71[9]+10
set v71[10]=v71[10]+0
set v71[11]=v71[11]+0
call v74(v23[v51],v24[v51])
call v77()
set v71[0]=v71[0]--7
set v71[1]=v71[1]--5
set v71[2]=v71[2]--6
set v71[3]=v71[3]--3
set v71[4]=v71[4]--3
set v71[5]=v71[5]--2
set v71[6]=v71[6]--6
set v71[7]=v71[7]--1
set v71[8]=v71[8]-0
set v71[9]=v71[9]-10
set v71[10]=v71[10]-0
set v71[11]=v71[11]-0
set v71[0]=v71[0]+0
set v71[1]=v71[1]+0
set v71[2]=v71[2]+0
set v71[3]=v71[3]+0
set v71[4]=v71[4]+0
set v71[5]=v71[5]+0
set v71[6]=v71[6]+0
set v71[7]=v71[7]+0
set v71[8]=v71[8]+0
set v71[9]=v71[9]+15
set v71[10]=v71[10]+0
set v71[11]=v71[11]+0
call v78()
endfunction
function v79 takes nothing returns nothing
local integer v7a=0
set v7a=v7b(155)
if v7a>=v7c then
set v51=v52
else
call v7d(v7c,155,90)
endif
endfunction
function v7e takes nothing returns nothing
local integer v7f=0
set v7f=v7b(154)
if v7f>=v80 then
set v51=v52
else
call v7d(v80,154,90)
endif
endfunction
function v81 takes nothing returns nothing
local integer v82=0
set v82=v7b(152)
if v82>=v83 then
set v51=v52
else
call v7d(v83,152,90)
endif
endfunction
function v84 takes nothing returns nothing
local integer v85=0
set v85=v7b(157)
if v85>=v86 then
set v51=v52
else
call v7d(v86,157,90)
endif
endfunction
function v87 takes nothing returns nothing
local integer v88=0
set v88=v7b(176)
if v88>=v89 then
set v51=v52
else
call v7d(v89,176,90)
endif
endfunction
function v8a takes nothing returns nothing
local integer v8b=0
set v8b=v7b(177)
if v8b>=v8c then
set v51=v52
else
call v7d(v8c,177,90)
endif
endfunction
function v8d takes nothing returns nothing
if v51==50 then
call v79()
elseif v51==51 then
call v7e()
elseif v51==52 then
call v81()
elseif v51==53 then
call v84()
elseif v51==54 then
call v87()
elseif v51==55 then
call v8a()
endif
endfunction
function v8e takes nothing returns nothing
if hero[1]==343 then
call v8f(1,1,1)
elseif hero[2]==343 then
call v8f(2,1,2)
elseif hero[3]==343 then
call v8f(3,1,3)
endif
if hero[1]==344 then
call v8f(1,2,1)
elseif hero[2]==344 then
call v8f(2,2,2)
elseif hero[3]==344 then
call v8f(3,2,3)
endif
if hero[1]==345 then
call v8f(1,3,1)
elseif hero[2]==345 then
call v8f(2,3,2)
elseif hero[3]==345 then
call v8f(3,3,3)
endif
if hero[1]==346 then
call v8f(1,4,1)
elseif hero[2]==346 then
call v8f(2,4,2)
elseif hero[3]==346 then
call v8f(3,4,3)
endif
if hero[1]==347 then
call v8f(1,5,1)
elseif hero[2]==347 then
call v8f(2,5,2)
elseif hero[3]==347 then
call v8f(3,5,3)
endif
if hero[1]==348 then
call v8f(1,6,1)
elseif hero[2]==348 then
call v8f(2,6,2)
elseif hero[3]==348 then
call v8f(3,6,3)
endif
if hero[1]==350 then
call v8f(1,7,1)
elseif hero[2]==350 then
call v8f(2,7,2)
elseif hero[3]==350 then
call v8f(3,7,3)
endif
if hero[1]==351 then
call v8f(1,8,1)
elseif hero[2]==351 then
call v8f(2,8,2)
elseif hero[3]==351 then
call v8f(3,8,3)
endif
if hero[1]==140 then
call v8f(1,9,1)
elseif hero[2]==140 then
call v8f(2,9,2)
elseif hero[3]==140 then
call v8f(3,9,3)
endif
if hero[1]==141 then
call v8f(1,10,1)
elseif hero[2]==141 then
call v8f(2,10,2)
elseif hero[3]==141 then
call v8f(3,10,3)
endif
if hero[1]==142 then
call v8f(1,11,1)
elseif hero[2]==142 then
call v8f(2,11,2)
elseif hero[3]==142 then
call v8f(3,11,3)
endif
if hero[1]==143 then
call v8f(1,12,1)
elseif hero[2]==143 then
call v8f(2,12,2)
elseif hero[3]==143 then
call v8f(3,12,3)
endif
endfunction
function v90 takes boolean inj returns nothing
set wave=wave+1
call v91()
if inj then
call RemoveInjuries()
endif
call v92(hero[1])
call v92(hero[2])
call v92(hero[3])
call v92(148)
call v92(150)
call v92(151)
call v92(152)
call v92(153)
call v92(154)
call v92(155)
call v92(157)
call v92(158)
call v92(159)
call v92(163)
call v92(164)
call v92(165)
call v92(181)
call v92(182)
call v92(183)
call v92(349)
call v92(352)
call v92(353)
call v92(354)
call v93()
endfunction
function v94 takes nothing returns nothing
local integer gn=v95(v96)
local integer wood=v97()
if wood>v98 then
set v11=true
elseif wood<v98 then
set v11=false
endif
if v11 then
set v99=gn-1
elseif wave==1 then
set v99=v9a(4,gn-2)
elseif wave==2 then
set v99=v9a(5,gn-2)
elseif wood<v9b then
set v99=gn-v9a(4-(4*v95(v9c)),0)
elseif wood>v9b and wood<v98/2 then
set v99=gn-v9a(3-(4*v95(v9c)),0)
else
set v99=gn-v9a(2-(4*v95(v9c)),0)
endif
set v99=v9d(v9a(v99,0),gn-1)
if not v9e and wood<v9b then
set v9f=1
else
set v9f=1
endif
endfunction
function va0 takes nothing returns nothing
call va1(1,167,true,0,180,36)
call va1(1,173,true,0,180,36)
call va1(2,157,false,0,180,36)
call va1(1,170,false,0,180,36)
call va1(8,93,true,0,176,2)
call va2(1,1,157)
call va2(2,2,157)
call va2(5,3,155)
endfunction
function va3 takes nothing returns nothing
if v7b(157)==0 and v97()<500 then
call v7d(1,157,260)
endif
call v14f(1,178,40)
call va4(2,177,90)
call v1a3(1,178,0,8000,0,80)
call v1a3(1,179,0,7500,0,30)
call v1a3(1,170,7600,20000,0,90)
if v150()<5000 then
call v7d(2,178,70)
endif
if tier==1 then
call va6(1,408,100)
endif
if tier==3 then
call va6(1,397,80)
else
call va6(1,406,50)
endif
call va6(1,407,40)
call va6(1,412,50)
call va6(1,411,35)
if tier>1 then
call va6(1,383,60)
call va6(1,385,150)
elseif hero[1]==140 then
call va6(1,404,70)
endif
if v150()<10000 then
call v7d(1,178,70)
endif
call va7(1,194,1,v95(152),4,0,0,10)
call va7(1,185,1,v95(157)+v95(148),6,-2,1,8)
call va7(1,191,1,v95(148),4,0,0,5)
call va7(1,195,1,v95(158),3,0,0,8)
if tier==1 then
endif
call va7(3,196,1,v95(157)+v95(148)+v95(158),10,-3,2,6)
call va7(3,198,1,v95(157)+v95(148),10,-3,2,4)
call va7(3,197,1,v95(152)+v95(155)+v95(154)+v95(165),10,-3,2,6)
call va7(1,199,1,v95(152)+v95(155)+v95(154)+v95(165),10,-3,2,4)
if tier==2 then
endif
call va7(1,187,2,v95(152),3,0,2,8)
call va7(2,200,2,v95(159),5,-2,2,8)
call va7(1,190,2,v95(159),5,-2,2,6)
call va7(2,201,2,v95(150),5,-2,2,8)
if tier==3 then
endif
call va7(1,188,3,v95(155),4,0,0,10)
call va7(1,193,3,v95(163),3,0,0,10)
call va7(1,189,3,v95(154),2,0,0,12)
call va7(1,192,3,v95(159),5,0,0,10)
call v7d(2,v1a4,40)
call va9(2,0,true,9,0.75,0,GetPlayerRace(vaa)!=RACE_UNDEAD and v95(157)>10,50,120)
call va9(1,0,true,6,0.75,0,GetPlayerRace(vaa)==RACE_NIGHTELF and v95(157)>1,10,80)
call va9(5,0,true,9,0.75,0,GetPlayerRace(vaa)!=RACE_UNDEAD and v95(155)>8,80,120)
endfunction
function v1a5 takes nothing returns nothing
call va2(3,4,157)
call va2(3,2,152)
set vac=3
endfunction
function v1a6 takes nothing returns nothing
if tier==3 then
call v7d(4,159,55)
call v7d(2,150,40)
call v7d(2,148,50)
call v7d(6,157,55)
call v7d(2,157,90)
call v7d(4,155,50)
call v7d(3,152,45)
call v7d(2,154,20)
call v7d(2,158,20)
call v7d(1,hero[1],80)
call v7d(1,hero[2],60)
call v7d(1,hero[3],40)
call v7d(3,165,500)
call v7d(2,163,65)
call vae(2,200,40)
call vae(2,201,25)
call vae(1,186,45)
call vae(1,189,15)
call vae(1,185,45)
call vae(1,190,40)
call vae(1,192,40)
call vae(3,198,40)
call vae(3,196,41)
call vae(3,199,35)
call vae(3,197,36)
call vae(1,194,40)
call v7d(1,180,45)
call v7d(1,129,50)
elseif tier==2 then
call v7d(3,159,55)
call v7d(2,150,40)
call v7d(2,163,55)
call v7d(3,152,45)
call v7d(8,157,55)
call v7d(2,157,90)
call v7d(1,hero[1],80)
call v7d(1,hero[2],60)
call v7d(1,171,10)
call vae(1,200,40)
call vae(1,201,25)
call vae(1,185,45)
call vae(1,190,40)
call vae(1,194,40)
call vae(2,198,30)
call vae(2,196,31)
call vae(2,199,5)
call vae(2,197,6)
call v7d(1,180,45)
else
call v7d(7,157,55)
call v7d(3,157,90)
call v7d(1,hero[1],80)
call v7d(1,170,20)
call vae(1,185,45)
call v7d(1,180,55)
endif
endfunction
function v1a7 takes nothing returns nothing
call va1(1,170,false,1,176,60)
call va2(3,4,157)
call va2(3,2,152)
set vac=3
endfunction
function v1a8 takes nothing returns nothing
if tier==3 then
call v7d(2,157,90)
call v7d(8,152,50)
call v7d(2,163,55)
call v7d(7,154,50)
call v7d(1,hero[1],80)
call v7d(1,hero[2],60)
call v7d(1,hero[3],40)
call v7d(1,180,45)
elseif tier==2 then
call v7d(2,157,90)
call v7d(2,163,55)
call v7d(8,152,50)
call v7d(1,hero[1],80)
call v7d(1,hero[2],60)
call v7d(1,171,50)
call v7d(1,172,45)
call v7d(1,180,45)
else
call v7d(3,157,90)
call v7d(8,152,42)
call v7d(1,hero[1],80)
call v7d(1,170,50)
endif
endfunction
function v1a9 takes nothing returns nothing
call va2(3,4,157)
call va2(3,2,159)
set vac=3
endfunction
function v1aa takes nothing returns nothing
if tier==3 then
call v7d(18,159,55)
call v7d(5,148,50)
call v7d(1,165,50)
call v7d(2,163,55)
call v7d(2,157,90)
call v7d(1,hero[1],80)
call v7d(1,hero[2],60)
call v7d(1,180,45)
elseif tier==2 then
call v7d(12,159,55)
call v7d(6,157,55)
call v7d(2,163,55)
call v7d(2,157,90)
call v7d(1,hero[1],80)
call v7d(1,hero[2],60)
call v7d(1,171,10)
call v7d(1,180,45)
else
call v7d(3,157,90)
call v7d(8,157,42)
call v7d(1,hero[1],80)
call v7d(1,170,50)
endif
endfunction
function v1ab takes nothing returns nothing
call va2(3,4,157)
call va2(3,2,150)
set vac=3
endfunction
function v1ac takes nothing returns nothing
if tier==3 then
call v7d(18,150,50)
call v7d(5,148,50)
call v7d(1,165,50)
call v7d(2,163,55)
call v7d(2,157,90)
call v7d(1,hero[1],80)
call v7d(1,hero[2],60)
call v7d(1,180,45)
elseif tier==2 then
call v7d(12,150,50)
call v7d(2,163,55)
call v7d(6,157,55)
call v7d(2,157,90)
call v7d(1,hero[1],80)
call v7d(1,hero[2],60)
call v7d(1,171,10)
call v7d(1,180,45)
else
call v7d(3,157,90)
call v7d(8,157,42)
call v7d(1,hero[1],80)
call v7d(1,170,50)
endif
endfunction
function v1ad takes nothing returns nothing
call va2(3,6,157)
set vac=3
endfunction
function v1ae takes nothing returns nothing
if tier==3 then
call v7d(35,157,45)
call v7d(2,163,65)
call v7d(2,157,90)
call v7d(1,hero[1],80)
call v7d(1,hero[2],70)
call v7d(1,hero[3],60)
call v7d(1,180,45)
elseif tier==2 then
call v7d(24,157,35)
call v7d(2,163,65)
call v7d(2,157,90)
call v7d(1,hero[1],80)
call v7d(1,hero[2],60)
call v7d(1,171,50)
call v7d(1,180,45)
else
call v7d(16,157,35)
call v7d(3,157,90)
call v7d(1,hero[1],80)
call v7d(1,170,50)
endif
endfunction
function v1af takes nothing returns nothing
call va2(3,4,152)
call va2(3,3,157)
set vac=3
endfunction
function v1b0 takes nothing returns nothing
if tier==3 then
call v7d(20,152,55)
call v7d(2,163,65)
call v7d(6,157,45)
call v7d(2,157,90)
call v7d(1,hero[1],80)
call v7d(1,hero[2],70)
call v7d(1,hero[3],60)
call v7d(1,180,45)
call v7d(1,129,50)
elseif tier==2 then
call v7d(14,152,45)
call v7d(2,163,65)
call v7d(6,157,55)
call v7d(2,157,90)
call v7d(1,hero[1],80)
call v7d(1,hero[2],60)
call v7d(1,180,45)
call v7d(1,129,50)
else
call v7d(1,vaf,60)
call v7d(3,157,90)
call v7d(8,152,42)
call v7d(1,hero[1],80)
call v7d(1,170,50)
endif
endfunction
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -