Advertisement
Guest User

Untitled

a guest
Jun 24th, 2017
57
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.20 KB | None | 0 0
  1. ; #################################
  2. ; Script Name: Autoloot
  3. ; Author: POOODAWG
  4. ; Version: 1.0
  5. ; Client Tested with: 2.0
  6. ; EUO version tested with: 1.5 Version 155
  7. ; Shard OSI / FS: NeverlandsReborn (FS)
  8. ; Purpose: Loots corpses and ground
  9. ; #################################
  10. ;=============================================
  11. ; Configuration
  12. ;=============================================
  13. ; Set %key to youre liking.
  14. ;Here add all the item you wish to loot, gold reg and gem are aldready set
  15. set %key F7
  16. set %gold POF
  17. set %gem HVF_GVF_FVF_BVF_MWF_VUF_RVF_OVF_EVF
  18. set %rare CKF_RVH_QGG
  19. set %reg KUF_JUF_KZF_JZF_MZF_WZF_RZF_SZF_FUF
  20. set %armor
  21. set %weapon
  22. set %corpse IIF_POF_YFM
  23. set %totalloot %gem , _ , %rare , _ , %reg , _ , %armor , _ , %weapon , _ , %gold
  24. ;=============================================
  25. lootbag:
  26. {
  27. event SysMessage Open lootbag and press Space.
  28. waitkey:
  29. {
  30. onhotkey SPACE
  31. goto setbag
  32. }
  33. goto waitkey
  34. }
  35.  
  36. setbag:
  37. {
  38. if #CONTNAME <> container_gump || #CONTID = #BACKPACKID
  39. {
  40. goto lootbag
  41. }
  42. set %Lootbag #CONTID
  43. event SysMessage lootbag succesfully chosen, you can now use the script.
  44. }
  45.  
  46. Start:
  47. {
  48. onhotkey %key
  49. {
  50. goto Loot
  51. }
  52. goto start
  53. }
  54.  
  55. Loot:
  56. {
  57. finditem %totalloot G_2
  58. wait 5
  59. while #findkind <> -1
  60. {
  61. finditem %totalloot G_2
  62. wait 5
  63. exevent drag #findid #findstack
  64. wait 5
  65. exevent dropc %Lootbag
  66. }
  67. finditem %corpse G_2
  68. wait 5
  69. while #findkind <> -1
  70. {
  71. set #lobjectid #findid
  72. nextcpos 20 20
  73. event macro 17 0
  74. wait 10
  75. set %corpseopen #contid
  76. ignoreitem #lobjectid 1
  77. finditem %totalloot C_ , %corpseopen
  78. wait 5
  79. while #findkind <> -1
  80. {
  81. finditem %totalloot C_ , %corpseopen
  82. wait 5
  83. exevent drag #findid #findstack
  84. wait 5
  85. exevent dropc %Lootbag
  86. }
  87. finditem %corpse G_2
  88. wait 5
  89. }
  90. event sysmessage All done Or no Corpses around
  91. wait 10
  92. goto Start
  93. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement