Автокликер Clickermann :: Форум
Основной раздел => Использование => Topic started by: Полуночник on October 17, 2012, 06:30:43 AM
-
День добрый)
Пришел на этот сайт с просьбой помочь сделать скрипт для ГБ. Теперь он готов. Работает с разрешениями 1280*1024 и 1600*900. Под другие мониторы надо корректировать (мне не за надобностью, поэтому не делал) если что - свистите. В обязательном порядке скорректировать координаты кликов на кнопки перехода в магазин и почту!!!
Тут старая версия скрипта[spoiler] И скачать файл 1.bmp - без него почту чистить если и будет, то коряво. Скрипт настроен на работу кликера в оконном режиме.
//Чистка почты и продажа лута в магаз
$c1 = 4079426
$c2 = 592154
$c3 = 1399552
LCLICK(863,81) // кнопка быстрого перехода в магазин(вынесена на панель закладок у меня в мазиле) менять координаты!!!
WAIT(10)
GETSCREEN
IF_PIXEL_IN(500,200, 800, 600, 1919430)
$x = $_return1
$y = $_return2
else
goto(M)
END_IF
$x3 = $x-200
$x4 = $x-150
$y3 = $y+22
$y4 = $y+34
$z = $y+305
mag:
TRAYSAY("Продаю хлам") //строки с TRAYSAY можно удалить, если вас раздражают всплывающие сообщения.
WHILE($z>$y3)
$b = 0
WHILE($b = 0)
getscreen
if_pixel_in($x3, $y3, $x4, $y4, $c1, $c2, $c3)
LCLICK($x, $_return2+25)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(PROD)
else
INC($y3,50)
INC($y4,50)
$b = 1
END_IF
END_CYC
END_CYC
// синь, фио
getscreen
if_pixel_in($x3, $y3+300, $x4, $y4+300, 11438, 9437313, 9456128)
SOUND("pause.wav")
TRAYSAY("Забито синь или фио") // я эти строки сделал что бы видеть - скрипт работает вообще или нет.
//сам в это время в другом бразе ползаю.
HALT
end_if
M://почта
TRAYSAY("Чищу почту")
LCLICK(929,81) //кнопка быстрого перехода на почту(тоже на панели закладок) менять координаты!!!
WAIT(RND(12,20))
po:
GETSCREEN
if_pixel_in(700, 230, 900, 320, 11982062)
$x2 = $_return1
$y2 = $_return2
LCLICK($_return1+10, $_return2+2)
else
goto(F)
end_if
GOSUB(Z)
GETSCREEN
if_pixel_in(800, 230, 1100, 600, 1860254)
WAITMS(1400) // время ожидания можно уменьшить(у меня инет тупит часто, поэтому выставил побольше задержку)
else
goto(W)
end_if
LCLICK($x2+20,$y2+256)
WAITMS(84)
LCLICK($x2+20,$y2+256)
GOSUB (WAIT_KN)
WAITMS(300)
KEYPRESS(#ENTER)
GOSUB (WAIT_FON)
W:
LCLICK($x2+20,$y2+2)
GOSUB(Z)
LCLICK($x2+170,$y2+237)
GOSUB (WAIT_KN)
KEYPRESS(#ENTER)
GOSUB (WAIT_FON)
GETSCREEN
COLORMODE(6)
IF_PICTURE_IN($x2-440,$y2+18,$x2-175,$y2+230, "1.bmp")
COLORMODE(0)
goto(po)
END_IF
COLORMODE(0)
F:
LCLICK(863,81) //кнопка быстрого перехода в магазин. менять координаты!!!
GOSUB(PROD)
GETSCREEN
IF_PIXEL_IN(500,200, 800, 600, 1919430)
$x = $_return1
$y = $_return2
END_IF
$x3 = $x-200
$x4 = $x-150
$y3 = $y+22
$y4 = $y+34
$z = $y+305
GETSCREEN
IF_PIXEL_IN($x3, $y3, $x4, $y4+246, $c1, $c2, $c3)
goto(mag)
else
HALT
end_if
SUB(PROD)
$break = 0
WHILE($break = 0)
WAITMS(100)
GETSCREEN
IF_PIXEL_IN(550,200, 800, 600, 1919430)
$break = 1
END_IF
END_CYC
END_SUB
SUB(WAIT_FON)
$break = 0
WHILE($break = 0)
WAITMS(100)
GETSCREEN
IF_PIXEL_IN($x2-57, $y2+70, $x2-27, $y2+78, 1447960, 1382167, 1513753)
$break = 1
END_IF
END_CYC
END_SUB
SUB(WAIT_KN)
$break = 0
WHILE($break = 0)
WAITMS(100)
GETSCREEN
IF_PIXEL_IN($x2-235, $y2+40, $x2, $y2+270, 3617169)
$break = 1
END_IF
END_CYC
END_SUB
SUB(Z)
$break = 0
WHILE($break = 0)
WAITMS(100)
GETSCREEN
IF_PIXEL_IN(800, 500, 980, 590, 65568)
$break = 1
END_IF
END_CYC
END_SUB
файл 1.bmp прилагается.[/spoiler] Свежая версия скрипта для экрана 1600*900 http://crapware.aidf.org/forum/index.php?topic=11.msg6489#msg6489 (http://crapware.aidf.org/forum/index.php?topic=11.msg6489#msg6489)
-
Ну ты ж сам написал что у иконок разные фоны. Значит тебе нужно искать и продавать зеленые и серые
Для каждой иконки определи цвет и координату пиксела (где нибудь в углу иконки)
100, 100 - координата пиксела
255 - первый цвет
3 - второй цвет
Всего должно получиться 7 условий
GETSCREEN
IF((PXL (100, 100) = 255) | (PXL (100, 100) = 3))// иконка 1
LCLICK(1048,226) // клик по "Продать"
WAITMS (500)
END_IF
IF((PXL (100, 100) = 255) | (PXL (100, 100) = 3)) // иконка 2
LCLICK(1048,226)
WAITMS (500)
END_IF
IF((PXL (100, 100) = 255) | (PXL (100, 100) = 3)) // иконка 3
LCLICK(1048,226)
WAITMS (500)
END_IF
IF((PXL (100, 100) = 255) | (PXL (100, 100) = 3)) // иконка 4
LCLICK(1048,226)
WAITMS (500)
END_IF
и тд....
WAITMS (100)
-
Кстати, не забудь поставить кол-во цветов в скрине. Чтобы небольшое изменение тона в иконке не продало что не нужно.
-
и кстати если не в лом дай ссылочку хотя бы на того бота
просто я раньше тоже играл в гнев богов и докачался до 25 уровня и бросил.
-
в том то и проблемма, что пытался я по пикселам выборку сделать. да тока в одной и той же точке координат цвет разный может быть не смотря что предметы все в одной категории(например обычные) Есть бот(не знаю откуда он и кто его разработал) который делает выборку по предметам и продаёт лут, а фио и синь оставляет. но во первых он работает только в хроме, а во вторых есть в нём кое какие ограничения изза которых не всегда могу им воспользоваться. например он работает только до 45 лвл персонажа. а у меня 55лвл. жаль я не разбираюсь в языках. так бы доработал бы ту прогу. Кому надо - могу скинуть на емейл архивчик с ней, весит не много, но как вложение не лезет сюды)) а так то ещё пользую iMacros но увы в нем нет условий (если то или).
Возник вопрос... есть ли возможность реализовать выборку не по пикселям, а по параметрам предметов? ведь эти самые параметры прописаны у каждой шмотки. может есть возможность прочитать их и потом уже действие....???? ну я нуб просто полный))) сорри
-
Нужно использовать цветокоррекцию, и думаю в твоем случает проще использовать IF_PIXEL_IN. Вставь несколько цветов если потребуется.
Помни, при наведении мыши кнопки могут менять цвет.
getscreen
// поиск красного или зеленого пиксела
IF_PIXEL_IN (10,20, 100, 40, 255, 65280)
lclick(200, 300)
END_IF
-
Нет, по пикселам фигня получается. Вот результат по цветам только фио шмота в одной точке координат: 7278415, 4132655, 7282511, 8326991, 5181247, 11476863 такая же история с синими и зелёными вещами. в одной точке координат вроде фон например зелёный, а по пикселям фигня получается, каждый раз цвет разный. игрался с цветокорекцией тоже. так что выборка по цветам пролетает. или я дебил.
-
используй "colormode".скорее всего фон цвета меняется (незаметно для глаза)
скрин твоего фона
getscreen
colormode(2,100,100,200,200)
screenshot
colormode(0)
поиск пикселя
getscreen
colormode(2,100,100,200,200)
IF_PIXEL_IN(100,100,200,200,цвет)
lcick($_return1,$_return2)
END_IF
colormode(0)
-
Нет, по пикселам фигня получается. Вот результат по цветам только фио шмота в одной точке координат: 7278415, 4132655, 7282511, 8326991, 5181247, 11476863 такая же история с синими и зелёными вещами. в одной точке координат вроде фон например зелёный, а по пикселям фигня получается, каждый раз цвет разный. игрался с цветокорекцией тоже. так что выборка по цветам пролетает. или я дебил.
Щас только разглядел, у тебя на скрине подписи к предметам тоже имеют свой цвет!
Используй IF_PIXEL_IN чтобы искать в области "подписи" нужный тебе цвет!
-
А вот это идея) как говорится всё гениальное просто)) будем пробовать по надписям. спс Oraven.
хотя по коду элемента самое простое было бы.
как уже писал все предметы делятся по категориям :
<div class="item_name grade4">
Цепь Чувств </div>
grade4 - это фио, 0 - лут, 1 - серый шмот, 2 - зелень, 3 - синь
вот тока как сделать по коду элемента(если это вообще возможно в кликере) не знаю...
-
Сделай для лута и серого шмота css стиль который облегчит его нахождение. Например:
.grade0{//Лут
margin-left:16px;
min-height:16px;
background-color:white;
color:black;
}
.grade1{//Серый шмот
margin-left:16px;
min-height:16px;
background-color:white;
color:black;
}
.grade2{//Синь
margin-left:16px;
min-height:16px;
background-color:black;
color:white;
}
.grade3{//Зелень
margin-left:16px;
min-height:16px;
background-color:black;
color:white;
}Тогда у тебя будет шмот виден примерно как на прикрепленном пике. А дальше уже кликером проверяй, есть ли в нужной точке белый цвет. Если есть, то продавай.
Для пользовательских стилей можно юзать Stylish, гугли.
-
я ещё не успел вникнуть в сравнение пикселов, а тут новая головоломка ;D буду конечно пробовать. но хотелось бы сначала всётаки доразобраться вот с чем:
getscreen
if_pixel_in(480,249, 500,260, 2055951,5201775,3100527)
LCLICK(693,277)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
else
if_pixel_in(480,298, 500,308, 2055951,5201775,3100527)
LCLICK(694,323)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
else
if_pixel_in(480,347, 500,358, 2055951,5201775,3100527)
LCLICK(694,374)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
else
if_pixel_in(480,396, 500,407, 2055951,5201775,3100527)
LCLICK(694,423)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
else
if_pixel_in(480,445, 500,456, 2055951,5201775,3100527)
LCLICK(694,473)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
else
if_pixel_in(480,494, 500,505, 2055951,5201775,3100527)
LCLICK(694,521)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
else
if_pixel_in(480,543, 500,554, 2055951,5201775,3100527)
LCLICK(694,571)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
end_if
ну я как неуч снова вопросы задаю))) вот сделал что то.... конечно не то что хотел в итоге получил. выборку делает. продаёт то что нужно и пропускает что надо оставить. но я не пойму как сделать что бы цикл продажи повторялся только на первом поле до тех пор, пока в том месте не окажется или другой цвет или пусто. А у меня он проверяет первое поле, продаёт если там лут и переходит ко второму полю.
второй вопрос:
go1
if_pixel_in(480,543, 500,554, 2055951,5201775,3100527)
LCLICK(694,571)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(4300,6000))
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT
else
GOTO (go1)
пытался сделать сравнение с картинкой(сделал скрин) и остановить выполнение скрипта, если в ячейке пусто или продолжить работу, так он продал то что нужно было оставить и продолжил продавать пока в той ячейке не появилось пустое поле(((
-
$break = 0
$c1 = 2055951
$c2 = 5201775
$c3 = 3100527
WHILE($break = 0)
if_pixel_in(480,249, 500,260, $c1,$c2,$c3)
LCLICK(693,277)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
ELSE
break = 1
END_IF
END_CYC
$break = 0
И делай такой цикл для всех полей. Только $break перед циклом не забывай обнулять. Кстати, оформляй код в ББ-Код code, читать невозможно.
-
а что по второму вопросу? исправился с бб-кодом))
что то я не понимаю видать, но
getscreen
$break = 0
$c1 = 2055951
$c2 = 5201775
$c3 = 3100527
WHILE($break = 0)
if_pixel_in(480,249, 500,260, $c1,$c2,$c3)
LCLICK(693,277)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
ELSE
break = 1
END_IF
END_CYC
$break = 0
WHILE($break = 0)
if_pixel_in(480,298, 500,309, $c1,$c2,$c3)
LCLICK(694,323)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
ELSE
break = 2
END_IF
END_CYC
$break = 0
WHILE($break = 0)
if_pixel_in(480,347, 500,358, $c1,$c2,$c3)
LCLICK(694,374)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
ELSE
break = 3
END_IF
END_CYC
$break = 0
WHILE($break = 0)
if_pixel_in(480,396, 500,407, $c1,$c2,$c3)
LCLICK(694,423)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
ELSE
break = 4
END_IF
END_CYC
не работает(( что я снова напортачил? наверно уже надоел своими вопросами)))
-
Не очень понял что ты хотел сделать во втором вопросе. Кстати дай скрин пустого поля и саму картинку 555.bmp
UPD: И не надо break в WHILE менять, там всегда должно быть WHILE($break = 0). Это просто такой обход отсутствия конструкции break для остановки цикла.
-
#name "Gnevbogov"
GETSCREEN
//Координаты иконки шмота
$icon_x = 265//ПОМЕНЯЙ!
$icon_y = 223//ПОМЕНЯЙ!
$icon_indent = 11-1
$icon_wh = 40-1
//Координаты кнопки "Да"
$yes_x = 570 //ПОМЕНЯЙ
$yes_y = 340 //ПОМЕНЯЙ
//Координаты кнопки продажи
$sell_x = $icon_x+251
$sell_y = $icon_y+24
$sell_x2 = ($sell_x+50)-1
$sell_y2 = ($sell_y+12)-1
$sell_indent = 39-1//Отступ кнопок
$sell_h = 12-1//Высота
$c1 = 8355647//Цвет черного шмота
$c2 = 4177727//Цвет зеленого шмота
$c3 = 7538192//Цвет серого шмота
$debug = 1//Выставь 0 когда убедишься что не продает ничего нужного.
FOR($i, $i<7)
$break = 0
WHILE($break = 0)
$pop = ($icon_wh * ($i-1)) + ($icon_indent * ($i-1))
if($i > 3)
$pop = $pop+1//Обход "защиты"
END_IF
COLORMODE(6)
$pc = pxl($icon_x,$icon_y+$pop+$icon_wh)
$pc2 = pxl($icon_x,($icon_y+$pop+$icon_wh)-1)
$break = 1
IF(($pc=$c1)|($pc=$c2)|($pc2=$c3))
$spop = ($sell_h * ($i-1))+($sell_indent*($i-1))
if($i > 3)
$spop = $spop+1//Обход "защиты"
END_IF
print($spop)
LCLICK(RND($sell_x,$sell_x2),RND($sell_y+$spop,$sell_y2+$spop))
WAITMS(RND(400,800))
IF($debug = 0)
LCLICK($yes_x,$yes_y2)
END_IF
IF($debug = 1)
LCLICK($yes_x+123,$yes_y)//нет
END_IF
WAITMS(RND(3400,4800))
$break = 0
END_IF
END_CYC
END_CYC
HALT
Посмотрел саму игру и вот что написал. У меня работает.
В $icon_x и $icon_y запиши координату точки которая красным выделена на прикрепленной картинке. В $yes_x и $yes_y запиши точку куда будет скрипт в кнопку "Да" тыкать.
По умолчанию оно нажимает "Нет". Когда убедишься что ничего лишнего не продает, ставь $debug = 0.
-
в той точке и у фио вещей и у синих, да у любых может быть чёрный или серый фон. у меня шмота много, проверял. выборку реализовал пока что по поиску пикселей в названии шмотки. в такие дебри как у вас скрипт написан я пока не лезу... мне до этого далеко ещё)))пока что реализовал вот так:
getscreen
mark1:
if_pixel_in(480,249, 500,260,2055951,5201775,3100527)
LCLICK(693,277)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark1)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT
end_if
mark2:
if_pixel_in(480,298, 500,308,2055951,5201775,3100527)
LCLICK(694,323)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark2)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT
end_if
mark3:
if_pixel_in(480,347, 500,358,2055951,5201775,3100527)
LCLICK(694,374)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark3)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT
end_if
mark4:
if_pixel_in(480,396, 500,407,2055951,5201775,3100527)
LCLICK(694,423)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark4)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT
end_if
mark5:
if_pixel_in(480,445, 500,456,2055951,5201775,3100527)
LCLICK(694,473)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark5)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT
end_if
mark6:
if_pixel_in(480,494, 500,505,2055951,5201775,3100527)
LCLICK(694,521)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark6)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT
end_if
mark7:
if_pixel_in(480,543, 500,554,2055951,5201775,3100527)
LCLICK(694,571)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark7)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT
end_if вроде работает, тестирую. если всё нормально, то следующая мысль как прикрутить переход на страницу почты //gnevbogov.ru/mail
на чистку почты скрипт уже сделал. там тупо клик по координатам) а потом обратно в магаз //gnevbogov.ru/shop и зациклить пока почта не опустеет. дело то в том, что этот бот изначально решил сделать потому что в почте бывает по 500 и более писем, это теже 500 шмоток которые надо продать в магазин. надоедает чистить в ручную)))
-
Ну тогда чтобы было проще css стили настрой.
Расширение для лисы: https://addons.mozilla.org/ru/firefox/addon/stylish/
Для хрома: https://chrome.google.com/webstore/detail/stylish/fjnbnpbmkenffdnngjfgmeleoegfcffe/details
Сам стиль:
.item_name{
padding-left:18px !important;
}
.item_name.grade0,.item_name.grade1,.item_name.grade2 {
background-color:white;
}
.item_name.grade3,.item_name.grade4,.item_name.grade5 {
background-color:black;
}
Как это у меня в хроме:
-
Собственно для себя я наконец то сделал то что хотел. теперь денёк на тестирование. конечно может громоздко получилось и уверен что можно всё по другому написать. но уж для начинающего и то подвиг)))
go:
LCLICK(720,71) // идём в магазин
WAITMS(RND(6000,8000))
getscreen
mark1:
if_pixel_in(480,249, 500,260,2055951,5201775,3100527) // тут и далее продаёт чё не нуно
LCLICK(693,277)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark1)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp") //проверяет есть ли тут шмот, если есть и не на продажу, то идёт к следующей ячейке
goto(ma) //если пусто, то идёт на почту
end_if
mark2:
if_pixel_in(480,298, 500,308,2055951,5201775,3100527)
LCLICK(694,323)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark2)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
goto(ma)
end_if
mark3:
if_pixel_in(480,347, 500,358,2055951,5201775,3100527)
LCLICK(694,374)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark3)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
goto(ma)
end_if
mark4:
if_pixel_in(480,396, 500,407,2055951,5201775,3100527)
LCLICK(694,423)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark4)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
goto(ma)
end_if
mark5:
if_pixel_in(480,445, 500,456,2055951,5201775,3100527)
LCLICK(694,473)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark5)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
goto(ma)
end_if
mark6:
if_pixel_in(480,494, 500,505,2055951,5201775,3100527)
LCLICK(694,521)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark6)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
goto(ma)
end_if
mark7:
if_pixel_in(480,543, 500,554,2055951,5201775,3100527)
LCLICK(694,571)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark7)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT //тут сделал остановку. потому что если 6 ячеек уже забито, то по 1й ячейке можно продавать конечно. но лучше посмотреть чем забито и потом перезапустить))
end_if
ma:
LCLICK(781,67) //заходит на почту
WAITMS(RND(6000,8000))
getscreen
mark8:
if_pixel_in(875,294,884,299,4165583,12574703,2064319) //проверяет есть ли письма
goto(mark9) //если есть, то собирает лут с почты
else
goto(mark11) //если нет, то в магаз и последний раз продаёт лут и закачивает работу скрипта
end_if
mark9:
LCLICK(968,296)
WAITMS(1400)
LCLICK(901,551)
WAITMS(110)
LCLICK(901,551)
WAITMS(RND(400,800))
LCLICK(751,368)
WAITMS(RND(4500,7000))
LCLICK(916,293)
WAITMS(RND(400,800))
LCLICK(1063,526)
WAITMS(RND(400,800))
LCLICK(738,494)
WAITMS(RND(4500,7000))
IF_PICTURE_IN(655,475,697,517, "444.bmp") // проверяет есть ли ещё свободные места в рюкзаке
goto(mark8) // места есть - проверяем есть ли ещё письма
else
goto(go) // мест больше нет, идём в магаз продавать
end_if
mark11: // продаём остатки если нет писем и заканчиваем работу скрипта
LCLICK(720,71)
WAITMS(RND(6000,8000))
getscreen
if_pixel_in(480,249, 500,260,2055951,5201775,3100527)
LCLICK(693,277)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark1)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT
end_if
mark2:
if_pixel_in(480,298, 500,308,2055951,5201775,3100527)
LCLICK(694,323)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark2)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT
end_if
mark3:
if_pixel_in(480,347, 500,358,2055951,5201775,3100527)
LCLICK(694,374)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark3)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT
end_if
mark4:
if_pixel_in(480,396, 500,407,2055951,5201775,3100527)
LCLICK(694,423)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark4)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT
end_if
mark5:
if_pixel_in(480,445, 500,456,2055951,5201775,3100527)
LCLICK(694,473)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark5)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT
end_if
mark6:
if_pixel_in(480,494, 500,505,2055951,5201775,3100527)
LCLICK(694,521)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark6)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT
end_if
mark7:
if_pixel_in(480,543, 500,554,2055951,5201775,3100527)
LCLICK(694,571)
WAITMS(RND(400,800))
LCLICK(734,366)
WAITMS(RND(3400,4800))
goto(mark7)
else
IF_PICTURE_IN(416,540,457,582, "555.bmp")
HALT
end_if
координаты понятно для моего экрана. ссылки на магаз и почту у меня вынесены на панели ссылок в бразе. я вот инструкцию перечитал пару раз, но так и не понял как в кликере сделать переход на нужную страницу типа go:http//тырыпыры/поллитра.ru
-
в хроме попробовал стили - всё норм работает, а вот в мазиле нет.
@-moz-document url("http://gnevbogov.ru/shop") {
.item_name{
padding-left:18px !important;
}
.item_name.grade0,.item_name.grade1,.item_name.grade2 {
background-color:white;
}
.item_name.grade3,.item_name.grade4,.item_name.grade5 {
background-color:black;
}
} что то опять не правильно?
и я извеняюсь за кучу флуда не по теме)) может подчистить от мусора а примеры использования закрепить на первой странице топика?
-
Попробуй юрл без кавычек писать, вот так:
@-moz-document url(http://gnevbogov.ru/shop) {
Насчет перехода на другую страницу, то легче всего сделать закладки на панели браузера и кликать туда мышкой из кликера.
Или же можно кликнуть в адресную строку браузера и набрать адрес с помощью фун-и KEYSTRING ("keystring", [delay]), т.е.
LCLICK(160,40)//Координаты адресной строки
KEYSTRING("www.gnevbogov.ru/mail", 60)Но только для этого нужно следить чтобы раскладка была правильная включена, так что лучше закладки.
-
без кавычек тож не работает
-
Тупая лиса, оказывается надо "/" в конце:
@-moz-document url(http://gnevbogov.ru/shop/) {Если и после этого не заработает, попробуй http://www.gnevbogov.ru/shop/
-
не понятно что не так да и фиг с ним)) поставил Stiles Tuner и без проблемм всё сделал. только скрипт переделать под него(если понадобится)
всё. на сегодня хватит. спать)) спасибо за помощь
-
Попробуй перенести повторяющуюся группу действий (продажу например) в подпрограммы. Вызов подпрограмм работает очень стабильно. Но учти:
Примечания
Запрещается использовать в теле подпрограммы инструкцию GOTO, ведущую за пределы подпрограммы, так как это приведет к ошибке
-
аааа бесит((( ничё не понимаю в этих языках. фигня только получается((( либо не продаёт ничего, либо продаёт, но всё подряд. вроде сделал что бы продавал только то что нужно, но тогда продаёт только одну шмотку. толи цикл не правильно делаю, толи не сравнивает IF_PICTURE_IN толи ещё что.... а привязать чистку почты не получается совсем... там чистит только одно письмо и сразу бежит в магаз не делая больше никаких проверок ни с if_pixel_in ни с IF_PICTURE_IN.
А что предложил Сергей не понял и половины#name "Gnevbogov"
GETSCREEN
//Координаты иконки шмота --------------------дык координаты разные... их может быть 1 минимум и 7 максимум
$icon_x = 265//ПОМЕНЯЙ!
$icon_y = 223//ПОМЕНЯЙ!
$icon_indent = 11-1
$icon_wh = 40-1
//Координаты кнопки "Да" ------------------------ единственное что не меняется
$yes_x = 570 //ПОМЕНЯЙ
$yes_y = 340 //ПОМЕНЯЙ
//Координаты кнопки продажи ------------тоже самое... каждый раз могут быть от 1 до 7 координат потому что если в первой ячейке есть лут
на продажу и продаю его, то все остальные ячейки сдвигаются на 1 вверх, и так пока не кончится лут. а если есть то что надо оставить что то,
то надо переходить с первой ячейки, на вторую. если и во второй ячейке нужная вещь, то переходим на третью. и так пока либо не продать всё,
либо пока первые 7 ячеек не заполнятся нужными вещами. тогда надо остановить макрос.$sell_x = $icon_x+251
$sell_y = $icon_y+24
$sell_x2 = ($sell_x+50)-1
$sell_y2 = ($sell_y+12)-1
$sell_indent = 39-1//Отступ кнопок
$sell_h = 12-1//Высота
$c1 = 8355647//Цвет черного шмота---------------- ну допустим со стилем css цвет только один ищем
$c2 = 4177727//Цвет зеленого шмота
$c3 = 7538192//Цвет серого шмота
$debug = 1//Выставь 0 когда убедишься что не продает ничего нужного.
// а тут дальше ващееееее.... для меня тёмный лес((( как применить это к своим потребностям и чем то дополнить я не соображаю((( простите
FOR($i, $i<7)
$break = 0
WHILE($break = 0)
$pop = ($icon_wh * ($i-1)) + ($icon_indent * ($i-1))
if($i > 3)
$pop = $pop+1//Обход "защиты"
END_IF
COLORMODE(6)
$pc = pxl($icon_x,$icon_y+$pop+$icon_wh)
$pc2 = pxl($icon_x,($icon_y+$pop+$icon_wh)-1)
$break = 1
IF(($pc=$c1)|($pc=$c2)|($pc2=$c3))
$spop = ($sell_h * ($i-1))+($sell_indent*($i-1))
if($i > 3)
$spop = $spop+1//Обход "защиты"
END_IF
print($spop)
LCLICK(RND($sell_x,$sell_x2),RND($sell_y+$spop,$sell_y2+$spop))
WAITMS(RND(400,800))
IF($debug = 0)
LCLICK($yes_x,$yes_y2)
END_IF
IF($debug = 1)
LCLICK($yes_x+123,$yes_y)//нет
END_IF
WAITMS(RND(3400,4800))
$break = 0
END_IF
END_CYC
END_CYC
HALTЛадно, пока что в такие дебри нет возможности лезть. Обьясните по порядку с моими потугами:go:
LCLICK(866,79)
WAITMS(RND(6000,8000))
pr1:
getscreen
if_pixel_in(484,265, 16777215)
LCLICK(689,285)
WAITMS(RND(400,800))
LCLICK(730,376)
WAITMS(RND(6000,8000))
goto(pr1)
else
goto(pr2)
end_if
pr2:
getscreen
if_pixel_in(484,312, 16777215)
LCLICK(694,335)
WAITMS(RND(400,800))
LCLICK(730,376)
WAITMS(RND(6000,8000))
goto(pr1)
else
goto(pr11)
end_if
pr11
LCLICK(929,82) почему тут не могу сделать цикл что бы проверял пиксели на первой ячейке(pr1:), и ТОЛЬКО если НЕТ нужного цвета переходил на проверку второй ячейки(pr2:) и только после всего переходил на (pr11)? у меня делает всё подряд по пунктам во первых, не взирая на указанные goto? а во вторых во второй ячейке не проверяет if_pixel_in(484,312, 16777215) продаёт что там есть и не переходя обратно на(pr1) заканчивает кликом(pr11). Для того что бы я быстрее понял прошу(если не трудно) именно в моём скрипте указать ошибки и примеры КАК именно нужно делать....
-
с основным окошком не могу пока подружиться. а вы мне подпрограммы предлагаете. для меня это тёмный лес
Попробуй перенести повторяющуюся группу действий (продажу например) в подпрограммы. Вызов подпрограмм работает очень стабильно. Но учти:
Примечания
Запрещается использовать в теле подпрограммы инструкцию GOTO, ведущую за пределы подпрограммы, так как это приведет к ошибке
-
Много бестолково "мусоришь"
go: - здесь совсем некчему
goto(pr2) pr2: goto(pr11) pr11 - тоже не нужно. Скрипт и так выполняется с верху в низ
if_pixel_in(484,265, 16777215) - написано неправильно! Ты должен указать область поиска
if_pixel_in(0,0,1200,768, 16777215)
LCLICK(866,79)
WAITMS(RND(6000,8000))
pr1:
getscreen
if_pixel_in(0,0,484,265, 16777215)
LCLICK(689,285)
WAITMS(RND(400,800))
LCLICK(730,376)
WAITMS(RND(6000,8000))
goto(pr1)
end_if
getscreen
if_pixel_in(0,0,484,312, 16777215)
LCLICK(694,335)
WAITMS(RND(400,800))
LCLICK(730,376)
WAITMS(RND(6000,8000))
goto(pr1)
end_if
LCLICK(929,82)
-
Давайте, дорогой друже, Prapor наметим путь достижения цели.
1. Словами опишите, что конкретно хотите зделать с помощью скрипта.
2. Выпишите чёткую последовательность простых действий мышью и клавой которая приведёт к нужному результату.
3. Замените каждый элемент вашей последовательности на операторы программы. Переведите ваш язык на язык кликера.
Скрипт хороший у вас получился. Проделайте эти три пункта и вам всё станет ясно.
Итак, Prapor начинайте! Мы поможем.
-
Ну тогда чтобы было проще css стили настрой.
Расширение для лисы:
Сергей, если не затруднит, нельзя ли подробнее описать этот интересный процесс?
Для чего, почему, как меняется игровое поле , почему кликерману так проще опознавать предметы на экране итп
Ну и поместить сабж , скажем в новую тему "Секреты кликермана" .
Столкнулся с тем что подложка страницы сайта в хроме сильно влияет на цвет искомых пикселей , хотя визуально ничего не меняется.
отрывок из скрипта
GETSCREEN
COLORMODE
WAITMS(550)
//////////////
$coun = PXLCRC (653,675,689,696) // поиск
WAITMS(150)
print($coun)
IF (($coun = 2532764772)|($coun = 2688665135)|($coun = 3854682496)|($coun = 664050717))
GOTO(go3)
END_IF
Это все один и тот же белый цвет фона, с одними и теми же маленькими черными буковками на нем .
-
Почему у тебя COLORMODE без параметров?
-
Почему у тебя COLORMODE без параметров?
Ставилс я параметр и колормод (4), и (7) . Ничего не меняется. Подложка ( фон страницы) под текстом упорно меняют сумму пикселей.
-
Цитрин, возможно тебе стоит чётко описать чего ты хочешь от скрипта. Тогда станет ясно какими функциями тебе надо пользоваться.
Целесообразно ли применение стилей и колормода? Если надо определять текущий цвет одного пикселя на экране? Функция поиска пикселя в координатах весьма гибка.
-
Сергей, если не затруднит, нельзя ли подробнее описать этот интересный процесс?
Для чего, почему, как меняется игровое поле , почему кликерману так проще опознавать предметы на экране итп
Ну и поместить сабж , скажем в новую тему "Секреты кликермана" .
Куда проще различить черный и белый цвет, разве нет? В игре цвета специально мешают, чтобы их сложнее было различить автоматическими средствами.
И PXLCRC не поиск, а контрольная сумма всех пикселов. Если хоть один пиксел будет отличаться, то эта функция вернет уже другой результат.
-
1. возможно тебе стоит чётко описать чего ты хочешь от скрипта.
Целесообразно ли применение стилей и колормода?
2. Функция поиска пикселя в координатах весьма гибка.
1. Откровенно говоря, я вообще не понимаю, когда нужен колормод , а когда нет.
В моих задачах он никакой пользы пока не принес.
Ставлю его, или нет - без разницы.
Зато лишний ступор очевидно появился.
Возможно вопросов поубавится, если будет четко описаны моменты , когда он нужен , а когда нет.
2. Степень гибкости? Что ещё, кроме поиска пикселя нужного цвета , эта функция делает?
-
1. Откровенно говоря, я вообще не понимаю, когда нужен колормод , а когда нет.
В моих задачах он никакой пользы пока не принес.
Ставлю его, или нет - без разницы.
Зато лишний ступор очевидно появился.
Возможно вопросов поубавится, если будет четко описаны моменты , когда он нужен , а когда нет.
2. Степень гибкости? Что ещё, кроме поиска пикселя нужного цвета , эта функция делает?
Значит он тебе не нужен вообще. Пробовал использовать не зная, как он работает?
Пробовал пункт первый осуществить?
Давайте, дорогой друже, наметим путь достижения цели.
1. Словами опишите, что конкретно хотите зделать с помощью скрипта.
2. Выпишите чёткую последовательность простых действий мышью и клавой, которая приведёт к нужному результату.
3. Замените каждый элемент вашей последовательности на операторы программы. Переведите ваш язык на язык кликера.
Гибкость в применении лежит.
Можно расставить приоритеты в какой области экрана искать сначала в какой потом.
Можно искать комбинацию пикселей с относительной площадью поиска.
-
Пробовал использовать не зная, как он работает?
Пробовал пункт первый осуществить?
Много раз пробовал. Стабильной работы не получил в сложных случаях , несмотря на колормод от 0 до 7.
В простых случаях колоромод ( и даже гетскрин ) мне показались не нужными.
Поэтому и возник вопрос о отдельном описании смысла применения колормода.
-
Много раз пробовал. Стабильной работы не получил в сложных случаях , несмотря на колормод от 0 до 7.
В простых случаях колоромод ( и даже гетскрин ) мне показались не нужными.
Поэтому и возник вопрос о отдельном описании смысла применения колормода.
GETSCREEN - всегда используется с функциями анализа экрана. COLORMODE - нужен для уменьшения количества цветов на экране.
Лупой можно посмотреть как выглядит цветокоррекция на разных режимах.
-
Лупой можно посмотреть как выглядит цветокоррекция на разных режимах.
Отлично все работает.
И цвет меняет и экран захватывает.
НО!
Как это помогает в сложных случаях ?
Пока примеров у себя не видел. Допускаю , что я пока с реальной целью пока не встретился. Отсюда вопросы недоумения.
-
Допускаю , что я пока с реальной целью пока не встретился. Отсюда вопросы недоумения.
Вот. Да первично о цели речь следует вести.
-
первично о цели речь следует вести.
Ну нельзя сказать, что все мои задачи решаются простым поиском картинки бээмпэ, в указанном квадрате.
Если вариант иф_пикче_ин не идет, опускаюсь до иф_пиксел_ин.
Как правило, это устраняет проблему, хотя приходится повозиться более основательно.
-
Ну нафлудииили ;D
Лан... наконец то мне указали на мои ошибки, спс бааальшущее. сделал скрипт, работает. Сюда пока выкладывать не буду, потому что его надо сначала подрихтовать на предмет функций, убрать лишнее и т.д. но об этом в другом топике. Как всё решу выложу окончательный вариант. В той игре играет много народу и кто нибудь обязательно сюда заглянет в поиске бота))
-
Ну собственно бот для ГБ рабочий. Конечно хочу его ещё немного подредактировать. Что бы универсальней был. А то сейчас в нём слишком много надо переделывать под другие условия.
//Гнев Богов
//Чистка почты и продажа лута в магазине
//Все координаты кликов, поиска пикселов
// и изображения
// переделать под свой монитор!!!
$v = 16579836
$x = 728 // координата кнопки yes
$y = 375 // при продаже
$x2 = 695 // координата кнопки
$y2 = 284 // продать верхняя
mag1:
LCLICK(863,81) // координата кнопки перехода в магазин. у меня вынесена на панел браза
GOSUB(WAIT_MA)
sl1:
getscreen
if_pixel_in(482, 262, 483, 263, $v)
LCLICK($x2,$y2)
WAITMS(RND(300,500))
LCLICK($x,$y)
GOSUB(WAIT_MA)
GOTO(sl1)
end_if
sl2:
getscreen
if_pixel_in(482, 310, 483, 311, $v)
LCLICK($x2,$y2+50)
WAITMS(RND(300,500))
LCLICK($x,$y)
GOSUB(WAIT_MA)
GOTO(sl2)
end_if
sl3:
getscreen
if_pixel_in(482, 360, 483, 361, $v)
LCLICK($x2,$y2+100)
WAITMS(RND(300,500))
LCLICK($x,$y)
GOSUB(WAIT_MA)
GOTO(sl3)
end_if
sl4:
getscreen
if_pixel_in(482, 410, 483, 411, $v)
LCLICK($x2,$y2+150)
WAITMS(RND(300,500))
LCLICK($x,$y)
GOSUB(WAIT_MA)
GOTO(sl4)
end_if
sl5:
getscreen
if_pixel_in(482, 460, 483, 461, $v)
LCLICK($x2,$y2+200)
WAITMS(RND(300,500))
LCLICK($x,$y)
GOSUB(WAIT_MA)
GOTO(sl5)
end_if
sl6:
getscreen
if_pixel_in(482, 510, 483, 511, $v)
LCLICK($x2,$y2+250)
WAITMS(RND(300,500))
LCLICK($x,$y)
GOSUB(WAIT_MA)
GOTO(sl6)
end_if
sl7:
getscreen
if_pixel_in(482, 560, 483, 561, $v)
LCLICK($x2,$y2+300)
WAITMS(RND(300,500))
LCLICK($x,$y)
GOSUB(WAIT_MA)
GOTO(sl7)
TRAYSAY("на почтууу...") //сделал чисто для собственного удобства, потому что включен оконный режим. Хоть видно иногда что работает)))
end_if
ht1:
getscreen
if_pixel_in(482, 556, 483, 557, 0)
TRAYSAY("всё забито")
SOUND("pause.wav")
HALT
end_if
LCLICK(929,81) // кнопка почты тоже на панели браза
WAIT(RND(12,14))
po:
GETSCREEN
if_pixel_in(883, 301, 892, 306, 11982062)
goto(ch)
else
TRAYSAY("писем нет")
goto(F)
end_if
ch:
LCLICK(968,305) // координата тела письма
WAITMS(4500)
LCLICK(911,558) // координата иконки предмета в письме
WAITMS(110)
LCLICK(911,558)
WAITMS(RND(600,1000))
LCLICK(729,377) // координата кнопки да(забрать)
GOSUB (WAIT_PO)
LCLICK(916,308) // координата тела письма
WAITMS(RND(600,1000))
LCLICK(1063,535) // координата кнопки удалить
WAITMS(RND(1000,2000))
LCLICK(738,494) // координата кнопки да(удалить)
GOSUB (WAIT_PO)
GETSCREEN
//три проверки потому что ячейки выглядят одинакого, но и колор мод почему то не помогал и я сделал три проверки на пустые ячейки. 3.bmp - нижняя правая. остальные где угодно.
IF_PICTURE_IN(445,320,710,532, "1.bmp")
goto(po)
end_if
GETSCREEN
IF_PICTURE_IN(445,320,710,532, "2.bmp")
goto(po)
end_if
GETSCREEN
IF_PICTURE_IN(445,320,710,532, "3.bmp")
goto(po)
else
TRAYSAY("мест нет, продаю")
goto(mag1)
END_IF
F:
GETSCREEN
//координаты нижней ячейки в магазине. проверка пустая или нет.
IF_PICTURE_IN(419,546,468,598, "4.bmp")
goto(mag1)
end_if
HALT
//задержки на обновление страницы
SUB(WAIT_MA)
$break = 0
WHILE($break = 0)
WAIT(4)
GETSCREEN
IF(PXL(722, 287) = 1919430)
$break = 1
END_IF
END_CYC
END_SUB
SUB(WAIT_PO)
$break = 0
WHILE($break = 0)
WAIT(4)
GETSCREEN
IF(PXL(841, 375) = 4078899)
$break = 1
END_IF
END_CYC
END_SUBДелал для фаерфокса с применением css. Теперь буду думать как переделать без стилей что бы работал.
Установлен StilesTuner. В настройках указывал для продажи лута белый цвет(252), для шмота что нужно оставить черный(0). Искать строчки <div class="item_name grade4"
grade4 - это фио, 0 - лут, 1 - серый шмот, 2 - зелень, 3 - синь
-
Ещё одна редакция. Меньше координат менять надо и теперь работает без стилей css.
//Гнев Богов
// Чистка почты и продажа лута в магазине
// Все координаты кликов, поиска пикселов
// и изображения
// переделать под свой монитор!!!
$x = 728 // координата кнопки поменять
$y = 375 // yes при продаже поменять
$x2 = 695 // координата кнопки поменять
$y2 = 284 // продать верхняя поменять
$c1 = 4079426
$c2 = 592154
$c3 = 1399552
$x3 = 490 // координаты поменять
$x4 = 580 // поиска цвета поменять
$y3 = 262 // верхней поменять
$y4 = 268 // ячейки поменять
mag1:
LCLICK(863,81) // координата кнопки перехода в магазин. у меня вынесена на панел браза
GOSUB(WAIT_MA)
sl1:
getscreen
if_pixel_in($x3, $y3, $x4, $y4, $c1, $c2, $c3)
LCLICK($x2,$y2)
WAITMS(RND(300,500))
LCLICK($x,$y)
GOSUB(WAIT_MA)
GOTO(sl1)
end_if
sl2:
getscreen
if_pixel_in($x3, $y3+50, $x4, $y4+50, $c1, $c2, $c3)
LCLICK($x2,$y2+50)
WAITMS(RND(300,500))
LCLICK($x,$y)
GOSUB(WAIT_MA)
GOTO(sl2)
end_if
sl3:
getscreen
if_pixel_in($x3, $y3+100, $x4, $y4+100, $c1, $c2, $c3)
LCLICK($x2,$y2+100)
WAITMS(RND(300,500))
LCLICK($x,$y)
GOSUB(WAIT_MA)
GOTO(sl3)
end_if
sl4:
getscreen
if_pixel_in($x3, $y3+150, $x4, $y4+150, $c1, $c2, $c3)
LCLICK($x2,$y2+150)
WAITMS(RND(300,500))
LCLICK($x,$y)
GOSUB(WAIT_MA)
GOTO(sl4)
end_if
sl5:
getscreen
if_pixel_in($x3, $y3+200, $x4, $y4+200, $c1, $c2, $c3)
LCLICK($x2,$y2+200)
WAITMS(RND(300,500))
LCLICK($x,$y)
GOSUB(WAIT_MA)
GOTO(sl5)
end_if
sl6:
getscreen
if_pixel_in($x3, $y3+250, $x4, $y4+250, $c1, $c2, $c3)
LCLICK($x2,$y2+250)
WAITMS(RND(300,500))
LCLICK($x,$y)
GOSUB(WAIT_MA)
GOTO(sl6)
end_if
sl7:
getscreen
if_pixel_in($x3, $y3+300, $x4, $y4+300, $c1, $c2, $c3)
LCLICK($x2,$y2+300)
WAITMS(RND(300,500))
LCLICK($x,$y)
GOSUB(WAIT_MA)
GOTO(sl7)
end_if
TRAYSAY ("на почту") //можете убрать если мешает.всплывает в трее подсказка. я сделал просто что бы видеть что что то происходит.
ht1:
getscreen
if_pixel_in($x3, $y3+300, $x4, $y4+300, 11438, 9437313, 9456128)
TRAYSAY("всё забито")
SOUND("pause.wav")
HALT
end_if
LCLICK(929,81) // кнопка почты тоже на панели браза
WAIT(RND(12,14))
po:
GETSCREEN
if_pixel_in(883, 301, 892, 306, 11982062) //координата желтенького значка письма. поменять
goto(ch)
else
TRAYSAY("писем нет")
goto(F)
end_if
ch:
LCLICK(968,305) // координата тела письма. поменять
WAITMS(4500)
LCLICK(911,558) // координата иконки предмета в письме. поменять
WAITMS(110)
LCLICK(911,558)
WAITMS(RND(600,1000))
LCLICK(729,377) // координата кнопки да(забрать) поменять
GOSUB (WAIT_PO)
LCLICK(916,308) // координата тела письма. поменять
WAITMS(RND(600,1000))
LCLICK(1063,535) // координата кнопки удалить. поменять
WAITMS(RND(1000,2000))
LCLICK(738,494) // координата кнопки да(при удалении пустого письма) поменять
GOSUB (WAIT_PO)
GETSCREEN
COLORMODE(6)
IF_PICTURE_IN(445,320,710,532, "1.bmp") //координаты всех (20ти) ячеек на почте от верхней слева, до нижней справа. поменять
goto(po)
else
TRAYSAY("мест нет, продаю")
goto(mag1)
END_IF
F:
LCLICK(863,81) //кнопка магаза на панели браза.
GOSUB(WAIT_MA)
GETSCREEN
IF_PICTURE_IN(419,546,468,598, "2.bmp")//координаты нижней ячейки в магазине. проверка пустая или нет. поменять.
goto(mag1)
end_if
HALT
//задержки на обновление страницы
SUB(WAIT_MA)
$break = 0
WHILE($break = 0)
WAIT(4)
GETSCREEN
IF(PXL(722, 287) = 1919430) // координаты буквы "ь" в верхней кнопке продать в магазине. поменять(нужно подбирать точку и искать нужный цвет, иначе будет вечное ожидание )
$break = 1
END_IF
END_CYC
END_SUB
SUB(WAIT_PO)
$break = 0
WHILE($break = 0)
WAIT(4)
GETSCREEN
IF(PXL(841, 375) = 4078899) середина кнопки отменить в почте когда открывается окошко забрать предмет. (искать нужный цвет или поставить другой)
$break = 1
END_IF
END_CYC
END_SUB В версии 4.5 для картинок есть папка bmps. в 4.7 просто в папку с прогой где скрипты. Файлы 1 и 2 bmp. прилагаю. Координаты середины кнопки "отменить" в почте когда открывается окошко забрать предмет менять вместе с пикселем!!! потому что я тыкнул примерно. Нужна не сама кнопка, а то что под ней. Ожидание настроено на тот момент, когда пропадёт эта кнопка. Если настроить на кнопку перезагрузки браза, то ожидание может быть оооочень дооолгим. Если есть другие варианты - предлагайте. Пока всё.
-
В версии 4.5 для этих картинок есть папка bmps. куда класть в 4.7 не знаю.
4.6-4.7 в ту же папку где лежит скрипт
-
Да, спс. Уже выяснил это.
-
prapor, Поздравляю со вступлением в Jr. Member клуб ;D
Вот говоришь, новичёк, новичёк, а сам уже целый сценарий для игрухи состряпал. :D
-
Уууууууууххх... уже мозги кипят... Я же чайник ;D
Итак. Выкладываю очередную версию скрипта на чистку почты и продажу лута в магаз. К сожалению пока не удалось добится полной универсальности, но всё же.//Чистка почты и продажа лута в магаз
$c1 = 4079426
$c2 = 592154
$c3 = 1399552
mag1:
LCLICK(863,81) // координаты менять или придумывать что то своё. У меня это ссылка на магаз, вынесена на панель закладок в бразе
GOSUB(WAIT_MA)
GETSCREEN
IF_PIXEL_IN(550,200, 800, 600, 1919430)
$x = ($_return1)
$y = ($_return2)
END_IF
$x3 = $x-198
$x4 = $x-148
$y3 = $y-22
$y4 = $y-14
sl1:
getscreen
if_pixel_in($x3, $y3, $x4, $y4, $c1, $c2, $c3)
LCLICK($x, $y+2)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl1)
end_if
sl2:
getscreen
if_pixel_in($x3, $y3+50, $x4, $y4+50, $c1, $c2, $c3)
LCLICK($x, $y+52)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl2)
end_if
sl3:
getscreen
if_pixel_in($x3, $y3+100, $x4, $y4+100, $c1, $c2, $c3)
LCLICK($x, $y+102)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl3)
end_if
sl4:
getscreen
if_pixel_in($x3, $y3+150, $x4, $y4+150, $c1, $c2, $c3)
LCLICK($x, $y+152)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl4)
end_if
sl5:
getscreen
if_pixel_in($x3, $y3+200, $x4, $y4+200, $c1, $c2, $c3)
LCLICK($x, $y+202)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl5)
end_if
sl6:
getscreen
if_pixel_in($x3, $y3+250, $x4, $y4+250, $c1, $c2, $c3)
LCLICK($x, $y+252)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl6)
end_if
sl7:
getscreen
if_pixel_in($x3, $y3+300, $x4, $y4+300, $c1, $c2, $c3)
LCLICK($x, $y+302)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl7)
end_if
ht1:
getscreen
if_pixel_in($x3, $y3+300, $x4, $y4+300, 11438, 9437313, 9456128)
SOUND("pause.wav")
HALT
end_if
LCLICK(929,81) // координаты менять или придумывать что то своё. У меня это ссылка на почту, вынесена на панель закладок в бразе
WAIT(RND(12,14))
po:
GETSCREEN
if_pixel_in(800, 230, 1100, 320, 11982062)
$x2 = ($_return1)
$y2 = ($_return2)
goto(ch)
else
goto(F)
end_if
ch:
getscreen
IF_PICTURE_IN(265,150,1500,730, "5.bmp")
$p = ($_return1)
$p1 = ($_return2)
else
IF_PICTURE_IN(265,150,1500,730, "6.bmp")
$p = ($_return1)
$p1 = ($_return2)
end_if
LCLICK($p,$p1+2)
WAITMS(4500)
LCLICK($x2+26,$y2+274)
WAITMS(115)
LCLICK($x2+26,$y2+274)
GOSUB (WAIT_P)
KEYPRESS(#ENTER)
GOSUB (WAIT_PO)
LCLICK($p+10,$p1+2)
WAITMS(RND(600,1000))
LCLICK($x2+165,$y2+280)
WAITMS(RND(1000,2000))
KEYPRESS(#ENTER)
GOSUB (WAIT_PO)
GETSCREEN
COLORMODE(6)
IF_PICTURE_IN($x2-440,$y2+18,$x2-175,$y2+230, "1.bmp")
goto(po)
else
goto(mag1)
END_IF
F:
LCLICK(863,81) // координаты менять или придумывать что то своё. У меня это ссылка на магаз, вынесена на панель закладок в бразе
GOSUB(WAIT_MA)
GETSCREEN
IF_PICTURE_IN($x-280,$y+262,$x-219,$y+314, "2.bmp")
HALT
else
goto(mag1)
end_if
goto(ht1)
SUB(WAIT_MA)
$break = 0
WHILE($break = 0)
WAIT(4)
GETSCREEN
IF_PIXEL_IN(550,200, 800, 600, 1919430)
$break = 1
END_IF
END_CYC
END_SUB
SUB(WAIT_PO)
$break = 0
WHILE($break = 0)
WAIT(4)
GETSCREEN
IF(PXL($x+154, $y+91) = 4078899)
$break = 1
END_IF
END_CYC
END_SUB
SUB(WAIT_P)
$break = 0
WHILE($break = 0)
WAIT(4)
GETSCREEN
IF(PXL($x+154, $y+91) = 4604061)
$break = 1
END_IF
END_CYC
END_SUB
-
Уууууууууххх... уже мозги кипят... Я же чайник ;D
Итак. Выкладываю очередную версию скрипта на чистку почты и продажу лута в магаз. К сожалению пока не удалось добится полной универсальности, но всё же.
Забыл видимо последний end_if В редакторе жмешь автоформат и видишь перекос скрипта значит что то недописал
//Чистка почты и продажа лута в магаз
$c1 = 4079426
$c2 = 592154
$c3 = 1399552
mag1:
LCLICK(863,81) // координаты менять или придумывать что то своё. У меня это ссылка на магаз, вынесена на панель закладок в бразе
GOSUB(WAIT_MA)
GETSCREEN
IF_PIXEL_IN(550,200, 800, 600, 1919430)
$x = ($_return1)
$y = ($_return2)
END_IF
$x3 = $x-188
$x4 = $x-98
$y3 = $y-20
$y4 = $y-14
sl1:
getscreen
if_pixel_in($x3, $y3, $x4, $y4, $c1, $c2, $c3)
LCLICK($x, $y+2)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl1)
end_if
sl2:
getscreen
if_pixel_in($x3, $y3+50, $x4, $y4+50, $c1, $c2, $c3)
LCLICK($x, $y+52)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl2)
end_if
sl3:
getscreen
if_pixel_in($x3, $y3+100, $x4, $y4+100, $c1, $c2, $c3)
LCLICK($x, $y+102)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl3)
end_if
sl4:
getscreen
if_pixel_in($x3, $y3+150, $x4, $y4+150, $c1, $c2, $c3)
LCLICK($x, $y+152)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl4)
end_if
sl5:
getscreen
if_pixel_in($x3, $y3+200, $x4, $y4+200, $c1, $c2, $c3)
LCLICK($x, $y+202)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl5)
end_if
sl6:
getscreen
if_pixel_in($x3, $y3+250, $x4, $y4+250, $c1, $c2, $c3)
LCLICK($x, $y+252)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl6)
end_if
sl7:
getscreen
if_pixel_in($x3, $y3+300, $x4, $y4+300, $c1, $c2, $c3)
LCLICK($x, $y+302)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl7)
end_if
ht1:
getscreen
if_pixel_in($x3, $y3+300, $x4, $y4+300, 11438, 9437313, 9456128)
SOUND("pause.wav")
HALT
end_if
LCLICK(929,81) // координаты менять или придумывать что то своё. У меня это ссылка на почту, вынесена на панель закладок в бразе
WAIT(RND(12,14))
po:
GETSCREEN
if_pixel_in(800, 230, 1100, 320, 11982062)
$x2 = ($_return1)
$y2 = ($_return2)
goto(ch)
else
goto(F)
end_if
ch:
getscreen
IF_PICTURE_IN(265,150,1500,730, "5.bmp")
$p = ($_return1)
$p1 = ($_return2)
else
IF_PICTURE_IN(265,150,1500,730, "6.bmp")
$p = ($_return1)
$p1 = ($_return2)
end_if
LCLICK($p,$p1+2)
WAITMS(4500)
LCLICK($x2+26,$y2+274)
WAITMS(115)
LCLICK($x2+26,$y2+274)
GOSUB (WAIT_P)
KEYPRESS(#ENTER)
GOSUB (WAIT_PO)
LCLICK($p+10,$p1+2)
WAITMS(RND(600,1000))
LCLICK($x2+165,$y2+280)
WAITMS(RND(1000,2000))
KEYPRESS(#ENTER)
GOSUB (WAIT_PO)
GETSCREEN
COLORMODE(6)
IF_PICTURE_IN($x2-440,$y2+18,$x2-175,$y2+230, "1.bmp")
goto(po)
else
goto(mag1)
END_IF
F:
LCLICK(863,81) // координаты менять или придумывать что то своё. У меня это ссылка на магаз, вынесена на панель закладок в бразе
GOSUB(WAIT_MA)
GETSCREEN
IF_PICTURE_IN($x-280,$y+262,$x-219,$y+314, "2.bmp")
HALT
else
goto(mag1)
end_if
goto(ht1)
SUB(WAIT_MA)
$break = 0
WHILE($break = 0)
WAIT(4)
GETSCREEN
IF_PIXEL_IN(550,200, 800, 600, 1919430)
$break = 1
END_IF
END_CYC
END_SUB
SUB(WAIT_PO)
$break = 0
WHILE($break = 0)
WAIT(4)
GETSCREEN
IF(PXL($x+154, $y+91) = 4078899)
$break = 1
END_IF
END_CYC
END_SUB
SUB(WAIT_P)
$break = 0
WHILE($break = 0)
WAIT(4)
GETSCREEN
IF(PXL($x+154, $y+91) = 4604061)
$break = 1
END_IF
END_CYC
END_SUB
END_IF
-
А зачем он там?
SUB(WAIT_P)
$break = 0
WHILE($break = 0)
WAIT(4)
GETSCREEN
IF(PXL($x+154, $y+91) = 4604061)
$break = 1
END_IF //тут стоит окончание сравнивания
END_CYC
END_SUB
-
Кстати... забыл в начале темы(может оно и к лучшему))))) что для фарма мобов(ну не знаю откуда пошло, но так мини боссы в игре называются) в мазиле использую iMacros. Есть скрипты для него, если надо могу выложить тут. В хроме тоже есть и iMacros и скрипты готовые, но для него есть ещё один бот. Мне он не очень нравится, но пока юзаю. когда доделаю скрипт для кликера наверно перестену тем ботом пользоваться. Связка iMacros + кликерман мне больше нравится.
-
А зачем он там?
Этот END_IF идет к
getscreen
IF_PICTURE_IN(265,150,1500,730, "5.bmp")
$p = ($_return1)
$p1 = ($_return2)
else
////////////////
END_IF
-
В данный момент как раз работаю над тем что бы убрать привязку к файлу 5.bmp так что ошибку исправлю)) спс))
-
Очередная версия скрипта на чистку почты. Убраны кой-какие ошибки, конечно же наделаны новые, убраны привязки к картинкам кроме 1.bmp, по прежнему эта картинка нужна. Должен заметить что скрипт сделан для Мазилы поэтому в других бразах работать не будет. Для хрома мне пока не требуется, поэтому не пробовал даже. Возможно придётся подтачивать под мониторы меньше 17". У меня рабочий моник 20" и второй 19" на обоих пашет без проблемм.
При работе скрипта раскладка клавы в кликере ОБЯЗАТЕЛЬНО!!! должна быть русской.
//Чистка почты и продажа лута в магаз
$c1 = 4079426
$c2 = 592154
$c3 = 1399552
mag1:
LCLICK(863,81) // координаты менять или придумывать что то своё. У меня это ссылка на магаз, вынесена на панель закладок в бразе
GOSUB(WAIT_MA)
GETSCREEN
IF_PIXEL_IN(550,200, 800, 600, 1919430)
$x = $_return1
$y = $_return2
END_IF
$x3 = $x-198
$x4 = $x-148
$y3 = $y-22
$y4 = $y-14
sl1:
getscreen
if_pixel_in($x3, $y3, $x4, $y4, $c1, $c2, $c3)
LCLICK($x, $y+2)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl1)
end_if
sl2:
getscreen
if_pixel_in($x3, $y3+50, $x4, $y4+50, $c1, $c2, $c3)
LCLICK($x, $y+52)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl2)
end_if
sl3:
getscreen
if_pixel_in($x3, $y3+100, $x4, $y4+100, $c1, $c2, $c3)
LCLICK($x, $y+102)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl3)
end_if
sl4:
getscreen
if_pixel_in($x3, $y3+150, $x4, $y4+150, $c1, $c2, $c3)
LCLICK($x, $y+152)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl4)
end_if
sl5:
getscreen
if_pixel_in($x3, $y3+200, $x4, $y4+200, $c1, $c2, $c3)
LCLICK($x, $y+202)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl5)
end_if
sl6:
getscreen
if_pixel_in($x3, $y3+250, $x4, $y4+250, $c1, $c2, $c3)
LCLICK($x, $y+252)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl6)
end_if
sl7:
getscreen
if_pixel_in($x3, $y3+300, $x4, $y4+300, $c1, $c2, $c3)
LCLICK($x, $y+302)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
GOTO(sl7)
end_if
ht1:
getscreen
if_pixel_in($x3, $y3+300, $x4, $y4+300, 11438, 9437313, 9456128)
SOUND("pause.wav")
HALT
end_if
LCLICK(929,81) // координаты менять или придумывать что то своё. У меня это ссылка на почту, вынесена на панель закладок в бразе
WAIT(RND(12,14))
po:
GETSCREEN
if_pixel_in(800, 230, 1100, 320, 11982062)
$x2 = $_return1
$y2 = $_return2
else
goto(F)
end_if
LCLICK(79,17) //Это координаты - кнопоська вызова меню в фаерфоксе (Firefox)
WAITMS(150)
LCLICK(69,118) //а так же эти - фунция поиска текста (найти) У меня панель меню убрана. если у вас она стоит по умолчанию, то или убрать или переделывать координаты
WAITMS(150)
KEYSTRING("Сервер")
WAITMS(300)
getscreen
if_pixel_in(800,230,1300,600, 7919672)
$p = $_return1
$p1 = $_return2
end_if
LCLICK($p,$p1+2)
WAITMS(4500)
LCLICK($x2+20,$y2+256)
WAITMS(115)
LCLICK($x2+20,$y2+256)
GOSUB (WAIT_KN)
WAITMS(10)
KEYPRESS(#ENTER)
GOSUB (WAIT_FON)
LCLICK($p+10,$p1+2)
WAITMS(RND(600,1000))
LCLICK($x2+170,$y2+237)
WAITMS(300)
KEYPRESS(#ENTER)
GOSUB (WAIT_FON)
GETSCREEN
COLORMODE(6)
IF_PICTURE_IN($x2-440,$y2+18,$x2-175,$y2+230, "1.bmp")
COLORMODE(0)
goto(po)
else
COLORMODE(0)
goto(mag1)
END_IF
F:
LCLICK(863,81) // координаты менять или придумывать что то своё. У меня это ссылка на магаз, вынесена на панель закладок в бразе
GOSUB(WAIT_MA)
GETSCREEN
IF_PIXEL_IN($x3, $y3+300, $x4, $y4+300, $c1, $c2, $c3)
goto(mag1)
else
HALT
end_if
SUB(WAIT_MA)
$break = 0
WHILE($break = 0)
WAIT(1)
GETSCREEN
IF_PIXEL_IN(550,200, 800, 600, 1919430)
$break = 1
END_IF
END_CYC
END_SUB
SUB(WAIT_FON)
$break = 0
WHILE($break = 0)
WAIT(1)
GETSCREEN
IF_PIXEL_IN($x2-57, $y2+70, $x2-27, $y2+78, 1447960, 1382167, 1513753)
$break = 1
END_IF
END_CYC
END_SUB
SUB(WAIT_KN)
$break = 0
WHILE($break = 0)
WAIT(1)
GETSCREEN
IF_PIXEL_IN($x2-235, $y2+40, $x2-85, $y2+140, 4011934, 4145055)
$break = 1
END_IF
END_CYC
END_SUB
-
Мдааа..... Тяжко всё даётся когда не знаешь азов програмирования((( Ну собственно представляю вашему вниманию очередную версию скрипта для ГБ. Разобравшись с циклами переделал продажу в магазе. так же добавил проверку почты на наличие писем с приглами(для КЛ и офи это особенно актуально). Если у вас есть приглы которые не хотите удалять, то редактируйте скрипт. По прежнему осталась привязка к картинке 1.bmp(прилагается)
Есть 2 обязательных правила!!! 1) в кликере должна быть русская раскладка клавы(иначе не найдёт письма на почте) 2) в рюкзаке обязательно должно быть хоть что ни будь. банка, шмотка - по барабану.
//Чистка почты и продажа лута в магаз
$c1 = 4079426
$c2 = 592154
$c3 = 1399552
mag1:
LCLICK(863,81) // координаты менять или придумывать что то своё. У меня это ссылка на магаз, вынесена на панель закладок в бразе
WAIT(8)
GETSCREEN
IF_PIXEL_IN(550,200, 800, 600, 1919430)
$x = $_return1
$y = $_return2
else
goto(M)
END_IF
$x3 = $x-200
$x4 = $x-150
$y3 = $y+22
$y4 = $y+34
$z = $y+305
WHILE($z>$y3)
$break = 0
WHILE($break = 0)
getscreen
if_pixel_in($x3, $y3, $x4, $y4, $c1, $c2, $c3)
LCLICK($_return1+190, $_return2+25)
WAITMS(RND(300,500))
KEYPRESS(#ENTER)
GOSUB(WAIT_MA)
else
INC($y3,50)
INC($y4,50)
$break = 1
END_IF
END_CYC
END_CYC
//проверка на синь и фио. если все ячейки забиты, то скрипт остановится
getscreen
if_pixel_in($x3, $y3+300, $x4, $y4+300, 11438, 9437313, 9456128)
SOUND("pause.wav")
HALT
end_if
M: // координаты менять или придумывать что то своё. У меня это ссылка на почту, вынесена на панель закладок в бразе
LCLICK(929,81)
WAIT(RND(12,14))
po:
GETSCREEN
if_pixel_in(800, 230, 1100, 320, 11982062)
$x2 = $_return1
$y2 = $_return2
else
goto(F)
end_if
LCLICK(79,17) // вот тут (кнопка слева сверху вызова выпадающего меню)
WAITMS(500)
LCLICK(69,118) // тут (в выпадающем меню координаты "найти")
WAITMS(500)
KEYSTRING("Сервер")
WAITMS(100)
LCLICK(475,846) // и тут координаты вызова функции поиска текста в мазиле. Скорее всего менять придётся. (в появившемся меню поиска координаты "подсветить всё")
WAITMS(500)
getscreen
if_pixel_in(800,230,1300,600, 7919672, 16777215, 16750899)
$p = $_return1
$p1 = $_return2
else
goto(PR) //если удаление пригл не нужно, то заменить на goto(F)
end_if
LCLICK($p,$p1+2)
WAITMS(4500)
LCLICK($x2+20,$y2+256)
WAITMS(115)
LCLICK($x2+20,$y2+256)
GOSUB (WAIT_KN)
WAITMS(10)
KEYPRESS(#ENTER)
GOSUB (WAIT_FON)
LCLICK($p+10,$p1+2)
WAITMS(RND(600,1000))
LCLICK($x2+170,$y2+237)
WAITMS(300)
KEYPRESS(#ENTER)
GOSUB (WAIT_FON)
UNDEFINE ($p)
UNDEFINE ($p1)
GETSCREEN
COLORMODE(6)
IF_PICTURE_IN($x2-440,$y2+18,$x2-175,$y2+230, "1.bmp")
COLORMODE(0) //редактировал в версии кликера 4.5 без смены колормода начиналась некорректная работа скрипта
goto(po)
else
COLORMODE(0)
goto(mag1)
END_IF
//последняя проверка на лут
F:
LCLICK(863,81)
WAIT(8)
GETSCREEN
IF_PIXEL_IN($x3, $y3, $x4, $y4+246, $c1, $c2, $c3)
goto(mag1)
else
halt
end_if
//Проверка на приглашения
PR:
GETSCREEN
if_pixel_in(800, 230, 1100, 320, 11982062)
$x2 = $_return1
$y2 = $_return2
else
goto(F)
end_if
LCLICK(79,17)
WAITMS(150)
LCLICK(69,118)
WAITMS(150)
KEYSTRING("Пригла")
WAITMS(300)
getscreen
if_pixel_in(800,230,1300,600, 7919672)
$b = $_return1
$b1 = $_return2
else
goto(F)
end_if
LCLICK($b,$b1+2)
WAITMS(4500)
LCLICK($x2+20,$y2+256)
WAITMS(115)
LCLICK($x2+20,$y2+256)
GOSUB (WAIT_KN)
WAITMS(10)
KEYPRESS(#ENTER)
GOSUB (WAIT_FON)
LCLICK($b+10,$b1+2)
WAITMS(RND(600,1000))
LCLICK($x2+170,$y2+237)
WAITMS(300)
KEYPRESS(#ENTER)
GOSUB (WAIT_FON)
goto(PR)
SUB(WAIT_MA)
$break = 0
WHILE($break = 0)
WAIT(1)
GETSCREEN
IF_PIXEL_IN(550,200, 800, 600, 1919430)
$break = 1
END_IF
END_CYC
END_SUB
SUB(WAIT_FON)
$break = 0
WHILE($break = 0)
WAIT(1)
GETSCREEN
IF_PIXEL_IN($x2-57, $y2+70, $x2-27, $y2+78, 1447960, 1382167, 1513753)
$break = 1
END_IF
END_CYC
END_SUB
SUB(WAIT_KN)
$break = 0
WHILE($break = 0)
WAIT(1)
GETSCREEN
IF_PIXEL_IN($x2-235, $y2+40, $x2-85, $y2+140, 4011934, 4145055)
$break = 1
END_IF
END_CYC
END_SUB
-
Ну чтож, поздравляю что работает. Да и код у тебя вроде систематизированнее, уже проще разбирать :)
-
В эфире "Учимся вести собственные темы"...
Последняя версия чего бы то ни было (скрипта, программы) всегда должна быть в оп-посте (оп-пост - первое сообщение темы). Там же должна быть указана дата последнего изменения и все необходимые для работы материалы
Не должно быть "Не забудьте ...". Все люди ленивы, они даже тему целиком прочитать не могут (инфа 100%) и уж тем более не будут выискивать в рабочем беспорядке темы чего им там нужно из предыдущих постов надергать. Прожуйте и положите им в рот
-
Всем привет)) Давненько и тут не был и скриптом не пользовался. Сейчас в отпуске и решил от нечего делать вспомнить старое. Да за год что отсутствовал скрипт работать перестал(( Может браз, может игра обновилась - но увы, пришлось взятся за переделку скрипта. и столкнулся с такой проблемой: в участке кода с циклом:[spoiler] $b = 0
WHILE($b = 0)
getscreen
if_pixel_in($x3, $y3, $x4, $y4, $c1, $c2, $c3)
LCLICK($x, $y4+15)
WAIT(2)
KEYPRESS(#ENTER)
GOSUB (PROD)
else
INC($y3,49)
INC($y4,49)
$b = 1
END_IF
END_CYC
END_CYC[/spoiler] перестал работать переход на SUB хотя раньше работал((( уже мозги кипят....
-
Всем привет)) Давненько и тут не был и скриптом не пользовался. Сейчас в отпуске и решил от нечего делать вспомнить старое. Да за год что отсутствовал скрипт работать перестал(( Может браз, может игра обновилась - но увы, пришлось взятся за переделку скрипта. и столкнулся с такой проблемой: в участке кода с циклом:[spoiler] $b = 0
WHILE($b = 0)
getscreen
if_pixel_in($x3, $y3, $x4, $y4, $c1, $c2, $c3)
LCLICK($x, $y4+15)
WAIT(2)
KEYPRESS(#ENTER)
GOSUB (PROD)
else
INC($y3,49)
INC($y4,49)
$b = 1
END_IF
END_CYC
END_CYC[/spoiler] перестал работать переход на SUB хотя раньше работал((( уже мозги кипят....
На какой версии программы? В 4.9 изменился вызов SUB. Но пока там ошибка и использовать SUB в цикле не получится. Точнее получится, но из цикла ты не выйдешь.
Или используй 4.8 или жди исправления.
-
Понял, спасибо))) А я то голову ломаю чё за фигня))
Тут такое дело... долго бился головой ап стену и в итоге пришел к выводу что лучше всего кликер работает с мазилой. С хромом какие то танцы с бубнами вокруг скрипта происходят и кроме глюков ничего добится не смог. Как перешел на мазилу - мой скрипт заработал как положено.
Или используй 4.8 или жди исправления.
4.8 отсутствует кстати, скачал 4.7SE
-
Привет чесному народу)) Надоедают все игрушки иногда)) Вот и ГБ надоел на какое то время... Поиграл в WoT и они тож приелись. Тут решил поиграть снова в ГБ но оказалось что скрипт не работает. Переделал малеха, но пока только чистку почты. Насчёт продажи лута есть проблеммы т.к. с обновой игрушки разрабы внесли всякие ингридиенты которые иногда полезно оставить, а под каждый лут делать выборку нет никакого смысла. Поэтому продажу в магазе я не стал даже трогать. Итак вот скрипт на чистку почты разрешение экрана 1600*900:[spoiler]
//Чистка почты
$c1 = 4079426
$c2 = 592154
$c3 = 1399552
$c4 = 7165792
M:
TRAYSAY("Чищу почту") //сообщение в трее о работе кликера (удалите строку если напрягает)
LCLICK(95,85) //кнопка быстрого перехода на почту на панели закладок в бразе. менять координаты при необходимости!!!
WAIT(3)
$r1 = 467
$r2 = 344
$r3 = $r1+10
$r4 = $r2+10
po:
GOSUB(Per)
GETSCREEN
if_pixel_in(870, 300, 900, 550, 1339325)
LCLICK($_return1+10, $_return2+2)
else
LCLICK(35,85)//кнопка быстрого перехода в магазин на панели закладок в бразе. менять координаты при необходимости!!!
TRAYSAY("писем нет") // сообщение о том что почта пустая и остановка скрипта
halt
end_if
WAIT(1)
GETSCREEN
if_pixel_in(1045, 555, 1065, 575, 2286590)
else
goto(UD)
end_if
Me:
WHILE($r1<705)
IF_PIXEL_IN($r1,$r2, $r3,$r4, 3158058)
$j = $_return1
$j2 = $_return2
goto(psh)
else
INC($r1,53)
INC($r3,53)
END_IF
END_CYC
WHILE($r1 = 732)
INC($r2,53)
INC($r4,53)
$r1 = 467
$r3 = $r1+10
END_CYC
IF($r2>556)
LCLICK(35,85)
TRAYSAY("забито") //можно удалить если напрягает, сообщение о том что рюкзак забит полностью и остановка скрипта
halt
END_IF
goto(Me)
psh:
WAITMS(500)
LCLICK(925,560)
LDOWN(920,564)
WAITMS(RND(700,900))
MOVE($j,$j2)
WAITMS(500)
LUP($j,$j2)
LCLICK(800,10)
KEYPRESS(#ENTER)
GOSUB (PROD)
GOTO(po)
UD:
LCLICK(1070, 540)
GOSUB(Del)
KEYPRESS(#ENTER)
WAIT(1)
GOSUB (Per)
goto(po)
SUB(Ent)
$br = 0
WHILE($br = 0)
WAITMC(500)
GETSCREEN
IF_PIXEL_IN(815,340, 830, 360, 55547)
$br = 1
END_IF
END_CYC
END_SUB
SUB(PROD)
$br = 0
WHILE($br= 0)
WAITMC(500)
GETSCREEN
IF_PIXEL_IN(815, 340, 830, 360, 55547)
else
$br = 1
END_IF
END_CYC
END_SUB
SUB(Del)
$br = 0
WHILE($br = 0)
WAITMC(500)
GETSCREEN
IF_PIXEL_IN(815, 340, 830, 360, 8901117)
$br = 1
END_IF
END_CYC
END_SUB
SUB(Per)
$b = 0
WHILE($b = 0)
WAIT(1)
GETSCREEN
if_pixel_in(820, 387, 821, 388, 9935251)
$b = 1
END_IF
END_CYC
END_SUB
[/spoiler]
И вот кстати ещё... скрипт работает в версии 4.7se............ в более свежих версиях праблы с переходам к sub.
-
Вот вариант для 4.10 Единственное не смог исправить выпрыгивание из WHILE через GOTO
//Чистка почты
$c1 = 4079426
$c2 = 592154
$c3 = 1399552
$c4 = 7165792
SUB(Per)
$b = 0
WHILE($b = 0)
WAITMS(100)
GETSCREEN
if_pixel_in(820,387, 821,388, 9935251)
$b = 1
END_IF
END_CYC
END_SUB
HINTPOPUP("Чищу почту") //сообщение в трее о работе кликера (удалите строку если напрягает)
LCLICK(95,85) //кнопка быстрого перехода на почту на панели закладок в бразе. менять координаты при необходимости!!!
WAIT(3)
$r1 = 467
$r2 = 344
$r3 = $r1+10
$r4 = $r2+10
po:
Per()
GETSCREEN
if_pixel_in(870,300, 900,550, 1339325)
LCLICK($_return1+10, $_return2+2)
else
LCLICK(35,85)//кнопка быстрого перехода в магазин на панели закладок в бразе. менять координаты при необходимости!!!
HINTPOPUP("писем нет") // сообщение о том что почта пустая и остановка скрипта
halt
end_if
WAIT(1)
GETSCREEN
if_pixel_in(1045,555, 1065,575, 2286590)
Me:
WHILE($r1<705)
IF_PIXEL_IN($r1,$r2, $r3,$r4, 3158058)
WAITMS(500)
LCLICK(925,560)
LDOWN(920,564)
WAITMS(RND(700,900))
MOVE($_return1,$_return2)
WAITMS(500)
LUP($_return1,$_return2)
LCLICK(800,10)
KEYPRESS(#ENTER)
$br = 0
WHILE($br = 0)
WAITMC(500)
GETSCREEN
IF_PIXEL_IN(815, 340, 830, 360, 55547)
else
$br = 1
END_IF
END_CYC
GOTO(po)
else
INC($r1,53)
INC($r3,53)
END_IF
END_CYC
IF($r1 = 732)
INC($r2,53)
INC($r4,53)
$r1 = 467
$r3 = $r1+10
END_IF
IF($r2>556)
LCLICK(35,85)
HINTPOPUP("забито") //можно удалить если напрягает, сообщение о том что рюкзак забит полностью и остановка скрипта
halt
END_IF
goto(Me)
else
LCLICK(1070, 540)
$br = 0
WHILE($br = 0)
WAITMC(500)
GETSCREEN
IF_PIXEL_IN(815, 340, 830, 360, 8901117)
$br = 1
END_IF
END_CYC
KEYPRESS(#ENTER)
WAIT(1)
Per()
end_if
GOTO(po)
-
Вот вариант для 4.10 Единственное не смог исправить выпрыгивание из WHILE через GOTO
Спасибо)) Проблемма в том, что я с версии 4.4 или 4.6 начинал, сча уже не помню точно... и в те времена то еле разобрался с простейшими функциями..... А сейчас нет ни времени, ни желания разбираться с новыми возможностями проги. Поэтому сделал по старинке)))
Проверил твой скрипт... Выдает HINTPOPUP("писем нет") постоянно...
-
Ну свой теперь проверь, начало то одинаковое, я только в место секундной задержки 100 мс поставил в SUB(Per)
-
Ну свой теперь проверь, начало то одинаковое, я только в место секундной задержки 100 мс поставил в SUB(Per)
А мой работает уже двое суток. Проблем нет...
Эххх.... надо опять мозги на бекрень ставить и привыкать к новшествам проги... Только времени нету свободного.
-
Там новшеств очень мало. Привыкнешь очень быстро.
-
Ну свой теперь проверь, начало то одинаковое, я только в место секундной задержки 100 мс поставил в SUB(Per)
Решил переделать свой скрипт..... ух.... всё... кончились мои мозги.... вскипели... Помогите найти ошибку:
[spoiler]
$b=0
WHILE($b=0)
$r1 = 467
WAIT(1)
GETSCREEN
if_pixel_in(870, 300, 900, 550, 1339325)
print("есть письмо")
LCLICK($_return1+10, $_return2+2)
WAIT(1)
GETSCREEN
if_pixel_in(1045, 555, 1065, 575, 2286590)
print("есть хлам")
else
print("нет хлама")
LCLICK(1070, 540)
$b2 = 0
WHILE($b2 = 0)
WAITMC(500)
GETSCREEN
IF_PIXEL_IN(815,340, 830, 360, 8901117)
$b2 = 1
END_IF
END_CYC
KEYPRESS(#ENTER)
WAIT(1)
GOSUB (Per)
goto(D)
end_if
WHILE($r1<705)
IF_PIXEL_IN($r1,$r2, $r3,$r4, 3158058)
print("есть место")
$j = $_return1
$j2 = $_return2
WAITMS(500)
LCLICK(925,560)
LDOWN(920,564)
WAITMS(RND(700,900))
MOVE($j,$j2)
WAITMS(500)
LUP($j,$j2)
LCLICK(800,10)
KEYPRESS(#ENTER)
print("перенёс")
GOSUB (Per)
$r1 = 706
else
INC($r1,53)
INC($r3,53)
WHILE($r1 = 732)
INC($r2,53)
INC($r4,53)
$r1 = 467
$r3 = $r1+10
IF($r2>556)
$r1 = 706
$b=1
print("нет мест")
END_IF
END_CYC
END_IF
END_CYC
D:
else
LCLICK(35,85) // переход в магаз менять координаты или убрать строку
print("нет писем")
halt
end_if
END_CYC
lClick(1399,58)
[/spoiler]
Упорно отказывается продолжать цикл(WHILE($b=0)) и после этого участка кода
KEYPRESS(#ENTER)
print("перенёс")
GOSUB (Per)
$r1 = 706
переходит на lClick(1399,58)
ХМ........ странно... переименовал переменную $b в $b1 и всё заработало нормально.... почему?
-
Свежая версия скрипта на чистку почты с разрешением 1600*900
[spoiler]
// почта
// Автор: Полуночник
// Версия: 15.8 (30.07.2014)
HINTPOPUP("Чищу почту")
LCLICK(95,85) //координаты кнопки перехода на почту на панели закладок. Или менять на свои или сделать координаты кнопки обновления страницы или вообще убрать)).
WAIT(4)
$r1 = 467
$r2 = 352
$r3 = $r1+10
$r4 = $r2+10
GOSUB(Per)
WHILE($r2<564)
WAITMS(200)
GOSUB(Per)
GETSCREEN
if_pixel_in(870, 300, 900, 550, 1339325)
LCLICK($_return1+10, $_return2+2)
WAITMS(300)
GETSCREEN
if_pixel_in(1045, 555, 1065, 575, 2286590)
else
LCLICK(1070, 540)
$b2=0
WHILE($b2=0)
WAITMC(500)
GETSCREEN
IF_PIXEL_IN(815,340, 830, 360, 8901117)
$b2 = 1
END_IF
END_CYC
KEYPRESS(#ENTER)
WAITMS(200)
GOSUB (Per)
goto(D)
end_if
WAITMS(200)
E:
IF_PIXEL_IN($r1,$r2, $r3,$r4, 3158058)
$j = $_return1
$j2 = $_return2
WAITMS(300)
LCLICK(925,560)
LDOWN(920,564)
WAITMS(700)
MOVE($j,$j2)
WAITMS(500)
LUP($j,$j2)
LCLICK(800,10)
WAITMS(200)
KEYPRESS(#ENTER)
GOSUB (Per)
else
INC($r1,53)
$r3 = $r1+10
WAITMS(100)
IF($r1 = 732)
INC($r2,53)
$r4 = $r2+10
$r1 = 467
$r3 = $r1+10
WAITMS(100)
END_IF
IF($r2 = 564)
goto(D)
END_IF
goto(E)
END_IF
else
LCLICK(35,85) // переход в магаз менять координаты или убрать строку
HINTPOPUP("нет писем")
halt
end_if
D:
END_CYC
halt
SUB(Per)
$b = 0
WHILE($b = 0)
WAIT(1)
GETSCREEN
if_pixel_in(820, 387, 821, 388, 9935251)
$b = 1
END_IF
END_CYC
END_SUB
-
Для себя сделал связку Clickermann + iMacros (скачать для лисы можно тут https://addons.mozilla.org/en-US/firefox/addon/imacros-for-firefox/ (https://addons.mozilla.org/en-US/firefox/addon/imacros-for-firefox/)). Кликер чистит почту, потом запускает аймакрос, тот продаёт хлам и по новой.
Обратите внимание: если будете так же делать: аймакрос продает ВСЁ ПОДРЯД!!!! Так что если продадите что то нужное - я не виноват))))
скрипт для кликера:[spoiler]
// почта
// Автор: Полуночник
// Версия: 15.8 (30.07.2014)
A:
HINTPOPUP("Чищу почту")
LCLICK(95,85)
WAIT(4)
$r1 = 467
$r2 = 352
$r3 = $r1+10
$r4 = $r2+10
GOSUB(Per)
WHILE($r2<564)
WAITMS(200)
GOSUB(Per)
GETSCREEN
if_pixel_in(870, 300, 900, 550, 1339325)
LCLICK($_return1+10, $_return2+2)
WAITMS(300)
GETSCREEN
if_pixel_in(1045, 555, 1065, 575, 2286590)
else
LCLICK(1070, 540)
$b2=0
WHILE($b2=0)
WAITMS(300)
GETSCREEN
IF_PIXEL_IN(815,340, 830, 360, 8901117)
$b2 = 1
END_IF
END_CYC
KEYPRESS(#ENTER)
WAITMS(200)
GOSUB (Per)
goto(D)
end_if
WAITMS(200)
E:
IF_PIXEL_IN($r1,$r2, $r3,$r4, 3158058)
$j = $_return1
$j2 = $_return2
WAITMS(300)
LCLICK(925,560)
LDOWN(920,564)
WAITMS(700)
MOVE($j,$j2)
WAITMS(500)
LUP($j,$j2)
LCLICK(800,10)
WAITMS(200)
KEYPRESS(#ENTER)
GOSUB (Per)
else
INC($r1,53)
$r3 = $r1+10
WAITMS(100)
IF($r1 = 732)
INC($r2,53)
$r4 = $r2+10
$r1 = 467
$r3 = $r1+10
WAITMS(100)
END_IF
IF($r2 = 564)
goto(D)
END_IF
goto(E)
END_IF
else
LCLICK(35,85)
HINTPOPUP("нет писем")
halt
end_if
D:
END_CYC
lClick(1399,58)
waitms(300)
lClick(131,550)
waitms(300)
$b = 0
WHILE($b = 0)
WAIT(1)
GETSCREEN
if_pixel_in(170, 550, 171, 551, 16053492)
else
$b = 1
END_IF
END_CYC
lClick(212,116)
goto(A)
SUB(Per)
$b = 0
WHILE($b = 0)
WAIT(1)
GETSCREEN
if_pixel_in(820, 387, 821, 388, 9935251)
$b = 1
END_IF
END_CYC
END_SUB
[/spoiler]
Скрипт для iMacros:
[spoiler]
VERSION BUILD=8810214 RECORDER=FX
TAB T=1
URL GOTO=http://gnevbogov.ru/shop
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
TAG POS=20 TYPE=A ATTR=HREF:http://gnevbogov.ru/shop#
TAG POS=2 TYPE=BUTTON ATTR=TXT:Да
[/spoiler]
Если что пишите письма на зелёных американских рублях)))