Guest User

Untitled

a guest
Jun 25th, 2016
84
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.08 KB | None | 0 0
  1. ;======================================================
  2. ;============= Macro de Sastre Bandana =============
  3. ;============= V: 20/03/16 - Silas =============
  4. ;======================================================
  5. ; Server: InsaneUO
  6. ; CONFIGURACIÓN:
  7. ;1 Siempre hay que cargarse de costureros la mochila antes de dar a pley.
  8. ;2 Siempre hay que tener el cofre de los materiales abierto, se selecciona al dar a pley la macro.
  9. ;3 El menu de crafteo hay que tenerle simpre preparado en la categoria que este el objeto a fabricar.
  10. ;4 Cuando des pley la macro y seleccionar el cofre, te cojera los regs pero no te abrira el menu,
  11. ; en este caso hay que hacer doble click al costurero y a la tela.
  12. ;5 En caso que no te te haga click correctamente en el menu de crafteo, ve donde dice MODIFICAR CLIK DEL OBJETO A FABRICAR.
  13. ;==================
  14. set %comida YLI_QQD_WLI_END_FUD_QRD
  15. ;==================
  16. set %telas RTI
  17. set %hilo UAG
  18.  
  19. set #SYSMSGCOL 20
  20. event sysmessage Silas Sastre Bandanas en Casa.
  21. event sysmessage Que la disfrutes #CHARNAME :)
  22. wait 1s
  23.  
  24. bolsa1T:
  25. display ok Selecciona el cofre donde esten las telas e hilos.
  26. set #TARGCURS 1
  27. Bolsa1F:
  28. if #TARGCURS = 1
  29. goto Bolsa1F
  30. set %bolsa1 #LTARGETID
  31.  
  32. inicio:
  33. gosub comer
  34. gosub cogeTela
  35. gosub cogeHilo
  36. gosub creaCapa
  37. goto inicio
  38.  
  39.  
  40. sub comer ; ===================================
  41. finditem %comida C_ , #backpackid
  42. set #LOBJECTID #FINDID
  43. wait 10
  44. event macro 17
  45. return
  46.  
  47. sub cogeTela ; ===================================
  48. finditem %telas C_ , #BACKPACKID
  49. IF #findstack < 15
  50. {
  51. finditem %telas C_ , %bolsa1
  52. wait 10
  53. exevent drag #findid 50
  54. wait 10
  55. exevent dropc #BACKPACKID
  56. }
  57. return
  58.  
  59. sub cogeHilo ; ===================================
  60. finditem %hilo C_ , #BACKPACKID
  61. IF #findstack < 2
  62. {
  63. finditem %hilo C_ , %bolsa1
  64. wait 10
  65. exevent drag #findid 15
  66. wait 10
  67. exevent dropc #BACKPACKID
  68. }
  69. return
  70.  
  71. sub creaCapa ; ===================================
  72. set #ltargetid #findid
  73. event macro 22 0
  74. wait 05
  75. click 273 111 ;MODIFICAR EL CLICK DEL OBJETO A FABRICAR.(LAS CORDENADAS SE SACAN DEL EASY).;
  76. wait 1s
  77. return
Add Comment
Please, Sign In to add comment