System DotA Kill System

[esb]

I pretty much copied the DotA Kill System (as I call it) into my map. I noticed that there isn't a map (at least not when I googled) with this system available for free/available, that is in GUI. So I made it. Pretty much it is just the voices and counting order. I did find JASS, but that didn't help me.

Firstly, Credits
Credits to Gamerzplanet.net for "collecting" the sounds (Sounds are actually from Unreal Tournament).
esb for making the tut and triggers.
DotA for "inspiration" on the "kill-system"
Wikipedia for allowing me to see order of the sounds
thehelper.net for posting my map/tutorial.

Samples:

Hero Dies
    Events
        Unit - A unit Dies
    Conditions
        ((Dying unit) is A Hero) Equal to True
    Actions
        Set Kills_KillingSpree[(Player number of (Owner of (Dying unit)))] = False
        Set Kills_Dominating[(Player number of (Owner of (Dying unit)))] = False
        Set Kills_MegaKill[(Player number of (Owner of (Dying unit)))] = False
        Set Kills_Unstoppable[(Player number of (Owner of (Dying unit)))] = False
        Set Kills_WhickedSick[(Player number of (Owner of (Dying unit)))] = False
        Set Kills_MonsterKill[(Player number of (Owner of (Dying unit)))] = False
        Set Kills_Godlike[(Player number of (Owner of (Dying unit)))] = False
        Set Kills_BeyondGodlike[(Player number of (Owner of (Dying unit)))] = False
        Player - Add (10 x (Hero level of (Dying unit))) to (Owner of (Killing unit)) Current gold

First Blood
    Events
        Unit - A unit Dies
    Conditions
        ((Dying unit) is A Hero) Equal to True
        ((Killing unit) is A Hero) Equal to True
    Actions
        Sound - Play firstblood <gen>
        Player - Add 200 to (Owner of (Killing unit)) Current gold
        Quest - Display to (All players) the Hint message: ((|cff00ccffFirst Blood|r -  + (Name of (Owner of (Dying unit)))) + ( has been killed by  + ((Name of (Owner of (Killing unit))) +  for an additional 200 Gold.)))
        Wait 1.00 seconds
        Set Kills_KillingSpree[(Player number of (Owner of (Killing unit)))] = True
        Trigger - Turn off (This trigger)

Killing Spree
    Events
        Unit - A unit Dies
    Conditions
        ((Dying unit) is A Hero) Equal to True
        ((Killing unit) is A Hero) Equal to True
    Actions
        If (All Conditions are True) then do (Then Actions) else do (Else Actions)
            If - Conditions
                Kills_KillingSpree[(Player number of (Owner of (Killing unit)))] Equal to True
            Then - Actions
                Sound - Play Killing_Spree <gen>
                Player - Add 50 to (Owner of (Killing unit)) Current gold
                Quest - Display to (All players) the Hint message: ((|cff00ccffKilling Spree|r -  + (Name of (Owner of (Dying unit)))) + ( increased + ((Name of (Owner of (Killing unit))) +  kill count and Gold by 50.)))
                Set Kills_KillingSpree[(Player number of (Owner of (Killing unit)))] = False
                Wait 1.00 seconds //Added because it causes problems without it
                Set Kills_Dominating[(Player number of (Owner of (Killing unit)))] = True
            Else - Actions
                Do nothing

P.S. I have a BIG feeling I posted this in the wrong section >_<

 

[elmstfreddie]

You're right! Should be in free trigger code in the submissions

Anyways, if this works (too lazy to test sorry) this will be a vital system for some GUIers out there. A lot of kill spree systems I've seen have... Well... Been slight disasters.

(and I suggest taking out the word "copy", unless you stole it)

 

[Uberplayer]

And also you won't get first blood for killing friendly hero.. You won't get even normal kill for that..

 

[esb]

you're not supposed to kill allies though

 

[Uberplayer]

But as it is possible to denie allies with lower than 25% of their hit points..

This should be "Killing Spree System" instead of "DotA Kill System"..

 

[esb]

so, any more reviews please? Does it work properly?

 

[SYI]

Hm, I don't know if its just my map has another trigger messing with it, but the sounds/kills only works for like the first person who got first blood for me. After that no 1 else gets any of the kills/sounds etc.

 

[MaaxeEvid]

i made 2 function that make the same thing...look i dont think its better but its not poor //jass**

function Streak_End takes integer manyKills, player dye, player killer returns nothing
    local integer id = GetPlayerId(dye) + 1
    local string name = GetPlayerName(dye)
    local string namek = GetPlayerName(killer)
    local integer id2 = GetPlayerId(killer) + 1
    local string array streak
    local integer gold = 50 * manyKills
    local string golds = I2S(gold)
    
    set streak[3] = "|c0000ff40MULTIKILL|r"
    set streak[4] = "|c00400080DOMINATING|r"
    set streak[5] = "|c00ff0080ULTRA KILL|r"
    set streak[6] = "|c00ff8000RAMPAGE|r"
    set streak[7] = "|c00808000UNSTOPABLE|r"
    set streak[8] = "|c00ff80ffMONSTERKILL|r"
    set streak[9] = "|cff00ff00WICKED SICK|r"
    set streak[10] = "|cff009999KILLING SPREE|r"          
    set streak[11] = "|c00ff8000GODLIKE|r"
    
    call DisplayTextToForce(bj_FORCE_ALL_PLAYERS, Color(id) + name + "|r just have him/her " + streak[manyKills] + " ended by " + Color(id2) + namek + "|r" + "|cffffcc00("+golds+")|r")
    call AddGold(killer, gold)

    set killer = null
    set dye = null
    
endfunction

function Killing_Streak takes integer killsrow, player killer returns nothing
    local integer id = GetPlayerId(killer) + 1
    local string name = GetPlayerName(killer)
    
    if killsrow == 3 then
        call PlaySoundBJ(gg_snd_multikill)
        call DisplayTextToForce(bj_FORCE_ALL_PLAYERS, Color(id) + name + "|r just made a |c0000ff40MULTIKILL!!!!!|r")
        endif
    
    if killsrow == 4 then
        call PlaySoundBJ(gg_snd_dominating)
        call DisplayTextToForce(bj_FORCE_ALL_PLAYERS, Color(id) + name + "|r is |c00400080DOMINATING|r some noobs")              
    endif
    
    if killsrow == 5 then
        call PlaySoundBJ(gg_snd_ultrakill)
        call DisplayTextToForce(bj_FORCE_ALL_PLAYERS, Color(id) + name + "|r pawned some heads and made a |c00ff0080ULTRA KILL|r")              
    endif
    
    if killsrow == 6 then
        call PlaySoundBJ(gg_snd_rampage)
        call DisplayTextToForce(bj_FORCE_ALL_PLAYERS, Color(id) + name + "|r is in a |c00ff8000RAMPAGE|r")              
    endif
    
    if killsrow == 7 then
        call PlaySoundBJ(gg_snd_unstoppable_ultimate)
        call DisplayTextToForce(bj_FORCE_ALL_PLAYERS, Color(id) + name + "|r is |c00808000UNSTOPABLE|r")              
    endif
    
    if killsrow == 8 then
        call PlaySoundBJ(gg_snd_monsterkill_ultimate)
        call DisplayTextToForce(bj_FORCE_ALL_PLAYERS, Color(id) + name + "|r is a |c00ff80ffMONSTERKILL|r")              
    endif
    
    if killsrow == 9 then
        call PlaySoundBJ(gg_snd_WhickedSick)
        call DisplayTextToForce(bj_FORCE_ALL_PLAYERS, Color(id) + name + "|r is a |cff00ff00WICKED SICK|r")              
    endif
    
    if killsrow == 10 then
        call PlaySoundBJ(gg_snd_killingspree)
        call DisplayTextToForce(bj_FORCE_ALL_PLAYERS, Color(id) + name + "|r is in a |cff009999KILLING SPREE|r")              
    endif
        
    if killsrow == 11 then
        call PlaySoundBJ(gg_snd_godlike)
        call DisplayTextToForce(bj_FORCE_ALL_PLAYERS, Color(id) + name + "|r is a |c00ff8000GODLIKE|r")              
    endif
    
    set killer = null
    
endfunction

Color is another function that returns the player color

function Color takes integer playerid returns string
    local string array s
    set s[1] = "|c00ff0000"
    set s[2] = "|c000000ff"
    set s[3] = "|c0018e7bd"
    set s[4] = "|c00520084"
    set s[5] = "|c00ffff00"
    set s[6] = "|c00ff8a08"
    set s[7] = "|c0018be00"
    set s[8] = "|c00e759ad"
    set s[9] = "|c00949694"
    set s[10] = "|c007bbef7"
    set s[11] = "|c00086142"
    set s[12] = "|c004a2800"
    
    return s[playerid]
endfunction

 

[butters132]

It didn't work for me, the only thing that worked was the first trigger where you recieve gold when you kill a hero and you get 10x its hero level in gold.
The sprees did not, but i took out the sound effects and "First Blood" because i didn't wanna copy dota too much, not sure if it affected it somehow. Heres my code if it helps:
Events
Unit - A unit Dies

Conditions
((Dying unit) is A Hero) Equal to True

Actions
Set Kills_KillingSpree[(Player number of (Owner of (Dying unit)))] = False
Set Kills_Dominating[(Player number of (Owner of (Dying unit)))] = False
Set Kills_MegaKill[(Player number of (Owner of (Dying unit)))] = False
Set Kills_Unstoppable[(Player number of (Owner of (Dying unit)))] = False
Set Kills_WhickedSick[(Player number of (Owner of (Dying unit)))] = False
Set Kills_MonsterKill[(Player number of (Owner of (Dying unit)))] = False
Set Kills_Godlike[(Player number of (Owner of (Dying unit)))] = False
Set Kills_BeyondGodlike[(Player number of (Owner of (Dying unit)))] = False
Player - Add (10 x (Hero level of (Dying unit))) to (Owner of (Killing unit)) Current gold
Hero - Create Tome of Exp (200) and give it to (Killing unit)

This is the killing spree one:
Events
Unit - A unit Dies

Conditions
((Dying unit) is A Hero) Equal to True
((Killing unit) is A Hero) Equal to True

Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Kills_KillingSpree[(Player number of (Owner of (Killing unit)))] Equal to True
Then - Actions
Player - Add 50 to (Owner of (Killing unit)) Current gold
Hero - Create Exp Killing Spree and give it to (Killing unit)
Quest - Display to (All players) the Hint message: ((|cff00ccffKilling Spree|r - + (Name of (Owner of (Dying unit)))) + ( increased + ((Name of (Owner of (Killing unit))) + kill count and Gold by 50.)))
Set Kills_KillingSpree[(Player number of (Owner of (Killing unit)))] = False
Wait 1.00 seconds
Set Kills_Dominating[(Player number of (Owner of (Killing unit)))] = True
Else - Actions
Do nothing

 

[esb]

That's hard to read >_<
Can you use Copy as Text and attach [noparse]

[/noparse] tags around it?

 

[butters132]

yeah sry didnt know to do that

Events
Unit - A unit Dies

Conditions
((Dying unit) is A Hero) Equal to True

Actions
Set Kills_KillingSpree[(Player number of (Owner of (Dying unit)))] = False
Set Kills_Dominating[(Player number of (Owner of (Dying unit)))] = False
Set Kills_MegaKill[(Player number of (Owner of (Dying unit)))] = False
Set Kills_Unstoppable[(Player number of (Owner of (Dying unit)))] = False
Set Kills_WhickedSick[(Player number of (Owner of (Dying unit)))] = False
Set Kills_MonsterKill[(Player number of (Owner of (Dying unit)))] = False
Set Kills_Godlike[(Player number of (Owner of (Dying unit)))] = False
Set Kills_BeyondGodlike[(Player number of (Owner of (Dying unit)))] = False
Player - Add (10 x (Hero level of (Dying unit))) to (Owner of (Killing unit)) Current gold
Hero - Create Tome of Exp (200) and give it to (Killing unit)

This is the killing spree one:
Events
Unit - A unit Dies

Conditions
((Dying unit) is A Hero) Equal to True
((Killing unit) is A Hero) Equal to True

Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Kills_KillingSpree[(Player number of (Owner of (Killing unit)))] Equal to True
Then - Actions
Player - Add 50 to (Owner of (Killing unit)) Current gold
Hero - Create Exp Killing Spree and give it to (Killing unit)
Quest - Display to (All players) the Hint message: ((|cff00ccffKilling Spree|r - + (Name of (Owner of (Dying unit)))) + ( increased + ((Name of (Owner of (Killing unit))) + kill count and Gold by 50.)))
Set Kills_KillingSpree[(Player number of (Owner of (Killing unit)))] = False
Wait 1.00 seconds
Set Kills_Dominating[(Player number of (Owner of (Killing unit)))] = True
Else - Actions
Do nothing

 

[esb]

You're missing a bunch of triggers. Those two are not the only ones. Download the map in the attachment and copy them to youre map.

 

[butters132]

yeah i know, its a long code and i was to lazy to put the whole thing but this is the whole thing, in case you forgot i took out the sound effect and the First Blood trigger because i don't want to completly copy dota, i also added some tome of exp's and in the future im also planning on changing the spree names:

Events
    Unit - A unit Dies
Conditions
    ((Dying unit) is A Hero) Equal to True
Actions
    Set Kills_KillingSpree[(Player number of (Owner of (Dying unit)))] = False
    Set Kills_Dominating[(Player number of (Owner of (Dying unit)))] = False
    Set Kills_MegaKill[(Player number of (Owner of (Dying unit)))] = False
    Set Kills_Unstoppable[(Player number of (Owner of (Dying unit)))] = False
    Set Kills_WhickedSick[(Player number of (Owner of (Dying unit)))] = False
    Set Kills_MonsterKill[(Player number of (Owner of (Dying unit)))] = False
    Set Kills_Godlike[(Player number of (Owner of (Dying unit)))] = False
    Set Kills_BeyondGodlike[(Player number of (Owner of (Dying unit)))] = False
    Player - Add (10 x (Hero level of (Dying unit))) to (Owner of (Killing unit)) Current gold
    Hero - Create Tome of Exp (200) and give it to (Killing unit)

I also made another spree where as you kill 2 heros:

Events
    Unit - A unit Dies
Conditions
    ((Dying unit) is A Hero) Equal to True
    ((Killing unit) is A Hero) Equal to True
Actions
    If (All Conditions are True) then do (Then Actions) else do (Else Actions)
        If - Conditions
            Kills_Spree[(Player number of (Owner of (Killing unit)))] Equal to True
        Then - Actions
            Set Kills_Spree[(Player number of (Owner of (Killing unit)))] = False
            Hero - Create Tome of Exp (200) and give it to (Killing unit)
            Wait 1.00 seconds
            Set Kills_KillingSpree[(Player number of (Owner of (Killing unit)))] = True
        Else - Actions
            Do nothing

This is the killing spree trigger:

Events
    Unit - A unit Dies
Conditions
    ((Dying unit) is A Hero) Equal to True
    ((Killing unit) is A Hero) Equal to True
Actions
    If (All Conditions are True) then do (Then Actions) else do (Else Actions)
        If - Conditions
            Kills_KillingSpree[(Player number of (Owner of (Killing unit)))] Equal to True
        Then - Actions
            Player - Add 50 to (Owner of (Killing unit)) Current gold
            Hero - Create Exp Killing Spree and give it to (Killing unit)
            Quest - Display to (All players) the Hint message: ((|cff00ccffKilling Spree|r -  + (Name of (Owner of (Dying unit)))) + ( increased + ((Name of (Owner of (Killing unit))) +  kill count and Gold by 50.)))
            Set Kills_KillingSpree[(Player number of (Owner of (Killing unit)))] = False
            Wait 1.00 seconds
            Set Kills_Dominating[(Player number of (Owner of (Killing unit)))] = True
        Else - Actions
            Do nothing

This is the dominating spree:

Events
    Unit - A unit Dies
Conditions
    ((Dying unit) is A Hero) Equal to True
    ((Killing unit) is A Hero) Equal to True
Actions
    If (All Conditions are True) then do (Then Actions) else do (Else Actions)
        If - Conditions
            Kills_Dominating[(Player number of (Owner of (Killing unit)))] Equal to True
        Then - Actions
            Player - Add 100 to (Owner of (Killing unit)) Current gold
            Hero - Create Exp Dominating and give it to (Killing unit)
            Quest - Display to (All players) the Hint message: ((|cff00ccffDominating|r -  + (Name of (Owner of (Killing unit)))) +  is dominating along with 100 Gold.)
            Set Kills_Dominating[(Player number of (Owner of (Killing unit)))] = False
            Wait 1.00 seconds
            Set Kills_MegaKill[(Player number of (Owner of (Killing unit)))] = True
        Else - Actions
            Do nothing

This is the mega kill one:

Events
    Unit - A unit Dies
Conditions
    ((Dying unit) is A Hero) Equal to True
    ((Killing unit) is A Hero) Equal to True
Actions
    If (All Conditions are True) then do (Then Actions) else do (Else Actions)
        If - Conditions
            Kills_MegaKill[(Player number of (Owner of (Killing unit)))] Equal to True
        Then - Actions
            Player - Add 150 to (Owner of (Killing unit)) Current gold
            Hero - Create Exp Mega Kill and give it to (Killing unit)
            Quest - Display to (All players) the Hint message: ((|cff00ccffMega-Kill|r -  + (Name of (Owner of (Dying unit)))) + ( gave + ((Name of (Owner of (Killing unit))) +  a kill and 150 Gold.)))
            Set Kills_MegaKill[(Player number of (Owner of (Killing unit)))] = False
            Wait 1.00 seconds
            Set Kills_Unstoppable[(Player number of (Owner of (Killing unit)))] = True
        Else - Actions
            Do nothing

This is the unstoppable trigger:

Events
    Unit - A unit Dies
Conditions
    ((Dying unit) is A Hero) Equal to True
    ((Killing unit) is A Hero) Equal to True
Actions
    If (All Conditions are True) then do (Then Actions) else do (Else Actions)
        If - Conditions
            Kills_Unstoppable[(Player number of (Owner of (Killing unit)))] Equal to True
        Then - Actions
            Hero - Create Exp Unstoppable and give it to (Killing unit)
            Player - Add 200 to (Owner of (Killing unit)) Current gold
            Quest - Display to (All players) the Hint message: ((|cff00ccffUnstoppable|r -  + (Name of (Owner of (Killing unit)))) +  is unstoppable with 200 Gold!)
            Set Kills_Unstoppable[(Player number of (Owner of (Killing unit)))] = False
            Wait 1.00 seconds
            Set Kills_WhickedSick[(Player number of (Owner of (Killing unit)))] = True
        Else - Actions
            Do nothing

Heres the Wicked sick:

Events
    Unit - A unit Dies
Conditions
    ((Dying unit) is A Hero) Equal to True
    ((Killing unit) is A Hero) Equal to True
Actions
    If (All Conditions are True) then do (Then Actions) else do (Else Actions)
        If - Conditions
            Kills_WhickedSick[(Player number of (Owner of (Killing unit)))] Equal to True
        Then - Actions
            Hero - Create Exp Whicked Sick and give it to (Killing unit)
            Player - Add 250 to (Owner of (Killing unit)) Current gold
            Quest - Display to (All players) the Hint message: ((|cff00ccffWhicked Sick|r -  + (Name of (Owner of (Killing unit)))) +  is Whicked Sick! Somebody take his 250 Gold!)
            Set Kills_WhickedSick[(Player number of (Owner of (Killing unit)))] = False
            Wait 1.00 seconds
            Set Kills_MonsterKill[(Player number of (Owner of (Killing unit)))] = True
        Else - Actions
            Do nothing

This is monster kill:

Events
    Unit - A unit Dies
Conditions
    ((Dying unit) is A Hero) Equal to True
    ((Killing unit) is A Hero) Equal to True
Actions
    If (All Conditions are True) then do (Then Actions) else do (Else Actions)
        If - Conditions
            Kills_MonsterKill[(Player number of (Owner of (Killing unit)))] Equal to True
        Then - Actions
            Player - Add 300 to (Owner of (Killing unit)) Current gold
            Hero - Create Exp Monster Kill and give it to (Killing unit)
            Quest - Display to (All players) the Hint message: ((|cff00ccffM-m-m-m....Monster Kill|r -  + Somebody stop ) + ((Name of (Owner of (Killing unit))) + , he is a MONSTER! with 300 more Gold.))
            Set Kills_MonsterKill[(Player number of (Owner of (Killing unit)))] = False
            Wait 1.00 seconds
            Set Kills_Godlike[(Player number of (Owner of (Killing unit)))] = True
        Else - Actions
            Do nothing

This is Godlike

Events
    Unit - A unit Dies
Conditions
    ((Dying unit) is A Hero) Equal to True
    ((Killing unit) is A Hero) Equal to True
Actions
    If (All Conditions are True) then do (Then Actions) else do (Else Actions)
        If - Conditions
            Kills_Godlike[(Player number of (Owner of (Killing unit)))] Equal to True
        Then - Actions
            Player - Add 350 to (Owner of (Killing unit)) Current gold
            Hero - Create Exp Godlike and give it to (Killing unit)
            Quest - Display to (All players) the Hint message: ((|cff00ccffGodlike|r -  + (Name of (Owner of (Killing unit)))) + ( is Godlike +  with 350 Gold!))
            Set Kills_Godlike[(Player number of (Owner of (Killing unit)))] = False
            Wait 1.00 seconds
            Set Kills_BeyondGodlike[(Player number of (Owner of (Killing unit)))] = True
        Else - Actions
            Do nothing

And lastly this is Beyond Godlike:

Events
    Unit - A unit Dies
Conditions
    ((Dying unit) is A Hero) Equal to True
    ((Killing unit) is A Hero) Equal to True
Actions
    If (All Conditions are True) then do (Then Actions) else do (Else Actions)
        If - Conditions
            Kills_BeyondGodlike[(Player number of (Owner of (Killing unit)))] Equal to True
        Then - Actions
            Player - Add 400 to (Owner of (Killing unit)) Current gold
            Hero - Create Tome of Power and give it to (Killing unit)
            Quest - Display to (All players) the Hint message: ((|cff00ccffBeyond Godlike|r -  + (Name of (Owner of (Killing unit)))) +  is BEYOND Godlike! Holy Shit! Somebody stop this guy!)
        Else - Actions
            Do nothing

Thanks for helping

 

[esb]

Did you copy the arrays correctly?

Even if you have the "Automatically create unkown Variables when copying triggers" checked, sometimes the array sizes don't get copied correctly.

 

[butters132]

Yea i think so:
Death_count Interger Array(1) 0
Kill_Count Integer Array(1) 0
Kills_BeyondGodlike Integer Array(12) 0
Kills_Godlike Integer Array(12) 0
Kills_Killing spree Integer Array(12) 0
Kills_dominating Integer Array(12) 0
Kills_megaKill Integer Array(12) 0
Kills_unstoppable Integer Array(12) 0
Kills_monsterkill Integer Array(12) 0
Kills_WickedSick Integer Array(12) 0

 

[Cohadar]

But as it is possible to denie allies with lower than 25% of their hit points..

This should be "Killing Spree System" instead of "DotA Kill System"..

Yeah, killing allies should be totally allowed in dota.
It would finally solve the problem of feeders

 

[butters132]

Wouldnt your first blood trigger give your killing spree trigger problems? When you set Kills_KillingSpree to be True (this part)

Set Kills_KillingSpree[(Player number of (Owner of (Killing unit)))] = True

When you set it to true the next person who kills a unit will get a killing spree because your variable was defined as true from the person who made First blood.

 

[FhelZone]

Its not (Killing unit is equal to hero)
You gain spree even though the killer is not a hero.

 

[esb]

Ahhh Good catch

I forgot about summons, and was thinking of disabling it for computer players. I'll add a condition later... thanks for pointing it out though.

 

[HellCraft]

i found a problem, if a summoned unit kills the hero so it dosnt say , killing spree or dominating.
so i did this
Condition -
dying unit is a hero equal to true
killing unit is a hero equal to true

i changed that to

Conditions-
dying unit is a hero equal to true
killing unit is in players

Note: players is a player group variable:-
Events-
Map inizialization
Action-
Set players = all players matching (matching player controller is user) and (matching player slot status is playing)