Боевые касты!
Posted: 2006-03-17 19:53:40
Я конешно понимаю что то что я прошу легко но я неумею!
Скиньте плз скрипты на боевые касты!
Скиньте плз скрипты на боевые касты!
Code: Select all
uo.Cast('magic arrow','laststatus')Page 1 of 1
Posted: 2006-03-18 06:23:36
Posted: 2006-03-18 11:57:39
А мона скрипт, чтоб чар кастовал сл свитка, если нет, то с книги? А то мой не работает 
Code: Select all
sub Paralyze()
UO.Set('lasttarget','laststatus')
UO.FindType('0x1F52',-1,'my')
If UO.GetQuantity('finditem')>0 then
UO.Say("StoP! No smoKinG!")
if UO.Mana>=14 then
UO.WaitTargetObject('laststatus')
UO.UseObject('finditem')
else
UO.Print("No mana")
endif
else
if UO.Mana>=1 then
UO.Cast('Paralyze','laststatus')
else
UO.Print("No mana")
endif
endif
end sub Posted: 2006-03-18 13:23:23
Code: Select all
sub Paralyze()
UO.Set('lasttarget','laststatus')
UO.FindType('0x1F52',-1,'backpack')
If UO.GetQuantity('finditem')>0 then
if UO.Mana>=14 then
UO.WaitTargetObject('lasttarget')
UO.UseObject('finditem')
UO.Print("Cast Scroll!!!")
else
UO.Print("Low mana!!! Scroll!")
endif
else
if UO.Mana>=28 then
UO.Cast('Paralyze','laststatus')
wait(160)
UO.Print("Spell")
else
UO.Print("Low mana!!! Spell!")
endif
endif
end sub Posted: 2006-03-18 16:59:03
Спасибо 