Каст со скрола
Posted: 2006-02-21 02:23:53
Дайте пожалуйста скрипт => каст со скрола , а если скрол не найдено => каст с книги
Mr. Gluk wrote:Дайте пожалуйста скрипт => каст со скрола , а если скрол не найдено => каст с книги
Code: Select all
sub paralyze()
UO.Set('lasttarget','laststatus')
UO.FindType('0x1F52',-1,'my')
If UO.GetQuantity('finditem')>0 then
if UO.Mana>=14 then
UO.WaitTargetObject('lasttarget')
UO.UseObject('finditem')
UO.Print("Scroll")
else
UO.Print("ДОЛБОЕБ МАНУ ПЕЙ")
endif
else
if UO.Mana>=28 then
UO.Cast('Paralyze','laststatus')
UO.Print("Spell")
else
UO.Print("ДОЛБОЕБ МАНУ ПЕЙ")
endif
endif
end subАга, на дрв медитировать в Окло...LordTom wrote:Эта крутаCode: Select all
UO.Print("ДОЛБОЕБ МАНУ ПЕЙ")
Сам себя как говориться не похвалиш никто не похвалит
лол.
А не проще вместо матюгов написатьили на худой конецCode: Select all
uo.usetype('Type manki')Или вообще вот так:Code: Select all
uo.useskill('Meditation')Code: Select all
uo.findtype('Type manki','Color manki','backpack') if uo.findcount() > 0 then uo.usetype('Type manki') wait(1000) else uo.useskill('Meditation') wait(1000) endif
но автолут же - святое дело. я не прав? =)Savage wrote:Я бы сказал даже, что и смертельно опасно
[/code]sub magery()
## Сундук
##
VAR sund=0x404A7EE4
VAR enemyPRScroll=1 ##Paralyze Scroll
uo.exec('addobject Body')
wait(2500)
while not uo.dead()
##Paralyze Scroll
##
If enemyPRScroll <> 0 then
UO.FindType(0x1F52,-1,'backpack')
If UO.GetQuantity('finditem')<5 then
UO.FindType(0x1F52,'0x0000',sund)
wait(1000)
UO.Grab('15','finditem')
wait(2000)
Endif
Endif
##Начинаем
##
if uo.mana >15 then
UO.WaitTargetObject('lasttarget')
UO.UseObject('finditem')
UO.Print("Scroll")
wait(6000)
UO.WaitTargetObject('Body')
UO.useskill("Anatomy")
wait(4000)
else
while UO.Mana<UO.Int
UO.Useskill("Meditation")
wait(3000)
wend
endif
wend
end sub