sub loot event macro 6 0 event macro 6 0 event macro 13 21 set %lootOverTime #scnt + 15 finditem YFM G_3 if #findcnt >= 1 { set %body #findid set #lobjectid %body event macro 17 0 if for_looting in #sysmsg { set %killed %killed + 1 event sysmessage %killed terathans killed, %looted terathans looted. return } while #contkind <> ASEB && #contsize <> 144_212 && %lootOverTime > #scnt wait 1 wait 10 if %lootOverTime <= #scnt { set %killed %killed + 1 event sysmessage %killed terathans killed, %looted terathans looted. return } repeat { finditem %loot C_ , %body if #findcnt >= 1 && ! !lootProcess { set !lootProcess #true exevent drag #findid #findstack exevent dropc #backpackid wait 25 set !lootProcess #false } } until #findcnt = 0 || %lootOverTime < #scnt set %looted %looted + 1 } ignoreitem %body 2 set %killed %killed + 1 event sysmessage %killed terathans killed, %looted terathans looted. set %bW %bW + 1 set %bA %bA + 1 if %bW = %repairWeap || %bA = %repairArmor gosub repair return
--------------------
|