sub killelem()
VAR Count, LastTimer

UO.UseType('0x0F0E','0x0631') ; inviz potion

repeat
If UO.Mana>=50 then
UO.WaitMenu('What','Daemon')
UO.Cast('Polymorph')
wait(8000)
else
while UO.Mana<50
UO.UseType('0x0F0E','0x09DF') ; total mana potion
wait(3000)
wend
endif
until UO.STR>200 ; U'r not morfed char max Strength

LastTimer=UO.Timer()
repeat
UO.BandageSelf()
wait(4000)
until UO.Life==UO.STR OR LastTimer+200<UO.Timer()

UO.UseType(0x1B76) ; heater shield
UO.UseType(0x1413) ; platemail gorget

UO.DeleteJournal()
UO.WarMode(1)
UO.UseSkill('Meditation') ; reveal self

; "Corpse autoopen" in "main" need be checked
repeat
wait(5000)
until UO.InJournal('Body') OR UO.InJournal('You can')

If UO.InJournal('You can') then
UO.WaitTargetGround('0x19B9') ; 4 and more ore
wait(1500)
UO.Grab('all')
UO.WaitTargetGround('0x0EED') ; gold coins
wait(500)
UO.Grab('all')
Else
UO.WaitTargetObject('lastcorpse')
UO.UseType('0x0F51') ; dagger
wait(500)

UO.FindType('0x19B9',-1,'lastcorpse') ; ore
wait(500)
UO.Grab(0,'finditem')

UO.FindType('0x0EED',-1,'lastcorpse') ; coins
wait(500)
UO.Grab(0,'finditem')

UO.FindType('0x1BF5',-1,'lastcorpse') ; ings
wait(500)
UO.Grab(0,'finditem')

UO.FindType('0x0E76',-1,'lastcorpse') ; bag
wait(500)
UO.Grab(0,'finditem')
endif

UO.WarMode('flip')
wait(1000)
UO.WarMode(0)
wait(1000)

LastTimer=UO.Timer()
if UO.Life<200 then ; U'r max HP
repeat
UO.BandageSelf()
wait(4000)
until UO.Life>180 OR LastTimer+180<UO.Timer()
endif

ToHide()
end sub

Хм... ет канечно хорошо но:) Один вопрос ето будеть работать на рунуо?

Особо то мне не нуно килять елементов а просто от них реколится ))) но кода я попробывал зделать поиск по типу возле себя то я понял одно что у етих елементов разный тип) хыхы а переписовать как то не в пруху пробывал зделать с клилоками но к сожалению нечего не получилось потому что килилок на появление нпц идеть одинаковый) ну естествено все монстры или животные попадают под етот килок) так что я просто незнаю как ето написать что б крафт просто убегал при появлении елема?)
Кто знает помогите) плиЗ)

а проверку по журналу не пробовал?

if UO.InJournal('something with ore') OR UO.InJournal("attacking you") then
...
else
...
end if