Subir

Resultados 1 al 2 de 2

Tema: Arreglo de macro

  1. #1
    Avatar de Vinsentito
    Fecha de ingreso
    May-2010
    Mensajes
    36
    Reputacion: 10
    Poder de reputación
    14

    Arreglo de macro

    Buenas noches antes q nada, mi problema es el siguiente tengo macro de herreria para hacer dagas, pero tb necesito sacarme de ensima mucho material inserbible y me gustaria darle probecho, tanto como para darme xp y para poder desquitarme de ese mineral mi macro es la siguiente... me gustaria saber si alguien me puede ayudar en corregirla asi puedo hacer (collarines por ejmp de un mineral q solo aga armors)

    Desde ya MUCHAS GRACIAS


    ;------------------------------------------

    ; Macro crafted by SirRasel & Glacius [BdK]

    ; Retocada por Alex y BoXeR (BoXeR añadió un contador

    ; de lingotes del cofre un contador de dagas en la mochila

    ; y que dependiendo del nivel de herrería

    ; usara una coordenada para la daga u otra automáticamente)

    ; Macro de Herrero que fabrica martillos.

    ;------------------------------------------

    ; Quieres hacer tiquets el lote de dagas? escribe aquí si o no.

    ;--------------------------

    set %tiquets si

    :--------------------------



    init events

    ;================================================= ================================================== ===========

    ;=========== VARIABLES ================================================== ======================================

    ;================================================= ================================================== ===========

    chooseskill blac real

    set %skillini #skill

    set %martillo TLH

    set %daga TSF

    set %lingotes RMK

    set %lotex 113

    set %lotey 62

    set %idlote CKF

    set %pap BKF

    set %gumpx1 94

    set %gumpy1 172

    set %gumpx2 305

    set %gumpy2 343

    set %dagax1 271

    set %dagay1 67

    set %dagax2 250

    set %dagay2 67

    set %dagax3 66

    set %dagay3 67

    set %martillox1 271

    set %martilloy1 67

    set %martillox2 250

    set %martilloy2 67

    set %martillox3 150

    set %martilloy3 67

    ;================================================= ================================================== ===========

    ;================================================= ================================================== ===========

    ;=========== OPCIONES PREVIAS ================================================== ===============================

    display Ok abre el cofre donde esten los materiales

    wait 3s

    set %cofre #lobjectid

    set %cofrex #cursorx

    set %cofrey #cursory

    display Ok pon el cursor en la mochila de la foto del personaje

    wait 3s

    set %backpackx #cursorx

    set %backpacky #cursory

    goto inicio

    ;================================================= ================================================== ===========

    ;=========== INICIO DE LA MACRO ================================================== =============================

    ;================================================= ================================================== ===========

    inicio

    finditem %martillo c_ , #BACKPACKID

    if #findKind = -1

    {

    HALT

    }

    set #LOBJECTID #FINDID

    event macro 17 0

    target

    key ESC



    inicio:

    finditem %martillo c_ , #BACKPACKID

    if #findcnt <= 1

    {

    GoSub FabricarMartillo

    }

    finditem %lingotes c_ , #BACKPACKID

    if #findStack <= 20

    {

    goSub CojerLingotes

    finditem %lingotes c_ , #BACKPACKID

    }

    set #LOBJECTID #FINDID

    event macro 17 0

    wait 40

    click %dagax1 %dagay1 f

    wait 20

    click %dagax2 %dagay2 d

    wait 20

    click %dagax3 %dagay3 d

    wait 20

    if #SKILL <= 500

    {

    set %dagax4 100

    set %dagay4 67

    click %dagax4 %dagay4 d

    }

    if #SKILL > 500

    {

    set %dagax4b 135

    set %dagay4b 67

    click %dagax4b %dagay4b d

    }

    wait 3s

    set %skillinc #SKILL - %skillini

    finditem %lingotes C_ , %cofre

    set %lingotescofre #FINDSTACK

    finditem %daga c_ , #BACKPACKID

    set %dagamochila #findCnt

    {

    setuotitle ------------< | Macro de Herrero | S.Inicial: %skillini | S. Actual: #SKILL | S. Inc: %skillinc | Lingotes que te quedan: %lingotescofre | Dagas mochila: %dagamochila | >------------

    }

    finditem %daga c_ , #BACKPACKID

    if #findCnt >= 15

    {

    goSub PackDagas

    gosub Guardarlote

    }

    goto inicio:



    ;================================================= ================================================== ===========

    ;=========== SUB COJER LINGOTES========================================== ======================================

    ;================================================= ================================================== ===========

    Sub CojerLingotes

    finditem %lingotes c_ , %cofre

    if #findkind = -1

    {

    ignoreitem reset

    HALT

    }



    set %carga #maxweight - #weight

    set %carga %carga / 2

    set %carga %carga + 1



    if %carga <= 1

    {

    if %carga < 0

    {

    return

    }

    else

    {

    set %carga 2

    }

    }

    event drag #findid

    wait 10

    msg %carga

    msg $

    wait 10

    click %backpackx %backpacky p

    return

    ;================================================= ================================================== ===========

    ;=========== SUB FABRICAR MARTILLO ================================================== ==========================

    ;================================================= ================================================== ===========

    Sub FabricarMartillo

    martillo:



    finditem %lingotes c_ , #BACKPACKID

    if #findStack <= 20

    {

    goSub CojerLingotes

    finditem %lingotes c_ , #BACKPACKID

    }

    set #LOBJECTID #FINDID

    event macro 17 0

    wait 40

    click %martillox1 %martilloy1 f

    wait 30

    click %martillox2 %martilloy2 d

    wait 30

    click %martillox3 %martilloy3 d

    wait 30

    if #SKILL <= 500

    {

    set %martillox4 100

    set %martilloy4 67

    click %martillox4 %martillo4 d

    }

    if #SKILL > 500

    {

    set %martillox4b 135

    set %martilloy4b 67

    click %martillox4b %martilloy4b d

    }

    wait 4s

    finditem %martillo c_ , #BACKPACKID

    if #findCnt >= 3

    {

    return

    }

    goto martillo

    ;================================================= ================================================== ===========

    ;=========== SUB PACK DE DAGAS ================================================== ==============================

    ;================================================= ================================================== ===========

    Sub PackDagas



    findItem %martillo C_ , #BACKPACKID

    if #findCnt <= 3

    {

    gosub FabricarMartillo

    findItem %martillo C_ , #BACKPACKID

    }

    set #LOBJECTID #FINDID

    event macro 17 0

    target

    key ESC

    finditem %lingotes c_ , #BACKPACKID

    if #findStack <= 20

    {

    goSub CojerLingotes

    finditem %lingotes c_ , #BACKPACKID

    }

    set #LOBJECTID #FINDID

    event macro 17 0

    click %lotex %lotey d

    wait 10

    return

    ;================================================= ================================================== ===========

    ;=========== SUB DEJAR PACK DE DAGAS ================================================== ========================

    ;================================================= ================================================== ===========

    sub Guardarlote



    if %tiquets = no

    {

    dejar:

    findItem %idlote C_ , #BACKPACKID

    if #findkind <> -1

    {

    event drag #FINDID

    wait 10

    click %cofrex %cofrey p

    gosub Guardarlote

    }

    return

    }

    if %tiquets = si

    {

    lote:



    findItem %idlote C_ , #BACKPACKID

    if #FINDCNT > 0

    {

    findItem %pap G_3

    if #FINDSTACK = 0

    {

    goto dejar

    }

    else

    {

    set #LOBJECTID #FINDID

    event macro 17

    wait 20

    click %gumpx1 %gumpy1 1

    wait 20

    click %gumpx2 %gumpy2 1

    target

    findItem %idlote C_ , #BACKPACKID

    set #LTARGETID #FINDID

    wait 20

    event macro 22 0

    wait 20

    goto guardarlote

    wait 10

    key ESC

    click %gumpx2 %gumpx2 r

    goto lote

    }

    }

    return

    }

    return

    ;================================================= ================================================== ===========

    ;======================================== FIN ================================================== ===============

    ;================================================= ================================================== ===========


    es q ago collarines o partes de armadura con eso, no puedo usar razor ya q uso linux y no tengo net framework, Gracias!!
    Última edición por Vinsentito; 04-Jun-2010 a las 01:58

  2. #2
    Avatar de Vinsentito
    Fecha de ingreso
    May-2010
    Mensajes
    36
    Reputacion: 10
    Poder de reputación
    14

    Respuesta: Arreglo de macro

    Up!! es muy necesario Gracias!

Temas similares

  1. Necesito un Arreglo en la macro de minar
    Por Death Magnetic en el foro Macros
    Respuestas: 2
    Último mensaje: 09-Dec-2008, 02:42
  2. Busco macro alquimia y macro sastre
    Por Moyo-Cristi en el foro Macros
    Respuestas: 8
    Último mensaje: 08-Nov-2008, 03:05
  3. Macro vet
    Por Elsa-Pataky en el foro Macros
    Respuestas: 0
    Último mensaje: 08-Dec-2007, 14:33
  4. Macro
    Por Smoke-Free en el foro Macros
    Respuestas: 2
    Último mensaje: 14-Jun-2007, 07:14

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