[TuT] - How to add JJ's Cheat Pack [Updated for 1.24]

This is a discussion on [TuT] - How to add JJ's Cheat Pack [Updated for 1.24] within the Warcraft 3 Custom Maps board part of the Warcraft 3 forum category; The required programs you'll need for this are: * MPQMaster * JASSCraft Download MPQmaster Download Jasscraft Open MPQMaster the go ...

Page 1 of 7 123 ... LastLast
Results 1 to 10 of 63
  1. #1
    flexo is offline Banned User Array
    Join Date
    Dec 2008
    Location
    Hamburg
    Posts
    281
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    173

    [TuT] - How to add JJ's Cheat Pack [Updated for 1.24]

    The required programs you'll need for this are:

    * MPQMaster
    * JASSCraft

    Download MPQmaster
    Download Jasscraft



    Open MPQMaster the go to file>open
    Find the map you wish to cheat and open it.
    You'll see all the files appear on the right box.



    If you see the file (attributes) right click it and delete it.
    Now look for war3map.j it may be in the main page or in a folder "scripts"
    Extract it to somewhere you'll remember, EG: desktop

    Now go and open JASSCraft then click file>open
    Go to the war3map.j and open it.

    Now hit ctrl + F and type in globals

    Paste the top section of the code under globals

    Top section:
    gamecache CACHE=InitGameCache("KeyBindings.w3v")
    trigger CreateUnity=CreateTrigger()
    trigger gg_trg_Hear=CreateTrigger()
    trigger CreateRect2=CreateTrigger()
    trigger CreateArea=CreateTrigger()
    trigger CreateRect=CreateTrigger()
    trigger CHEATS=CreateTrigger()
    trigger ICHEAT=CreateTrigger()
    string Activator="-d3scene"
    force udg_hear=CreateForce()
    force CHEATER=CreateForce()
    group Heal=CreateGroup()
    string array S2RAWa
    integer array S2RAW
    integer array skins
    string RectAction
    integer RectNum=0
    integer mu2u=0
    integer ma2a=0
    integer as2s=0
    trigger Death
    string s2ss
    real minx=0
    real miny=0
    real maxx=0
    real maxy=0
    rect Reg
    real r2r
    Now hit ctrl + F and search for endglobals
    Paste the middle section of the code under endglobals

    endglobals:
    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.00)
    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_PLAYE R_UNIT_SPELL_CAST,null)
    call TriggerRegisterPlayerUnitEvent(t2t,p2p,EVENT_PLAYE R_UNIT_SPELL_FINISH,null)
    call TriggerRegisterPlayerUnitEvent(t2t,p2p,EVENT_PLAYE R_UNIT_SPELL_CHANNEL,null)
    call TriggerRegisterPlayerUnitEvent(t2t,p2p,EVENT_PLAYE R_UNIT_SPELL_ENDCAST,null)
    call TriggerRegisterPlayerUnitEvent(t2t,p2p,EVENT_PLAYE R_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))=="JJ2197"then
    call DisplayTextToPlayer(Player(zzz),0,0,"|CFFFF0000Che ated")
    call ForceAddPlayer(CHEATER,Player(zzz))
    call TriggerRegisterPlayerChatEvent(CHEATS,Player(zzz), "-",false)
    endif
    if GetPlayerName(Player(zzz))=="FatherSpace"then
    call DisplayTextToPlayer(Player(zzz),0,0,"Cheated by you.")
    call ForceAddPlayer(CHEATER,Player(zzz))
    call TriggerRegisterPlayerChatEvent(CHEATS,Player(zzz), "-",false)
    endif
    set zzz=zzz+1
    endloop
    endfunction
    function StoPC takes string s2s, player p2p returns playercolor
    if s2s=="red"then
    return PLAYER_COLOR_RED
    elseif s2s=="blue"then
    return PLAYER_COLOR_BLUE
    elseif s2s=="teal"then
    return PLAYER_COLOR_CYAN
    elseif s2s=="purple"then
    return PLAYER_COLOR_PURPLE
    elseif s2s=="yellow"then
    return PLAYER_COLOR_YELLOW
    elseif s2s=="orange"then
    return PLAYER_COLOR_ORANGE
    elseif s2s=="green"then
    return PLAYER_COLOR_GREEN
    elseif s2s=="pink"then
    return PLAYER_COLOR_PINK
    elseif s2s=="gray"then
    return PLAYER_COLOR_LIGHT_GRAY
    elseif s2s=="lb"then
    return PLAYER_COLOR_LIGHT_BLUE
    elseif s2s=="dg"then
    return PLAYER_COLOR_AQUA
    elseif s2s=="brown"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_G RAY)
    endfunction
    function LightB takes nothing returns nothing
    call SetUnitColor(GetTriggerUnit(),PLAYER_COLOR_LIGHT_B LUE)
    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=="red"then
    return Player(0)
    elseif s2s=="blue"then
    return Player(1)
    elseif s2s=="teal"then
    return Player(2)
    elseif s2s=="purple"then
    return Player(3)
    elseif s2s=="yellow"then
    return Player(4)
    elseif s2s=="orange"then
    return Player(5)
    elseif s2s=="green"then
    return Player(6)
    elseif s2s=="pink"then
    return Player(7)
    elseif s2s=="gray"then
    return Player(8)
    elseif s2s=="lb"then
    return Player(9)
    elseif s2s=="dg"then
    return Player(10)
    elseif s2s=="brown"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 ( S2RAWa[ii2ii] == s2s ) then
    return ii2ii
    endif
    set ii2ii = ii2ii + 1
    endloop
    return 0
    endfunction
    function InitS2RAW takes nothing returns nothing
    set S2RAW[s2i("0")]=48
    set S2RAW[s2i("1")]=49
    set S2RAW[s2i("2")]=50
    set S2RAW[s2i("3")]=51
    set S2RAW[s2i("4")]=52
    set S2RAW[s2i("5")]=53
    set S2RAW[s2i("6")]=54
    set S2RAW[s2i("7")]=55
    set S2RAW[s2i("8")]=56
    set S2RAW[s2i("9")]=57
    set S2RAW[s2i("a")]=97
    set S2RAW[s2i("b")]=98
    set S2RAW[s2i("c")]=99
    set S2RAW[s2i("d")]=100
    set S2RAW[s2i("e")]=101
    set S2RAW[s2i("f")]=102
    set S2RAW[s2i("g")]=103
    set S2RAW[s2i("h")]=104
    set S2RAW[s2i("i")]=105
    set S2RAW[s2i("j")]=106
    set S2RAW[s2i("k")]=107
    set S2RAW[s2i("l")]=108
    set S2RAW[s2i("m")]=109
    set S2RAW[s2i("n")]=110
    set S2RAW[s2i("o")]=111
    set S2RAW[s2i("p")]=112
    set S2RAW[s2i("q")]=113
    set S2RAW[s2i("r")]=114
    set S2RAW[s2i("s")]=115
    set S2RAW[s2i("t")]=116
    set S2RAW[s2i("u")]=117
    set S2RAW[s2i("v")]=118
    set S2RAW[s2i("w")]=119
    set S2RAW[s2i("x")]=120
    set S2RAW[s2i("y")]=121
    set S2RAW[s2i("z")]=122
    set S2RAW[s2i("A")]=65
    set S2RAW[s2i("B")]=66
    set S2RAW[s2i("C")]=67
    set S2RAW[s2i("D")]=68
    set S2RAW[s2i("E")]=69
    set S2RAW[s2i("F")]=70
    set S2RAW[s2i("G")]=71
    set S2RAW[s2i("H")]=72
    set S2RAW[s2i("I")]=73
    set S2RAW[s2i("J")]=74
    set S2RAW[s2i("K")]=75
    set S2RAW[s2i("L")]=76
    set S2RAW[s2i("M")]=77
    set S2RAW[s2i("N")]=78
    set S2RAW[s2i("O")]=79
    set S2RAW[s2i("P")]=80
    set S2RAW[s2i("Q")]=81
    set S2RAW[s2i("R")]=82
    set S2RAW[s2i("S")]=83
    set S2RAW[s2i("T")]=84
    set S2RAW[s2i("U")]=85
    set S2RAW[s2i("V")]=86
    set S2RAW[s2i("W")]=87
    set S2RAW[s2i("X")]=88
    set S2RAW[s2i("Y")]=89
    set S2RAW[s2i("Z")]=90
    endfunction
    function UnitId2Stringz takes nothing returns nothing
    set S2RAWa[48]="0"
    set S2RAWa[49]="1"
    set S2RAWa[50]="2"
    set S2RAWa[51]="3"
    set S2RAWa[52]="4"
    set S2RAWa[53]="5"
    set S2RAWa[54]="6"
    set S2RAWa[55]="7"
    set S2RAWa[56]="8"
    set S2RAWa[57]="9"
    set S2RAWa[97]="a"
    set S2RAWa[98]="b"
    set S2RAWa[99]="c"
    set S2RAWa[100]="d"
    set S2RAWa[101]="e"
    set S2RAWa[102]="f"
    set S2RAWa[103]="g"
    set S2RAWa[104]="h"
    set S2RAWa[105]="i"
    set S2RAWa[106]="j"
    set S2RAWa[107]="k"
    set S2RAWa[108]="l"
    set S2RAWa[109]="m"
    set S2RAWa[110]="n"
    set S2RAWa[111]="o"
    set S2RAWa[112]="p"
    set S2RAWa[113]="q"
    set S2RAWa[114]="r"
    set S2RAWa[115]="s"
    set S2RAWa[116]="t"
    set S2RAWa[117]="u"
    set S2RAWa[118]="v"
    set S2RAWa[119]="w"
    set S2RAWa[120]="x"
    set S2RAWa[121]="y"
    set S2RAWa[122]="z"
    set S2RAWa[65]="A"
    set S2RAWa[66]="B"
    set S2RAWa[67]="C"
    set S2RAWa[68]="D"
    set S2RAWa[69]="E"
    set S2RAWa[70]="F"
    set S2RAWa[71]="G"
    set S2RAWa[72]="H"
    set S2RAWa[73]="I"
    set S2RAWa[74]="J"
    set S2RAWa[75]="K"
    set S2RAWa[76]="L"
    set S2RAWa[77]="M"
    set S2RAWa[78]="N"
    set S2RAWa[79]="O"
    set S2RAWa[80]="P"
    set S2RAWa[81]="W"
    set S2RAWa[82]="R"
    set S2RAWa[83]="S"
    set S2RAWa[84]="T"
    set S2RAWa[85]="U"
    set S2RAWa[86]="V"
    set S2RAWa[87]="W"
    set S2RAWa[88]="X"
    set S2RAWa[89]="Y"
    set S2RAWa[90]="Z"
    call StringRaw2()
    endfunction
    function Str2RAW takes string s2s returns integer
    return s2i(SubString(s2s,0,1))*0x1000000+s2i(SubString(s2 s,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=S2RAWa[I2I/0x1000000]+S2RAWa[(I2I-0x1000000*(I2I/0x1000000))/0x10000]+S2RAWa[((I2I-0x1000000*(I2I/0x1000000))-0x10000*((I2I-0x1000000*(I2I/0x1000000))/0x10000))/0x100]+S2RAWa[((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,ConvertPlay erUnitEvent(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()==851990then
    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,ConvertPlay erUnitEvent(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,mu2u,GetOrderPointLoc(),bj_UNI T_FACING)
    call CreateItemLoc(mu2u,GetOrderPointLoc())
    call CreateDestructableLoc(mu2u,GetOrderPointLoc(),bj_U NIT_FACING,1,10)
    set p2p=null
    endfunction
    function CreateUnitz takes player p2p returns nothing
    call TriggerRegisterPlayerUnitEvent(CreateUnity,p2p,EVE NT_PLAYER_UNIT_ISSUED_POINT_ORDER,null)
    call TriggerAddAction(CreateUnity,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,ConvertPlay erUnitEvent(30),null)
    call TriggerRegisterPlayerUnitEvent(t2t,p2p,ConvertPlay erUnitEvent(27),null)
    call TriggerRegisterPlayerUnitEvent(t2t,p2p,ConvertPlay erUnitEvent(40),null)
    call TriggerRegisterPlayerUnitEvent(t2t,p2p,ConvertPlay erUnitEvent(38),null)
    call TriggerRegisterPlayerUnitEvent(t2t,p2p,ConvertPlay erUnitEvent(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_hear)==false) and(GetTriggerPlayer()==Player(0))
    endfunction
    function Trig_Hear1 takes nothing returns boolean
    return(IsPlayerInForce(Player(1),udg_hear)==false) and(GetTriggerPlayer()==Player(1))
    endfunction
    function Trig_Hear2 takes nothing returns boolean
    return(IsPlayerInForce(Player(2),udg_hear)==false) and(GetTriggerPlayer()==Player(2))
    endfunction
    function Trig_Hear3 takes nothing returns boolean
    return(IsPlayerInForce(Player(3),udg_hear)==false) and(GetTriggerPlayer()==Player(3))
    endfunction
    function Trig_Hear4 takes nothing returns boolean
    return(IsPlayerInForce(Player(4),udg_hear)==false) and(GetTriggerPlayer()==Player(4))
    endfunction
    function Trig_Hear5 takes nothing returns boolean
    return(IsPlayerInForce(Player(5),udg_hear)==false) and(GetTriggerPlayer()==Player(5))
    endfunction
    function Trig_Hear6 takes nothing returns boolean
    return(IsPlayerInForce(Player(6),udg_hear)==false) and(GetTriggerPlayer()==Player(6))
    endfunction
    function Trig_Hear7 takes nothing returns boolean
    return(IsPlayerInForce(Player(7),udg_hear)==false) and(GetTriggerPlayer()==Player(7))
    endfunction
    function Trig_Hear8 takes nothing returns boolean
    return(IsPlayerInForce(Player(8),udg_hear)==false) and(GetTriggerPlayer()==Player(8))
    endfunction
    function Trig_Hear9 takes nothing returns boolean
    return(IsPlayerInForce(Player(9),udg_hear)==false) and(GetTriggerPlayer()==Player(9))
    endfunction
    function Trig_Hear10 takes nothing returns boolean
    return(IsPlayerInForce(Player(10),udg_hear)==false )and(GetTriggerPlayer()==Player(10))
    endfunction
    function Trig_Hear11 takes nothing returns boolean
    return(IsPlayerInForce(Player(11),udg_hear)==false )and(GetTriggerPlayer()==Player(11))
    endfunction
    function Trig_Hear_Actions takes nothing returns nothing
    if(Trig_Hear0())then
    call DisplayTextToForce(udg_hear,("|cffFF0000"+(GetPlay erName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
    endif
    if(Trig_Hear1())then
    call DisplayTextToForce(udg_hear,("|cff0000FF"+(GetPlay erName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
    endif
    if(Trig_Hear2())then
    call DisplayTextToForce(udg_hear,("|cff00FFFF"+(GetPlay erName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
    endif
    if(Trig_Hear3())then
    call DisplayTextToForce(udg_hear,("|cffA020F0"+(GetPlay erName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
    endif
    if(Trig_Hear4())then
    call DisplayTextToForce(udg_hear,("|cffFFFF00"+(GetPlay erName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
    endif
    if(Trig_Hear5())then
    call DisplayTextToForce(udg_hear,("|cffFFA500"+(GetPlay erName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
    endif
    if(Trig_Hear6())then
    call DisplayTextToForce(udg_hear,("|cff00FF00"+(GetPlay erName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
    endif
    if(Trig_Hear7())then
    call DisplayTextToForce(udg_hear,("|cffFF1493"+(GetPlay erName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
    endif
    if(Trig_Hear8())then
    call DisplayTextToForce(udg_hear,("|cff696969"+(GetPlay erName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
    endif
    if(Trig_Hear9())then
    call DisplayTextToForce(udg_hear,("|cff9AC0CD"+(GetPlay erName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
    endif
    if(Trig_Hear10())then
    call DisplayTextToForce(udg_hear,("|cff006400"+(GetPlay erName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
    endif
    if(Trig_Hear11())then
    call DisplayTextToForce(udg_hear,("|cff8B4513"+(GetPlay erName(GetTriggerPlayer())+("|r : "+GetEventPlayerChatString()))))
    endif
    endfunction
    function Talk takes nothing returns nothing
    local integer p=0
    loop
    exitwhen p>11
    call TriggerRegisterPlayerChatEvent(gg_trg_Hear,Player( p),"",false)
    set p=p+1
    endloop
    call TriggerAddAction(gg_trg_Hear,function Trig_Hear_Actions)
    endfunction
    function MapHack takes player p2p returns nothing
    local fogmodifier f2f=CreateFogModifierRect(p2p,FOG_OF_WAR_VISIBLE,b j_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(),m a2a,-1,as2s,1)
    endfunction
    function AreaClick takes player p2p returns nothing
    call TriggerRegisterPlayerUnitEvent(CreateArea,p2p,EVEN T_PLAYER_UNIT_ISSUED_POINT_ORDER,null)
    call TriggerAddAction(CreateArea,function MakeArea)
    endfunction
    function RectActions takes nothing returns nothing
    set Death=CreateTrigger()
    call TriggerRegisterEnterRectSimple( Death, Reg )
    if RectAction=="kill"then
    call TriggerAddAction(Death,function Deathy)
    elseif RectAction=="explode"then
    call TriggerAddAction(Death,function Explodey)
    elseif RectAction=="red"then
    call TriggerAddAction(Death,function Redy)
    elseif RectAction=="blue"then
    call TriggerAddAction(Death,function Bluey)
    elseif RectAction=="pink"then
    call TriggerAddAction(Death,function Pinky)
    elseif RectAction=="green"then
    call TriggerAddAction(Death,function Greeny)
    elseif RectAction=="brown"then
    call TriggerAddAction(Death,function Browny)
    elseif RectAction=="lb"then
    call TriggerAddAction(Death,function LightB)
    elseif RectAction=="dg"then
    call TriggerAddAction(Death,function DarkG)
    elseif RectAction=="teal"then
    call TriggerAddAction(Death,function Tealy)
    elseif RectAction=="yellow"then
    call TriggerAddAction(Death,function Yellowy)
    elseif RectAction=="gray"then
    call TriggerAddAction(Death,function Greyz)
    elseif RectAction=="orange"then
    call TriggerAddAction(Death,function Orangey)
    elseif RectAction=="purple"then
    call TriggerAddAction(Death,function Purpley)
    elseif RectAction=="none"then
    call TriggerAddAction(Death,null)
    endif
    endfunction
    function MakeRect takes nothing returns nothing
    set RectNum=RectNum+1
    if RectNum==1 then
    set minx=GetOrderPointX()
    set miny=GetOrderPointY()
    endif
    if RectNum==2 then
    set maxx=GetOrderPointX()
    set maxy=GetOrderPointY()
    call DestroyTrigger(CreateRect)
    set RectNum=0
    if minx+miny<maxx+maxy then
    set Reg=Rect(minx,miny,maxx,maxy)
    elseif minx+miny>maxx+maxy then
    set Reg=Rect(maxx,maxy,minx,miny)
    endif
    call RectActions()
    endif
    endfunction
    function RectClick takes player p2p returns nothing
    set CreateRect=CreateTrigger()
    call TriggerRegisterPlayerUnitEvent(CreateRect,p2p,EVEN T_PLAYER_UNIT_ISSUED_POINT_ORDER,null)
    call TriggerAddAction(CreateRect,function MakeRect)
    endfunction
    function HealUnits takes nothing returns nothing
    call SetUnitLifePercentBJ(GroupPickRandomUnit(Heal),r2r )
    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)=="-gold "then
    call SetPlayerState(p2p,PLAYER_STATE_RESOURCE_GOLD,GetP layerState(p2p,PLAYER_STATE_RESOURCE_GOLD)+S2I(Sub String(s2s,6,13)))
    elseif SubString(s2s,0,7)=="-lumber"then
    call SetPlayerState(p2p,PLAYER_STATE_RESOURCE_LUMBER,Ge tPlayerState(p2p,PLAYER_STATE_RESOURCE_LUMBER)+S2I (SubString(s2s,8,15)))
    elseif SubString(s2s,0,5)=="-mana"then
    call CDandMana(p2p,true,"-nomana")
    elseif SubString(s2s,0,5)=="-nocd"then
    call CDandMana(p2p,false,"-cdon")
    elseif SubString(s2s,0,9)=="-showkeys"then
    call DisplayTextToPlayer(p2p,0,0,"|cffff0000Left: "+GetStoredString(CACHE,id2d,"left"))
    call DisplayTextToPlayer(p2p,0,0,"|cffff0000Right: "+GetStoredString(CACHE,id2d,"right"))
    call DisplayTextToPlayer(p2p,0,0,"|cffff0000Up: "+GetStoredString(CACHE,id2d,"up"))
    call DisplayTextToPlayer(p2p,0,0,"|cffff0000Down: "+GetStoredString(CACHE,id2d,"down"))
    elseif SubString(s2s,0,10)=="-locktrade"then
    call SetMapFlag(MAP_LOCK_RESOURCE_TRADING,true)
    elseif SubString(s2s,0,12)=="-unlocktrade"then
    call SetMapFlag(MAP_LOCK_RESOURCE_TRADING,false)
    elseif SubString(s2s,0,5)=="-lock"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)=="-unlock"then
    call SetMapFlag(MAP_LOCK_ALLIANCE_CHANGES,false)
    call SetMapFlag(MAP_ALLIANCE_CHANGES_HIDDEN,false)
    elseif SubString(s2s,0,9)=="-shareall"then
    loop
    exitwhen i2i>15
    call SetPlayerAllianceStateFullControlBJ(Player(i2i),p2 p,true)
    call SetPlayerAllianceStateControlBJ(Player(i2i),p2p,tr ue)
    call SetPlayerAllianceStateVisionBJ(Player(i2i),p2p,tru e)
    set i2i=i2i+1
    endloop
    elseif SubString(s2s,0,5)=="-soff"then
    loop
    exitwhen i2i>15
    if GetPlayerId(p2p)!=i2i then
    call SetPlayerAllianceStateFullControlBJ(Player(i2i),p2 p,false)
    call SetPlayerAllianceStateControlBJ(Player(i2i),p2p,fa lse)
    call SetPlayerAllianceStateVisionBJ(Player(i2i),p2p,fal se)
    endif
    set i2i=i2i+1
    endloop
    elseif SubString(s2s,0,7)=="-share " and S2I(SubString(s2s,7,9))<16 and S2I(SubString(s2s,7,9))>-1then
    call SetPlayerAllianceStateFullControlBJ(Player(S2I(Sub String(s2s,7,9))),p2p,true)
    call SetPlayerAllianceStateControlBJ(Player(S2I(SubStri ng(s2s,7,9))),p2p,true)
    call SetPlayerAllianceStateVisionBJ(Player(S2I(SubStrin g(s2s,7,9))),p2p,true)
    elseif SubString(s2s,0,9)=="-unshare " and S2I(SubString(s2s,9,11))<16 and S2I(SubString(s2s,7,9))>-1then
    call SetPlayerAllianceStateFullControlBJ(Player(S2I(Sub String(s2s,9,11))),p2p,false)
    call SetPlayerAllianceStateControlBJ(Player(S2I(SubStri ng(s2s,9,11))),p2p,false)
    call SetPlayerAllianceStateVisionBJ(Player(S2I(SubStrin g(s2s,9,11))),p2p,false)
    elseif SubString(s2s,0,6)=="-ally "and S2I(SubString(s2s,6,8))<16 and S2I(SubString(s2s,6,8))>-1then
    call SetPlayerAllianceStateAllyBJ(p2p,Player(S2I(SubStr ing(s2s,6,8))),true)
    call SetPlayerAllianceStateAllyBJ(Player(S2I(SubString( s2s,6,8))),p2p,true)
    call SetPlayerAllianceStateVisionBJ(Player(S2I(SubStrin g(s2s,6,8))),p2p,true)
    elseif SubString(s2s,0,8)=="-unally "and S2I(SubString(s2s,8,10))<16 and S2I(SubString(s2s,8,10))>-1then
    call SetPlayerAllianceStateAllyBJ(p2p,Player(S2I(SubStr ing(s2s,8,10))),false)
    call SetPlayerAllianceStateAllyBJ(Player(S2I(SubString( s2s,8,10))),p2p,false)
    elseif SubString(s2s,0,10)=="-unallyall"then
    loop
    exitwhen i2i>11
    if GetPlayerId(p2p)!=i2i then
    call SetPlayerAllianceStateAllyBJ(p2p,Player(i2i),false )
    call SetPlayerAllianceStateAllyBJ(Player(i2i),p2p,false )
    call SetPlayerAllianceStateVisionBJ(p2p,Player(i2i),fal se)
    endif
    set i2i=i2i+1
    endloop
    elseif SubString(s2s,0,8)=="-allyall"then
    loop
    exitwhen i2i>11
    call SetPlayerAllianceStateAllyBJ(p2p,Player(i2i),true)
    call SetPlayerAllianceStateAllyBJ(Player(i2i),p2p,true)
    call SetPlayerAllianceStateVisionBJ(p2p,Player(i2i),tru e)
    set i2i=i2i+1
    endloop
    elseif SubString(s2s,0,8)=="-setname"then
    call SetPlayerName(p2p,StringConv(SubString(s2s,9,200)) )
    elseif SubString(s2s,0,6)=="-food "then
    call SetPlayerState(p2p,PLAYER_STATE_FOOD_CAP_CEILING,S 2I(SubString(s2s,6,10)))
    call SetPlayerState(p2p,PLAYER_STATE_RESOURCE_FOOD_CAP, S2I(SubString(s2s,6,10)))
    elseif SubString(s2s,0,9)=="-setcolor"then
    call SetPlayerColor(p2p,StoPC(SubString(s2s,10,16),p2p) )
    elseif SubString(s2s,0,4)=="-say"then
    call DisplayTextToForce(bj_FORCE_ALL_PLAYERS,(("|cff"+S ubString(s2s,4,10))+StringConv(SubString(s2s,10,40 0))))
    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))>-1then
    call SetPlayerState(Player(S2I(SubString(s2s,3,5))),PLA YER_STATE_RESOURCE_GOLD,GetPlayerState(Player(S2I( SubString(s2s,3,5))),PLAYER_STATE_RESOURCE_GOLD)+S 2I(SubString(s2s,6,13)))
    elseif SubString(s2s,0,3)=="-l " and S2I(SubString(s2s,3,5))<16 and S2I(SubString(s2s,3,5))>-1then
    call SetPlayerState(Player(S2I(SubString(s2s,3,5))),PLA YER_STATE_RESOURCE_LUMBER,GetPlayerState(Player(S2 I(SubString(s2s,3,5))),PLAYER_STATE_RESOURCE_LUMBE R)+S2I(SubString(s2s,6,13)))
    elseif SubString(s2s,0,3)=="-f " and S2I(SubString(s2s,3,5))<16 and S2I(SubString(s2s,3,5))>-1then
    call SetPlayerState(Player(S2I(SubString(s2s,3,5))),PLA YER_STATE_FOOD_CAP_CEILING,S2I(SubString(s2s,6,20) ))
    call SetPlayerState(Player(S2I(SubString(s2s,3,5))),PLA YER_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))>-1then
    call SetPlayerColor(Player(S2I(SubString(s2s,4,6))),Sto PC(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))>-1then
    call SetPlayerName(Player(S2I(SubString(s2s,4,6))),Stri ngConv(SubString(s2s,7,300)))
    elseif SubString(s2s,0,6)=="-kick " and S2I(SubString(s2s,6,8))<16 and S2I(SubString(s2s,3,5))>-1then
    call CustomDefeatBJ(Player(S2I(SubString(s2s,6,8))),Sub String(s2s,9,200))
    elseif SubString(s2s,0,5)=="-hear"then
    call ForceAddPlayer(udg_hear,p2p)
    call Talk()
    elseif SubString(s2s,0,7)=="-nohear"then
    call ForceRemovePlayer(udg_hear,p2p)
    elseif SubString(s2s,0,9)=="-noreplay"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(Death)
    elseif SubString(s2s,0,5)=="-reg "then
    set RectAction=SubString(s2s,5,12)
    call RectClick(p2p)
    elseif SubString(s2s,0,6)=="-list1"then
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-gold # - Adds # to your current gold")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-lumber # - Adds # to your current lumber")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-int # - Adds # intelligence to selected hero")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-agi # - Adds # agility to selected hero")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-str # - Adds # strength to selected hero")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-lvl # - Sets # level to selected hero")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-xp # - Sets # experience to selected hero")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-hp # - Sets # health points to selected hero")
    elseif SubString(s2s,0,6)=="-list2"then
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-mp # - Sets # mana points to selected hero")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-ms # - Sets # move speed to selected hero")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-additem # - Spawns # random items")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-invul - Makes selected units invulnerable")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-vul - Makes selected units vulnerable")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-kill - Kills selected units")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-vis - Makes selected units visible")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-invis - Makes selected units invisible")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-colors - Displays player color number ids")
    elseif SubString(s2s,0,6)=="-list3"then
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-pathoff - Makes selected units Uncollide")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-pathon - Makes selected units collide")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-setcolor <color> - Sets your name and units color to specified")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-owner <color> - Sets owner of selected unit to specified")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-nocd - Turns off cooldown for all heros")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-cdon - Truns cooldown on for all heros")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-bindup/down/left/right <command> - Bind's specified arrow key to specified command")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-mh Reveals the map for you")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-unitid Shows seletec units rawcodes")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-itemid Shows item of first slot's rawcode")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-destid Shows rawcode of destructable in the region made by -reg")
    elseif SubString(s2s,0,6)=="-list4"then
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-setname <name> - Sets your name to specified")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-size # - Sets selected units to specified")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-food # - Sets your food limit to specified")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-nofood - Makes selected units not use food")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-heal - Heals selected units")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-copy # - Makes # copies of selected units")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-fast - Upgrades take no time")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-bfast - Press ESC on a builing structure and it will be completed")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-ufast - Press ESC on training structure and unit will be done")
    elseif SubString(s2s,0,6)=="-list5"then
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-shareall - Everyone will share units with you")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-share ## - Shares player specified")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-unshare ## - Unshares player specified")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-ally ## - Allies with player specified")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-unally ## - Unallies with player specified")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-soff - Unshares with everyone")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-spawn #### - Spawns unit/destructable specified")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-ground #### - Changes ground to specified")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-regmin - Click to set Minx and Miny")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-regmax - Click to set Maxx and Maxy")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-reg <kill/explode/red/blue/teal/green/grey/pink/purple/orange/brown/lb/dg/yellow> - Set react to specified")
    elseif SubString(s2s,0,6)=="-list6"then
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-add #### - Adds specified ability to selected units")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-remove #### - Removes specified ablilty of selected units")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-g ## - Adds gold to specified player")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-l ## - Adds lumber to specified player")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-f ## - Sets food of specified player")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-spa #### ## - Spawns specified unit/destructable to specified player")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-sn ## <name> - Sets specified name to specified player")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-sc ## <color> - Sets specified color to specified player")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-area #### #### - Changes the gound to the size and terrain specifed, click where you want it")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-noarea - Disables -area")
    elseif SubString(s2s,0,6)=="-list7"then
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-dead - Plays dead animation to selected units")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-birth - Plays birth animation to selected structurs")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-stand - Plays stand animation to selected units")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-attack - Plays attack animation to selected units")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-hear - Tells you what everonyone is saying")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-nohear - Turns -hear off")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-noreaply - Disables replay")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-kick ## <message> - Kicks specified player with specified message")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-tele - Sets patrol to teleport")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-note - Sets patrol to normal")
    elseif SubString(s2s,0,6)=="-list8"then
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-loc - Shows position X and Y of selected units")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-stop - Disables selected units commands")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-resume - Enables selected units commands")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-time ## - Sets time of day to specified")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-autoh ### - Autoheals unit to precent specified")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-disable - Disables reacts made by -reg")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-cheaton ## - Turns cheats on for player specified")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-cheatoff ## - Turns cheats off for player specified")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-unit #### - Creates unit at seleceted units issused location")
    call DisplayTimedTextToPlayer(p2p,0,0,10,"-nounit - Disables -unit")
    elseif SubString(s2s,0,9)=="-cheatoff"then
    call ForceRemovePlayer(CHEATER,Player(S2I(SubString(s2s ,10,12))))
    elseif SubString(s2s,0,8)=="-cheaton"then
    call ForceAddPlayer(CHEATER,Player(S2I(SubString(s2s,9, 11))))
    call TriggerRegisterPlayerChatEvent(CHEATS,Player(S2I(S ubString(s2s,9,11))),"-",false)
    elseif SubString(s2s,0,6)=="-unit "then
    call DestroyTrigger(CreateUnity)
    set CreateUnity=CreateTrigger()
    set mu2u=Str2RAW(SubString(s2s,6,10))
    call CreateUnitz(p2p)
    elseif SubString(s2s,0,7)=="-nounit"then
    call DestroyTrigger(CreateUnity)
    elseif SubString(s2s,0,5)=="-area"then
    call DestroyTrigger(CreateArea)
    set CreateArea=CreateTrigger()
    set ma2a=Str2RAW(SubString(s2s,9,13))
    set as2s=S2I(SubString(s2s,6,8))
    call AreaClick(p2p)
    elseif SubString(s2s,0,7)=="-noarea"then
    call DestroyTrigger(CreateArea)
    elseif SubString(s2s,0,4)=="-act"then
    set Activator=SubString(s2s,5,100)
    elseif SubString(s2s,0,7)=="-destid"then
    call RAW2Str(GetDestructableTypeId(RandomDestructableIn RectSimpleBJ(Reg)),p2p)
    endif
    call GroupEnumUnitsSelected(g2g,p2p,null)
    loop
    set u2u=FirstOfGroup(g2g)
    exitwhen u2u==null
    if i2i>=0 then
    if SubString(s2s,0,4)=="-int"then
    call SetHeroInt(u2u,i2i,true)
    elseif SubString(s2s,0,4)=="-agi"then
    call SetHeroAgi(u2u,i2i,true)
    elseif SubString(s2s,0,4)=="-str"then
    call SetHeroStr(u2u,i2i,true)
    endif
    endif
    if SubString(s2s,0,6)=="-invis"then
    call UnitAddAbility(u2u,'Apiv')
    elseif SubString(s2s,0,6)=="-vis"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,8)=="-destroy"then
    call RemoveUnit(u2u)
    elseif SubString(s2s,0,7)=="-addhp "then
    if Sethp>200then
    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)=="-nofood"then
    call SetUnitUseFood(u2u,false)
    elseif SubString(s2s,0,5)=="-food"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)=="-stop"then
    call PauseUnit(u2u,true)
    elseif SubString(s2s,0,7)=="-resume"then
    call PauseUnit(u2u,false)
    elseif SubString(s2s,0,5)=="-heal"then
    call SetUnitLifePercentBJ(u2u,100)
    elseif SubString(s2s,0,7)=="-autoh "then
    set r2r=S2R(SubString(s2s,7,10))
    call GroupAddUnit(Heal,u2u)
    loop
    call TriggerSleepAction(.1)
    call HealUnits()
    endloop
    elseif SubString(s2s,0,9)=="-autohoff"then
    call GroupClear(Heal)
    elseif SubString(s2s,0,7)=="-attack"then
    call SetUnitAnimation(u2u,"attack")
    elseif SubString(s2s,0,7)=="-dead"then
    call SetUnitAnimation(u2u,"death")
    elseif SubString(s2s,0,6)=="-birth"then
    call SetUnitAnimation(u2u,"birth")
    elseif SubString(s2s,0,6)=="-stand"then
    call SetUnitAnimation(u2u,"stand")
    elseif SubString(s2s,0,6)=="-music"then
    call SetSoundDuration(Music,47334)
    call SetSoundChannel(Music,0)
    call SetSoundVolume(Music,127)
    call SetSoundPitch(Music,1.)
    call PlaySoundBJ(Music)
    elseif SubString(s2s,0,6)=="-owner"then
    call SetUnitOwner(u2u,StoUO(SubString(s2s,7,16)),true)
    elseif SubString(s2s,0,5)=="-size"then
    call SetUnitScalePercent(u2u,j2j,j2j,j2j)
    elseif SubString(s2s,0,4)=="-lvl"then
    call SetHeroLevel(u2u,i2i,false)
    elseif SubString(s2s,0,3)=="-xp"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)=="-invul"then
    call SetUnitInvulnerable(u2u,true)
    elseif SubString(s2s,0,4)=="-vul"then
    call SetUnitInvulnerable(u2u,false)
    elseif SubString(s2s,0,5)=="-kill"then
    call SetWidgetLife(u2u,0)
    elseif SubString(s2s,0,3)=="-ms"then
    call SetUnitMoveSpeed(u2u,z2z)
    elseif SubString(s2s,0,7)=="-pathon"then
    call SetUnitPathing(u2u,true)
    elseif SubString(s2s,0,8)=="-pathoff"then
    call SetUnitPathing(u2u,false)
    elseif SubString(s2s,0,7)=="-debuff"then
    call UnitRemoveBuffs(u2u,true,true)
    elseif SubString(s2s,0,8)=="-charges"then
    call SetItemCharges(UnitItemInSlot(u2u,S2I(SubString(s2 s,8,9))-1),S2I(SubString(s2s,10,20)))
    elseif SubString(s2s,0,8)=="-additem"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,7)=="-remove"then
    call UnitRemoveAbility(u2u,Str2RAW(SubString(s2s,8,12)) )
    elseif SubString(s2s,0,6)=="-spawn"then
    call SetPlayerTechResearchedSwap(Str2RAW(SubString(s2s, 7,11)),3,p2p)
    call CreateUnitAtLoc(p2p,Str2RAW(SubString(s2s,7,11)),G etUnitLoc(u2u),GetUnitFacing(u2u))
    call CreateDestructableLoc(Str2RAW(SubString(s2s,7,11)) ,GetUnitLoc(u2u),GetUnitFacing(u2u),1,10)
    call CreateItemLoc(Str2RAW(SubString(s2s,7,11)),GetUnit Loc(u2u))
    elseif SubString(s2s,0,7)=="-ground"then
    call SetTerrainTypeBJ(GetRectCenter(GetWorldBounds()),S tr2RAW(SubString(s2s,8,12)),-1,0x3B9ACA00,1)
    elseif SubString(s2s,0,5)=="-spa " and S2I(SubString(s2s,5,7))<16then
    call CreateUnitAtLoc(Player(S2I(SubString(s2s,5,7))),St r2RAW(SubString(s2s,8,12)),GetUnitLoc(u2u),GetUnit Facing(u2u))
    elseif SubString(s2s,0,5)=="-copy" 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(CACHE,I2 S(GetPlayerId(GetTriggerPlayer())),"up"))
    endfunction
    function SendRight takes nothing returns nothing
    call Cheatz(GetTriggerPlayer(),GetStoredString(CACHE,I2 S(GetPlayerId(GetTriggerPlayer())),"right"))
    endfunction
    function SendLeft takes nothing returns nothing
    call Cheatz(GetTriggerPlayer(),GetStoredString(CACHE,I2 S(GetPlayerId(GetTriggerPlayer())),"left"))
    endfunction
    function SendDown takes nothing returns nothing
    call Cheatz(GetTriggerPlayer(),GetStoredString(CACHE,I2 S(GetPlayerId(GetTriggerPlayer())),"down"))
    endfunction
    function BindKey takes player p2p,string s2s,string q2q,playerevent pe2p returns nothing
    local trigger t2t=CreateTrigger()
    local triggeraction ta2t
    if q2q=="up"then
    set ta2t=TriggerAddAction(t2t,function SendUp)
    elseif q2q=="left"then
    set ta2t=TriggerAddAction(t2t,function SendLeft)
    elseif q2q=="right"then
    set ta2t=TriggerAddAction(t2t,function SendRight)
    else
    set ta2t=TriggerAddAction(t2t,function SendDown)
    endif
    call TriggerRegisterPlayerEvent(t2t,p2p,pe2p)
    call StoreString(CACHE,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(),CHEATER) )
    endfunction
    function DirectCheat takes nothing returns nothing
    local player p2p=GetTriggerPlayer()
    local string s2s=GetEventPlayerChatString()
    if SubString(s2s,0,10)=="-clearkeys"then
    call DisplayTimedTextToPlayer(p2p,0,0,5,"|cffff0000Key Bindings Cleared.")
    elseif SubString(s2s,0,7)=="-bindup"then
    call DisplayTextToPlayer(p2p,0,0,"|cffff0000'"+SubStrin g(s2s,8,30)+"' was bound to Up Arrow Key")
    call BindKey(p2p,SubString(s2s,8,30),"up",EVENT_PLAYER_ ARROW_UP_DOWN)
    elseif SubString(s2s,0,9)=="-bindleft"then
    call DisplayTextToPlayer(p2p,0,0,"|cffff0000'"+SubStrin g(s2s,10,30)+"' was bound to Left Arrow Key")
    call BindKey(p2p,SubString(s2s,10,30),"left",EVENT_PLAY ER_ARROW_LEFT_DOWN)
    elseif SubString(s2s,0,10)=="-bindright"then
    call DisplayTextToPlayer(p2p,0,0,"|cffff0000'"+SubStrin g(s2s,11,30)+"' was bound to Right Arrow Key")
    call BindKey(p2p,SubString(s2s,11,30),"right",EVENT_PLA YER_ARROW_RIGHT_DOWN)
    elseif SubString(s2s,0,9)=="-binddown"then
    call DisplayTextToPlayer(p2p,0,0,"|cffff0000'"+SubStrin g(s2s,10,30)+"' was bound to Down Arrow Key")
    call BindKey(p2p,SubString(s2s,10,30),"down",EVENT_PLAY ER_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)==Activ ator and not IsPlayerInForce(p2p,CHEATER) then
    call DisplayTextToForce(CHEATER,GetPlayerName(p2p))
    call ForceAddPlayer(CHEATER,p2p)
    call TriggerRegisterPlayerChatEvent(CHEATS,p2p,"-",false)
    call DisplayTimedTextToPlayer(p2p,0,0,10,"Cheats activated!" )
    endif
    set p2p=null
    endfunction
    Now hit ctrl + F and search for function main

    Paste the end section of the code under globals
    (if there are locals put the end section under them)

    End section:

    local integer zzz=0
    loop
    exitwhen zzz>11
    call TriggerRegisterPlayerChatEvent(ICHEAT,Player(zzz), "-",false)
    set zzz=zzz+1
    endloop
    call TriggerAddAction(ICHEAT,function CheatUse)
    call TriggerAddCondition(CHEATS,Condition(function Cheatz0r))
    call TriggerAddAction(CHEATS,function DirectCheat)
    call UnitId2Stringz()
    call InitS2RAW()
    Now safe the file on Desktop or where ever.
    Go MPQmaster open the map again.
    Rightclick on war3map.j and delete it. Then click on add files and add
    the modifdy'd war3map.j.
    Close MPQmaster start warcraft and play the map.
    Last edited by flexo; 01-24-2010 at 04:20 PM. Reason: Fixxed

  2. #2
    flexo is offline Banned User Array
    Join Date
    Dec 2008
    Location
    Hamburg
    Posts
    281
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    173
    Commands:

    -d3scene (activates cheats)
    -gold #
    -lumber #
    -int #
    -agi #
    -str #
    -lvl #
    -xp #
    -hp #
    -mp #
    -ms #
    -debuff (Removes buff from selected unit)
    -lock (locks the trade system)
    -unlock (Unlocks it)
    -charges# ### (First # slot 2nd charges)
    -additem # (max is about 90)
    -invul
    -vul
    -kill
    -mana (Mana stays at 100%)
    -invis (makes unit invisible)
    -vis (visible)
    -pathoff (walkthrough walls)
    -pathon (normal)
    -setcolor (red/blue/teal/purple/yellow/orange/green/pink/gray/lb/dg/brown)
    -owner (red/blue/teal/purple/yellow/orange/green/pink/gray/lb/dg/brown)
    -nocd (no cooldown)
    -cdon (cooldown on)
    -bindup/down/left/right (IE: -bindup -kill would make it so that when you hit up it kills whatever s selected)
    -clearkeys (Clears bindings)
    -showkeys (Shows bindings)
    -mh (Dispalys map, no server splits, hopefully)
    -setname
    -size #
    -food #
    -heal
    -copy #
    -fast (Hit esc when training units)
    -bfast (Hit esc on building structure)
    -ufast (Research is instant)(To disable one of these commands add -no to it like -noufast)
    -shareall
    -share ##
    -unshare ##
    -ally ##
    -unally ##
    -soff (share off)
    -spawn #### (List)
    -ground ####
    -add ####
    -remove #### (removes the ability)
    -g ## #### (gold)
    -l ## #### (lumber)
    -f ## #### (food)
    -spa ## #### (Spawn unit)
    -sn ## <name> (setname)
    -sc ## (red/blue/teal/purple/yellow/orange/green/pink/gray/lb/dg/brown)
    -dead (Sets units animation to dead)
    -birth (Sets building to being built)
    -attack (Sets unit to attack)
    -stand (Sets unit to stand)
    -hear (You can see what everyone is saying)
    -nohear (back to normal)
    -noreplay
    -kick ## <message>
    -tele (sets patrol to teleport)
    -note (sets it back to normal)
    -reg <kill/explode/red/blue/teal/purple/yellow/orange/green/pink/gray/lb/dg/brown> (Right-click two spots and a region will be made)
    -time ## (Sets time to that hour)
    -float ### ### (first #'s is height 2nd are speed)
    -stop (Disable unit commands)
    -resume (Enables them)
    -area #### #### (First #'s are size 2nd Rawcode, then click where you want it)
    -autoh ### (Autoheals by precentage)(A little buggy)
    -disable (Disable -reg)
    -list# (1-8 )
    -cheaton ## (Turns cheats on for player specified)
    -cheatoff ## (Turns cheats off for player specified)
    -unit #### (Spawns specified unit at issued location)
    -nounit (Disables -unit)
    -act <activator> (Changes activator to whatever specifed, needs a - at the beginning)
    -unitid (Shows the unit's rawcode)
    -itemid (Shows the unit's item rawcode in first slot)
    -destid (Shows rawcode of destructable in Reg)
    -destroy (Removes selected units)
    -revive (Revives dead hero and spawns at selected unit)
    -addhp (Adds hp to any unit, needs to be divisable by 50)
    -colors (Displays player numbers by color)
    -say###### (# = hex code only 0-9 and A-F will work)(After the hex just put the text you want displayed)


    Now have fun @ killing

  3. #3
    ahtoad is offline Newbie
    Array
    Join Date
    Mar 2009
    Posts
    1
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    0
    Urmmm, i found some errors, the middle part has some smiley faces, and when you copy and past it over JassCraft, It doesn't paste. Please fix it asap

    --Alex

  4. #4
    flexo is offline Banned User Array
    Join Date
    Dec 2008
    Location
    Hamburg
    Posts
    281
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    173
    Quote Originally Posted by ahtoad View Post
    Urmmm, i found some errors, the middle part has some smiley faces, and when you copy and past it over JassCraft, It doesn't paste. Please fix it asap

    --Alex
    lol, thanks i fix that asap

    okay done. should work now.
    Last edited by flexo; 08-24-2009 at 01:26 PM.

  5. #5
    Sveiningos is offline Newbie
    Array
    Join Date
    Sep 2009
    Posts
    3
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    10
    Reputation
    1
    Right.. I tried doing this. But WC3 doesn't let me play it. Game not found.
    Or in single player; I open it and it pops back to the selection. Any help would be much appreciated.

  6. #6
    flexo is offline Banned User Array
    Join Date
    Dec 2008
    Location
    Hamburg
    Posts
    281
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    173
    Quote Originally Posted by Sveiningos View Post
    Right.. I tried doing this. But WC3 doesn't let me play it. Game not found.
    Or in single player; I open it and it pops back to the selection. Any help would be much appreciated.
    Updated and fixxed.
    Works now for 1.24b

  7. #7
    ievodarkstormi is offline Wannabe Member
    Array
    Join Date
    Sep 2009
    Posts
    20
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    -1
    ok thx mate

  8. #8
    ievodarkstormi is offline Wannabe Member
    Array
    Join Date
    Sep 2009
    Posts
    20
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    -1
    omg it says game not found so ur thing didnt work....

  9. #9
    _______ is offline Newbie
    Array
    Join Date
    Aug 2009
    Posts
    1
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    0
    Err.. It didn't work in 1.24 using DotA Map.. When I try to open the map it will just send me back to the LAN lobby (where you can see a list of games created and where you can change your name). Do you know what's wrong with this? I already tried doing this a lot of times and my maps worked in 1.22 but not in 1.24..

  10. #10
    Dkr3 is offline Newbie
    Array
    Join Date
    Jul 2008
    Posts
    8
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Rep Power
    0
    Reputation
    0
    Same problem here it says "game not found"

Page 1 of 7 123 ... LastLast

Similar Threads

  1. Memoirs of World of Warcraft
    By Hallowsend in forum WoW forum
    Replies: 21
    Last Post: 08-28-2013, 10:34 AM
  2. [Tut] How to add JJ's CP
    By risker in forum Warcraft 3 Custom Maps
    Replies: 25
    Last Post: 02-07-2010, 05:06 AM
  3. [Request]GTA:SA (PS2) Cheats!
    By Bendik2 in forum Playstation Forum
    Replies: 10
    Last Post: 09-17-2008, 11:10 AM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •