Yoko

Code: Select all

VAR Sunduk = '0x40422EA0' ; ID сундука
VAR Hammer = '0x13E3' ; тип Smith's Hammer
VAR Tols = '0x0000' ; тип Disenchanting Tools
VAR LastTimer

sub Blue()
UO.DeleteJournal()
UO.FindType('0x1BF2','0x078D',Sunduk)
CheckLag()
If UO.FindCount() > 20 Then
UO.MoveItem(finditem,'20','2')
Wait(200)
CheckLag()
UO.WaitMenu('Blacksmithing','Colored Armor','Colored Armor','Blue Armor','Blue Armor','Blue Gorget')
UO.UseType(Hammer)
Repeat 
Wait(500)
Until UO.InJournal("положили") Or UO.InJournal("не удалось") Or UO.Timer()>LastTimer+200
CheckLag()
UO.FindType('0x1413','0x078D','2')
CheckLag()
If UO.FindCount() > 0 Then
UO.WaitTargetType(finditem)
UO.UseType(Tols)
Wait(300)
CheckLag()
Ejection()
End Sub

Sub CheckLag()
uo.DeleteJournal()
repeat
    uo.click('backpack')
    wait(200)
until UO.InJournal("backpack|Backpack")
end sub

Code: Select all

uo.exec( "terminate Лень" )
var f = file( "Уроки" )
f.open()
while not f.eof()
   f.readString()
wend
f.close()