Автокликер Clickermann :: Форум

Основной раздел => Общие вопросы => Topic started by: Prorok.18 on May 08, 2015, 04:45:27 AM

Title: Ромашки лютики
Post by: Prorok.18 on May 08, 2015, 04:45:27 AM

Можно ли получить список всех цветов по убывающей для Colormode 4 например?

Title: Re: Ромашки лютики
Post by: quant13 on May 08, 2015, 11:34:08 AM

(http://i.piccy.info/i9/73fb6ec9f6c2ac39a129a73acd4e4ecd/1431074003/78321/815077/2015_05_08_113210.jpg) (http://piccy.info/)(http://i.piccy.info/a3/2015-05-08-08-33/i9-8167847/649x473-r/i.gif) (http://i.piccy.info/a3c/2015-05-08-08-33/i9-8167847/649x473-r)

Title: Re: Ромашки лютики
Post by: dramster on May 09, 2015, 09:29:12 AM

например для колормод 4 этих цветов будет 4096 комбинаций. вот скрипт который запишет эти все цвета в лог.

Code: (clickermann) [Select]

#logfile

$clm=4 //число, соответствующее режиму коррекции


IF($clm=0)
   $bit=1
ELSE
   IF($clm=1)
      $bit=2
   ELSE
      IF($clm=2)
         $bit=4
      ELSE
         IF($clm=3)
            $bit=8
         ELSE
            IF($clm=4)
               $bit=16
            ELSE
               IF($clm=5)
                  $bit=32
               ELSE
                  IF($clm=6)
                     $bit=64
                  ELSE
                     IF($clm=7)
                        $bit=128
                     ELSE
                        IF($clm=8)
                           inc($n)
                           print($n," - 0")
                           $bit=256
                        ELSE
                           print("не существует этого режима")
                           halt
                        END_IF
                     END_IF
                  END_IF
               END_IF
            END_IF
         END_IF
      END_IF
   END_IF
END_IF

$r=-1
$g=-1
$b=-1
inc($r,$bit)
inc($g,$bit)
inc($b,$bit)
WHILE($b < 256)
   WHILE($g < 256)
      WHILE($r < 256)
         inc($n)
         print($n," - ",colorgen($r,$g,$b)
         inc($r,$bit)
      END_CYC
      $r=-1
      inc($r,$bit)
      inc($g,$bit)
   END_CYC
   $r=-1
   $g=-1
   inc($r,$bit)
   inc($g,$bit)
   inc($b,$bit)
END_CYC

halt

Title: Re: Ромашки лютики
Post by: Oraven on May 09, 2015, 09:34:02 AM

Quote from: dramster on May 09, 2015, 09:29:12 AM

например для колормод 4 этих цветов будет 4096 комбинаций. вот скрипт который запишет эти все цвета в лог

А ты учитываешь что кликер также осветляет изображение при коррекции?

Да и вообще зачем этот список не понятно  :o

Title: Re: Ромашки лютики
Post by: dramster on May 09, 2015, 09:43:31 AM

Quote from: Oraven on May 09, 2015, 09:34:02 AM

А ты учитываешь что кликер также осветляет изображение при коррекции?

Да и вообще зачем этот список не понятно  :o

осветляет? это как? я чегото недопонимаю.

был поставлен вопрос - список всех цветов для к-мод4. скрипт вроде как дает этот список. и для других режимов коррекции тоже дает.

а то что этот список бесполезен, так это и я понимаю  :D. просто мне стало интересно как это реализовать, вот и попробовал. если я в чемто ошибаюсь, прошу обьяснить в чем.

Title: Re: Ромашки лютики
Post by: Oraven on May 09, 2015, 11:07:15 AM

У тебя там скобки в printe не достает.

Действительно получаемые этим скриптом цвета верны, значит осветление это побочный эффект коррекции.

Вот доработанный вариант.

Code: (clickermann) [Select]

$clm = 4 // уровень коррекции от 0 до 8

SWITCH($clm)
CASE(0)
   $bit=1
CASE(1)
   $bit=2
CASE(2)
   $bit=4
CASE(3)
   $bit=8
CASE(4)
   $bit=16
CASE(5)
   $bit=32
CASE(6)
   $bit=64
CASE(7)
   $bit=128
CASE(8)
   TFWRITE(STRCONCAT("Цвета для Уровня ", $clm,".txt"), 0)
   $bit=256
DEFAULT
   HINTPOPUP("Задан не верный уровень коррекции!", "Ошибка")
   halt
END_SWITCH

$r=-1
$g=-1
$b=-1
inc($r,$bit)
inc($g,$bit)
inc($b,$bit)
WHILE($b < 256)
   WHILE($g < 256)
      WHILE($r < 256)
         TFWRITE(STRCONCAT("Цвета для Уровня ", $clm,".txt"), colorgen($r,$g,$b))
         inc($r,$bit)
      END_CYC
      $r=-1
      inc($r,$bit)
      inc($g,$bit)
   END_CYC
   $r=-1
   $g=-1
   inc($r,$bit)
   inc($g,$bit)
   inc($b,$bit)
END_CYC

halt

Title: Re: Ромашки лютики
Post by: Prorok.18 on May 10, 2015, 01:08:57 AM

Здорово, спасибо, Oraven и Dramster :)