Пажалуйста памагите!!!

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
Afar
Posts: 6
Joined: 2007-02-05 20:26:06
Location: Olaine

Пажалуйста памагите!!!

Post by Afar »

Памагите даделать сцп так чтоб он паднимал фсе итемы кроми рыбы!

Code: Select all

sub AFKLoot1()
   If uo.getglobal('AFKLoot')=='On' then
   uo.setglobal('AFKLoot',0)
   uo.print(' !!! -= AFKLoot Terminated =- !!! ')
   uo.exec('terminate AFKLoot')
   else
   uo.setglobal('AFKLoot','On')
   uo.print(' !!! -= AFKLooting =- !!! ')
    endif
 uo.set('finddistance','3')
 uo.exec('addobject bag')
  while uo.targeting()
  wait(100)
 wend

while uo.weight < uo.str*22
  UO.FindType( -1 , -1 ,'ground')
 while UO.FindCount()
  uo.moveitem('finditem', 0 ,'bag')
  uo.ignore('finditem')
  Wait(500)
  CheckLag()
  UO.FindType( -1 , -1 ,'ground')
 wend
 wait(100)
wend
uo.setglobal('AFKLoot',0)
end sub


Code: Select all

sub CheckLag()
if uo.Waiting()>0 then
uo.Exec('canceltarget')
end if
uo.DeleteJournal()
uo.Click('backpack')
repeat
wait(50)
until uo.InJournal('backpack')
end sub
Post Reply