Yoko
http://forum.yoko.com.ua/

скупка
http://forum.yoko.com.ua/viewtopic.php?f=1&t=3912		 Page 1 of 1
Author:  POPKA [ 2005-05-04 14:54:46 ]
Post subject:  скупка
помагите плиз вставить сюда проверку на вес и рекол с выкладкой тавара в сёйф при достижения определённого веса


Code:

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

Author:  Destruction [ 2005-05-04 15:16:07 ]
Post subject: 
Ну, как описал проблему - таков тебе и ответ:

Дописываешь в любое место:
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
Author:  POPKA [ 2005-05-04 17:01:59 ]
Post subject: 
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




это по руно буку? можно зделать чтоб он ещё и возвращался и запускал занова по кругу
Author:  Destruction [ 2005-05-04 19:40:39 ]
Post subject: 
: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
Author:  POPKA [ 2005-05-04 20:09:57 ]
Post subject: 
Code:
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




похоже?
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/