Page 1 of 1

Помогитей со скриптиком

Posted: 2009-02-19 11:48:00
by volting
Sub vqpara()
Var Type='0x0E7D'
Uo.FindType(Type)
if Uo.FindCount() > 0 Then
Uo.UseObject('finditem')
else
Uo.Print("Nema")
endif
Endsub

Собстно вопрос, как сделать в скрипте перечисление тайпов, тоесть у меня объект один но у него 2 тайпа, которые меняются постоянно, как вписать в скрипт 2 тайпа, один у меня уже написан а каким образом вставить второй тайп? через запятую не получается.... подскажите плзх нубу как сделать перечисление =)
Вот второй тайп '0x09AA'

Posted: 2009-02-19 12:05:47
by Millerbeer

Code: Select all

Sub vqpara() 
     if Uo.Count('0x0E7D') Then
            Uo.Usetype('0x0E7D')
     else
            if uo.count('0x09AA') then
                   uo.usetype('0x09AA')
            else
                   Uo.Print("Nema")
            endif
     endif
Endsub

Posted: 2009-02-19 12:07:30
by volting
Спасибо тебе большое)
Даже не ожидал, что получу ответ за 10 минут =)

Posted: 2009-02-19 15:14:42
by volting
А еще вопрос, как это сделать автоатическим, например, если в журнале "фраза", тогда он кликает..

Posted: 2009-02-25 16:53:31
by Millerbeer

Code: Select all

Sub vqpara() 
  while not uo.dead()
   if uo.injournal('твоя фраза') then
     if Uo.Count('0x0E7D') Then
            Uo.Usetype('0x0E7D')
     else
            if uo.count('0x09AA') then
                   uo.usetype('0x09AA')
            else
                   Uo.Print("Nema")
            endif
     endif
     uo.deletejournal()
   else
       wait(1000)
   endif
  wend
Endsub