Killelem
Posted: 2006-08-09 13:23:05
Mne nado script 4tov 4ar stojal na mesti i postajano iskal elimentov esli eliment pojavitsa nado 4tob 4ar ego ubil !! kogda on ubjot elimenta nado 4tob 4ar opjatj na4ilan iskatj elimentov !!!
Code: Select all
sub Attack()
VAR k
UO.Ignore('self')
UO.DeleteJournal()
UO.Set('finddistance', 2 ) ;2 тайла
While true
UO.FindType( -1 , -1 ,'ground')
If UO.FindCount() AND UO.IsNPC() then
UO.Attack('finditem')
k = 0
Repeat
k = k + 1
wait(500)
until UO.InJournal('You gained') or k >= 30 ;здесь можно изменить на Body
Del('You gained')
uo.emptycontainer(STR(500),'lastcorpse')
Endif
wait(250)
wend
end sub