• 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

Vampire Effect TFT 1.2.w3x
Variables
Vampire Effect
Convert
Map Init
Vampire Death
Vamp Leader Leaves
VampireWins
Demolish
On the Jass
Name Type is_array initial_value
Non_Vamps_Left integer No
timer timerdialog No
VampAllies force No
Vampire player No Player11 
function Trig_Convert_Conditions takes nothing returns boolean
    if ( not ( GetUnitTypeId(GetDyingUnit()) == 'hpea' ) ) then
        return false
    endif
    return true
endfunction

function Trig_Convert_Func002002 takes nothing returns nothing
    call RemoveUnit( GetEnumUnit() )
endfunction

function Trig_Convert_Actions takes nothing returns nothing
    local player p = GetOwningPlayer(GetTriggerUnit())
    set udg_Non_Vamps_Left = udg_Non_Vamps_Left - 1
    call ForceAddPlayerSimple( p, udg_VampAllies )
    call PlaySoundBJ( gg_snd_HumanDeath )
    call ForGroupBJ( GetUnitsOfPlayerAll(p), function Trig_Convert_Func002002)
    call DisplayTextToForce( GetPlayersAll(), GetPlayerName(p) + " got owned and has joined the vampires." )
    call TriggerSleepAction(1)
    call AddSpecialEffectLocBJ( GetUnitLoc(GetTriggerUnit()), "Abilities\\Spells\\Undead\\Darksummoning\\DarkSummonTarget.mdl" )
    call TriggerSleepAction(4)
    call ForceAddPlayerSimple( p, GetPlayersAllies(udg_Vampire) )
    call ForceRemovePlayerSimple( p, GetPlayersEnemies(udg_Vampire) )
    call CreateNUnitsAtLoc( 1, 'Udre', p, GetUnitLoc(GetTriggerUnit()), GetUnitFacing(GetTriggerUnit()) )
    call PanCameraToTimedLocForPlayer( p, GetPlayerStartLocationLoc(Player(0)), 1 )
    call SetForceAllianceStateBJ( GetPlayersAllies(udg_Vampire), GetForceOfPlayer(p), bj_ALLIANCE_ALLIED_VISION )
    call SetForceAllianceStateBJ( GetForceOfPlayer(p), GetPlayersAllies(udg_Vampire), bj_ALLIANCE_ALLIED_VISION )
    call SetForceAllianceStateBJ( GetPlayersEnemies(udg_Vampire), GetForceOfPlayer(p), bj_ALLIANCE_UNALLIED )
    call SetForceAllianceStateBJ( GetForceOfPlayer(p), GetPlayersEnemies(udg_Vampire), bj_ALLIANCE_UNALLIED )
    if (  udg_Non_Vamps_Left == 0 ) then
       call DisplayTextToForce( GetPlayersAll(), "|cffff0000All humans have been transformed into vampires!|r" )
       call TriggerExecute( gg_trg_VampireWins )
       call DestroyTrigger(GetTriggeringTrigger())
       call DestroyTrigger(gg_trg_Vampire_Death)
       call DestroyTrigger(gg_trg_Vamp_Leader_Leaves)
       call DestroyTrigger(gg_trg_VampireWins)
    else
    endif
endfunction

//===========================================================================
function InitTrig_Convert takes nothing returns nothing
    set gg_trg_Convert = CreateTrigger(  )
    call TriggerRegisterAnyUnitEventBJ( gg_trg_Convert, EVENT_PLAYER_UNIT_DEATH )
    call TriggerAddCondition( gg_trg_Convert, Condition( function Trig_Convert_Conditions ) )
    call TriggerAddAction( gg_trg_Convert, function Trig_Convert_Actions )
endfunction
Map Init
Events
Map initialization
Conditions
Actions
Game - Display to (All players) the text: Map and Idea by AzNKcBoi22489Modded by |cffcc0054Hellochar|r E-mail me at |[email protected]
Player Group - Pick every player in (All enemies of Player 12 (Brown).) and do (Create 1.Human for (Picked player) at (Player 1 (Red) start location) facing Default building facing degrees)
Set Variable Set Non_Vamps_Left = (Number of players in (All players matching ((((Matching player) is an enemy of Player 12 (Brown).) Equal to True) and (((Matching player) slot status) Equal to Is playing)).))
Game - Display to (All enemies of Player 12 (Brown).) the text: Run for your puny insignificant lives! The vampire will come in 40 seconds!
Game - Display to Player Group - Player 12 (Brown) the text: |cfff6633dBeing vampire leader is simple. Just try to kill the humans. When one dies, all the units are removed, and the human gets transformed into a vampire. To win, simply transform all human into vampires.|r
Sound - Play RockTheme <gen>
Wait 40.00 seconds
Unit - Create 1 . Vampire Leader (Evil) for Player 12 (Brown) at (Player 12 (Brown) start location) facing Default building facing degrees
Game - Display to (All players) the text: The Vampire has broken the CaGe!!!
Sound - Play HPitLordPissed3 <gen> at 100 % volume, located at (Position of (Last created unit)) with Z offset 0
Wait 2.08 seconds
Sound - Stop (Last played sound) Immediately
Custom script: call DestroyTrigger(GetTriggeringTrigger())
Vampire Death
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Vampire Leader (Evil)
Actions
Game - Display to (All players) the text: |cffff0000The Vampire Leader has died!
Wait 3.00 seconds
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of players in VampAllies) Greater than 0
Then - Actions
Wait 7.00 seconds
Set Variable Set Vampire = (Random player from VampAllies)
Player Group - Remove Vampire from VampAllies .
Game - Display to (All players) the text: A new vampire leader has been chosen!
Game - Display to (Player group(Vampire)) the text: |cff446666You are now the vampire leader!
Unit - Replace (Missing string for 'FirstOfGroup') with a Vampire Leader (Evil) using The old unit's relative life and mana
Hero - Set (Last replaced unit) Hero-level to (Hero level of (Triggering unit)) , Hide level-up graphics
Unit - Remove (Triggering unit) from the game
Else - Actions
Player Group - Pick every player in (All enemies of Vampire.) and do (Actions)
Loop - Actions
Game - Victory (Picked player) ( Show dialogs, Show scores)
Game - Defeat Vampire with the message: Defeat!
function Trig_Vamp_Leader_Leaves_Func003A takes nothing returns nothing
    call CustomDefeatBJ( GetEnumPlayer(), "You can blame|n"+GetPlayerName(udg_Vampire) )
endfunction

function Trig_Vamp_Leader_Leaves_Func004A takes nothing returns nothing
    call CustomVictoryBJ( GetEnumPlayer(), true, true )
endfunction

function Trig_Vamp_Leader_Leaves_Actions takes nothing returns nothing
    call DisplayTextToForce( GetPlayersAll(), "The Vampire Leader has wussed out and left the game!" )
    call ForForce( udg_VampAllies, function Trig_Vamp_Leader_Leaves_Func003A )
    call ForForce( GetPlayersEnemies(udg_Vampire), function Trig_Vamp_Leader_Leaves_Func004A )
endfunction

//===========================================================================
function InitTrig_Vamp_Leader_Leaves takes nothing returns nothing
    set gg_trg_Vamp_Leader_Leaves = CreateTrigger(  )
    call TriggerRegisterPlayerEventLeave( gg_trg_Vamp_Leader_Leaves, udg_Vampire )
    call TriggerAddAction( gg_trg_Vamp_Leader_Leaves, function Trig_Vamp_Leader_Leaves_Actions )
endfunction
VampireWins
Events
Conditions
Actions
Player Group - Pick every player in VampAllies and do (Actions)
Loop - Actions
Game - Defeat (Picked player) with the message: I had to make some1 lose.|nHave a nice day!
Game - Victory Vampire ( Show dialogs, Show scores)
Demolish
Events
Unit - A unit Finishes casting an ability
Conditions
(Ability being cast) Equal to Destroy
Actions
Unit - Kill (Triggering unit)
While it is quite basic, it still works :-)
Top