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

БС
http://forum.yoko.com.ua/viewtopic.php?f=20&t=8907
Page 1 of 1

Author:  Dim [ 2006-09-28 18:47:44 ]
Post subject:  БС

Ребята прошу впишите мне в скриптик чтобы чар делал Катаны из расти!!!
Я в скриптах не разбираюсь! Очень вас прошу!

Вот скрипт:

sub BlacksmithyIM()

VAR Exit=0, LastTimer
while Exit<>1
UO.DeleteJournal()
LastTimer=UO.Timer()
UO.WaitMenu('Blacksmithing','Weapons','Weapons','Swords','Swords','Katana') ;Что куем
UO.UseType(0x1BEF) ;Инги айрона

while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed")
wait(500)
wend

If UO.InJournal("You have failed") then
repeat
wait(100)
until UO.Timer()>=LastTimer+100 ;Время создания дагера
EndIf

UO.FindType('0x13FE',-1,'backpack')
wait(500)

If UO.GetQuantity('finditem') then
UO.WaitTargetObject('finditem')
UO.UseObject(0x4048415F) ; Форж
Endif

UO.FindType('0x1BEF',-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x0E7C','0x0000','0x403F4087') ;Cундук с ингами
wait(1000)
UO.Grab('1000','finditem')
Endif
wait(1000)
wend
end sub

Author:  Nmy [ 2006-09-28 19:24:01 ]
Post subject: 

у расти тотже тайп ?
если да тогда дай колор...
если нет тогда дай тайп
ендпостинг

:roll:

Author:  Dim [ 2006-09-28 23:16:56 ]
Post subject: 

NMY wrote:
у расти тотже тайп ?
если да тогда дай колор...
если нет тогда дай тайп
ендпостинг

:roll:



0x1BEF - это тип расти :oops:

Author:  Scripts Writer [ 2006-09-29 03:51:32 ]
Post subject: 

Code:
UO.FindType('0x1BEF',-1,'backpack') 
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x0E7C','0x0000','0x403F4087') ;Cундук с ингами


Тогда что мы ищем в последней строке?

Author:  Mihail [ 2006-09-29 20:55:46 ]
Post subject: 

надо поменять название в меню на катаны, поменять тип объекта который плавить на катаны
и юзать [code]

Author:  Scripts Writer [ 2006-09-30 04:16:29 ]
Post subject: 

Mihail wrote:
надо поменять название в меню на катаны, поменять тип объекта который плавить на катаны
и юзать


И сколько ты накуешь? 1000 ингов а потом ступор? Еще раз акцентирую внимание :

Code:
 UO.FindType('0x0E7C','0x0000','0x403F4087') ;Cундук с ингами 


Далее идет добор в кол-ве 1000штук!

Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/