Mozno kak nibudj pomenjatj v skripte Bronzovie s4iti na Ring mail(ring mail sleeves)! JA v etom dele 0 nadejusj vi mne pomozete
Vot skript(Obaldennij)
sub BlacksmithyIM()
VAR Exit=0, LastTimer
while Exit<>1
UO.DeleteJournal()
LastTimer=UO.Timer()
UO.WaitMenu('Blacksmithing','Shield','Shield','bronze shield') ;?oi eoai
UO.UseType(0x1BEF) ;Eiae ae?iia
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 ;A?aiy nicaaiey aaaa?a
EndIf
UO.FindType('0x1B72',-1,'backpack')
wait(500)
If UO.GetQuantity('finditem') then
UO.WaitTargetObject('finditem')
UO.UseObject(0x400D7F9C) ; Oi??
Endif
UO.FindType('0x1BEF',-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x1BEF','0x0000','0x4032B444') ;Coiaoe n eiaaie
wait(1000)
UO.Grab('750','finditem')
Endif
wait(1000)
wend
end sub
