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

volting · Post by **volting** » 2009-02-19 11:48:00

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'

Millerbeer · Post by **Millerbeer** » 2009-02-19 12:05:47

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

volting · Post by **volting** » 2009-02-19 12:07:30

Спасибо тебе большое)
Даже не ожидал, что получу ответ за 10 минут =)

volting · Post by **volting** » 2009-02-19 15:14:42

А еще вопрос, как это сделать автоатическим, например, если в журнале "фраза", тогда он кликает..

Millerbeer · Post by **Millerbeer** » 2009-02-25 16:53:31

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