| Yoko http://forum.yoko.com.ua/ |
|
| Проблема с Bowcraft http://forum.yoko.com.ua/viewtopic.php?f=20&t=1646 |
Page 1 of 1 |
| Author: | Fugleman [ 2004-10-18 16:02:58 ] |
| Post subject: | Проблема с Bowcraft |
Когда крафтит шафты ( когда берет из сундука) первый раз берет 1 бревно 2 раз 1 бревно а третий раз 3 бревна..почему в третий раз 3 лога? Вот скрипт... sub bowcraft() VAR Sunduk = '0x4042B1A1' ; Сериал сундука VAR Logi = '0x1BDD' ; Тип логов VAR Shafts = '0x1BD4' ; Тип шафтов VAR Kolvo = 1 ; Брать логов для одного крафта VAR k = 0, j, dagger dagger = UO.ObjAtLayer( 'Rhand' ) UO.SetGlobal( 'instrtype', UO.GetGraphic( dagger ) ) While TRUE UO.FindType( Logi, -1, Sunduk ) ; Ищем логи в сундуке If UO.FindCount() == 0 Then UO.Print("Logs not found, script terminated") return else j = UO.GetQuantity( 'finditem' ) If j > Kolvo Then UO.Print( 'I can use ' + str( j ) + ' logs' ) else UO.Print( "I can't use " + str( j ) + " logs" ) return Endif Endif If Kolvo == 1 Then ; v. 1.03 UO.Grab( '3', 'finditem' ) wait(500) UO.FindType( Logi ) UO.MoveItem( 'finditem', '2', Sunduk ) wait(500) Else UO.Grab( Str( Kolvo ), 'finditem' ) wait(500) Endif ; А это - динамическая пауза на мув while UO.Count( Logi ) < Kolvo wait(100) wend ; проверка на то, что в руках по-прежнему даггер If CheckInstr() == 0 Then UO.Print("You don't have daggers!" ) return Endif UO.DeleteJournal() UO.CancelMenu() UO.WaitMenu ('What do you want to carve', 'shaft' ) UO.WaitTargetType( Logi ) UO.UseObject( dagger ) k = 0 while NOT UO.InJournal('You put') AND NOT UO.InJournal('fail') AND ( k < 50 ) k = k + 1 wait(300) wend If UO.Count( Shafts ) > 0 then UO.FindType( Shafts, -1, -1 ) UO.MoveItem( 'finditem', 0, Sunduk ) wait(500) while UO.Count( Shafts ) > 0 wait(100) wend UO.Print( 'Shafts moved' ) Endif Wend end sub |
|
| Author: | GrayLord [ 2004-10-18 17:50:48 ] |
| Post subject: | |
а почему в grab - стоит "3" и в moveitem - "2"? |
|
| Author: | Fugleman [ 2004-10-22 15:25:17 ] |
| Post subject: | |
чтобы 3 брал и 2 ложил обратно |
|
| Author: | Fugleman [ 2004-10-22 16:13:31 ] |
| Post subject: | |
А всё..теперь всё норм...спасибо за помощь =)) |
|
| Page 1 of 1 | All times are UTC+02:00 |
| Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/ |
|