Page 1 of 1

Проверка на цвет

Posted: 2006-02-20 19:16:26
by WandeRinG
Реально ли написать проверку на цвет слов появляющихся в журнале?
И если не трудно напишите мне такое:
если слово в журнале проверяем на цвет если цвет тот что надо, делаем то-то, если не тот что надо выходим. Буду весьма благодарен.

Posted: 2006-02-20 19:17:47
by agem
Все просто :)

Code: Select all

if UO.JournalColor(номер_строки)=='цвет' then
   ...
else
   ...
end if

Posted: 2006-02-20 19:18:53
by agem
Да, а проверить наличие слова - UO.InJournal('слово'). Если найдено, то возвращает номер строки с этим словом плюс один, кажется.

Posted: 2006-02-20 21:24:57
by WandeRinG
agem wrote:Все просто :)

Code: Select all

if UO.JournalColor(номер_строки)=='цвет' then
   ...
else
   ...
end if

а вот тут проверка на строку, а на слово?

Posted: 2006-02-20 22:24:56
by agem
Соедини два моих поста:

Code: Select all

if UO.JournalColor(UO.InJournal('строка или слово или все что захочешь')-1)=='цвет' then
...


Все, дальше сам :)

Posted: 2006-02-21 08:50:02
by WandeRinG
спасибо...

Posted: 2006-02-21 11:06:42
by WandeRinG

Code: Select all

var SerialSelf   = '0x0023C49E' ## ID вашего чара 
var FirstFriend  = '0x0010F829' ## ID 1 друга
var SecondFriend = '0x0010F829' ## ID 2 друга
var ThirdFriend  = '0x0010F829' ## ID 3 друга
var FourthFriend = '0x0010F829' ## ID 4 друга
var FifthFriend  = '0x0010F829' ## ID 5 друга
var Cast         = 'Feeblemind'     ## Каким заклинанием будем сбивать

Var Enemy, Color, FirstTempFriend, SecondTempFriend, ThirdTempFriend, FirstTemp, SecondTemp, ThirdTemp

sub AntiParaliz()
#¤Leo¤#
uo.Print('Выбери 1 временного друга: ')
uo.Exec('addobject FirstTemp')
   while uo.Targeting()
      wait(100)
   wend
FirstTempFriend=UO.GetSerial("FirstTemp")

uo.Print('Выбери 2 временного друга: ')
uo.Exec('addobject SecondTemp')
   while uo.Targeting()
      wait(100)
   wend
SecondTempFriend=UO.GetSerial("SecondTemp")

uo.Print('Выбери 3 временного друга: ')
uo.Exec('addobject ThirdTemp')
   while uo.Targeting()
      wait(100)
   wend
ThirdTempFriend=UO.GetSerial("ThirdTemp")

   while not UO.Dead()
      if UO.JournalColor(UO.InJournal('Rel Por')-1)=='0x003f' then
         Enemy=UO.GetSerial(UO.JournalSerial(0))
         Color=UO.GetNotoriety(Enemy)
            if Enemy==SerialSelf OR Enemy==FirstFriend OR Enemy==SecondFriend OR Enemy==ThirdFriend OR Enemy==FourthFriend OR Enemy==FifthFriend OR Enemy==FirstTempFriend OR Enemy==SecondTempFriend OR Enemy==ThirdTempFriend OR Color==2 OR Color==1 then
                wait(100)
                UO.DeleteJournal()
            else
                UO.FindType('0x1F30','0x0000','backpack')
                if UO.GetQuantity('finditem')>0 then
                control_Mana(20)
                 uo.waittargetobject('laststatus')
                 uo.usetype('0x1F30')
                 else
                 control_Mana(20)
                 UO.Cast(Cast,Enemy)
                 uo.concolor('0x09DA')
                 uo.print('нету Фиблеминд скролов ')
                 uo.concolor('0x09A4')
                 end if
                UO.DeleteJournal()
            end if
                wait(500)
      else
         wait(1000)
      end if
   wend
end sub


что ж это он работать не хочет=( кстати какой цвет кастов? я пробовал тестить на зелёном, тоесть просто писали, всёравно не пашет... если возможно помогите

Posted: 2007-06-17 16:11:23
by Laden
Кстати это очень интересно...
Как узнать цвет текста вообще?...

Posted: 2007-06-18 01:00:03
by Rivory
Laden wrote:Кстати это очень интересно...
Как узнать цвет текста вообще?...


Code: Select all

sub test25()
uo.print(uo.journalcolor(uo.injournal('TEXT')-1))
end sub

Легче лёгкого.

Posted: 2007-06-18 09:07:39
by Laden
Да.. я уже тут viewtopic.php?t=12101 сказал, что нашел этот вариант...
Но всё равно, спасибо за содействие ;)