

Greets
Spoiler:
Code: Select all
function KW takes nothing returns nothing
local player p=GetTriggerPlayer()
local integer id=(1+GetPlayerId(p))
local integer i=1
local integer hk=0
local real Kx
local integer KX=0
local real Ky=(GetPlayerScore(p,PLAYER_SCORE_UNITS_KILLED)*Bw[id])*(1.+(ck/17))
local real KY=I2R(AQ)*(1.-(ck/19))
if F<1 or AO[id]>3 or(aN==2 and B9==false)then
return
endif
set AO[id]=AO[id]+1
set Kx=(Ky/(I2R(AJ[id])+.01))
if b5 then
set Kx=Kx*1.2
set Ky=Ky*1.1
set KY=KY*.95
endif
if GetLocalPlayer()==p then
call MultiboardMinimize(aG,false)
endif
if bJ[id]==false and aN==1 and aA>1 then
if GetStoredInteger(Ak,I2S(id),"1")!=7 and BQ[(id*'d')+1]==0 then
if(Ky>=225 and Kx>7.)or ck>3 then
set BQ[(id*'d')+1]=1
call StoreInteger(Ak,I2S(id),"1",GetStoredInteger(Ak,I2S(id),"1")+1)
elseif GetRandomInt(1,7-KX)==1 then
call StoreInteger(Ak,I2S(id),"1",GetStoredInteger(Ak,I2S(id),"1")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"2")!=7 and BQ[(id*'d')+2]==0 then
if(Ky>=300 and Kx>10.)or ck>3 then
set BQ[(id*'d')+2]=1
call StoreInteger(Ak,I2S(id),"2",GetStoredInteger(Ak,I2S(id),"2")+1)
elseif GetRandomInt(1,6-KX)==1 then
call StoreInteger(Ak,I2S(id),"2",GetStoredInteger(Ak,I2S(id),"2")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"3")!=7 and BQ[(id*'d')+3]==0 then
if Ky>=350 and Kx>14. and ck>0 then
set BQ[(id*'d')+3]=1
call StoreInteger(Ak,I2S(id),"3",GetStoredInteger(Ak,I2S(id),"3")+1)
elseif GetRandomInt(1,5-KX)==1 then
call StoreInteger(Ak,I2S(id),"3",GetStoredInteger(Ak,I2S(id),"3")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"4")!=7 and BQ[(id*'d')+4]==0 then
if Ky>=400 and Kx>15. and ck>1 then
set BQ[(id*'d')+4]=1
call StoreInteger(Ak,I2S(id),"4",GetStoredInteger(Ak,I2S(id),"4")+1)
elseif GetRandomInt(1,5-KX)==1 then
call StoreInteger(Ak,I2S(id),"4",GetStoredInteger(Ak,I2S(id),"4")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"5")!=7 and BQ[(id*'d')+5]==0 then
if Ky>=425 and Kx>16. and ck>2 then
set BQ[(id*'d')+5]=1
call StoreInteger(Ak,I2S(id),"5",GetStoredInteger(Ak,I2S(id),"5")+1)
elseif GetRandomInt(1,5-KX)==1 then
call StoreInteger(Ak,I2S(id),"5",GetStoredInteger(Ak,I2S(id),"5")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"10")<6 and BQ[(id*'d')+10]==0 then
if Ky>=450 and Kx>16. and AP[4]and ck>2 then
set BQ[(id*'d')+10]=1
call StoreInteger(Ak,I2S(id),"10",GetStoredInteger(Ak,I2S(id),"10")+1)
elseif GetRandomInt(1,5-KX)==1 then
call StoreInteger(Ak,I2S(id),"10",GetStoredInteger(Ak,I2S(id),"10")-1)
endif
elseif GetStoredInteger(Ak,I2S(id),"10")==7 then
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"6")!=7 and BQ[(id*'d')+6]==0 then
if(AP[1]and KY<20)or ck>3 then
set BQ[(id*'d')+6]=1
call StoreInteger(Ak,I2S(id),"6",GetStoredInteger(Ak,I2S(id),"6")+1)
elseif GetRandomInt(1,9-KX)==1 then
call StoreInteger(Ak,I2S(id),"6",GetStoredInteger(Ak,I2S(id),"6")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"7")!=7 and BQ[(id*'d')+7]==0 then
if(AP[2]and KY<15)or ck>3 then
set BQ[(id*'d')+7]=1
call StoreInteger(Ak,I2S(id),"7",GetStoredInteger(Ak,I2S(id),"7")+1)
elseif GetRandomInt(1,7-KX)==1 then
call StoreInteger(Ak,I2S(id),"7",GetStoredInteger(Ak,I2S(id),"7")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"8")!=7 and BQ[(id*'d')+8]==0 then
if AP[3]and KY<15 and ck>1 then
set BQ[(id*'d')+8]=1
call StoreInteger(Ak,I2S(id),"8",GetStoredInteger(Ak,I2S(id),"8")+1)
elseif GetRandomInt(1,7-KX)==1 then
call StoreInteger(Ak,I2S(id),"8",GetStoredInteger(Ak,I2S(id),"8")-1)
endif
else
set hk=hk+1
endif
if GetStoredInteger(Ak,I2S(id),"9")!=7 and BQ[(id*'d')+9]==0 then
if AP[4]and KY<15 and ck>2 then
set BQ[(id*'d')+9]=1
call StoreInteger(Ak,I2S(id),"9",GetStoredInteger(Ak,I2S(id),"9")+1)
elseif GetRandomInt(1,7-KX)==1 then
call StoreInteger(Ak,I2S(id),"9",GetStoredInteger(Ak,I2S(id),"9")-1)
If its too long then just help me translate this part enough (i tried reading it but .... stucked


Spoiler:
Code: Select all
local player p=GetTriggerPlayer()
local integer id=(1+GetPlayerId(p))
local integer i=1
local integer hk=0
local real Kx
local integer KX=0
local real Ky=(GetPlayerScore(p,PLAYER_SCORE_UNITS_KILLED)*Bw[id])*(1.+(ck/17))
local real KY=I2R(AQ)*(1.-(ck/19))
if F<1 or AO[id]>3 or(aN==2 and B9==false)then
return
endif
set AO[id]=AO[id]+1
set Kx=(Ky/(I2R(AJ[id])+.01))
if b5 then
set Kx=Kx*1.2
set Ky=Ky*1.1
set KY=KY*.95
endif
if GetLocalPlayer()==p then
call MultiboardMinimize(aG,false)
endif
if bJ[id]==false and aN==1 and aA>1 then
if GetStoredInteger(Ak,I2S(id),"1")!=7 and BQ[(id*'d')+1]==0 then
if(Ky>=225 and Kx>7.)or ck>3 then
set BQ[(id*'d')+1]=1
call StoreInteger(Ak,I2S(id),"1",GetStoredInteger(Ak,I2S(id),"1")+1)
elseif GetRandomInt(1,7-KX)==1 then
call StoreInteger(Ak,I2S(id),"1",GetStoredInteger(Ak,I2S(id),"1")-1)
Spoiler:
Code: Select all
if GetStoredInteger(Ak,I2S(id),"6")!=7 and BQ[(id*'d')+6]==0 then
if(AP[1]and KY<20)or ck>3 then
set BQ[(id*'d')+6]=1
call StoreInteger(Ak,I2S(id),"6",GetStoredInteger(Ak,I2S(id),"6")+1)
elseif GetRandomInt(1,9-KX)==1 then
call StoreInteger(Ak,I2S(id),"6",GetStoredInteger(Ak,I2S(id),"6")-1)
endif