Approved
works like a charm now
library AdvancedEquipmentSystem requires LinkedListModule, RegisterPlayerUnitEvent
// The_Witcher's Equipment System
//
// This is my easy to use equipment system, which adds an equipment screen to any unit you want.
// equipped items can give up abilities to the owner and can change the animations of him...
//
//
// To learn how to use this system please read the "How To Use" delivered in the demo map
//
//
// Requirements:
// JASS knowledge
// LinkedList (http://www.hiveworkshop.com/forums/jass-resources-412/snippet-linkedlistmodule-206552/)
// RegisterPlayerUnitEvent (http://www.hiveworkshop.com/forums/jass-resources-412/snippet-registerplayerunitevent-203338/)
//
// have fun^^
//**************************************************
//********************SETUP PART********************
//**************************************************
globals
// this is the rawcode of the unit which works as inventory
public constant integer INVENTORY_DUMMY = 'h007'
// this is the class you selected as mainhand class
public constant integer MAINHAND_CLASS = 0
// this is the class you selected as offhand class
public constant integer OFFHAND_CLASS = 1
// this is the amount of total classes you have
public constant integer CLASSES = 9
// this is the ability to close the inventory
public constant integer EXIT_ABILITY = 'A00G'
// this is the ability to open the inventory
public constant integer OPEN_ABILITY = 'A003'
// this is the ability which gives the dummy the same inventory as your hero has
public constant integer INVENTORY_ABILITY = 'AInv'
// this is the icon ability shown in the offhand slot when a twhoanded weapon is equipeed
public constant integer TWOHAND_ABILITY = 'A00Z'
public constant boolean SHOW_TWOHAND_ABILITY = true
// this is the text shown when a unit is trying to equip an item which it isnt allowed to
// example: " can't equip " becomes ingame something like Soldier can't equip Giant Sword
public constant string UNABLE_TO_EQUIP_STRING = " can't equip "
endglobals
//************************************************************
//********************SETUP PART ENDS HERE********************
//************************************************************
//*****************Don't edit anything below******************
//************************************************************
globals
private trigger OnEquip
private trigger OnUnequip
private integer TriggeringItem
private unit EquippingUnit
private hashtable table
endglobals
private struct AbilityList extends array
integer abi
implement LinkedList
static method create takes nothing returns thistype
return .createNode()
endmethod
method remove takes nothing returns nothing
call .removeNode()
call .deallocate()
endmethod
method add takes integer abi returns nothing
local thistype new = .allocate()
set new.abi = abi
call .insertNode(new)
endmethod
endstruct
// **** struct EquipmentItem ****
private struct EquipmentItem extends array
readonly integer id
readonly integer class
readonly AbilityList abilities
readonly integer icon
readonly boolean twohanded
readonly string tag
static method operator [] takes integer itemid returns EquipmentItem
return itemid - 'I000' + CLASSES + 1
endmethod
static method create takes integer id, integer icon, integer class, boolean twohanded, string animation returns EquipmentItem
local EquipmentItem this = id - 'I000' + CLASSES + 1
if id - 'I000' >= 0 then
call SaveBoolean(table, id - 'I000', 0, true)
endif
set .id = id
set .class = class
set .icon = icon
if id >= CLASSES + 1 then
set .abilities = AbilityList.create()
if class == MAINHAND_CLASS then
set .twohanded = twohanded
else
set .twohanded = false
endif
if (class == MAINHAND_CLASS or class == OFFHAND_CLASS) and id != 0 then
set .tag = animation
else
set .tag = ""
endif
endif
return this
endmethod
method addAbility takes integer abi returns nothing
call .abilities.add( abi)
endmethod
method applyAbilities takes unit u, boolean add returns nothing
local AbilityList node = .abilities.next
loop
exitwhen node.head
if add then
call UnitAddAbility(u, node.abi)
else
call UnitRemoveAbility(u, node.abi)
endif
set node = node.next
endloop
endmethod
endstruct
public function RegisterNewClass takes integer emptyicon, integer class returns nothing
call EquipmentItem.create('I000' - CLASSES - 1 + class, emptyicon, class, false, "")
endfunction
// **** struct Equipment ****
struct Equipment
private static EquipmentItem twohandIcon
private unit u
private unit dummy
readonly string animtag = ""
readonly EquipmentItem array Item [12]
static method operator [] takes unit u returns Equipment
return LoadInteger(table, GetHandleId(u), 0)
endmethod
method operator owner takes nothing returns unit
return .u
endmethod
method operator owner= takes unit new returns nothing
local integer i = 0
loop
exitwhen i >= CLASSES
if .Item[i] != 0 then
call .Item[i].applyAbilities(.u, false)
call .Item[i].applyAbilities(new, true)
endif
set i = i + 1
endloop
call AddUnitAnimationProperties(.u, .animtag, false)
call UnitRemoveAbility(.u, OPEN_ABILITY)
call AddUnitAnimationProperties(new, .animtag, true)
call UnitAddAbility(new, OPEN_ABILITY)
set .u = new
call SaveInteger(table, GetHandleId(.u), 0, this)
call SaveInteger(table, GetHandleId(.dummy), 0, this)
endmethod
method syncInventories takes nothing returns nothing
local integer i = 0
loop
exitwhen i >= 6
call RemoveItem(UnitItemInSlot(.dummy, i))
call UnitAddItemToSlotById(.dummy, GetItemTypeId(UnitItemInSlot(.u, i)), i)
call SetItemDroppable(UnitItemInSlot(.dummy, i), false)
set i = i + 1
endloop
endmethod
private method refreshAnimation takes nothing returns nothing
local string a = .Item[MAINHAND_CLASS].tag
if .Item[OFFHAND_CLASS] != 0 and .Item[OFFHAND_CLASS] != twohandIcon then
set a = .Item[OFFHAND_CLASS].tag
endif
call AddUnitAnimationProperties(.u, .animtag, false)
call AddUnitAnimationProperties(.u, a, true)
set .animtag = a
endmethod
method equipEmptyClass takes integer class returns nothing
call UnitAddAbility(.dummy, EquipmentItem(class).icon)
set .Item[class] = 0
endmethod
method equipTwohandIcon takes nothing returns nothing
call UnitAddAbility(.dummy, twohandIcon.icon)
set .Item[OFFHAND_CLASS] = twohandIcon
endmethod
method unequip takes integer class returns nothing
local integer i = 0
local EquipmentItem toRemove = .Item[class]
if toRemove != 0 then
if toRemove.twohanded then
call UnitRemoveAbility(.dummy, TWOHAND_ABILITY)
call .equipEmptyClass(OFFHAND_CLASS)
endif
call toRemove.applyAbilities(.u, false)
call UnitAddItemById(.u, toRemove.id)
set TriggeringItem = toRemove.id
set EquippingUnit = .u
call TriggerEvaluate(OnUnequip)
call UnitRemoveAbility(.dummy, toRemove.icon)
else
call UnitRemoveAbility(.dummy, EquipmentItem(class).icon)
endif
set .Item[class] = 0
call .refreshAnimation()
endmethod
method equip takes integer id returns nothing
local EquipmentItem toEquip = EquipmentItem[id]
local EquipmentItem mainEquip = .Item[MAINHAND_CLASS]
// remove existing
if mainEquip != 0 then
if toEquip.twohanded or (mainEquip.twohanded and (toEquip.class == OFFHAND_CLASS or toEquip.class == MAINHAND_CLASS)) then
call .unequip(MAINHAND_CLASS)
call .unequip(OFFHAND_CLASS)
if toEquip.class == MAINHAND_CLASS and not toEquip.twohanded then
call .equipEmptyClass(OFFHAND_CLASS)
elseif toEquip.class == OFFHAND_CLASS then
call .equipEmptyClass(MAINHAND_CLASS)
endif
endif
endif
call .unequip(toEquip.class)
// new is twohanded ?
if toEquip.twohanded then
call .unequip(OFFHAND_CLASS)
call .equipTwohandIcon()
if not SHOW_TWOHAND_ABILITY then
call UnitRemoveAbility(.dummy, twohandIcon.icon)
endif
endif
// equip new
call toEquip.applyAbilities(.u, true)
call UnitAddAbility(.dummy, toEquip.icon)
set .Item[toEquip.class] = toEquip
call .refreshAnimation()
// fire trigger
set EquippingUnit = .u
set TriggeringItem = id
call TriggerEvaluate(OnEquip)
endmethod
static method disable takes integer itemId, integer unitType, boolean flag returns nothing
call SaveBoolean(table, itemId - 'I000', unitType, flag)
endmethod
private method onDestroy takes nothing returns nothing
local integer i = 0
call RemoveUnit(.dummy)
loop
exitwhen i > 12
if .Item[i] != 0 then
call .Item[i].applyAbilities(.u, false)
endif
set i = i + 1
endloop
call AddUnitAnimationProperties(.u, .animtag, false)
call UnitRemoveAbility(.u, OPEN_ABILITY)
endmethod
static method create takes unit u returns Equipment
local Equipment this = Equipment[u]
local integer i = 0
local integer id = GetPlayerId(GetOwningPlayer(u))
if this != 0 then
call RemoveUnit(.dummy)
else
set this = Equipment.allocate()
call SaveInteger(table, GetHandleId(u), 0, this)
endif
set .u = u
set .dummy = CreateUnit(GetOwningPlayer(u), INVENTORY_DUMMY, GetUnitX(u), GetUnitY(u), 0)
call SaveInteger(table, GetHandleId(.dummy), 0, this)
call UnitAddAbility(.dummy, INVENTORY_ABILITY)
call UnitAddAbility(.dummy, EXIT_ABILITY)
call UnitAddAbility(.u, OPEN_ABILITY)
loop
exitwhen i >= CLASSES
call .equipEmptyClass(i)
set i = i + 1
endloop
return this
endmethod
// **** Other Stuff ****
private static method Access takes nothing returns boolean
local unit u = GetTriggerUnit()
local Equipment inv = Equipment[u]
local integer class
local integer i = 0
if GetSpellAbilityId() == EXIT_ABILITY then
if GetLocalPlayer() == GetOwningPlayer(inv.u) then
call ClearSelection()
call SelectUnit(inv.u, true)
endif
elseif GetSpellAbilityId() == OPEN_ABILITY then
call SetUnitX(inv.dummy, GetUnitX(inv.u))
call SetUnitY(inv.dummy, GetUnitY(inv.u))
if GetLocalPlayer() == GetOwningPlayer(inv.u) then
call ClearSelection()
call SelectUnit(inv.dummy, true)
endif
call inv.syncInventories()
elseif GetUnitTypeId(u) == INVENTORY_DUMMY then
loop
exitwhen i >= CLASSES
if inv.Item[i].icon == GetSpellAbilityId() then
set class = i
set i = CLASSES
endif
set i = i + 1
endloop
call inv.unequip(class)
call inv.equipEmptyClass(class)
call inv.syncInventories()
endif
set u = null
return false
endmethod
private static method ItemEquip takes nothing returns boolean
local unit u = GetTriggerUnit()
local item ite = GetManipulatedItem()
local integer i = 0
local Equipment inv = Equipment[u]
local EquipmentItem invIte = EquipmentItem[GetItemTypeId(ite)]
if GetItemTypeId(ite) - 'I000' >= 0 then
if LoadBoolean(table, GetItemTypeId(ite) - 'I000', 0) then
if invIte != 0 and inv != 0 then
if not LoadBoolean(table, GetItemTypeId(ite) - 'I000', GetUnitTypeId(inv.u)) then
if u == inv.u then
call inv.equip(GetItemTypeId(ite))
call RemoveItem(ite)
call inv.syncInventories()
elseif u == inv.dummy then
loop
exitwhen i >= 6
if invIte.id == GetItemTypeId(UnitItemInSlot(inv.u, i)) then
call UnitUseItem(inv.u, UnitItemInSlot(inv.u, i))
call RemoveItem(ite)
set i = 7
endif
set i = i + 1
endloop
endif
else
call DisplayTextToPlayer(GetOwningPlayer(inv.u), 0, 0, GetUnitName(inv.u) + UNABLE_TO_EQUIP_STRING + GetItemName(ite))
endif
endif
endif
endif
set u = null
set ite = null
return false
endmethod
private static method onInit takes nothing returns nothing
set OnEquip = CreateTrigger()
set OnUnequip = CreateTrigger()
call RegisterPlayerUnitEvent(EVENT_PLAYER_UNIT_USE_ITEM, function Equipment.ItemEquip)
call RegisterPlayerUnitEvent(EVENT_PLAYER_UNIT_SPELL_CAST, function Equipment.Access)
set .twohandIcon = EquipmentItem.create('I000' - 1, TWOHAND_ABILITY, 0, false, "")
set table = InitHashtable()
endmethod
implement optional SaveLoadPlugin
endstruct
// **** Trigger Events ****
function RegisterItemEquipEvent takes code func returns nothing
call TriggerAddCondition(OnEquip, Filter(func))
endfunction
function RegisterItemUnequipEvent takes code func returns nothing
call TriggerAddCondition(OnUnequip, Filter(func))
endfunction
function GetTriggeringItemId takes nothing returns integer
return TriggeringItem
endfunction
function GetEquippingUnit takes nothing returns unit
return EquippingUnit
endfunction
//wrappers
function InitEquipment takes unit whichunit returns nothing
call Equipment.create(whichunit)
endfunction
public function RegisterItem takes integer itemid, integer icon, integer class, boolean twohanded, string animation returns nothing
call EquipmentItem.create(itemid, icon, class, twohanded, animation)
endfunction
public function AddItemAbility takes integer itemid, integer abi returns nothing
call EquipmentItem[itemid].addAbility(abi)
endfunction
function EnableItemEquip takes integer itemId, integer unitType, boolean flag returns nothing
call Equipment.disable(itemId, unitType, not flag)
endfunction
function IsEquipmentClassEmpty takes unit u, integer class returns boolean
return Equipment[u].Item[class] == 0
endfunction
function EquipItem takes unit u, item ite returns nothing
call Equipment[u].equip(GetItemTypeId(ite))
call RemoveItem(ite)
endfunction
function EquipItemById takes unit u, integer itemId returns nothing
call Equipment[u].equip(itemId)
endfunction
function UnequipItemById takes unit u, integer itemid returns nothing
local integer class = EquipmentItem[itemid].class
if Equipment[u].Item[class].id == itemid then
call Equipment[u].unequip(EquipmentItem[itemid].class)
call Equipment[u].equipEmptyClass(class)
endif
endfunction
function UnequipItemByClass takes unit u, integer class returns nothing
call Equipment[u].unequip(class)
call Equipment[u].equipEmptyClass(class)
endfunction
function GetEquippedItemTypeId takes unit u, integer class returns integer
return Equipment[u].Item[class].id
endfunction
function ChangeEquipmentOwner takes unit u, unit newowner returns nothing
set Equipment[u].owner = newowner
endfunction
function UnequipAll takes unit u returns nothing
local integer i = 1
loop
call Equipment[u].unequip(i)
call Equipment[u].equipEmptyClass(i)
exitwhen i >= CLASSES
set i = i + 1
endloop
endfunction
endlibrary
//Code indented using The_Witcher's Script Language Aligner
//Download the newest version and report bugs at www.hiveworkshop.com
Me wants interface onEquip and onUnequip methods as I don't want the item to use abilities and no I don't want to work it out with dummy abilities.
(or maybe I can do this on my own, if I can have your permission to edit this for my own map?
Cooooooool
NEW UPDATE
added events for equip and unequip and releated functions
just look at the new events section in the test map to get a example usage
Hello all,
i have worked so much with this system, you cant imagine ^^ - but only with gui and maaany dummy-abilities. I created set items and much more than 10 different
[...]
Do i have any method to solve this?
plz help in time, cause i want my map as a xmas gift
. Let say I have 2 item of class boot. I equip once then click the other boot, it perfect toggle equip but... the ItemUnequip Event does'nt fire correctly .
scope TestEquip initializer init
//====================
//Setup
//====================
globals
//Common config:
private constant integer ITEM_ID = 'I000'
private constant integer ICON_ID = 'A00K'
private constant integer ITEM_CLASS_ID = 3
private constant boolean ENABLE = true
//equip condition
private constant integer LV_REQUIRE = 0
private constant integer STR_REQUIRE = 0
private constant integer AGI_REQUIRE = 0
private constant integer INT_REQUIRE = 0
private constant string NOTICE = "Can't equip, you do not meet the require!"
//bonus:
private constant integer ABI_1 = 0
private constant integer ABI_2 = 0
private constant integer ABI_3 = 0
private constant integer BONUS_ARMOR = 5
//for weapon only:
private constant boolean TWO_HAND = false
endglobals
//====================
//End Setup
//====================
private function equipCon takes nothing returns boolean
local unit e = GetEquippingUnit()
return GetHeroLevel(e) >= LV_REQUIRE and GetHeroStr(e,false) >= STR_REQUIRE and GetHeroAgi(e,false) >= AGI_REQUIRE and GetHeroInt(e,false) >= INT_REQUIRE
endfunction
private function onEquip takes nothing returns nothing
local unit e = GetEquippingUnit()
if equipCon() then
//--------------------------------
//Bonus add here:
//*I use the Status sytem by j4ly
//--------------------------------
call Status[e].modArmorBonus(BONUS_ARMOR)
//--------------------------------
else
call UnequipItemByClass(GetOwningPlayer(e),ITEM_CLASS_ID)
call BJDebugMsg(NOTICE)
endif
endfunction
private function onUnequip takes nothing returns nothing
local unit e = GetEquippingUnit()
//--------------------------------
//And remove here
//--------------------------------
call Status[e].modArmorBonus(-BONUS_ARMOR)
//------------------------------
endfunction
private function con takes nothing returns boolean
return GetTriggeringItemId() == ITEM_ID
endfunction
private function init takes nothing returns nothing
local trigger t = CreateTrigger()
local trigger t2 = CreateTrigger()
call TriggerRegisterItemEquipEvent(t)
call TriggerAddCondition(t,Condition(function con))
call TriggerAddAction(t,function onEquip)
call TriggerRegisterItemUnequipEvent(t2)
call TriggerAddCondition(t2,Condition(function con))
call TriggerAddAction(t2,function onUnequip)
if ENABLE then
// itemid | abi 1 | abi2 | abi3 | icon | class | twohanded? | animationtag
call AdvancedEquipmentSystem_RegisterItem(ITEM_ID, ABI_1, ABI_2, ABI_1,ICON_ID,ITEM_CLASS_ID, TWO_HAND, "")
endif
call InitEquipment (gg_unit_H000_0001)
endfunction
endscopeThere are some bugs that I found:
1) If you click items on the main hero fast enough, then duplicates will be created at the dummy's location.
To see this yourself: grab two of the same shield and continuously equip the one in the first slot quickly.
2) When the dummy is selected, you can right click an item and left click the dummy's portrait to drop the item at its location. Do this two or three times. After that, equip/unequip any items. Duplicates of items are created on the group every time.
3) Moving items in the dummy's inventory doesn't change the item's position for the hero.
PS: Are there more models that have lots of animations such as the one in the demo?
what this is:
- Equipment System
- MPI
- in vJass
what this not is:
- Inventory System
- in GUI/normal Jass
- exportable to GUI or normal Jass
- MUI(coming soon)
--------- 1) How to register items (1 ---------
this system isnt that perfekt that it can do everything on its own ;D
with the following function you can register items to the system:
call AdvancedEquipmentSystem_RegisterItem(itemid, abilities, icon, class, twohanded, animation)
"itemid" is of course the rawcode of the item the rest is assigned to
"icon" is the ability shown inside the Equipment when the item is equipped
"class" is the slot the item jumps in (be sure to adjust the x/y coordinates inside the object editor according
to the coordinates of the "empty slot" icon ability of the same class)
"twohanded" is a boolean (i think self explaining) !!works only for mainhand items!!
"animation" is a string which indicates the animation tag added when this item is equipped
ATTENTION: offhand slot items animations always overwrite mainhand slot items animations
Example:
call AdvancedEquipmentSystem_RegisterItem('I004', 'A008', 1, false, "Alternate")
registers item 'I004' to the system.
the item gets equipped in slot 1 and is not twohanded
as long as the unit has this item equipped it will play its "Alternate" animations
until now your items have no effect when equipped...
you can add up to 50 abilities to one itemtype!
to add one use:
call AdvancedEquipmentSystem_AddItemAbility( integer itemid, integer abi )
"itemid" is the rawcode of the item the rest is assigned to
"abi" is the rawcode of the ability the unit gets when it equips this item
Example:
call AdvancedEquipmentSystem_AddItemAbility('I004', 'A002')
a unit will get the ability 'A002' when equipping an item of type 'I004'
--------- 2) How to use this system (2 ---------
well its very simple to use:
call InitEquipment ( owner )
owner is the unit that gets the equipment
and thats all^^ whenever this unit uses a registered item, it will get equipped
--------- 3) Additional functions (3 ---------
EnableItemEquip takes player p, integer id, boolean flag returns nothing
with this function, you can disable/enable the equipping of a special item
Example:
call EnableEquipment(Player(0), 'I001', false)
=> Player 1 cant equip the item 'I001' anymore, until it gets enabled again
IsEquipmentClassEmpty takes player p, integer class returns boolean
sometimes you amybe want to know whether a unit has something equipped in class xy...
Example:
If IsEquipmentClassEmpty(Player(0),2) then
...
endif
=> only if the unit owned by Player 1 which has the Equipment has nothing equipped in slot 2
the if then else block releases his actions
EquipItem takes player p, item ite returns nothing
to force equipping of a special item use this function
Example:
call EquipItem( Player(0),GetManipulatedItem() )
=> the unit owned by Player 1 which has the Equipment equips the manipulated item
function UnequipItemById takes player p, integer itemid returns nothing
function UnequipItemByClass takes player p, integer class returns nothing
two functions which do the same but with different parameters:
player p is always the owner of the unit with the destination equipment
first function uses itemid... it is the rawcode of the item which gets unequipped (system searches the class)
second function uses class... it is the number of the class of which the equipped item gets unequipped
Examples:
call UnequipItemById(Player(0),'I002') => if equipped, item of type 'I002' is unequipped now
call UnequipItemByClass(Player(0),2) => item equipped in class 2 is unequipepd now
GetEquippedItemTypeId takes player p, integer class returns integer
this function returns the rawcode of the item equipped in the given class
Example:
If GetEquippedItemTypeId(Player(0),1) == 'I005' then
...
endif
=> only if the unit owned by Player 1 which has the Equipment, has a item of type 'I005'
in slot 1, the if then else block releases his actions
(useful for: if unit blaa has equipped sword xy then...)
ChangeEquipmentOwner takes player p, unit newOwner returns nothing
if you have to transfer the Equipment to another unit use this function
Example:
call ChangeEquipmentOwner(Player(0), GetTriggerUnit() )
=> the triggering unit gets the Equipment the unit of Player 1 has at the moment
--------- 4) Save/Load Codes (4 ---------
I added functions for getting and applying save and load codes to this system
function SaveEquipment takes player p returns string
this function returns the current load code from the equipment of player p
function LoadEquipment takes player p, string LoadCode returns nothing
this function loads a given code "LoadCode" into player ps equipment
--------- 5) Trigger Events (5 ---------
you can register events to triggers which fire when a item is equipped or unequipped
function TriggerRegisterItemEquipEvent takes trigger t returns nothing
and
function TriggerRegisterItemUnequipEvent takes trigger t returns nothing
are pretty self explaining...
use GetTriggeringItemId and GetEquippingUnit to get the involved units
--------- 6) To all vJassers out there (6 ---------
well as we understand vJass we can do things much easier ^^
the above mentioned functions are all simple wrappers for the included structs methods:
struct EquipmentItem
methods
create takes integer id, integer abi1,integer abi2,integer abi3, integer icon, integer class, boolean twohanded, string animation returns EquipmentItem
=> same as AdvancedEquipmentSystem_RegisterItem
members
readonly integer id => the item rawcode
readonly integer class => the assigned class
readonly integer abi1 => the first ability this item adds
readonly integer abi2 => the second ability this item adds
readonly integer abi3 => the third ability this item adds
readonly integer icon => the icon ability added to the dummy
readonly boolean twohanded => whether the item is twohanded or not (always false for non mainhand items)
readonly string tag => the animation tag added when the unit equips this (always "" for non main- and offhand items)
struct Equipment
methods
create takes unit u returns Equipment => creates a new Equipment for unit u
destroy takes nothing returns nothing => destroys an existing Equipment
equip takes item ite returns nothing => equips a special item
unequip takes integer class returns nothing => unequips whatever is in the given class
members
readonly unit dummy => the equipment dummy unit
readonly boolean array enabled => boolean whether this unit can equip item xy (inside the array is the items rawcode)
readonly EquipmentItem array Item => the equipped EquipmentItem in the slot given as array
unit owner => self explaining... use set yourequipment.owner = yourunit to transfer the Equipment to another unit
--------- Thanks to all who gave useful critism or tips for improvement ---------
The_Witcher
