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 - Кликермен

Pages: 1 ... 4 5 [6] 7 8
76
если нужна проверка в фоне, я бы рыл в сторону дельфи. с нубским уровнем можно делать неплохие вещи. напиши программу, запускай в песочницах(можно с доп.прокси)

77
Общие вопросы / Re: Помогите с реализацией
« on: February 08, 2016, 06:13:40 PM »
Такое ощущение что поиск осуществляется из буфера, а данные из файлов не беруться
разве данные из файла 1 в буфер не уходят? кстати, эти файлы положи рядом с  программой. и замени строчку
Code: (clickermann) [Select]
if ($arr2[$a]="+")
на
Code: (clickermann) [Select]
if(TFREAD ("2.txt", $a+1)="+")

78
Общие вопросы / Re: Помогите с реализацией
« on: February 08, 2016, 05:16:04 PM »
раскладку смени

или вот так попробуй
Code: (clickermann) [Select]
For($a=0, $a<TFCOUNT (1.txt))
TOCLIP (TFREAD ("1.txt", $a+1))
KEYDOWN (#CTRL)//поиск в браузере
WAITMS (50)
KEYDOWN (#F)
WAITMS (50)
KEYUP (#F)
KEYUP (#CTRL)
FROMCLIP ()
getscreen
...

79
Общие вопросы / Re: Помогите с реализацией
« on: February 08, 2016, 03:49:19 PM »
//попробуй запустить) 8)
Code: (clickermann) [Select]
TFReadArr("C:\1.txt", $arr1 )
TFReadArr("C:\2.txt", $arr2 )
 
//вот тебе цикл
For($a=0, $a<arrsize($arr1))
KEYDOWN (#CTRL)//поиск в браузере
WAITMS (50)
KEYDOWN (#F)
WAITMS (50)
KEYUP (#F)
KEYUP (#CTRL)
keystring($arr1[$a])
getscreen
if_pixel_in(0,0, 1000,800, 3315455)
lclick($return_x+50, $return_y)//клик по чекбоксу
if ($arr2[$a]="+")
lclick($return_x+50, $return_y+5)
else
lclick($return_x+50, $return_y+10)
end_if
end_if
end_cyc

80
я заметил, что проверка if тоже очень замедляет работу.. добавил три если, чтобы ускориться, но  наоборот - в 3 раза медленнее.
Можно пример на костыль из строк? массив удобен,  аррсайз, аррпоп.. а как со строкой такое сделать?

81
Общие вопросы / Re: Помогите с реализацией
« on: February 08, 2016, 03:31:46 PM »
Code: (clickermann) [Select]
KEYDOWN (#CTRL)//поиск в браузере
WAITMS (50)
KEYDOWN (#F)
WAITMS (50)
KEYUP (#F)
KEYUP (#CTRL)
//ячейки вручную скопируй в два файла текстовые(проверь,чтобы у них конечная длина совпала)
TFReadArr("C:\1.txt", $arr1 )
TFReadArr("C:\2.txt", $arr2 )

//вот тебе цикл
For($a=0, $a<arrsize($arr1))
сюда вставь поиск,  если найден  оранж цвет, то клик проверка второго массива и клик по ретурну
end_cyc

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

83
Общие вопросы / Re: Помогите с реализацией
« on: February 08, 2016, 03:08:39 PM »
Если я праильно понял, можно скопировать  в два массива оба столбца, затем  прогнать циклом через поиск в браузере строки  левого столбца, затем  смотрим правый в массиве, клик по чекбоксу, и далее  высчитать координаты смещения (+) (-) относительно возвращаемого return

84
IE, mozilla

новичок темы не читает, он их создает)

85
программа сложная, я так и не разобрался. как в одной игре  накрутить бонусы.. инфа приходила защищенная. скачал чит инжин - и получилось ::) Но я сначала написал рабочий бот, который дней 5 гонял у меня флешку в браузере, он исправно выходил из системы каждые 3-4 часа, чтобы комп не тормозил( хром часто крашится, я решал проблему глобально)

86
Quote
Ну еще я думал, вдруг кликер сможет "проникнуть" в "мозг" флэшке, и будет пробовать нажать на кнопку, и когда придет время, кнопка нажимается, хотя еще не отобразилась! :)
есть такое. если флешка не зашифрована и все данные  приходят-уходят читаемыми, попробуй программу  Charles

CHARLES – ВОЗМОЖНОСТЬ ВЗЛОМА ОНЛАЙН ИГР
charles
Программа Charles – идеальное решение для перехвата и подмены пакетов которые отправляет Ваш компьютер на сервер. Дебаггер, сниффер, сервер прокси – для данного программного продукта можно подобрать массу синонимов, но подавляющее большинство пользователей используют эту программу для взлома онлайн игр.
Поскольку есть возможность открытого просмотра запросов и ответов на них, любой пользователь сможет самостоятельно найти «дыры» в игре и попробовать ими воспользоваться. Естественно возникает вопрос, а как это сделать… Ответ проси и сложен одновременно. Рассмотрим теорию.

Допустим игрок заходит в какую-то онлайн игру, сразу-же получает массу информации о сервере. При включенном Charles вся это информация сохраняется в нем, и доступна для редактирования. Далее игрок просматривая «логи» может, к примеру, найти параметр, который отвечает за количество ресурсов в игре. Изменив его простейшим образом (как, к примеру, изменить значение ячейки в Excel) появляется возможность имитировать «приход» пакетов от сервера уже с нашими данными. Далее играя в игру наш компьютер (клиент) будет обмениваться с сервером пакетами, и если повезет, то сервер «схавает» наши значения и запишет их на своей стороне. В итоге мы получим то количество ресурсов, которое подменили ранее.

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

Огромнейшую кучу таких «взломов» можно увидеть на YouTube, где, собственно, также можно научиться пользоваться программой чарлес.

87
Code: (clickermann) [Select]
while ($pipe=0)
GETSCREEN
IF_PICTURE_IN (10,20, 300,300, "1.bmp", -1, 100)
   LCLICK($_return1, $_return2)
   WAITMS(3600)
END_IF
end_cyc

88
Прочее / Re: Когда новая версия?
« on: February 07, 2016, 06:50:40 AM »

89
Архив / странный глюк, цикл for
« on: February 05, 2016, 10:56:32 PM »
Code: (clickermann) [Select]
//===================================
FOR($num=0, $num<arrsize($num_line_start))
   FOR ($y=$y2_cap, $y>$y1_cap, -1)
      FOR($x=$num_line_start[$num],$x<$num_line_end[$num]+1)
         IF(pxl($x,$y)  = 0)
            ARRPUSH($num_y2,$y)
            $y=0
            $x=$num_line_end[$num]+1
           
         END_IF
      END_CYC
      print( $y, " ",$y1_cap )
   END_CYC
END_CYC

здесь $y2_cap=347, $y1_cap=334. Цикл пашет  от 347, вниз. НО! после первого прохода цикла, он ругается на inc($y,-1) и работать не хочет. я долго бился, не мог найти корень, как исправить.  если прописать

Code: (clickermann) [Select]
   FOR ($y=347, $y>$y1_cap, -1) То все работает идеально.
print($y1_cap+1) выдает в лог 348, все верно. почему же такая хрень?
пробую писать
Code: (clickermann) [Select]
$mm=$y2_cap
 FOR ($y=$mm, $y>$y1_cap, -1)
Но тоже вылетает ошибка inc($y,-1)
Решил вот так, но все же интересно, что это за хрень))
 
Code: (clickermann) [Select]
$y2_cap = $mm+$y2_cap//мм ноль, поэтому ничего не меняется, но  ошибка пропала
  FOR ($y=$y2_cap, $y>$y1_cap, -1)
Код во вложении, 76 строка. проверял капчу на этой странице  http://wekings.ru/login

90
[spoiler]
Code: (clickermann) [Select]
$_ms1=$_ms
print("простоЕ!" , 2)
$summa=$summa+1
FOR($a=3,$a<1001) // повторяем
   if  ($a<100)
      $b=10
   else
      $b=int(SQRT($a))+1
   end_if
   for($i=2, $i<$b)
      if ((strpos($a/$i, ".")=0)&($a!$i))
         $light=1
         $i=$a+1
      end_if
      //      if   (strlen($a)>1)
      //         if (strcut($a, strlen($a), 1)="0")
      //            $light=1
      //            $i=$a+1
      //         end_if
      //         if ((strcut($a, strlen($a), 1)=5))
      //            $light=1
      //            $i=$a+1
      //         end_if
      //         if (strcut($a, strlen($a), 1)/2=int(strcut($a, strlen($a), 1)/2))
      //            $light=1
      //            $i=$a+1
      //         end_if
      //      end_if
   END_CYC
   if ($light!1)
      if ($m=0)
         $m=$a
      end_if
      FOR($p=1,$p<(strlen($a)))
         $m=STRCONCAT(strcut($m,2,strlen($m)-1), strcut($m,1,1))
         
         while  (strpos($m,"0")=1) //чистим первые нули, получаемые перестановкой
            $m=STRCONCAT(strcut($m,2,strlen($m)-1))
         end_cyc
         if  ($a<100)
            $bb=10
         else
            $bb=int(SQRT($a))+1
         end_if
         for($i=2, $i<$bb)
            if (strpos($m/$i, ".")=0)
               $yes=1
               $i2=$a+1
            end_if
           
            //            if   (strlen($m)>1)
            //               if (strcut($m, strlen($m), 1)="0")
            //                  $yes=1
            //                  $i2=$a+1
            //               end_if
            //               if ((strcut($m, strlen($m), 1)=5))
            //                  $yes=1
            //                  $i2=$a+1
            //               end_if
            //               if (strcut($m, strlen($m), 1)/2=int(strcut($m, strlen($m), 1)/2))
            //                  $yes=1
            //                  $i2=$a+1
            //               end_if
            //            end_if
           
         END_CYC
      END_CYC
      if   (($yes=0)&(strlen($a)>1))
         print("простоЕ!" , $a)
         $summa=$summa+1
      end_if
      if (strlen($a)<2)
         print("простоЕ!" , $a)
         $summa=$summa+1
      end_if
   end_if
   $light=0
   $yes=0
   $m=0
END_CYC

print("Затрачено ", ($_ms-$_ms1)/1000, " секунд, сумма:", $summa)
halt
[/spoiler]
Винт, зацени)
Code: (clickermann) [Select]
0:00:53 Затрачено 6.596 секунд, сумма:32переделал алгоритм,  теперь пашет шустрее. и баг поправил -раньше выдавало ошибочный результат 39) кстати, утром считал 10 тысяч - ушло полтора часа, а сейчас
Code: (clickermann) [Select]
0:08:01 Затрачено 117.794 секунд, сумма:51

Pages: 1 ... 4 5 [6] 7 8