• 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

LootSystem_v4.w3x
Variables
LS
---------------------------
LootLib
Config
System
Remove
Empty
Enter map-specific custom script code below. This text will be included in the map script after variables are declared and before any trigger code.
Name Type is_array initial_value
Bonus real No
Chance integer Yes
Formula real No
HeroNegLevel integer No
HeroPlusLevel integer No
Integer integer No
Item item Yes
Item_Type itemcode Yes
Loot unit Yes
LsRegion rect Yes
Percent integer No
Random integer Yes
Temp_Group1 group No
Temp_Point2 location No
// Forsakener's Loot Sytem
//TESH.scrollpos=0
//TESH.alwaysfold=0
library LootLib
    
    //public function
    function lootint takes integer whichitem, integer whichregion, integer whatlevel returns nothing
        call CreateItem(whichitem, GetRectCenterX(udg_LsRegion[whichregion]), GetRectCenterY(udg_LsRegion[whichregion]))
        call SetItemUserData(GetLastCreatedItem(), whatlevel)
    endfunction

endlibrary
Config
Events
Map initialization
Conditions
Actions
Set Variable Set LsRegion[1] = Common <gen>
Set Variable Set LsRegion[2] = Uncommon <gen>
Set Variable Set LsRegion[3] = Unique <gen>
Set Variable Set LsRegion[4] = Set <gen>
Set Variable Set LsRegion[5] = Rare <gen>
Set Variable Set LsRegion[6] = Epic <gen>
-------- Configurables --------
-------- The number is the %chance --------
Set Variable Set Chance[1] = "35"
Set Variable Set Chance[2] = "10"
Set Variable Set Chance[3] = "6"
Set Variable Set Chance[4] = "2"
Set Variable Set Chance[5] = "0"
Set Variable Set Chance[6] = "-1"
Set Variable Set Bonus = "1.00"
Set Variable Set Percent = "100"
Set Variable Set HeroPlusLevel = "8"
Set Variable Set HeroNegLevel = "5"
-------- ENDConfigurables --------
-------- StartItemCatalog --------
-------- Common --------
-------- ===== --------
Custom script: call lootint('I001', 1, 3)
Custom script: call lootint('I002', 1, 3)
Custom script: call lootint('I000', 1, 3)
Custom script: call lootint('I007', 2, 3)
System
Events
Unit - A unit Dies
Conditions
(Owner of (Triggering unit)) Equal to Neutral Hostile
Actions
Set Variable Set Temp_Point2 = (Position of (Triggering unit))
Unit - Create 1 . Loot for (Owner of (Killing unit)) at Temp_Point2 facing (Facing of (Triggering unit)) degrees
Custom script: call RemoveLocation (udg_Temp_Point2)
Unit - Add a 60.00 second Generic expiration timer to (Last created unit)
Set Variable Set Loot[(Player number of (Owner of (Killing unit)))] = (Last created unit)
For each (Integer A) from 1 to 6 , do (Actions)
Loop - Actions
Set Variable Set Formula = ((Real(Chance[(Integer A)])) + (Bonus x ((Real((Level of (Triggering unit)))) - (Real((Hero level of (Killing unit)))))))
Set Variable Set Random[(Integer A)] = (Random integer number between 1 and Percent)
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
Random[(Integer A)] Less than or equal to (Integer(Formula))
Then - Actions
Hero - Create (Item-type of (Random item in LsRegion[(Integer A)] matching (((Custom value of (Matching item)) Greater than or equal to ((Hero level of (Killing unit)) - HeroNegLevel)) and ((Custom value of (Matching item)) Less than or equal to ((Hero level of (Killing unit)) + HeroPlusLevel))))) and give it to Loot[(Player number of (Owner of (Killing unit)))]
Else - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of items carried by Loot[(Player number of (Owner of (Killing unit)))]) Equal to 0
Then - Actions
Unit - Remove Loot[(Player number of (Owner of (Killing unit)))] from the game
Else - Actions
Remove
Events
Unit - A unit Dies
Conditions
(Unit-type of (Triggering unit)) Equal to Loot
Actions
Unit - Remove (Triggering unit) from the game
Empty
Events
Time - Every 2 seconds of game time
Conditions
Actions
Set Variable Set Temp_Group1 = (Units of type Loot)
Unit Group - Pick every unit in Temp_Group1 and do (Actions)
Loop - Actions
If (All Conditions are True) then do (Then Actions) else do (Else Actions)
If - Conditions
(Number of items carried by (Picked unit)) Equal to 0
Then - Actions
Unit - Remove (Picked unit) from the game
Else - Actions
Custom script: call DestroyGroup (udg_Temp_Group1)
Top