Code: Select all
UO.FindType('0x1B73',-1,-1)
wait(500)
If UO.GetQuantity('finditem')>5 then
UO.UseObject('0x40041B2F') ; Фордж
UO.WaitTargetObject('finditem')
else
Endif
Moderators: Murderator+, Murderator
Code: Select all
UO.FindType('0x1B73',-1,-1)
wait(500)
If UO.GetQuantity('finditem')>5 then
UO.UseObject('0x40041B2F') ; Фордж
UO.WaitTargetObject('finditem')
else
Endif
Code: Select all
UO.UseObject('0x40041B2F') ; Фордж
UO.WaitTargetObject('finditem') Code: Select all
UO.WaitTargetObject('finditem')Code: Select all
UO.UseObject('0x40041B2F')Code: Select all
UO.WaitTargetObject('finditem')
UO.UseObject('0x40041B2F') Code: Select all
sub BS()
var LastTimer,box1,forge
while not uo.dead()
uo.useskill ('Spirit Speak')
################################
######### берём инги #########
################################
UO.FindType('0x1BEF',-1,'backpack')
If UO.GetQuantity('finditem')<10 then
UO.FindType('0x1BEF','0x0000', '0x40074018' )
wait(1000)
UO.Grab('200','finditem')
Endif
################################
######### переплавка #########
################################
UO.FindType('0x0F51','0x000','backpack') ; ищем ножи
wait(500)
If UO.GetQuantity('finditem')>5 then
UO.WaitTargetObject('finditem')
UO.UseObject('0x40024CDE') ; Фордж
else
Endif
#############################
######### ковка #########
#############################
LastTimer=UO.Timer()
UO.DeleteJournal()
UO.UseType('0x1BEF')
UO.WaitMenu('Blacksmithing','Weapons','Weapons','Sword','Sword','dagger')
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
Else
EndIf
wend
end sub
pandinus wrote:да я пробовал так и так- всё равно не хочет
вот мой скрипт. всё работает, дагеры находит а форджу юзать не хочет
Code: Select all
sub BS() var LastTimer,box1,forge while not uo.dead() uo.useskill ('Spirit Speak') ################################ ######### берём инги ######### ################################ UO.FindType('0x1BEF',-1,'backpack') If UO.GetQuantity('finditem')<10 then UO.FindType('0x1BEF','0x0000', '0x40074018' ) wait(1000) UO.Grab('200','finditem') Endif ################################ ######### переплавка ######### ################################ UO.FindType('0x0F51','0x000','backpack') ; ищем ножи wait(500) If UO.GetQuantity('finditem')>5 then UO.WaitTargetObject('finditem') UO.UseObject('0x40024CDE') ; Фордж else Endif ############################# ######### ковка ######### ############################# LastTimer=UO.Timer() UO.DeleteJournal() UO.UseType('0x1BEF') UO.WaitMenu('Blacksmithing','Weapons','Weapons','Sword','Sword','dagger') 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 Else EndIf wend end sub
Code: Select all
################################
######### переплавка #########
################################
UO.FindType('0x0F51','-1','backpack') ; ищем ножи
wait(500)
If UO.GetQuantity('finditem')>5 then
UO.WaitTargetObject('finditem')
UO.UseObject('0x40024CDE') ; Фордж
Endif
pandinus wrote:да я пробовал так и так- всё равно не хочет
вот мой скрипт. всё работает, дагеры находит а форджу юзать не хочет
Code: Select all
sub BS() var LastTimer,box1,forge while not uo.dead() uo.useskill ('Spirit Speak') ################################ ######### берём инги ######### ################################ UO.FindType('0x1BEF',-1,'backpack') If UO.GetQuantity('finditem')<10 then UO.FindType('0x1BEF','0x0000', '0x40074018' ) wait(1000) UO.Grab('200','finditem') Endif ################################ ######### переплавка ######### ################################ UO.FindType('0x0F51','0x000','backpack') ; ищем ножи wait(500) If UO.GetQuantity('finditem')>5 then UO.WaitTargetObject('finditem') UO.UseObject('0x40024CDE') ; Фордж else Endif ############################# ######### ковка ######### ############################# LastTimer=UO.Timer() UO.DeleteJournal() UO.UseType('0x1BEF') UO.WaitMenu('Blacksmithing','Weapons','Weapons','Sword','Sword','dagger') 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 Else EndIf wend end sub
Code: Select all
################################
######### переплавка #########
################################
UO.FindType('0x0F51','-1','backpack') ; ищем ножи
wait(500)
If UO.GetQuantity('finditem') then
UO.WaitTargetObject('finditem')
UO.UseObject('0x40024CDE') ; Фордж
Endif
для того чтоб выполнялись операторы после then условие должно принять значение true .....Cooper wrote:
Пробуй так: и заодно проверь ID ФоржыCode: Select all
################################ ######### переплавка ######### ################################ UO.FindType('0x0F51','-1','backpack') ; ищем ножи wait(500) If UO.GetQuantity('finditem') then UO.WaitTargetObject('finditem') UO.UseObject('0x40024CDE') ; Фордж Endif
Code: Select all
################################
######### переплавка #########
################################
UO.FindType('0x0F51','0x000','backpack') ; ищем ножи
wait(500)
If UO.FindCount('finditem')>5 then
UO.WaitTargetObject('finditem')
UO.UseObject('0x40024CDE') ; Фордж
Endif
pandinus wrote: вот так???
так тоже не пашет..
я челу дал скрипт у него даже инги из сундука не берёт
Ну тогда тебе сюда:pandinus wrote:да, скорее всего не со скриптом.....
и месьами я менял...