может кто нибудь изменить этот скрипт чтоб вместо даггеров ковал
Platemail gorget
sub BlacksmithyIM()
VAR Exit=0, LastTimer
while Exit<>1
UO.DeleteJournal()
LastTimer=UO.Timer()
UO.WaitMenu('Blacksmithing','Weapons','Weapons','Swords','Swords','dagger') ;??? ????
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(0x401191DD) ; ????
Endif
UO.FindType('0x1BEF',-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x1BEF','0x0000','0x4013C4AA') ;C????? ? ??????
wait(1000)
UO.Grab('1000','finditem')
Endif
wait(1000)
wend
end sub
как изменить скрипт
Moderators: Murderator+, Murderator
Code: Select all
UO.WaitMenu 'Blacksmithing','Weapons','Weapons','Swords','Swords','dagger')
А сам тут поменять не могешь ?....... вбей названия окон крафта для своего выбора.
Все просто.
BETEPAH ™
BETEPAH ™
-
- Expert!
- Posts: 1205
- Joined: 2004-04-04 11:13:54
- Location: Балаково, Саратовская обл.
- Contact:
Менять название ингов и цвет их в строках:
IngName="Shadow"
IngColor='0x096B'
IngName="Shadow"
IngColor='0x096B'
Code: Select all
;==-==-===-==-=-==-===-=--===-=-=-=-===--=-=-=-=-=-=-=-=
sub gorget()
VAR IngName, IngColor
IngName="Shadow"
IngColor='0x096B'
UO.AutoMenu(IngName+' Plate','Platemail Gorget')
UO.AutoMenu(IngName+' Armor','Plate')
UO.AutoMenu('Colored','Armor')
UO.AutoMenu('Blacksmithing','Colored')
UO.FindType('0x1BEF',IngColor,'backpack')
While UO.GetQuantity('finditem')>=10
UO.DeleteJournal()
UO.UseObject('finditem')
while NOT UO.InJournal("You put") AND NOT UO.InJournal("You have failed")
wait(500)
wend
Wend
UO.CancelMenu()
end sub
Burik_ wrote:изменил но наверное не так
UO.WaitMenu('Blacksmithing','Armor','Plate Mail','platemail gorget') ;??? ????
помогите как правильно я совсем ноль в скриптах
Code: Select all
UO.WaitMenu('Blacksmithing','Armor','Armor','Plate Mail','Plate Mail','platemail gorget')