Yoko

All sides of Injection
It is currently 2025-12-03 18:02:08

All times are UTC+02:00




Post new topic  Reply to topic  [ 10 posts ] 
Author Message
PostPosted: 2007-12-12 18:18:25 
Offline

Joined: 2007-03-16 21:14:31
Posts: 65
Подскажите что тут нужно исправить чтобы чар брал по 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


Top
   
 Post subject:
PostPosted: 2007-12-12 19:12:20 
Offline
User avatar

Joined: 2005-06-07 21:05:18
Posts: 67
UO.moveitem('finditem', '1', 'backpack','30','50','50')

число 1 в этой строке указывает на то, сколько брать.


Top
   
 Post subject:
PostPosted: 2007-12-13 07:42:03 
Offline

Joined: 2007-03-16 21:14:31
Posts: 65
Спасибо. Он теперь берет по 5 но почемуто непереплавляет их в инготы.


Top
   
 Post subject:
PostPosted: 2007-12-13 08:35:39 
Offline

Joined: 2007-07-20 18:57:45
Posts: 36
'30','50','50')
а эт че такое?:)


Top
   
 Post subject:
PostPosted: 2007-12-13 11:58:39 
Offline
User avatar

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


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

у кучки type другой


Top
   
 Post subject:
PostPosted: 2007-12-13 15:57:15 
Offline

Joined: 2007-03-16 21:14:31
Posts: 65
подскажите как исправить плизз


Top
   
 Post subject:
PostPosted: 2007-12-13 16:25:10 
Offline
User avatar

Joined: 2005-04-05 04:13:24
Posts: 139
Location: DRW
,info на кучку с ироном и здесь UO.usetype('0x19B7') вписать тип, если он другой


Top
   
 Post subject:
PostPosted: 2007-12-13 19:10:11 
Offline

Joined: 2007-03-16 21:14:31
Posts: 65
вот что он мне выдал

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


Top
   
PostPosted: 2007-12-14 15:31:28 
Offline
User avatar

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


Попробуй

Поздравляю иришку с др


Last edited by ZeroDX on 2010-04-23 01:34:24, edited 1 time in total.

Top
   
 Post subject:
PostPosted: 2007-12-14 19:53:19 
Offline

Joined: 2007-03-16 21:14:31
Posts: 65
ZeroDX спасибо большое все работает :)


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 10 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 7 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
cron
Powered by phpBB® Forum Software © phpBB Limited