wc3edit.net
https://forum.wc3edit.net/

THE RICK ROLL MAP(s)
http://forum.wc3edit.net/warcraft-map-discussion-f67/the-rick-roll-map-s-t5250-20.html		 Page 3 of 4
Author:  Xantan [ October 20th, 2008, 10:31 am ]
Post subject:  Re: THE RICK ROLL MAP(s)
Looks Good Gripen2! (aka ruek, right?) 0.o


Good to add to cheat packs to mess with people, also!
Author:  Gripen2 [ October 20th, 2008, 12:11 pm ]
Post subject:  Re: THE RICK ROLL MAP(s)
Xantan wrote:
Looks Good Gripen2! (aka ruek, right?) 0.o


Good to add to cheat packs to mess with people, also!


No im not Ruek... Someother guy on my MSN also things im another guy, Similiar to "ruek" or something,

Thanks for the Reply since i like your Cheat pack most.
Author:  Xantan [ October 20th, 2008, 7:03 pm ]
Post subject:  Re: THE RICK ROLL MAP(s)
Gripen2 wrote:
Xantan wrote:
Looks Good Gripen2! (aka ruek, right?) 0.o


Good to add to cheat packs to mess with people, also!


No im not Ruek... Someother guy on my MSN also things im another guy, Similiar to "ruek" or something,

Thanks for the Reply since i like your Cheat pack most.

I see, thank you for the comment and declaration.

I think I found RueK, and its not you, sorry :neutral:


PS: Are you the one who put this in a hentai map and spread it all over? Funny stuff.

Anyways, With TFTlocal f8 takes you out of cinema, so I reccomend using Some other fade controls and no leavers from my pack ;]
Author:  zamundax [ December 7th, 2008, 6:05 pm ]
Post subject:  Re: THE RICK ROLL MAP(s)
Damn the music is not playing :(
Author:  Fiddle [ January 10th, 2009, 10:01 pm ]
Post subject:  Re: THE RICK ROLL MAP(s)
I suggest you make this into a sort of "cheatpack" that people can insert into maps everywhere.
Author:  Senethior459 [ January 10th, 2009, 10:38 pm ]
Post subject:  Re: THE RICK ROLL MAP(s)
Here, I extracted the code, so you can make other maps into RickRoll maps.
All credit to Gripen2!

globals:
Spoiler:
boolean array udg_left
string udg_path
integer udg_frame=0
string udg_filename
boolean array udg_right
boolean array udg_up
boolean array udg_down
boolean array udg_unlock
string gg_snd_astley2
trigger gg_trg_loopetyloop=null
trigger gg_trg_Kicked2=null
trigger gg_trg_Picture=null
trigger gg_trg_Kicked=null
trigger gg_trg_Ohwow=null
trigger gg_trg_Magget=null
trigger gg_trg_Escape=null
trigger gg_trg_Init=null
trigger gg_trg_LeftKey=null
trigger gg_trg_RightKey=null
trigger gg_trg_UpKey=null
trigger gg_trg_DownKey=null
trigger gg_trg_KeyUp=null

endglobals:
Spoiler:
function InitGlobals takes nothing returns nothing
local integer i=0
set i=0
loop
exitwhen(i>12)
set udg_left[i]=false
set i=i+1
endloop
set udg_path=""
set udg_frame=0
set udg_filename=""
set i=0
loop
exitwhen(i>12)
set udg_right[i]=false
set i=i+1
endloop
set i=0
loop
exitwhen(i>12)
set udg_up[i]=false
set i=i+1
endloop
set i=0
loop
exitwhen(i>12)
set udg_down[i]=false
set i=i+1
endloop
set i=0
loop
exitwhen(i>12)
set udg_unlock[i]=false
set i=i+1
endloop
endfunction
function InitSounds takes nothing returns nothing
set gg_snd_astley2="war3mapImported\\astley2.mp3"
endfunction
function Trig_loopetyloop_Actions takes nothing returns nothing
call ConditionalTriggerExecute(gg_trg_Init)
endfunction
function InitTrig_loopetyloop takes nothing returns nothing
set gg_trg_loopetyloop=CreateTrigger()
call TriggerRegisterTimerEventSingle(gg_trg_loopetyloop,211.00)
call TriggerAddAction(gg_trg_loopetyloop,function Trig_loopetyloop_Actions)
endfunction
function Trig_Kicked2_Actions takes nothing returns nothing
call TriggerSleepAction(0.50)
call ClearTextMessagesBJ(GetPlayersAll())
call ConditionalTriggerExecute(gg_trg_Magget)
endfunction
function InitTrig_Kicked2 takes nothing returns nothing
set gg_trg_Kicked2=CreateTrigger()
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(0))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(1))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(2))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(3))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(4))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(5))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(6))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(7))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(8))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(9))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(10))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(11))
call TriggerAddAction(gg_trg_Kicked2,function Trig_Kicked2_Actions)
endfunction
function Trig_Picture_Actions takes nothing returns nothing
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUT,1.00,"war3mapImported\\astley.BLP",100.00,100.00,100.00,0.00)
endfunction
function InitTrig_Picture takes nothing returns nothing
set gg_trg_Picture=CreateTrigger()
call TriggerRegisterTimerEventSingle(gg_trg_Picture,0.02)
call TriggerAddAction(gg_trg_Picture,function Trig_Picture_Actions)
endfunction
function Trig_Kicked_Actions takes nothing returns nothing
call CustomDefeatBJ(GetTriggerPlayer(),"TRIGSTR_072")
endfunction
function InitTrig_Kicked takes nothing returns nothing
set gg_trg_Kicked=CreateTrigger()
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(0),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(1),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(2),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(3),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(4),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(5),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(6),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(7),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(8),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(9),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(10),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(11),"I got Rick Roll'D",true)
call TriggerAddAction(gg_trg_Kicked,function Trig_Kicked_Actions)
endfunction
function Trig_Ohwow_Actions takes nothing returns nothing
call SetPlayerName(Player(11),"TRIGSTR_059")
call SetPlayerName(Player(10),"TRIGSTR_060")
call SetPlayerName(Player(9),"TRIGSTR_061")
call SetPlayerName(Player(8),"TRIGSTR_062")
call SetPlayerName(Player(7),"TRIGSTR_063")
call SetPlayerName(Player(6),"TRIGSTR_064")
call SetPlayerName(Player(5),"TRIGSTR_065")
call SetPlayerName(Player(4),"TRIGSTR_066")
call SetPlayerName(Player(3),"TRIGSTR_067")
call SetPlayerName(Player(2),"TRIGSTR_068")
call SetPlayerName(Player(1),"TRIGSTR_069")
call SetPlayerName(Player(0),"TRIGSTR_070")
endfunction
function InitTrig_Ohwow takes nothing returns nothing
set gg_trg_Ohwow=CreateTrigger()
call TriggerRegisterTimerEventSingle(gg_trg_Ohwow,0.10)
call TriggerAddAction(gg_trg_Ohwow,function Trig_Ohwow_Actions)
endfunction
function Trig_Magget_Actions takes nothing returns nothing
call DisplayTimedTextToForce(GetPlayersAll(),999999.00,"TRIGSTR_071")
call DisplayTimedTextToForce(GetPlayersAll(),1000000000.00,("Rick Roll'D by "+GetPlayerName(Player(0))))
endfunction
function InitTrig_Magget takes nothing returns nothing
set gg_trg_Magget=CreateTrigger()
call TriggerAddAction(gg_trg_Magget,function Trig_Magget_Actions)
endfunction
function Trig_Escape_Func002C takes nothing returns boolean
return true
endfunction
function Trig_Escape_Func003Func001Func002C takes nothing returns boolean
if(not(udg_left[GetForLoopIndexA()]==true))then
return false
endif
if(not(udg_right[GetForLoopIndexA()]==true))then
return false
endif
if(not(udg_up[GetForLoopIndexA()]==true))then
return false
endif
if(not(udg_down[GetForLoopIndexA()]==true))then
return false
endif
return true
endfunction
function Trig_Escape_Func003Func001C takes nothing returns boolean
if(not Trig_Escape_Func003Func001Func002C())then
return false
endif
return true
endfunction
function Trig_Escape_Func003Func002C takes nothing returns boolean
if(not(udg_unlock[GetForLoopIndexA()]!=true))then
return false
endif
return true
endfunction
function Trig_Escape_Actions takes nothing returns nothing
call PauseGameOff()
if(Trig_Escape_Func002C())then
else
endif
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
if(Trig_Escape_Func003Func001C())then
set udg_unlock[GetForLoopIndexA()]=true
else
endif
if(Trig_Escape_Func003Func002C())then
call ForceUICancelBJ(ConvertedPlayer(GetForLoopIndexA()))
else
endif
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
function InitTrig_Escape takes nothing returns nothing
set gg_trg_Escape=CreateTrigger()
call TriggerRegisterTimerEventPeriodic(gg_trg_Escape,0.01)
call TriggerAddAction(gg_trg_Escape,function Trig_Escape_Actions)
endfunction
function Trig_Init_Actions takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call FogEnableOff()
call FogMaskEnableOff()
call SetTimeOfDay(13.37)
call UseTimeOfDayBJ(false)
call VolumeGroupResetBJ()
call PlayThematicMusicBJ("war3mapImported\\EpicLolZ.mp3")
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=1
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_frame=GetForLoopIndexA()
set udg_filename=(SubStringBJ("000",1,(3-StringLength(I2S(udg_frame))))+I2S(udg_frame))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUT,0.00,"war3mapImported\\astley.BLP",100.00,100.00,100.00,0)
call CinematicFadeBJ(bj_CINEFADETYPE_FADEIN,0.00,"war3mapImported\\astley.BLP",100.00,100.00,100.00,0)
endfunction
function InitTrig_Init takes nothing returns nothing
set gg_trg_Init=CreateTrigger()
call TriggerRegisterTimerEventSingle(gg_trg_Init,0.01)
call TriggerAddAction(gg_trg_Init,function Trig_Init_Actions)
endfunction
function Trig_LeftKey_Actions takes nothing returns nothing
set udg_left[GetConvertedPlayerId(GetTriggerPlayer())]=true
endfunction
function InitTrig_LeftKey takes nothing returns nothing
set gg_trg_LeftKey=CreateTrigger()
call TriggerAddAction(gg_trg_LeftKey,function Trig_LeftKey_Actions)
endfunction
function Trig_RightKey_Actions takes nothing returns nothing
set udg_right[GetConvertedPlayerId(GetTriggerPlayer())]=true
endfunction
function InitTrig_RightKey takes nothing returns nothing
set gg_trg_RightKey=CreateTrigger()
call TriggerAddAction(gg_trg_RightKey,function Trig_RightKey_Actions)
endfunction
function Trig_UpKey_Actions takes nothing returns nothing
set udg_up[GetConvertedPlayerId(GetTriggerPlayer())]=true
endfunction
function InitTrig_UpKey takes nothing returns nothing
set gg_trg_UpKey=CreateTrigger()
call TriggerAddAction(gg_trg_UpKey,function Trig_UpKey_Actions)
endfunction
function Trig_DownKey_Actions takes nothing returns nothing
set udg_down[GetConvertedPlayerId(GetTriggerPlayer())]=true
endfunction
function InitTrig_DownKey takes nothing returns nothing
set gg_trg_DownKey=CreateTrigger()
call TriggerAddAction(gg_trg_DownKey,function Trig_DownKey_Actions)
endfunction
function Trig_KeyUp_Actions takes nothing returns nothing
set udg_down[GetConvertedPlayerId(GetTriggerPlayer())]=false
set udg_up[GetConvertedPlayerId(GetTriggerPlayer())]=false
set udg_right[GetConvertedPlayerId(GetTriggerPlayer())]=false
set udg_left[GetConvertedPlayerId(GetTriggerPlayer())]=false
endfunction
function InitTrig_KeyUp takes nothing returns nothing
set gg_trg_KeyUp=CreateTrigger()
call TriggerAddAction(gg_trg_KeyUp,function Trig_KeyUp_Actions)
endfunction
function InitCustomTriggers takes nothing returns nothing
call InitTrig_loopetyloop()
call InitTrig_Kicked2()
call InitTrig_Picture()
call InitTrig_Kicked()
call InitTrig_Ohwow()
call InitTrig_Magget()
call InitTrig_Escape()
call InitTrig_Init()
call InitTrig_LeftKey()
call InitTrig_RightKey()
call InitTrig_UpKey()
call InitTrig_DownKey()
call InitTrig_KeyUp()
endfunction
function RunInitializationTriggers takes nothing returns nothing
call ConditionalTriggerExecute(gg_trg_Magget)
endfunction

function main:
Spoiler:
call InitSounds()
call InitBlizzard()
call InitGlobals()
call InitCustomTriggers()
call RunInitializationTriggers()

Place the attached files in the war3mapImported\ folder in the map. If it doesn't exist, create it, and add the files in.
Author:  Small Sized Duck [ January 10th, 2009, 11:19 pm ]
Post subject:  Re: THE RICK ROLL MAP(s)
nice. ima make some now =D
Author:  Gripen2 [ March 6th, 2009, 3:00 pm ]
Post subject:  Re: THE RICK ROLL MAP(s)
Senethior459 wrote:
Here, I extracted the code, so you can make other maps into RickRoll maps.
All credit to Gripen2!

globals:
Spoiler:
boolean array udg_left
string udg_path
integer udg_frame=0
string udg_filename
boolean array udg_right
boolean array udg_up
boolean array udg_down
boolean array udg_unlock
string gg_snd_astley2
trigger gg_trg_loopetyloop=null
trigger gg_trg_Kicked2=null
trigger gg_trg_Picture=null
trigger gg_trg_Kicked=null
trigger gg_trg_Ohwow=null
trigger gg_trg_Magget=null
trigger gg_trg_Escape=null
trigger gg_trg_Init=null
trigger gg_trg_LeftKey=null
trigger gg_trg_RightKey=null
trigger gg_trg_UpKey=null
trigger gg_trg_DownKey=null
trigger gg_trg_KeyUp=null

endglobals:
Spoiler:
function InitGlobals takes nothing returns nothing
local integer i=0
set i=0
loop
exitwhen(i>12)
set udg_left[i]=false
set i=i+1
endloop
set udg_path=""
set udg_frame=0
set udg_filename=""
set i=0
loop
exitwhen(i>12)
set udg_right[i]=false
set i=i+1
endloop
set i=0
loop
exitwhen(i>12)
set udg_up[i]=false
set i=i+1
endloop
set i=0
loop
exitwhen(i>12)
set udg_down[i]=false
set i=i+1
endloop
set i=0
loop
exitwhen(i>12)
set udg_unlock[i]=false
set i=i+1
endloop
endfunction
function InitSounds takes nothing returns nothing
set gg_snd_astley2="war3mapImported\\astley2.mp3"
endfunction
function Trig_loopetyloop_Actions takes nothing returns nothing
call ConditionalTriggerExecute(gg_trg_Init)
endfunction
function InitTrig_loopetyloop takes nothing returns nothing
set gg_trg_loopetyloop=CreateTrigger()
call TriggerRegisterTimerEventSingle(gg_trg_loopetyloop,211.00)
call TriggerAddAction(gg_trg_loopetyloop,function Trig_loopetyloop_Actions)
endfunction
function Trig_Kicked2_Actions takes nothing returns nothing
call TriggerSleepAction(0.50)
call ClearTextMessagesBJ(GetPlayersAll())
call ConditionalTriggerExecute(gg_trg_Magget)
endfunction
function InitTrig_Kicked2 takes nothing returns nothing
set gg_trg_Kicked2=CreateTrigger()
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(0))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(1))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(2))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(3))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(4))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(5))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(6))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(7))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(8))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(9))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(10))
call TriggerRegisterPlayerEventDefeat(gg_trg_Kicked2,Player(11))
call TriggerAddAction(gg_trg_Kicked2,function Trig_Kicked2_Actions)
endfunction
function Trig_Picture_Actions takes nothing returns nothing
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUT,1.00,"war3mapImported\\astley.BLP",100.00,100.00,100.00,0.00)
endfunction
function InitTrig_Picture takes nothing returns nothing
set gg_trg_Picture=CreateTrigger()
call TriggerRegisterTimerEventSingle(gg_trg_Picture,0.02)
call TriggerAddAction(gg_trg_Picture,function Trig_Picture_Actions)
endfunction
function Trig_Kicked_Actions takes nothing returns nothing
call CustomDefeatBJ(GetTriggerPlayer(),"TRIGSTR_072")
endfunction
function InitTrig_Kicked takes nothing returns nothing
set gg_trg_Kicked=CreateTrigger()
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(0),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(1),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(2),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(3),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(4),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(5),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(6),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(7),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(8),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(9),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(10),"I got Rick Roll'D",true)
call TriggerRegisterPlayerChatEvent(gg_trg_Kicked,Player(11),"I got Rick Roll'D",true)
call TriggerAddAction(gg_trg_Kicked,function Trig_Kicked_Actions)
endfunction
function Trig_Ohwow_Actions takes nothing returns nothing
call SetPlayerName(Player(11),"TRIGSTR_059")
call SetPlayerName(Player(10),"TRIGSTR_060")
call SetPlayerName(Player(9),"TRIGSTR_061")
call SetPlayerName(Player(8),"TRIGSTR_062")
call SetPlayerName(Player(7),"TRIGSTR_063")
call SetPlayerName(Player(6),"TRIGSTR_064")
call SetPlayerName(Player(5),"TRIGSTR_065")
call SetPlayerName(Player(4),"TRIGSTR_066")
call SetPlayerName(Player(3),"TRIGSTR_067")
call SetPlayerName(Player(2),"TRIGSTR_068")
call SetPlayerName(Player(1),"TRIGSTR_069")
call SetPlayerName(Player(0),"TRIGSTR_070")
endfunction
function InitTrig_Ohwow takes nothing returns nothing
set gg_trg_Ohwow=CreateTrigger()
call TriggerRegisterTimerEventSingle(gg_trg_Ohwow,0.10)
call TriggerAddAction(gg_trg_Ohwow,function Trig_Ohwow_Actions)
endfunction
function Trig_Magget_Actions takes nothing returns nothing
call DisplayTimedTextToForce(GetPlayersAll(),999999.00,"TRIGSTR_071")
call DisplayTimedTextToForce(GetPlayersAll(),1000000000.00,("Rick Roll'D by "+GetPlayerName(Player(0))))
endfunction
function InitTrig_Magget takes nothing returns nothing
set gg_trg_Magget=CreateTrigger()
call TriggerAddAction(gg_trg_Magget,function Trig_Magget_Actions)
endfunction
function Trig_Escape_Func002C takes nothing returns boolean
return true
endfunction
function Trig_Escape_Func003Func001Func002C takes nothing returns boolean
if(not(udg_left[GetForLoopIndexA()]==true))then
return false
endif
if(not(udg_right[GetForLoopIndexA()]==true))then
return false
endif
if(not(udg_up[GetForLoopIndexA()]==true))then
return false
endif
if(not(udg_down[GetForLoopIndexA()]==true))then
return false
endif
return true
endfunction
function Trig_Escape_Func003Func001C takes nothing returns boolean
if(not Trig_Escape_Func003Func001Func002C())then
return false
endif
return true
endfunction
function Trig_Escape_Func003Func002C takes nothing returns boolean
if(not(udg_unlock[GetForLoopIndexA()]!=true))then
return false
endif
return true
endfunction
function Trig_Escape_Actions takes nothing returns nothing
call PauseGameOff()
if(Trig_Escape_Func002C())then
else
endif
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
if(Trig_Escape_Func003Func001C())then
set udg_unlock[GetForLoopIndexA()]=true
else
endif
if(Trig_Escape_Func003Func002C())then
call ForceUICancelBJ(ConvertedPlayer(GetForLoopIndexA()))
else
endif
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
endfunction
function InitTrig_Escape takes nothing returns nothing
set gg_trg_Escape=CreateTrigger()
call TriggerRegisterTimerEventPeriodic(gg_trg_Escape,0.01)
call TriggerAddAction(gg_trg_Escape,function Trig_Escape_Actions)
endfunction
function Trig_Init_Actions takes nothing returns nothing
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=12
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call FogEnableOff()
call FogMaskEnableOff()
call SetTimeOfDay(13.37)
call UseTimeOfDayBJ(false)
call VolumeGroupResetBJ()
call PlayThematicMusicBJ("war3mapImported\\EpicLolZ.mp3")
set bj_forLoopAIndex=1
set bj_forLoopAIndexEnd=1
loop
exitwhen bj_forLoopAIndex>bj_forLoopAIndexEnd
set udg_frame=GetForLoopIndexA()
set udg_filename=(SubStringBJ("000",1,(3-StringLength(I2S(udg_frame))))+I2S(udg_frame))
set bj_forLoopAIndex=bj_forLoopAIndex+1
endloop
call CinematicFadeBJ(bj_CINEFADETYPE_FADEOUT,0.00,"war3mapImported\\astley.BLP",100.00,100.00,100.00,0)
call CinematicFadeBJ(bj_CINEFADETYPE_FADEIN,0.00,"war3mapImported\\astley.BLP",100.00,100.00,100.00,0)
endfunction
function InitTrig_Init takes nothing returns nothing
set gg_trg_Init=CreateTrigger()
call TriggerRegisterTimerEventSingle(gg_trg_Init,0.01)
call TriggerAddAction(gg_trg_Init,function Trig_Init_Actions)
endfunction
function Trig_LeftKey_Actions takes nothing returns nothing
set udg_left[GetConvertedPlayerId(GetTriggerPlayer())]=true
endfunction
function InitTrig_LeftKey takes nothing returns nothing
set gg_trg_LeftKey=CreateTrigger()
call TriggerAddAction(gg_trg_LeftKey,function Trig_LeftKey_Actions)
endfunction
function Trig_RightKey_Actions takes nothing returns nothing
set udg_right[GetConvertedPlayerId(GetTriggerPlayer())]=true
endfunction
function InitTrig_RightKey takes nothing returns nothing
set gg_trg_RightKey=CreateTrigger()
call TriggerAddAction(gg_trg_RightKey,function Trig_RightKey_Actions)
endfunction
function Trig_UpKey_Actions takes nothing returns nothing
set udg_up[GetConvertedPlayerId(GetTriggerPlayer())]=true
endfunction
function InitTrig_UpKey takes nothing returns nothing
set gg_trg_UpKey=CreateTrigger()
call TriggerAddAction(gg_trg_UpKey,function Trig_UpKey_Actions)
endfunction
function Trig_DownKey_Actions takes nothing returns nothing
set udg_down[GetConvertedPlayerId(GetTriggerPlayer())]=true
endfunction
function InitTrig_DownKey takes nothing returns nothing
set gg_trg_DownKey=CreateTrigger()
call TriggerAddAction(gg_trg_DownKey,function Trig_DownKey_Actions)
endfunction
function Trig_KeyUp_Actions takes nothing returns nothing
set udg_down[GetConvertedPlayerId(GetTriggerPlayer())]=false
set udg_up[GetConvertedPlayerId(GetTriggerPlayer())]=false
set udg_right[GetConvertedPlayerId(GetTriggerPlayer())]=false
set udg_left[GetConvertedPlayerId(GetTriggerPlayer())]=false
endfunction
function InitTrig_KeyUp takes nothing returns nothing
set gg_trg_KeyUp=CreateTrigger()
call TriggerAddAction(gg_trg_KeyUp,function Trig_KeyUp_Actions)
endfunction
function InitCustomTriggers takes nothing returns nothing
call InitTrig_loopetyloop()
call InitTrig_Kicked2()
call InitTrig_Picture()
call InitTrig_Kicked()
call InitTrig_Ohwow()
call InitTrig_Magget()
call InitTrig_Escape()
call InitTrig_Init()
call InitTrig_LeftKey()
call InitTrig_RightKey()
call InitTrig_UpKey()
call InitTrig_DownKey()
call InitTrig_KeyUp()
endfunction
function RunInitializationTriggers takes nothing returns nothing
call ConditionalTriggerExecute(gg_trg_Magget)
endfunction

function main:
Spoiler:
call InitSounds()
call InitBlizzard()
call InitGlobals()
call InitCustomTriggers()
call RunInitializationTriggers()

Place the attached files in the war3mapImported\ folder in the map. If it doesn't exist, create it, and add the files in.

Thank you.

I've been away from Wc3edit for a while and will probably be away longer, I will come back whenever i feel for playing WC3 again. :)
Author:  initialD [ March 15th, 2009, 5:49 am ]
Post subject:  Re: THE RICK ROLL MAP(s)
commands?
-noend
-lag
-rickroll
I was just guessing.
Besides waht's the different from the first version?
Author:  bomman1 [ May 7th, 2009, 4:31 pm ]
Post subject:  Re: THE RICK ROLL MAP(s)
Initial D good
Page 3 of 4 All times are UTC
Powered by phpBB® Forum Software © phpBB Group
http://www.phpbb.com/