Ludi pomogite s evalushenom
Posted: 2004-10-22 09:50:49
dayte plz script na evalushn ctob char ispolzoval evalushn na sebya bez kontsa
Code: Select all
sub EvalInt()
var lastTimer
UO.DeleteJournal()
while UO.SkillVal('Evaluate Intelligence') < 1000 && UO.IsOnline()
UO.waittargetself()
UO.useskill('Evaluating Intelligence')
lastTimer = UO.Timer()
repeat
wait(100)
until UO.InJournal("You were unable") || UO.InJournal("The subject is") || UO.Timer() > lastTimer + 100
wait(10000)
UO.DeleteJournal()
wend
end sub
AlexeyVorotnikov wrote:Вот, например, что-то типа того. Качает Eval Int до 100.Code: Select all
sub EvalInt()
var lastTimer
UO.DeleteJournal()
while UO.SkillVal('Evaluate Intelligence') < 1000 && UO.IsOnline()
UO.waittargetself()
UO.useskill('Evaluating Intelligence')
lastTimer = UO.Timer()
repeat
wait(100)
until UO.InJournal("You were unable") || UO.InJournal("The subject is") || UO.Timer() > lastTimer + 100
wait(10000)
UO.DeleteJournal()
wend
end sub