I am trying to to write a bird killer/leather looter script.
The kill sub is working but I can't get the loot to work. The corpse opens, and then its hidden, but it does not drag the feathers off the corpse.
Any suggestions?
;========================================
; Check Corpse
;========================================
sub chkcrpse
milky:
finditem YFM G_3
if #findkind = -1
{
return
}
set %dead #findid
set #ltargetid #findid
set #ltargetkind 1
finditem %knife C_ , #backpackid
set #lobjectid #findid
event macro 17 0
target 1s ;3s
event macro 22 0
wait 20
finditem %dead
set #lobjectid #findid
event macro 17 0
wait 1s
finditem VLK C_ , %dead
wait 1s
exevent drag #findid #findstack
wait 1s
exevent DropC %rbag
wait 1s
ignoreitem %dead
hideitem %dead
goto milky: