1. ;*************************************************

  2. ;Macro HEAL en brasero by OverQueen

  3. ;MATERIAL: vendas y bidón

  4. ;PROCEDIMIENTO: esté donde esté, irá hasta el

  5. ; brasero del banco de Minoc y tras pisarlo se alejará

  6. ; para curarse y limpiar sus vendas

  7. ;OBJETIVO: Subir curar

  8. ;SOLUCIÓN DE ERRORES: Si la macro no da tiempo a que

  9. ; tu pj se cure (% de heal) aumenta el número de la

  10. ; penúltima línea "wait XXs"

  11. ;*************************************************

  12. set #SYSMSGCOL 10

  13. event sysmessage Macro Heal by OverQueen

  14. Healing:

  15. ;*************************************************

  16. ;           CAMINAR HACIA EL BRASERO

  17. ;*************************************************

  18. move 2521 557 0

  19. wait 4s

  20. ;*************************************************

  21. ;             ALEJARSE DEL BRASERO

  22. ;*************************************************

  23. move 2518 557 0

  24. ;*************************************************

  25. ;                   CURARSE

  26. ;*************************************************

  27. curar:

  28. msg .vendas $

  29. wait 10

  30. event macro 23 0

  31. ;*************************************************

  32. ;          REPETIR HASTA QUE ACIERTE

  33. ;*************************************************

  34. wait 20

  35. scanjournal

  36. if te_aplicas_las_vendas_pero_fallas in #JOURNAL

  37. {

  38. wait 20

  39. goto curar

  40. }

  41. ;*************************************************

  42. ;                 LIMPIAR VENDAS

  43. ;*************************************************

  44. set %BIDON TEE_QEE_WEE_VEE

  45. set %VENDAS AMF

  46. 

  47. finditem %VENDAS C_ , #BACKPACKID

  48. set #LOBJECTID #FINDID

  49. event macro 17

  50. wait 10

  51. finditem %BIDON C_ , #BACKPACKID

  52. set #LTARGETID #FINDID

  53. set #LTARGETKIND 1

  54. wait 10

  55. event macro 22

  56. wait 10

  57. 

  58. ;*************************************************

  59. ;                    COMER

  60. ;*************************************************

  61. set %comida RGG_NRD_QSD_ZBG_WLI_QRD_END_FUD_YLI_WLI_HGI_KGI_EGI_QLI_KLI_MLI_KRD_HQD_AQD_MQE_VQE_TQE_JQE_IQE_GQE_SPE_ZPE_OQE_BDF_KPE_RQE_YSD_SQD_YWI_AXI_PQD_QQD

  62. set #LOBJECTID #FINDID

  63. findItem %comida  c_ , #BACKPACKID

  64. event macro 17 0

  65. wait 1s

  66. ;*************************************************

  67. ;        ESPERAR A QUE SE CURE Y REINICIAR

  68. ;*************************************************

  69. wait 15s

  70. goto Healing: