• 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.

Triggers

multiple_sound_generator.w3x
Variables
Multiple Sound Generator v0.1 (Pending Name) GUI Version! By RiskYourLife
Multiple Sound Init
Multiple Sound
ReadMe
Demo
Demo
Demo Unit
Demo Location
Name Type is_array initial_value
MSound_EaxSetting string No
MSound_FadeInRate integer No
MSound_FadeOut boolean No
MSound_FadeOutRate integer No
MSound_FileName string No
MSound_Hashtable hashtable No
MSound_Is3D boolean No
MSound_KillWhenDone boolean No
MSound_LifeTime real No
MSound_Location location No
MSound_Looping boolean No
MSound_RunSound string No
MSound_StopWhenOutOfRange boolean No
MSound_Unit unit No
MSound_Volume real No
Multiple Sound Init
Events
Map initialization
Conditions
Actions
-------- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ --------
-------- This system is using hashtable. So, user can create sound as many as they like ( but it will cause lag if too many) --------
-------- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ --------
Hashtable - Create a hashtable
Set Variable Set MSound_Hashtable = (Last created hashtable)
-------- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ --------
Multiple Sound
Events
Map initialization
Conditions
Actions
-------- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ --------
-------- Multiple Sound Generator v0.1 GUI Version (first release) by RiskYourLife (ChaosReal.info) aka Reventhous (Hiveworkshop.com) --------
-------- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ --------
-------- I've play lot of spell, but i never see any sound multiplier system in GUI version except vJASS. So i make this system :D --------
-------- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ --------
-------- This system allows user to play multiple sound at a time. --------
-------- But this system support wav file only --------
-------- You are free to edit, credit goes to me :) --------
-------- If you have any suggestion for this system please PM me :)...+REP to who give brilliant idea to me. --------
-------- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ --------
-------- How to use? see ReadMe --------
-------- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ --------
-------- v0.2 plan --------
-------- ----add recycler --------
-------- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ --------
-------- pretty short, huh? --------
-------- +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ --------
Custom script: call ExecuteFunc("MultipleSoundStart")
Custom script: endfunction
-------- ================================================================================================== --------
Custom script: function MultipleSoundLifeTime takes nothing returns nothing
Custom script: local timer z = GetExpiredTimer()
Custom script: local sound s = LoadSoundHandle(udg_MSound_Hashtable,GetHandleId(z),1)
Custom script: call StopSound(s,LoadBoolean(udg_MSound_Hashtable,GetHandleId(z),2),LoadBoolean(udg_MSound_Hashtable,GetHandleId(z),3))
Custom script: call DestroyTimer(z)
Custom script: endfunction
-------- ================================================================================================== --------
Custom script: function MultipleSoundStart takes nothing returns nothing
Custom script: local sound s
Custom script: local timer z = CreateTimer()
Custom script: set s = CreateSound(udg_MSound_FileName,udg_MSound_Looping,udg_MSound_Is3D,udg_MSound_StopWhenOutOfRange,udg_MSound_FadeInRate,udg_MSound_FadeOutRate,udg_MSound_EaxSetting)
Custom script: if udg_MSound_RunSound == "" or (udg_MSound_RunSound != "unit" and udg_MSound_RunSound != "location") then
Custom script: call PlaySoundBJ(s)
Custom script: elseif udg_MSound_RunSound == "unit" then
Custom script: call PlaySoundOnUnitBJ(s,udg_MSound_Volume,udg_MSound_Unit)
Custom script: elseif udg_MSound_RunSound == "location" then
Custom script: call PlaySoundAtPointBJ(s,udg_MSound_Volume,udg_MSound_Location, 0 )
Custom script: endif
Set Variable Set MSound_RunSound = ""
Set Variable Set MSound_Unit = No unit
Custom script: call RemoveLocation(udg_MSound_Location)
Custom script: call SaveSoundHandle(udg_MSound_Hashtable,GetHandleId(z),1,s)
Custom script: call SaveBoolean(udg_MSound_Hashtable,GetHandleId(z),2,udg_MSound_KillWhenDone)
Custom script: call SaveBoolean(udg_MSound_Hashtable,GetHandleId(z),3,udg_MSound_FadeOut)
Custom script: call TimerStart(z,udg_MSound_LifeTime,false,function MultipleSoundLifeTime)
-------- ================================================================================================== --------
ReadMe
Events
Conditions
Actions
-------- How to use? --------
-------- Copy all of the variable below and paste to your trigger, then change its value to your desire --------
Set Variable Set MSound_FileName = "Copy full path of the sound from Import Manager (F12). Example : war3mapImported\mcw.wav"
-------- Do your want the sound to looping --------
Set Variable Set MSound_Looping = "false"
-------- You want your sound became 3D sound. Set to true --------
Set Variable Set MSound_Is3D = "false"
-------- If your camera is out of range, the sound will stop --------
Set Variable Set MSound_StopWhenOutOfRange = "false"
-------- Fade in rate --------
Set Variable Set MSound_FadeInRate = "10"
-------- Fade out rate --------
Set Variable Set MSound_FadeOutRate = "10"
-------- No idea --------
Set Variable Set MSound_EaxSetting = ""
-------- Want the sound fade out when done? --------
Set Variable Set MSound_FadeOut = "false"
-------- If true, the sound get killed when done. 8) --------
Set Variable Set MSound_KillWhenDone = "false"
-------- The sound life time, but if MSound_KillWhenDone = true, this is useless even you set this to million (better not) --------
Set Variable Set MSound_LifeTime = "2.00"
-------- Sound volume --------
Set Variable Set MSound_Volume = "100.00"
-------- The sound run option. Only three option avaible --------
-------- unit, location or leave it empty --------
-------- see demo if still not understand it --------
Set Variable Set MSound_RunSound = ""
-------- This variable is related to MSound_RunSound --------
Set Variable Set MSound_Unit = Peasant 0001 <gen>
-------- This variable is related to MSound_RunSound --------
Set Variable Set MSound_Location = (Load 0 of 0 in (Last created hashtable).)
-------- Start sound! --------
Trigger - Run Multiple_Sound <gen> (ignoring conditions)
CreateSound(string.filename, bolean looping, boolean is3d, boolean stopwhenoutofrange, integer fadeinrate, integer fadeoutrate, string eaxsetting)
Demo
Events
Player - Player 1 (Red) types a chat message containing 1 (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Set Variable Set MSound_FileName = "war3mapImported\mcw.wav"
Set Variable Set MSound_Looping = "false"
Set Variable Set MSound_Is3D = "false"
Set Variable Set MSound_StopWhenOutOfRange = "false"
Set Variable Set MSound_FadeInRate = "10"
Set Variable Set MSound_FadeOutRate = "10"
Set Variable Set MSound_EaxSetting = ""
Set Variable Set MSound_FadeOut = "false"
Set Variable Set MSound_KillWhenDone = "false"
Set Variable Set MSound_LifeTime = "2.00"
Set Variable Set MSound_Volume = "100.00"
Set Variable Set MSound_RunSound = ""
Set Variable Set MSound_Unit = Peasant 0001 <gen>
Set Variable Set MSound_Location = (Load 0 of 0 in (Last created hashtable).)
Trigger - Run Multiple_Sound <gen> (ignoring conditions)
CreateSound(string.filename, bolean looping, boolean is3d, boolean stopwhenoutofrange, integer fadeinrate, integer fadeoutrate, string eaxsetting)
Demo Unit
Events
Player - Player 1 (Red) types a chat message containing 2 (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Set Variable Set MSound_FileName = "war3mapImported\mcw.wav"
Set Variable Set MSound_Looping = "false"
Set Variable Set MSound_Is3D = "false"
Set Variable Set MSound_StopWhenOutOfRange = "false"
Set Variable Set MSound_FadeInRate = "10"
Set Variable Set MSound_FadeOutRate = "10"
Set Variable Set MSound_EaxSetting = ""
Set Variable Set MSound_FadeOut = "false"
Set Variable Set MSound_KillWhenDone = "false"
Set Variable Set MSound_LifeTime = "2.00"
Set Variable Set MSound_Volume = "100.00"
Set Variable Set MSound_RunSound = "unit"
Set Variable Set MSound_Unit = Peasant 0001 <gen>
Set Variable Set MSound_Location = (Load 0 of 0 in (Last created hashtable).)
Trigger - Run Multiple_Sound <gen> (ignoring conditions)
CreateSound(string.filename, bolean looping, boolean is3d, boolean stopwhenoutofrange, integer fadeinrate, integer fadeoutrate, string eaxsetting)
Demo Location
Events
Player - Player 1 (Red) types a chat message containing 3 (Unexpected type: 'stringnoformat') as An exact match
Conditions
Actions
Set Variable Set MSound_FileName = "war3mapImported\Expls.wav"
Set Variable Set MSound_Looping = "false"
Set Variable Set MSound_Is3D = "false"
Set Variable Set MSound_StopWhenOutOfRange = "false"
Set Variable Set MSound_FadeInRate = "10"
Set Variable Set MSound_FadeOutRate = "10"
Set Variable Set MSound_EaxSetting = ""
Set Variable Set MSound_FadeOut = "false"
Set Variable Set MSound_KillWhenDone = "false"
Set Variable Set MSound_LifeTime = "2.00"
Set Variable Set MSound_Volume = "100.00"
Set Variable Set MSound_RunSound = "location"
Set Variable Set MSound_Unit = Peasant 0001 <gen>
Set Variable Set MSound_Location = (Position of Peasant 0001 <gen>)
Special Effect - Create a special effect at MSound_Location using Abilities\Spells\Human\ThunderClap\ThunderClapCaster.mdl
Trigger - Run Multiple_Sound <gen> (ignoring conditions)
Top