Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - MaxKot

Pages: [1] 2
1
Использование / Re: Помогите неумехе
« on: November 27, 2017, 02:50:57 PM »
Все таки хочу разобраться, что не так с этим компом. На домашнем печатает все правильно, все логины и пароли по своим полям ввода. Комп на работе уже 5 аккаунтов отсеял:( И это я не все еще проверил. Никакой связи между аккаунтами нет, есть и латиница, и кириллица, и логин из одного слова и из двух. Вылезла еще одна загвоздка - код с  командой  STRCONCAT, в скрипте написанном выше в первый раз находит картинку, во второй - останавливается, хотя на домашнем компе все в норме:( Пора наверное на свалку, только другого нет :'( Может кто объяснить хоть направление, где искать?

2
Использование / Re: Помогите неумехе
« on: November 22, 2017, 01:08:04 PM »
Поменял я паузы, ничего не поменялось. Разбирался дальше и получается, что в поле ввода логина кликер пишет не правильно  только 2 аккаунта (все еще не проверил, хотя до этого все аккаунты прописывались правильно) Убрал из списка эти аккаунты, вроде заработал. И еще вопрос: может ли мышка влиять на работу кликера? Она изредка подглючивает.  :'(

3
Использование / Re: Помогите неумехе
« on: November 21, 2017, 08:53:33 PM »
О результате отпишусь завтра. Сегодня немного не могу

4
Использование / Re: Помогите неумехе
« on: November 21, 2017, 06:13:51 PM »
Поменял раскладку языка в кликере на En, в окне Ru - в поле ввода логина ввел абракадабру, НО пароль ввел в поле пароля :'( Ницего ни пАнятно. Ладно, пойду домой, еще голову поломаю

5
Использование / Re: Помогите неумехе
« on: November 21, 2017, 05:20:10 PM »
Отвечаю по порядку:
Quote
Посмотри не изменил ли в файле.
В файле ничего не менял( отдельно , без всего скрипта, вводит и логин и пароль по своим поля)
Quote
В поле ввода пишет слитно? В каком из них, логина или пароля?
В поле ввода логина, пишет слитно
Quote
Надеюсь ты не тестируешь версию 4.13
Нет, не тестирую ..... пока :D
Quote
В скрипте делит по разделителю?
Как это определить?
Quote
Что пишет в лог на строке 19.
Всего 2 строки в логе:
16:29:39 Всего аккаунтов: 110
16:29:39 login: Карабас  pass: ****** (пароль пишет мой :D он же никому не нужен)

6
Использование / Re: Помогите неумехе
« on: November 21, 2017, 04:49:27 PM »
Code: (clickermann) [Select]
$file_akk = "LogPass.txt" //625,50
 
SUB(paste) //========== Вставить ===============================================
   KEYDOWN(#CTRL) // Ctrl+V
   WAITMS(50)
   KEYPRESS(#V)
   WAITMS(50)
   KEYUP(#CTRL)
   WAITMS(150)
END_SUB
//------------------------------------------------------------------------------
 
$count1 = TFCOUNT($file_akk)
LOGWRITE("Всего аккаунтов: ", $count1)
 
FOR($akkaunt_line = 1, $akkaunt_line < $count1+1)
   UNDEFINE($akkaunt)
   STRSEPARATE(TFREAD($file_akk, $akkaunt_line), ":", $akkaunt)
   LOGWRITE("login: ", $akkaunt[0], "  pass: ", $akkaunt[1])
 
   LCLICK(760, 112)  // окно логина
   WAITMS(1000)
   TOCLIP($akkaunt[0])
   paste()
   LCLICK(760, 139)  // окно пароля
   WAITMS(1000)
   TOCLIP($akkaunt[1])
   paste()
 
   KEYPRESS(#Enter)// войти
   WAIT(1)

   // дальше идет мой код - порядка 500 строк

GETSCREEN(140,150, 380,225)
COLORMODE(6)
FOR($i=1, $i<120)
   IF_PICTURE_IN (140,150, 380,225, STRCONCAT("img", $i, ".bmp"))
      LCLICK($_return1+5, $_return2+3)
      WAITMS(100)
      $i = 500
   ELSE
      WAITMS(5)
   END_IF
END_CYC
// и опять мой код
GETSCREEN(140,150, 380,225)
COLORMODE(6)
FOR($i=1, $i<120)
   IF_PICTURE_IN (140,150, 380,225, STRCONCAT("img", $i, ".bmp"))
      LCLICK($_return1+5, $_return2+3)
      WAITMS(100)
      $i = 500
   ELSE
      WAITMS(5)
   END_IF
END_CYC
// мой код
END_CYC//заканчивается цикл,   

7
Использование / Re: Помогите неумехе
« on: November 21, 2017, 03:01:26 PM »
Опять появился вопрос. Могут ли команды STRCONCAT  и  STRSEPARATE  конфликтовать в одном скрипте?
Code: (clickermann) [Select]
$file_akk = "LogPass.txt" //625,50

SUB(paste) //========== Вставить ===============================================
   KEYDOWN(#CTRL) // Ctrl+V
   WAITMS(50)
   KEYPRESS(#V)
   WAITMS(50)
   KEYUP(#CTRL)
   WAITMS(150)
END_SUB
//------------------------------------------------------------------------------

$count1 = TFCOUNT($file_akk)
LOGWRITE("Всего аккаунтов: ", $count1)

FOR($akkaunt_line = 1, $akkaunt_line < $count1+1)
   UNDEFINE($akkaunt)
   STRSEPARATE(TFREAD($file_akk, $akkaunt_line), ":", $akkaunt)
   LOGWRITE("login: ", $akkaunt[0], "  pass: ", $akkaunt[1])
   
   LCLICK(760, 112)  // окно логина
   WAITMS(1000)
   TOCLIP($akkaunt[0])
   paste()
   LCLICK(760, 139)  // окно пароля
   WAITMS(1000)
   TOCLIP($akkaunt[1])
   paste()
   
   KEYPRESS(#Enter)// войти
   WAIT(1)и
Code: (clickermann) [Select]
GETSCREEN(140,150, 380,225)
COLORMODE(6)
FOR($i=1, $i<120)
   IF_PICTURE_IN (140,150, 380,225, STRCONCAT("img", $i, ".bmp"))
      LCLICK($_return1+5, $_return2+3)
      WAITMS(100)
      $i = 500
   ELSE
      WAITMS(50)
   END_IF
END_CYCБез цикла по объединению строки ввод логина и пароля  проходит нормально, только вписал в скрипт  цикл STRCONCAT логин и пароль пишется в одной строке :o Подскажите?

8
Использование / Re: Помогите неумехе
« on: November 20, 2017, 12:57:44 AM »
В общем получилось у меня вот так
Code: (clickermann) [Select]
for($i=1, $i<120)
   GETSCREEN (140,150, 380,225)
   COLORMODE(6)
   IF_PICTURE_IN (140,150, 380,225, STRCONCAT("img", $i, ".bmp"))
      LCLICK($_return1+5, $_return2+3)
      WAITMS(100)
   ELSE
      WAITMS(50)
   END_IF
END_CYCРаботает: находит, кликает, но что то не так. Сам не пойму что :o ну да ладно

9
Использование / Re: Помогите неумехе
« on: November 19, 2017, 02:19:45 PM »
Спасибо. Все работает. Хочу немного доработать код, потому что возникают ошибки, не связанные с Clickermann, а с подвисаниями в самой игре. Суть такая: есть примерно 120 скринов картинок (в дальнейшем думаю еще добавить). Необходимо за проход выполнить клик по одной из картинок.
Code: (clickermann) [Select]
$img[0]="img1.bmp"
$img[1]="img2.bmp"
$img[2]="img3.bmp"
==============
$img[119]="img119.bmp"
for($i=0,$i<120)// для переменной i=0 пока  i<120
if_picture_in(0,0,$_xmax,$_ymax,$img[i])// если картинка из списка есть
MOVE($_return1+5,$_return2+2)
WAITMS(10)
 LCLICK($_return1+5,$_return2+2)
END_IF
END_CYC// конец цикла Возможно ли не вписывать весь список скринов(120шт.!!) в скрипт, а прописать путь к нему и как это лучше сделать. И второе - если игра подвисает, то чтобы клик по картинке произошел после появления картинки из списка.

10
Использование / Re: Помогите неумехе
« on: November 08, 2017, 12:07:30 AM »
Написал код, вписывает первую строку из файла Gildiy.txt,  При втором вводе уже вторую строку из файла Gildiy.txt. Поменял название файла на Gildiy2.txt - все равно вводит вторую строку. Что делать???
Code: (clickermann) [Select]
$file_akk = "LogPass.txt"

SUB(paste) //========== Вставить ===============================================
   KEYDOWN(#CTRL) // Ctrl+V
   WAITMS(50)
   KEYPRESS(#V)
   WAITMS(50)
   KEYUP(#CTRL)
   WAITMS(150)
END_SUB
//------------------------------------------------------------------------------

$count = TFCOUNT($file_akk)
LOGWRITE("Всего аккаунтов: ", $count)

FOR($akkaunt_line = 1, $akkaunt_line < $count+1)
   UNDEFINE($akkaunt)
   STRSEPARATE(TFREAD($file_akk, $akkaunt_line), ":", $akkaunt)
   LOGWRITE("login: ", $akkaunt[0], "  pass: ", $akkaunt[1])
   
   LCLICK(960, 120)  // окно логина
   WAIT(1)
   TOCLIP($akkaunt[0])
   paste()
   LCLICK(960, 150)  // окно пароля
   WAIT(1)
   TOCLIP($akkaunt[1])
   paste()
   //дальше идет мой код, он очень громоздкий, не буду его писать
   LCLICK(160,180)//клик по полю ввода названия - это первая страничка
   WAITMS(500)// здесь нужно ввести ПЕРВУЮ строку из файла "Gildiy.txt" Строка может состоять из 2-х слов
   IF(TFCOUNT("Gildiy.txt") > $count)
      INC($count,1)
   END_IF
   $str = TFREAD ("Gildiy.txt", $count)
   LCLICK(160,180)
   WAITMS (50)
   TOCLIP($str) //
   WAITMS (50)
   KEYDOWN (#CTRL) // вставить
   WAITMS (50)
   KEYPRESS(#V)
   WAITMS (50)
   KEYUP (#CTRL)
   WAITMS (50)
   WAIT(1)//вводит первую строку, все как мне надо
   //опять мой код
   LCLICK(160,180)//клик по полю ввода названия - это вторая страничка
   WAITMS(500) // и здесь нужно ввести ПЕРВУЮ строку из файла "Gildiy2.txt"
   IF(TFCOUNT("Gildiy2.txt") > $count)
      INC($count,1)
   END_IF
   $str = TFREAD ("Gildiy2.txt", $count)
   LCLICK(160,180)
   WAITMS (50)
   TOCLIP($str)
   WAITMS (50)
   KEYDOWN (#CTRL)
   WAITMS (50)
   KEYPRESS(#V)
   WAITMS (50)
   KEYUP (#CTRL)
   WAITMS (50)
   WAIT(1)// здесь вводит вторую строку файла Gildiy2.txt, а мне нужна первая строка
   //и дальше мой скрипт

11
Использование / Re: Помогите неумехе
« on: November 06, 2017, 10:37:48 PM »
Нужна помощь. Необходимо вставлять строки из текстового документа Gildiy.txt на двух страничках одного браузера. Лучше на примере покажу:
Code: (clickermann) [Select]
$file_akk = "LogPass.txt"

SUB(paste) //========== Вставить ===============================================
   KEYDOWN(#CTRL) // Ctrl+V
   WAITMS(50)
   KEYPRESS(#V)
   WAITMS(50)
   KEYUP(#CTRL)
   WAITMS(150)
END_SUB
//------------------------------------------------------------------------------

$count = TFCOUNT($file_akk)
LOGWRITE("Всего аккаунтов: ", $count)

FOR($akkaunt_line = 1, $akkaunt_line < $count+1)
   UNDEFINE($akkaunt)
   STRSEPARATE(TFREAD($file_akk, $akkaunt_line), ":", $akkaunt)
   LOGWRITE("login: ", $akkaunt[0], "  pass: ", $akkaunt[1])
   
   LCLICK(960, 120)  // окно логина
   WAIT(1)
   TOCLIP($akkaunt[0])
   paste()
   LCLICK(960, 150)  // окно пароля
   WAIT(1)
   TOCLIP($akkaunt[1])
   paste()
//дальше идет мой код, он очень громоздкий, не буду его писать
LCLICK(160,180)//клик по полю ввода названия - это первая страничка
   WAITMS(500)// здесь нужно ввести ПЕРВУЮ строку из файла "Gildiy.txt" Строка может состоять из 2-х слов
//опять мой код
LCLICK(160,180)//клик по полю ввода названия - это вторая страничка
   WAITMS(500) // и здесь нужно ввести ПЕРВУЮ строку из файла "Gildiy.txt"
//и дальше мой скрипт
И так по кругу, вводим второй лог и пароль из файла "LogPass.txt" и вторую строку из файла "Gildiy.txt" 2 раза и т. д.   Это осуществимо?


12
Использование / Re: Помогите неумехе
« on: November 06, 2017, 12:00:36 PM »
Спасибо огромнейшее kiril, Вам респект. Да и всем кто помогал ;)  Надеюсь в дальнейшем  не откажете в совете ???

13
Использование / Re: Помогите неумехе
« on: November 05, 2017, 08:53:28 PM »
Уважаемый kiril,  наверное еще не подошло время осваивать подпрограммы, так как я еще не освоил циклы. Прыгать через ступеньки не очень хочется :-\  С нахождением картинки и остановкой цикла мне понятно. А если картинки появляются рандомно(все их надо кликать) и остановить цикл необходимо при появлении определенной картинки. Количество проходов тоже рандомно. Максимально 22 прохода по циклу. Картинка, останавливающая цикл, может появиться  и на  16 проходе, и на 20 :-\
Code: (clickermann) [Select]
$check = 0
   WHILE($check < 22)
      GETSCREEN (140,200, 380,600)
      COLORMODE(6)
      IF_PICTURE_IN (140,200, 380,600, "Задание выполнено.bmp")  //при появлении этой картинки необходимо остановить цикл и пойдет работать следующий.
         LCLICK($_return1, $_return2)
         INC($check,1)
         waitms(1000)
      else
         IF_PICTURE_IN (140,200, 380,600, "Идти вперед.bmp")  //если нашел клик
            LCLICK($_return1, $_return2)
            INC($check,1)
            waitms(1000)
         else
            IF_PICTURE_IN (140,200, 380,600, "Идти назад.bmp") // клик по нахождению
               LCLICK($_return1, $_return2)
               INC($check,1)
               waitms(1000)
            else
               IF_PICTURE_IN (140,200, 380,600, "Вперед.bmp") // клик по нахождению
                  LCLICK($_return1, $_return2)
                  INC($check,1)
                  waitms(1000)
               else // переход если кнопка не будет найдена
                  IF_PICTURE_IN (140,200, 380,600, "проскользнуть.bmp") // клик по нахождению
                     LCLICK($_return1, $_return2)
                     INC($check,1)
                     waitms(1000)
                  else // переход если кнопка не будет найдена
                     IF_PICTURE_IN (140,200, 380,600, "Взять бонус.bmp") // клик по нахождению
                        LCLICK($_return1, $_return2)
                        INC($check,1)
                        waitms(1000)
                     else
                        IF_PICTURE_IN (140,200, 380,600, "Бить.bmp") // клик по нахождению
                           LCLICK($_return1, $_return2)
                           INC($check,1)
                           waitms(1000)
                        else // переход если кнопка не будет найдена
                           IF_PICTURE_IN (140,200, 380,600, "Вперед2.bmp") // клик по нахождению
                              LCLICK($_return1, $_return2)
                              INC($check,1)
                              waitms(1000)
                           ELSE
                              waitms(100)
                           end_if
                        end_if
                     end_if
                  end_if
               end_if
            end_if
         end_if
      end_if
   end_cyc

14
Использование / Re: Помогите неумехе
« on: November 05, 2017, 02:45:28 PM »
Еще один вопрос. Как  циклы объединить в цепочку. Например:
Code: (clickermann) [Select]
$check = 0
WHILE($check < 3)
   //поиск одного изображения
   GETSCREEN (140,200, 380,900)
   COLORMODE(6)
   IF_PICTURE_IN (140,200, 380,900, "В город.bmp")  //если нашел клик
      LCLICK($_return1, $_return2)
      INC($check,1)
      waitms(1000)
   else
      IF_PICTURE_IN (140,200, 380,900, "В поле.bmp")  //если нашел клик
         LCLICK($_return1, $_return2)
         INC($check,1)
         waitms(1000)
      else
         IF_PICTURE_IN (140,200, 380,900, "К дороге.bmp") // клик по нахождению
            LCLICK($_return1, $_return2)
            INC($check,1)
            waitms(1000)
         else
            waitms(100)
         end_if
      end_if
   end_if
end_cyc//необходимо, чтобы после того, как найдется одна из кнопок, этот цикл остановился и заработал следующий, нижний и  т. д.  По отдельности работают.

$count = 0
WHILE($count < 22)
   //поиск одного изображения
   GETSCREEN (125,200, 380,400)
   IF_PICTURE_IN (125,200, 380,400, "Идти вперед.bmp")  //если нашел клик
      LCLICK($_return1, $_return2)
      INC($count,1)
      waitms(1000)
   else //если не нашел в этой области то переход к поиску другого изображения
      IF_PICTURE_IN (125,200, 380,400, "Вперед.bmp") // клик по нахождению
         LCLICK($_return1, $_return2)
         INC($count,1)
         waitms(1000)
      else // переход если кнопка не будет найдена
         IF_PICTURE_IN (125,200, 380,400, "проскользнуть.bmp") // клик по нахождению
            LCLICK($_return1, $_return2)
            INC($count,1)
            waitms(1000)
         else // переход если кнопка не будет найдена
            IF_PICTURE_IN (125,200, 380,400, "Идти назад.bmp") // клик по нахождению
               LCLICK($_return1, $_return2)
               INC($count,1)
               waitms(1000)
            else // переход если кнопка не будет найдена
               IF_PICTURE_IN (125,200, 380,400, "Вперед1.bmp") // клик по нахождению
                  LCLICK($_return1, $_return2)
                  INC($count,1)
                  waitms(1000)
               else // переход если кнопка не будет найдена
                  IF_PICTURE_IN (125,200, 380,400, "Вперед2.bmp") // клик по нахождению
                     LCLICK($_return1, $_return2)
                     INC($count,1)
                     waitms(1000)
                  ELSE
                     waitms(100)
                  end_if
               end_if
            end_if
         end_if
      end_if
   end_if
end_cycКак я понял, пока не выполнится условие, цикл остается работающим. Даже если кнопки отсутствуют.

15
Использование / Re: Помогите неумехе
« on: November 04, 2017, 07:38:36 PM »
Все отлично работает:) Спасибо. Маленький вопрос. Чтобы этот цикл повторялся бесконечно, какие параметры нужно задать? И чуть позже у меня будет еще один вопрос...

Pages: [1] 2