Открывания кладов

[vertijok2000]

Здарсти всем вот зделал скрипт но почему та он не хочет работать

Code: Select all

sub LP()
   VAR i, n
   DIM Loot[2]
   Loot[1]=0x0E40 
   Loot[2]=0x0E41 ;
   
   DIM color[3]
   color[1]=0x0774 
   color[2]=0x0488
   color[3]=0x0445 
   
   
   For i=1 to 2
      For n=1 to 3
         uo.DeleteJournal()
         repeat
            UO.FindType('Loot[i]','color[n]','ground')
            if uo.findcount() then  
               uo.waittargetobject('finditem','Loot[i]','color[n]') 
               uo.usetype("0x14FC") 
               wait(5000) 
            until UO.InJournal("Этот сундук уже открыт.")
         end if
      next
   next
end sub

суть скрипта два раза на Lockpick и потом на сундук что на земле сундуки цветные

[Mirage]

Code: Select all

sub LP()
   VAR i, n
   DIM Loot[2]
   Loot[1]='0x0E40' 
   Loot[2]='0x0E41' ;
   
   DIM color[3]
   color[1]='0x0774'
   color[2]='0x0488'
   color[3]='0x0445' 
   
   
   For i=1 to 2
      For n=1 to 3
         uo.DeleteJournal()
         repeat
            UO.FindType(Loot[i],color[n],'ground')
            if uo.findcount() then  
               uo.waittargetobject('finditem') 
               uo.usetype("0x14FC") 
               wait(5000) 
            #return ; раскомментировать если сундуки встречаются только по одному дабы не гонять в холостую циклы
            until UO.InJournal("Этот сундук уже открыт.")
         end if
      next
   next
end sub

[vertijok2000]

есть карта сокровищи посли как нашол сундук убиваю мобов потом надо открыть сундук клячами
я так понял что

Code: Select all

 #return ; раскомментировать если сундуки встречаются только по одному дабы не гонять в холостую циклы

надо поставить?

[vertijok2000]

если не включять return то он то ко один раз делает то что должен делать если включять то он игнорирует

Code: Select all

until UO.InJournal("Этот сундук уже открыт.")

и скрипт не останавливается а мне надо что бы он остановился