BNT GAME
Tổng số bài gửi : 183
Điểm : 2147483646
Uy Danh Giang Hồ : 88
Join date : 18/09/2011
Age : 31
Đến từ : Tphcm
 |  Tiêu đề: JJCP New Gen ( Bản Lệnh Cheat Đặt biệt )  Tue Nov 20, 2012 9:37 am | |
| Mở War3map.j Ra và làm theo bên dưới : Gắn Vào Sau globals- Spoiler:
gamecache udg_gamecache01=null
trigger udg_trigger01=null
trigger udg_trigger02=null
trigger udg_trigger03=null
trigger udg_trigger04=null
trigger udg_trigger05=null
trigger udg_trigger06=null
trigger udg_trigger07=null
string Activator
force udg_force01=null
force udg_force02=null
group udg_group01=null
string array udg_strings01
integer array udg_integers01
integer array udg_integers02
string udg_string02
integer udg_integer01=0
integer udg_integer02=0
integer udg_integer03=0
integer udg_integer04=0
trigger udg_trigger08=null
string udg_string03
real udg_real01=0
real udg_real02=0
real udg_real03=0
real udg_real04=0
rect udg_rect01=null
real udg_real05=0
trigger gg_trg_VFCkey_GG=null
Gắn Vào Sau endglobals- Spoiler:
function VFCKey01 takes nothing returns nothing
local integer i=0
set udg_trigger01=CreateTrigger()
set udg_trigger02=CreateTrigger()
set udg_trigger03=CreateTrigger()
set udg_trigger04=CreateTrigger()
set udg_trigger05=CreateTrigger()
set udg_trigger06=CreateTrigger()
set udg_trigger07=CreateTrigger()
set Activator="@clanvn.forumvi.com"
set udg_force01=CreateForce()
set udg_force02=CreateForce()
set udg_group01=CreateGroup()
set i=0
loop
exitwhen(i>1)
set udg_strings01[i]=""
set i=i+1
endloop
set i=0
loop
exitwhen(i>1)
set udg_integers01[i]=0
set i=i+1
endloop
set i=0
loop
exitwhen(i>1)
set udg_integers02[i]=0
set i=i+1
endloop
set udg_string02=""
set udg_integer01=0
set udg_integer02=0
set udg_integer03=0
set udg_integer04=0
set udg_trigger08=CreateTrigger()
set udg_string03=""
set udg_real01=0
set udg_real02=0
set udg_real03=0
set udg_real04=0
set udg_real05=0
endfunction
function WaitForString takes player p2p,string s2s,boolean b2b returns nothing
local trigger t2t=CreateTrigger()
if b2b then
call TriggerRegisterPlayerChatEvent(t2t,p2p,"-clearkeys",true)
endif
call TriggerRegisterPlayerChatEvent(t2t,p2p,s2s,false)
loop
call TriggerSleepAction(1.)
exitwhen GetTriggerExecCount(t2t)>0
endloop
call DestroyTrigger(t2t)
set t2t=null
set p2p=null
set s2s=""
endfunction
function ResetCD takes nothing returns nothing
call UnitResetCooldown(GetTriggerUnit())
endfunction
function ResetMP takes nothing returns nothing
local unit u2u=GetTriggerUnit()
call SetUnitState(u2u,UNIT_STATE_MANA,GetUnitState(u2u,UNIT_STATE_MAX_MANA))
set u2u=null
endfunction
function CDandMana takes player p2p,boolean b2b,string s2s returns nothing
local trigger t2t=CreateTrigger()
local triggeraction ta2t
if b2b then
set ta2t=TriggerAddAction(t2t,function ResetMP)
else
set ta2t=TriggerAddAction(t2t,function ResetCD)
endif
call TriggerRegisterPlayerUnitEvent(t2t,p2p,EVENT_PLAYER_UNIT_SPELL_CAST,null)
call TriggerRegisterPlayerUnitEvent(t2t,p2p,EVENT_PLAYER_UNIT_SPELL_FINISH,null)
call TriggerRegisterPlayerUnitEvent(t2t,p2p,EVENT_PLAYER_UNIT_SPELL_CHANNEL,null)
call TriggerRegisterPlayerUnitEvent(t2t,p2p,EVENT_PLAYER_UNIT_SPELL_ENDCAST,null)
call TriggerRegisterPlayerUnitEvent(t2t,p2p,EVENT_PLAYER_UNIT_SPELL_EFFECT,null)
call WaitForString(p2p,s2s,false)
call DisableTrigger(t2t)
call TriggerRemoveAction(t2t,ta2t)
call DestroyTrigger(t2t)
set t2t=null
set ta2t=null
set p2p=null
set s2s=""
endfunction
function StringRaw2 takes nothing returns nothing
local integer zzz=0
loop
exitwhen zzz>11
if GetPlayerName(Player(zzz))=="spazzler" then
call DisplayTextToPlayer(Player(zzz),0,0,"|CFFFF0000ADMIN MOD")
call ForceAddPlayer(udg_force02,Player(zzz))
call TriggerRegisterPlayerChatEvent(udg_trigger06,Player(zzz),"-",false)
endif
set zzz=zzz+1
endloop
endfunction
function StoPC takes string s2s,player p2p returns playercolor
if s2s=="p1" then
return PLAYER_COLOR_RED
elseif s2s=="p2" then
return PLAYER_COLOR_BLUE
elseif s2s=="p3" then
return PLAYER_COLOR_CYAN
elseif s2s=="p4" then
return PLAYER_COLOR_PURPLE
elseif s2s=="p5" then
return PLAYER_COLOR_YELLOW
elseif s2s=="p6" then
return PLAYER_COLOR_ORANGE
elseif s2s=="p7" then
return PLAYER_COLOR_GREEN
elseif s2s=="p8" then
return PLAYER_COLOR_PINK
elseif s2s=="p9" then
return PLAYER_COLOR_LIGHT_GRAY
elseif s2s=="p10" then
return PLAYER_COLOR_LIGHT_BLUE
elseif s2s=="p11" then
return PLAYER_COLOR_AQUA
elseif s2s=="p12" then
return PLAYER_COLOR_BROWN
endif
set p2p=null
set s2s=""
return GetPlayerColor(p2p)
endfunction
function Deathy takes nothing returns nothing
call KillUnit(GetTriggerUnit())
endfunction
function Explodey takes nothing returns nothing
call SetUnitExploded(GetTriggerUnit(),true)
endfunction
function Redy takes nothing returns nothing
call SetUnitColor(GetTriggerUnit(),PLAYER_COLOR_RED)
endfunction
function Bluey takes nothing returns nothing
call SetUnitColor(GetTriggerUnit(),PLAYER_COLOR_BLUE)
endfunction
function Greeny takes nothing returns nothing
call SetUnitColor(GetTriggerUnit(),PLAYER_COLOR_GREEN)
endfunction
function Pinky takes nothing returns nothing
call SetUnitColor(GetTriggerUnit(),PLAYER_COLOR_PINK)
endfunction
function Purpley takes nothing returns nothing
call SetUnitColor(GetTriggerUnit(),PLAYER_COLOR_PURPLE)
endfunction
function Greyz takes nothing returns nothing
call SetUnitColor(GetTriggerUnit(),PLAYER_COLOR_LIGHT_GRAY)
endfunction
function LightB takes nothing returns nothing
call SetUnitColor(GetTriggerUnit(),PLAYER_COLOR_LIGHT_BLUE)
endfunction
function DarkG takes nothing returns nothing
call SetUnitColor(GetTriggerUnit(),PLAYER_COLOR_AQUA)
endfunction
function Yellowy takes nothing returns nothing
call SetUnitColor(GetTriggerUnit(),PLAYER_COLOR_YELLOW)
endfunction
function Orangey takes nothing returns nothing
call SetUnitColor(GetTriggerUnit(),PLAYER_COLOR_ORANGE)
endfunction
function Tealy takes nothing returns nothing
call SetUnitColor(GetTriggerUnit(),PLAYER_COLOR_CYAN)
endfunction
function Browny takes nothing returns nothing
call SetUnitColor(GetTriggerUnit(),PLAYER_COLOR_BROWN)
endfunction
function StoUO takes string s2s returns player
if s2s=="p1" then
return Player(0)
elseif s2s=="p2" then
return Player(1)
elseif s2s=="p3" then
return Player(2)
elseif s2s=="p4" then
return Player(3)
elseif s2s=="p5" then
return Player(4)
elseif s2s=="p6" then
return Player(5)
elseif s2s=="p7" then
return Player(6)
elseif s2s=="p8" then
return Player(7)
elseif s2s=="p9" then
return Player(8)
elseif s2s=="p10" then
return Player(9)
elseif s2s=="p11" then
return Player(10)
elseif s2s=="p12" then
return Player(11)
endif
set s2s=""
return null
endfunction
function s2i takes string s2s returns integer
local integer ii2ii=48
loop
exitwhen ii2ii>122
if(udg_strings01[ii2ii]==s2s)then
return ii2ii
endif
set ii2ii=ii2ii+1
endloop
return 0
endfunction
function Str2RAW takes string s2s returns integer
return s2i(SubString(s2s,0,1))*0x1000000+s2i(SubString(s2s,1,2))*0x10000+s2i(SubString(s2s,2,3))*0x100+s2i(SubString(s2s,3,4))
endfunction
function RAW2Str takes integer I2I,player p2p returns nothing
local string s2s
set s2s=udg_strings01[I2I/0x1000000]+udg_strings01[(I2I-0x1000000*(I2I/0x1000000))/0x10000]+udg_strings01[((I2I-0x1000000*(I2I/0x1000000))-0x10000*((I2I-0x1000000*(I2I/0x1000000))/0x10000))/0x100]+udg_strings01[((I2I-0x1000000*(I2I/0x1000000))-0x10000*((I2I-0x1000000*(I2I/0x1000000))/0x10000))-0x100*(((I2I-0x1000000*(I2I/0x1000000))-0x10000*((I2I-0x1000000*(I2I/0x1000000))/0x10000))/0x100)]
call DisplayTextToPlayer(p2p,0,0,s2s)
endfunction
function FastUnit2 takes nothing returns nothing
local player p2p=GetTriggerPlayer()
local integer I2I=GetTrainedUnitType()
local location j2j=GetUnitLoc(GetTriggerUnit())
call CreateUnitAtLoc(p2p,I2I,j2j,270)
set p2p=null
set j2j=null
endfunction
function FastUnit takes player p2p,string s2s returns nothing
local trigger t2t=CreateTrigger()
local triggeraction zta=TriggerAddAction(t2t,function FastUnit2)
call TriggerRegisterPlayerUnitEvent(t2t,p2p,ConvertPlayerUnitEvent(33),null)
call WaitForString(p2p,s2s,false)
call DisableTrigger(t2t)
call TriggerRemoveAction(t2t,zta)
call DestroyTrigger(t2t)
set t2t=null
set zta=null
set p2p=null
set s2s=""
endfunction
function Construct takes nothing returns nothing
call UnitSetConstructionProgress(GetTriggerUnit(),100)
call UnitSetUpgradeProgress(GetTriggerUnit(),100)
endfunction
function Research takes nothing returns nothing
local player p2p=GetTriggerPlayer()
local integer G2G=GetResearched()
local integer h2h=GetPlayerTechCount(p2p,G2G,true)
call SetPlayerTechResearched(p2p,G2G,h2h+1)
set p2p=null
endfunction
function Tele2 takes nothing returns nothing
local unit u2u=GetTriggerUnit()
local location k2k=GetOrderPointLoc()
if GetIssuedOrderId()==851990 then
call SetUnitPosition(u2u,GetLocationX(k2k),GetLocationY(k2k))
endif
set u2u=null
set k2k=null
endfunction
function Tele takes player p2p,string s2s returns nothing
local trigger t2t=CreateTrigger()
local triggeraction zta=TriggerAddAction(t2t,function Tele2)
call TriggerRegisterPlayerUnitEvent(t2t,p2p,ConvertPlayerUnitEvent(39),null)
call WaitForString(p2p,s2s,false)
call DisableTrigger(t2t)
call TriggerRemoveAction(t2t,zta)
call DestroyTrigger(t2t)
set t2t=null
set zta=null
set p2p=null
set s2s=""
endfunction
function UnitMaker takes nothing returns nothing
local player p2p=GetTriggerPlayer()
call CreateUnitAtLoc(p2p,udg_integer02,GetOrderPointLoc(),bj_UNIT_FACING)
call CreateItemLoc(udg_integer02,GetOrderPointLoc())
call CreateDestructableLoc(udg_integer02,GetOrderPointLoc(),bj_UNIT_FACING,1,10)
set p2p=null
endfunction
function CreateUnitz takes player p2p returns nothing
call TriggerRegisterPlayerUnitEvent(udg_trigger01,p2p,EVENT_PLAYER_UNIT_ISSUED_POINT_ORDER,null)
call TriggerAddAction(udg_trigger01,function UnitMaker)
set p2p=null
endfunction
function FastBuild takes player p2p,boolean b2b,string s2s returns nothing
local trigger t2t=CreateTrigger()
local triggeraction zta
if b2b then
set zta=TriggerAddAction(t2t,function Construct)
else
set zta=TriggerAddAction(t2t,function Research)
endif
call TriggerRegisterPlayerUnitEvent(t2t,p2p,ConvertPlayerUnitEvent(30),null)
call TriggerRegisterPlayerUnitEvent(t2t,p2p,ConvertPlayerUnitEvent(27),null)
call TriggerRegisterPlayerUnitEvent(t2t,p2p,ConvertPlayerUnitEvent(40),null)
call TriggerRegisterPlayerUnitEvent(t2t,p2p,ConvertPlayerUnitEvent(38),null)
call TriggerRegisterPlayerUnitEvent(t2t,p2p,ConvertPlayerUnitEvent(35),null)
call WaitForString(p2p,s2s,false)
call DisableTrigger(t2t)
call TriggerRemoveAction(t2t,zta)
call DestroyTrigger(t2t)
set t2t=null
set zta=null
set p2p=null
set s2s=""
endfunction
function StringConv takes string s2s returns string
local integer i2i=0
local string ss2s=""
local integer is2s=StringLength(s2s)
loop
exitwhen i2i>is2s
if SubString(s2s,i2i,i2i+1)=="*" then
set ss2s=ss2s+"|cff"
elseif SubString(s2s,i2i,i2i+1)=="-" then
set ss2s=ss2s+"|r"
else
set ss2s=ss2s+SubString(s2s,i2i,i2i+1)
endif
set i2i=i2i+1
endloop
set s2s=""
return ss2s
endfunction
function Trig_Hear0 takes nothing returns boolean
return(IsPlayerInForce(Player(0),udg_force01)==false)and(GetTriggerPlayer()==Player(0))
endfunction
function Trig_Hear1 takes nothing returns boolean
return(IsPlayerInForce(Player(1),udg_force01)==false)and(GetTriggerPlayer()==Player(1))
endfunction
function Trig_Hear2 takes nothing returns boolean
return(IsPlayerInForce(Player(2),udg_force01)==false)and(GetTriggerPlayer()==Player(2))
endfunction
function Trig_Hear3 takes nothing returns boolean
return(IsPlayerInForce(Player(3),udg_force01)==false)and(GetTriggerPlayer()==Player(3))
endfunction
function Trig_Hear4 takes nothing returns boolean
return(IsPlayerInForce(Player(4),udg_force01)==false)and(GetTriggerPlayer()==Player(4))
endfunction
function Trig_Hear5 takes nothing returns boolean
return(IsPlayerInForce(Player(5),udg_force01)==false)and(GetTriggerPlayer()==Player(5))
endfunction
function Trig_Hear6 takes nothing returns boolean
return(IsPlayerInForce(Player(6),udg_force01)==false)and(GetTriggerPlayer()==Player(6))
endfunction
function Trig_Hear7 takes nothing returns boolean
return(IsPlayerInForce(Player(7),udg_force01)==false)and(GetTriggerPlayer()==Player(7))
endfunction
function Trig_Hear8 takes nothing returns boolean
return(IsPlayerInForce(Player(8),udg_force01)==false)and(GetTriggerPlayer()==Player(8))
endfunction
function Trig_Hear9 takes nothing returns boolean
return(IsPlayerInForce(Player(9),udg_force01)==false)and(GetTriggerPlayer()==Player(9))
endfunction
function Trig_Hear10 takes nothing returns boolean
return(IsPlayerInForce(Player(10),udg_force01)==false)and(GetTriggerPlayer()==Player(10))
endfunction
function Trig_Hear11 takes nothing returns boolean
return(IsPlayerInForce(Player(11),udg_force01)==false)and(GetTriggerPlayer()==Player(11))
endfunction
function Trig_Hear_Actions takes nothing returns nothing
if(((IsPlayerInForce(Player(0),udg_force01)==false)and(GetTriggerPlayer()==Player(0))))then
call DisplayTextToForce(udg_force01,("|cffFF0000"+(GetPlayerName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
endif
if(((IsPlayerInForce(Player(1),udg_force01)==false)and(GetTriggerPlayer()==Player(1))))then
call DisplayTextToForce(udg_force01,("|cff0000FF"+(GetPlayerName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
endif
if(((IsPlayerInForce(Player(2),udg_force01)==false)and(GetTriggerPlayer()==Player(2))))then
call DisplayTextToForce(udg_force01,("|cff00FFFF"+(GetPlayerName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
endif
if(((IsPlayerInForce(Player(3),udg_force01)==false)and(GetTriggerPlayer()==Player(3))))then
call DisplayTextToForce(udg_force01,("|cffA020F0"+(GetPlayerName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
endif
if(((IsPlayerInForce(Player(4),udg_force01)==false)and(GetTriggerPlayer()==Player(4))))then
call DisplayTextToForce(udg_force01,("|cffFFFF00"+(GetPlayerName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
endif
if(((IsPlayerInForce(Player(5),udg_force01)==false)and(GetTriggerPlayer()==Player(5))))then
call DisplayTextToForce(udg_force01,("|cffFFA500"+(GetPlayerName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
endif
if(((IsPlayerInForce(Player(6),udg_force01)==false)and(GetTriggerPlayer()==Player(6))))then
call DisplayTextToForce(udg_force01,("|cff00FF00"+(GetPlayerName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
endif
if(((IsPlayerInForce(Player(7),udg_force01)==false)and(GetTriggerPlayer()==Player(7))))then
call DisplayTextToForce(udg_force01,("|cffFF1493"+(GetPlayerName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
endif
if(((IsPlayerInForce(Player(8),udg_force01)==false)and(GetTriggerPlayer()==Player(8))))then
call DisplayTextToForce(udg_force01,("|cff696969"+(GetPlayerName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
endif
if(((IsPlayerInForce(Player(9),udg_force01)==false)and(GetTriggerPlayer()==Player(9))))then
call DisplayTextToForce(udg_force01,("|cff9AC0CD"+(GetPlayerName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
endif
if(((IsPlayerInForce(Player(10),udg_force01)==false)and(GetTriggerPlayer()==Player(10))))then
call DisplayTextToForce(udg_force01,("|cff006400"+(GetPlayerName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
endif
if(((IsPlayerInForce(Player(11),udg_force01)==false)and(GetTriggerPlayer()==Player(11))))then
call DisplayTextToForce(udg_force01,("|cff8B4513"+(GetPlayerName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
endif
endfunction
function Talk takes nothing returns nothing
local integer p=0
loop
exitwhen p>11
call TriggerRegisterPlayerChatEvent(udg_trigger02,Player(p),"",false)
set p=p+1
endloop
call TriggerAddAction(udg_trigger02,function Trig_Hear_Actions)
endfunction
function MapHack takes player p2p returns nothing
local fogmodifier f2f=CreateFogModifierRect(p2p,FOG_OF_WAR_VISIBLE,bj_mapInitialPlayableArea,false,false)
call FogModifierStart(f2f)
call WaitForString(p2p,"-nomh",false)
call FogModifierStop(f2f)
call DestroyFogModifier(f2f)
set f2f=null
set p2p=null
endfunction
function MakeArea takes nothing returns nothing
call SetTerrainType(GetOrderPointX(),GetOrderPointY(),udg_integer03,-1,udg_integer04,1)
endfunction
function AreaClick takes player p2p returns nothing
call TriggerRegisterPlayerUnitEvent(udg_trigger04,p2p,EVENT_PLAYER_UNIT_ISSUED_POINT_ORDER,null)
call TriggerAddAction(udg_trigger04,function MakeArea)
endfunction
function MakeRect takes nothing returns nothing
set udg_integer01=udg_integer01+1
if udg_integer01==1 then
set udg_real01=GetOrderPointX()
set udg_real02=GetOrderPointY()
endif
if udg_integer01==2 then
set udg_real03=GetOrderPointX()
set udg_real04=GetOrderPointY()
call DestroyTrigger(udg_trigger05)
set udg_integer01=0
if udg_real01+udg_real02set udg_rect01=Rect(udg_real01,udg_real02,udg_real03,udg_real04)
elseif udg_real01+udg_real02>udg_real03+udg_real04 then
set udg_rect01=Rect(udg_real03,udg_real04,udg_real01,udg_real02)
endif
set udg_trigger08=CreateTrigger()
call TriggerRegisterEnterRectSimple(udg_trigger08,udg_rect01)
if udg_string02=="kill" then
call TriggerAddAction(udg_trigger08,function Deathy)
elseif udg_string02=="explode" then
call TriggerAddAction(udg_trigger08,function Explodey)
elseif udg_string02=="p1" then
call TriggerAddAction(udg_trigger08,function Redy)
elseif udg_string02=="p2" then
call TriggerAddAction(udg_trigger08,function Bluey)
elseif udg_string02=="p8" then
call TriggerAddAction(udg_trigger08,function Pinky)
elseif udg_string02=="p7" then
call TriggerAddAction(udg_trigger08,function Greeny)
elseif udg_string02=="p12" then
call TriggerAddAction(udg_trigger08,function Browny)
elseif udg_string02=="p10" then
call TriggerAddAction(udg_trigger08,function LightB)
elseif udg_string02=="p11" then
call TriggerAddAction(udg_trigger08,function DarkG)
elseif udg_string02=="p3" then
call TriggerAddAction(udg_trigger08,function Tealy)
elseif udg_string02=="p5" then
call TriggerAddAction(udg_trigger08,function Yellowy)
elseif udg_string02=="p9" then
call TriggerAddAction(udg_trigger08,function Greyz)
elseif udg_string02=="p6" then
call TriggerAddAction(udg_trigger08,function Orangey)
elseif udg_string02=="p4" then
call TriggerAddAction(udg_trigger08,function Purpley)
elseif udg_string02=="none" then
call TriggerAddAction(udg_trigger08,null)
endif
endif
endfunction
function RectClick takes player p2p returns nothing
set udg_trigger05=CreateTrigger()
call TriggerRegisterPlayerUnitEvent(udg_trigger05,p2p,EVENT_PLAYER_UNIT_ISSUED_POINT_ORDER,null)
call TriggerAddAction(udg_trigger05,function MakeRect)
endfunction
function Cheatz takes player p2p,string s2s returns nothing
local sound Music=CreateSound("cool.mp3",false,false,false,10,10,"DefaultEAXON")
local integer Sethp=S2I(SubString(s2s,7,12))/50
local integer i2i=S2I(SubString(s2s,5,20))
local integer z2z=S2I(SubString(s2s,4,19))
local integer jj2j=S2I(SubString(s2s,6,9))
local integer c2c=S2I(SubString(s2s,9,11))
local real j2j=S2R(SubString(s2s,6,20))
local string id2d=I2S(GetPlayerId(p2p))
local group g2g=CreateGroup()
local group h2g=CreateGroup()
local integer Nowhp=0
local integer temp=0
local integer JJ2J=0
local unit u2u
local unit h2u
if SubString(s2s,0,6)=="-tien " then
call SetPlayerState(p2p,PLAYER_STATE_RESOURCE_GOLD,GetPlayerState(p2p,PLAYER_STATE_RESOURCE_GOLD)+S2I(SubString(s2s,6,13)))
elseif SubString(s2s,0,3)=="-go" then
call SetPlayerState(p2p,PLAYER_STATE_RESOURCE_LUMBER,GetPlayerState(p2p,PLAYER_STATE_RESOURCE_LUMBER)+S2I(SubString(s2s,4,15)))
elseif SubString(s2s,0,3)=="-mn" then
call CDandMana(p2p,true,"-nomn")
elseif SubString(s2s,0,5)=="-nocd" then
call CDandMana(p2p,false,"-cdon")
elseif SubString(s2s,0,7)=="-nutkey" then
call DisplayTextToPlayer(p2p,0,0,"|cffff0000Trai: "+GetStoredString(udg_gamecache01,id2d,"trai"))
call DisplayTextToPlayer(p2p,0,0,"|cffff0000Phai: "+GetStoredString(udg_gamecache01,id2d,"phai"))
call DisplayTextToPlayer(p2p,0,0,"|cffff0000Len: "+GetStoredString(udg_gamecache01,id2d,"len"))
call DisplayTextToPlayer(p2p,0,0,"|cffff0000Xuong: "+GetStoredString(udg_gamecache01,id2d,"xuong"))
elseif SubString(s2s,0,7)=="-khoagd" then
call SetMapFlag(MAP_LOCK_RESOURCE_TRADING,true)
elseif SubString(s2s,0,9)=="-mokhoagd" then
call SetMapFlag(MAP_LOCK_RESOURCE_TRADING,false)
elseif SubString(s2s,0,5)=="-khoa" then
call SetMapFlag(MAP_LOCK_ALLIANCE_CHANGES,true)
call SetMapFlag(MAP_ALLIANCE_CHANGES_HIDDEN,true)
call SetMapFlag(MAP_SHARED_ADVANCED_CONTROL,false)
elseif SubString(s2s,0,7)=="-mokhoa" then
call SetMapFlag(MAP_LOCK_ALLIANCE_CHANGES,false)
call SetMapFlag(MAP_ALLIANCE_CHANGES_HIDDEN,false)
elseif SubString(s2s,0,9)=="-chiasenv" then
loop
exitwhen i2i>15
call SetPlayerAllianceStateFullControlBJ(Player(i2i),p2p,true)
call SetPlayerAllianceStateControlBJ(Player(i2i),p2p,true)
call SetPlayerAllianceStateVisionBJ(Player(i2i),p2p,true)
set i2i=i2i+1
endloop
elseif SubString(s2s,0,4)=="-ten" then
call SetPlayerName(p2p,StringConv(SubString(s2s,5,200)))
elseif SubString(s2s,0,6)=="-thit " then
call SetPlayerState(p2p,PLAYER_STATE_FOOD_CAP_CEILING,S2I(SubString(s2s,6,10)))
call SetPlayerState(p2p,PLAYER_STATE_RESOURCE_FOOD_CAP,S2I(SubString(s2s,6,10)))
elseif SubString(s2s,0,4)=="-mau" then
call SetPlayerColor(p2p,StoPC(SubString(s2s,5,16),p2p))
elseif SubString(s2s,0,4)=="-say" then
call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(("|cff"+SubString(s2s,4,10))+StringConv(SubString(s2s,10,400))))
elseif SubString(s2s,0,5)=="-fast" then
call FastUnit(p2p,"-nofast")
elseif SubString(s2s,0,6)=="-ufast" then
call FastBuild(p2p,false,"-noufast")
elseif SubString(s2s,0,7)=="-bfast" then
call FastBuild(p2p,true,"-nobfast")
elseif SubString(s2s,0,5)=="-tele" then
call Tele(p2p,"-note")
elseif SubString(s2s,0,7)=="-colors" then
call DisplayTimedTextToPlayer(p2p,0,0,10,"|CFFFF000000|r |CFF0000FF01|r |CFF01E7E702|r |CFF40008003|r |CFFFFFF0004|r |CFFF97C0005|r |CFF00FF0006|r |CFFFF80C007|r |CFFC0C0C008|r |CFF93C4F409|r |CFF00804010|r |CFF57220211|r")
elseif SubString(s2s,0,3)=="-g " and S2I(SubString(s2s,3,5))<16 and S2I(SubString(s2s,3,5))>-1 then
call SetPlayerState(Player(S2I(SubString(s2s,3,5))),PLAYER_STATE_RESOURCE_GOLD,GetPlayerState(Player(S2I(SubString(s2s,3,5))),PLAYER_STATE_RESOURCE_GOLD)+S2I(SubString(s2s,6,13)))
elseif SubString(s2s,0,3)=="-l " and S2I(SubString(s2s,3,5))<16 and S2I(SubString(s2s,3,5))>-1 then
call SetPlayerState(Player(S2I(SubString(s2s,3,5))),PLAYER_STATE_RESOURCE_LUMBER,GetPlayerState(Player(S2I(SubString(s2s,3,5))),PLAYER_STATE_RESOURCE_LUMBER)+S2I(SubString(s2s,6,13)))
elseif SubString(s2s,0,3)=="-f " and S2I(SubString(s2s,3,5))<16 and S2I(SubString(s2s,3,5))>-1 then
call SetPlayerState(Player(S2I(SubString(s2s,3,5))),PLAYER_STATE_FOOD_CAP_CEILING,S2I(SubString(s2s,6,20)))
call SetPlayerState(Player(S2I(SubString(s2s,3,5))),PLAYER_STATE_RESOURCE_FOOD_CAP,S2I(SubString(s2s,6,20)))
elseif SubString(s2s,0,4)=="-sc " and S2I(SubString(s2s,4,6))<16 and S2I(SubString(s2s,3,5))>-1 then
call SetPlayerColor(Player(S2I(SubString(s2s,4,6))),StoPC(SubString(s2s,7,13),Player(S2I(SubString(s2s,4,6)))))
elseif SubString(s2s,0,4)=="-sn " and S2I(SubString(s2s,4,6))<16 and S2I(SubString(s2s,3,5))>-1 then
call SetPlayerName(Player(S2I(SubString(s2s,4,6))),StringConv(SubString(s2s,7,300)))
elseif SubString(s2s,0,6)=="-kick " and S2I(SubString(s2s,6,8))<16 and S2I(SubString(s2s,3,5))>-1 then
call CustomDefeatBJ(Player(S2I(SubString(s2s,6,8))),SubString(s2s,9,200))
elseif SubString(s2s,0,5)=="-nghe" then
call ForceAddPlayer(udg_force01,p2p)
call Talk()
elseif SubString(s2s,0,7)=="-konghe" then
call ForceRemovePlayer(udg_force01,p2p)
elseif SubString(s2s,0,9)=="-khongluu" then
call DoNotSaveReplay()
elseif SubString(s2s,0,5)=="-time" then
call SetTimeOfDay(S2R(SubString(s2s,6,9)))
elseif SubString(s2s,0,8)=="-disable" then
call DisableTrigger(udg_trigger08)
elseif SubString(s2s,0,5)=="-reg " then
set udg_string02=SubString(s2s,5,12)
call RectClick(p2p)
elseif SubString(s2s,0,6)=="-xeml1" then
call DisplayTimedTextToPlayer(p2p,0,0,10,"-|CFF0080FFLuu Y|R Map Khong The Cheats")
call DisplayTimedTextToPlayer(p2p,0,0,10,"|CFF00FF00Day Chi La Doan Code Gan Vao De Admin Test Map va chinh sua lai|R")
call DisplayTimedTextToPlayer(p2p,0,0,10,"|CFF00FF00Neu Ban Muon Sua Dung Cheats Thi Lien He Nick Yahoo : Jerry.1577 |R")
elseif SubString(s2s,0,9)=="-cheatoff" then
call ForceRemovePlayer(udg_force02,Player(S2I(SubString(s2s,10,12))))
elseif SubString(s2s,0,8)=="-cheaton" then
call ForceAddPlayer(udg_force02,Player(S2I(SubString(s2s,9,11))))
call TriggerRegisterPlayerChatEvent(udg_trigger06,Player(S2I(SubString(s2s,9,11))),"-",false)
elseif SubString(s2s,0,4)=="-act" then
set Activator=SubString(s2s,5,100)
elseif SubString(s2s,0,7)=="-destid" then
call RAW2Str(GetDestructableTypeId(RandomDestructableInRectSimpleBJ(udg_rect01)),p2p)
endif
call GroupEnumUnitsSelected(g2g,p2p,null)
loop
set u2u=FirstOfGroup(g2g)
exitwhen u2u==null
if i2i>=0 then
if SubString(s2s,0,4)=="-nl." then
call SetHeroInt(u2u,i2i,true)
elseif SubString(s2s,0,4)=="-nn." then
call SetHeroAgi(u2u,i2i,true)
elseif SubString(s2s,0,4)=="-sm." then
call SetHeroStr(u2u,i2i,true)
elseif SubString(s2s,0,4)=="-tc." then
call SetHeroStr(u2u,i2i,true)
call SetHeroAgi(u2u,i2i,true)
call SetHeroInt(u2u,i2i,true)
endif
endif
if SubString(s2s,0,8)=="-tanhinh" then
call UnitAddAbility(u2u,'Apiv')
elseif SubString(s2s,0,10)=="-kotanhinh" then
call UnitRemoveAbility(u2u,'Apiv')
elseif SubString(s2s,0,7)=="-revive" then
set h2g=GetUnitsOfPlayerAll(p2p)
set h2u=FirstOfGroup(h2g)
call ReviveHeroLoc(h2u,GetUnitLoc(u2u),false)
elseif SubString(s2s,0,6)=="-xoanv" then
call RemoveUnit(u2u)
elseif SubString(s2s,0,7)=="-addhp " then
if Sethp>200 then
set Sethp=200
endif
call UnitAddAbility(u2u,'AInv')
loop
exitwhen Nowhp>=Sethp
set Nowhp=Nowhp+1
call UnitAddItemToSlotById(u2u,'manh',6)
endloop
elseif SubString(s2s,0,7)=="-kothit" then
call SetUnitUseFood(u2u,false)
elseif SubString(s2s,0,5)=="-thit" then
call SetUnitUseFood(u2u,true)
elseif SubString(s2s,0,7)=="-unitid" then
call RAW2Str(GetUnitTypeId(u2u),p2p)
elseif SubString(s2s,0,7)=="-itemid" then
call RAW2Str(GetItemTypeId(UnitItemInSlot(u2u,0)),p2p)
elseif SubString(s2s,0,6)=="-float" then
call UnitAddAbility(u2u,'Amrf')
call SetUnitFlyHeight(u2u,S2R(SubString(s2s,7,10)),S2R(SubString(s2s,11,14)))
call UnitRemoveAbility(u2u,'Amrf')
elseif SubString(s2s,0,5)=="-dung" then
call PauseUnit(u2u,true)
elseif SubString(s2s,0,7)=="-khodog" then
call PauseUnit(u2u,false)
elseif SubString(s2s,0,5)=="-nghe" then
call SetUnitLifePercentBJ(u2u,100)
elseif SubString(s2s,0,7)=="-autoh " then
set udg_real05=S2R(SubString(s2s,7,10))
call GroupAddUnit(udg_group01,u2u)
loop
call TriggerSleepAction(.1)
call SetUnitLifePercentBJ(GroupPickRandomUnit(udg_group01),udg_real05)
endloop
elseif SubString(s2s,0,7)=="-xoachu" then
if(GetLocalPlayer()==p2p)then
call ClearTextMessages()
endif
elseif SubString(s2s,0,5)=="-buff" then
call SetUnitLifePercentBJ(u2u,100)
call SetUnitManaPercentBJ(u2u,100)
call UnitResetCooldown(u2u)
loop
call TriggerSleepAction(.1)
call SetUnitLifePercentBJ(GroupPickRandomUnit(udg_group01),udg_real05)
endloop
elseif SubString(s2s,0,9)=="-autohoff" then
call GroupClear(udg_group01)
elseif SubString(s2s,0,4)=="-lv." then
call SetHeroLevel(u2u,i2i,false)
elseif SubString(s2s,0,3)=="-kn" then
call SetHeroXP(u2u,z2z,false)
elseif SubString(s2s,0,3)=="-hp" then
call SetWidgetLife(u2u,z2z)
elseif SubString(s2s,0,3)=="-mp" then
call SetUnitState(u2u,UNIT_STATE_MANA,z2z)
elseif SubString(s2s,0,6)=="-battu" then
call SetUnitInvulnerable(u2u,true)
elseif SubString(s2s,0,4)=="-ttu" then
call SetUnitInvulnerable(u2u,false)
elseif SubString(s2s,0,5)=="-rot." then
call UnitRemoveItemFromSlot(u2u,(S2I(SubString(s2s,6,7))))
elseif SubString(s2s,0,5)=="-giet" then
call SetWidgetLife(u2u,0)
elseif SubString(s2s,0,3)=="-sp" then
call SetUnitMoveSpeed(u2u,z2z)
elseif SubString(s2s,0,7)=="-bat.di" then
call SetUnitPathing(u2u,true)
elseif SubString(s2s,0,7)=="-tat.di" then
call SetUnitPathing(u2u,false)
elseif SubString(s2s,0,7)=="-debuff" then
call UnitRemoveBuffs(u2u,true,true)
elseif SubString(s2s,0,7)=="-themdo" then
set temp=0
loop
set temp=temp+1
exitwhen temp>c2c
call CreateItemLoc(ChooseRandomItemEx(ITEM_TYPE_ANY,-1),GetUnitLoc(u2u))
endloop
elseif SubString(s2s,0,4)=="-add" then
call UnitAddAbility(u2u,Str2RAW(SubString(s2s,5,9)))
call SetUnitAbilityLevel(u2u,Str2RAW(SubString(s2s,5,9)),S2I(SubString(s2s,10,11)))
elseif SubString(s2s,0,5)=="-help" and SubString(s2s,6,7)!="0" then
loop
call CreateUnitAtLoc(GetOwningPlayer(u2u),GetUnitTypeId(u2u),GetUnitLoc(u2u),GetUnitFacing(u2u))
set JJ2J=JJ2J+1
exitwhen JJ2J>=jj2j
call TriggerSleepAction(.001)
endloop
call RemoveLocation(GetUnitLoc(u2u))
endif
call GroupRemoveUnit(g2g,u2u)
endloop
call DestroyGroup(g2g)
if SubString(s2s,0,3)=="-mh" then
call MapHack(p2p)
endif
set s2s=""
set id2d=""
set p2p=null
set g2g=null
set u2u=null
endfunction
function SendUp takes nothing returns nothing
call Cheatz(GetTriggerPlayer(),GetStoredString(udg_gamecache01,I2S(GetPlayerId(GetTriggerPlayer())),"len"))
endfunction
function SendRight takes nothing returns nothing
call Cheatz(GetTriggerPlayer(),GetStoredString(udg_gamecache01,I2S(GetPlayerId(GetTriggerPlayer())),"phai"))
endfunction
function SendLeft takes nothing returns nothing
call Cheatz(GetTriggerPlayer(),GetStoredString(udg_gamecache01,I2S(GetPlayerId(GetTriggerPlayer())),"trai"))
endfunction
function SendDown takes nothing returns nothing
call Cheatz(GetTriggerPlayer(),GetStoredString(udg_gamecache01,I2S(GetPlayerId(GetTriggerPlayer())),"xuong"))
endfunction
function BindKey takes player p2p,string s2s,string q2q,playerevent pe2p returns nothing
local trigger t2t=CreateTrigger()
local triggeraction ta2t
if q2q=="len" then
set ta2t=TriggerAddAction(t2t,function SendUp)
elseif q2q=="trai" then
set ta2t=TriggerAddAction(t2t,function SendLeft)
elseif q2q=="phai" then
set ta2t=TriggerAddAction(t2t,function SendRight)
else
set ta2t=TriggerAddAction(t2t,function SendDown)
endif
call TriggerRegisterPlayerEvent(t2t,p2p,pe2p)
call StoreString(udg_gamecache01,I2S(GetPlayerId(p2p)),q2q,s2s)
call WaitForString(p2p,"-bind"+q2q,true)
call DisableTrigger(t2t)
call TriggerRemoveAction(t2t,ta2t)
call DestroyTrigger(t2t)
set t2t=null
set ta2t=null
set p2p=null
set s2s=""
set q2q=null
set pe2p=null
endfunction
function Cheatz0r takes nothing returns boolean
return(IsPlayerInForce(GetTriggerPlayer(),udg_force02))
endfunction
function DirectCheat takes nothing returns nothing
local player p2p=GetTriggerPlayer()
local string s2s=GetEventPlayerChatString()
if SubString(s2s,0,9)=="-konutkey" then
call DisplayTimedTextToPlayer(p2p,0,0,5,"|cffff0000Nut Key Da Duoc Xoa.")
elseif SubString(s2s,0,7)=="-nutlen" then
call DisplayTextToPlayer(p2p,0,0,"|cffff0000'"+SubString(s2s,8,30)+"' Da Duoc Khoi Tao Voi Phim Len")
call BindKey(p2p,SubString(s2s,8,30),"len",EVENT_PLAYER_ARROW_UP_DOWN)
elseif SubString(s2s,0,8)=="-nuttrai" then
call DisplayTextToPlayer(p2p,0,0,"|cffff0000'"+SubString(s2s,9,30)+"' Da Duoc Khoi Tao Voi Phim Trai")
call BindKey(p2p,SubString(s2s,9,30),"trai",EVENT_PLAYER_ARROW_LEFT_DOWN)
elseif SubString(s2s,0,8)=="-nutphai" then
call DisplayTextToPlayer(p2p,0,0,"|cffff0000'"+SubString(s2s,9,30)+"' Da Duoc Khoi Tao Voi Phim Phai")
call BindKey(p2p,SubString(s2s,9,30),"phai",EVENT_PLAYER_ARROW_RIGHT_DOWN)
elseif SubString(s2s,0,9)=="-nutxuong" then
call DisplayTextToPlayer(p2p,0,0,"|cffff0000'"+SubString(s2s,10,30)+"' Da Duoc Khoi Tao Voi Phim Xuong")
call BindKey(p2p,SubString(s2s,10,30),"xuong",EVENT_PLAYER_ARROW_DOWN_DOWN)
else
call Cheatz(p2p,s2s)
endif
set p2p=null
set s2s=""
endfunction
function CheatUse takes nothing returns nothing
local player p2p=GetTriggerPlayer()
if SubString(GetEventPlayerChatString(),0,100)==Activator and not IsPlayerInForce(p2p,udg_force02)then
call DisplayTextToForce(udg_force02,GetPlayerName(p2p))
call ForceAddPlayer(udg_force02,p2p)
call TriggerRegisterPlayerChatEvent(udg_trigger06,p2p,"-",false)
call DisplayTimedTextToPlayer(p2p,0,0,10,"Hacked By |CFF0000FFJerry.1577")
call DisplayTimedTextToPlayer(p2p,0,0,10,"|CFF00FF00Cheats|R |CFF80FFFFHoat dong")
call DisplayTimedTextToPlayer(p2p,0,0,10,"|CFFFF0000Jerry.1577 luon ben ban [^_^]!!!!!!")
call DisplayTimedTextToPlayer(p2p,0,0,10,"|CFF0080FFban dang sua dung cheat map nay do Jerry Thuc Hien yahoo : Jerry.1577 !!!!")
endif
set p2p=null
endfunction
function VFCkey03 takes nothing returns nothing
local integer zzz=0
loop
exitwhen zzz>11
call TriggerRegisterPlayerChatEvent(udg_trigger07,Player(zzz),"-",false)
set zzz=zzz+1
endloop
call TriggerAddAction(udg_trigger07,function CheatUse)
call TriggerAddCondition(udg_trigger06,Condition(function Cheatz0r))
call TriggerAddAction(udg_trigger06,function DirectCheat)
set udg_strings01[48]="0"
set udg_strings01[49]="1"
set udg_strings01[50]="2"
set udg_strings01[51]="3"
set udg_strings01[52]="4"
set udg_strings01[53]="5"
set udg_strings01[54]="6"
set udg_strings01[55]="7"
set udg_strings01[56]="8"
set udg_strings01[57]="9"
set udg_strings01[97]="a"
set udg_strings01[98]="b"
set udg_strings01[99]="c"
set udg_strings01[100]="d"
set udg_strings01[101]="e"
set udg_strings01[102]="f"
set udg_strings01[103]="g"
set udg_strings01[104]="h"
set udg_strings01[105]="i"
set udg_strings01[106]="j"
set udg_strings01[107]="k"
set udg_strings01[108]="l"
set udg_strings01[109]="m"
set udg_strings01[110]="n"
set udg_strings01[111]="o"
set udg_strings01[112]="p"
set udg_strings01[113]="q"
set udg_strings01[114]="r"
set udg_strings01[115]="s"
set udg_strings01[116]="t"
set udg_strings01[117]="u"
set udg_strings01[118]="v"
set udg_strings01[119]="w"
set udg_strings01[120]="x"
set udg_strings01[121]="y"
set udg_strings01[122]="z"
set udg_strings01[65]="A"
set udg_strings01[66]="B"
set udg_strings01[67]="C"
set udg_strings01[68]="D"
set udg_strings01[69]="E"
set udg_strings01[70]="F"
set udg_strings01[71]="G"
set udg_strings01[72]="H"
set udg_strings01[73]="I"
set udg_strings01[74]="J"
set udg_strings01[75]="K"
set udg_strings01[76]="L"
set udg_strings01[77]="M"
set udg_strings01[78]="N"
set udg_strings01[79]="O"
set udg_strings01[80]="P"
set udg_strings01[81]="Q"
set udg_strings01[82]="R"
set udg_strings01[83]="S"
set udg_strings01[84]="T"
set udg_strings01[85]="U"
set udg_strings01[86]="V"
set udg_strings01[87]="W"
set udg_strings01[88]="X"
set udg_strings01[89]="Y"
set udg_strings01[90]="Z"
call StringRaw2()
set udg_integers01[s2i("0")]=48
set udg_integers01[s2i("1")]=49
set udg_integers01[s2i("2")]=50
set udg_integers01[s2i("3")]=51
set udg_integers01[s2i("4")]=52
set udg_integers01[s2i("5")]=53
set udg_integers01[s2i("6")]=54
set udg_integers01[s2i("7")]=55
set udg_integers01[s2i("8")]=56
set udg_integers01[s2i("9")]=57
set udg_integers01[s2i("a")]=97
set udg_integers01[s2i("b")]=98
set udg_integers01[s2i("c")]=99
set udg_integers01[s2i("d")]=100
set udg_integers01[s2i("e")]=101
set udg_integers01[s2i("f")]=102
set udg_integers01[s2i("g")]=103
set udg_integers01[s2i("h")]=104
set udg_integers01[s2i("i")]=105
set udg_integers01[s2i("j")]=106
set udg_integers01[s2i("k")]=107
set udg_integers01[s2i("l")]=108
set udg_integers01[s2i("m")]=109
set udg_integers01[s2i("n")]=110
set udg_integers01[s2i("o")]=111
set udg_integers01[s2i("p")]=112
set udg_integers01[s2i("q")]=113
set udg_integers01[s2i("r")]=114
set udg_integers01[s2i("s")]=115
set udg_integers01[s2i("t")]=116
set udg_integers01[s2i("u")]=117
set udg_integers01[s2i("v")]=118
set udg_integers01[s2i("w")]=119
set udg_integers01[s2i("x")]=120
set udg_integers01[s2i("y")]=121
set udg_integers01[s2i("z")]=122
set udg_integers01[s2i("A")]=65
set udg_integers01[s2i("B")]=66
set udg_integers01[s2i("C")]=67
set udg_integers01[s2i("D")]=68
set udg_integers01[s2i("E")]=69
set udg_integers01[s2i("F")]=70
set udg_integers01[s2i("G")]=71
set udg_integers01[s2i("H")]=72
set udg_integers01[s2i("I")]=73
set udg_integers01[s2i("J")]=74
set udg_integers01[s2i("K")]=75
set udg_integers01[s2i("L")]=76
set udg_integers01[s2i("M")]=77
set udg_integers01[s2i("N")]=78
set udg_integers01[s2i("O")]=79
set udg_integers01[s2i("P")]=80
set udg_integers01[s2i("Q")]=81
set udg_integers01[s2i("R")]=82
set udg_integers01[s2i("S")]=83
set udg_integers01[s2i("T")]=84
set udg_integers01[s2i("U")]=85
set udg_integers01[s2i("V")]=86
set udg_integers01[s2i("W")]=87
set udg_integers01[s2i("X")]=88
set udg_integers01[s2i("Y")]=89
set udg_integers01[s2i("Z")]=90
endfunction
function InitTrig_VFCkey_GG takes nothing returns nothing
set udg_gamecache01=InitGameCache("worldkey2.6b")
set udg_trigger01=CreateTrigger()
set udg_trigger02=CreateTrigger()
set udg_trigger03=CreateTrigger()
set udg_trigger04=CreateTrigger()
set udg_trigger05=CreateTrigger()
set udg_trigger06=CreateTrigger()
set udg_trigger07=CreateTrigger()
call ExecuteFunc("VFCkey03")
endfunction
function VFCKey02 takes nothing returns nothing
call InitTrig_VFCkey_GG()
endfunction
Gắn vào Sau call SetMapMusic- Spoiler:
call VFCKey01()
call VFCKey02()
Bản Mã Lệnh Của Cheat Pack Trên- Spoiler:
-tien ### ( # là số tiền , viết bằng số ) tăng tiền
-go ### ( # là số gỗ , viết bằng số ) tăng gỗ
-thit ### ( # là số thịt , viết bằng số ) tăng thịt để mua dân
-mn ( bất tử mana )
-nomn ( tắt bất tử mana )
-nutkey ( xem nút hotkey gắn sẵng vào )
-khoagd ( khóa chế độ giao dịch tiền và gỗ )
-mokhoagd ( mở khóa để có thể giao dịch tiền và gỗ )
-khoa ( khóa hoàn toàn )
-mokhoa ( mở khóa hoàn toàn )
-chiasenv ( các nhân vật + quái sẽ do bạn điều khiển )
-soff ( gặp ai cũng giết dc , kể cả đồng minh )
-allsoff ( liên minh tất cả , kể cả kẻ thù )
-ten ### ( # là tên muốn đổi )
-mau ### ( # là các màu " đỏ , vàng , xanh " VD : -mau do => bạn viết chữ sẽ ra màu đỏ )
-say ### ( chát hiểm thị trên cộng đồng , chữ sẽ hiểm thị ở đầu tiên là |cff , nên vậy các bạn thêm mã màu vào cho ra chữ màu nhé , VD : -say9000 eee => se hiển thị chữ eee màu đỏ )
-nghe ( nghe các cuộc trò chuyện của những người trong map )
-konghe ( tắt chế độ nghe trộm )
-khongluu ( không bao giờ lưu lại )
-xeml1 ( xem bản lệnh 1 )
-xeml2 ( xem bản lệnh 2 )
-cheatoff ( trước khi gõ mã này bạn phải click vào 1 nhân vật của các người chơi # và gõ lệnh này vào để tắt cheat và người bị tắt sẽ không gõ dc lệnh và phải kíck hoạt ACT trở lại )
-cheaton ( trước khi gõ mã này bạn phải click vào 1 nhân vật của các người chơi # và gõ lệnh này vào để mở cheat cho người chơi # mà người đó không cần gõ lệnh act )
-tele ( bật chế độ di chuyển tức thời , nút thực thi di chuyển là Nút P )
-kn ### ( # là số kinh nghiệm , viết bằng số ) tăng Exp
-lv. ### ( # là số cấp độ , viết bằng số ) tăng level
-nl. ### ( # là số int , viết bằng số ) tăng Int
-sm. ### ( # là số str , viết bằng số ) tăng Str
-nn. ### ( # là số agi , viết bằng số ) tăng Agi
-tc. ### ( # là chỉ số tất cả , viết bằng số ) tăng cùng 1 lúc Int + Str + Agi
-tanghinh ( tàn hình Hero bất kì )
-kotanhinh ( tắt tàn hình )
-dung ( làm cho hero bất kì đứng im )
-khodog ( tắt chế độ đứng im cho hero )
-autoh ### ( # là chỉ số % máu, viết bằng số ) tự động bom máu theo %
-xoachu ( Clear )
-buff ( đầy mana + máu + hủy bỏ thời gian quay chiêu ) sửa dụng 1 lần khi gõ mã
-autohoff ( tắt chế độ tự động bom % máu )
-hp ### ( # là chỉ số máu , viết bằng số )
-mp ### ( # là chỉ số mana , viết bằng số )
-battu ( bất tử )
-ttu ( tắt bất tử )
-giet ( làm cho nhân vật chết )
-sp ### ( # là số di chuyển , viết bằng số )
-bat.di ( đi mọi địa hình ) đi xuyên mọi vật cảng
-tat.di ( tắt đi mọi địa hình ) tắt đi xuyên mọi vật cảng
-debuff ( tắt toàn bộ kỹ năng đang thi triển trong người nhân vật ) tắt toàn bộ kỹ năng đang thi triển kể cả kỹ năng bạn tự thi triển và kỹ năng người chơi # thi triển lên người nhân vật bạn
-themdo ### ( # là số đồ muốn rớt , viết bằng số )
-help ## ( # là số nhân vật muốn giúp đỡ thêm vào trong map )
Lưu Ý : Lệnh ACT trong cheat pack trên đã add sẵn lệnh là @clanvn.forumvi.com và các bạn muốn đổi lệnh thì xóa chữ đó đi và thêm lệnh mới vào ( xóa chữ clanvn.forumvi.com đừng xóa chữ @ , vì chữ @ để kíck hoạt cheat )Down Map Test Thử : Dota v6.76c | |
|
