Perl [Item]
EVENT_AUGMENT_INSERT
sub EVENT_AUGMENT_INSERT {
}
EVENT_AUGMENT_ITEM
sub EVENT_AUGMENT_ITEM {
}
EVENT_AUGMENT_REMOVE
sub EVENT_AUGMENT_REMOVE {
}
EVENT_DESTROY_ITEM
sub EVENT_DESTROY_ITEM {
}
EVENT_DROP_ITEM
sub EVENT_DROP_ITEM {
quest::debug("quantity " . $quantity);
quest::debug("itemname " . $itemname);
quest::debug("itemid " . $itemid);
quest::debug("spell_id " . $spell_id);
quest::debug("slotid " . $slotid);
}
EVENT_EQUIP_ITEM
EVENT_ITEM_CLICK
sub EVENT_ITEM_CLICK {
quest::debug("itemid " . $itemid);
quest::debug("itemname " . $itemname);
quest::debug("slotid " . $slotid);
quest::debug("spell_id " . $spell_id);
}
EVENT_ITEM_CLICK_CAST
sub EVENT_ITEM_CLICK_CAST {
quest::debug("itemid " . $itemid);
quest::debug("itemname " . $itemname);
quest::debug("slotid " . $slotid);
quest::debug("spell_id " . $spell_id);
}
EVENT_ITEM_ENTER_ZONE
sub EVENT_ITEM_ENTER_ZONE {
quest::debug("itemid " . $itemid);
quest::debug("itemname " . $itemname);
}
EVENT_ITEM_TICK
EVENT_LOOT
sub EVENT_LOOT {
quest::debug("looted_id " . $looted_id);
quest::debug("looted_charges " . $looted_charges);
quest::debug("corpse " . $corpse);
quest::debug("corpse_id " . $corpse_id);
}
EVENT_SCALE_CALC
sub EVENT_SCALE_CALC {
quest::debug("itemid " . $itemid);
quest::debug("itemname " . $itemname);
}
EVENT_TIMER
sub EVENT_TIMER {
quest::debug("timer " . $timer);
}
EVENT_UNAUGMENT_ITEM
sub EVENT_UNAUGMENT_ITEM {
}
EVENT_UNEQUIP_ITEM
sub EVENT_UNEQUIP_ITEM {
}
EVENT_WEAPON_PROC
sub EVENT_WEAPON_PROC {
}