Yoko

All sides of Injection
It is currently 2025-11-02 23:39:23

All times are UTC+02:00




Post new topic  Reply to topic  [ 18 posts ] 
Author Message
 Post subject: Не куёт расти
PostPosted: 2006-03-25 10:03:29 
Offline
User avatar

Joined: 2006-02-03 10:40:17
Posts: 23
Location: DRW
Code:
sub BS() 
VAR Exit=0, LastTimer
while Exit<>1
UO.FindType('0x1BEF','0x0000','backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x1BEF','0x0750','0x40277507')
UO.Grab('300','finditem')
wait(300)
Endif
UO.DeleteJournal()
LastTimer=UO.Timer()
UO.WaitMenu('Blacksmithing','Colored Armor & Weapons','Colored Armor & Weapons','Rusty Weapons','Rusty Weapons','Rusty Swords & Blades','Rusty Swords & Blades','Rusty Dagger')
UO.UseType(0x1BEF)

while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed")
wait(500)
wend

If UO.InJournal("You have failed") then
repeat
wait(100)
until UO.Timer()>=LastTimer+100
EndIf

UO.FindType('0x0F51',-1,'backpack')
wait(500)

If UO.GetQuantity('finditem') then
UO.WaitTargetObject('finditem')
UO.UseObject(0x4002A350)
Endif
wait(1000)
wend
end sub

Должен делать даггеры из расти, но почему-то встаёт на первом же меню... Помогите пожалуйста.


Top
   
 Post subject:
PostPosted: 2006-03-25 15:31:09 
Offline

Joined: 2006-02-18 00:13:34
Posts: 12
если я не ошибаюсь то uo.waitmenu работает с максимальной глубиной 3 уровня... http://yoko.netroof.net/help/help.php?lang=rus&a=item&item=waitmenu


Top
   
 Post subject:
PostPosted: 2006-03-25 15:43:16 
Offline
User avatar

Joined: 2006-02-03 10:40:17
Posts: 23
Location: DRW
Поставил automenu, вместо вэйта - результат не лучше... Усё равно не работает...


Top
   
 Post subject:
PostPosted: 2006-03-25 16:58:50 
Offline

Joined: 2006-02-18 00:13:34
Posts: 12
слух, у меня тоже скрипт на это дело не хочет работать...
тока я я айро кую...
у меня не хочет плавить...
даю чуваку у него не плавит и инги из сундука не берёт....


Top
   
 Post subject:
PostPosted: 2006-03-25 17:04:38 
Offline

Joined: 2006-02-18 00:13:34
Posts: 12
попробуй вот это
Code:
UO.UseType('0x1BEF', '0x0750')

и у тебя там написяно было без кавычек(апострофов если точно.....).


Top
   
 Post subject:
PostPosted: 2006-03-25 18:17:20 
Offline
User avatar

Joined: 2006-02-03 10:40:17
Posts: 23
Location: DRW
pandinus wrote:
попробуй вот это
Code:
UO.UseType('0x1BEF', '0x0750')

и у тебя там написяно было без кавычек(апострофов если точно.....).

при чём тут это? мне нужен путёвый выбор менюшек...


Top
   
 Post subject:
PostPosted: 2006-03-25 18:22:18 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
Raketchik wrote:
pandinus wrote:
попробуй вот это
Code:
UO.UseType('0x1BEF', '0x0750')

и у тебя там написяно было без кавычек(апострофов если точно.....).

при чём тут это? мне нужен путёвый выбор менюшек...


Напиши как ты вставил Автоменю


Top
   
 Post subject:
PostPosted: 2006-03-26 01:13:45 
Offline

Joined: 2006-02-18 00:13:34
Posts: 12
ну тогда наверно так..
Code:

UO.UseType('0x1BEF','0x0750')
uo.automenu('Blacksmithing','Colored Armor & Weapons')
uo.automenu('Colored Armor & Weapons','Rusty Weapons')
uo.automenu('Rusty Weapons','Rusty Swords & Blades')
uo.automenu('Rusty Swords & Blades','Rusty Dagger')



Top
   
 Post subject:
PostPosted: 2006-03-26 06:01:18 
Offline
User avatar

Joined: 2006-02-03 10:40:17
Posts: 23
Location: DRW
pandinus wrote:
ну тогда наверно так..
Code:

UO.UseType('0x1BEF','0x0750')
uo.automenu('Blacksmithing','Colored Armor & Weapons')
uo.automenu('Colored Armor & Weapons','Rusty Weapons')
uo.automenu('Rusty Weapons','Rusty Swords & Blades')
uo.automenu('Rusty Swords & Blades','Rusty Dagger')


Unhandled exeption in parser...
Quote:
Напиши как ты вставил Автоменю

Я в скриптинге не гу-гу, поэтому воткнул его прям вместо вэйтменю))


Top
   
 Post subject:
PostPosted: 2006-03-26 09:10:17 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
Raketchik wrote:
pandinus wrote:
ну тогда наверно так..
Code:

UO.UseType('0x1BEF','0x0750')
uo.automenu('Blacksmithing','Colored Armor & Weapons')
uo.automenu('Colored Armor & Weapons','Rusty Weapons')
uo.automenu('Rusty Weapons','Rusty Swords & Blades')
uo.automenu('Rusty Swords & Blades','Rusty Dagger')


Unhandled exeption in parser...
Quote:
Напиши как ты вставил Автоменю

Я в скриптинге не гу-гу, поэтому воткнул его прям вместо вэйтменю))



Нет не так, а вот так:

Code:
uo.automenu('Blacksmithing','Colored Armor & Weapons')
uo.automenu('Rusty Weapons','Rusty Swords & Blades')
uo.automenu('Rusty Dagger')
wait(300)
UO.UseType('0x1BEF','0x0750')


Если не получится то так:
Code:
uo.automenu('Blacksmithing','Colored Armor')
uo.automenu('Rusty Weapons','Rusty Swords')
uo.automenu('Rusty Dagger')
wait(300)
UO.UseType('0x1BEF','0x0750')


Пробуй[/code]


Top
   
 Post subject:
PostPosted: 2006-03-26 10:39:37 
Offline
User avatar

Joined: 2006-02-03 10:40:17
Posts: 23
Location: DRW
Ни 1 ни 2 не хочет :(


Top
   
 Post subject:
PostPosted: 2006-03-26 16:38:16 
Offline

Joined: 2006-03-26 16:36:54
Posts: 3
I think you are right guys! :)

_________________
God bless America!


Top
   
 Post subject:
PostPosted: 2006-03-26 17:07:11 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
Raketchik wrote:
Ни 1 ни 2 не хочет :(


Последний вопрос... у тя БС скок??? Если меньше 60 то даже и е думай :D а если больше то АФТАРВЫПЕЙЯДУ!!!! У мя все работает и прекрастно кует :twisted:


Top
   
 Post subject:
PostPosted: 2006-03-26 18:19:45 
Offline
User avatar

Joined: 2006-02-03 10:40:17
Posts: 23
Location: DRW
Cooper wrote:
Raketchik wrote:
Ни 1 ни 2 не хочет :(


Последний вопрос... у тя БС скок??? Если меньше 60 то даже и е думай :D а если больше то АФТАРВЫПЕЙЯДУ!!!! У мя все работает и прекрастно кует :twisted:

у мя 62 реал
выложи свой полный скрипт пожалуйста :)


Top
   
 Post subject:
PostPosted: 2006-03-27 07:32:30 
Offline
User avatar

Joined: 2006-02-03 10:40:17
Posts: 23
Location: DRW
Заработало при
Code:
sub BS() 
VAR Exit=0, LastTimer
while Exit<>1
UO.FindType('0x1BEF','0x0750','backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x1BEF','0x0750','0x40277507') ;serial sunduka s iron
UO.Grab('300','finditem')
wait(300)
Endif
UO.DeleteJournal()
LastTimer=UO.Timer()
uo.automenu('Blacksmithing','Colored Armor & Weapons')
uo.automenu('Colored Armor & Weapons','Rusty Weapons')
uo.automenu('Rusty Weapons','Rusty Swords & Blades')
uo.automenu('Rusty Swords & Blades','Rusty Dagger')
wait(300)
UO.UseType('0x1BEF','0x0750')

while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed")
wait(500)
wend

If UO.InJournal("You have failed") then
repeat
wait(100)
until UO.Timer()>=LastTimer+100 ;time to make a dagger
EndIf

UO.FindType('0x0F51',-1,'backpack') ; dagger
wait(500)

If UO.GetQuantity('finditem') then
UO.WaitTargetObject('finditem')
UO.UseObject(0x4002A350) ;forge
Endif
wait(1000)
wend
end sub


Top
   
 Post subject:
PostPosted: 2006-03-27 07:34:34 
Offline
User avatar

Joined: 2006-02-03 10:40:17
Posts: 23
Location: DRW
Kolsz wrote:
I think you are right guys! :)

А как же иначе :wink:


Top
   
 Post subject:
PostPosted: 2006-03-27 10:42:49 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
Raketchik wrote:
Заработало при
Code:
sub BS() 
VAR Exit=0, LastTimer
while Exit<>1
UO.FindType('0x1BEF','0x0750','backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x1BEF','0x0750','0x40277507') ;serial sunduka s iron
UO.Grab('300','finditem')
wait(300)
Endif
UO.DeleteJournal()
LastTimer=UO.Timer()
uo.automenu('Blacksmithing','Colored Armor & Weapons')
uo.automenu('Colored Armor & Weapons','Rusty Weapons')
uo.automenu('Rusty Weapons','Rusty Swords & Blades')
uo.automenu('Rusty Swords & Blades','Rusty Dagger')
wait(300)
UO.UseType('0x1BEF','0x0750')

while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed")
wait(500)
wend

If UO.InJournal("You have failed") then
repeat
wait(100)
until UO.Timer()>=LastTimer+100 ;time to make a dagger
EndIf

UO.FindType('0x0F51',-1,'backpack') ; dagger
wait(500)

If UO.GetQuantity('finditem') then
UO.WaitTargetObject('finditem')
UO.UseObject(0x4002A350) ;forge
Endif
wait(1000)
wend
end sub



ыыы Неужели :twisted:
урраааа заработало!!!! (хз не помню кто сказал)


Top
   
 Post subject:
PostPosted: 2006-03-27 11:12:53 
Offline

Joined: 2005-08-19 16:12:23
Posts: 182
Cooper wrote:
урраааа заработало!!!! (хз не помню кто сказал)

Кот Матроскин из мультфильма "Простоквашено" :)


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 18 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 16 guests


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