Code
;Вот комбинация двух скриптов на Stealth и Detect Hiden:
;Ставим двух чаров в разных окнах одному пихаем один другому другой.
;1 чар:
sub Detect_Hidden()
Var i=0
repeat
i=i+1
cheklag()
uo.UseSkill('Detect Hidden')
uo.deletejournal()
repeat
wait(10)
until UO.InJournal("You can see nothing hidden there.") or UO.InJournal("You find")
if i==50 then
i=0
cheklag()
uo.useskill ("Spirit Speak")
uo.deletejournal()
repeat
wait(10)
until UO.InJournal("You establish a connection to the netherworld.") or UO.InJournal("You fail your attempt at contacting the netherworld.")
uo.usetype('0x09BB')
wait(1000)
end if
until uo.Dead()
end sub
;2 чар:
sub Stealth()
var i=1
repeat
for i=1 to 8
uo.press(35)
wait(200)
if not uo.hidden() then
UO.UseSkill("Stealth")
UO.DeleteJournal()
Repeat
Wait(10)
Until UO.InJournal("You have hidden yourself well") or UO.InJournal("You can't seem to hide here.")
end if
next
for i=1 to 8
uo.press(33)
wait(200)
if not uo.hidden() then
UO.UseSkill("Stealth")
UO.DeleteJournal()
Repeat
Wait(10)
Until UO.InJournal("You have hidden yourself well") or UO.InJournal("You can't seem to hide here.")
end if
next
Wait(100)
until UO.Dead()
end sub
sub CheckLag()
uo.DeleteJournal()
uo.Click('backpack')
repeat
wait(50)
until uo.InJournal('backpack')
end sub