- Joined
- Apr 2, 2009
- Messages
- 249
It seems that your system conflicts with Dusk' damage detection system.
After importing this, all of my spells does not work !
After importing this, all of my spells does not work !
-
Are you planning to upload your awesome spell or system to Hive? Please review the rules here.
-
🏆 Texturing Contest #33 is OPEN! Contestants must re-texture a SD unit model found in-game (Warcraft 3 Classic), recreating the unit into a peaceful NPC version. 🔗Click here to enter!
-
It's time for the first HD Modeling Contest of 2024. Join the theme discussion for Hive's HD Modeling Contest #6! Click here to post your idea!
[vJass] Advanced Inventory System v2.01b
- Author(s)
- Kricz
- Size
- 131.56 KB
- Rating
- Downloads
- 1796
- Created
- Sep 17, 2009
- Updated
- Oct 8, 2009
- Resources
- 1
- State
Approved
This bundle is marked as recommended. It works and satisfies the submission rules.
This is an advanced Inventory System, fully written in vjass.
It allows the user to add heroes and advanced inventory system, which features:
Requires:
vJass
Table, TimerUtils & SimError (by Vexorian)
StringRead (short System by D1000)
BonusMod & SetUnitMaxState (by Earth-Fury)
Icons by:
BruZzl3R_17C
Fore more details, look in the librarys.
If you wan't to use this system correct, you have to disable 2 thinks in the Gameplay-Interface:
Version 2.01b:
Demo Map:
- added a computer bot to demo map, so it can be runned direct through warcraft
//////////////////////////////////////////
// OLD CHANGELOGS: //
//////////////////////////////////////////
Version 2.01:
Inventory System:
- added two new globals for movement speed
Item List:
- added movement speed bonus
- fixed bug in addNormelItem method
Version 2.00:
Inventory System:
- added a 8 slot backpack
- added a auto stack detection system
- added fully triggered item pickup
- ALOT code changes and improvements
- Added some more constants
- now uses TimerUtils
- Item now can be equipped when the equipment menu is opened (through auto equip for example)
Item List:
- added more configurations
- removed / delated methods which are not required
- added some new methods / operators for handling with "Items"
- made some struct member private
- added possibility to add potions to the system (uses the new configurations)
- added the possibility to add "special efffects" to items (only for Equipment)
Demo Map:
- added 6 new Items
Version 1.02:
Inventory System:
-added auto equip to the system
-added normal functions to add heroes to the system, get its Inventory and specific items in slots
-some small code changes
Item List:
-added functions to add items directly to their Slot
Demo Map:
-added 3 example items
Version 1.01:
Inventory System:
-added custom Icons for "Emtpy Slots".
-you now can setup the position of the 'Inventory-Item'.
-After closing the inventory, the items now will be added to the place they where before closing.
-When equiping an item and its slot is full, the item will be switched to the same slot, the new equipped item was
Please give credits to the above named mapper, if you use this system and to me
Keywords:
Inventory, advanced, items, custom, hero classes, item classes, equipment, bag, backpack, stack, charges
It allows the user to add heroes and advanced inventory system, which features:
- Equipment Menu with 8 Slots
- 8 Slot Backpack
- Auto Stack Detection System
- Advanced Item Handling
- ....
Requires:
vJass
Table, TimerUtils & SimError (by Vexorian)
StringRead (short System by D1000)
BonusMod & SetUnitMaxState (by Earth-Fury)
Icons by:
BruZzl3R_17C
Fore more details, look in the librarys.
If you wan't to use this system correct, you have to disable 2 thinks in the Gameplay-Interface:
- Text - Message - 'Inventory is full':
Delate this message " ", else the normal wc3 Message will be shown, that you hero#s inventory is full - Sound - Inventory Full:
Just "Shift-Klick", press space and then enter again. That disables the sound, which will be played, wenn the inventory is full.
Version 2.01b:
Demo Map:
- added a computer bot to demo map, so it can be runned direct through warcraft
//////////////////////////////////////////
// OLD CHANGELOGS: //
//////////////////////////////////////////
Version 2.01:
Inventory System:
- added two new globals for movement speed
Item List:
- added movement speed bonus
- fixed bug in addNormelItem method
Version 2.00:
Inventory System:
- added a 8 slot backpack
- added a auto stack detection system
- added fully triggered item pickup
- ALOT code changes and improvements
- Added some more constants
- now uses TimerUtils
- Item now can be equipped when the equipment menu is opened (through auto equip for example)
Item List:
- added more configurations
- removed / delated methods which are not required
- added some new methods / operators for handling with "Items"
- made some struct member private
- added possibility to add potions to the system (uses the new configurations)
- added the possibility to add "special efffects" to items (only for Equipment)
Demo Map:
- added 6 new Items
Version 1.02:
Inventory System:
-added auto equip to the system
-added normal functions to add heroes to the system, get its Inventory and specific items in slots
-some small code changes
Item List:
-added functions to add items directly to their Slot
Demo Map:
-added 3 example items
Version 1.01:
Inventory System:
-added custom Icons for "Emtpy Slots".
-you now can setup the position of the 'Inventory-Item'.
-After closing the inventory, the items now will be added to the place they where before closing.
-When equiping an item and its slot is full, the item will be switched to the same slot, the new equipped item was
JASS:
library InventorySystem requires Table, ItemList, SimError, BonusMod, SetUnitMaxState, SearchString
globals
//The Rawcodes of the Items for opening the backpack and equipment
private constant integer EQUIPMENT_OPEN_ID = 'I000'
private constant integer BACKPACK_OPEN_ID = 'I00R'
//The rawcodes of the Items for closing the backpack and equipment
private constant integer EQUIPMENT_CLOSE_ID = 'I001'
private constant integer BACKPACK_CLOSE_ID = 'I00S'
//The rawcodes of the Items changing the pages of the backpack and equipment menu
private constant integer EQUIPMENT_PAGE_1 = 'I003'
private constant integer BACKPACK_PAGE_1 = 'I00T'
private constant integer EQUIPMENT_PAGE_2 = 'I002'
private constant integer BACKPACK_PAGE_2 = 'I00U'
//The slots, where the items for opening backpack and equipment menu should be created
private constant integer EQUIPMENT_SLOT = 4
private constant integer BACKPACK_SLOT = 5
//The place, where required items should be stored
private constant real STORE_ITEM_X = 0.
private constant real STORE_ITEM_Y = 0.
//The Maximum Movespeed a unit can have
private constant real MAX_MOVEMENT_SPEED = 400.
//The Minimum Movespeed a unit can have
private constant real MIN_MOVEMENT_SPEED = 150.
//The Max Number of Charges, an item can has maximum
constant integer MAX_ITEM_CHARGES = 8
//If true, the equipment menu will change to first page when opened
private constant boolean CHANGE_TO_FIRST = true
//If trie, an item being picked up will be auto equipped, if its slot is emtpy and the hero can wear it
private constant boolean AUTO_EQUIP = true
//The distance, an item can be picked up by a hero
private constant real ITEM_PICKUP_DIST = 225.00
//Don't change this!!!
private integer array DUMMY_ITEMS[8]
endglobals
private function SETUP_DUMMY_ITEMS takes nothing returns nothing
set DUMMY_ITEMS[0] = 'I004' //Head
set DUMMY_ITEMS[1] = 'I005' //Chest
set DUMMY_ITEMS[2] = 'I006' //Main Hand
set DUMMY_ITEMS[3] = 'I007' //Secondary Hand
set DUMMY_ITEMS[4] = 'I008' //Gloves
set DUMMY_ITEMS[5] = 'I009' //Feet
set DUMMY_ITEMS[6] = 'I00A' //First Acessory
set DUMMY_ITEMS[7] = 'I00B' //Second Acessory
endfunction
//EVERYTHING BELOW HERE IS SYSTEM CODE!!!
private keyword addItem
//This is the triggered item pickup and stack detection System.
private struct StackData
private delegate Inventory inv = 0
item item = null
real x = 0
real y = 0
integer order = 0
private static integer count = 0
private static thistype array datas
private static trigger walkTo
//creates a new instance of the stackdata
static method create takes unit hero, item which returns StackData
local StackData this = StackData.allocate()
set .inv = Inventory.table[hero]
set .item = which
set .x = GetItemX(.item)
set .y = GetItemY(.item)
call IssuePointOrder(.Owner, "move", .x, .y)
set .order = GetUnitCurrentOrder(.Owner)
set .datas[.count] = this
set .count = .count + 1
return this
endmethod
//checks if the issued target was an item and the order is correct
static method check takes nothing returns boolean
if GetOrderTargetItem() != null and (GetIssuedOrderId() == 851971) then
call StackData.create(GetTriggerUnit(), GetOrderTargetItem())
return true
endif
return false
endmethod
//just sorts and checks each stackdata...
static method periodic takes nothing returns nothing
local integer i = .count - 1
loop
exitwhen i < 0
if not .datas[i].control() then
set .count = .count - 1
if .count < 0 then
set .count = 0
else
set .datas[i] = .datas[.count]
endif
endif
set i = i - 1
endloop
endmethod
//checks the hero and the item every interval
method control takes nothing returns boolean
local real dx = GetUnitX(.Owner) - .x
local real dy = GetUnitY(.Owner) - .y
local Item it = Item.getItemById(GetItemTypeId(.item))
if GetUnitCurrentOrder(.Owner) != .order or GetItemX(.item) != .x or GetItemY(.item) != .y or GetWidgetLife(.Owner) <= 0.405 then
return false
elseif SquareRoot(dx * dx + dy * dy) <= ITEM_PICKUP_DIST and GetItemX(.item) == .x or GetItemY(.item) == .y and GetWidgetLife(.Owner) > 0.405 then
call IssueImmediateOrder(.Owner, "stop")
if (AUTO_EQUIP and it.equippable and .isSlotEmpty(it.slot) and .checkHero(it, false) and .allowauto) then
return Inventory.equipItem(.Owner, .item, it)
endif
if not .checkItemForStack(.item) then
if not .getSlotForItem(.item) then
call SimError(GetOwningPlayer(.Owner), "Inventory and Backpack are full.")
return false
endif
endif
return false
elseif SquareRoot(dx * dx + dy * dy) > ITEM_PICKUP_DIST then
return true
endif
return false
endmethod
//self explanatory..
static method onInit takes nothing returns nothing
set .walkTo = CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(.walkTo, EVENT_PLAYER_UNIT_ISSUED_TARGET_ORDER)
call TriggerAddCondition(.walkTo, Condition(function thistype.check))
call TimerStart(NewTimer(), 0.05, true, function thistype.periodic)
endmethod
endstruct
//private struct required to "recreate" items in their slots when their are dragged or dropped incrorrect
private struct addItem
delegate Inventory inv
integer id
integer charges
integer slot
private timer t
//creates a new instance for an item to a move it to a slot
static method create takes item it, integer slot, Inventory inv returns thistype
local thistype this = thistype.allocate()
set .inv = inv
set .id = GetItemTypeId(it)
set .charges = GetItemCharges(it)
set .slot = slot
set .dropped = false
call RemoveItem(it)
set .dropped = true
set .t = NewTimer()
call SetTimerData(.t, this)
call TimerStart(.t, 0.0, false, function thistype.expire)
return this
endmethod
//0.0 second tiemr interval is required...
private static method expire takes nothing returns nothing
local thistype this = GetTimerData(GetExpiredTimer())
call UnitAddItemToSlotById(.Owner, .id, .slot)
call SetItemCharges(UnitItemInSlot(.Owner, .slot), .charges)
call ReleaseTimer(.t)
call .destroy()
endmethod
endstruct
//The Inventory struct..
struct Inventory
unit Owner
string HeroClass = ""
string ItemClasses = ""
item array equip[8]
integer array items[6]
integer array backp[8]
integer array charges[6]
integer array bcharges[8]
boolean allowauto = true
integer bfree = 8
boolean dropped = true
private effect array fx[8]
private boolean open = false
private boolean bopen = false
private integer page = 1
private integer bpage = 1
private real array MsBoni[8]
public static HandleTable table
private static trigger Use = CreateTrigger()
private static trigger Pickup = CreateTrigger()
private static trigger Drag = CreateTrigger()
private static trigger Drop = CreateTrigger()
//creates a new Inventory for the unit
static method create takes unit whichUnit, string heroClass, string availableItemClasses returns thistype
local thistype this = 0
local integer i = 0
if not .table.exists(whichUnit) then
set this = thistype.allocate()
set .Owner = whichUnit
set .HeroClass = heroClass
set .ItemClasses = availableItemClasses
loop
exitwhen i > 8
set .equip[i] = CreateItem(DUMMY_ITEMS[i], STORE_ITEM_X, STORE_ITEM_Y)
call SetItemVisible(.equip[i], false)
set i = i + 1
endloop
call TriggerRegisterUnitEvent(.Use, .Owner, EVENT_UNIT_USE_ITEM)
call TriggerRegisterUnitEvent(.Pickup, .Owner, EVENT_UNIT_PICKUP_ITEM)
call TriggerRegisterUnitEvent(.Drag, .Owner, EVENT_UNIT_ISSUED_TARGET_ORDER)
call TriggerRegisterUnitEvent(.Drop, .Owner, EVENT_UNIT_DROP_ITEM)
call UnitAddItemToSlotById(.Owner, EQUIPMENT_OPEN_ID, EQUIPMENT_SLOT)
call UnitAddItemToSlotById(.Owner, BACKPACK_OPEN_ID, BACKPACK_SLOT)
call SetItemCharges(UnitItemInSlot(.Owner, BACKPACK_SLOT), .bfree)
set .table[.Owner] = this
return this
endif
return 0
endmethod
//opens the backpack for the unit
public static method openBackpack takes unit whichUnit returns boolean
local integer i = 0
local integer i2 = 0
local thistype this = .table[whichUnit]
local item temp = null
local integer add = 0
if not .table.exists(whichUnit) then
return false
elseif not .bopen and not .open then
set .bopen = true
set .allowauto = false
loop
exitwhen i > 5
set temp = UnitItemInSlot(.Owner, i)
set .charges[i] = GetItemCharges(temp)
set .items[i] = GetItemTypeId(temp)
call RemoveItem(temp)
set i = i + 1
endloop
call UnitAddItemToSlotById(.Owner, BACKPACK_CLOSE_ID, 5)
if .bpage <= 1 then
set i = 0
loop
exitwhen i > 3
if .backp[i] != 0 then
call UnitAddItemToSlotById(.Owner, .backp[i], i)
call SetItemCharges(UnitItemInSlot(.Owner, i), .bcharges[i])
endif
set i = i + 1
endloop
call UnitAddItemToSlotById(.Owner, BACKPACK_PAGE_2, 4)
elseif .bpage >= 2 then
set i = 0
loop
exitwhen i > 3
if .backp[i+4] != 0 then
call UnitAddItemToSlotById(.Owner, .backp[i+4], i)
call SetItemCharges(UnitItemInSlot(.Owner, i), .bcharges[i+4])
endif
set i = i + 1
endloop
call UnitAddItemToSlotById(.Owner, BACKPACK_PAGE_1, 4)
endif
set temp = null
set .allowauto = true
return true
endif
return true
endmethod
//opens the equipment menu
public static method openEquipment takes unit whichUnit returns boolean
local integer i = 0
local thistype this = .table[whichUnit]
local item temp = null
if not .table.exists(whichUnit) then
return false
elseif not .open and not .bopen then
set .open = true
set .allowauto = false
if .page <= 1 or CHANGE_TO_FIRST then
loop
exitwhen i > 5
set temp = UnitItemInSlot(.Owner, i)
set .charges[i] = GetItemCharges(temp)
set .items[i] = GetItemTypeId(temp)
call RemoveItem(temp)
if i < 4 then
call SetItemVisible(.equip[i], true)
call UnitAddItem(.Owner, .equip[i])
endif
set i = i + 1
endloop
call UnitAddItemToSlotById(.Owner, EQUIPMENT_PAGE_2, 4)
elseif .page >= 2 and not CHANGE_TO_FIRST then
loop
exitwhen i > 5
set temp = UnitItemInSlot(.Owner, i)
set .charges[i] = GetItemCharges(temp)
set .items[i] = GetItemTypeId(temp)
call RemoveItem(temp)
if i < 4 then
call SetItemVisible(.equip[i+4], true)
call UnitAddItem(.Owner, .equip[i+4])
endif
set i = i + 1
endloop
call UnitAddItemToSlotById(.Owner, EQUIPMENT_PAGE_1, 4)
endif
call UnitAddItemToSlotById(.Owner, EQUIPMENT_CLOSE_ID, 5)
set .allowauto = true
return true
endif
return true
endmethod
//closes the hero's backpack
public static method closeBackpack takes unit whichUnit returns boolean
local integer i = 0
local item t = null
local thistype this = .table[whichUnit]
local item temp = null
if not .table.exists(whichUnit) then
return false
elseif .bopen then
set .bopen = false
set .allowauto = false
call RemoveItem(UnitItemInSlot(.Owner, 5))
call RemoveItem(UnitItemInSlot(.Owner, 4))
if .bpage <= 1 then
loop
exitwhen i > 3
set temp = UnitRemoveItemFromSlot(.Owner, i)
set .backp[i] = GetItemTypeId(temp)
set .bcharges[i] = GetItemCharges(temp)
call RemoveItem(temp)
set i = i + 1
endloop
elseif .bpage >= 2 then
loop
exitwhen i > 3
set temp = UnitRemoveItemFromSlot(.Owner, i)
set .backp[i+4] = GetItemTypeId(temp)
set .bcharges[i+4] = GetItemCharges(temp)
call RemoveItem(temp)
set i = i + 1
endloop
endif
set i = 0
loop
exitwhen i > 5
if .items[i] != 0 then
call UnitAddItemToSlotById(.Owner, .items[i], i)
call SetItemCharges(UnitItemInSlot(.Owner, i), .charges[i])
endif
set i = i + 1
endloop
set .bfree = .getBackpackPlace()
call SetItemCharges(UnitItemInSlot(.Owner, BACKPACK_SLOT), .bfree)
set .allowauto = true
set temp = null
return true
endif
return false
endmethod
//closes the hero's equipment menu
public static method closeEquipment takes unit whichUnit returns boolean
local integer i = 0
local item t = null
local thistype this = .table[whichUnit]
local integer add = 0
if not .table.exists(whichUnit) then
return false
elseif .open then
set .open = false
set .allowauto = false
if .page >= 2 then
set add = 4
endif
loop
exitwhen i > 3
set .equip[i+add] = UnitRemoveItemFromSlot(.Owner, i)
call SetItemPosition(.equip[i+add], STORE_ITEM_X, STORE_ITEM_Y)
call SetItemVisible(.equip[i+add], false)
set i = i + 1
endloop
call RemoveItem(UnitItemInSlot(.Owner, 5))
call RemoveItem(UnitItemInSlot(.Owner, 4))
set i = 0
loop
exitwhen i > 5
if .items[i] != 0 then
call UnitAddItemToSlotById(.Owner, .items[i], i)
call SetItemCharges(UnitItemInSlot(.Owner, i), .charges[i])
endif
set i = i + 1
endloop
call SetItemCharges(UnitItemInSlot(.Owner, BACKPACK_SLOT), .bfree)
if CHANGE_TO_FIRST then
set .page = 1
endif
set .allowauto = true
return true
endif
return false
endmethod
//changes the backpack pages of the unit
public static method changePageBackpack takes unit whichUnit returns boolean
local integer i = 0
local thistype this = .table[whichUnit]
local item temp = null
if .bopen and this != 0 then
set .dropped = false
call RemoveItem(UnitItemInSlot(.Owner, 4))
set .dropped = true
set .allowauto = false
if .bpage <= 1 then
loop
exitwhen i > 3
set temp = UnitRemoveItemFromSlot(.Owner, i)
set .backp[i] = GetItemTypeId(temp)
set .bcharges[i] = GetItemCharges(temp)
call UnitAddItemToSlotById(.Owner, .backp[i+4], i)
call SetItemCharges(UnitItemInSlot(.Owner, i), .bcharges[i+4])
call RemoveItem(temp)
set i = i + 1
endloop
call UnitAddItemToSlotById(.Owner, BACKPACK_PAGE_1, 4)
set .bpage = 2
elseif .bpage >= 2 then
loop
exitwhen i > 3
set temp = UnitRemoveItemFromSlot(.Owner, i)
set .backp[i+4] = GetItemTypeId(temp)
set .bcharges[i+4] = GetItemCharges(temp)
call UnitAddItemToSlotById(.Owner, .backp[i], i)
call SetItemCharges(UnitItemInSlot(.Owner, i), .bcharges[i])
call RemoveItem(temp)
set i = i + 1
endloop
call UnitAddItemToSlotById(.Owner, BACKPACK_PAGE_2, 4)
set .bpage = 1
endif
set .allowauto = true
set temp = null
return true
endif
return false
endmethod
//changes the equipment menu pages for the unit
public static method changePageEquipment takes unit whichUnit returns boolean
local integer i = 0
local thistype this = .table[whichUnit]
local integer add = 0
if .open and this != 0 then
if .page >= 2 then
set add = 4
endif
set .allowauto = false
loop
exitwhen i > 3
set .equip[i+add] = UnitRemoveItemFromSlot(.Owner, i)
call SetItemPosition(.equip[i+add], STORE_ITEM_X, STORE_ITEM_Y)
call SetItemVisible(.equip[i+add], false)
call UnitAddItem(.Owner, .equip[i+4-add])
set i = i + 1
endloop
set .dropped = false
call RemoveItem(UnitItemInSlot(.Owner, 4))
set .dropped = true
if .page >= 2 then
call UnitAddItemToSlotById(.Owner, EQUIPMENT_PAGE_2, 4)
set .page = 1
elseif .page <= 1 then
call UnitAddItemToSlotById(.Owner, EQUIPMENT_PAGE_1, 4)
set .page = 2
endif
set .allowauto = true
return true
endif
return false
endmethod
//Only call this method, if you can be shure, that the Item's slot is empty or it will bug!
public static method quickEquip takes unit u, Item it returns boolean
local thistype this = .table[u]
if .checkHero(it, true) then
set .equip[it.slot] = CreateItem(it.itemId, STORE_ITEM_X, STORE_ITEM_Y)
call SetItemVisible(.equip[it.slot], false)
call SetItemDroppable(.equip[it.slot], false)
call .applyItemStats(it)
return true
endif
return false
endmethod
//equips an item for a hero
public static method equipItem takes unit u, item t, Item it returns boolean
local thistype this = .table[u]
local integer itd1 = 0
local integer itd2 = 0
local integer slot = 0
local integer i = 0
if .checkHero(it, true) then
if not .isItemEquipped(t) and .isSlotEmpty(it.slot) then
if not .open then
call RemoveItem(.equip[it.slot])
set .equip[it.slot] = t
call SetItemPosition(.equip[it.slot], STORE_ITEM_X, STORE_ITEM_Y)
call SetItemVisible(.equip[it.slot], false)
call SetItemDroppable(.equip[it.slot], false)
call .applyItemStats(it)
return true
elseif .open then
set .dropped = false
if .page <= 1 then
if it.slot <= 3 then
if not (GetItemTypeId(UnitItemInSlot(.Owner, it.slot)) == DUMMY_ITEMS[it.slot]) then
if not .getSlotForItem(UnitItemInSlot(.Owner, it.slot)) then
call SimError(GetOwningPlayer(.Owner), "Inventory and Backpack are full.")
return false
endif
else
call RemoveItem(UnitItemInSlot(.Owner, it.slot))
endif
call UnitAddItemToSlotById(.Owner, it.itemId, it.slot)
call .applyItemStats(it)
return true
elseif it.slot > 3 then
if not (GetItemTypeId(.equip[it.slot]) == DUMMY_ITEMS[it.slot]) then
if not .getSlotForItem(.equip[it.slot]) then
call SimError(GetOwningPlayer(.Owner), "Inventory and Backpack are full.")
return false
endif
else
call RemoveItem(.equip[it.slot])
endif
set .equip[it.slot] = t
call SetItemPosition(.equip[it.slot], STORE_ITEM_X, STORE_ITEM_Y)
call SetItemVisible(.equip[it.slot], false)
call SetItemDroppable(.equip[it.slot], false)
call .applyItemStats(it)
return true
endif
elseif .page >= 2 then
if it.slot > 3 then
if not (GetItemTypeId(UnitItemInSlot(.Owner, it.slot - 4)) == DUMMY_ITEMS[it.slot]) then
if not .getSlotForItem(UnitItemInSlot(.Owner, it.slot - 4)) then
call SimError(GetOwningPlayer(.Owner), "Inventory and Backpack are full.")
return false
endif
else
call RemoveItem(UnitItemInSlot(.Owner, it.slot - 4))
endif
call UnitAddItemToSlotById(.Owner, it.itemId, it.slot - 4)
call .applyItemStats(it)
return true
elseif it.slot <= 3 then
if not (GetItemTypeId(.equip[it.slot]) == DUMMY_ITEMS[it.slot]) then
if not .getSlotForItem(UnitItemInSlot(.Owner, it.slot)) then
call SimError(GetOwningPlayer(.Owner), "Inventory and Backpack are full.")
return false
endif
else
call RemoveItem(.equip[it.slot])
endif
set .equip[it.slot] = t
call SetItemPosition(.equip[it.slot], STORE_ITEM_X, STORE_ITEM_Y)
call SetItemVisible(.equip[it.slot], false)
call SetItemDroppable(.equip[it.slot], false)
call .applyItemStats(it)
return true
endif
endif
endif
elseif not .isSlotEmpty(it.slot) then
set itd1 = GetItemTypeId(t)
set slot = .getItemSlot(t)
call RemoveItem(t)
set itd2 = GetItemTypeId(.equip[it.slot])
call RemoveItem(.equip[it.slot])
call .removeItemStats(Item.getItemById(itd2))
call .applyItemStats(it)
set .equip[it.slot] = CreateItem(itd1, STORE_ITEM_X, STORE_ITEM_Y)
call SetItemVisible(.equip[it.slot], false)
call UnitAddItemToSlotById(.Owner, itd2, slot)
call SetItemDroppable(.equip[it.slot], false)
return true
endif
endif
return false
endmethod
//un-equips an item for the hero
public static method unequipItem takes unit u, item t, Item it returns boolean
local thistype this = .table[u]
if not .getSlotForItem(t) then
call SimError(GetOwningPlayer(.Owner), "Inventory and Backpack are full.")
return false
else
call .removeItemStats(it)
set .equip[it.slot] = UnitAddItemById(.Owner, DUMMY_ITEMS[it.slot])
return true
endif
endmethod
//Returns true, if the given item is equipped (or an item with the same ItemTypeId)
public method isItemEquipped takes item whichItem returns boolean //INLINE FRIENDLY
return GetItemTypeId(.equip[Item.getItemById(GetItemTypeId(whichItem)).slot]) == GetItemTypeId(whichItem)
endmethod
//Returns true, if the given slot is empty
public method isSlotEmpty takes integer Slot returns boolean //INLINE FRIENDLY
return GetItemTypeId(.equip[Slot]) == DUMMY_ITEMS[Slot]
endmethod
//checks, if the hero has the possibility to stack the given item with another
public method checkItemForStack takes item for returns boolean
local integer i = 0
local integer id = GetItemTypeId(for)
local integer bonus = 0
local Item it = Item.getItemById(GetItemTypeId(for))
if not .open and not .bopen and not it.equippable then
loop
exitwhen i > 5
if GetItemTypeId(UnitItemInSlot(.Owner, i)) == id and GetItemCharges(UnitItemInSlot(.Owner, i)) + GetItemCharges(for) <= MAX_ITEM_CHARGES and GetItemCharges(UnitItemInSlot(.Owner, i)) + GetItemCharges(for) <= it.maxCharges then
set bonus = GetItemCharges(for)
call RemoveItem(for)
call SetItemCharges(UnitItemInSlot(.Owner, i), GetItemCharges(UnitItemInSlot(.Owner, i)) + bonus)
return true
endif
set i = i + 1
endloop
set i = 0
loop
exitwhen i > 7
if .backp[i] == id and .bcharges[i] + GetItemCharges(for) <= MAX_ITEM_CHARGES and .bcharges[i] + GetItemCharges(for) <= it.maxCharges then
set bonus = GetItemCharges(for)
set .bcharges[i] = .bcharges[i] + bonus
call RemoveItem(for)
return true
endif
set i = i + 1
endloop
elseif .open then
loop
exitwhen i > 5
if .items[i] == id and .charges[i] + GetItemCharges(for) <= MAX_ITEM_CHARGES and .charges[i] + GetItemCharges(for) <= it.maxCharges then
set bonus = GetItemCharges(for)
call RemoveItem(for)
set .charges[i] = .charges[i] + bonus
return true
endif
set i = i + 1
endloop
set i = 0
loop
exitwhen i > 7
if .backp[i] == id and .bcharges[i] + GetItemCharges(for) <= MAX_ITEM_CHARGES and .bcharges[i] + GetItemCharges(for) <= it.maxCharges then
set bonus = GetItemCharges(for)
call RemoveItem(for)
set .bcharges[i] = .bcharges[i] + bonus
return true
endif
set i = i + 1
endloop
elseif .bopen then
loop
exitwhen i > 5
if .items[i] == id and .charges[i] + GetItemCharges(for) <= MAX_ITEM_CHARGES and .charges[i] + GetItemCharges(for) <= it.maxCharges then
set bonus = GetItemCharges(for)
call RemoveItem(for)
set .charges[i] = .charges[i] + bonus
return true
endif
set i = i + 1
endloop
if .bpage <= 1 then
set i = 0
loop
exitwhen i > 3
if GetItemTypeId(UnitItemInSlot(.Owner, i)) == id and GetItemCharges(UnitItemInSlot(.Owner, i)) + GetItemCharges(for) <= MAX_ITEM_CHARGES and GetItemCharges(UnitItemInSlot(.Owner, i)) + GetItemCharges(for) <= it.maxCharges then
set bonus = GetItemCharges(for)
call RemoveItem(for)
call SetItemCharges(UnitItemInSlot(.Owner, i), GetItemCharges(UnitItemInSlot(.Owner, i)) + bonus)
return true
endif
set i = i + 1
endloop
set i = 4
loop
exitwhen i > 7
if .backp[i] == id and .bcharges[i] + GetItemCharges(for) <= MAX_ITEM_CHARGES and .bcharges[i] + GetItemCharges(for) <= it.maxCharges then
set bonus = GetItemCharges(for)
call RemoveItem(for)
set .bcharges[i] = .bcharges[i] + bonus
return true
endif
set i = i + 1
endloop
elseif .bpage >= 2 then
set i = 0
loop
exitwhen i > 3
if GetItemTypeId(UnitItemInSlot(.Owner, i)) == id and GetItemCharges(UnitItemInSlot(.Owner, i)) + GetItemCharges(for) <= MAX_ITEM_CHARGES and GetItemCharges(UnitItemInSlot(.Owner, i)) + GetItemCharges(for) <= it.maxCharges then
set bonus = GetItemCharges(for)
call RemoveItem(for)
call SetItemCharges(UnitItemInSlot(.Owner, i), GetItemCharges(UnitItemInSlot(.Owner, i)) + bonus)
return true
endif
set i = i + 1
endloop
set i = 0
loop
exitwhen i > 3
if .backp[i] == id and .bcharges[i] + GetItemCharges(for) <= MAX_ITEM_CHARGES and .bcharges[i] + GetItemCharges(for) <= it.maxCharges then
set bonus = GetItemCharges(for)
set .bcharges[i] = .bcharges[i] + bonus
call RemoveItem(for)
return true
endif
set i = i + 1
endloop
endif
endif
return false
endmethod
//checks if the hero has a empty item slot
public method getSlotForItem takes item for returns boolean
local integer i = 0
local integer id = GetItemTypeId(for)
if not .open and not .bopen then
loop
exitwhen i > 5
if UnitItemInSlot(.Owner, i) == null then
call UnitAddItemToSlotById(.Owner, id, i)
call SetItemCharges(UnitItemInSlot(.Owner, i), GetItemCharges(for))
call RemoveItem(for)
return true
endif
set i = i + 1
endloop
set i = 0
loop
exitwhen i > 7
if .backp[i] == 0 then
set .backp[i] = id
set .bcharges[i] = GetItemCharges(for)
call RemoveItem(for)
set .bfree = .bfree - 1
if not .open or .bopen then
call SetItemCharges(UnitItemInSlot(.Owner, BACKPACK_SLOT), .bfree)
endif
return true
endif
set i = i + 1
endloop
elseif .open then
loop
exitwhen i > 5
if .items[i] == 0 then
set .items[i] = id
set .charges[i] = GetItemCharges(for)
call RemoveItem(for)
return true
endif
set i = i + 1
endloop
set i = 0
loop
exitwhen i > 7
if .backp[i] == 0 then
set .backp[i] = id
set .bcharges[i] = GetItemCharges(for)
call RemoveItem(for)
set .bfree = .bfree - 1
if not .open or .bopen then
call SetItemCharges(UnitItemInSlot(.Owner, BACKPACK_SLOT), .bfree)
endif
return true
endif
set i = i + 1
endloop
elseif .bopen then
if .bpage <= 1 then
set i = 0
loop
exitwhen i > 3
if UnitItemInSlot(.Owner, i) == null then
call UnitAddItemToSlotById(.Owner, id, i)
call SetItemCharges(UnitItemInSlot(.Owner, i), GetItemCharges(for))
call RemoveItem(for)
return true
endif
set i = i + 1
endloop
set i = 4
loop
exitwhen i > 7
if .backp[i] == 0 then
set .backp[i] = id
set .bcharges[i] = GetItemCharges(for)
call RemoveItem(for)
return true
endif
set i = i + 1
endloop
set i = 0
loop
exitwhen i > 5
if .items[i] == 0 then
set .items[i] = id
set .charges[i] = GetItemCharges(for)
call RemoveItem(for)
return true
endif
set i = i + 1
endloop
elseif .bpage >= 2 then
set i = 0
loop
exitwhen i > 3
if UnitItemInSlot(.Owner, i) == null then
call UnitAddItemToSlotById(.Owner, id, i)
call SetItemCharges(UnitItemInSlot(.Owner, i), GetItemCharges(for))
call RemoveItem(for)
return true
endif
set i = i + 1
endloop
set i = 0
loop
exitwhen i > 3
if .backp[i] == 0 then
set .backp[i] = id
set .bcharges[i] = GetItemCharges(for)
call RemoveItem(for)
return true
endif
set i = i + 1
endloop
set i = 0
loop
exitwhen i > 5
if .items[i] == 0 then
set .items[i] = id
set .charges[i] = GetItemCharges(for)
call RemoveItem(for)
return true
endif
set i = i + 1
endloop
endif
endif
return false
endmethod
//Applies the item's stats to the hero
private method applyItemStats takes Item it returns nothing
if it.Ms + GetUnitMoveSpeed(.Owner) > MAX_MOVEMENT_SPEED then
set .MsBoni[it.slot] = MAX_MOVEMENT_SPEED - GetUnitMoveSpeed(.Owner)
else
set .MsBoni[it.slot] = it.Ms
endif
call SetUnitMoveSpeed(.Owner, GetUnitMoveSpeed(.Owner) + .MsBoni[it.slot])
call UnitAddBonus(.Owner, 0, it.Armor)
call UnitAddBonus(.Owner, 1, it.Dmg)
call UnitAddBonus(.Owner, 2, it.As)
call UnitAddBonus(.Owner, 3, it.MpReg)
call UnitAddBonus(.Owner, 4, it.HpReg)
call UnitAddBonus(.Owner, 5, it.Str)
call UnitAddBonus(.Owner, 6, it.Agi)
call UnitAddBonus(.Owner, 7, it.Int)
call AddUnitMaxState(.Owner, UNIT_STATE_MAX_LIFE, it.Life)
call AddUnitMaxState(.Owner, UNIT_STATE_MAX_MANA, it.Mana)
if it.Effect != "" and it.EffectAttach != "" then
set .fx[it.slot] = AddSpecialEffectTarget(it.Effect, .Owner, it.EffectAttach)
endif
if it.Abil != 0 then
call UnitAddAbility(.Owner, it.Abil)
endif
endmethod
//removes the ItemStats for the hero
private method removeItemStats takes Item it returns nothing
if GetUnitMoveSpeed(.Owner) - .MsBoni[it.slot] < MIN_MOVEMENT_SPEED then
call SetUnitMoveSpeed(.Owner, MIN_MOVEMENT_SPEED)
else
call SetUnitMoveSpeed(.Owner, GetUnitMoveSpeed(.Owner) - .MsBoni[it.slot])
endif
set .MsBoni[it.slot] = 0.
call UnitAddBonus(.Owner, 0, -(it.Armor))
call UnitAddBonus(.Owner, 1, -(it.Dmg))
call UnitAddBonus(.Owner, 2, -(it.As))
call UnitAddBonus(.Owner, 3, -(it.MpReg))
call UnitAddBonus(.Owner, 4, -(it.HpReg))
call UnitAddBonus(.Owner, 5, -(it.Str))
call UnitAddBonus(.Owner, 6, -(it.Agi))
call UnitAddBonus(.Owner, 7, -(it.Int))
call AddUnitMaxState(.Owner, UNIT_STATE_MAX_LIFE, -(it.Life))
call AddUnitMaxState(.Owner, UNIT_STATE_MAX_MANA, -(it.Mana))
if it.Effect != "" and it.EffectAttach != "" then
call DestroyEffect(.fx[it.slot])
endif
if it.Abil != 0 then
call UnitRemoveAbility(.Owner, it.Abil)
endif
endmethod
//returns the slot of an item
private method getItemSlot takes item it returns integer
local item temp = null
local integer i = 0
loop
set temp = UnitItemInSlot(.Owner, i)
exitwhen i > 5 or temp == it
set i = i + 1
endloop
set temp = null
return i
endmethod
//Returns the first free Inventory slot of the hero
private method getFreeSlot takes nothing returns integer
local integer i = 0
local integer free
loop
exitwhen i > 4
if .items[i] == 0 then
set free = i
endif
exitwhen .items[i] == 0
set i = i + 1
endloop
return free
endmethod
//Returns the first free backpack slot of the hero
private method getFreeBackpackSlot takes nothing returns integer
local integer i = 0
local integer free
loop
exitwhen i > 7
if .backp[i] == 0 then
set free = i
endif
exitwhen .backp[i] == 0
set i = i + 1
endloop
return free
endmethod
//Returns the free place of the hero's backpack
private method getBackpackPlace takes nothing returns integer
local integer i = 0
local integer i2 = 8
loop
exitwhen i > 7
if .backp[i] != 0 then
set i2 = i2 - 1
endif
set i = i + 1
endloop
return i2
endmethod
//Returns the free place of the hero's Inventory
private method getInventoryPlace takes nothing returns integer
local integer i = 0
local integer i2 = 4
loop
exitwhen i > 3
if .items[i] != 0 then
set i2 = i2 - 1
endif
set i = i + 1
endloop
return i2
endmethod
//moves an item to the hero's backpack
private method moveToBackpack takes item Moved, item Bag returns boolean
local integer i = 0
local integer id = GetItemTypeId(Moved)
local integer Slot
if .getBackpackPlace() > 0 then
loop
exitwhen i > 7
if .backp[i] == id and .bcharges[i] + GetItemCharges(Moved) <= MAX_ITEM_CHARGES and .bcharges[i] + GetItemCharges(Moved) <= Item.getItemById(GetItemTypeId(Moved)).maxCharges then
set .bcharges[i] = .bcharges[i] + GetItemCharges(Moved)
call RemoveItem(Bag)
call RemoveItem(Moved)
call UnitAddItemToSlotById(.Owner, BACKPACK_OPEN_ID, BACKPACK_SLOT)
call SetItemCharges(UnitItemInSlot(.Owner, BACKPACK_SLOT), .bfree)
return true
endif
set i = i + 1
endloop
set i = 0
loop
exitwhen i > 7
if .backp[i] == 0 then
set .backp[i] = id
set .bcharges[i] = GetItemCharges(Moved)
set .bfree = .bfree - 1
call RemoveItem(Bag)
call RemoveItem(Moved)
call UnitAddItemToSlotById(.Owner, BACKPACK_OPEN_ID, BACKPACK_SLOT)
call SetItemCharges(UnitItemInSlot(.Owner, BACKPACK_SLOT), .bfree)
return true
endif
set i = i + 1
endloop
elseif .getBackpackPlace() <= 0 then
set Slot = .getItemSlot(Moved)
set i = GetItemCharges(Moved)
call RemoveItem(Bag)
call RemoveItem(Moved)
call UnitAddItemToSlotById(.Owner, BACKPACK_OPEN_ID, BACKPACK_SLOT)
call SetItemCharges(UnitItemInSlot(.Owner, BACKPACK_SLOT), .bfree)
call UnitAddItemToSlotById(.Owner, id, Slot)
call SetItemCharges(UnitItemInSlot(.Owner, Slot), i)
call SimError(GetOwningPlayer(.Owner), "Backpack is full!")
return false
endif
return false
endmethod
//moves an item from the first page to the second page
private method moveToSecondPage takes item Moved, item Second returns boolean
local integer i = 0
local integer id = GetItemTypeId(Moved)
local integer Slot
loop
exitwhen i > 3
if .backp[i+4] == id and .bcharges[i+4] + GetItemCharges(Moved) <= MAX_ITEM_CHARGES and .bcharges[i+4] + GetItemCharges(Moved) <= Item.getItemById(GetItemTypeId(Moved)).maxCharges then
set .bcharges[i+4] = .bcharges[i+4] + GetItemCharges(Moved)
call RemoveItem(Second)
call RemoveItem(Moved)
call UnitAddItemToSlotById(.Owner, BACKPACK_PAGE_2, 4)
return true
endif
set i = i + 1
endloop
set i = 0
loop
exitwhen i > 3
if .backp[i+4] == 0 then
set .backp[i+4] = id
set .bcharges[i+4] = GetItemCharges(Moved)
call RemoveItem(Second)
call RemoveItem(Moved)
call UnitAddItemToSlotById(.Owner, BACKPACK_PAGE_2, 4)
return true
endif
set i = i + 1
endloop
set Slot = .getItemSlot(Moved)
set i = GetItemCharges(Moved)
call RemoveItem(Second)
call RemoveItem(Moved)
call UnitAddItemToSlotById(.Owner, BACKPACK_PAGE_2, 4)
call UnitAddItemToSlotById(.Owner, id, Slot)
call SetItemCharges(UnitItemInSlot(.Owner, Slot), i)
call SimError(GetOwningPlayer(.Owner), "Cannot move item to a full page!")
return false
endmethod
//moves an item from the second page to the first page
private method moveToFirstPage takes item Moved, item First returns boolean
local integer i = 0
local integer id = GetItemTypeId(Moved)
local integer Slot
loop
exitwhen i > 3
if .backp[i] == id and .bcharges[i] + GetItemCharges(Moved) <= MAX_ITEM_CHARGES and .bcharges[i] + GetItemCharges(Moved) <= Item.getItemById(GetItemTypeId(Moved)).maxCharges then
set .bcharges[i] = .bcharges[i] + GetItemCharges(Moved)
call RemoveItem(First)
call RemoveItem(Moved)
call UnitAddItemToSlotById(.Owner, BACKPACK_PAGE_1, 4)
return true
endif
set i = i + 1
endloop
set i = 0
loop
exitwhen i > 3
if .backp[i] == 0 then
set .backp[i] = id
set .bcharges[i] = GetItemCharges(Moved)
call RemoveItem(First)
call RemoveItem(Moved)
call UnitAddItemToSlotById(.Owner, BACKPACK_PAGE_1, 4)
return true
endif
set i = i + 1
endloop
set Slot = .getItemSlot(Moved)
set i = GetItemCharges(Moved)
call RemoveItem(First)
call RemoveItem(Moved)
call UnitAddItemToSlotById(.Owner, BACKPACK_PAGE_1, 4)
call UnitAddItemToSlotById(.Owner, id, Slot)
call SetItemCharges(UnitItemInSlot(.Owner, Slot), i)
call SimError(GetOwningPlayer(.Owner), "Cannot move item to a full page!")
return false
endmethod
//moves an item to the heroes inventory
private method moveToInventory takes item Moved, item Close returns boolean
local integer i = 0
local integer id = GetItemTypeId(Moved)
local integer Slot
if .getInventoryPlace() > 0 then
loop
exitwhen i > 3
if .items[i] == id and .charges[i] + GetItemCharges(Moved) <= MAX_ITEM_CHARGES and .charges[i] + GetItemCharges(Moved) <= Item.getItemById(GetItemTypeId(Moved)).maxCharges then
set .charges[i] = .charges + GetItemCharges(Moved)
set .bfree = .bfree + 1
call RemoveItem(Close)
call RemoveItem(Moved)
call UnitAddItemToSlotById(.Owner, BACKPACK_CLOSE_ID, 5)
return true
endif
set i = i + 1
endloop
set i = .getFreeSlot()
set .items[i] = id
set .charges[i] = GetItemCharges(Moved)
set .bfree = .bfree + 1
call RemoveItem(Close)
call RemoveItem(Moved)
call UnitAddItemToSlotById(.Owner, BACKPACK_CLOSE_ID, 5)
return true
elseif .getInventoryPlace() <= 0 then
set Slot = .getItemSlot(Moved)
set i = GetItemCharges(Moved)
call RemoveItem(Close)
call RemoveItem(Moved)
call UnitAddItemToSlotById(.Owner, BACKPACK_CLOSE_ID, 5)
call UnitAddItemToSlotById(.Owner, id, Slot)
call SetItemCharges(UnitItemInSlot(.Owner, Slot), i)
call SimError(GetOwningPlayer(.Owner), "Inventory is full!")
return false
endif
return false
endmethod
//checks, if a hero can equip an item
public method checkHero takes Item it, boolean UseError returns boolean
if it.HeroClasses != "" then
if not SearchString(it.HeroClasses, .HeroClass) then
if UseError then
call SimError(GetOwningPlayer(.Owner), "Only " + it.HeroClasses + " can equip this item.")
endif
return false
endif
endif
if it.ItemClass != "" then
if not SearchString(.ItemClasses, it.ItemClass) then
if UseError then
call SimError(GetOwningPlayer(.Owner), "This unit can't equip " + it.ItemClass + ".")
endif
return false
endif
endif
if GetHeroLevel(.Owner) >= it.Level then
return true
else
if UseError then
call SimError(GetOwningPlayer(.Owner), "This item requires a hero level of " + I2S(it.Level) + " or greater.")
endif
endif
return false
endmethod
//will be runned, whenever an item is used
private static method useItem takes nothing returns boolean
local thistype this = .table[GetTriggerUnit()]
local Item it = Item.getItemById(GetItemTypeId(GetManipulatedItem()))
if GetItemTypeId(GetManipulatedItem()) == EQUIPMENT_OPEN_ID then
return .openEquipment(GetTriggerUnit())
elseif GetItemTypeId(GetManipulatedItem()) == BACKPACK_OPEN_ID then
return .openBackpack(GetTriggerUnit())
elseif GetItemTypeId(GetManipulatedItem()) == EQUIPMENT_CLOSE_ID or GetItemTypeId(GetManipulatedItem()) == BACKPACK_CLOSE_ID then
if .open then
return .closeEquipment(GetTriggerUnit())
elseif .bopen then
return .closeBackpack(GetTriggerUnit())
endif
elseif GetItemTypeId(GetManipulatedItem()) == EQUIPMENT_PAGE_1 or GetItemTypeId(GetManipulatedItem()) == EQUIPMENT_PAGE_2 or GetItemTypeId(GetManipulatedItem()) == BACKPACK_PAGE_1 or GetItemTypeId(GetManipulatedItem()) == BACKPACK_PAGE_2 then
if .open then
return .changePageEquipment(GetTriggerUnit())
elseif .bopen then
return .changePageBackpack(GetTriggerUnit())
endif
elseif it.equippable and not .isItemEquipped(GetManipulatedItem()) then
return .equipItem(GetTriggerUnit(), GetManipulatedItem(), it)
elseif it.equippable and .isItemEquipped(GetManipulatedItem()) then
return .unequipItem(GetTriggerUnit(), GetManipulatedItem(), it)
endif
return false
endmethod
//Will be runned, whenever an item is dragged on another item or on an empty slot
private static method dragItem takes nothing returns boolean
local item manipul = GetOrderTargetItem()
local integer slot = GetIssuedOrderId() - 852002
local thistype this = .table[GetTriggerUnit()]
local item dropped = UnitItemInSlot(.Owner, slot)
local integer id = GetItemTypeId(manipul)
local integer idd = GetItemTypeId(dropped)
if (GetIssuedOrderId() > 852001) and (GetIssuedOrderId() < 852008) and this != 0 then
if manipul != dropped and id != BACKPACK_PAGE_1 and id != BACKPACK_PAGE_2 and id != BACKPACK_CLOSE_ID and id != BACKPACK_OPEN_ID then
if idd == BACKPACK_OPEN_ID then
set .dropped = false
call .moveToBackpack(manipul, dropped)
set .dropped = true
set manipul = null
set dropped = null
return false
elseif idd == BACKPACK_CLOSE_ID then
set .dropped = false
call .moveToInventory(manipul, dropped)
set .dropped = true
set manipul = null
set dropped = null
return false
elseif idd == BACKPACK_PAGE_2 then
set .dropped = false
call .moveToSecondPage(manipul, dropped)
set .dropped = true
set manipul = null
set dropped = null
return false
elseif idd == BACKPACK_PAGE_1 then
set .dropped = false
call .moveToFirstPage(manipul, dropped)
set .dropped = true
set manipul = null
set dropped = null
return false
endif
endif
endif
if id == BACKPACK_OPEN_ID or id == BACKPACK_CLOSE_ID or id == BACKPACK_PAGE_1 or id == BACKPACK_PAGE_2 and dropped == null then
if id == BACKPACK_OPEN_ID and not .bopen and not .open then
call SimError(GetOwningPlayer(.Owner), "Cannot drop this item.")
call addItem.create(manipul, BACKPACK_SLOT, this)
set manipul = null
set dropped = null
return false
elseif id == BACKPACK_CLOSE_ID or id == BACKPACK_PAGE_1 or id == BACKPACK_PAGE_2 and .bopen then
call SimError(GetOwningPlayer(.Owner), "Cannot drop this item.")
if id == BACKPACK_CLOSE_ID then
call addItem.create(manipul, 5, this)
elseif id == BACKPACK_PAGE_1 or id == BACKPACK_PAGE_2 then
call addItem.create(manipul, 4, this)
endif
set manipul = null
set dropped = null
return false
endif
endif
if (id == BACKPACK_PAGE_1 or id == BACKPACK_PAGE_2) and idd == BACKPACK_CLOSE_ID and .bopen then
call SimError(GetOwningPlayer(.Owner), "Cannot drop this item.")
call addItem.create(manipul, 4, this)
call addItem.create(dropped, 5, this)
set manipul = null
set dropped = null
return false
elseif id == BACKPACK_CLOSE_ID and (idd == BACKPACK_PAGE_1 or idd == BACKPACK_PAGE_2) and .bopen then
call SimError(GetOwningPlayer(.Owner), "Cannot drop this item.")
call addItem.create(manipul, 5, this)
call addItem.create(dropped, 4, this)
set manipul = null
set dropped = null
return false
endif
set manipul = null
set dropped = null
return true
endmethod
//will be runned whenever an item is picked up
private static method pickupItem takes nothing returns boolean
local thistype this = .table[GetTriggerUnit()]
local item i = GetManipulatedItem()
local Item it = Item.getItemById(GetItemTypeId(i))
if AUTO_EQUIP and it.equippable and .isSlotEmpty(it.slot) and .checkHero(it, false) and .allowauto then
call thistype.equipItem(GetTriggerUnit(), GetManipulatedItem(), it)
set i = null
return true
endif
return false
endmethod
//Will be runned whenever an item is dropped
private static method dropItem takes nothing returns boolean
local thistype this = .table[GetTriggerUnit()]
local item ite = GetManipulatedItem()
local integer id = GetItemTypeId(ite)
if this == 0 or ite == null or not .dropped then
return false
elseif this != 0 and ite != null and .dropped then
if id == BACKPACK_OPEN_ID and not .bopen and not .open then
call SimError(GetOwningPlayer(.Owner), "Cannot drop this item.")
call addItem.create(ite, BACKPACK_SLOT, this)
set ite = null
return true
elseif id == BACKPACK_CLOSE_ID or id == BACKPACK_PAGE_1 or id == BACKPACK_PAGE_2 and (.bopen or .open) then
if id == BACKPACK_CLOSE_ID then
call SimError(GetOwningPlayer(.Owner), "Cannot drop this item.")
call addItem.create(ite, 5, this)
set ite = null
return true
elseif id == BACKPACK_PAGE_1 or id == BACKPACK_PAGE_2 then
call SimError(GetOwningPlayer(.Owner), "Cannot drop this item.")
call addItem.create(ite, 4, this)
set ite = null
return true
endif
endif
endif
return false
endmethod
//initialization of the Inventory struct
private static method onInit takes nothing returns nothing
call TriggerAddCondition(.Use, Condition(function thistype.useItem))
call TriggerAddCondition(.Pickup, Condition(function thistype.pickupItem))
call TriggerAddCondition(.Drag, Condition(function thistype.dragItem))
call TriggerAddCondition(.Drop, Condition(function thistype.dropItem))
set .table = HandleTable.create()
call SETUP_DUMMY_ITEMS()
endmethod
endstruct
endlibrary
JASS:
library ItemList
globals
//If true, item abilitys will be preloaded on map init, when adding one to the systen (longer laod time, but no laggs if first time used/equipped)
private constant boolean PRELOAD_ABILITYS = false
//The unit for preloading item abilitys
private constant integer PRELOAD_DUMMY_ID = 'hpea'
endglobals
//The struct for each item, you have registred
struct Item
integer Life = 0
integer Mana = 0
integer Str = 0
integer Agi = 0
integer Int = 0
integer Dmg = 0
integer Armor = 0
integer Level = 1
integer HpReg = 0
integer MpReg = 0
integer As = 0
integer Abil = 0
real Ms = 0.
string Effect = ""
string EffectAttach = ""
string ItemClass
string HeroClasses
private integer ItemId = 0
private integer Slot
private boolean AllowStacks = false
private boolean Equipment = true
private integer id = 0
private integer MaxStacks = 0
private static Table table
private static boolean allowAdd = true
private static trigger Disabler = CreateTrigger()
private static unit dummy = null
//Use this method to register an Item, which IS equippable to the system
//Example: call Item.addEquipment('I000', 2, "Bloogmages", "Cloth Armors")
//This would register the item as a weapon (see above), which ItemTypeId is 'I000' to the system
//has the ItemClass "Cloth Armors" and is only equippable by "Bloodmages"
static method addEquipment takes integer ItemId, integer Slot, string availableHeroClasses, string itemClass returns thistype
local thistype this = 0
if .allowAdd then
set this = .allocate()
set .ItemId = ItemId
set .Slot = Slot
set .HeroClasses = availableHeroClasses
set .ItemClass = itemClass
set .id = .id + 1
set .table[.ItemId] = this
return this
debug else
call BJDebugMsg("Can only register Items in Map Initialization")
endif
return 0
endmethod
//Use this method to register an Item, which IS NOT equippable to the system
//Example: call Item.addNormalItem('I001', true, 6)
//This would register the item, which ItemTypeId is 'I001' to the system, enables Stacks for it and sets its MaxStacks to 6
static method addNormalItem takes integer ItemId, boolean AllowStacks, integer MaxStacks returns thistype
local thistype this = 0
if .allowAdd then
set this = .allocate()
set .ItemId = ItemId
set .Equipment = false
set .MaxStacks = MaxStacks
set .id = .id + 1
set .table[.ItemId] = this
return this
debug else
call BJDebugMsg("Can only register Items in Map Initialization")
endif
return 0
endmethod
//call this method after adding an ability to an item. If you set the boolean "inSpellbook" to true,
//the system disables the spellbook for every player (not the ability in it!)
method HasAbility takes boolean inSpellbook returns nothing
local integer i = 0
if PRELOAD_ABILITYS then
call UnitAddAbility(.dummy, .Abil)
call UnitRemoveAbility(.dummy, .Abil)
endif
if inSpellbook then
loop
call SetPlayerAbilityAvailable(Player(i), .Abil, false)
set i = i + 1
exitwhen i >= bj_MAX_PLAYER_SLOTS
endloop
endif
endmethod
//use this to get the slot of the item. Returns -1 if the item isn't equipable
method operator slot takes nothing returns integer
if .Equipment then
return .Slot
else
return -1
endif
return -1
endmethod
//returns true, if item is equippable
method operator equippable takes nothing returns boolean //INLINE FRIENDLY
return .Equipment
endmethod
//Returns the item Id of the used Item
//Can be used for Save & Load Systems
method operator itemId takes nothing returns integer //INLINE FRIENDLY
return .ItemId
endmethod
//Returns the MaxCharges of an item
method operator maxCharges takes nothing returns integer //INLINE FRIENDLY
return .MaxStacks
endmethod
//Returns the Item struct by using its index
static method getItemByIndex takes integer Id returns Item //INLINE FRIENDLY
return Item(Id)
endmethod
//Returns the Item Struct by the item Type Id
static method getItemById takes integer ItemId returns Item //INLINE FRIENDLY
return Item(.table[ItemId])
endmethod
//Disables the registring after map Initialization
private static method disableAdd takes nothing returns boolean
set .allowAdd = false
call DestroyTrigger(.Disabler)
if PRELOAD_ABILITYS then
call KillUnit(.dummy)
endif
return .allowAdd
endmethod
//self-explanatory
private static method onInit takes nothing returns nothing
if PRELOAD_ABILITYS then
set .dummy = CreateUnit(Player(15), PRELOAD_DUMMY_ID, 0., 0., 0.)
endif
call TriggerRegisterTimerEvent(.Disabler, 0., false)
call TriggerAddCondition(.Disabler, Condition(function Item.disableAdd))
set .table = Table.create()
endmethod
endstruct
endlibraryPlease give credits to the above named mapper, if you use this system and to me
Keywords:
Inventory, advanced, items, custom, hero classes, item classes, equipment, bag, backpack, stack, charges
Contents
Reviews
- Joined
- Sep 9, 2007
- Messages
- 6,759
Maybe they share librarys and change their data.
Try to find out what they share, and come back with the result.
- Joined
- Apr 2, 2009
- Messages
- 249
Yeah, maybe so, the both requires table, but i do not know much the code.
Hix. it's over, i created 400+ and wrote 2000+ lines of code for my map, and now they are useless
Hix. it's over, i created 400+ and wrote 2000+ lines of code for my map, and now they are useless
- Joined
- Aug 2, 2008
- Messages
- 193
It could be that Rising Dusks Damage Detection System uses the same Table Instances like mines do.
I'll have a look at his code.
I'll have a look at his code.
- Joined
- Aug 1, 2008
- Messages
- 453
I can load the map but once i edit anything i can't load it. I edited it in jassnewgen.
- Joined
- Mar 7, 2009
- Messages
- 45
but i dunno how to use this...
- Joined
- Feb 18, 2008
- Messages
- 69
Nice system, but bugged as hell.. try go with Paladin, click on Inventory.. take Iron Helmet.. (Iron Helmet will still be on ground) and you have Iron Helmer equipped.. not I drop this item.. just from Inventory.. dummy item which represent slot for helms will be dropped as well.. and when I close and open it still wont be there.. so now I have 2 Iron Helmets on ground and no slot for it Inventory.. fix.. it .. otherwise nicely done
- Joined
- Aug 2, 2008
- Messages
- 193
Yeah I know this bug.
It appears when equipping the same item, when another item of this type is already equipped. I'll fix this bug as soon as possible. And also I'll try to fix some other things and implent new vJass Syntax things, like static ifs and so on.
It appears when equipping the same item, when another item of this type is already equipped. I'll fix this bug as soon as possible. And also I'll try to fix some other things and implent new vJass Syntax things, like static ifs and so on.
- Joined
- Sep 9, 2007
- Messages
- 6,759
WTF! That bug is really awful.
How can it be that that bugs?
How can it be that that bugs?
- Joined
- Aug 2, 2008
- Messages
- 193
This bug only appears when you try to equip an item when some other item with the same item id is already equipped...
I wanted to stop the call of "equipItem" when such an item is already equipped, but I did it a little bit wrong^^
How I said, I'll fix that in the next version. And the next version also requires the newest JassHelper because I'll use alot "static ifs"....
And maybe, I'll change the method for equipping an item by using it to dragging it on the equipment item
I wanted to stop the call of "equipItem" when such an item is already equipped, but I did it a little bit wrong^^
How I said, I'll fix that in the next version. And the next version also requires the newest JassHelper because I'll use alot "static ifs"....
And maybe, I'll change the method for equipping an item by using it to dragging it on the equipment item
- Joined
- Aug 2, 2008
- Messages
- 193
Important Info:
I'll rewirte the whole system in Zinc and using some other library for ItemList and the InventorySystem itself. I also will change the way equiping an item to dragging it on the menu, instead of using it.
And alot code changes...
Hope thats not to much for me xD
I'll rewirte the whole system in Zinc and using some other library for ItemList and the InventorySystem itself. I also will change the way equiping an item to dragging it on the menu, instead of using it.
And alot code changes...
Hope thats not to much for me xD
- Joined
- Apr 2, 2009
- Messages
- 249
Still, i can not use it together with Dusk's damage system, are you still developing this?
- Joined
- Dec 20, 2009
- Messages
- 5
i find a non negligible bug, when a hero manipulates two items of the same type, ex: two claws of attack.
1- if he's already equiped one, and tries to equip another of the same type, you'll find weird accident. (the slot weapon itself comes out)
2- similarly, if one's backpack has item <A>, then any action of putting another <A> into the backpack will make the last <A> disappear.
I expect your correction for this bug. thx
1- if he's already equiped one, and tries to equip another of the same type, you'll find weird accident. (the slot weapon itself comes out)
2- similarly, if one's backpack has item <A>, then any action of putting another <A> into the backpack will make the last <A> disappear.
I expect your correction for this bug. thx
- Joined
- Feb 24, 2007
- Messages
- 23
Would it be possible to implement Set Items? For example when you have 3 items of 1 Set, you get a Set Bonus like 200 mana?
- Joined
- Sep 9, 2007
- Messages
- 6,759
You might use my CustomInventory then, it has all the features you need.
- Joined
- Apr 2, 2009
- Messages
- 249
Could you please fix this bug?
- Joined
- Jul 21, 2008
- Messages
- 2
- Joined
- Sep 9, 2007
- Messages
- 6,759
He won't fix it right now. He said he's busy.
- Joined
- Jul 26, 2008
- Messages
- 1,009
To those interested version 2.02 is out which fixes a few of the bugs:
http://www.wc3c.net/showthread.php?t=107733
http://www.wc3c.net/showthread.php?t=107733
- Joined
- Sep 9, 2007
- Messages
- 6,759
He hasn't updated it in ages.
- Joined
- Jul 26, 2008
- Messages
- 1,009
Yeah no joke. AutoIndex is more updated. Can't figure out how to call getIndex either because AutoIndex now uses private keyword instead of private struct. Any clues on how to fix that?
- Joined
- Jul 14, 2011
- Messages
- 3,213
@Kricz: I love your system, I wanna use it but I found some... "issues" in the Demo Map (and off course, the system itself). Maybe it's just my "dumbness" but i'd like you (or someone else) explain me.
IF YOU ALLOW SMALL MODIFICATIONS TO THE SYSTEM: Keep reading
IF YOU DONT: Don't mind reading =)
- The "Max charges" in the code were set to 8, but Mana Potions charges only reached 4, and Health Potions to 6. In my map, i'd like to set Max Charges of Potions to 12 =).
SOLVED: Found where to set the max charges.
- I only have 1 Hero Type (So, I won't use Unit-Type or "Race" requirement for items)
- I don't have "Armor Type" as "Leather Armor" / "Mail Armor", etc...
I guess i'd just have to make it like this:
And remove those from items Tooltips, right?
Where can I look all the possible stat modifyer in JASS code to set items effects?
What happens if I add the item other normal/passive abilities besides the "Item handling" (Something like that") to add the effects, instead of doing it through the JASS code?)
IF YOU ALLOW SMALL MODIFICATIONS TO THE SYSTEM: Keep reading
IF YOU DONT: Don't mind reading =)
- The "Max charges" in the code were set to 8, but Mana Potions charges only reached 4, and Health Potions to 6. In my map, i'd like to set Max Charges of Potions to 12 =).
SOLVED: Found where to set the max charges.
- I only have 1 Hero Type (So, I won't use Unit-Type or "Race" requirement for items)
- I don't have "Armor Type" as "Leather Armor" / "Mail Armor", etc...
I guess i'd just have to make it like this:
JASS:
//Power Boots
set it = Item.addEquipment('I00K', 5, "", "")Where can I look all the possible stat modifyer in JASS code to set items effects?
JASS:
set it.Agi = 4
set it.Abil = 'A003'
set it.Ms = 75.
Last edited:
- Joined
- Jul 17, 2011
- Messages
- 1,864
it bugs but good job
- Joined
- Oct 10, 2012
- Messages
- 1
1. Tip:
-Change the variable on the unit that is for the MUI for 12 IGRAC and then your system is only designed for one player and hero ID N000_0001 would make the type
--------------
or your opinion =)
-Change the variable on the unit that is for the MUI for 12 IGRAC and then your system is only designed for one player and hero ID N000_0001 would make the type
--------------
JASS:
if GetUnitTypeId (GetTriggerUnit ()) == 'N000' then
*** call Inventory.create (GetTriggerUnit (), "Paladins", "Heavy Armors, Leather Armors, Cloth Armors, Shields")
endif- Joined
- Aug 17, 2012
- Messages
- 10
Can i detect one-hand weapon that allow you to equip a shield or two-hand weapon or dual-swords ??
- Joined
- Mar 18, 2012
- Messages
- 1,716
Iirc correctly, this systen is actually not working properly.
BPower
BPower
- Joined
- Jul 15, 2012
- Messages
- 143
i am already fix this system anyway,you can pm me if you want it..
what i fix is :
1.Fix issues when equip an item but you have similiar itm in your inventory and soon after that i item will be removed
2.detect one-hand weapon that allow you to equip a shield or two-hand weapon or dual-swords without shield ofc.
thats what i do..haha
what i fix is :
1.Fix issues when equip an item but you have similiar itm in your inventory and soon after that i item will be removed
2.detect one-hand weapon that allow you to equip a shield or two-hand weapon or dual-swords without shield ofc.
thats what i do..haha
