Проблема в том что вот по этим скриптам я сделал так чтоб он всегда брал в руку при касте Spellbookу. А получилось как-то.
Получилось так
1каст Одел
2каст Снял
3каст Одел
4каст Снял и т.д. и .т.п
Сделай плиз проверку на спулбуку если есть в руке пусть кастуеи а если нету пусть берёт....
Большое Спасибо
Code: Var SpellBook='0x0EFA'
Var waitaftercast=500
sub CastBless() ; Кастуем на себя Bless.
if Uo.Mana>=9 Then
UO.Cast('Bless','self')
Else
UO.Print(" N O M A N A ")
Endif
wait(waitaftercast)
UO.Equipt('Rhand',SpellBook)
end sub
sub CastRArmor() ; Кастуем на себя Reactive Armor.
if Uo.Mana>=4 Then
UO.Cast('Reactive Armor','self')
Else
UO.Print(" N O M A N A ")
Endif
wait(waitaftercast)
UO.Equipt('Rhand',SpellBook)
end sub
sub CastProtect() ; Кастуем на себя Protect.
if Uo.Mana>=6 Then
UO.Cast('Protection','self')
Else
UO.Print(" N O M A N A ")
Endif
wait(waitaftercast)
UO.Equipt('Rhand',SpellBook)
end sub
sub CastStr() ; Кастуем на себя Strength.
if Uo.Mana>=6 Then
UO.Cast('Strength','self')
Else
UO.Print(" N O M A N A ")
Endif
wait(waitaftercast)
UO.Equipt('Rhand',SpellBook)
end sub
sub CastInt() ; Кастуем на себя Cunning.
if Uo.Mana>=6 Then
UO.Cast('Cunning','self')
Else
UO.Print(" N O M A N A ")
Endif
wait(waitaftercast)
UO.Equipt('Rhand',SpellBook)
end sub
sub CastDex() ; Кастуем на себя Agility.
if Uo.Mana>=6 Then
UO.Cast('Agility','self')
Else
UO.Print(" N O M A N A ")
Endif
wait(waitaftercast)
UO.Equipt('Rhand',SpellBook)
end sub
sub CastMagReflect() ; Кастуем на себя Magic Reflection.
if Uo.Mana>=14 Then
UO.Cast('Magic Reflection','self')
Else
UO.Print(" N O M A N A ")
Endif
wait(waitaftercast)
UO.Equipt('Rhand',SpellBook)
end sub
|