Yoko

All sides of Injection
It is currently 2026-01-16 19:54:13

All times are UTC+02:00




Post new topic  Reply to topic  [ 3 posts ] 
Author Message
PostPosted: 2004-07-29 09:58:54 
Offline

Joined: 2004-06-15 00:49:22
Posts: 28
ПОдскажите как к примеру когда заканчиваються логи брать их из сундука и дальше продолжать делать стрелы ? )


Спасибо


Top
   
 Post subject:
PostPosted: 2004-07-29 10:16:31 
Offline
Expert!
User avatar

Joined: 2004-05-31 09:31:51
Posts: 838
Code:
 
#####################################################
###       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 ™


Top
   
 Post subject:
PostPosted: 2004-08-03 09:57:29 
Offline

Joined: 2004-06-15 00:49:22
Posts: 28
спасибо
всё работает ;)
вернее взял кусок поделал под свой код и всё ок )


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

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 4 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