i proishodit 4tota vrode
Attackt Nearest
set laststatus = lastattacked
I kak pravilno zdelat
4tob on ignore Mena
Code: Select all
sub FS()
UO.Ignore("self")
uo.cast("Flame Strike","laststatus")
UO.Ignore("self")
wait(115)
uo.msg(" ")
uo.msg(" ")
uo.msg(" ")
uo.msg(" ")
end sub
On inogda kastuet speli na mena.
Code: Select all
sub find()
var i, t_len = 2 ;
DIM t [ val( str( t_len ) ) ]
t[0] = "0x0191"
t[1] = "0x0190"
uo.ignore( "self" )
uo.set('finddistance',12)
repeat
for i = 0 to t_len -1
uo.findtype( t[i], "-1", "ground" )
If uo.FindCount() Then
If uo.getNotoriety( "finditem" ) == 1 or uo.getNotoriety( "finditem" ) == 3 Then ; если синий или серый, игнор
uo.Ignore( "finditem" )
Else
uo.attack( "finditem" )
uo.cast("Magic Arrow","finditem")
wait(3000)
End If
End If
next
wait( 300 )
until false
End Sub
vot nashol takoi, no on attakuet vseh podrjat. NPC i Sinih nada 4tob otokoval vseh kto krasniji. I pri nohodke on prodalzhaet iskat, eta uze nenada.
uo.getNotoriety
6 : Murderer (красный)
Peredelal tak, no sei4as on vobse ne4ego nenahodet.
Code: Select all
If uo.FindCount() Then
If uo.getNotoriety( "finditem" ) == 6 or If uo.getNotoriety( "finditem" ) == 4 Then
uo.attack( "finditem" )
uo.cast("Magic Arrow","finditem")
end sub
Else
uo.Ignore( "finditem" )
wait(3000)