con la macro andando, hacele doble click al pico y un click al suelo (rapidito)
con la macro andando, hacele doble click al pico y un click al suelo (rapidito)
esa es la solucion ? esque ya lo probe y me hace lo mismo de antes
Mmmmmmmm ahora la vere, si esque con que mine me vale, si recalea ya de pm, pero si no lo hace no me importa XD
Edit: Vale ya l probe y va de pm XD asias tio xD
Última edición por Cotropiloscas; 21-Jul-2008 a las 23:57
Vale, probe la de boxer, pero en la mina en la que estoy(jujuju esta vacia, y llenita llenita ^^) hay estalactitas de esas y se queda enganchado en ellas todo el rato diciendo que no ve el objetivo, y no se desengancha no se porke u.u lo deje unas 2 horas y se quedo hora y media asi
; Macro by Alex (Ultima Alianza) ||| Modificación por PitonisA para sphere 0.56b-Nightly
; Para Minar en Minas preestablecidas de forma sencilla, moviendose solo.
; Esta macro no guarda, ni funde el mineral.
; Para usar la macro debemos dirigirnos a una de las minas preestablecidas
; y cambiar el valor lugar en el script segun la Mina escogida.
; Debes configurar las posiciones de las minas de tu libro de runas (más abajo), el runebook y la posicion del contenedor donde dejar los minerales (cuando inicies la macro).
; Recuerda llevar muchos regs de Recall (Mandrake Root, Blood Moss, Black Pearl)
; Las Minas actuales son:
; 0- Ninguna (Mina solo igual, pero si se sale de dentro de la mina no se volverá a meter, deberás moverlo tu)
; 1- Shame (Norte de la entrada Shame (Trabajos Forzados))
; 2- Covetous 1 (Primera Mina a la derecha de la Dungeon Covetous)
; 3- Covetous 2 (Segunda Mina a la derecha de la Dungeon Covetous)
; 4- Covetous 3 (De las dos minas juntas en Covetous Norte, la de arriba)
; 5- Covetous 4 (De las dos minas juntas en Covetous Norte, la de abajo, meterse bien adentro antes de iniciar la macro)
; 6- Minoc Ciudad 1 (La mina que hay al Este de Minoc, pasando el puente)
; 7- Minoc Ciudad 2 (La mina al lado de la que hay pasando el puente de Minoc)
; 8- Minoc Mina 1 (De las Minas del Norte de Minoc, la primera de la izquierda abajo)
; 9- Minoc Mina 2 (De las Minas del Norte de Minoc, la de la izquierda donde hay dos (Haven))
; 10- Minoc Mina 3 (De las Minas del Norte de Minoc, la de la derecha donde hay dos (Haven))
; 11- Destard 1 (Un poco a la izquierda de La Dungeon Destard)
; 12- Destard 2 (Desde la entrada de Destard Dungeon bajando bordeando, la primera mina que encuentras)
; 13- Destard 3 (Desde la entrada de Destard Dungeon bajando bordeando, la segunda mina que encuentras)
; 14- Destard 4 (Desde la entrada de Destard Dungeon bajando bordeando, la terera mina que encuentras, en la de la parte derecha de la montaña)
; 15- Wrong 1 (Junto a la entrada de la Dungeon de Wrong)
; 16- Wrong 2 (Bordendo la montaña desde la entrada de Wrong hacia la izquierda, la primera que encuentras)
; 17- Wrong 3 (Bordendo la montaña desde la entrada de Wrong hacia la izquierda, la segunda que encuentras)
; 18- Hythloth 1 (Bordeando la montaña, hacia arriba desde Hythloth, la primera que encuentras)
; 19- Hythloth 2 (Bordeando la montaña, hacia abajo derecha de Hythloth, la primera Mina que encuentras)
; 20- Hythloth 3 (Bordeando la montaña, hacia abajo derecha de Hythloth, la segunda Mina que encuentras)
; 22- Avatar Norte 1 (De la montaña del Norte de Avatar, la primera que encuentas)
; 23- Avatar Norte 2 (De la montaña del Norte de Avatar, desde la primera, a la derecha bordeando, la primera que encuentras)
; 24- Desierto (En el cruce de caminos)
; 25- Shame Sur
; -------------------
set %lugar 12
; -------------------
; Ahora configura las posiciones de las runas del libro de runas:
; Pon en el valor de %runacasa el hueco donde tengas la runa que te llevara al cofre para guardar los minerales (1-16)
; Pon en el valor de %runamina el hueco donde tengas la runa que te llevara dentro de la mina (1-16)
;--------------------
set %runacasa 1
set %runamina 2
;--------------------
initevents
chooseskill mini
set %skillini #skill
set %locs LOCATIONS_PISADAS
set %borrado 0
event sysmessage Iniciando Macro
gosub lugares
configurar:
if %confp = 1 || %confp = N/A
{
event sysmessage Vas a minar gracias a la modificacion de PitonisA .Porfavor, no me mates a mi minero ( PitonisA ) Gracias .
event sysmessage Debes estar en el punto donde apareces cuando haces recall a tu casa, manten el cursor encima de la bolsa/contendor donde dejar los minerales y presiona ESC.
event sysmessage Y presiona la tecla ESC
setuotitle Manten el cursor encima del contenedor donde dejar los minerales y presiona ESC
set %conf 1
set %confp 2
goto TESC
}
if %confp = 2
{
setuotitle Abre el Runebook donde tengas las runas a tu casa y a la mina y presiona ESC
event sysmessage Abre el runebook donde tengas las runas y presiona ESC
event sysmessage Y presiona la tecla ESC
set %conf 2
goto TESC
}
TESC:
onHotKey ESC
{
if %conf = 1
{
set %cofrex #CURSORX
set %cofrey #CURSORY
set %dondecasax #CHARPOSX
set %dondecasay #CHARPOSY
set %dondeminax 0
goto configurar
}
if %conf = 2
{
set %runebook #LOBJECTID
goto recallmina
}
}
goto TESC
comienzo:
findItem NPF
if #FINDSTACK = 0
{
findItem QPF
}
set #LOBJECTID #FINDID
set %cmsg #jIndex
event macro 17
wait 10
set %fmsg #jIndex
for %i %cmsg %fmsg
{
scanJournal %i
if where_do_you_want in #journal
{
set %seguridad 0
goto acabapicar
}
}
goto comienzo
acabapicar:
set %cmsg #jIndex
set #LTARGETX #CHARPOSX + 1
set #LTARGETY #CHARPOSY - 1
event macro 22
wait 10
set %fmsg #jIndex
for %i %cmsg %fmsg
{
scanJournal %i
if You_put in #journal || No_encuentras in #journal
{
set %skillinc #SKILL - %skillini
setuotitle Skill de Mining | Inicial: %skillini | Actual: #SKILL | Incremento: %skillinc | Peso: #WEIGHT
gosub compruebapeso
goto comienzo
}
if Aqui_no_hay_nada_por in #journal || Prueba_a in #journal
{
gosub compruebapeso
goto moverse
}
if you_have_no_line_of_sight in #journal
{
gosub compruebapeso
goto moverse
}
if You_cannot_mine_so_close_to_yourself in #journal
{
gosub compruebapeso
goto moverse
}
if You_can`t_see_the_target in #journal
{
gosub compruebapeso
goto moverse
}
if Comienza_la_grabacion_del_mundo in #journal
{
wait 120s
}
if No_puedes_ver_bien_tu_objetivo in #journal
{
gosub compruebapeso
goto moverse
}
}
gosub seguridad
goto acabapicar
moverse:
if %lugar > 0
{
if #CHARPOSX , _ , #CHARPOSY notIn %locs
{
set %borrado %borrado + 1
if %borrado > 100
{
set %locs LOCATIONS_PISADAS
set %borrado 0
}
set %locs %locs , _ , #CHARPOSX , _ , #CHARPOSY
}
if %lugar = 5
{
if %lugaro > #CHARPOSX
{
for %i 1 6
{
event macro 5 3
wait 10
}
}
}
if %lugarp = X
{
if %lugaro < #CHARPOSX
{
for %i 1 6
{
event macro 5 7
wait 10
}
}
}
if %lugarp = Y
{
if %lugaro < #CHARPOSY
{
for %i 1 6
{
event macro 5 1
wait 10
}
}
}
}
set %mover #random % 7
event macro 5 %mover
wait 20
event macro 5 %mover
wait 20
if #CHARPOSX , _ , #CHARPOSY in %locs
{
goto moverse
}
goto comienzo
recallcasa:
set %posruna %runacasa
gosub librecall
set #LOBJECTID %runebook
event macro 17
wait 20
click %runex %runey f
event macro 13 46
wait 10s
event macro 13 46
msg .resend $
wait 10
if #CHARPOSX = %dondecasax && #CHARPOSY = %dondecasay
{
goto dejarminerales
}
else
{
event macro 13 46
goto recallcasa
}
recallmina:
set %posruna %runamina
gosub librecall
set #LOBJECTID %runebook
event macro 17
wait 20
click %runex %runey f
event macro 13 46
wait 10s
event macro 13 46
msg .resend $
wait 10
if %dondeminax = 0
{
if #CHARPOSX <> %dodnecasax && #CHARPOSY <> %dondecasay
{
set %dondeminax #CHARPOSX
set %dondeminay #CHARPOSY
}
}
if #CHARPOSX = %dondeminax && #CHARPOSY = %dondeminay
{
event macro 13 46
goto comienzo
}
else
{
goto recallmina
}
dejarminerales:
set %v1 %v1 + 1
if %v1 > 12
{
set %v1 0
goto recallmina
}
finditem TVJ c_ , #BACKPACKID
if #FINDSTACK = 0
{
findItem GWJ C_ , #BACKPACKID
if #FINDSTACK = 0
{
findItem EWJ C_ , #BACKPACKID
if #FINDSTACK = 0
{
findItem DWJ C_ , #BACKPACKID
if #FINDSTACK = 0
{
goto recallmina
}
}
}
}
event drag #FINDID
wait 20
KEY ENTER
wait 10
click %cofrex %cofrey p
goto dejarminerales
sub librecall
{
if %posruna < 9
{
set %runex 130
if %posruna = 1
{
set %y 0
}
else
{
set %runea %posruna - 1
set %y 15 * %runea
}
set %runey 70 + %y
}
if %posruna > 8
{
set %runex 290
if %posruna = 9
{
set %y 0
}
else
{
set %runea %posruna - 9
set %y 15 * %runea
}
set %runey 70 + %y
}
return
}
sub seguridad
{
set %seguridad %seguridad + 1
if %seguridad > 15
{
set %seguridad 0
goto comienzo
}
return
}
sub lugares
{
if %lugar = 1
{
set %lugaro 1460
set %lugarp Y
}
if %lugar = 2
{
set %lugaro 2454
set %lugarp X
}
if %lugar = 3
{
set %lugaro 914
set %lugarp Y
}
if %lugar = 4
{
set %lugaro 828
set %lugarp Y
}
if %lugar = 5
{
set %lugaro 2355
set %lugarp X
}
if %lugar = 6
{
set %lugaro 499
set %lugarp Y
}
if %lugar = 7
{
set %lugaro 2602
set %lugarp X
}
if %lugar = 8
{
set %lugaro 2426
set %lugarp X
}
if %lugar = 9
{
set %lugaro 2440
set %lugarp X
}
if %lugar = 10
{
set %lugaro 66
set %lugarp Y
}
if %lugar = 11
{
set %lugaro 266
set %lugarp Y
}
if %lugar = 12
{
set %lugaro 1259
set %lugarp X
}
if %lugar = 13
{
set %lugaro 2729
set %lugarp Y
}
if %lugar = 14
{
set %lugaro 2895
set %lugarp Y
}
if %lugar = 15
{
set %lugaro 1991
set %lugarp X
}
if %lugar = 16
{
set %lugaro 1499
set %lugarp X
}
if %lugar = 17
{
set %lugaro 1941
set %lugarpX
}
if %lugar = 18
{
set %lugaro 1918
set %lugarp X
}
if %lugar = 19
{
set %lugaro 3822
set %lugarp Y
}
if %lugar = 20
{
set %lugaro 4766
set %lugarp X
}
if %lugar = 21
{
set %lugaro 4817
set %lugarp X
}
if %lugar = 22
{
set %lugaro 3302
set %lugarp Y
}
if %lugar = 23
{
set %lugaro 4554
set %lugarp X
}
if %lugar = 24
{
set %lugaro 1812
set %lugarp X
}
if %lugar = 25
{
set %lugaro 1695
set %lugarp Y
}
return
}
sub compruebapeso
{
if #WEIGHT > 380
{
goto recallcasa
}
return
}
--------------------------------------------------------------------------------------------------------
De nada
Un saludo
¿Volverá a ser Ua como era antes?
Asias tio ^^ ahora enseguidita la pruebo :P
Edit:Me cawen la mar tio, va de lujo xD muchisimas asias xD
Última edición por Cotropiloscas; 26-Jul-2008 a las 04:44
up
Buenas tengo un problema con la macro de talar cuando le doy a play a la macro me sale la configuracion sigo los puntos que me da a seguir alx pero cuando le doy P.camino y luego a Banco mi personaje dice bank sale mi banco, luego le doy a aceptar y de repente la pantalla de configuracion se queda sin nada ( osea que no me deja hacer el camino desde el banco hasta el bosque :S ) el tema es que cuando abro el Easy UO me da este error:
Invalid Path
The following paths are invalid: scr, lib,tmp, exe, dat
Please go to Tools-Options-Path and correct them or scripts might break!
Alguien puede decirme como puedo configurar de tal manera que no me de ese error? es que me voy a donde me manda en Tools-Options-Path pongo la carpeta donde me he bajado las macros de alex y me deja de dar el error el tema es que no se si esta bien hecho 0_o alguien puede ayudarme? no entiendo por que no me deja.
Rogaria que me lo explicaran paso a paso porque tengo la skill de informatica a 0 xD
He mirado otras macros de talar y tampoco me funcionan o me funcionan a medias :S
Última edición por Elfrod19; 29-Jan-2009 a las 21:56