Page 1 of 1

таминг(выручайте плз)

Posted: 2006-03-05 21:45:32
by CHI
помогите плз скриптом на таминг.. тамит 2 собак и релизит и по новой
плиззз

Posted: 2006-03-06 15:12:58
by Scripts Writer

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



Писал сам, работать должно, наверное ) тести.