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

поправьте плз
http://forum.yoko.com.ua/viewtopic.php?f=20&t=12789		 Page 1 of 1
Author:  Sp [ 2007-11-21 12:16:32 ]
Post subject:  поправьте плз
вот скрипт:
sub tailoring3()
VAR Sunduk = "0x4002C755"
VAR Kozha = "0x1067"
VAR Kit = "0x0F9D"
VAR Scrol = "0x1DB9"
VAR k
UO.CancelMenu()
wait(500)
UO.AutoMenu( "Leather Armour", "Leather Armour", "leather cap" )
While TRUE
If UO.Count( Kozha ) == 0 Then
UO.FindType( Kozha, '-1', Sunduk )
If UO.FindCount() == 0 Then
UO.Print("Leathers not found, script terminated")
return
Endif
UO.Grab( '1', 'finditem' )
wait(500)
while UO.Count( Kozha ) ==
wait(100)
wend
Endif
UO.DeleteJournal()
UO.WaitTargetType( Kozha )
UO.UseType( Kit )
k = 0
while NOT UO.InJournal('item is of') AND NOT UO.InJournal('Tailoring failed.') AND ( k < 50 )
k = k + 1
wait(300)
wend
if UO.Count( Scrol ) > 0 then
UO.FindType( Scrol )
UO.MoveItem( 'finditem', '0', Sunduk )
wait( 500 )
while UO.Count( Scrol ) > 0
wait(100)
wend
endif
Wend
UO.CancelMenu()
end sub


почему то из сундука берет тока одну еденицу кожи...как сделать что бы больше брал?
Author:  grundick [ 2007-11-21 12:25:21 ]
Post subject:  Re: поправьте плз
Sp wrote:
вот скрипт:
sub tailoring3()
VAR Sunduk = "0x4002C755"
VAR Kozha = "0x1067"
VAR Kit = "0x0F9D"
VAR Scrol = "0x1DB9"
VAR k
UO.CancelMenu()
wait(500)
UO.AutoMenu( "Leather Armour", "Leather Armour", "leather cap" )
While TRUE
If UO.Count( Kozha ) == 0 Then
UO.FindType( Kozha, '-1', Sunduk )
If UO.FindCount() == 0 Then
UO.Print("Leathers not found, script terminated")
return
Endif
UO.Grab( '1', 'finditem' ) <------------- '1' -это количество кожи.Вставь свою цифру.
wait(500)
while UO.Count( Kozha ) ==
wait(100)
wend
Endif
UO.DeleteJournal()
UO.WaitTargetType( Kozha )
UO.UseType( Kit )
k = 0
while NOT UO.InJournal('item is of') AND NOT UO.InJournal('Tailoring failed.') AND ( k < 50 )
k = k + 1
wait(300)
wend
if UO.Count( Scrol ) > 0 then
UO.FindType( Scrol )
UO.MoveItem( 'finditem', '0', Sunduk )
wait( 500 )
while UO.Count( Scrol ) > 0
wait(100)
wend
endif
Wend
UO.CancelMenu()
end sub


почему то из сундука берет тока одну еденицу кожи...как сделать что бы больше брал?


edited by SW:
Code:
UO.Grab( '1', 'finditem' )
Author:  Sp [ 2007-11-21 15:38:52 ]
Post subject: 
спасибо я понял..тока вот еще одна проблеммка появилась...

UO.AutoMenu( "Leather Armour", "Leather Armour", "leather cap" )

не хочет он делать капы...я правильно написал ?
Author:  grundick [ 2007-11-21 16:27:58 ]
Post subject: 
нет конечно. менюшки идут парами: надпись сверху, надпись снизу. а у тебя три строки
Author:  Sp [ 2007-11-21 16:41:20 ]
Post subject: 
?? не понял а как это будет выглядеть не напишеь?
какая надпись сверху надпись снизу?
Author:  Scripts Writer [ 2007-11-21 17:08:18 ]
Post subject: 
Уроки для таких как ты были писаны
Author:  grundick [ 2007-11-21 17:10:11 ]
Post subject: 
uo.waitmenu('надпись сверху1','надпись снизу1','надпись сверху2','надпись снизу2','надпись сверзу3','надпись внизу3')
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/