Yoko

All sides of Injection
It is currently 2026-01-21 23:56:12

All times are UTC+02:00




Post new topic  Reply to topic  [ 6 posts ] 
Author Message
 Post subject: БС
PostPosted: 2006-09-28 18:47:44 
Offline

Joined: 2006-03-05 17:13:50
Posts: 37
Ребята прошу впишите мне в скриптик чтобы чар делал Катаны из расти!!!
Я в скриптах не разбираюсь! Очень вас прошу!

Вот скрипт:

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


Top
   
 Post subject:
PostPosted: 2006-09-28 19:24:01 
Offline
Expert!
User avatar

Joined: 2005-09-14 15:31:58
Posts: 2152
Location: Latvia
у расти тотже тайп ?
если да тогда дай колор...
если нет тогда дай тайп
ендпостинг

:roll:

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net


Top
   
 Post subject:
PostPosted: 2006-09-28 23:16:56 
Offline

Joined: 2006-03-05 17:13:50
Posts: 37
NMY wrote:
у расти тотже тайп ?
если да тогда дай колор...
если нет тогда дай тайп
ендпостинг

:roll:



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


Top
   
 Post subject:
PostPosted: 2006-09-29 03:51:32 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
Code:
UO.FindType('0x1BEF',-1,'backpack') 
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x0E7C','0x0000','0x403F4087') ;Cундук с ингами


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


Top
   
 Post subject:
PostPosted: 2006-09-29 20:55:46 
Offline
Expert!
User avatar

Joined: 2005-05-20 20:30:10
Posts: 548
надо поменять название в меню на катаны, поменять тип объекта который плавить на катаны
и юзать [code]


Top
   
 Post subject:
PostPosted: 2006-09-30 04:16:29 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
Mihail wrote:
надо поменять название в меню на катаны, поменять тип объекта который плавить на катаны
и юзать


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

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


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


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

All times are UTC+02:00


Who is online

Users browsing this forum: Bing [Bot] 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:  
Powered by phpBB® Forum Software © phpBB Limited