Messages

1

Использование / Re: Кликер ослеп =( при попытке считать цвет выдаёт 0 (shop-heroes-game)

« on: September 10, 2016, 12:10:08 PM »

Большое спасибо за ответы! =)

2

Использование / Кликер ослеп =( при попытке считать цвет выдаёт 0 (shop-heroes-game)

« on: September 09, 2016, 11:42:12 PM »

http://armorgames.com/shop-heroes-game/18077
Нашел игрушку shop-heroes-game.
Написать бот для неё интереснее чем играть в эту игрушку =)
Clickerman я только начал изучать и столкнулся с проблемой.
И интерфейс кликермана, и сама программа выдаёт цвет (0) в функции PXL при попытке при подключении функции hset
При отключении показывает все цвета.
Игрушка браузерная, на юнити. HWND юнити и браузера различаюся.
Как только установил HWND для Юнити кликерман ослеп и стал выдавать 0, на попытку проверить цвет пикселся.
Строки 5-95
Пожалуйста, подскажите как устранить проблему.
(бот еще не дописан)

Code: (clickermann) [Select]

//Unity Web Player 354 157 1191 794
//197696


thread(t99)
Print("t99 run")

//$h = WNDFIND ("Unity Web Player")
$h=197696

hset($h, 1)
LOGWRITE("Unity Web Player: ",$h)
wndgetinfo($h, $var1, $var2, $var3, $var4)
print($h," ", $var1," ", $var2," ", $var3," ", $var4)
wait(1)
SetThread (t99, 0)
end_thread




//=============================================
//MAin
//Opredeliaem komnaty v kotoroi naxodimsa po elementam ypravlenia
//=============================================
thread(t0)
Getscreen
$Screen1 = PXL (34, 707)
$Screen2 = PXL (1155,707)
LOGWRITE("$Screen1: ",$Screen1)
LOGWRITE("$Screen2: ",$Screen2)
 //15377433))
$room = 0
If(($Screen1 = 16777215) & ($Screen2 = 14325531))
$room = 1
//gorod
end_if

if(($Screen1 = 1386814) & ($Screen2 = 3317222))
$room=2
//shop
end_if


if (($Screen1 = 16777215) & ($Screen2 = 3316965))
$room=3
//bar
end_if
LOGWRITE("Komnata: ",$room)

// eto stop kran proekta
//----------------------------     
If($room=0)                         
print("priostanovleno")
SetThread (t1, 2)
SetThread (t2, 2)
SetThread (t3, 2)
wait(10)
SetThread (t1, 1)
SetThread (t2, 1)
SetThread (t3, 1)
end_if
// ----------------------------
wait(1)

//=============================================
// Vkluchaem scenarii dla raznix komnat
//=============
Switch($room)
case(1)
SetThread (t1, 1)
SetThread (t2, 0)
SetThread (t3, 0)
  print("gorod")
 
case(2)
SetThread (t1, 0)
SetThread (t2, 1)
SetThread (t3, 0)
  print("shop")
 
case(3)
SetThread (t1, 0)
SetThread (t2, 0)
SetThread (t3, 1)
print("bar")

default
  print("smth else")
  print("$var = ", $room) 
end_switch
wait(1)
end_thread

//=============================================
// SHOP
//=============================================

thread(t2)
print("t2 run")
for($room, $room = 2)
   //GETSCREEN
   IF_picture_IN(446,830,1416,965,"redy2.bmp", -1, 15)
      LCLICK($_return1, $_return2)
      WAITms(500)
   ELSE
      WAIT(3)
   END_IF
   END_CYC
   wait(1)
end_thread

//=============================================

   

3

Ошибки / Re: Clickerman v 4.12 на win xp sp 3 - Эмулятор выписки из БК

« on: September 07, 2016, 01:00:52 PM »

Огромное спасибо за науку =) Программа видимо билась об стену из-за строчек $check1=$check1-1