Yoko

Есть ли у кого нить скрипт, чтобы при касте, я не нажимал доп. кнопку чтобы залезть?

sub horse() 
Var hrsT, hrsC 
hrsT = "0x00C8" # тип зверька 
hrsC = "0x0000" # его цвет 

UO.Set("finddistance", "4") 
UO.FindType(hrsT, hrsC, "ground") 
If UO.FindCount() > 0 Then 
UO.UseFromGround(hrsT) 
End If 
end sub

Sub FlameStrike() ; кидание флеймстрайка по последнему статусу 
UO.Cast('Flame Strike','laststatus') 
Else 
   UO.Print("No mana") 
Endif 
Endsub

попробуй это соединить....ток про задержки не забудь,а то в коридоры улетать будешь!

_________________
Ultima Online will save us from narcotics!