A darle play que la macro les va guiando.
Es muy fácil.
Por ahora la probé solo yo, pero me va muy bien.
Deben tener 1 contenedor desde el cual puedan agarrar lingotes. En el mismo
se pondrán las botellas vacías que se vayan creando.
IMPORTANTE : Esta macro fue probada con EasyUO 1.5Código:; Macro de Artesano by Asuma|Mordor. display ok Macro by Asuma/Mordor. chooseskill Tink Real set %skill_ini #SKILL set %herramienta GTL set %botella_x 100 set %limite_botellas 20 GoSub GetContenedor wait 20 GoSub GetMochila wait 1s set #SYSMSGCOL 68 event sysmessage Comenzara la macro... wait 1s inicio: goSub CheckHerramientas goSub HacerBotella goSub Renovar_Titulo goto inicio ; ************************ SUBS ************************ sub Renovar_Titulo set %skill_gain #SKILL - %skill_ini FINDITEM WUF C_ , %id_cofre set %botellas_cofre #FINDSTACK FINDITEM WUF C_ , #BACKPACKID set %botellas_mochila #FINDSTACK setuotitle | Skill Inicial : %skill_ini | Skill Actual : #skill | P. Ganados : %skill_gain | Botellas Guardadas : %botellas_cofre | Botellas en mochila : %botellas_mochila return sub HacerBotella goSub Reponer_Lingotes FINDITEM WUF C_ , #BACKPACKID IF #FINDSTACK >= %limite_botellas { set #SYSMSGCOL 68 event sysmessage Guardando botellas... event drag #FINDID wait 20 key Enter wait 20 click %cont_x %cont_y p wait 10 event sysmessage Botellas guardadas. } FINDITEM %herramienta C_ , #BACKPACKID set #LOBJECTID #FINDID event macro 17 0 wait 20 click 195 80 d wait 20 click %botella_x 80 d wait 1s return sub CheckHerramientas GoSub Reponer_Lingotes FINDITEM %herramienta C_ , #BACKPACKID IF #FINDCNT = 0 { event sysmessage No tienes ningun instrumento en la mochila. stop } IF #FINDCNT = 1 { while #FINDCNT < 5 { set #LOBJECTID #FINDID event macro 17 0 wait 20 click 195 80 d wait 20 click 267 67 wait 10 click 267 67 wait 10 click 267 67 wait 10 click 235 80 d FINDITEM %herramienta C_ , #BACKPACKID } } return sub Reponer_Lingotes FINDITEM RMK C_ , #BACKPACKID IF #FINDSTACK < 30 { set #SYSMSGCOL 68 event sysmessage Reponiendo lingotes... FINDITEM RMK C_ , %id_cofre IF #FINDSTACK < 60 { event sysmessage No hay mas lingotes. stop } event Drag #FINDID wait 20 key 6 wait 10 key 0 wait 10 key enter wait 10 click %mochila_x %mochila_y p event sysmessage Lingotes repuestos. wait 1s } return sub GetContenedor set #SYSMSGCOL 68 event sysmessage Abra el contenedor donde esten los lingotes, mantenga el cursor en ese lugar y presione ESC. get_conte: OnHotKey ESC { set %id_cofre #LOBJECTID set %cont_x #CURSORX set %cont_y #CURSORY return } goto get_conte: return sub GetMochila set #SYSMSGCOL 68 event sysmessage Coloque el cursor sobre la mochila de la foto de su personaje y presione ESC. get_mochi: OnHotKey ESC { set %mochila_x #CURSORX set %mochila_y #CURSORY return } goto get_mochi: return


Citar






