Не находит картинку=(

[sanek83]

Андрей спасибо вам огромное!!!!!Вот такой получился скрипт,все работает.Спасибо

Code: [Select]

SUB(подпрограмма, $pict)
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (684,593, 1265,727, "bonus0000.bmp", -1, 95) // клик ,бонус
      LCLICK($_return1, $_return2)
      WAIT(1)
   END_IF
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (188,159, 1758,484, "krest0000.bmp", -1, 90) // клик на крестик
      LCLICK($_return1, $_return2)
      WAIT(1)
   END_IF
   
   
   GETSCREEN
   COLORMODE(6)
   SCANPICTURE($ARR_SCAN, 156,104, 1813,919, "set0000.bmp", -1,90)
   FOR($ARR_NUM=0,$ARR_NUM<ARRSIZE($ARR_SCAN),2)
      LCLICK($ARR_SCAN[$ARR_NUM]+18, $ARR_SCAN[$ARR_NUM+1]+82)   // Клик  на все картинки
      WAIT(1)
   END_CYC
   UNDEFINE($ARR_SCAN)
   
   MOVE(100,200)
   WAIT(1)
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (641,381, 1242,796, "zakrit0000.bmp", -1, 90)  // на закрыт
      $check = 1
      LCLICK($_return1, $_return2)
      WAITMS(100)
   END_IF
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (188,159, 1758,484, "krest0000.bmp", -1, 90) // клик на крестик
      LCLICK($_return1, $_return2)
      WAIT(1)
   END_IF
   
   
   $var1 = 0
   WHILE($var1 = 0)
      WAIT(4)
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (164,184, 1755,941, "pustaiaset0000.bmp", -1, 90) // клик на пустую сеть
         LCLICK($_return1+18, $_return2+82)
         WAIT(1)
         
         GETSCREEN
         COLORMODE(7)
         IF_PICTURE_IN (661,355, 1350,830, "najvkapronohnaia0000.bmp", -1, 95) //наживка проточная
            LCLICK($_return1+40, $_return2+40)
            WAIT(1)
         ELSE
            IF_PICTURE_IN (661,355, 1350,830, "najivkaspokoinaia0000.bmp", -1, 95) //наживка спокойная
               LCLICK($_return1+40, $_return2+40)
               WAITMS(1)
            ELSE
               IF_PICTURE_IN (661,355, 1350,830, "najivkasolenaia0000.bmp", -1, 95)//наживка спокойная
                  LCLICK($_return1+40, $_return2+40)
                  WAITMS(1)
                 
               END_IF
            END_IF
         END_IF
      ELSE
         $var1 = 1
      END_IF
   END_CYC
   
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (1529,95, 1795,505, $pict, -1, 95)
      LCLICK($_return1+13, $_return2+3)
      WAITMS(100)
   END_IF
END_SUB

SUB(переход, $pict)
   MOVE(1300,380)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (702,92, 1752,695, $pict, -1, 95)
         $check = 1
         LCLICK($_return1+10, $_return2+10)
         MOVE(1300,380)
         WAIT(1)
         
      ELSE
         WAITMS(50)
      END_IF
   END_CYC
END_SUB

SUB(выбор, $pict)
   $check = 0
   WHILE($check = 0)
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (899,215, 1410,570, $pict, -1, 95)
         $check = 1
         LCLICK($_return1+30, $_return2+30)
         WAITMS(100)
      ELSE
         WAITMS(50)
      END_IF
   END_CYC
END_SUB
////////////////////////////////////////////////////////////////////трава

SUB(сбор, $pict)
   WAIT(1)
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (684,593, 1265,727, "bonus0000.bmp", -1, 95) // клик ,бонус
      LCLICK($_return1, $_return2)
      WAIT(1)
   END_IF
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (188,159, 1758,484, "krest0000.bmp", -1, 90) // клик на крестик
      LCLICK($_return1, $_return2)
      WAIT(1)
   END_IF
   
   GETSCREEN
   COLORMODE(7)
   SCANPICTURE($ARR_SCAN, 264,186, 1755,856, "cvet0000.bmp", -1,85)
   FOR($ARR_NUM=0,$ARR_NUM<ARRSIZE($ARR_SCAN),2)
      LCLICK($ARR_SCAN[$ARR_NUM]+18, $ARR_SCAN[$ARR_NUM+1]+82)   // Клик  на все картинки
      WAITMS(100)
   END_CYC
   UNDEFINE($ARR_SCAN)
   
   WAIT(5)
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (661,355, 1350,830, "zakrit0000.bmp", -1, 90)  // на закрыт
      $check = 1
      LCLICK($_return1, $_return2)
      WAITMS(100)
   END_IF
   
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (188,159, 1758,484, "krest0000.bmp", -1, 90) // клик на крестик
      LCLICK($_return1, $_return2)
      WAIT(1)
   END_IF
   
   
   
   $var1 = 0
   WHILE($var1 = 0)
      WAIT(1)
     
      GETSCREEN
      GETSCREEN
      COLORMODE(7)
      IF_PICTURE_IN (202,197, 1749,960, "lopata0000.bmp", -1, 95) // клик земля
         LCLICK($_return1+27, $_return2+41)
         WAIT(1)
         
         MOVE(885,466)
         WAITMS(100)
         
         GETSCREEN
         COLORMODE(7)
         IF_PICTURE_IN (680,528, 1271,701, "perec0000.bmp", -1, 95) // наживка перец
            LCLICK($_return1, $_return2)
            WAIT(1)
           
           
         ELSE
            IF_PICTURE_IN (680,528, 1271,701, "trosnik0000.bmp", -1, 95) //тросник
               LCLICK($_return1+40, $_return2+40)
               WAITMS(1)
            ELSE
               IF_PICTURE_IN (680,528, 1271,701, "gargulnik0000.bmp", -1, 95)//гаргульник
                  LCLICK($_return1+40, $_return2+40)
                  WAITMS(1)
                 
               END_IF
            END_IF
         END_IF
      ELSE
         $var1 = 1
      END_IF
   END_CYC
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (1566,104, 1813,452, $pict, -1, 95)
      LCLICK($_return1+13, $_return2+3)
      WAITMS(100)
   END_IF
END_SUB

//////////////////////////////////////////////////////////////полив

SUB(полив, $pict)
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (684,593, 1265,727, "bonus0000.bmp", -1, 95) // клик ,бонус
      LCLICK($_return1, $_return2)
      WAIT(1)
   END_IF
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (188,159, 1758,484, "krest0000.bmp", -1, 90) // клик на крестик
      LCLICK($_return1, $_return2)
      WAIT(1)
   END_IF
   
   
   GETSCREEN
   COLORMODE(7)
   SCANPICTURE($ARR_SCAN, 264,186, 1755,856, "poliv0000.bmp", -1,90)
   FOR($ARR_NUM=0,$ARR_NUM<ARRSIZE($ARR_SCAN),2)
      LCLICK($ARR_SCAN[$ARR_NUM]+27, $ARR_SCAN[$ARR_NUM+1]+41)   // Клик  на все картинки
      WAIT(1)
   END_CYC
   UNDEFINE($ARR_SCAN)
   
   WAIT(4)
   
   GETSCREEN
   COLORMODE(7)
   IF_PICTURE_IN (1566,104, 1813,452, $pict, -1, 95)
      LCLICK($_return1+13, $_return2+3)
      WAITMS(100)
   END_IF
   
END_SUB


skip:

/////////////////////////////////////////////////////////////////////////рыбаки
выбор("pibak10000.bmp")
WAIT(1)
выбор("vOiti0000.bmp")
WAIT(20)

подпрограмма("allaia0000.bmp")
переход("sadar0000.bmp")
подпрограмма("perek0000.bmp")
переход("valor0000.bmp")
подпрограмма("perek0000.bmp")
переход("melnia0000.bmp")
подпрограмма("perek0000.bmp")
переход("usadba0000.bmp")
переход("prud0000.bmp")
подпрограмма("pivo0000.bmp")
подпрограмма("vixod0000.bmp")
переход("da0000.bmp")
//////////////////////////////////////////////////////////////////////рыбак2
выбор("pibak20000.bmp")
выбор("voiti0000.bmp")
WAIT(20)

подпрограмма("allaia0000.bmp")
переход("sadar0000.bmp")
подпрограмма("perek0000.bmp")
переход("valor0000.bmp")
подпрограмма("perek0000.bmp")
переход("melnia0000.bmp")
подпрограмма("perek0000.bmp")
переход("usadba0000.bmp")
переход("prud0000.bmp")
подпрограмма("pivo0000.bmp")
подпрограмма("vixod0000.bmp")
переход("da0000.bmp")
//////////////////////////////////////////////////////////////////////травники
выбор("trava10000.bmp")
выбор("voiti0000.bmp")
WAIT(20)
сбор("perek0000.bmp")
переход("usadba0000.bmp")
сбор("prud0000.bmp")
сбор("pivo0000.bmp")
переход("plato0000.bmp")
сбор("pivo0000.bmp")
переход("trakt0000.bmp")
сбор("waxta10000.bmp")
переход("ploskogore0000.bmp")
сбор("waxta0000.bmp")
переход("lug0000.bmp")
сбор("zapad0000.bmp")
переход("vostok0000.bmp")
сбор("landor0000.bmp")
переход("melnia0000.bmp")
сбор("perek0000.bmp")
переход("sadar0000.bmp")
переход("vixod0000.bmp")
переход("da0000.bmp")

///////////////////////////////////////////////////////////////////////трава 2
выбор("trava20000.bmp")
выбор("voiti0000.bmp")
WAIT(20)
сбор("perek0000.bmp")
переход("usadba0000.bmp")
сбор("prud0000.bmp")
сбор("pivo0000.bmp")
переход("plato0000.bmp")
сбор("pivo0000.bmp")
переход("trakt0000.bmp")
сбор("waxta10000.bmp")
переход("ploskogore0000.bmp")
сбор("waxta0000.bmp")
переход("lug0000.bmp")
сбор("zapad0000.bmp")
переход("vostok0000.bmp")
сбор("landor0000.bmp")
переход("melnia0000.bmp")
сбор("perek0000.bmp")
переход("sadar0000.bmp")
переход("vixod0000.bmp")
переход("da0000.bmp")
////////////////////////////////////////////////////////////////////полив 1 час
$check=0
While($check=0)
   Inc($max,1)
   For($a=0,$a<$max)
      Wait(3600)// время через
   End_cyc
   Switch($a)
   Case(1)
      выбор("trava10000.bmp")
      выбор("voiti0000.bmp")
      WAIT(20)
      полив("perek0000.bmp")
      переход("usadba0000.bmp")
      полив("prud0000.bmp")
      полив("pivo0000.bmp")
      переход("plato0000.bmp")
      полив("pivo0000.bmp")
      переход("trakt0000.bmp")
      полив("waxta10000.bmp")
      переход("ploskogore0000.bmp")
      полив("waxta0000.bmp")
      переход("lug0000.bmp")
      полив("zapad0000.bmp")
      переход("vostok0000.bmp")
      полив("landor0000.bmp")
      переход("melnia0000.bmp")
      полив("perek0000.bmp")
      переход("sadar0000.bmp")
      переход("vixod0000.bmp")
      переход("da0000.bmp")
     
     
      выбор("trava20000.bmp")
      выбор("voiti0000.bmp")
      WAIT(20)
      полив("perek0000.bmp")
      переход("usadba0000.bmp")
      полив("prud0000.bmp")
      полив("pivo0000.bmp")
      переход("plato0000.bmp")
      полив("pivo0000.bmp")
      переход("trakt0000.bmp")
      полив("waxta10000.bmp")
      переход("ploskogore0000.bmp")
      полив("waxta0000.bmp")
      переход("lug0000.bmp")
      полив("zapad0000.bmp")
      переход("vostok0000.bmp")
      полив("landor0000.bmp")
      переход("melnia0000.bmp")
      полив("perek0000.bmp")
      переход("sadar0000.bmp")
      переход("vixod0000.bmp")
      переход("da0000.bmp")
     
      ///////////////////////////////////////////////////////рыба обратка 2 часа
   Case(2)
      выбор("pibak10000.bmp")
      выбор("vOiti0000.bmp")
      WAIT(20)
      подпрограмма("prud0000.bmp")
      переход("usadba0000.bmp")
      переход("perek0000.bmp")
      переход("melnia0000.bmp")
      подпрограмма("perek0000.bmp")
      переход("sadar0000.bmp")
      переход("vixod0000.bmp")
      переход("da0000.bmp")
     
      выбор("piba20000.bmp")
      выбор("vOiti0000.bmp")
      WAIT(20)
      подпрограмма("prud0000.bmp")
      переход("usadba0000.bmp")
      переход("perek0000.bmp")
      переход("melnia0000.bmp")
      подпрограмма("perek0000.bmp")
      переход("sadar0000.bmp")
      переход("vixod0000.bmp")
      переход("da0000.bmp")
     
      ////////////////////////////////////////////////////////травники сбор 2часа
      выбор("trava10000.bmp")
      выбор("voiti0000.bmp")
      WAIT(20)
      сбор("perek0000.bmp")
      переход("usadba0000.bmp")
      сбор("prud0000.bmp")
      сбор("pivo0000.bmp")
      переход("plato0000.bmp")
      сбор("pivo0000.bmp")
      переход("trakt0000.bmp")
      сбор("waxta10000.bmp")
      переход("ploskogore0000.bmp")
      сбор("waxta0000.bmp")
      переход("lug0000.bmp")
      сбор("zapad0000.bmp")
      переход("vostok0000.bmp")
      сбор("landor0000.bmp")
      переход("melnia0000.bmp")
      сбор("perek0000.bmp")
      переход("sadar0000.bmp")
      переход("vixod0000.bmp")
      переход("da0000.bmp")
     
      выбор("trava20000.bmp")
      выбор("voiti0000.bmp")
      WAIT(20)
      сбор("perek0000.bmp")
      переход("usadba0000.bmp")
      сбор("prud0000.bmp")
      сбор("pivo0000.bmp")
      переход("plato0000.bmp")
      сбор("pivo0000.bmp")
      переход("trakt0000.bmp")
      сбор("waxta10000.bmp")
      переход("ploskogore0000.bmp")
      сбор("waxta0000.bmp")
      переход("lug0000.bmp")
      сбор("zapad0000.bmp")
      переход("vostok0000.bmp")
      сбор("landor0000.bmp")
      переход("melnia0000.bmp")
      сбор("perek0000.bmp")
      переход("sadar0000.bmp")
      переход("vixod0000.bmp")
      переход("da0000.bmp")
   Case(3)//////////////////////////////////////////////////////рыбак 3часа
      выбор("pibak10000.bmp")
      выбор("vOiti0000.bmp")
      WAIT(20)
      переход("perek0000.bmp")
      переход("valor0000.bmp")
      подпрограмма("perek0000.bmp")
      переход("usadba0000.bmp")
      переход("prud0000.bmp")
      подпрограмма("usadba0000.bmp")
      переход("perek0000.bmp")
      переход("sadar0000.bmp")
      переход("allaia0000.bmp")
      переход("portsadar0000.bmp")
      переход("vixod0000.bmp")
      переход("da0000.bmp")
     
      выбор("pibak20000.bmp")
      выбор("vOiti0000.bmp")
      WAIT(20)
      переход("perek0000.bmp")
      переход("valor0000.bmp")
      подпрограмма("perek0000.bmp")
      переход("usadba0000.bmp")
      переход("prud0000.bmp")
      подпрограмма("usadba0000.bmp")
      переход("perek0000.bmp")
      переход("sadar0000.bmp")
      переход("allaia0000.bmp")
      переход("portsadar0000.bmp")
      переход("vixod0000.bmp")
      переход("da0000.bmp")
      ///////////////////////////////////////////////////////////Трава полив
      выбор("trava10000.bmp")
      выбор("voiti0000.bmp")
      WAIT(20)
      полив("perek0000.bmp")
      переход("usadba0000.bmp")
      полив("prud0000.bmp")
      полив("pivo0000.bmp")
      переход("plato0000.bmp")
      полив("pivo0000.bmp")
      переход("trakt0000.bmp")
      полив("waxta10000.bmp")
      переход("ploskogore0000.bmp")
      полив("waxta0000.bmp")
      переход("lug0000.bmp")
      полив("zapad0000.bmp")
      переход("vostok0000.bmp")
      полив("landor0000.bmp")
      переход("melnia0000.bmp")
      полив("perek0000.bmp")
      переход("sadar0000.bmp")
      переход("vixod0000.bmp")
      переход("da0000.bmp")
     
     
      выбор("trava20000.bmp")
      выбор("voiti0000.bmp")
      WAIT(20)
      полив("perek0000.bmp")
      переход("usadba0000.bmp")
      полив("prud0000.bmp")
      полив("pivo0000.bmp")
      переход("plato0000.bmp")
      полив("pivo0000.bmp")
      переход("trakt0000.bmp")
      полив("waxta10000.bmp")
      переход("ploskogore0000.bmp")
      полив("waxta0000.bmp")
      переход("lug0000.bmp")
      полив("zapad0000.bmp")
      переход("vostok0000.bmp")
      полив("landor0000.bmp")
      переход("melnia0000.bmp")
      полив("perek0000.bmp")
      переход("sadar0000.bmp")
      переход("vixod0000.bmp")
      переход("da0000.bmp")
     
      $check=1
      $max=0
   End_Switch
end_cyc
GOTO(skip)