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

БС
http://forum.yoko.com.ua/viewtopic.php?f=20&t=7088		 Page 1 of 1
Author:  ViSerT [ 2006-03-22 22:02:28 ]
Post subject:  БС
Вот скрипт клепает дагеры и сразу их палит... но вот если дагеры заменить напримет на баклер он перестает плавить то что я намудрил.. как быть?
Quote:
sub BlacksmithyIM()
VAR Ingi = '0x1BEF'
VAR Exit=0, LastTimer
while Exit<>1
UO.DeleteJournal()
LastTimer=UO.Timer()
UO.WaitMenu('Blacksmithing','Shields','Shields','buckler') ;Что куем
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('0x0F51',-1,'backpack')
wait(500)

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

UO.FindType('0x404C302B',-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType(ingi,-1,'ground') ;Cундук с ингами
wait(1000)
UO.Grab('8','finditem')
Endif
wait(1000)
wend
end sub
Author:  Grin [ 2006-03-22 22:39:12 ]
Post subject: 
Code:
UO.FindType('0x1B73',-1,'backpack') 
wait(500) 

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


Code:
UO.FindType('0x404C302B',-1,'backpack') 
If UO.GetQuantity('finditem')<10 then 
UO.FindType(ingi,-1,'ground') ;Cундук с ингами 
wait(1000) 
UO.Grab('8','finditem') 
Endif


тут ошибка... скорей всего имеолось ввиду

Code:
UO.FindType(ingi,-1,'backpack') 
If UO.GetQuantity('finditem')<10 then 
UO.FindType(ingi,-1,'ground') ;Cундук с ингами 
wait(1000) 
UO.Grab('8','finditem') 
Endif
Author:  ViSerT [ 2006-03-24 02:31:58 ]
Post subject: 
Мужыки не плавит баклеры... ничего не могу поделать... зря айрон стынет... помогите
Author:  Kynep [ 2006-03-24 06:15:07 ]
Post subject: 
ViSerT wrote:
Мужыки не плавит баклеры... ничего не могу поделать... зря айрон стынет... помогите


Тебе же написали:

Code:
UO.FindType('0x1B73',-1,'backpack')  ##Тут тип того что плавим
wait(500) 

If UO.GetQuantity('finditem') > 0 then 
UO.WaitTargetObject('finditem') 
UO.UseObject(0x40448838) ; Форж 
Endif
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/