Каст со скрола
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:Я бы сказал даже, что и смертельно опасно
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