Advertisement
ppgab

Untitled

Aug 6th, 2014
192
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.56 KB | None | 0 0
  1. ATable = {{"Rat",5964, 3993}, {"Chicken",6042,4331}, {"Black Sheep",5994,4095}}
  2.  
  3. corpse = Module.New('Dead Body pickup', function (mod)
  4. local _FOUNDT
  5. local data
  6. local c = Creature(Self.TargetID())
  7. if c then
  8. for i = 1 #ATable do
  9. if c:Name() == ATable[i][1] then
  10. _FOUNDT = true
  11. data = ATable[i]
  12. end
  13. end
  14. if _FOUNDT then
  15. if Self.ItemCount(data[3]) < 1 then
  16. crtPos = c:Position()
  17. Walker.Stop()
  18. Looter.Stop()
  19. while c:isAlive() do
  20. crtPos = c:Position()
  21. end
  22. Targeting.Stop()
  23. wait(1000,1400)
  24. Self.BrowseField(crtPos.x, crtPos.y, crtPos.z)
  25. wait(1200,1400)
  26. local browse = Container.GetLast()
  27. for i = 0, browse:ItemCount()-1 do
  28. local item = browse:GetItemData(i)
  29. if item.id == data[2] then
  30. while browse:GetItemData(i).id == data[2] do
  31. wait(1000)
  32. end
  33. browse:MoveItemToContainer(i, 0, 0, 1)
  34. break
  35. elseif item.id == data[3] then
  36. browse:MoveItemToContainer(i, 0, 0, 1)
  37. break
  38. end
  39. end
  40. Walker.Start()
  41. Targeting.Start()
  42. end
  43. end
  44. end
  45. end, false)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement