Yoko

Code: Select all

sub LooterNew()
VAR i, n
VAR w = 500  ; задержка после мува
VAR razmer = 9  ; размер массива

DIM Loot[9]
    Loot[1] = '0x0EED' 
    Loot[2] = '0x1BD1'
    Loot[3] = '0x0F87' 
    Loot[4] = '0x14ED'
    Loot[5] = '0x0EED'
    Loot[6] = '0x1031'
    Loot[7] = '0x0F51'
    Loot[8] = '0x0F51'
    Loot[9] = '0x0F06'

  if uo.getdistance( 'lastcorpse' ) < 3 then
    uo.deletejournal()
    repeat
      uo.findtype( '-1', '-1', 'lastcorpse' )  
      n = 0
        for i = 1 to razmer 
          if uo.getgraphic( 'finditem' ) == Loot[i] then
            uo.moveitem( 'finditem', 'all', 'my' )
            wait(w)
              if uo.injournal( 'UNSP' ) then
                wait(w*2)
                uo.deletejournal()
              endif
            n = 1
            goto nextitem
           endif          
        next
          if n == 0 then
            uo.ignore( 'finditem' )
          endif
      nextitem:
    until uo.findcount() == 0
  else
    uo.print( 'Шеф, труп слишком далеко!' )
  endif
endsub