Subir

Resultados 1 al 2 de 2

Tema: Dejo macro de Tinker

  1. #1

    Fecha de ingreso
    October-2007
    Mensajes
    218
    Reputacion: 10
    Poder de reputación
    15

    Dejo macro de Tinker

    Hace un tiempo postearon esta macro en el foro y la he ido adaptando según iba subiendo.

    Cosas a saber:
    - Hay que tener al menos una herramienta de tinker. La macro ya se encarga de fabricar hasta 5.
    - Necesitas un cofre cerca tuyo con lingotes de hierro en el primer nivel. SÓLO hierro. Si ponéis otro tipo de lingote la macro falla.
    - Lo mismo ocurre si tenemos engranajes de golem. En este caso la macro sigue fabricando con normalidad pero los contadores son incorrectos.
    - Fabrica 20 items y los guarda en el cofre.
    - Repone lingotes de 60 en 60.
    - Cuando la macro empieza da igual la cantidad de lingotes de hierro y/o items fabricados que tengamos encima.
    - IMPORTANTE: Las locations de la macro están hechas para alguien con skill 94 o más. En negrita dentro del código se explica qué locations hay que cambiar.
    - IMPORTANTE: Elegid bien el lugar de macreo ya que si alguien pasa por encima del cofre donde guardáis los materiales y justo la macro deja los 20 items fabricados, esta puede pararse.
    - RECOMENDACIÓN: activar el ratón en movimiento de EasyUO para que no se arrastre el menú a la posición del ratón. Para ello hay que desactivar: Tools/Don't Move Cursor


    Cosas modificadas:
    1.- Cambiado el tipo de item que se fabrica a engranajes (la macro habla de botellas, pero lo que realmente fabrica son engranajes: puede ser modificada para fabricar cualquier item y está explicado en negrita dentro del código)

    2.- Modificados los tiempos de espera entre click y click. Tras esta modificación, aunque tengamos un poco de lag, la macro es 100% estable.

    3.- Las herramientas las vuelve a fabricar cuando hay 2 o menos en la mochila. Antes estaba a 1 o menos. Esto lo cambié porque una vez con sólo una herramienta fallé y se le acabaron las cargas.



    Feliz macreo!



    Código:
    ; Macro de Artesano by Asuma|Mordor.
    display ok Macro by Asuma/Mordor.
    chooseskill Tink Real
    set %skill_ini #SKILL
    set %herramienta GTL
    ; MODIFICAR PARA FABRICAR OTRA COSA QUE NO SEAN ENGRANAJES
    ; coordenada x ENGRANAJES
    set %botella_x 110
    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
    
    ; MODIFICAR EL ITEM ID "RCG" PARA QUE GUARDE OTRA COSA QUE NO SEAN
    ; ENGRANAJES.
    ; EL ID DE LAS GANZUAS ES "NWH"
    FINDITEM RCG C_ , %id_cofre
    set %botellas_cofre #FINDSTACK
    ; MODIFICAR EL ITEM ID "RCG" PARA QUE GUARDE OTRA COSA QUE NO SEAN
    ; ENGRANAJES.
    ; EL ID DE LAS GANZUAS ES "NWH"
    FINDITEM RCG 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
    FINDITEM RCG C_ , #BACKPACKID
    IF #FINDSTACK >= %limite_botellas
    {
    wait 4s
    ; MODIFICAR EL ITEM ID "RCG" PARA QUE GUARDE OTRA COSA QUE NO SEAN
    ; ENGRANAJES.
    ; EL ID DE LAS GANZUAS ES "NWH"
    FINDITEM RCG C_ , #BACKPACKID
    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 40
    ; MODIFICAR SEGUN AVANCE LA SKILL PARA QUE HAGA CLICK
    ; EN EL MENU "PARTES"
    ; COORDENADA x PARTES
    click 180 80 d
    wait 40
    click %botella_x 80 d
    ;wait 20
    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 <= 2
    {
    while #FINDCNT < 5
    {
    set #LOBJECTID #FINDID
    event macro 17 0
    wait 20
    ; coordenada HERRAMIENTAS
    click 230 80 d
    wait 20
    ; NUMERO DE VECES QUE AVANZA EN EL MENU DE LAS HERRAMIENTAS
    ; PARA FABRICAR LAS HERRAMIENTAS DEL TINKER
    ; AÑADIR O QUITAR SEGUN VAYA SUBIENDO LA SKILL
    click 267 67
    wait 20
    click 267 67
    wait 20
    click 267 67
    wait 20
    ; FIN AÑADIR O QUITAR CLICKS EN EL MENU DE HERRAMIENTAS
    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
    Última edición por Blaizzer; 10-Dec-2010 a las 17:43

  2. #2

    Fecha de ingreso
    October-2008
    Ubicación
    Oviedo
    Edad
    38
    Mensajes
    417
    Reputacion: 10
    Poder de reputación
    15

    Respuesta: Dejo macro de Tinker

    Ya subi artesania, pero aun asi gracias!

Temas similares

  1. Busco Macro Tinker
    Por Duhast en el foro Macros
    Respuestas: 4
    Último mensaje: 09-Dec-2010, 15:23
  2. Busco GM Tinker.
    Por Kevin Garnett en el foro Mercadillo
    Respuestas: 2
    Último mensaje: 04-Aug-2010, 19:47
  3. Duda tinker
    Por Black13 en el foro Dudas y Preguntas
    Respuestas: 15
    Último mensaje: 27-Oct-2008, 00:59
  4. tinker
    Por Jaina en el foro Dudas y Preguntas
    Respuestas: 5
    Último mensaje: 08-Feb-2008, 22:56
  5. Tinker
    Por llou en el foro Dudas y Preguntas
    Respuestas: 1
    Último mensaje: 11-Oct-2007, 00:55

Permisos de publicación

  • No puedes crear nuevos temas
  • No puedes responder temas
  • No puedes subir archivos adjuntos
  • No puedes editar tus mensajes
  •  
YoutubeFbChat IRCTwit