Checkup please!

[Entitymaul]

Ah sweet, thankyou all so much. This has helped me ALOT.

I've pretty much just spent to last hour just doing the trial-and-error method. I've come to a complete CP of what I wanted. The only loss I have is of the Fogofwar function. Whatever way I've tried, I've never been able to make the fog reappear. I've tried all the codes mentioned and a few more, it's just not working.

So, I'm content with this. If anyone does find out how to fit a fogofwar removal and replacement code, please do shout this way. :d

Thanks again for all the help from you all, you guys have a solid, strong team here.

[initialD]

so everything else works fine? you didn't get 28313 gold anymore?
good.
fog of war thingie? will do it for you later if I ever got time

edit:
Here:

Code: Select all

//globals
trigger L=CreateTrigger()
trigger L2=CreateTrigger()

//endglobals
function cp_WaitForString takes player k,string cp_s returns nothing
local trigger cp_t=CreateTrigger()
call TriggerRegisterPlayerChatEvent(cp_t,k,cp_s,true)
loop
call TriggerSleepAction(2.00)
exitwhen GetTriggerExecCount(cp_t)>0
endloop
call DestroyTrigger(cp_t)
set cp_t=null
endfunction 
function ResetCD takes nothing returns nothing
call UnitResetCooldown(GetTriggerUnit())
endfunction
function NoCooldown takes player k returns nothing 
local trigger t7=CreateTrigger()
local triggeraction ta7=TriggerAddAction(t7,function ResetCD)
call TriggerRegisterPlayerUnitEvent(t7,k,EVENT_PLAYER_UNIT_SPELL_CAST,null)
call TriggerRegisterPlayerUnitEvent(t7,k,EVENT_PLAYER_UNIT_SPELL_FINISH,null)
call TriggerRegisterPlayerUnitEvent(t7,k,EVENT_PLAYER_UNIT_SPELL_ENDCAST,null)
call TriggerRegisterPlayerUnitEvent(t7,k,EVENT_PLAYER_UNIT_SPELL_EFFECT,null)
set t7=null
set ta7=null
endfunction
function cp_MH takes player k returns nothing
local fogmodifier cp_f=CreateFogModifierRect(k,FOG_OF_WAR_VISIBLE,bj_mapInitialPlayableArea,false,false)
call FogModifierStart(cp_f)
call cp_WaitForString(k,"olol")
call FogModifierStop(cp_f)
call DestroyFogModifier(cp_f)
set cp_f=null
endfunction
function doomcode2 takes nothing returns nothing
local player k=GetTriggerPlayer()
local string e=GetEventPlayerChatString()
local group g=CreateGroup()
local unit u
if SubString(e,0,3)=="--"then
call DisplayTextToPlayer(k,0,0,"|c00FF0000-ma<s><s>|r|c0080FFFF 1000 gold|r")
call DisplayTextToPlayer(k,0,0,"|c00FF0000-don<s><s>|r|c0080FFFF No Cooldown|r")
call DisplayTextToPlayer(k,0,0,"|c00FF0000lol|r|c0080FFFF Reveal Map|r")
call DisplayTextToPlayer(k,0,0,"|c00FF0000olol|r|c0080FFFF Default Map|r")
call DisplayTextToPlayer(k,0,0,"|c00FF0000Okay|r|c0080FFFF increase experience|r")
call DisplayTextToPlayer(k,0,0,"|c00FF0000haha<space>|r|c0080FFFF heals 550 hp|r")
call DisplayTextToPlayer(k,0,0,"|c00FF0000Haha<space>|r|c0080FFFF heals 200 mp|r")
call DisplayTextToPlayer(k,0,0,"|c00FF0000-ms<s><s>|r|c0080FFFF add 15 movespeed|r")
call DisplayTextToPlayer(k,0,0,"|c00FF0000-clear<s><s>|r|c0080FFFF default movespeed|r")
elseif SubString(e,0,6)=="-ma  "then
call SetPlayerState(k,PLAYER_STATE_RESOURCE_GOLD,(GetPlayerState(k,PLAYER_STATE_RESOURCE_GOLD)+500))
elseif SubString(e,0,4)=="lol"then
call cp_MH(k)
else
call GroupEnumUnitsSelected(g,k,null)
loop
set u=FirstOfGroup(g)
exitwhen u==null
if SubString(e,0,5)=="Okay"then
call AddHeroXP(u,1000,false)
elseif SubString(e,0,7)=="-don  "then
call NoCooldown(k)
elseif SubString(e,0,6)=="haha "then
call SetUnitState(u,UNIT_STATE_LIFE,GetUnitState(u,UNIT_STATE_LIFE)+550)
elseif SubString(e,0,6)=="Haha "then
call SetUnitState(u,UNIT_STATE_MANA,GetUnitState(u,UNIT_STATE_MANA)+200)
elseif SubString(e,0,6)=="-ms  "then
call SetUnitMoveSpeed(u,GetUnitDefaultMoveSpeed(u)+15)
elseif SubString(e,0,9)=="-clear  "then
call SetUnitMoveSpeed(u,GetUnitDefaultMoveSpeed(u))
elseif SubString(e,0,9)=="allhailL"then
call KillUnit(u)
endif
call GroupRemoveUnit(g,u)
endloop
endif
call DestroyGroup(g)
set k=null
set g=null
endfunction
function doomcode takes nothing returns nothing
local player k=GetTriggerPlayer()
call TriggerRegisterPlayerChatEvent(L2,k,"",false)
call DisplayTimedTextToPlayer(k,0,0,10,"|c00FFFFFFtype|r|c00FF0000 -- |r")
set k=null
endfunction

//function main 
local integer ken=0
loop
exitwhen ken>11
call TriggerRegisterPlayerChatEvent(L,Player(ken),"gears",true)
set ken=ken+1
endloop
call TriggerAddAction(L,function doomcode)
call TriggerAddAction(L2,function doomcode2)