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

помогите со скриптом на некромансию на абисс
http://forum.yoko.com.ua/viewtopic.php?f=17&t=15253		 Page 1 of 1
Author:  zzuull [ 2009-11-07 02:07:15 ]
Post subject:  помогите со скриптом на некромансию на абисс
доброго времени суток, помогите пожалуйста со скриптом на некромансию, нужно жарить руки ноги и т.д. на печи и перекладывать в сумку , заранее спасибо :D
Author:  Mirage [ 2009-11-07 07:47:21 ]
Post subject: 
так Это... как бы... А че проблема переделать с жарки рыбы?

Code:
sub Cook()
  VAR steaks     = '0x097A'      ;сырая рыба
  VAR ribs       = '0x09F1'      ;сырое мясо
  VAR meat1      = '0x097B'      ;жареная рыба
  VAR meat2      = '0x09F2'      ;жареное мясо
  VAR Forge      = '0x197E'      ;жаровня
  VAR Fair      = '0x0DE3'      ;костер
  VAR BagForMeat = '0x400198C4'  ;сумка для жареного мяса
  VAR LastTimer
UO.Set('finddistance', 3)
 WHILE NOT UO.Dead()
  IF UO.Count( steaks )>0 OR UO.Count( ribs )>0 THEN
     UO.DeleteJournal()

UO.FindType(Fair,-1,'ground')
 If UO.FindCount() > 0 Then
UO.WaitTargetGround(Fair)
else

UO.FindType( Forge ,-1,'ground')
 If UO.FindCount() > 0 Then
UO.WaitTargetGround( Forge )
 endif
endif

;**************************************************
    if UO.Count( steaks ) || UO.Count( ribs ) then
     if UO.Count( steaks ) then
      UO.UseType( steaks )
     else
      UO.UseType( ribs )
    endif
    else
     return
    endif
;**************************************************
    LastTimer=UO.Timer()
      repeat
        wait(50)
      until UO.InJournal("burn|You put|положили|fail|сожгли|не удалось") or UO.Timer()>LastTimer+100
    ELSE
     UO.Print(' = Сырое мясо кончилось = ')
          UO.FindType( meat1 )
       If UO.FindCount() > 0 Then
          UO.MoveItem( 'finditem', '0' , BagForMeat )
             wait( 300 )
       Endif
          UO.FindType( meat2 )
       If UO.FindCount() > 0 Then
          UO.MoveItem( 'finditem', '0' , BagForMeat )
             wait( 300 )
       Endif
     UO.Print(' = Жареное мясо спрятано = ')
    return
  ENDIF
 WEND
end sub
Author:  zzuull [ 2009-11-07 08:01:07 ]
Post subject: 
Вся проблема в том, что тайп сырой части тела и жареной одинаковый=(
Мало того когда жаришь кусок тела он остаётся там где был сырой+(((

Вообщем будем ждать, может быть кто нибудь может помочь)
Author:  Mirage [ 2009-11-07 10:18:20 ]
Post subject: 
Проблема не в типах а в правильной формулировке проблемы :)))
ты же не сказал что типы одинаковые. Делов то:
1)2 сундука в одном части тела сырые посередине печь
2)берем часть жарим скидываем во второй сундук.
Author:  zzuull [ 2009-11-07 12:10:06 ]
Post subject: 
Я в инже не очень разбираюсь+( Не могу найти в этом скрипте где указан айди сумки из какой брать кусок тела?
Можешь носом меня ткнуть куда, где и что нужно поменять)))Если не затруднит тебя конечно)
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/