Subir

Resultados 1 al 17 de 17

Tema: Macro de lotear

  1. #1

    Fecha de ingreso
    August-2009
    Edad
    33
    Mensajes
    880
    Reputacion: 10
    Poder de reputación
    15

    Macro de lotear

    Tengo una macro de lotear pero no se usarla alguien me podria decir como se usa:

    initevents
    event macro 8 7
    wait 1s
    set %BackID #contid

    set %idtype_gemas VUF_GVF_FVF_UVF_EVF_BVF_RVF_HVF_OVF
    set %Recalls WTL

    while #true
    {
    if #CONTTYPE = YFM
    {
    set %id_tmp #CONTID

    gosub guardar POF C_ , %id_tmp %BackID
    gosub guardar YFM C_ , %id_tmp %BackID
    gosub guardar %idtype_gemas C_ , %id_tmp %BackID
    gosub guardar %Recalls C_ , %id_tmp %BackID
    gosub guardar RWF C_ , %id_tmp %BackID
    gosub guardar LNK C_ , %id_tmp %BackID



    }

    }

    halt


    ;================================================= ==========
    ;drag (idtype_objeto, cantidad_a_arrastrar, x, y, contenedor, time_wait)
    ;ejemplo: gosub drag %idtype_ingot all %aux_x %aux_y C_ , #BACKPACKID 10

    sub drag

    drag:
    if #contname = drag_gump
    goto waitfordraggumpx

    if #contname = stack_gump
    goto waitforstackgumpx

    finditem %1 %5

    if #findkind = -1
    return
    Event Drag #FindID
    waitforstackgumpx:
    set %dragtimeout #scnt + 5
    waitforstackgump:
    if #scnt >= %dragtimeout
    goto drag
    if #contname = drag_gump || #findstack < 2
    goto waitfordraggumpx
    if #contname <> stack_gump && #findstack > 1
    goto waitforstackgump
    if %2 = all
    msg $
    else
    msg %2 $
    goto waitfordraggumpx:

    set %dragtimeout #scnt + 5
    waitfordraggump:

    if #scnt >= %dragtimeout
    goto drag

    if #contname <> drag_gump
    goto waitfordraggump
    ;click %3 %4 p
    exevent Dropc %BackID
    click #NEXTCPOSX #NEXTCPOSY
    wait %6


    if %2 = all
    goto drag
    else
    return
    ;================================================= ==========


    sub guardar

    set %tmp %1
    set %origen %2
    set %destino %3

    finditem %tmp %origen

    if #findid <> X
    {
    exevent drag #findid #FINDSTACK
    wait 20
    exevent dropc %destino
    }

    return

  2. #2
    Avatar de Satnev
    Fecha de ingreso
    May-2009
    Mensajes
    97
    Reputacion: 11
    Poder de reputación
    15

    Respuesta: Macro de lotear

    Bueno creo que esa macro no es muy recomendable primero porque usa clicks y segundo porque abre cualquier cuerpo y creo que ni los corta, yo me hice esta. me funcionaba bien pruebala y me dices si te funiona o no un saludo.

    Añade las id de la bolsa que quieras guardar lo que lotees (ponla dentro de la mochila) la id del arma que quieres usar para cortar(estan puestas la del tridente de y la de la cimitarra) la tecla que quieras pulsar para que lotee un curpoe a una distancia maxima de 3 casillas (yo tengo uesto f6) y la id de los objetos(esta puesto que lotee pociones, flechas, plumas, sangre dragon, escamas, gemas casitodos los tipos, regs, dinero y no se si algo mas)

    Código:
    ;;;;;;;;;;;;;EASYUO 1.5 version 148 --------client 2.0.3;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;ponte una bolsa/cofre en la mochila y mete aki su id
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    set %Cofre
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;añade la id del arma que quieras usar para cortar
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    set %daga MTF_POH
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;pon aqui la tecla que quieras usar para lotear
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    set %hotkey F6
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;;;;; Añade aqui la id de los objetos que quieras lotear
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    set %cosas POF_ZVF_QVF_PVF_IVF_OZF_QZF_UZF_FUF_EWF_DWF_KVF_VLK_IUF_MVF_AWF_HVF_EVF_FVF_UVF_ZVF_BWF_CWF_OVF_WUF_FVF_DVF_GVF_MZF_JUF_KUF_RVF_BVF_CVF_VUF_RWF_SZF_RZF_WZF_KZF_JZF 
    
    
    Star:
    onhotkey %hotkey
                {
                wait 5
                event sysmessage Loteando.
                goto Encontrar
                }
    goto Star
    
    Encontrar:
    finditem YFM G_3
    if #findkind <> -1
       {
           set %corpse #findid
           goto AbrirCuerpo
       }
        else
    goto Star
    AbrirCuerpo:
    finditem %daga C_ , #charid
    if #findkind = -1
    {
    finditem %daga C_ , #backpackid
    if #findkind = -1
    {
    event sysmessage No tienes arma para cortar
    }
    }
    set #LOBJECTID #FINDID
    event macro 17
    target
    finditem YFM G_1
    set %corpse #findid
    ignoreitem #findid
    set #ltargetid %corpse
    event macro 22
    set #lobjectid %corpse
    event macro 17
    wait 10
    set %bucle si
    
    Lotear:
        while ( %bucle = si )
        {
         finditem %cosas C_ , %corpse
         if #findkind <> -1
          {
            Exevent Drag #findid #findstack
            wait 5
            Exevent Dropc %Cofre
            wait 5
            ignoreitem #findid
          }
          else
          set %bucle = no
        }
       event sysmessage Cuerpo Loteado
       goto Star
    Última edición por Satnev; 20-Aug-2009 a las 13:54

  3. #3

    Fecha de ingreso
    August-2009
    Edad
    33
    Mensajes
    880
    Reputacion: 10
    Poder de reputación
    15

    Respuesta: Macro de lotear

    Gracias por la macro pero lo que no se es utilizarla esk soy nuevo, que id meto para lotear armor petos y cosas asi?

  4. #4
    Avatar de Satnev
    Fecha de ingreso
    May-2009
    Mensajes
    97
    Reputacion: 11
    Poder de reputación
    15

    Respuesta: Macro de lotear

    si quieres lotear armors tienes que poner la id general del pecho para lotear pechos, para saber cual es clica dos veces en un pecho cualquiera y en el euo mira los 3 caracteres que sale en #lobjecttype en la parte de last action tienen que salirte HSH pues eso añadelo en la parte de lotear cosas y repite el proceso con grebas, collarin, etc.

  5. #5

    Fecha de ingreso
    December-2009
    Mensajes
    87
    Reputacion: 10
    Poder de reputación
    15

    Respuesta: Macro de lotear

    Wenas, he probado esa macro q dices Satnev y funciona bastante bien, lo unico q no lotea lo que hay dentro de las bolsas que estan en el cuerpo, ¿alguien sabe de alguna macro que lo haga? gracias

  6. #6
    Avatar de killer
    Fecha de ingreso
    September-2009
    Mensajes
    148
    Reputacion: 10
    Poder de reputación
    15

    Respuesta: Macro de lotear

    ponle la id de la bolsa o cofre y asi loteara la bolsa entera de dentro

  7. #7

    Fecha de ingreso
    August-2009
    Edad
    33
    Mensajes
    880
    Reputacion: 10
    Poder de reputación
    15

    Respuesta: Macro de lotear

    Up, Alguien me podria poner una macro de autoloot buena si tendria corazon

  8. #8
    Avatar de la paqui
    Fecha de ingreso
    July-2008
    Facción
    Neutral
    Nacimiento
    Haven
    Mensajes
    928
    Reputacion: 29
    Poder de reputación
    15

    Respuesta: Macro de lotear

    Bueno yo he probado esta macro y no me va, tengo el easy que pide y los id. Lo que no se muy bien es si tengo que poner algo en la tecla F6 en el apartado Opciones de mi pj, porque cre que ahi está mi fallo que no se lo que tengo que poner, a ver si alguien me hecha un cable. Gracias y saludos.
    [img]Link de tu firma[/img]
    Cuando la mierda tenga valor, los pobres nacerán sin culo.

    Pincha aqui~http://ultima-alianza.com/foro/blogs/la-paqui/

  9. #9

    Fecha de ingreso
    August-2009
    Edad
    33
    Mensajes
    880
    Reputacion: 10
    Poder de reputación
    15

    Respuesta: Macro de lotear

    Cita Iniciado por la paqui Ver mensaje
    Bueno yo he probado esta macro y no me va, tengo el easy que pide y los id. Lo que no se muy bien es si tengo que poner algo en la tecla F6 en el apartado Opciones de mi pj, porque cre que ahi está mi fallo que no se lo que tengo que poner, a ver si alguien me hecha un cable. Gracias y saludos.
    Esk esa macro no forola por es pido si alguien es tan amable de ponerla o enviarmela x msn: [email protected]

  10. #10
    Avatar de killer
    Fecha de ingreso
    September-2009
    Mensajes
    148
    Reputacion: 10
    Poder de reputación
    15

    Respuesta: Macro de lotear

    ;;;;;;;;;;;;;EASYUO 1.5 version 148 --------client 2.0.3;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;
    ;;;;;;;;;ponte una bolsa/cofre en la mochila y mete aki su id
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    set %Cofre TNHFSPD
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    ;;;;;;;;;;añade la id del arma que quieras usar para cortar
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    set %daga MTF_POH_ZRF_NSF
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    ;;;;;;;;;;;pon aqui la tecla que quieras usar para lotear
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    set %hotkey esc
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;;;;; Añade aqui la id de los objetos que quieras lotear
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    set %cosas POF_ZVF_QVF_PVF_IVF_OZF_QZF_UZF_FUF_EWF_DWF_KVF_VL K_IUF_MVF_AWF_HVF_EVF_FVF_UVF_ZVF_BWF_CWF_OVF_WUF_ FVF_DVF_GVF_MZF_JUF_KUF_RVF_BVF_CVF_VUF_RWF_SZF_RZ F_WZF_KZF_JZF_EAG_VVF_ZLK


    Star:
    onhotkey %hotkey
    {
    wait 5
    event sysmessage Loteando.
    goto Encontrar
    }
    goto Star

    Encontrar:
    finditem YFM G_3
    if #findkind <> -1
    {
    set %corpse #findid
    goto AbrirCuerpo
    }
    else
    goto Star
    AbrirCuerpo:
    finditem %daga C_ , #charid
    if #findkind = -1
    {
    finditem %daga C_ , #backpackid
    if #findkind = -1
    {
    event sysmessage No tienes arma para cortar
    }
    }
    set #LOBJECTID #FINDID
    event macro 17
    target
    finditem YFM G_1
    set %corpse #findid
    ignoreitem #findid
    set #ltargetid %corpse
    event macro 22
    set #lobjectid %corpse
    event macro 17
    wait 10
    set %bucle si

    Lotear:
    while ( %bucle = si )
    {
    finditem %cosas C_ , %corpse
    if #findkind <> -1
    {
    Exevent Drag #findid #findstack
    wait 5
    Exevent Dropc %Cofre
    wait 5
    ignoreitem #findid
    }
    else
    set %bucle = no
    }
    event sysmessage Cuerpo Loteado
    goto Star






    esta es la misma pero le he metido mas cosas para usar tu arma por ejem un hacha pue miras en el easy uo la id y la añades poniendo un guion bajo y la id y asi con las cosas y el cofre pero weno si tienes alguna duda me dices

    pd:la macro funciona bien

  11. #11
    Suspendido
    Fecha de ingreso
    January-2009
    Edad
    32
    Mensajes
    438
    Reputacion: 10
    Poder de reputación
    0

    Respuesta: Macro de lotear

    esta macro lotea todo menos las cajitas(creo), ademas es muy simple d configurar para k t lotee lo k kieras, t viene la id de algunos objetos como oro, pergas, joyas, etc, miratela, y para k lotee lo unico k tienes k acer es abrir el cuerpo y la macro t lo lotea todo, un placer

    ;==================================
    ; Script Name: AutoLoot
    ; Author: Tarain
    ; Version: 5.2
    ; Client Tested with: 2.0.3
    ; EUO version tested with: 1.5 Version 79
    ; Shard: Ultima Alianza
    ; Release: 02/04/08
    ; Purpose: AutoLoot
    ;==================================
    ; Ropa Magica: DCI_IWI_AWL_FWL_OVI_
    ; Armas: KPH_SOH_OMH_UMJ_ATF_JTF_EPH_ZRF_LSF_NSF_MPH_RMH_BS F_ZMJ_ANJ_KSF_YTH_WRH_QOD_SRH_PPF_SOD_YRH_MTF_VOH_ ZPF_CUH_YSF_VOH_ZPF_CUH_YSF_QMH_GFF_WTH_AUH_TOH_JS F_MMH_
    ; Escudos: CIK_ZHK_MIK_NIK_OIK_FIK_
    ; Bastones: QMH_GFF_ZPF_
    ; Armaduras: NJL_QJL_JKH_HKH_UKH_KKH_SKH_QKH_DLH_VKH_ELH_CSH_BS H_OSH_TSH_NSH_JSH_MSH_USH_ISH_KSH_HSH_LSH_WSH_
    ; Otros objetos: QWL_SWL_RWL_PWL (Runas) POF (Gold)
    ; WUF (Potis) IUD (Cajitas Trampa) CKF (Bolsas)
    ; LGG (Polvora Trans.) ZIM (Golems) TVH (Cheques)
    ; LNK_RWF (Virotes - Flechas) SJG_IJG_UJG_ (Joyas)
    ; ZLF (Vendas) XVH (Mapas) HVF (Tickets Torneo)
    ; FUL_NUL_GUL (Pergas Flame, Explo, Descarga) LZF_IUF (Alas,Ojos)
    ; HVF (Tickets Torneo) RZF_SZF_WZF_JUF_JZF_KZF_MZF_KUF (Regs)
    ;========================================
    set #sysmsgcol 096
    set %items GIK_JWI_GZH_TDI_BWI_NJL_QJL_JKH_HKH_UKH_KKH_SKH_QK H_DLH_VKH_ELH_CSH_BSH_OSH_TSH_NSH_JSH_MSH_USH_ISH_ KSH_HSH_LSH_WSH_QWL_SWL_RWL_PWL_DCI_IWI_AWL_FWL_OV I_KPH_SOH_OMH_UMJ_ATF_JTF_EPH_ZRF_LSF_NSF_MPH_RMH_ BSF_ZMJ_ANJ_KSF_YTH_WRH_QOD_SRH_PPF_SOD_YRH_MTF_VO H_ZPF_CUH_YSF_VOH_ZPF_CUH_YSF_QMH_GFF_WTH_AUH_TOH_ JSF_MMH_CIK_ZHK_MIK_NIK_OIK_FIK_QMH_GFF_ZPF_NJL_QJ L_JKH_HKH_UKH_KKH_SKH_QKH_DLH_VKH_ELH_CSH_BSH_OSH_ TSH_NSH_JSH_MSH_USH_ISH_KSH_HSH_LSH_WSH_QWL_SWL_RW L_PWL_POF_LGG_ZIM_TVH_SJG_IJG_UJG_HVF_DCI_IWI_AWL_ FWL_OVI_NJL_QJL_JKH_HKH_UKH_KKH_SKH_QKH_DLH_VKH_EL H_CSH_BSH_OSH_TSH_NSH_JSH_MSH_USH_ISH_KSH_HSH_LSH_ WSH_CIK_ZHK_MIK_NIK_OIK_FIK_KPH_SOH_OMH_UMJ_ATF_JT F_EPH_ZRF_LSF_NSF_MPH_RMH_BSF_ZMJ_ANJ_KSF_YTH_WRH_ QOD_SRH_PPF_SOD_YRH_MTF_VOH_ZPF_CUH_YSF_VOH_ZPF_CU H_YSF_QMH_GFF_WTH_AUH_TOH_JSF_MMH_QMH_GFF_ZPF_SJG_ IJG_UJG_HVF_FUL_NUL_GUL_ODI_MKH_PKH_DPH_RKH_WUF_WE D_BIK_NMH
    set %autoloot #true
    set %teclaloot HOME

    start:
    OnHotKey %teclaloot
    goto autoloot

    if %autoloot #true
    {
    mirando:
    if #conttype <> YFM
    {
    goto start
    }
    else
    set %corpse #contid
    finditem #backpackid
    set %bagx #findx + 140
    set %bagy #findy + 220
    if ( #findkind <> -1 && %corpse <> N/A && %corpse <> %backpack ) && %autoloot
    gosub drag %items all %bagx %bagy C_ , %corpse
    }
    else
    goto start

    sub drag
    drag:
    if #contname = drag_gump
    goto waitfordraggumpx
    if #contname = stack_gump
    goto waitforstackgumpx
    finditem %1 %5
    if #findkind = -1
    return
    Event Drag #FindID
    waitforstackgumpx:
    set %dragtimeout #scnt + 5
    waitforstackgump:
    if #scnt >= %dragtimeout
    goto drag
    if #contname = drag_gump || #findstack < 2
    goto waitfordraggumpx
    if #contname <> stack_gump && #findstack > 1
    goto waitforstackgump
    if %2 = all
    msg $
    else
    msg %2 $
    goto waitfordraggumpx:
    set %dragtimeout #scnt + 5
    waitfordraggump:
    if #scnt >= %dragtimeout
    goto start
    if #contname <> drag_gump
    goto start
    click %3 %4 p
    if %2 = all
    goto drag
    else
    return

    autoloot:
    if %autoloot #true
    {
    set %autoloot #false
    event sysmessage AutoLoot Abriendo Desactivado.
    wait 5
    goto start
    }
    else
    set %autoloot #true
    event sysmessage AutoLoot Abriendo Activado.
    wait 5
    goto start

  12. #12

    Fecha de ingreso
    December-2009
    Edad
    38
    Mensajes
    82
    Reputacion: 10
    Poder de reputación
    15

    Respuesta: Macro de lotear

    De la primera va bien lo de cortar y tal pero por ejemplo no lotea plumas y la segunda en cambio si las lotea pero no corta el cuerpo. Alguien sabe como ace k aga las dos cosas digamos? Gracias

  13. #13

    Fecha de ingreso
    February-2010
    Mensajes
    436
    Reputacion: 10
    Poder de reputación
    15

    Respuesta: Macro de lotear

    Felicidades, una buena macro, gracias por la aportacion desinteresada, estaba buscando algo asi y los has clavado, la modifique pa que no hay ni que darle a la tecla
    que vaya loteando a saco to lo que encuentre y va de lujo.

    Muchas gracias

  14. #14

    Fecha de ingreso
    October-2009
    Edad
    39
    Mensajes
    47
    Reputacion: 10
    Poder de reputación
    15

    Respuesta: Macro de lotear

    Unas pequeñas modificaciones ,como equipar de nuevo un arma que portabas si no eres sword,que lotee cofres de dungeon y tesoros,añadidas unas pocas ids entre ellas plumas,sangre de dragon y muchos mas items de cadaver cortado.

    un saludo

    Código:
    ;;;;;;;;;;;;;EASYUO 1.5 version 148 --------client 2.0.3;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;
    ;;;;;;;;;ponte una bolsa/cofre en la mochila y mete aki su id
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    set %Cofre VBMXAQD
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    ;;;;;;;;;;añade la id del arma que quieras usar para cortar
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    set %daga MTF_POH_ZRF_NSF_KTF
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    ;;;;;;;;;;añade la id del arma que usas para combatir
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    set %Arma CUH
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    ;;;;;;;;;;;pon aqui la tecla que quieras usar para lotear
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    set %hotkey f3
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;;;;; Añade aqui la id de los objetos que quieras lotear
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    set %cosas LNK_RWF_KUF_VLK_QZF_FUF_LZF_DAG_OZF_EAG_FVF_BVF_RVF_VUF_OVF_NVF_POF_RZF_SZF_IUF_WZF_JUF_HUF_JZF_KZF_MZF_NWL_YUL_PUL_ZUL_KUF_XVH_TVH_KWI_CKF_OVF_GVF_AWF_GWF_BVF_EVF_WVF_FWF_DWF_NVF_KVF_CVF_VUF_FVF_YVF_MVF_QVF_ZVF_VVF_PVF_LVF_TVF_RVF_CWF_IVF_XVF_HVF_DVF_BWF_SVF_EWF_MWF_UVF
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;;;;; Añade aqui la id de los Contenedores que quieras lotear
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;
    set %container YFM_IIF_HIF_BUD_KIF_IKF_JIF
    
    
    Start:
    onhotkey %hotkey
    {
    wait 5
    event sysmessage Loteando.
    goto Encontrar
    }
    goto Start
    
    Encontrar:
    if #conttype <> %container
    {
    set %corpse #findid
    goto AbrirCuerpo
    }
    else
    goto Start
    AbrirCuerpo:
    finditem %daga C_ , #charid
    if #findkind = -1
    {
    finditem %daga C_ , #backpackid
    if #findkind = -1
    {
    event sysmessage No tienes arma para cortar
    }
    }
    set #LOBJECTID #FINDID
    event macro 17
    target
    finditem %container G_1
    set %corpse #findid
    ignoreitem #findid
    set #ltargetid %corpse
    event macro 22
    set #lobjectid %corpse
    event macro 17
    wait 10
    set %bucle si
    wait 5
    finditem %Arma C_ , #charid
    if #findkind = -1
    {
    finditem %Arma C_ , #backpackid
    if #findkind = -1
    {
    event sysmessage No tienes arma para equipar
    }
    }
    set #LOBJECTID #FINDID
    event macro 17
    wait 5
    event macro 23
    
    Lotear:
    while ( %bucle = si )
    {
    finditem %cosas C_ , %corpse
    if #findkind <> -1
    {
    Exevent Drag #findid #findstack
    wait 5
    Exevent Dropc %Cofre
    wait 5
    ignoreitem #findid
    }
    else
    set %bucle = no
    }
    event sysmessage Cuerpo Loteado
    goto Start

  15. #15

    Fecha de ingreso
    September-2009
    Mensajes
    314
    Reputacion: 10
    Poder de reputación
    15

    Respuesta: Macro de lotear

    Alguien me ayuda y me puede decir como se podría poner en esta macro para que metiera las cosas en una mochila??

    Gracias!!!

    Un saludo




    Cita Iniciado por afrodita Ver mensaje
    esta macro lotea todo menos las cajitas(creo), ademas es muy simple d configurar para k t lotee lo k kieras, t viene la id de algunos objetos como oro, pergas, joyas, etc, miratela, y para k lotee lo unico k tienes k acer es abrir el cuerpo y la macro t lo lotea todo, un placer

    ;==================================
    ; Script Name: AutoLoot
    ; Author: Tarain
    ; Version: 5.2
    ; Client Tested with: 2.0.3
    ; EUO version tested with: 1.5 Version 79
    ; Shard: Ultima Alianza
    ; Release: 02/04/08
    ; Purpose: AutoLoot
    ;==================================
    ; Ropa Magica: DCI_IWI_AWL_FWL_OVI_
    ; Armas: KPH_SOH_OMH_UMJ_ATF_JTF_EPH_ZRF_LSF_NSF_MPH_RMH_BS F_ZMJ_ANJ_KSF_YTH_WRH_QOD_SRH_PPF_SOD_YRH_MTF_VOH_ ZPF_CUH_YSF_VOH_ZPF_CUH_YSF_QMH_GFF_WTH_AUH_TOH_JS F_MMH_
    ; Escudos: CIK_ZHK_MIK_NIK_OIK_FIK_
    ; Bastones: QMH_GFF_ZPF_
    ; Armaduras: NJL_QJL_JKH_HKH_UKH_KKH_SKH_QKH_DLH_VKH_ELH_CSH_BS H_OSH_TSH_NSH_JSH_MSH_USH_ISH_KSH_HSH_LSH_WSH_
    ; Otros objetos: QWL_SWL_RWL_PWL (Runas) POF (Gold)
    ; WUF (Potis) IUD (Cajitas Trampa) CKF (Bolsas)
    ; LGG (Polvora Trans.) ZIM (Golems) TVH (Cheques)
    ; LNK_RWF (Virotes - Flechas) SJG_IJG_UJG_ (Joyas)
    ; ZLF (Vendas) XVH (Mapas) HVF (Tickets Torneo)
    ; FUL_NUL_GUL (Pergas Flame, Explo, Descarga) LZF_IUF (Alas,Ojos)
    ; HVF (Tickets Torneo) RZF_SZF_WZF_JUF_JZF_KZF_MZF_KUF (Regs)
    ;========================================
    set #sysmsgcol 096
    set %items GIK_JWI_GZH_TDI_BWI_NJL_QJL_JKH_HKH_UKH_KKH_SKH_QK H_DLH_VKH_ELH_CSH_BSH_OSH_TSH_NSH_JSH_MSH_USH_ISH_ KSH_HSH_LSH_WSH_QWL_SWL_RWL_PWL_DCI_IWI_AWL_FWL_OV I_KPH_SOH_OMH_UMJ_ATF_JTF_EPH_ZRF_LSF_NSF_MPH_RMH_ BSF_ZMJ_ANJ_KSF_YTH_WRH_QOD_SRH_PPF_SOD_YRH_MTF_VO H_ZPF_CUH_YSF_VOH_ZPF_CUH_YSF_QMH_GFF_WTH_AUH_TOH_ JSF_MMH_CIK_ZHK_MIK_NIK_OIK_FIK_QMH_GFF_ZPF_NJL_QJ L_JKH_HKH_UKH_KKH_SKH_QKH_DLH_VKH_ELH_CSH_BSH_OSH_ TSH_NSH_JSH_MSH_USH_ISH_KSH_HSH_LSH_WSH_QWL_SWL_RW L_PWL_POF_LGG_ZIM_TVH_SJG_IJG_UJG_HVF_DCI_IWI_AWL_ FWL_OVI_NJL_QJL_JKH_HKH_UKH_KKH_SKH_QKH_DLH_VKH_EL H_CSH_BSH_OSH_TSH_NSH_JSH_MSH_USH_ISH_KSH_HSH_LSH_ WSH_CIK_ZHK_MIK_NIK_OIK_FIK_KPH_SOH_OMH_UMJ_ATF_JT F_EPH_ZRF_LSF_NSF_MPH_RMH_BSF_ZMJ_ANJ_KSF_YTH_WRH_ QOD_SRH_PPF_SOD_YRH_MTF_VOH_ZPF_CUH_YSF_VOH_ZPF_CU H_YSF_QMH_GFF_WTH_AUH_TOH_JSF_MMH_QMH_GFF_ZPF_SJG_ IJG_UJG_HVF_FUL_NUL_GUL_ODI_MKH_PKH_DPH_RKH_WUF_WE D_BIK_NMH
    set %autoloot #true
    set %teclaloot HOME

    start:
    OnHotKey %teclaloot
    goto autoloot

    if %autoloot #true
    {
    mirando:
    if #conttype <> YFM
    {
    goto start
    }
    else
    set %corpse #contid
    finditem #backpackid
    set %bagx #findx + 140
    set %bagy #findy + 220
    if ( #findkind <> -1 && %corpse <> N/A && %corpse <> %backpack ) && %autoloot
    gosub drag %items all %bagx %bagy C_ , %corpse
    }
    else
    goto start

    sub drag
    drag:
    if #contname = drag_gump
    goto waitfordraggumpx
    if #contname = stack_gump
    goto waitforstackgumpx
    finditem %1 %5
    if #findkind = -1
    return
    Event Drag #FindID
    waitforstackgumpx:
    set %dragtimeout #scnt + 5
    waitforstackgump:
    if #scnt >= %dragtimeout
    goto drag
    if #contname = drag_gump || #findstack < 2
    goto waitfordraggumpx
    if #contname <> stack_gump && #findstack > 1
    goto waitforstackgump
    if %2 = all
    msg $
    else
    msg %2 $
    goto waitfordraggumpx:
    set %dragtimeout #scnt + 5
    waitfordraggump:
    if #scnt >= %dragtimeout
    goto start
    if #contname <> drag_gump
    goto start
    click %3 %4 p
    if %2 = all
    goto drag
    else
    return

    autoloot:
    if %autoloot #true
    {
    set %autoloot #false
    event sysmessage AutoLoot Abriendo Desactivado.
    wait 5
    goto start
    }
    else
    set %autoloot #true
    event sysmessage AutoLoot Abriendo Activado.
    wait 5
    goto start
    Última edición por Milower; 25-Oct-2011 a las 22:58
    "Un mago nunca llega tarde, ni pronto, llega exactamente cuando se lo propone"

    ////// Servicio de Veterinario //////

  16. #16

    Fecha de ingreso
    September-2009
    Mensajes
    314
    Reputacion: 10
    Poder de reputación
    15

    Respuesta: Macro de lotear

    Hace tiempo de este post, pero sigo sin tener una respuesta... alguien sabría modificar para que en vez de a la mochila, ponga los objetos en una bolsa que yo tenga en mi mochila?
    Intente modificarla, pero mis conocimientos no son muy avanzados y no lo consigo...

    Es la macro que está en mi anterior post

    Un saludo y gracias
    "Un mago nunca llega tarde, ni pronto, llega exactamente cuando se lo propone"

    ////// Servicio de Veterinario //////

  17. #17

    Fecha de ingreso
    March-2012
    Mensajes
    25
    Reputacion: 10
    Poder de reputación
    13

    Respuesta: Macro de lotear

    Alguien me podria pasar una macro para lotear en pvp. Me gustaria poder lotear el equipo, armas, regs, pergas, escudo, ropa magica, joyas etc...
    Si nadie la tiene alguien me podria decir como se ase.
    Gracias

Temas similares

  1. Macro lotear
    Por Satnev en el foro Macros
    Respuestas: 2
    Último mensaje: 07-Jun-2009, 13:36
  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 SS
    Por Shutterr en el foro Macros
    Respuestas: 2
    Último mensaje: 15-Jul-2008, 15:45
  4. Matar y lotear en heaven
    Por ardilos en el foro Dudas y Preguntas
    Respuestas: 9
    Último mensaje: 22-Feb-2008, 19:05
  5. 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