Помогите немного с бс
Posted: 2007-11-10 02:29:04
переделайте плз так чтоб:
1)место дагера делал armor---->Chainmail------>Chainmail tunic
2)Делал пока не закончитса метал
Буду Очень благодарен
sub blacksmith()
VAR LastTimer
repeat
UO.Print('Îñòàëîñü ' + Str( UO.Count( 0x1BEF ) ) + ' ñëèòêîâ æåëåçà' )
UO.Print('Îñòàëîñü ñäåëàòü ' + Str( 51-UO.Count( 0x0F51 ) ) + ' êèíæàëîâ' )
if UO.Count( '0x1BEF' ) < 6 then
Uo.Print("Êîí÷èëèñü äðîâèøêè!")
return
endif
UO.DeleteJournal()
UO.WaitMenu ('Blacksmithing', 'Weapons', 'Weapons', 'Fencing', 'Fencing', 'Dagger')
UO.WaitTargetType ('0x1BEF')
UO.UseType( '0x13E3' )
LastTimer=UO.Timer()
;repeat
wait(600)
; until UO.InJournal ("Âû èçãîòîâèëè") OR ("íå óäàëîñü") OR ("You put") OR UO.InJournal("fail") OR ("Âû ïîëîæèëè") OR UO.Timer()>LastTimer+200
while not (uo.injournal("You put")) and not (uo.injournal("Tinkering failed")) and not (uo.injournal("Âû ïîëîæèëè")) and not (uo.injournal("Âû èçãîòîâèëè"))and not (uo.injournal("íå óäàëîñü"))
wait(200)
wend
If UO.Count(0x0F51)>200 then
UO.Print("Ñäàé çàêàçû, éîïòâàþ!")
UO.Print("Ñäàé çàêàçû, éîïòâàþ!")
UO.Print("Ñäàé çàêàçû, éîïòâàþ!")
return
endif
If Uo.Weight>999 then
Uo.Print('Âñå, ïåðåâåñ, áëèí. Âûáðîñü âñå íàõðåí!')
UO.Print('Â ïàêå' + Str( UO.Count( 0x0F51 ) ) + 'êèíæàëîâ' )
return
endif
until UO.DEAD()
end sub
1)место дагера делал armor---->Chainmail------>Chainmail tunic
2)Делал пока не закончитса метал
Буду Очень благодарен
sub blacksmith()
VAR LastTimer
repeat
UO.Print('Îñòàëîñü ' + Str( UO.Count( 0x1BEF ) ) + ' ñëèòêîâ æåëåçà' )
UO.Print('Îñòàëîñü ñäåëàòü ' + Str( 51-UO.Count( 0x0F51 ) ) + ' êèíæàëîâ' )
if UO.Count( '0x1BEF' ) < 6 then
Uo.Print("Êîí÷èëèñü äðîâèøêè!")
return
endif
UO.DeleteJournal()
UO.WaitMenu ('Blacksmithing', 'Weapons', 'Weapons', 'Fencing', 'Fencing', 'Dagger')
UO.WaitTargetType ('0x1BEF')
UO.UseType( '0x13E3' )
LastTimer=UO.Timer()
;repeat
wait(600)
; until UO.InJournal ("Âû èçãîòîâèëè") OR ("íå óäàëîñü") OR ("You put") OR UO.InJournal("fail") OR ("Âû ïîëîæèëè") OR UO.Timer()>LastTimer+200
while not (uo.injournal("You put")) and not (uo.injournal("Tinkering failed")) and not (uo.injournal("Âû ïîëîæèëè")) and not (uo.injournal("Âû èçãîòîâèëè"))and not (uo.injournal("íå óäàëîñü"))
wait(200)
wend
If UO.Count(0x0F51)>200 then
UO.Print("Ñäàé çàêàçû, éîïòâàþ!")
UO.Print("Ñäàé çàêàçû, éîïòâàþ!")
UO.Print("Ñäàé çàêàçû, éîïòâàþ!")
return
endif
If Uo.Weight>999 then
Uo.Print('Âñå, ïåðåâåñ, áëèí. Âûáðîñü âñå íàõðåí!')
UO.Print('Â ïàêå' + Str( UO.Count( 0x0F51 ) ) + 'êèíæàëîâ' )
return
endif
until UO.DEAD()
end sub