[MACRO] Veterinaria (2 y 4 animales)

[Aloisia]

Os dejo dos macros para subir veterinaria. La primera para usar con dos animales, y la segunda para usar con cuatro animales. Al iniciar la macro te pide que configures los animales a curar. No es necesario tener después las vidas de los mismos sacadas.

Sí que hay que tener en cuenta que tienes que estar pegados a ellos para poder curarlos.

MACRO CON CUATRO ANIMALES

;==================================
; Script: Veterinaria (4 animales)
; Autor: Aloisia
; Version Easyuo: 1.5, 148
; Version: 1.0
; Cliente: 2.0.3
; Fecha del script: 12 Febrero 2010
; Finalidad: Cura a 4 animales diferentes que se pegan entre sí.
;==================================
;Para la siguiente macro necesitas:
;1.- Cuatro animales que se estén pegando entre sí (lo mejor es dos grupos de 1vs1)
;2.- Vendas en la mochila (unas 500, dependiendo de lo que falles)
;3.- Un pilón de agua y comida (peras o manzanas, si quieres otro tipo añadelo en set %comida).
set %vendas ZLF
set %sucias AMF
set %pilon WEE_TEE_VEE_QEE
set %confp 1
set %comida YSD_QQD ;Peras, Manzanas

initevents
chooseskill vete real
set %skillini #skill

configurar:
if %confp = 1
{
  event macro 13 30
  TARGET
	Event sysmessage Selecciona animal 1.
	event sysmessage Y presiona la tecla ESC.
	set %conf 1
	set %confp 2
	goto TESC
}
if %confp = 2
{
  event macro 13 30
  TARGET
	Event sysmessage Selecciona animal 2.
	event sysmessage Y presiona la tecla ESC.
	set %conf 2
	set %confp 3
	goto TESC
}
if %confp = 3
{
  event macro 13 30
  TARGET
	Event sysmessage Selecciona animal 3.
	event sysmessage Y presiona la tecla ESC.
	set %conf 3
	set %confp 4
	goto TESC
}
if %confp = 4
{
  event macro 13 30
  TARGET
	Event sysmessage Selecciona animal 4.
	event sysmessage Y presiona la tecla ESC.
	set %conf 4
	goto TESC
}

TESC:
onHotKey ESC
{
	if %conf = 1
	{
		set %animal1 #LTARGETID
		goto configurar:
	}
	if %conf = 2
	{
		set %animal2 #LTARGETID
		goto configurar:
	}
	if %conf = 3
	{
		set %animal3 #LTARGETID
		goto configurar:
	}
	if %conf = 4
	{
		set %animal4 #LTARGETID
		goto inicio
	}
 }
goto TESC

inicio:
set %skillinc #SKILL - %skillini
setuotitle Veterinaria: #SKILL ( %skillinc )
findItem %comida C_ , #BACKPACKID
if #findcnt > 0
{
   set #LOBJECTID #FINDID
   event macro 17
}
findItem %sucias C_ , #BACKPACKID
if #findstack > 100
{
   GoSub limpiarvendas
}
findItem %vendas C_ , #BACKPACKID
set #LOBJECTID #FINDID
wait 10
event macro 17
wait 10
TARGET
wait 10
set #LTARGETID %animal1
event macro 22
wait 6s
event macro 17
wait 10
TARGET
wait 10
set #LTARGETID %animal2
event macro 22
wait 6s
event macro 17
wait 10
TARGET
wait 10
set #LTARGETID %animal3
event macro 22
wait 6s
event macro 17
wait 10
TARGET
wait 10
set #LTARGETID %animal4
event macro 22
wait 6s
GoTo inicio:

Sub limpiarvendas
findItem %sucias C_ , #BACKPACKID
set #LOBJECTID #FINDID
wait 10
event macro 17
wait 10
finditem %pilon c_ , #BACKPACKID
set #LTARGETID #findid
event macro 22 0
wait 1s
return

MACRO CON DOS ANIMALES

;==================================
; Script: Veterinaria (2 animales)
; Autor: Aloisia
; Version Easyuo: 1.5, 148
; Version: 1.0
; Cliente: 2.0.3
; Fecha del script: 12 Febrero 2010
; Finalidad: Cura a 2 animales diferentes que se pegan entre sí.
;==================================
;Para la siguiente macro necesitas:
;1.- Dos animales que se estén pegando entre sí.
;2.- Vendas en la mochila (unas 500, dependiendo de lo que falles)
;3.- Un pilón de agua y comida (peras o manzanas, si quieres otro tipo añadelo en set %comida).
set %vendas ZLF
set %sucias AMF
set %pilon WEE_TEE_VEE_QEE
set %confp 1
set %comida YSD_QQD ;Peras, Manzanas

initevents
chooseskill vete real
set %skillini #skill

configurar:
if %confp = 1
{
  event macro 13 30
  TARGET
	Event sysmessage Selecciona animal 1.
	event sysmessage Y presiona la tecla ESC.
	set %conf 1
	set %confp 2
	goto TESC
}
if %confp = 2
{
  event macro 13 30
  TARGET
	Event sysmessage Selecciona animal 2.
	event sysmessage Y presiona la tecla ESC.
	set %conf 2
	goto TESC
}

TESC:
onHotKey ESC
{
	if %conf = 1
	{
		set %animal1 #LTARGETID
		goto configurar:
	}
	if %conf = 2
	{
		set %animal2 #LTARGETID
		goto inicio
	}
 }
goto TESC

inicio:
set %skillinc #SKILL - %skillini
setuotitle Veterinaria: #SKILL ( %skillinc )
findItem %comida C_ , #BACKPACKID
if #findcnt > 0
{
   set #LOBJECTID #FINDID
   event macro 17
}
findItem %sucias C_ , #BACKPACKID
if #findstack > 100
{
   GoSub limpiarvendas
}
findItem %vendas C_ , #BACKPACKID
set #LOBJECTID #FINDID
wait 10
event macro 17
wait 10
TARGET
wait 10
set #LTARGETID %animal1
event macro 22
wait 6s
event macro 17
wait 10
TARGET
wait 10
set #LTARGETID %animal2
event macro 22
wait 6s
GoTo inicio:

Sub limpiarvendas
findItem %sucias C_ , #BACKPACKID
set #LOBJECTID #FINDID
wait 10
event macro 17
wait 10
finditem %pilon c_ , #BACKPACKID
set #LTARGETID #findid
event macro 22 0
wait 1s
return

[mongusensei]

Lo primero, te agradezco el aporte. Pero aprovecho a plantear una duda que me ha surgido a la hora de macrear vet con anterioridad. No importa cómo pongas los bichos o dónde, domados o sin domar, me desaparecen al poco rato ( pongamos 1 o 2 horas ) y así no hay forma de subirla a 100 con eficacia. No sé si a alguien más le ha pasado, pero he probado en ciudad y fuera de la misma, con animales comprados o domados y desaparecen rápido.

Muchas gracias de antemano.

Un saludo.

[Aloisia]

Yo he estado noches y noches macreando con los mismos bichos. Sí es cierto (según tengo entendido) que los bichos por ahi sueltos pueden desaparecer, pero no lo hacen siempre.

Yo lo que hacía era tamear cuatro osos (usando .conservar), me iba a una zona de guardias donde no hubiese nadie (hay muchas casas por ahí que nadie visita), y ponia los osos en parejas uno frente a otro, de la siguiente forma:

Oso A --- Oso B
YO
Oso C --- Oso D

Luego decia: A kill; y targeteaba al Oso B. Lo mismo hacía para el Oso C: C kill; y targeteaba el Oso D. Posteriormente ponía la macro a funcionar, e iba de perlas.

Pd.- Entre el Oso A y el Oso B no hay espacios, estan frente a frente; lo mismo pal Oso C y D. De tal forma que tu estás entre A y C, y en diagonal tienes a B y D.

[Wili]

Muchas gracias por la macro Aloisia!
El titulo ta mal jeje el de curar a dos animales es el de curar a 4 y viceversa :P

Yo si toy por aqui por el pc macreo en mi casa, cada hora te subes y te bajas de los osos y yasta jeje

[mongusensei]

Gracias por la ayuda, pero nada no hay manera de que funcione nada.... supongo que lo subiré a puro músculo....

Un saludo.

[Aloisia]

Mongusensei y no será que te mata los osos algún jugador "gracioso"?

Yo siempre lo macree en alguna ciudad en zona alejada del paso habitual de la gente.

[mongusensei]

Sí ya se me había ocurrido, pero he probado ya en un montón de sitios. Supongo que le daré un intento más en algún lugar perdido de la mano de Dios a ver si funciona. Ahora que sale el tema, no existe ningún programa o algo que almacene los logs dmás tiempo que el diario del UO? De ese modo si me matase alguien/algo podría verlo.

Gracias de nuevo.

Un saludo.

[kidpunk]

mongu quiza lo q t pasa es q s matan los osos entre ellos xD, a mi al principio m pasava, lo hacia con 4 panteras y si fallaba alguna curando, sobretodo cuando tenia la skill por debajo dl 50, cuando volvia a curar a esa bestia ya tava casi muerta, si da la p... casualidad q vuelves a fallar, cuando vuelvas a curarla ya tara muerta. Quiza es eso lo q t pasa y al morir un oso, el otro como ya no es tuyo (pq los has hecho pegarse entre ellos) s pira porai d fiesta y a vivir la vida.

Una pregunta que me surge. El Animal lore, sirve para curar mas en cada cura? si es que si tb puede ser eso q cures poco i no t de tiempo a curar bien los 4 bichos

[mongusensei]

Sí, el animal lore sirve para calcular la cantidad de vida que curas por vendazo, y lo tengo a 100. No es que palmen, ya que he llegado a quedarme mirando a ver qué pasaba, y es que sencillamente los bichos desaparecen, así sin más. No palman, no me los matan, desaparecen.

Seguiré haciendo pruebas....

Gracias a todos.

[kidpunk]

Has probado de darles comida? normalmente desaparecen pq se quedan sin comida, pero es raro pq en teoria si no recuerdo mal cuando tameas un mob empieza con 50 d comida, i normalmente te dura 1dia sin alimentarlo

[Milower]

Pones .consevar al animal que domas? puede que sea por eso...

Un saludo

[Zaraky]

El pilon de agua lo tienes q tener en la moxila? o si estas al lado del mar el solo te lava las vendas? eske no tengo ni idea de usar el easy xD

Asiaaas

[Milower]

Pilon de agua en la mochila

Un saludoo

[thefalcon]

tambien puede estar al lado no hace falta que lo lleves encima .

1 saludo

[Suse]

Los bichos desaparecen al morir de hambre.

[Krender]

Cuantas vendas aconsejais dejar para toda una noche con 2 panteras? Tengo 52 de veterinaria.

[ImVeRsO]

Te aconsejaria unas 1500 por lo menos, probablemente te sobren, pero no dan muxo pesoy asi te aseguras de k no dejas macreando pa na xD

[Krender]

Gracias imverso, pero con 56 de veterinaria, se me matan los leopardos, o soy muy malo o la macro no me funciona bien xD

[ImVeRsO]

Eske yo cojeria otra cosa, las panteras se meten unas galleticas elegantescon k fallas un par de veces va al suelo una fijo, yo lo subi con caballos, pero sk mi macro funcionaba completamente diferente a esta

[Draven]

Eske yo cojeria otra cosa, las panteras se meten unas galleticas elegantescon k fallas un par de veces va al suelo una fijo, yo lo subi con caballos, pero sk mi macro funcionaba completamente diferente a esta

yo e probado con 68 vet y 4 osos, y como cuadre mal falles una, te cuadre save, alguna mascota morira.

lo mismo ocurre con 2 panteras. como cuadre mal un fallo, un save y otro fallo, las jodio, lo mas ocurrente serian dejarte 3 ks en 2 osos pardos y a rezar. De todos modos te digo que veterinary es horribleeee subirlooo xD