sub forens()
var obj2
uo.ignorereset()
uo.ignore('0x0000E326') ; это типа я
while not uo.dead()
UO.FindType('0x0190', '-1', '1') ; Ищем на земле чела и засовываем его в переменную
wait(500)
obj2 = UO.GetSerial("finditem")
uo.print(obj2)
wait(500)
UO.UseSkill('Evaluating Intelligence',obj2)
wait(1500)
wend
end sub
sub stl()
VAR SkillTimer=0
VAR TimeToSkill=105
While TRUE
While UO.Timer()<SkillTimer+TimeToSkill
wait(500)
Wend
SkillTimer=UO.Timer()
UO.DeleteJournal()
UO.UseSkill("Hiding")
Repeat
wait(500)
Until UO.Hidden() OR UO.InJournal('cliloc# 0xA5F8|cliloc# 0xA196|cliloc# 0xA5F9|cliloc# 0xA5F5')
While UO.Timer()<SkillTimer+TimeToSkill
wait(500)
Wend
SkillTimer=UO.Timer()
UO.UseSkill("Stealth")
wait(500)
While UO.Hidden()
uo.Press(39) ;Âïðàâî
uo.Press(39) ;Âïðàâî
wait(300)
uo.Press(37) ; âëåâî
uo.Press(37) ; âëåâî
Wend
Wend
end sub