Yoko

All sides of Injection
It is currently 2025-10-12 10:28:00

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 17 posts ] 
  Print view Previous topic | Next topic 
Author Message
DieHard
 Post subject: Карпааа
PostPosted: 2007-01-14 12:30:21 
Offline

Joined: 2006-12-24 20:26:50
Posts: 15
Code:
sub carpentry() 
while NOT UO.Dead() 
uo.findtype('0x1BDD',-1,'my') ; ishet logi leghashie pod nogami 
if uo.getquantity('finditem')<110 then ; 
load() 
endif 
  CheckLag()
UO.automenu ("Carpentry", "Weapons & Tools")  
UO.automenu ("Weapons & Tools", "quarter staff")
  UO.UseType('0x0E89') ; jointing plane
  while NOT UO.InJournal("You put") AND NOT UO.InJournal("You fail")
   wait(300)
  wend
wend 
end sub 
 
sub load() 
uo.unsetcatchbag() 
UO.WaitTargetGround('0x1BDD') ; podnimaet logi s zemli v kolichestve 700 shtuk 
wait(1500) 
UO.Grab('600') 
wait (1000) 
uo.setcatchbag('0x4033027B') ; serial Trash can 
end sub

     
sub sreset() 
   UO.SetEasyUO(80,"1") 
   UO.SetEasyUO(90,"1") 
end sub


Вот скрипт он не работает ошибка пишет в 7 строке
Code:
CheckLag()
помогите пожайлусто делайте чтобы работал(
Top
   
Reply with quote  
DieHard
 Post subject:
PostPosted: 2007-01-14 12:34:02 
Offline

Joined: 2006-12-24 20:26:50
Posts: 15
А забыл сказать чяр берёт 600 логов и вылетает эта 7 строка!
Top
   
Reply with quote  
prof
 Post subject:
PostPosted: 2007-01-14 12:34:39 
Offline

Joined: 2005-01-01 04:00:14
Posts: 76
Code:
sub CheckLag() 
   UO.DeleteJournal() 
   UO.Click('backpack') 
   repeat 
      wait(500) 
   until UO.InJournal('backpack') 
end sub

Вставь это в скрипт
Top
   
Reply with quote  
DieHard
 Post subject:
PostPosted: 2007-01-14 12:45:40 
Offline

Joined: 2006-12-24 20:26:50
Posts: 15
если я вставлю у меня небудет меню этой что делать!
Top
   
Reply with quote  
DieHard
 Post subject:
PostPosted: 2007-01-14 13:31:37 
Offline

Joined: 2006-12-24 20:26:50
Posts: 15
Он терь стафы не кидает в треш бочьку!
Code:
sub carpentry() 
while NOT UO.Dead() 
uo.findtype('0x1BDD',-1,'my') ; ishet logi leghashie pod nogami 
if uo.getquantity('finditem')<110 then ; 
load() 
endif 

CheckLag()
UO.automenu ("Carpentry", "Weapons")  
UO.automenu ("Weapons", "quarter staff")
  UO.UseType('0x1034') ; jointing plane
  while NOT UO.InJournal("You put") AND NOT UO.InJournal("You fail")
   wait(300)
  wend
wend 
end sub 
 
sub load() 
uo.unsetcatchbag() 
UO.WaitTargetGround('0x1BDD') ; podnimaet logi s zemli v kolichestve 700 shtuk 
wait(1500) 
UO.Grab('600') 
wait (1000) 
uo.setcatchbag('0x4033027B') ; serial Trash can 
end sub

sub sreset() 
   UO.SetEasyUO(80,"1") 
   UO.SetEasyUO(90,"1") 
end sub 

sub CheckLag() 
   UO.DeleteJournal() 
   UO.Click('backpack') 
   repeat 
      wait(500) 
   until UO.InJournal('backpack') 
end sub
Top
   
Reply with quote  
mez
 Post subject:
PostPosted: 2007-01-14 19:12:55 
Offline
User avatar

Joined: 2006-04-02 11:33:38
Posts: 91
попробуй мотри старый чек лаг и поставь новый! который ты в низ приписал!
Top
   
Reply with quote  
DieHard
 Post subject:
PostPosted: 2007-01-14 19:52:45 
Offline

Joined: 2006-12-24 20:26:50
Posts: 15
Пасибо,я все сделал но скрипт выдёт ошибку после получяса работы!
Code:
sub carpentry() 
while NOT UO.Dead() 
uo.findtype('0x1BDD',-1,'my') ; ishet logi leghashie pod nogami 
if uo.getquantity('finditem')<110 then ; 
load() 
endif 

CheckLag()
UO.automenu ("Carpentry","Weapons & Tools")  
UO.automenu ("Weapons & Tools","club")
  UO.UseType('0x1034') ; jointing plane
  while NOT UO.InJournal("You put") AND NOT UO.InJournal("You fail")
   wait(300)
  wend
wend 
end sub 
 
sub load() 
uo.unsetcatchbag() 
UO.WaitTargetGround('0x1BDD') ; podnimaet logi s zemli v kolichestve 700 shtuk 
wait(1500) 
UO.Grab('600') 
wait (1000) 
uo.setcatchbag('0x4033027B') ; serial Trash can 
end sub

sub sreset() 
   UO.SetEasyUO(80,"1") 
   UO.SetEasyUO(90,"1") 
end sub 

sub CheckLag() 
   UO.DeleteJournal() 
   UO.Click('backpack') 
   repeat 
      wait(500) 
   until UO.InJournal('backpack') 
end sub




Image
Top
   
Reply with quote  
DieHard
 Post subject:
PostPosted: 2007-01-14 20:46:10 
Offline

Joined: 2006-12-24 20:26:50
Posts: 15
Мож я галочьки в Main непрально поставил??

Image
Top
   
Reply with quote  
mez
 Post subject:
PostPosted: 2007-01-15 07:50:45 
Offline
User avatar

Joined: 2006-04-02 11:33:38
Posts: 91
Code:
sub carpentry() 
while NOT UO.Dead() 
uo.findtype('0x1BDD',-1,'my') ; ishet logi leghashie pod nogami 
if uo.getquantity('finditem')<110 then ; 
load() 
endif 

sub CheckLag() 
   UO.DeleteJournal() 
   UO.Click('backpack') 
   repeat 
      wait(500) 
   until UO.InJournal('backpack') 
end sub

UO.automenu ("Carpentry", "Weapons")  
UO.automenu ("Weapons", "quarter staff") 
  UO.UseType('0x1034') ; jointing plane 
  while NOT UO.InJournal("You put") AND NOT UO.InJournal("You fail") 
   wait(300) 
  wend 
wend 
end sub 
  
sub load() 
uo.unsetcatchbag() 
UO.WaitTargetGround('0x1BDD') ; podnimaet logi s zemli v kolichestve 700 shtuk 
wait(1500) 
UO.Grab('600') 
wait (1000) 
uo.setcatchbag('0x4033027B') ; serial Trash can 
end sub 

sub sreset() 
   UO.SetEasyUO(80,"1") 
   UO.SetEasyUO(90,"1") 
end sub


пользуйся!
Top
   
Reply with quote  
DieHard
 Post subject:
PostPosted: 2007-01-15 09:55:04 
Offline

Joined: 2006-12-24 20:26:50
Posts: 15
Спс)
Top
   
Reply with quote  
mez
 Post subject:
PostPosted: 2007-01-15 09:55:45 
Offline
User avatar

Joined: 2006-04-02 11:33:38
Posts: 91
DieHard wrote:
Спс)


все нормально работает? а то я в скриптах не очень но изучаю! :D
Top
   
Reply with quote  
DieHard
 Post subject:
PostPosted: 2007-01-15 10:07:36 
Offline

Joined: 2006-12-24 20:26:50
Posts: 15
Вообщето работать отказывается)
Top
   
Reply with quote  
mez
 Post subject:
PostPosted: 2007-01-15 10:09:59 
Offline
User avatar

Joined: 2006-04-02 11:33:38
Posts: 91
а че пишет?
Top
   
Reply with quote  
mez
 Post subject:
PostPosted: 2007-01-15 10:11:50 
Offline
User avatar

Joined: 2006-04-02 11:33:38
Posts: 91
Code:
sub Carpentry() 
var Exit=0, LastTimer 
uo.Print('Выбери Сундук: ') 
uo.Exec('addobject Chest') 
while uo.Targeting() 
wait(100) 
wend 
uo.Print('Выбери Помойку: ') 
uo.Exec('addobject TrashCan') 
while uo.Targeting() 
wait(100) 
wend 
uo.Print('Выбери Инструмент: ') 
uo.Exec('addobject Ins') 
while uo.Targeting() 
wait(100) 
wend 
while Exit<>1 
uo.DeleteJournal() 
uo.FindType('0x0E89','0x0000','backpack') 
if uo.GetQuantity('finditem')>0 then 
uo.SetReceivingContainer('TrashCan') 
wait(1000) 
uo.Grab('all','finditem') 
wait(1000) 
uo.UnSetReceivingContainer() 
end if 
uo.FindType('0x1BDD',-1,'backpack')  
if uo.GetQuantity('finditem')<10 then 
uo.FindType('0x1BDD','0x0000','Chest') 
wait(1000) 
uo.Grab('300','finditem') 
wait(1000) 
end if 
LastTimer=uo.Timer() 
uo.DeleteJournal() 
uo.UseObject('Ins') 
uo.WaitMenu ('Carpentry','Weapons & Tools','Weapons & Tools','quarter staff') 
wait(12000) 
wend 
end sub


вот рабочий скрипт сам им качал! :)
Top
   
Reply with quote  
DieHard
 Post subject:
PostPosted: 2007-01-15 11:22:56 
Offline

Joined: 2006-12-24 20:26:50
Posts: 15
mez wrote:
Code:
sub Carpentry() 
var Exit=0, LastTimer 
uo.Print('Выбери Сундук: ') 
uo.Exec('addobject Chest') 
while uo.Targeting() 
wait(100) 
wend 
uo.Print('Выбери Помойку: ') 
uo.Exec('addobject TrashCan') 
while uo.Targeting() 
wait(100) 
wend 
uo.Print('Выбери Инструмент: ') 
uo.Exec('addobject Ins') 
while uo.Targeting() 
wait(100) 
wend 
while Exit<>1 
uo.DeleteJournal() 
uo.FindType('0x0E89','0x0000','backpack') 
if uo.GetQuantity('finditem')>0 then 
uo.SetReceivingContainer('TrashCan') 
wait(1000) 
uo.Grab('all','finditem') 
wait(1000) 
uo.UnSetReceivingContainer() 
end if 
uo.FindType('0x1BDD',-1,'backpack')  
if uo.GetQuantity('finditem')<10 then 
uo.FindType('0x1BDD','0x0000','Chest') 
wait(1000) 
uo.Grab('300','finditem') 
wait(1000) 
end if 
LastTimer=uo.Timer() 
uo.DeleteJournal() 
uo.UseObject('Ins') 
uo.WaitMenu ('Carpentry','Weapons & Tools','Weapons & Tools','quarter staff') 
wait(12000) 
wend 
end sub


вот рабочий скрипт сам им качал! :)


Скрипт отл но не кидает в треш то чего я карфчю!
Top
   
Reply with quote  
mez
 Post subject:
PostPosted: 2007-01-15 11:36:50 
Offline
User avatar

Joined: 2006-04-02 11:33:38
Posts: 91
DieHard wrote:
mez wrote:
Code:
sub Carpentry() 
var Exit=0, LastTimer 
uo.Print('Выбери Сундук: ') 
uo.Exec('addobject Chest') 
while uo.Targeting() 
wait(100) 
wend 
uo.Print('Выбери Помойку: ') 
uo.Exec('addobject TrashCan') 
while uo.Targeting() 
wait(100) 
wend 
uo.Print('Выбери Инструмент: ') 
uo.Exec('addobject Ins') 
while uo.Targeting() 
wait(100) 
wend 
while Exit<>1 
uo.DeleteJournal() 
uo.FindType('0x0E89','0x0000','backpack') 
if uo.GetQuantity('finditem')>0 then 
uo.SetReceivingContainer('TrashCan') 
wait(1000) 
uo.Grab('all','finditem') 
wait(1000) 
uo.UnSetReceivingContainer() 
end if 
uo.FindType('0x1BDD',-1,'backpack')  
if uo.GetQuantity('finditem')<10 then 
uo.FindType('0x1BDD','0x0000','Chest') 
wait(1000) 
uo.Grab('300','finditem') 
wait(1000) 
end if 
LastTimer=uo.Timer() 
uo.DeleteJournal() 
uo.UseObject('Ins') 
uo.WaitMenu ('Carpentry','Weapons & Tools','Weapons & Tools','quarter staff') 
wait(12000) 
wend 
end sub


вот рабочий скрипт сам им качал! :)


Скрипт отл но не кидает в треш то чего я карфчю!


2 варината или слишком далеко или не туда тыкнул!
Top
   
Reply with quote  
DieHard
 Post subject:
PostPosted: 2007-01-15 20:05:28 
Offline

Joined: 2006-12-24 20:26:50
Posts: 15
стою в притык в трешбочьке и тыкаю на неё 100 проц!
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 17 posts ] 

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: No registered users and 1 guest

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited