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

Как исправить
http://forum.yoko.com.ua/viewtopic.php?f=20&t=12890		 Page 1 of 1
Author:  Knout [ 2007-12-12 18:18:25 ]
Post subject:  Как исправить
Подскажите что тут нужно исправить чтобы чар брал по 5 оре а не по 1 и переплавлял в инги. Заранее спасибо

вот скрипт

Code:
sub Smelt() ; Ïåðåïëàâêà
    UO.Set('quiet','off')
   repeat
    UO.findtype('0x19B9', '-1', 'my') ; Èùåì áîëüøîé êóñîê ðóäû, áîëüøå 3-õ â êó÷å
    if (UO.FindCount()==0) then
       UO.findtype('0x19B8', '-1', 'my') ; Èùåì ñðåäíèé êóñîê ðóäû, òðè â êó÷å
       if (UO.FindCount()==0) then
          UO.findtype('0x19BA', '-1', 'my') ; Èùåì ìàëåíüêèé êóñîê ðóäû, äâå â êó÷å
          if (UO.FindCount()==0) then
             UO.findtype('0x19B7', '-1', 'my') ; Èùåì îäíó åäåíèöó ðóäû ñàìàÿ ìåëêàÿ
             if (UO.FindCount()==0) then
                GOTO Exit ; åñëè â ïàêå íåòó íå îäíîé èç ðóä òî âûõîäèì(çàâåðøàÿ ñêðèïò)
             else   
                UO.usetype('0x19B7') ; ïåðåïëàâëÿåì (îäíó åäåíèöó ðóäû ñàìàÿ ìåëêàÿ)
             endif
          endif
       endif
    endif ; åñëè æå êàêàÿ òî êó÷êà åñòü òî  
    UO.moveitem('finditem', '1', 'backpack','30','50','50') ; ïåðåìåùÿåì å¸ â óãîë ïàêà
    Wait(100)                                               ; æä¸ì ïåðåìåùåíèÿ (ìîíà èçìåíÿòü)
    UO.usetype('0x19B7')                                    ; ïåðåïëàâëÿåì!
   until not UO.FindCount() ; äîïîëíèòåëüíàÿ ïðîâåðêà íà íàõîæäåíèå ðóäû...
Exit:
    UO.Print('Óñ¸... Âñ¸ ÷òî ìîãëè - ïåðåïëàâèëè...')
end sub
Author:  Cornor [ 2007-12-12 19:12:20 ]
Post subject: 
UO.moveitem('finditem', '1', 'backpack','30','50','50')

число 1 в этой строке указывает на то, сколько брать.
Author:  Knout [ 2007-12-13 07:42:03 ]
Post subject: 
Спасибо. Он теперь берет по 5 но почемуто непереплавляет их в инготы.
Author:  Zodroteg UO [ 2007-12-13 08:35:39 ]
Post subject: 
'30','50','50')
а эт че такое?:)
Author:  stickman [ 2007-12-13 11:58:39 ]
Post subject: 
Zodroteg UO wrote:
'30','50','50')
а эт че такое?:)


ет кажись координаты в бп, куда складывается finditem

у кучки type другой
Author:  Knout [ 2007-12-13 15:57:15 ]
Post subject: 
подскажите как исправить плизз
Author:  stickman [ 2007-12-13 16:25:10 ]
Post subject: 
,info на кучку с ироном и здесь UO.usetype('0x19B7') вписать тип, если он другой
Author:  Knout [ 2007-12-13 19:10:11 ]
Post subject: 
вот что он мне выдал

Code:
ID=0x418FE958 Type=0x0EB3 ONNAPOD Name=
Quantity: 1  Colour: 0x0000  Layer: 0  Has: 1
X=101 Y=65 Z=0 C=0x4187942E F=0x00

ID=0x418D2A0D Type=0x19B9 JJHQOOD Name=50 iron ore
Quantity: 50  Colour: 0x0000  Layer: 0  Has: 1
X=57 Y=91 Z=0 C=0x4187942E F=0x00
Author:  ZeroDX [ 2007-12-14 15:31:28 ]
Post subject:  Re: Как исправить
Code:
sub Smelt()
  UO.Set('quiet','off')
  Repeat
    UO.FindType('0x19B9', '-1', 'my')
    If UO.FindCount() == 0 then
      UO.FindType('0x19B8', '-1', 'my')
      If UO.FindCount() == 0 then
        UO.FindType('0x19BA', '-1', 'my')
        If UO.FindCount() == 0 then
          UO.FindType('0x19B7', '-1', 'my')
          If UO.FindCount() ==0 then
            GoTo Exit
           Else   
            UO.UseType('0x19B7')
          EndIf
        EndIf
      EndIf
    EndIf
    UO.MoveItem('finditem', '5', 'backpack','30','50','50')
    Wait(100)
    UO.usetype('0x19B9')
  Until not UO.FindCount()
  Exit:
  UO.Print('Óñ¸... Âñ¸ ÷òî ìîãëè - ïåðåïëàâèëè...')
EndSub


Попробуй

Поздравляю иришку с др
Author:  Knout [ 2007-12-14 19:53:19 ]
Post subject: 
ZeroDX спасибо большое все работает :)
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/