Вот у меня скрипт он почему то глючит чуть, отходит через определеное время а не когда у одного из чаров 35 хп. Я думаю тут глюк
Quote:
Until (UO.InJournal("Do you wanna"))
как вставить место этих слов until хп ис фулл?
Code:
sub fight()
while 1
gotoxy(3422,437,0) # куда подходить чтоб драться
wait (300)
UO.Exec("attack 0x000991F7") #2-й чар кого бить
Repeat
wait (500)
if uo.injournal("")then
UO.usetype("") # оружие
uo.deletejournal()
endif
Until ((UO.GetHP("0x0008E9D0") <35)or (UO.GetHP("0x000991F7") <35)) #
#проверка хп у первого и вторго чара
repeat
UO.Exec("warmode 0") # вармод
UO.Press(35) # отходим End
UO.Press(35) # отходим End
until (gotoxy(3422,439,0)) # куда отходить лечиться
Repeat
UO.Usetype("0x0E21") #Bandages
UO.Exec("waittargetobject 0x0008E9D0") # 1-й чар
wait(3500)
Until (UO.InJournal("Do you wanna"))
wait(5000)
wend
end sub
Register
Login
FAQ
Search
