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.


Topics - aast2012

Pages: [1]
1
Общие вопросы / оптимизация кода
« on: December 27, 2018, 04:04:24 AM »
Помогите упростить код.... все работает на УРА... просто сейчас будут писать что я не правильно делаю, что ГОТО выхожу с цикла... и т.д.. вот прошу если есть время и желание оптимизируйте или напишите правильно этот код... повторюсь КОД работает как надо

Code: (clickermann) [Select]
#logfile
start:

$startSume = 1
$stepIncriment = 3     // умножение

$wait=10               // попыток


if($wait > 0)
   lclick(1789,210)
   waitms(200)
   
   FOR($a=0,$a<10) // первая инициализация для старта
      KEYPRESS(#BACKSPACE)
      WAITMS(20)
   END_CYC
   wait(1)
   print("попыток"," ", $wait)
   KEYSTRING($startSume)
   waitms(200)
   
 start1: 
   $var = 0
   $check = 0
   $vverh = 0
   $vniz = 0
   $checkk = 0
   $proigr = 0
   //===========================================================================
   WHILE($check = 0)
      GETSCREEN
      IF_PIXEL_IN(1645,856,1645,954,2176491)
         
         
         $var = $_return2
         // move($_return1, $_return2)
         
      END_IF
     
      if ($var>935)
         //повышение
         $check = 1
         $vverh = 1
         $vniz = 0
         //move($_return1, $_return2)
         
      END_IF
     
     
      if ($var<870)
         //понижение
         $check = 1
         //move($_return1, $_return2)
         $vverh = 0
         $vniz = 1
      END_IF
   END_CYC
   
   //=====================================================================
   
   if ($vverh = 1)
     
      print("ставка","-", $startSume)
      //----------------------
      KEYDOWN (#Q) // нажатие клавиши "Q"
      WAITMS (50)
      KEYUP (#Q)
      WAIT (2)
     
      //скриншот
      GETSCREEN
      SCREENSHOTFIX(0,0,$_xmax,$_ymax,STRCONCAT($_time_h,"-", $_time_m,"-", $_time_s,".bmp"),0)
      //------------------------------------
      WAIT (15)
   END_IF
   
   if ($vniz = 1)
     
      print("ставка","-", $startSume)
      KEYDOWN (#R)  // нажатие клавиши "R"
      WAITMS (50)
      KEYUP (#R)
      WAIT (2)
     
      //скриншот
      GETSCREEN
      SCREENSHOTFIX(0,0,$_xmax,$_ymax,STRCONCAT($_time_h,"-", $_time_m,"-", $_time_s,".bmp"),0)
      //------------------------------------
      WAIT (15)
   END_IF
   
   //=============================================================================
   
   WHILE($checkk = 0)
      //Print ("отслеживаем")
      //Print ($checkk, " ", "окончание")
      // отслеживание окончания сделки выигрыша
      GETSCREEN
      IF_PIXEL_IN(100,932,390,986,4709631)  // выигрыш
         //скриншот
         GETSCREEN
         SCREENSHOTFIX(0,0,$_xmax,$_ymax,STRCONCAT($_time_h,"-", $_time_m,"-", $_time_s,".bmp"),0)
         //------------------------------------
         Print ("выигрыш")
         print("==================")
         wait(1)
         goto(start)
      end_if
      //--------------------------------
      // отслеживание окончания сделки проигрыша
      GETSCREEN
      IF_PIXEL_IN(343,932,390,958,16777215)  // проигрыш
         //скриншот
         GETSCREEN
         SCREENSHOTFIX(0,0,$_xmax,$_ymax,STRCONCAT($_time_h,"-",$_time_m,"-", $_time_s,".bmp"),0)
         //------------------------------------
         Print ("проигрыш")
         print("==================")
         INC($wait,-1)
         print("попыток", " ", $wait)
         if($wait > 0)
            $startSume = $startSume*$stepIncriment
            //print("сумма", " ", $startSume)
            $proigr = 1
            $checkk = 1
            lclick(1789,210)
           
            waitms(200)
           
            FOR($a=0,$a<10) // первая инициализация для старта
               KEYPRESS(#BACKSPACE)
               WAITMS(20)
            END_CYC
            wait(1)
           
            KEYSTRING($startSume)
           
            wait(1)
            WHILE($proigr = 1)
             //print("поиск 2 зоны")
               GETSCREEN
               IF_PIXEL_IN(1645,877,1645,934,2176491)
                  $proigr = 2
               END_IF
            END_CYC
      END_IF
 
            if ($vverh = 1)
               
               print("ставка","-", $startSume)
               //----------------------
               KEYDOWN (#Q) // нажатие клавиши "Q"
               WAITMS (50)
               KEYUP (#Q)
               WAIT (2)
               
               //скриншот
               GETSCREEN
               SCREENSHOTFIX(0,0,$_xmax,$_ymax,STRCONCAT($_time_h,"-", $_time_m,"-", $_time_s,".bmp"),0)
               //------------------------------------
               WAIT (15)
            END_IF
           
            if ($vniz = 1)
               
               print("ставка","-", $startSume)
               KEYDOWN (#R)  // нажатие клавиши "R"
               WAITMS (50)
               KEYUP (#R)
               WAIT (2)
               
               //скриншот
               GETSCREEN
               SCREENSHOTFIX(0,0,$_xmax,$_ymax,STRCONCAT($_time_h,"-", $_time_m,"-", $_time_s,".bmp"),0)
               //------------------------------------
               WAIT (15)
            END_IF
           
            //=============================================================================
           
            WHILE($proigr = 2)
               
               //Print ("отслеживаем")
               // отслеживание окончания сделки выигрыша
               GETSCREEN
               IF_PIXEL_IN(100,932,390,986,4709631)  // выигрыш
                  //скриншот
                  GETSCREEN
                  SCREENSHOTFIX(0,0,$_xmax,$_ymax,STRCONCAT($_time_h,"-", $_time_m,"-", $_time_s,".bmp"),0)
                  //------------------------------------
                  Print ("выигрыш")
                  print("==================")
                  wait(1)
                  goto(start)
               end_if
               //--------------------------------
               // отслеживание окончания сделки проигрыша
               GETSCREEN
               IF_PIXEL_IN(343,932,390,958,16777215)  // проигрыш
                  //скриншот
                  GETSCREEN
                  SCREENSHOTFIX(0,0,$_xmax,$_ymax,STRCONCAT($_time_h,"-",$_time_m,"-", $_time_s,".bmp"),0)
                  //------------------------------------
                  Print ("проигрыш")
                  print("==================")
                  INC($wait,-1)
                  print("попыток", " ", $wait)
                  if($wait > 0)
                     $startSume = $startSume*$stepIncriment
                     //print("сумма", " ", $startSume)
                     $proigr = 1
                     $checkk = 0
                     lclick(1789,210)
                     
                     waitms(200)
                     
                     FOR($a=0,$a<10) // первая инициализация для старта
                        KEYPRESS(#BACKSPACE)
                        WAITMS(20)
                     END_CYC
                     wait(1)
                     
                     KEYSTRING($startSume)
                     
                     wait(1)
                     Goto(start1)
                     
                  END_IF
                 
                 
                END_IF 
               END_CYC
            END_IF
           
           
           
   END_CYC         
           
         
     
   END_IF

2
Общие вопросы / по нажатию клавиши
« on: October 07, 2018, 02:46:46 PM »
Подскажите пожалуйста почему работает при нажатии IF (ISKEYDOWN(103)=1), а при других выкидывает с сайта... мышь не двигается... даже не пытается... что не так?_)
 
Code: (clickermann) [Select]
IF (ISKEYDOWN(103)=1) //(7)
   FOR ($i, $i<9)
      LCLICK($_xmouse,$_ymouse)
   END_CYC
 lclick(841,216)
  FOR($a=0,$a<3) // первая инициализация для старта
   KEYPRESS(#BACKSPACE)
   WAITMS(20)
END_CYC
 KEYSTRING(2)
  lclick(849,833)
 
  FOR($b=0,$b<1) // первая инициализация для старта
   KEYDOWN (#E)
WAITMS (20)
KEYUP (#E)
WAITMS (20)
END_CYC 

KEYDOWN (#Q)
WAITMS (50)
KEYUP (#Q)
WAITMS (500)
   
FOR($b=0,$b<4) // первая инициализация для старта
   KEYDOWN (#D)
WAITMS (20)
KEYUP (#D)
WAITMS (20)
END_CYC

END_IF
 IF (ISKEYDOWN(100)=1)  // (4)
 FOR ($i, $i<9)
      LCLICK($_xmouse,$_ymouse)
   END_CYC
 click(841,216)
  FOR($a=0,$a<3) // первая инициализация для старта
   KEYPRESS(#BACKSPACE)
   WAITMS(20)
END_CYC
 KEYSTRING(5)
  lclick(849,833)
 
  FOR($b=0,$b<2) // первая инициализация для старта
   KEYDOWN (#E)
WAITMS (20)
KEYUP (#E)
WAITMS (20)
END_CYC 

KEYDOWN (#Q)
WAITMS (50)
KEYUP (#Q)
WAITMS (500)
   
FOR($b=0,$b<4) // первая инициализация для старта
   KEYDOWN (#D)
WAITMS (20)
KEYUP (#D)
WAITMS (20)
END_CYC

END_IF

 IF (ISKEYDOWN(97)=1 ) //  (1)
 FOR ($i, $i<9)
      LCLICK($_xmouse,$_ymouse)
   END_CYC
 click(841,216)
  FOR($a=0,$a<3) // первая инициализация для старта
   KEYPRESS(#BACKSPACE)
   WAITMS(20)
END_CYC
 KEYSTRING(11)
  lclick(849,833)
 
  FOR($b=0,$b<3) // первая инициализация для старта
   KEYDOWN (#E)
WAITMS (20)
KEYUP (#E)
WAITMS (20)
END_CYC 

KEYDOWN (#Q)
WAITMS (50)
KEYUP (#Q)
WAITMS (500)
   
FOR($b=0,$b<4) // первая инициализация для старта
   KEYDOWN (#D)
WAITMS (20)
KEYUP (#D)
WAITMS (20)
END_CYC

END_IF

 IF (ISKEYDOWN(105)=1)  // (9)
 FOR ($i, $i<9)
      LCLICK($_xmouse,$_ymouse)
   END_CYC
 click(841,216)
  FOR($a=0,$a<3) // первая инициализация для старта
   KEYPRESS(#BACKSPACE)
   WAITMS(20)
END_CYC
 KEYSTRING(2)
  lclick(849,833)
 
  FOR($b=0,$b<1) // первая инициализация для старта
   KEYDOWN (#E)
WAITMS (20)
KEYUP (#E)
WAITMS (20)
END_CYC 

KEYDOWN (#R)
WAITMS (50)
KEYUP (#R)
WAITMS (500)
   
FOR($b=0,$b<4) // первая инициализация для старта
   KEYDOWN (#D)
WAITMS (20)
KEYUP (#D)
WAITMS (20)
END_CYC

END_IF
 
 IF (ISKEYDOWN(102)=1)  // (6)
 FOR ($i, $i<9)
      LCLICK($_xmouse,$_ymouse)
   END_CYC
  click(841,216)
  FOR($a=0,$a<3) // первая инициализация для старта
   KEYPRESS(#BACKSPACE)
   WAITMS(20)
END_CYC
 KEYSTRING(5)
  lclick(849,833)
 
  FOR($b=0,$b<2) // первая инициализация для старта
   KEYDOWN (#E)
WAITMS (20)
KEYUP (#E)
WAITMS (20)
END_CYC 

KEYDOWN (#R)
WAITMS (50)
KEYUP (#R)
WAITMS (500)
   
FOR($b=0,$b<4) // первая инициализация для старта
   KEYDOWN (#D)
WAITMS (20)
KEYUP (#D)
WAITMS (20)
END_CYC

END_IF
 
 IF (ISKEYDOWN(99)=1)  // (3)
 FOR ($i, $i<9)
      LCLICK($_xmouse,$_ymouse)
   END_CYC
  click(841,216)
  FOR($a=0,$a<3) // первая инициализация для старта
   KEYPRESS(#BACKSPACE)
   WAITMS(20)
END_CYC
 KEYSTRING(11)
  lclick(849,833)
 
  FOR($b=0,$b<3) // первая инициализация для старта
   KEYDOWN (#E)
WAITMS (20)
KEYUP (#E)
WAITMS (20)
END_CYC 

KEYDOWN (#R)
WAITMS (50)
KEYUP (#R)
WAITMS (500)
   
FOR($b=0,$b<4) // первая инициализация для старта
   KEYDOWN (#D)
WAITMS (20)
KEYUP (#D)
WAITMS (20)
END_CYC

END_IF

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

4
Общие вопросы / Двой ной масив
« on: September 12, 2018, 05:00:55 PM »
Подскажите как написать код по масиву??? Я уже писал в ВК о данной проблеме... мне мало кто там ответил или ответили так какгбуд-то я знаю как писать))) а я нишиша не знаю... даже не програмист))) так пробую... В общем проблема такая - необходимо пометить переменную и далее работать с ней...


 $number = 1
 $numbermax1 = 172
 $numbermax2 = $numbermax1 + 1
 $razresh = 0
 $check = 0

 start:
 if ($number < $numbermax2)
//==========================================  логин первого
lclick(456,454)
 FOR($a=0,$a<10)
   KEYPRESS(#BACKSPACE)
   WAITMS(20)
END_CYC
KEYSTRING("pooll")
KEYSTRING($number)
 lclick(424,650)
 $number = $number + 1
wait(2)
//==========================================   логин второго окна
lclick(1469,459)
 FOR($a=0,$a<10)
   KEYPRESS(#BACKSPACE)
   WAITMS(20)
END_CYC
KEYSTRING("pooll")
KEYSTRING($number)
 lclick(1389,657)
wait( 8)
      lclick(838,586)
      WAIT(1)
      lclick(1827,667)
      WAIT(1)

 lclick(582,705)
 WAIT(2)
GETSCREEN
COLORMODE(8,797,806,880,833)
$count = PXLCOUNT (797,806,880,833, 16777215)
if ($count = 391)
  print ("выиграш"," ", $number)
вот здесь мне необходимо как-то запоминать этот номер... и далее работать с ним.
   lclick(915,106)
   WAIT(2)
   lclick(1879,124)
  WAIT(2)
  $number = $number + 1
else
   $number = $number - 1
   print ("выиграш"," ", $number)
или при условии тут...
   $number = $number + 2
   WAIT(2)
   lclick(915,106)
   WAIT(2)
   lclick(1879,124)
  WAIT(2)
END_IF
else
halt
END_IF if ($number > $numbermax2)
А вот тут необходимо как-то обратиться к тем переменным что мы пометили и добавлять после прохождения цыкла....
END_IF    goto (start)

Pages: [1]