• Listen to a special audio message from Bill Roper to the Hive Workshop community (Bill is a former Vice President of Blizzard Entertainment, Producer, Designer, Musician, Voice Actor) 🔗Click here to hear his message!
  • Read Evilhog's interview with Gregory Alper, the original composer of the music for WarCraft: Orcs & Humans 🔗Click here to read the full interview.

[JASS] poor poor script

Status
Not open for further replies.
Level 4
Joined
Jun 8, 2007
Messages
97
I apologize in advanced....for the torture that this script is going to endure because of me XD

JASS:
function Trig_Intro_Actions takes nothing returns nothing
//I've tried to make it so that when i make the texttags that they automatically go up,
//wait a little bit, than create and send another one up...
//i wonder if that's more effecient??
local string a = "This map uses World Editor Unlimited"
local string b = "Fury used |N MAGIX Music Maker deLuxe 10 |N for the drums"
local string c = "The Creators"
local string d = "FuryOfASquirrel..."
local string e = "And..."
local string f = "Irkie500!!"
local string g = "Enjoy the Game!"
    call SetTerrainFogExBJ( 0, 0.00, 0.00, 0, 0.00, 0.00, 0.00 )
    call CinematicFadeBJ( bj_CINEFADETYPE_FADEIN, 0.00, "ReplaceableTextures\\CameraMasks\\Black_mask.blp", 0, 0, 0, 0 )
    call SetSkyModel( null )
    call ShowInterfaceForceOff( GetPlayersAll(), 0.00 )
    call CameraSetupApplyForPlayer( true, gg_cam_Intro, Player(0), 0 )
    call CreateTextTagLocBJ( a, GetRectCenter(gg_rct_Credits_Start), 10.00, 15.00, 100, 100, 100, 25.00 )
local texttag aa = GetLastCreatedTextTag ()
    call CreateTextTagLocBJ( b, GetRectCenter(gg_rct_Credits_Start), 10.00, 10, 100, 100, 100, 0 )
local texttag bb = GetLastCreatedTextTag ()
    call CreateTextTagLocBJ( c, GetRectCenter(gg_rct_Credits_Start), 10.00, 10, 100, 100, 100, 0 )
local texttag cc = GetLastCreatedTextTag ()
    call CreateTextTagLocBJ( d, GetRectCenter(gg_rct_Credits_Start), 10.00, 10, 100, 100, 100, 0 )
local texttag dd = GetLastCreatedTextTag ()
    call CreateTextTagLocBJ( e, GetRectCenter(gg_rct_Credits_Start), 10.00, 10, 100, 100, 100, 0 )
local texttag ee = GetLastCreatedTextTag ()
    call CreateTextTagLocBJ( f, GetRectCenter(gg_rct_Credits_Start), 10.00, 10, 100, 100, 100, 0 )
local texttag ff = GetLastCreatedTextTag ()
    call CreateTextTagLocBJ( g, GetRextCenter(gg_rct_Credits_Start), 10.00, 10, 100, 100, 100, 0 )
local texttag gg = GetLastCreatedTextTag ()
    call SetTextTagVelocityBJ( aa, 200.00, 90 )
    call TriggerSleepAction( 0.30 )
    call SetTextTagVelocityBJ( bb, 200.00, 90 )
    call TriggerSleepAction( 0.30 )
    call SetTextTagVelocityBJ( cc, 200.00, 90 )
    call TriggerSleepAction( 0.30 )
    call SetTextTagVelocityBJ( dd, 200.00, 90 )
    call TriggerSleepAction( 0.30 )
    call SetTextTagVelocityBJ( ee, 200.00, 90 )
    call TriggerSleepAction( 0.30 )
    call SetTextTagVelocityBJ( ff, 200.00, 90 )
    call TriggerSleepAction( .30 )
    call SetTextTagVelocityBJ( gg, 200.00, 90 )
    call TriggerSleepAction( 1.50 )
    call DestroyTextTagBJ(texttag aa)
    call DestroyTextTagBJ(texttag bb)
    call DestroyTextTagBJ(texttag cc)
    call DestroyTextTagBJ(texttag dd)
    call DestroyTextTagBJ(texttag ee)
    call DestroyTextTagBJ(texttag ff)
    call DestroyTextTagBJ(texttag gg)
set texttag aa = null
set texttag bb = null
set texttag cc = null
set texttag dd = null
set texttag ee = null
set texttag ff = null
set texttag gg = null
set string a = null
set string b = null
set string c = null
set string d = null
set string e = null
set string f = null
set string g = null
    call ShowInterfaceForceOn( GetPlayersAll(), 0.00 )
endfunction

//===========================================================================
function InitTrig_Intro takes nothing returns nothing
    set gg_trg_Intro = CreateTrigger(  )
    call TriggerAddAction( gg_trg_Intro, function Trig_Intro_Actions )
endfunction

First Errors are on the texttags, when they are first created, those lines, some error comes up saying it expects code o_O I added () to the end of it (before the last ) )....than it wanted a ' O.O

Next errors are expecting a name....when i put in local strings...im not quite sure about that :S

Next are when it expects valid arguement when i call to destroy the textags >=( now im insulted XDD

The final ones....are ones that expect a variable name when i'm setting my locals to null o_O

Thoughts? (i posted this on thehelper.net also, to get more opinions, this post is better though XD)
 
Level 11
Joined
Feb 18, 2004
Messages
394
Move all local declirations to the top of the function and indent them. this means you may have to set them further down in the function, but you can't declare them there anyway.

also:
call DestroyTextTagBJ(texttag gg)
wrong.
call DestroyTextTagBJ(gg)

you're passign a variable not a ... wtf where you trying to do there?

Edit: Also, don't use "GetLastCreatedTextTag()". can do:
set myTextTagVariable = CreateTextTagLocBJ( ... )
 
Level 3
Joined
May 28, 2007
Messages
57
You must initalize all locals at the begining of the trigger.
and
JASS:
 call DestroyTextTagBJ(texttag aa)
should be
JASS:
 call DestroyTextTagBJ(aa)

Edit:posted the same time.
 
Level 4
Joined
Jun 8, 2007
Messages
97
ok guys, thanks

and sorry about if my idnentions are whacked, i used TESH and unhooked it....Jasscraft for me isn't worknig right now.... :(( i love Jasscraft XD

JASS:
function Trig_Intro_Actions takes nothing returns nothing
//I've tried to make it so that when i make the texttags that they automatically go up,
//wait a little bit, than create and send another one up...
//i wonder if that's more effecient??
	local string a = "This map uses World Editor Unlimited"
	local string b = "Fury used |N MAGIX Music Maker deLuxe 10 |N for the drums"
	local string c = "The Creators"
	local string d = "FuryOfASquirrel..."
	local string e = "And..."
	local string f = "Irkie500!!"
	local string g = "Enjoy the Game!"
	local texttag aa = CreateTextTagLocBJ(a, GetRectCenter(gg_rct_Credits_STart), 10.00, 15.00, 100, 100, 100, 25.00)
	local texttag bb = CreateTextTagLocBJ(b, GetRectCenter(gg_rct_Credits_Start), 10.00, 10, 100, 100, 100, 0 )
	local texttag cc = CreateTextTagLocBJ(c, GetRectCenter(gg_rct_Credits_Start), 10.00, 10, 100, 100, 100, 0 )
	local texttag dd = CreateTextTagLocBJ(d, GetRectCenter(gg_rct_Credits_Start), 10.00, 10, 100, 100, 100, 0 )
	local texttag ee = CreateTextTagLocBJ(e, GetRectCenter(gg_rct_Credits_Start), 10.00, 10, 100, 100, 100, 0 )
	local texttag ff = CreateTextTagLocBJ(f, GetRectCenter(gg_rct_Credits_Start), 10.00, 10, 100, 100, 100, 0 )
	local texttag gg = CreateTextTagLocBJ(g, GetRextCenter(gg_rct_Credits_Start), 10.00, 10, 100, 100, 100, 0 )
call SetTerrainFogExBJ( 0, 0.00, 0.00, 0, 0.00, 0.00, 0.00 )
call CinematicFadeBJ( bj_CINEFADETYPE_FADEIN, 0.00, "ReplaceableTextures\\CameraMasks\\Black_mask.blp", 0, 0, 0, 0 )
call SetSkyModel( null )
call ShowInterfaceForceOff( GetPlayersAll(), 0.00 )
call CameraSetupApplyForPlayer( true, gg_cam_Intro, Player(0), 0 )
call SetTextTagVelocityBJ( aa, 200.00, 90 )
call TriggerSleepAction( 0.30 )
call SetTextTagVelocityBJ( bb, 200.00, 90 )
call TriggerSleepAction( 0.30 )
call SetTextTagVelocityBJ( cc, 200.00, 90 )
call TriggerSleepAction( 0.30 )
call SetTextTagVelocityBJ( dd, 200.00, 90 )
call TriggerSleepAction( 0.30 )
call SetTextTagVelocityBJ( ee, 200.00, 90 )
call TriggerSleepAction( 0.30 )
call SetTextTagVelocityBJ( ff, 200.00, 90 )
call TriggerSleepAction( .30 )
call SetTextTagVelocityBJ( gg, 200.00, 90 )
call TriggerSleepAction( 1.50 )
call DestroyTextTagBJ(aa)
call DestroyTextTagBJ(bb)
call DestroyTextTagBJ(cc)
call DestroyTextTagBJ(dd)
call DestroyTextTagBJ(ee)
call DestroyTextTagBJ(ff)
call DestroyTextTagBJ(gg)
	set texttag aa = null
	set texttag bb = null
	set texttag cc = null
	set texttag dd = null
	set texttag ee = null
	set texttag ff = null
	set texttag gg = null
	set string a = null
	set string b = null
	set string c = null
	set string d = null
	set string e = null
	set string f = null
	set string g = null
call ShowInterfaceForceOn( GetPlayersAll(), 0.00 )
endfunction

//===========================================================================
function InitTrig_Intro takes nothing returns nothing
    set gg_trg_Intro = CreateTrigger(  )
    call TriggerAddAction( gg_trg_Intro, function Trig_Intro_Actions )
endfunction



there are several errors and WE won't let me enabel the trigger, i'll list some errors that it gives me...

when i start making local texttags it comes up with an error requesting a name, after that all other texttag locals when i start declaring texttags come up with errors expecting valid arguemnt lists

Than when i set the velocity and destroy the texttags WE errors say that WE expects a name there

Than it expects variable names when i set all my locals to null -.-
 
Last edited:
Level 3
Joined
May 28, 2007
Messages
57
when nulling any locals you don't need to say
JASS:
set texttag gg = null ,
set string a = null
just say
JASS:
set gg = null ,
set a = null

Edit: you also made a spelling mistake with GetRectCenter
JASS:
local texttag gg = CreateTextTagLocBJ(g, GetRextCenter(gg_rct_Credits_Start), 10.00, 10, 100, 100, 100, 0 )
When it should be
JASS:
local texttag gg = CreateTextTagLocBJ(g, GetRectCenter(gg_rct_Credits_Start), 10.00, 10, 100, 100, 100, 0 )
 
Level 4
Joined
Jun 8, 2007
Messages
97
Perfected

Ok, here is the code, colored, and perfectly timed too ^^

JASS:
function RandomSounds takes nothing returns nothing
call ClearMapMusicBJ()
call StopMusicBJ( false )
call PlaySoundBJ(udg_RandomSounds[(GetRandomInt(1, 17))])
endfunction 

function Credits takes nothing returns nothing
	local string a = "|Cffffcc00The Authors!|R|N|N|CFF005826FuryOfASquirrel|R |Cffffcc00and|R |CFF005B7FIrkie500!|R"
	local string b = "|Cffffcc00We used these tools ;|R"
	local string c = "|CFF790000World Editor Unlimited as a World Editor Add-On,|R"
	local string d = "|CFFF26522MAGIX Music Maker deLuxe 10 for custom drums!,|R"
	local string e = "|Cffffcc00And|R |CFFFF0000C|CFFFF3F00h|CFFFF7F00a|CFFFFFF00o|CFFC0FF00s |CFF40FF00S|CFF00FF00p|CFF00C03Fe|CFF00807Fc|CFF0000FFt|CFF3F20FFr|CFF7F40FFu|CFFBF60FFm|R |Cffffcc00for coloring texts!|R"
             local string f = "|CFF4A2800Have fun...in...|R|N|N|NA |CFF4A2800C|CFF3A673FT|CFF29A77EF|CFF19E6BD!|R  |CFF005826By FuryOfASquirrel|R |CFF4A2800and|R |CFF005B7FIrkie500!|R|N|N|Cffffcc00(more about tools in quests)|R"
	local texttag aa
	local texttag bb
	local texttag cc
	local texttag dd
	local texttag ee
	local texttag ff
    set udg_RandomSounds[1] = gg_snd_Funky_Drums_1
    set udg_RandomSounds[2] = gg_snd_Funky_Drums_2
    set udg_RandomSounds[3] = gg_snd_Funky_Drums_3
    set udg_RandomSounds[4] = gg_snd_Funky_Drums_4
    set udg_RandomSounds[5] = gg_snd_Latino_Drums_1
    set udg_RandomSounds[6] = gg_snd_Latino_Drums_2
    set udg_RandomSounds[7] = gg_snd_Latino_Drums_3
    set udg_RandomSounds[8] = gg_snd_Latino_Drums_4
    set udg_RandomSounds[9] = gg_snd_Poppin_Drums_1
    set udg_RandomSounds[10] = gg_snd_Poppin_Drums_2
    set udg_RandomSounds[11] = gg_snd_Poppin_Drums_3
    set udg_RandomSounds[12] = gg_snd_Poppin_Drums_4
    set udg_RandomSounds[13] = gg_snd_Rockin__Drums_1
    set udg_RandomSounds[14] = gg_snd_Rockin__Drums_2
    set udg_RandomSounds[15] = gg_snd_Rockin__Drums_3
    set udg_RandomSounds[16] = gg_snd_Rockin__Drums_4
    set udg_RandomSounds[17] = gg_snd_Drum_Arrangement_1
call SetPlayerAllianceStateBJ( Player(11), Player(0), bj_ALLIANCE_ALLIED_ADVUNITS )
call ClearTextMessages()
call SetTerrainFogExBJ( 0, 0.00, 0.00, 0, 0.00, 0.00, 0.00 )
call SetSkyModel( null )
call ShowInterfaceForceOff( GetPlayersAll(), 0.00 )
call CameraSetupApplyForPlayer( true, gg_cam_Intro, Player(0), 0 )
call CreateTextTagLocBJ(a, GetRectCenter(gg_rct_Credits1), 10.00, 15, 100, 100, 100, 0 )
    set aa = GetLastCreatedTextTag()
call SetTextTagVelocityBJ( aa, 100.00, 90 )
call TriggerSleepAction( .50 )
call RandomSounds()
call TriggerSleepAction( 2.50 )
call CreateTextTagLocBJ(b, GetRectCenter(gg_rct_Credits2), 10.00, 10, 100, 100, 100, 0 )
    set bb = GetLastCreatedTextTag()
call SetTextTagVelocityBJ( bb, 100.00, 90 )
call TriggerSleepAction( 1.00 )
call CreateTextTagLocBJ(c, GetRectCenter(gg_rct_Credits2), 10.00, 10, 100, 100, 100, 0 )
    set cc = GetLastCreatedTextTag()
call SetTextTagVelocityBJ( cc, 100.00, 90 )
call TriggerSleepAction( .80 )
call CreateTextTagLocBJ(d, GetRectCenter(gg_rct_Credits2), 10.00, 10, 100, 100, 100, 0 )
    set dd = GetLastCreatedTextTag()
call SetTextTagVelocityBJ( dd, 100.00, 90 )
call TriggerSleepAction( .80 )
call CreateTextTagLocBJ(e, GetRectCenter(gg_rct_Credits2), 10.00, 10, 100, 100, 100, 0 )
    set ee = GetLastCreatedTextTag()
call SetTextTagVelocityBJ( ee, 100.00, 90 )
call TriggerSleepAction( 4.20 )
call CreateTextTagLocBJ(f, GetRectCenter(gg_rct_Credits3), 10.00, 10, 100, 100, 100, 0 )
    set ff = GetLastCreatedTextTag()
call SetTextTagVelocityBJ( ff, 100.00, 90 )
call TriggerSleepAction( 17.20 )
call DestroyTextTag(aa)
call DestroyTextTag(bb)
call DestroyTextTag(cc)
call DestroyTextTag(dd)
call DestroyTextTag(ee)
call DestroyTextTag(ff)
    set aa = null
    set a = null
    set bb = null
    set b = null
    set cc = null
    set c = null
    set dd = null
    set d = null
    set ee = null
    set e = null
    set ff = null
    set f = null
call SetTerrainFogExBJ( 0, 1000, 8000, 0, 0, 88, 38 )
call ShowInterfaceForceOn( GetPlayersAll(), 0.00 )
endfunction

function InitTrig_Intro takes nothing returns nothing
    set gg_trg_Intro = CreateTrigger()
call TriggerAddAction( gg_trg_Intro, function Credits )
endfunction

works real well, just gatta fix the music :p
 

Dr Super Good

Spell Reviewer
Level 64
Joined
Jan 18, 2005
Messages
27,259
JASS:
function RandomSounds takes nothing returns nothing
    call ClearMapMusicBJ()
    call StopMusicBJ( false )
    call PlaySoundBJ(udg_RandomSounds[(GetRandomInt(1, 17))])
endfunction

function Credits takes nothing returns nothing
    local texttag aa
    local texttag bb
    local texttag cc
    local texttag dd
    local texttag ee
    local texttag ff
    set udg_RandomSounds[1] = gg_snd_Funky_Drums_1
    set udg_RandomSounds[2] = gg_snd_Funky_Drums_2
    set udg_RandomSounds[3] = gg_snd_Funky_Drums_3
    set udg_RandomSounds[4] = gg_snd_Funky_Drums_4
    set udg_RandomSounds[5] = gg_snd_Latino_Drums_1
    set udg_RandomSounds[6] = gg_snd_Latino_Drums_2
    set udg_RandomSounds[7] = gg_snd_Latino_Drums_3
    set udg_RandomSounds[8] = gg_snd_Latino_Drums_4
    set udg_RandomSounds[9] = gg_snd_Poppin_Drums_1
    set udg_RandomSounds[10] = gg_snd_Poppin_Drums_2
    set udg_RandomSounds[11] = gg_snd_Poppin_Drums_3
    set udg_RandomSounds[12] = gg_snd_Poppin_Drums_4
    set udg_RandomSounds[13] = gg_snd_Rockin__Drums_1
    set udg_RandomSounds[14] = gg_snd_Rockin__Drums_2
    set udg_RandomSounds[15] = gg_snd_Rockin__Drums_3
    set udg_RandomSounds[16] = gg_snd_Rockin__Drums_4
    set udg_RandomSounds[17] = gg_snd_Drum_Arrangement_1
    call SetPlayerAllianceStateBJ( Player(11), Player(0), bj_ALLIANCE_ALLIED_ADVUNITS )
    call ClearTextMessages()
    call SetTerrainFogExBJ( 0, 0.00, 0.00, 0, 0.00, 0.00, 0.00 )
    call SetSkyModel( null )
    call ShowInterfaceForceOff( GetPlayersAll(), 0.00 )
    call CameraSetupApplyForPlayer( true, gg_cam_Intro, Player(0), 0 )
    call CreateTextTagLocBJ("|Cffffcc00The Authors!|R|N|N|CFF005826FuryOfASquirrel|R |Cffffcc00and|R |CFF005B7FIrkie500!|R", GetRectCenter(gg_rct_Credits1), 10.00, 15, 100, 100, 100, 0 )
    set aa = GetLastCreatedTextTag()
    call SetTextTagVelocityBJ( aa, 100.00, 90 )
    call TriggerSleepAction( .50 )
    call RandomSounds()
    call TriggerSleepAction( 2.50 )
    call CreateTextTagLocBJ("|Cffffcc00We used these tools ;|R", GetRectCenter(gg_rct_Credits2), 10.00, 10, 100, 100, 100, 0 )
    set bb = GetLastCreatedTextTag()
    call SetTextTagVelocityBJ( bb, 100.00, 90 )
    call TriggerSleepAction( 1.00 )
    call CreateTextTagLocBJ("|CFF790000World Editor Unlimited as a World Editor Add-On,|R", GetRectCenter(gg_rct_Credits2), 10.00, 10, 100, 100, 100, 0 )
    set cc = GetLastCreatedTextTag()
    call SetTextTagVelocityBJ( cc, 100.00, 90 )
    call TriggerSleepAction( .80 )
    call CreateTextTagLocBJ("|CFFF26522MAGIX Music Maker deLuxe 10 for custom drums!,|R", GetRectCenter(gg_rct_Credits2), 10.00, 10, 100, 100, 100, 0 )
    set dd = GetLastCreatedTextTag()
    call SetTextTagVelocityBJ( dd, 100.00, 90 )
    call TriggerSleepAction( .80 )
    call CreateTextTagLocBJ("|Cffffcc00And|R |CFFFF0000C|CFFFF3F00h|CFFFF7F00a|CFFFFFF00o|CFFC0FF00s |CFF40FF00S|CFF00FF00p|CFF00C03Fe|CFF00807Fc|CFF0000FFt|CFF3F20FFr|CFF7F40FFu|CFFBF60FFm|R |Cffffcc00for coloring texts!|R", GetRectCenter(gg_rct_Credits2), 10.00, 10, 100, 100, 100, 0 )
    set ee = GetLastCreatedTextTag()
    call SetTextTagVelocityBJ( ee, 100.00, 90 )
    call TriggerSleepAction( 4.20 )
    call CreateTextTagLocBJ("|CFF4A2800Have fun...in...|R|N|N|NA |CFF4A2800C|CFF3A673FT|CFF29A77EF|CFF19E6BD!|R  |CFF005826By FuryOfASquirrel|R |CFF4A2800and|R |CFF005B7FIrkie500!|R|N|N|Cffffcc00(more about tools in quests)|R", GetRectCenter(gg_rct_Credits3), 10.00, 10, 100, 100, 100, 0 )
    set ff = GetLastCreatedTextTag()
    call SetTextTagVelocityBJ( ff, 100.00, 90 )
    call TriggerSleepAction( 17.20 )
    call DestroyTextTag(aa)
    call DestroyTextTag(bb)
    call DestroyTextTag(cc)
    call DestroyTextTag(dd)
    call DestroyTextTag(ee)
    call DestroyTextTag(ff)
    set aa = null
    set bb = null
    set cc = null
    set dd = null
    set ee = null
    set ff = null
    call SetTerrainFogExBJ( 0, 1000, 8000, 0, 0, 88, 38 )
    call ShowInterfaceForceOn( GetPlayersAll(), 0.00 )
endfunction

function InitTrig_Intro takes nothing returns nothing
    set gg_trg_Intro = CreateTrigger()
    call TriggerAddAction( gg_trg_Intro, function Credits )
endfunction

You can not set a string to null since strings do not default to null but instead "". It was pointless to define all thoughs local strings anyway since you only used the once in the function, so I put them in thir propper functions for efficency.
 
Level 40
Joined
Dec 14, 2005
Messages
10,532
For anything > about 1 second, TriggerSleepAction becomes REALLY bad on Battle.Net, because delay and leaks add a ton of wait time (leaks on the processor, and delay in the synching)

Since PolledWait uses a timer to try and stay more accurate, it isn't hit quite as hard for the large intervals. For small intervals, however, there's not much you can do. (except timers, but they work way differently)
 
Level 4
Joined
Jun 8, 2007
Messages
97
oh i see, well i changed to code to

JASS:
function RandomSounds takes nothing returns nothing
call ClearMapMusicBJ()
call StopMusicBJ( false )
call PlaySoundBJ(udg_RandomSounds[(GetRandomInt(1, 17))])
endfunction 

function Credits takes nothing returns nothing 
	local texttag aa
	local texttag bb
	local texttag cc
	local texttag dd
	local texttag ee
	local texttag ff
	set udg_RandomSounds[1] = gg_snd_Funky_Drums_1
    set udg_RandomSounds[2] = gg_snd_Funky_Drums_2
    set udg_RandomSounds[3] = gg_snd_Funky_Drums_3
    set udg_RandomSounds[4] = gg_snd_Funky_Drums_4
    set udg_RandomSounds[5] = gg_snd_Latino_Drums_1
    set udg_RandomSounds[6] = gg_snd_Latino_Drums_2
    set udg_RandomSounds[7] = gg_snd_Latino_Drums_3
    set udg_RandomSounds[8] = gg_snd_Latino_Drums_4
    set udg_RandomSounds[9] = gg_snd_Poppin_Drums_1
    set udg_RandomSounds[10] = gg_snd_Poppin_Drums_2
    set udg_RandomSounds[11] = gg_snd_Poppin_Drums_3
    set udg_RandomSounds[12] = gg_snd_Poppin_Drums_4
    set udg_RandomSounds[13] = gg_snd_Rockin__Drums_1
    set udg_RandomSounds[14] = gg_snd_Rockin__Drums_2
    set udg_RandomSounds[15] = gg_snd_Rockin__Drums_3
    set udg_RandomSounds[16] = gg_snd_Rockin__Drums_4
	set udg_RandomSounds[17] = gg_snd_Drum_Arrangement_1
call SetPlayerAllianceStateBJ( Player(11), Player(0), bj_ALLIANCE_ALLIED_ADVUNITS )
call ClearTextMessages()
call SetTerrainFogExBJ( 0, 0.00, 0.00, 0, 0.00, 0.00, 0.00 )
call SetSkyModel( null )
call ShowInterfaceForceOff( GetPlayersAll(), 0.00 )
call CameraSetupApplyForPlayer( true, gg_cam_Intro, Player(0), 0 )
call CreateTextTagLocBJ("|Cffffcc00The Authors!|R|N|N|CFF005826FuryOfASquirrel|R |Cffffcc00and|R |CFF005B7FIrkie500!|R", GetRectCenter(gg_rct_Credits1), 10.00, 15, 100, 100, 100, 0 )
    set aa = GetLastCreatedTextTag()
call SetTextTagVelocityBJ( aa, 100.00, 90 )
call PolledWait( .50 )
call RandomSounds()
call PolledWait( 2.50 )
call CreateTextTagLocBJ("|Cffffcc00We used these tools ;|R", GetRectCenter(gg_rct_Credits2), 10.00, 10, 100, 100, 100, 0 )
    set bb = GetLastCreatedTextTag()
call SetTextTagVelocityBJ( bb, 100.00, 90 )
call PolledWait( 1.00 )
call CreateTextTagLocBJ("|CFF790000World Editor Unlimited as a World Editor Add-On,|R", GetRectCenter(gg_rct_Credits2), 10.00, 10, 100, 100, 100, 0 )
    set cc = GetLastCreatedTextTag()
call SetTextTagVelocityBJ( cc, 100.00, 90 )
call PolledWait( .80 )
call CreateTextTagLocBJ("|CFFF26522MAGIX Music Maker deLuxe 10 for custom drums!,|R", GetRectCenter(gg_rct_Credits2), 10.00, 10, 100, 100, 100, 0 )
    set dd = GetLastCreatedTextTag()
call SetTextTagVelocityBJ( dd, 100.00, 90 )
call PolledWait( .80 )
call CreateTextTagLocBJ("|Cffffcc00And|R |CFFFF0000C|CFFFF3F00h|CFFFF7F00a|CFFFFFF00o|CFFC0FF00s |CFF40FF00S|CFF00FF00p|CFF00C03Fe|CFF00807Fc|CFF0000FFt|CFF3F20FFr|CFF7F40FFu|CFFBF60FFm|R |Cffffcc00for coloring texts!|R", GetRectCenter(gg_rct_Credits2), 10.00, 10, 100, 100, 100, 0 )
    set ee = GetLastCreatedTextTag()
call SetTextTagVelocityBJ( ee, 100.00, 90 )
call PolledWait( 4.20 )
call CreateTextTagLocBJ("|CFF4A2800Have fun...in...|R|N|N|N |CFF086142A |CFF294521C|CFF393711T|CFF4A2800F|R|N  |CFF005826By FuryOfASquirrel|R |CFF4A2800and|R |CFF005B7FIrkie500!|R|N|N|Cffffcc00(more about tools in quests)|R", GetRectCenter(gg_rct_Credits3), 10.00, 10, 100, 100, 100, 0 )
    set ff = GetLastCreatedTextTag()
call SetTextTagVelocityBJ( ff, 100.00, 90 )
call PolledWait( 17.20 )
call SetTerrainFogExBJ( 0, 1000, 8000, 0, 0, 88, 38 )
call CameraSetupApplyForPlayer( true, gg_cam_Team1Start, Player(0), 1 )
call CameraSetupApplyForPlayer( true, gg_cam_Team1Start, Player(1), 1 )
call CameraSetupApplyForPlayer( true, gg_cam_Team1Start, Player(2), 1 )
call CameraSetupApplyForPlayer( true, gg_cam_Team1Start, Player(3), 1 )
call CameraSetupApplyForPlayer( true, gg_cam_Team2Start, Player(4), 1 )
call CameraSetupApplyForPlayer( true, gg_cam_Team2Start, Player(5), 1 )
call CameraSetupApplyForPlayer( true, gg_cam_Team2Start, Player(6), 1 )
call CameraSetupApplyForPlayer( true, gg_cam_Team2Start, Player(7), 1 )
call TriggerSleepAction( 1.00 )
call DestroyTextTag(aa)
call DestroyTextTag(bb)
call DestroyTextTag(cc)
call DestroyTextTag(dd)
call DestroyTextTag(ee)
call DestroyTextTag(ff)
    set aa = null
    set bb = null
    set cc = null
    set dd = null
    set ee = null
    set ff = null
call ShowInterfaceForceOn( GetPlayersAll(), 0.00 )
endfunction

function InitTrig_Intro takes nothing returns nothing
    set gg_trg_Intro = CreateTrigger()
call TriggerAddAction( gg_trg_Intro, function Credits )
endfunction

anyways XD
 
Status
Not open for further replies.
Top