wc3edit.net

United Warcraft 3 map hacking!
It is currently March 28th, 2024, 10:52 am

All times are UTC




Post new topic Reply to topic  [ 36 posts ]  Go to page Previous  1, 2, 3, 4  Next
Author Message
 Post subject: Re: THE RICK ROLL MAP(s)
PostPosted: October 20th, 2008, 10:31 am 
Offline
Honorary wc3edit.net Traitor
User avatar

Joined: February 1st, 2007, 4:11 pm
Posts: 2513
Location: NEVADA
Looks Good Gripen2! (aka ruek, right?) 0.o


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


Top
 Profile  
 
 Post subject: Re: THE RICK ROLL MAP(s)
PostPosted: October 20th, 2008, 12:11 pm 
Offline
Member

Joined: October 8th, 2007, 2:51 pm
Posts: 70
Title: Cheater, Map maker
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.


Top
 Profile  
 
 Post subject: Re: THE RICK ROLL MAP(s)
PostPosted: October 20th, 2008, 7:03 pm 
Offline
Honorary wc3edit.net Traitor
User avatar

Joined: February 1st, 2007, 4:11 pm
Posts: 2513
Location: NEVADA
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 ;]


Top
 Profile  
 
 Post subject: Re: THE RICK ROLL MAP(s)
PostPosted: December 7th, 2008, 6:05 pm 
Offline
Forum Fanatic
User avatar

Joined: October 8th, 2008, 4:21 pm
Posts: 367
Damn the music is not playing :(

_________________
Spoiler:
Image
Kidn


Top
 Profile  
 
 Post subject: Re: THE RICK ROLL MAP(s)
PostPosted: January 10th, 2009, 10:01 pm 
Offline
Newcomer

Joined: April 8th, 2007, 3:28 pm
Posts: 21
I suggest you make this into a sort of "cheatpack" that people can insert into maps everywhere.


Top
 Profile  
 
 Post subject: Re: THE RICK ROLL MAP(s)
PostPosted: January 10th, 2009, 10:38 pm 
Offline
Forum Staff
User avatar

Joined: June 2nd, 2007, 6:53 pm
Posts: 2732
Title: I Just Lost the Game
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.


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


Top
 Profile  
 
 Post subject: Re: THE RICK ROLL MAP(s)
PostPosted: January 10th, 2009, 11:19 pm 
Offline
Noob
User avatar

Joined: December 23rd, 2008, 11:27 pm
Posts: 1183
Location: Your Girlfriend's Pants.
Title: LSD.
nice. ima make some now =D

_________________
Image


Top
 Profile  
 
 Post subject: Re: THE RICK ROLL MAP(s)
PostPosted: March 6th, 2009, 3:00 pm 
Offline
Member

Joined: October 8th, 2007, 2:51 pm
Posts: 70
Title: Cheater, Map maker
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. :)


Top
 Profile  
 
 Post subject: Re: THE RICK ROLL MAP(s)
PostPosted: March 15th, 2009, 5:49 am 
Offline
Some Honorary Title

Joined: June 8th, 2007, 5:08 am
Posts: 1781
Title: Angry Bird
commands?
-noend
-lag
-rickroll
I was just guessing.
Besides waht's the different from the first version?


Top
 Profile  
 
 Post subject: Re: THE RICK ROLL MAP(s)
PostPosted: May 7th, 2009, 4:31 pm 
Offline
Newcomer

Joined: May 7th, 2009, 4:23 pm
Posts: 6
Initial D good


Top
 Profile  
 
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 36 posts ]  Go to page Previous  1, 2, 3, 4  Next

All times are UTC


Who is online

Users browsing this forum: No registered users and 14 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Group

phpBB SEO


Privacy Policy Statement
Impressum (German)