А дело все в том что все скрипты которые я тут нашел, скажем так не о4ень хороши, а именно кастуют магию один раз потом сразу медетруют до того момента когда хватет на каст! А мнеб очень хотелось бы увидеть профессиональный макрос !
А именно чтоб он медил до конца потом кастов на скоко хватет маны потом опать медел до конца!
Кто нибудь может дать хороший скрипт на Меджери?
Moderators: Murderator+, Murderator
-
- Expert!
- Posts: 1205
- Joined: 2004-04-04 11:13:54
- Location: Балаково, Саратовская обл.
- Contact:
Поправь число которое 200 на свое количество маны для второго варианта.
Code: Select all
sub magery()
VAR LastTimer
while NOT UO.Dead()
UO.DeleteJournal()
CheckLag()
while UO.Mana>=10
UO.Cast('Poison','0x400A8F68')
; UO.Cast('Bless','0x4006D332')
; UO.Cast('Poison','0x405D1397') ;Oskom
; UO.Cast('Fireball','0x405D1397') ;oskom
; UO.Cast('Fireball','0x4006D332')
; UO.Cast('Wall','0x4006E5C9')
; UO.Cast('Night','self')
; UO.Cast('Cure','self')
; UO.Cast('Telekinesis','self')
wait(3000)
wend
while UO.Mana<UO.Int
LastTimer=UO.Timer()
UO.UseSkill('Meditation')
repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose") OR UO.Timer()>LastTimer+200
UO.DeleteJournal()
wait(2000)
wend
wend
end sub
sub magmed()
VAR LastTimer
while NOT UO.Dead()
UO.DeleteJournal()
CheckLag()
If UO.Mana==200 then
; UO.Cast('Poison','0x4006D332')
; UO.Cast('Bless','0x4006D332')
; UO.Cast('Fireball','0x4006D332')
; UO.Cast('Wall','0x4006E5C9')
UO.Cast('Night','self')
; UO.Cast('Cure','self')
wait(6000)
else
while UO.Mana<200
LastTimer=UO.Timer()
UO.UseSkill('Meditation')
repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose") OR UO.Timer()>LastTimer+200
UO.DeleteJournal()
wait(2000)
wend
endif
wend
end sub
sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(500)
until UO.InJournal('backpack')
end sub
!!
sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(500)
until UO.InJournal('backpack')
end sub
Это схавать курицу или 4то??
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(500)
until UO.InJournal('backpack')
end sub
Это схавать курицу или 4то??
!!
Скрипт канечно неплохой, но опятьже он кастует один раз а потом сразу медитирует! А вот, чтоб он кастовал раз десять а потом медил, вот это был бы скрипт
Вот забацал прям щас вроде должен работать
Code: Select all
sub magery()
while not uo.dead()
if uo.mana<20 then
while uo.mana<uo.int
re:
uo.deletejournal()
uo.useskill("Meditation")
while 1
if uo.injournal("Несмог сконцентрироваться") then
goto re
endif
if uo.injournal("Ура я сконцентрировался!!!!") then
goto ex
endif
wait(200)
wend
ex:
wend
endif
uo.cast("XXXXXXXXXXXX")
wait(1000)
wend
endsub
Я где то рядом... 

-
- Expert!
- Posts: 1205
- Joined: 2004-04-04 11:13:54
- Location: Балаково, Саратовская обл.
- Contact:
Re: !!
AD wrote:Скрипт канечно неплохой, но опятьже он кастует один раз а потом сразу медитирует! А вот, чтоб он кастовал раз десять а потом медил, вот это был бы скрипт
Если ты внимательно посмотришь, то там два скрипта один на прокачку медитации с магией другой просто магии.