таминг(выручайте плз)
Posted: 2006-03-05 21:45:32
помогите плз скриптом на таминг.. тамит 2 собак и релизит и по новой
плиззз
плиззз
Code: Select all
sub Taming()
var count=0
uo.print('Укажи первую животину')
uo.exec('addobject first')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
uo.print('Вторую указывай')
uo.exec('addobject second')
while uo.targeting()
wait(100)
wend
UO.DeleteJournal()
UO.Print('Теперь палку')
UO.Exec('addobject staff')
while uo.Targeting()
wait(100)
wend
while NOT UO.Dead()
UO.DeleteJournal()
UO.WaitTargetObject('first')
UO.Useobject('staff')
repeat
wait(1000)
until UO.InJournal('You fail') or UO.InJournal('It seems')
UO.DeleteJournal()
UO.WaitTargetObject('second')
UO.Useobject('staff')
repeat
wait(1000)
until UO.InJournal('You fail') or UO.InJournal('It seems')
UO.Say('All release')
wend
end sub