Yoko

Всем здрасте.
Писал скрипт, он у меня нивкакую не роббит
Задумка в сл. берёт карту из мешочка, кликает по ней, если пишеться что она 1го лвл, кидает её в треш, если др. лвл, в др. мешочек. Скрипт просто напросто скидвает все карты в мешочек, независимо от того, какого она лвл. Помогите спасибо.

sub one_level_in_trah()
VAR MAPcont='0x403388B7'
VAR trashID='0x40270287'
VAR UNLcont='0x4035C6AC'

start:
UO.FindType('0x14EB',-1,MAPcont)
   if UO.FindCount('finditem') == 0 then
    uo.msg('ALL maps 1 level, IN TRASH!')
    uo.exec('terminate ALL')
   endif

UO.MoveItem('finditem',0,'backpack')
 CheckLag()
 UO.DeleteJournal()
  uo.click('finditem')
   wait(3000)
   uo.print('---')
    If UO.InJournal("level 1") then
      UO.MoveItem('finditem','0',trashID)
     else
      UO.MoveItem('finditem','0',UNLcont)
    endif
goto start
end sub


Sub CheckLag() 
   DeleteJournal( 'backpack' ) 
   UO.Click( 'backpack' ) 
   repeat 
      wait(100) 
   until UO.InJournal( 'backpack' ) 
   return 
end sub 

Sub DeleteJournal( string1 ) 
   VAR nom = UO.InJournal( string1 ) 
   If nom > 0 Then 
      UO.SetJournalLine( Nom - 1, 'string replaced' ) 
      DeleteJournal( string1 ) 
   Endif 
endsub

И Всёже? =)

а знаешь почему все карты скидывает ! ПОтомучто у всех карт даже бланков тип один

Да неужели, серьёзно члитолИ!?
Если в скриптах ничего не понимаешь, то и нечего тут флудить.

Хм, попробывал его изменить, всё равно тоже самое. Тут какая то не правельная обработка журнала =) Подскажи те же =)

sub one_level_in_trah()
VAR MAPcont='0x4005A28A'
VAR trashID='0x40270287'
VAR UNLcont='0x40305FCB'

start:
UO.FindType('0x14EB',-1,MAPcont)
   if UO.FindCount('finditem') == 0 then
    uo.msg('ALL maps 1 level, IN TRASH!')
    uo.exec('terminate ALL')
   endif

UO.MoveItem('finditem',0,'backpack')
 CheckLag()
 UO.DeleteJournal()
  uo.click('finditem')
   while NOT UO.InJournal("level")
      wait(100)
   wend
If UO.Journal("(1 level)") then
   UO.MoveItem('finditem','0',trashID)
     wait(500)
endif
 If UO.Journal("(2 level)") then
   UO.MoveItem('finditem','0',UNLcont)
     wait(500)
 endif
  If UO.Journal("(3 level)") then
   UO.MoveItem('finditem','0',UNLcont)
     wait(500)
  endif
goto start
end sub

Хм...

If UO.Journal("(2 level)") then 

А зачем тебе еще одни скобки внутри кавычек? Попробуй их убрать, возможно из-за этого скрипт глючит.

Да нет, писал по разному, один и тотже эффект