• Loginserver: illusions.com.br,2593
  • Ultima Online Custom
Hello There, Guest! Login Register


Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Magery + Meditation Easyuo
#1
Eai galera, beleza?
Venho aqui divulgar um macro do easyuo que treina Magery, Meditation e Evaluating Intelligence.

Quote:;===============================
; Script Name: Magery Completo
; Author: BleBla
; Version: 2.1
; Client Tested with: 6.0.1.7
; EUO version tested with: 1.5 158
; Shard OSI / FS:  Mystic Chaos Age
; Revision Date: N/A
; Public Release: 17/12/2009
; Global Variables Used: %manacost %spell
; Purpose: Treinar Magery com Meditation
;===============================

; Menu para saber a spell do treino
menu window magia
menu window size 157 75
menu window title Magia
menu show 400 400
menu font name Verdana
menu text text_a 10 5 Escolha a magia
menu text text_b 10 26 Spell:
menu combo create combo_1 50 22 100
menu combo add combo_1 Poison
menu combo add combo_1 Greater Heal
menu combo add combo_1 Paralyse
menu combo add combo_1 Energy Bolt
menu combo add combo_1 Invis
menu combo add combo_1 Flame Strike
menu combo add combo_1 Polymorph
menu combo add combo_1 Elemental
menu combo add combo_1 CANCELAR
menu button button_1 10 50 137 20 OK
repeat
  wait 2
until ( #MenuButton = button_1 )
menu hide
menu get combo_1
menu delete combo_1
menu delete text_a
menu delete text_b
menu delete button_1
if #menures = 9
{
  display ok Macro Finalizado!
  halt
}
if #menures = 1
{
  set %spell poison
  set %manacost 9
  goto pegar_target
}
if #menures = 2
{
  set %spell greaterheal
  set %manacost 11
}
if #menures = 3
{
  set %spell paralyze
  set %manacost 14
  goto pegar_target
}
if #menures = 4
{
  set %spell energybolt
  set %manacost 20
  goto pegar_target
}
if #menures = 5
{
  set %spell invis
  set %manacost 20
}
if #menures = 6
{
  set %spell flamestrike
  set %manacost 35
  goto pegar_target
}
if #menures = 7
{
  set %spell polymorph
  set %manacost 40
}
if #menures = 8
{
  set %spell elemental
  set %manacost 50
}

set %x1 #CHARPOSX
set %x2 #CHARPOSX - 1
goto painel

pegar_target:
set %x1 #CHARPOSX
set %x2 #CHARPOSX - 1
set #targcurs 1
event sysmessage Selecione o target para treinar.
while #targcurs = 1
  wait 1s
goto painel

painel:
menu window panel
menu window size 180 115
menu window title Panel
menu show 5 750
menu font name Verdana
menu font color BLUE
menu text text_1 10 5 Total casts:
menu text text_2 10 22 Erros:
menu text text_3 10 39 Acertos:
menu text text_4 10 56 Skill UP:
menu text text_5 10 73 Qtde acerto por UP:
menu text text_6 10 90 % de acertos:
menu font color BLACK
menu text text_7 95 5 0
menu text text_8 50 22 0
menu text text_9 70 39 0
menu text text_10 65 56 0 vezes
menu text text_11 146 73 0
menu text text_12 108 90 0%
set %casts 0
set %erros 0
set %acertos 0
set %skillup 0
set %skillup2 0
set %qtde 0
set %porcentagem 0
chooseSkill Mage
set %skill #skill
goto %spell

inicio:
goto %spell

; Magery (33~50)
poison:
wait 1s
if #mana < 9
  goto meditacao
set %mana #mana
event macro 15 19
target 6s
; Last Target
event macro 22
wait 10
gosub calculo
goto poison

; Magery (50~60)
greaterheal:
wait 1s
if #mana < 11
  goto meditacao
set %mana #mana
event macro 15 28
target 6s
event macro 23
wait 10
gosub calculo
goto greaterheal

; Magery (60~65)
paralyze:
wait 1s
if #mana < 14
  goto meditacao
set %mana #mana
event macro 15 37
target 6s
event macro 22
wait 10
gosub calculo
goto paralyze


; Magery (65~70)
invis:
wait 1s
if #mana < 20
  goto meditacao
set %mana #mana
event macro 15 43
target 6s
event macro 23
wait 10
gosub calculo
goto invis

; Magery (70~80)
energybolt:
scanjournal 1
if @PARA in #JOURNAL
{
  wait 5
  msg Pronto, parei! Big Grin $
  gosub pausa
}
wait 1s
scanjournal 1
if @PARA in #JOURNAL
{
  wait 2s
  msg Pronto, parei! Big Grin $
  gosub pausa
}
if #mana < 20
  goto meditacao2
set %mana #mana
event macro 15 41
target 6s
;Last Target
event macro 22
wait 10
gosub calculo
goto energybolt

; Magery (80~90)
flamestrike:
scanjournal 1
if @PARA in #JOURNAL
{
  wait 5
  msg Pronto, parei! Big Grin $
  gosub pausa
}
wait 1s
scanjournal 1
if @PARA in #JOURNAL
{
  wait 5
  msg Pronto, parei! Big Grin $
  gosub pausa
}
if #mana < 29; CASTAR APENAS UMA VEZ
{
  event macro 5 3
  event macro 5 3
  wait 4
  goto meditacao2
}
set %mana #mana
event macro 15 50
target 6s
;Last Target
event macro 22
wait 10
gosub calculo
goto flamestrike

; Magery (80~90)
polymorph:
move %x2 #CHARPOSY
wait 1s
if #mana < 30; CASTAR APENAS UMA VEZ
{
  event macro 5 3
  event macro 5 3
  wait 4
  goto meditacao
}
set %mana #mana
event macro 15 55
wait 6s
gosub calculo
goto polymorph


; Magery (90~100)
elemental:
wait 1s
if #mana < 50
{
  event macro 5 3
  event macro 5 3
  goto meditacao
}
set %mana #mana
event macro 15 59
target 6s
event macro 23
wait 10
gosub calculo
goto elemental


meditacao:
event macro 13 46
wait 2s
if ( #MANA > %manacost ) && ( %spell = elemental )  || ( %spell  = polymorph ) && ( #MANA > %manacost )
{
  event macro 5 7
  event macro 5 7
  goto %spell
}
else
  if ( #MANA = #maxmana )
  {
 goto %spell
  }
goto meditacao

meditacao2:
event macro 13 46
scanjournal 1
if @PARA in #JOURNAL
{
  wait 5
  msg Pronto, parei! Big Grin $
  gosub pausa
}
wait 2s
if ( #MANA > %manacost ) && ( %spell = flamestrike )
{
  event macro 5 7
  event macro 5 7
}
else
  if ( #MANA = #MaxMana )
  {
 goto %spell
  }
goto meditacao2

sub pausa
{
  repeat
 scanjournal 1
  until @INICIA in #JOURNAL
  wait 5
  msg Voltando a castar... Smile $
  return
}

sub calculo
{
  wait 2
  set %cast %cast + 1
  if ( #mana > %mana ) || ( #mana = %mana )
  {
 set %erros %erros + 1
 menu text text_8 50 22 %erros
  }
  else
  {
 set %acertos %acertos + 1
 menu text text_9 70 39 %acertos
  }
  set %casts %casts + 1
  menu text text_7 95 5 %casts
  chooseSkill Mage
  set %skillup #skill - %skill
  if ( %skillup = 1 )
  {
 menu delete text_10
 menu text text_10 65 56 %skillup vez
  }
  else
 menu text text_10 65 56 %skillup vezes
  if %skillup > %skillup2
 set %qtde %acertos / %skillup
  menu text text_11 146 73 %qtde
  set %skillup2 %skillup
  set %porcentagem ( %acertos * 100 ) / %casts )
  menu delete text_12
  menu text text_12 108 90 %porcentagem %
  return
}

OBS: é recomendado estar com o LRC (Lower Reagent Cost) acima de 100 para não gastar muita grana.
Bom macro!
 
Reply
  


Forum Jump:


Browsing: 1 Guest(s)