THE RICK ROLL MAP(s)

General discussion of Warcraft 3. Threads may may be posted here if they don't fit into the other sections.

Moderator: Cheaters

User avatar
Xantan
Honorary wc3edit.net Traitor
Posts: 2507
Joined: February 1st, 2007, 4:11 pm
Location: NEVADA

Re: THE RICK ROLL MAP(s)

Post by Xantan »

Looks Good Gripen2! (aka ruek, right?) 0.o


Good to add to cheat packs to mess with people, also!
Gripen2
Member
Posts: 69
Joined: October 8th, 2007, 2:51 pm
Title: Cheater, Map maker

Re: THE RICK ROLL MAP(s)

Post by Gripen2 »

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.
User avatar
Xantan
Honorary wc3edit.net Traitor
Posts: 2507
Joined: February 1st, 2007, 4:11 pm
Location: NEVADA

Re: THE RICK ROLL MAP(s)

Post by Xantan »

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 ;]
User avatar
zamundax
Forum Fanatic
Posts: 342
Joined: October 8th, 2008, 4:21 pm

Re: THE RICK ROLL MAP(s)

Post by zamundax »

Damn the music is not playing :(
Spoiler:
Image
Kidn
Fiddle
Newcomer
Posts: 19
Joined: April 8th, 2007, 3:28 pm

Re: THE RICK ROLL MAP(s)

Post by Fiddle »

I suggest you make this into a sort of "cheatpack" that people can insert into maps everywhere.
User avatar
Senethior459
Forum Staff
Posts: 2618
Joined: June 2nd, 2007, 6:53 pm
Title: I Just Lost the Game

Re: THE RICK ROLL MAP(s)

Post by Senethior459 »

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=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=false
set i=i+1
endloop
set i=0
loop
exitwhen(i>12)
set udg_up=false
set i=i+1
endloop
set i=0
loop
exitwhen(i>12)
set udg_down=false
set i=i+1
endloop
set i=0
loop
exitwhen(i>12)
set udg_unlock=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.
You do not have the required permissions to view the files attached to this post.
My Warcraft III Tool Collection
If you want to chat/game with me:
Blizzard: Senethior459#1962
Discord: Kyle#7409
Steam: Spacekidkyle
User avatar
Small Sized Duck
Noob
Posts: 945
Joined: December 23rd, 2008, 11:27 pm
Title: LSD.
Location: Your Girlfriend's Pants.

Re: THE RICK ROLL MAP(s)

Post by Small Sized Duck »

nice. ima make some now =D
Image
Gripen2
Member
Posts: 69
Joined: October 8th, 2007, 2:51 pm
Title: Cheater, Map maker

Re: THE RICK ROLL MAP(s)

Post by Gripen2 »

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=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=false
set i=i+1
endloop
set i=0
loop
exitwhen(i>12)
set udg_up=false
set i=i+1
endloop
set i=0
loop
exitwhen(i>12)
set udg_down=false
set i=i+1
endloop
set i=0
loop
exitwhen(i>12)
set udg_unlock=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. :)
initialD
Some Honorary Title
Posts: 1713
Joined: June 8th, 2007, 5:08 am
Title: Angry Bird

Re: THE RICK ROLL MAP(s)

Post by initialD »

commands?
-noend
-lag
-rickroll
I was just guessing.
Besides waht's the different from the first version?
bomman1
Newcomer
Posts: 6
Joined: May 7th, 2009, 4:23 pm

Re: THE RICK ROLL MAP(s)

Post by bomman1 »

Initial D good