Брать вещь из сундука

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
-Time-
Posts: 28
Joined: 2004-06-15 00:49:22
Contact:

Брать вещь из сундука

Post by -Time- »

ПОдскажите как к примеру когда заканчиваються логи брать их из сундука и дальше продолжать делать стрелы ? )


Спасибо
BETEPAH
Expert!
Posts: 838
Joined: 2004-05-31 09:31:51
Contact:

Post by BETEPAH »

Code: Select all

 
#####################################################
###       BowCraf BowBolts Script v. 1.00.        ###
###                                               ###
###  Copyright & tested by cOoler on DRW Shard.   ###
###                                               ###
### Oficial DRW Shards site - http://www.drw.ru   ###
#####################################################
#####################################################
###   Инструкция по использованию и настройке.    ###
#####################################################
### 1. Для работы этого скрипта надо: сундук,
### перья,шафты,пила(или другой инструмент).
###
### 2. Описание подготовки к запуску скрипта.
### Берём сундук (можно и backpack),меняем в скрипте
### ID сундука на свой,кладем в него шафты,а к себе в
### backpack перья и пилу,запускаем скрипт.
###
### 3. При использовании скрипта вам так или иначе
### придется менять конфигурации скрипта.
### Вот как и где это НУЖНО сделать:
###
### $ Сменa ID сундука и типа шафтов.
### 1) UO.FindType('тип шафтов','0x0000','backpack')- тут вы
### указываете: тип шафтов.
### 2) UO.FindType('тип шафтов','colour сундука','ID сундука')- тут вы
### указываете: тип шафтов,его colour,ID сундука.
##################################################### 
###               Конец инструкции.               ###
#####################################################

sub Bowcraft()
repeat
UO.FindType('0x1bd4','0x0000','backpack')
put:
If UO.GetQuantity('finditem')<1 then
UO.FindType('0x1bd4','0x0000','0x40160062') ;Сериал сундука
UO.Grab('1','finditem')
wait(400)
Endif
UO.FindType('0x1bd4','0x0000','backpack')
If UO.GetQuantity('finditem')<1 then
goto put
end if
UO.Usetype('0x1bd4')
UO.WaitMenu('Select arrow type','bolt')
wait (1000)
UO.DeleteJournal()
while not (UO.InJournal("You put") or UO.InJournal("You fail"))
wait(300)
wend
UO.UnSetReceivingContainer()
wait(200)
until UO.Dead()
end sub 


Вот на примере этого смотри как

UO.FindType('вид лога','цвет лога ','backpack') === Ищим логи у тебя в сумке (backpack)
If UO.GetQuantity('finditem')<1 then=== !!начало проверки!! Если (IF) найденое количество МЕНЬШЕ 1 то тогда (Then)
UO.FindType('вид','цвет','Сундук') ===находим логи по виду и цвету в сундуке (в котором логи )
UO.Grab('количество логов','finditem') === берем №ое количество логов в сундуке
wait(400) === ждем 0,4 сек
Endif === !!конец проверки!! (просто если бы он нашел БОЛЬШЕ 1 лога у тя в сумке он не брал бы еще)

Вот вроде и все..
Все просто.
BETEPAH ™
-Time-
Posts: 28
Joined: 2004-06-15 00:49:22
Contact:

Post by -Time- »

спасибо
всё работает ;)
вернее взял кусок поделал под свой код и всё ок )
Post Reply