Как исправить

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Knout
Posts: 65
Joined: 2007-03-16 21:14:31

Как исправить

Post by Knout »

Подскажите что тут нужно исправить чтобы чар брал по 5 оре а не по 1 и переплавлял в инги. Заранее спасибо

вот скрипт

Code: Select all

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
Top
Cornor
Posts: 67
Joined: 2005-06-07 21:05:18

Post by Cornor »

UO.moveitem('finditem', '1', 'backpack','30','50','50')

число 1 в этой строке указывает на то, сколько брать.
Top
Knout
Posts: 65
Joined: 2007-03-16 21:14:31

Post by Knout »

Спасибо. Он теперь берет по 5 но почемуто непереплавляет их в инготы.
Top
Zodroteg UO
Posts: 36
Joined: 2007-07-20 18:57:45

Post by Zodroteg UO »

'30','50','50')
а эт че такое?:)
Top
stickman
Posts: 139
Joined: 2005-04-05 04:13:24
Location: DRW
Contact:
Contact stickman

Post by stickman »

Zodroteg UO wrote:'30','50','50')
а эт че такое?:)


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

у кучки type другой
Top
Knout
Posts: 65
Joined: 2007-03-16 21:14:31

Post by Knout »

подскажите как исправить плизз
Top
stickman
Posts: 139
Joined: 2005-04-05 04:13:24
Location: DRW
Contact:
Contact stickman

Post by stickman »

,info на кучку с ироном и здесь UO.usetype('0x19B7') вписать тип, если он другой
Top
Knout
Posts: 65
Joined: 2007-03-16 21:14:31

Post by Knout »

вот что он мне выдал

Code: Select all

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
Top
ZeroDX
Posts: 718
Joined: 2006-12-08 10:51:50
Location: Москва
Contact:
Contact ZeroDX

Re: Как исправить

Post by ZeroDX »

Code: Select all

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


Попробуй

Поздравляю иришку с др
Last edited by ZeroDX on 2010-04-23 01:34:24, edited 1 time in total.
Top
Knout
Posts: 65
Joined: 2007-03-16 21:14:31

Post by Knout »

ZeroDX спасибо большое все работает :)
Top
Post Reply

Return to “Scripting Ore”