Yoko

sub checkcolor(obj)
не запихивай и все

_________________

YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.

сп-а-сибо Мираж! а чего next делает? такое ощущение, что он мешает

next меняет значение n от 1 до 14 - в твоем случае.
в общем твой скрипт должен выглядеть как то типо вот так

sub test()
var n
var distance = 20
var elem_type = 'TYPE элементаля'
var invis_type = 'TYPE инвизки'
var invis_color = 'цвет инвизки'
Dim color[14]
   color[1]='0x09DA'
   color[2]='0x0060'
блаблабла 
   color[14]='0x0028'
   for n=1 to 14
     if uo.findtype(elem_type, color[n], 'ground', distance) then
        uo.usetype(invis_type, invis_color)
        wait(200)
        return ; выбьет из цикла for next
     endif
   next
end sub

ретурн остановит поиск. Туда вместо ретурна можно прописать дополнительные действия требующиеся при нахождении цветного элементаля.

_________________

YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.

Мираж ну спасибо тебе большое за помощь! лайк и подписка.

ну тебе тут уже парни насоветовали - я просто показал как это выглядит

_________________

YokoInjection CodeSweeper
Ошибка "Unhandled exception in parser"
Стрелялка для олдов.

а при вставке test() должен же инвиз пить, но чего то не пьет. Вставляю test() перед улетом на разгрузку.

вот кусок, но не пьнт зараза.

for jor = 0 to 9
ser = uo.journalserial(jor)
noto = uo.getnotoriety(ser)
if noto <> 1 and noto <> 0 and not uo.injournal("elemental") then
if uo.waiting() then
uo.canceltarget()
endif
loot()
wait(3000)
endif
next
wend
if uo.weight > 625 then ; Максимальный вес при котором домой с рудой
goto end
endif
wend
UO.DeleteJournal()
next
next
goto na4alo
end:
if uo.waiting() then
uo.canceltarget()
endif
test()
uo.exec("recall Runebook 21") ; to home
wait(10000)
loot()
wait(3000)
reccal:
uo.deletejournal()
if uo.waiting() then
uo.canceltarget()
endif
uo.exec("recall Runebook 94") ; to cave
mx = UO.GetX("self")
my = UO.GetY("self")
wait(10000)
if not UO.GetX("self") <> mx and not UO.GetY("self") <> my then
goto reccal
endif
goto na4alo
end sub

помогите пожалуйста, в чем может быть проблема? цвет, тип инвизки прописал. цвет, тип элемов стоит правильный.

проблема решена. тему можно закрыть.