Помогите пожалуйста

[Archangel2018]

Всем добрый день, мне нужна ваша помощь, я новенький в делах скриптах ну вот что-то такое вроде сделал но получилось очень длинное скриптование. Если можете пожалуйста просмотреть и помочь как-то уменьшить его, и еще проблемка он не находи по картинки как следует ибо каждый раз они меняются местами и приходиться каждый раз менять координаты хотя скрипт написан что бы он искал по картинки и при нахождение покупал вещь. Если можете пожалуйста помогите.

[Qwerry]

да простынка длинноватая, сократил код без изменения работы

Вместо 972 строк получить 232, а после и 159 (т.е. сжатие до 16% от исходного, причем с отступами). Действительно впечатляющая работа! И я ничего не пишу про мазохизм, ничего. Совсем.

[Archangel2018]

про перемену мест не совсем понятно.
От места найденной картинки зависят нажимаемые клавиши?
Или картинки находятся на других страницах?

Спасибо большое огромное, да картинка может быть на другой странице а координаты уже значит будут другие.

[Archangel2018]

Вот там фотография, и список уже не тот что в скрипте если увидите. 5 и 6 поменялись местами.

[Archangel2018]

Можно ли сделать так, что бы он сканировал две точки верх и низ, если есть картинка совпадающие то он нажимал бы на квадрат а дальше покупал этот предмет.

[Archangel2018]

Code: (clickermann) [Select]


SUB(картинка, $par2,$par3,$par1) // подпрограмма
   GETSCREEN (352,258,652,985) // координаты обновления графики
   IF_PICTURE_IN (352,258,652,985, STRCONCAT($par2,".bmp"), -1, 100)
      LCLICK($_return1, $_return2)
      WAITMS(100)   
      print(STRCONCAT($par2,".bmp found"))
      LCLICK(521,$_return2+20)  // Ставим галку на 20 пикселей ниже чем верх найденной картинки
//      желательно искать картинки одного размера  число пикселей нужно уточнить чтоб клик попадал в примерно центр квадрата
      WAITMS(300)
      LCLICK(1013,597)   //  Вибираем деньги
      WAITMS(300)
      DBLCLICK(710,521)    // поле для ввода суммы
      WAITMS(200)
     
      SWITCH($par2)
      CASE(1)
         KEYSTRING("167",100)
      CASE(3)
         KEYSTRING("100",100)
      CASE(4)
         KEYSTRING("84",100)
      CASE(5)
         KEYSTRING("250",100)
      CASE(7)
         KEYSTRING("50",100)
      CASE(10)
         KEYSTRING("1000",100)
      CASE(11)
         KEYSTRING("834",100)
      CASE(12)
         KEYSTRING("334",100)
      CASE(13)
         KEYSTRING("100",100)
      CASE(14)
         KEYSTRING("250",100)
      CASE(16)
         KEYSTRING("67",100)
      CASE(17)
         KEYSTRING("250",100)
      CASE(18)
         KEYSTRING("84",100)
      CASE(15)
         KEYSTRING("250",100)
      CASE(19)
         KEYSTRING("667",100)
      CASE(20)
         KEYSTRING("167",100)
      CASE(21)
         KEYSTRING("1000",100)
      CASE(22)
         KEYSTRING("334",100)
      CASE(23)
         KEYSTRING("250",100)
      CASE(24)
         KEYSTRING("200",100)
      CASE(25)
         KEYSTRING("50",100)
      CASE(26)
         KEYSTRING("550",100)
      CASE(27)
         KEYSTRING("1000",100)
      CASE(28)
         KEYSTRING("500",100)
      CASE(29)
         KEYSTRING("267",100)
      CASE(30)
         KEYSTRING("42",100)
      CASE(31)
         KEYSTRING("84",100)
      CASE(32)
         KEYSTRING("50",100)
      CASE(33)
         KEYSTRING("250",100)
      CASE(34)
         KEYSTRING("67",100)
      CASE(36)
         KEYSTRING("834",100)
      CASE(38)
         KEYSTRING("334",100)
      CASE(37)
         KEYSTRING("334",100)
      CASE(39)
         KEYSTRING("67",100)
      CASE(35)
         KEYSTRING("20",100)
      CASE(40)
         KEYSTRING("20",100)
      DEFAULT
         // случай по умолчанию
         LOGWRITE ("Случай не описан в подпрограмме")
      END_SWITCH
      LCLICK(730,580)        // ОК
      WAIT(1)
      LCLICK(814,692) // Покупка
   END_IF
   
   WAIT(1)
   IF($par1 = 8)
      LCLICK(510,666)          // переход в конец     (10 стр.)
      WAIT(1)
      LCLICK(413,668)           // с конца на 1 назад  (9 стр.)
      WAIT(1)
      LCLICK(413,668)    // с конца на 1 назад (8 стр.)
   ELSE
      IF($par1 = 9)
         LCLICK(510,666)          // переход в конец     (10 стр.)
         WAIT(1)
         LCLICK(413,668)           // с конца на 1 назад  (9 стр.)
      ELSE
         IF($par1 = 7)
            LCLICK(510,666)          // переход в конец     (10 стр.)
            WAIT(1)
         ELSE             
            FOR($a=0,$a<$par1)
               WAIT(1)
               LCLICK(483,668)       // переход на другю страницу
            END_CYC
         END_IF
      END_IF
   END_IF     
END_SUB

картинка(1,390,0)    //Awakening Stone
картинка(3,531,0)
картинка(4,601,1)    //Lvl. 4 Glorystone Chest
картинка(5,390,1)    //Seraph's Stone
картинка(7,531,2)    //Purgatory Soul
WAIT(2)
картинка(10,463,2)   //Refining Stone
картинка(11,535,2)   //Element Crystal
картинка(12,601,3)   //Refine Ore
картинка(13,390,3)   //Sacrifice Point Card
картинка(14,461,3)   //Blessed Stone
картинка(16,532,3)   //Aegis Shard
картинка(17,600,4)   //Lilac Stone
картинка(18,387,4)   //Lvl. 4 Adv. Glorystone Chest
картинка(15,462,4)   //Odd Fruit
картинка(19,529,4)   //Synth Scroll
картинка(20,601,5)   //Beast Crystal
картинка(21,390,5)   //Enchanted Ore
картинка(22,465,5)   //Magic Mount Soul
картинка(23,530,5)   //Grotto Heart
картинка(24,605,6)   //Timeskip Scroll
картинка(25,390,6)   //Dragonsoul EXP Pack
картинка(26,465,6)   //Angel Tears
картинка(27,530,6)   //Runestone
картинка(28,605,8)   //Energy Vitamin
картинка(29,393,8)   //Lvl. 6 Common Gem Chest
картинка(30,461,8)   //Legendary Exp Totem Chest
картинка(31,528,8)   //Mythic Exp Totem Chest
картинка(32,604,9)   //Khaos Core
картинка(33,390,9)   //Element Scroll
картинка(34,465,9)   //Gem Enhancement Stone
картинка(36,530,9)   //Spring of Wisdom
картинка(38,605,7)   //Ascension Stone
картинка(37,390,7)   //Spring of Glass
картинка(39,465,7)   //Spirit Essence
картинка(35,530,7)   //Tarot Time Card
картинка(40,605,0)   //Jackpot Bonus Card

Спасибо большое за помощь. Спасибочки

[Archangel2018]

Прошу прощение, но тут ошибка в скрипте он просто листает страницы от 1 до 10 и все и не может найти картинки. Помогите пожалуйста

[Archangel2018]

дело в том что в прошлых версиях действия совершались если картинка не найдена.
если сообщений о нахождении картинок нет, то они не находятся.
Возможные причины несовпадение координат поиска или картинки совпадают не на 100%

А можете показать пример как должно быть на 100 совпадение? Из тех скриншотов что я выкладывал? Пожалуйста, простите я знаю что уже наглый прошу простить за это.

[Archangel2018]

Кирил Большое вам спасибо, я понял свою ошибку все исправил и теперь работает, вы были правы картинки не правильно были сделаны) сейчас все гуд) Большое вам спасибо.