скупка

POPKA · Post by **POPKA** » 2005-05-04 14:54:46

помагите плиз вставить сюда проверку на вес и рекол с выкладкой тавара в сёйф при достижения определённого веса


sub max() 
     VAR RespDelay=1120000
   UO.Set('buydelay','3500') 
   UO.Set('injectecho','1') 

   While 1==1 
      UO.DeleteJournal() 
      UO.Buy('bb')
      Repeat 
         UO.Exec('warmode 0') 
         UO.Exec('warmode 0') 
         UO.UseSkill('Hiding') 
         wait(4000) 
      Until UO.Hidden() 
      IF UO.InJournal("No item") Then 
         UO.Print("OOpS!") 
         wait(20000) 
      Else 
         wait(RespDelay) 
      EndIf 
   Wend 
end sub

Destruction · Post by **Destruction** » 2005-05-04 15:16:07

Ну, как описал проблему - таков тебе и ответ:

Дописываешь в любое место:
if uo.Weight > XXX then
:recall
uo.recall(...)
uo.deletejournal()
repeat
wait(500)
if uo.injournal(ФИЗЛ) then
goto recall
endif
until uo.getx()==XXX && uo.gety()==XXX
repeat
uo.findtype(тип)
uo.drophere('finditem')
until uo.count(тип)==0

POPKA · Post by **POPKA** » 2005-05-04 17:01:59

Destruction wrote:Ну, как описал проблему - таков тебе и ответ:

Дописываешь в любое место:
if uo.Weight > XXX then
:recall
uo.recall(...)
uo.deletejournal()
repeat
wait(500)
if uo.injournal(ФИЗЛ) then
goto recall
endif
until uo.getx()==XXX && uo.gety()==XXX
repeat
uo.findtype(тип)
uo.drophere('finditem')
until uo.count(тип)==0

это по руно буку? можно зделать чтоб он ещё и возвращался и запускал занова по кругу

Destruction · Post by **Destruction** » 2005-05-04 19:40:39

:theMetka
тут скрипт
if uo.Weight > XXX then
:recall
uo.recall(...)
uo.deletejournal()
repeat
wait(500)
if uo.injournal(ФИЗЛ) then
goto recall
endif
until uo.getx()==XXX && uo.gety()==XXX
repeat
uo.findtype(тип)
uo.drophere('finditem')
until uo.count(тип)==0
uo.recall(...)
goto theMetka

POPKA · Post by **POPKA** » 2005-05-04 20:09:57

Code: Select all

sub theMetka 
sub max() 
     VAR RespDelay=1120000 
   UO.Set('buydelay','3500') 
   UO.Set('injectecho','1') 

   While 1==1 
      UO.DeleteJournal() 
      UO.Buy('bb') 
      Repeat 
if uo.Weight > 650 then 
uo.recall(...) 
uo.deletejournal() 
repeat 
wait(500) 
if uo.injournal(ФИЗЛ) then 
goto recall 
endif 
until uo.getx()==2822 && uo.gety()==667 
repeat 
uo.findtype(тип) 
uo.drophere('finditem') 
until uo.count(тип)==0 
uo.recall(...) 
goto theMetka
UO.Exec('warmode 0') 
UO.Exec('warmode 0') 
UO.UseSkill('Hiding') 
wait(4000) 
 Until UO.Hidden() 
 IF UO.InJournal("No item") Then 
 UO.Print("OOpS!") 
  wait(20000) 
      Else 
         wait(RespDelay) 
      EndIf 
   Wend 
end sub 
end sub

похоже?