Registred
Сообщений: 3
Регистрация: 26.5.2020 Группа: Пользователи Наличность: 0
Пользователь №: 19.653
Возраст: 21
|
Ребята с толкнулся с проблемой мой скрипт устарел знакомый скилу скрипт под кликер, можно его переписать под пилот? $picture="Uron.bmp" // имя картинки со статом $stat=30 // минимальное количество стата
// ДЛЯ БОЛЬШИНСТВА ВЕРХНИХ ДВУХ СТРОК ДОСТАТОЧНО // НИЖЕ - НАСТРОЙКИ. НЕ УВЕРЕН - НЕ ЛЕЗЬ
// Дополнительные настройки: $flag=0 // 0 - сумма всех статов. 1 - один лучший стат $zoom=100 // увеливение раб. стола в виндовс в процентах, по умолчанию 100 $time=1500 // настройка задержки для своевременного попадания по кнопке "оценка". +-500, надо регулировать
// Запись лога $log=1 // 0 - не вести лог // 1 - писать в файл log.txt историю найденных статов // 2 - то же, что и 1, но перезаписывать лог при запуске $min_l=0 // минимальная сумма, которую писать в лог $min_n=0 // минимальное количество статов, которые писать в лог
// Дополнительный учет при оценке статов ШК/ШУК/ШМХ $picture2="shk.bmp" // картинка на шк/шук/шмх $num=0 // сколько максимум искать доп статов $stat2=7 // сколько стоит 1 шк/шук/шмх в эквиваленте основного стата
// Отладочная секция
// если почему-то не определяет одну из кнопок или расположение статов // то вписать вручную: (на разрешениях ниже 1280х720 не работает) $coord_x=0 // координата Х верхнего левого угла оценки (замок над "Базовые") $coord_y=0 // координата У верхнего левого угла оценки
$otc_x=0 // координата Х кнопки "оценка" $otc_y=0 // координата У кнопки "оценка"
$otm_x=0 // координата Х кнопки "отмена (которая слева)" $otm_y=0 // координата У кнопки "отмена (которая слева)"
// отладочная секция закончилась, дальше лучше не лезть
if (($coord_x = 0) and ($coord_y = 0)) getscreen colormode(8) if_picture_in(0,0,int($_xmax/2),$_ymax,"base.bmp") $coord_x=$_return1 $coord_y=$_return2 end_if end_if
if (($coord_x = 0) and ($coord_y = 0)) $low_res=1 if_picture_in(0,0,int($_xmax/2),$_ymax,"base_low.bmp") $coord_x=$_return1 $coord_y=$_return2 end_if end_if
if (($otc_x = 0) and ($otc_y = 0)) getscreen colormode(8) if_picture_in(0,0,int($_xmax/2),$_ymax,"but.bmp") $otc_x=int(($_return1+290)/$zoom*100) $otc_y=int(($_return2+10)/$zoom*100) end_if end_if if (($otc_x = 0) and ($otc_y = 0)) if_picture_in(0,0,int($_xmax/2),$_ymax,"but_low.bmp") $otc_x=int(($_return1+275)/$zoom*100) $otc_y=int(($_return2+10)/$zoom*100) end_if end_if
if (($otm_x = 0) and ($otm_y = 0)) getscreen colormode(8) if_picture_in(0,0,int($_xmax/2),$_ymax,"but.bmp") $otm_x=int(($_return1+200)/$zoom*100) $otm_y=int(($_return2+45)/$zoom*100) end_if end_if if (($otm_x = 0) and ($otm_y = 0)) if_picture_in(0,0,int($_xmax/2),$_ymax,"but_low.bmp") $otm_x=int(($_return1+190)/$zoom*100) $otm_y=int(($_return2+45)/$zoom*100) end_if end_if
if (($coord_x*$coord_y = 0)) $k=dialogbox("Не подходят шрифты, и это странно",0) halt end_if
if (($otc_x*$otc_y*$otm_x*$otm_y) = 0)) $k=dialogbox("Не найдены кнопки, введи коорды вручную",0) halt end_if
logclear if ($log=2) tfclear("log.txt") end_if if ($log>0) strwriteln("log.txt","") strwriteln("log.txt",strconcat($_time_h,":",$_time_m,":",$_time_s," Начата оценка")) strwriteln("log.txt",strconcat(" Минимальная сумма статов: ",$stat)) end_if if ($low_res=1) print("Переключаемся на низкое разрешение") else print("Работаем с высоким разрешением") end_if print("Область оценки и кнопки определены") print("Минимальная сумма статов: ",$stat) print("") if ($num=0) print("Поиск доп. стата не задан") else print("Задан поиск доп. стата") print("Цена доп. стата: ",$stat2) print("Макс. количество доп. стата: ",$num) end_if print("")
if ($low_res=0) for ($i=0,$i<10) $pic[$i]=strconcat($i,".bmp") end_cyc else for ($i=0,$i<10) $pic[$i]=strconcat($i,"_low.bmp") end_cyc end_if
$shmh=0
retry: waitms(10) LCLICK($otc_x,$otc_y) waitms(1000) getscreen colormode(8)
$k=0 $k_tmp=0 $k2=0 $stcnt=0
if ($num > 0) scanpicture($var, $coord_x,$coord_y, ($coord_x+215),($coord_y+215), $picture2, -1,98) $k2=arrsize($var)/2 undefine($var) end_if
scanpicture($var, $coord_x,$coord_y, ($coord_x+215),($coord_y+215), $picture, -1,98) while (arrsize($var) > 0) $y = arrpop($var) $x = arrpop($var) inc($stcnt) for ($n=0, $n < 10) scanpicture($tmp,($x+5),($y-2),($x+180),($y+10),$pic[$n],-1,99) while (arrsize($tmp) > 0) $z1=arrpop($tmp) $z2=arrpop($tmp) arrpush($arr1,$z2) arrpush($arr2,$n) end_cyc end_cyc
if (arrsize($arr2)=0) inc($shmh) for ($n=0, $n < 10) if ($low_res=0) scanpicture($tmp,($coord_x),($y+17),($coord_x+180),($y+29),$pic[$n],-1,99) else scanpicture($tmp,($coord_x),($y+14),($coord_x+180),($y+26),$pic[$n],-1,99) end_if while (arrsize($tmp) > 0) $z1=arrpop($tmp) $z2=arrpop($tmp) arrpush($arr1,$z2) arrpush($arr2,$n) end_cyc end_cyc
end_if
if (arrsize($arr2)=0) inc($k_tmp) end_if
$cnt_last=2000 for ($i1=0, $i1 < arrsize($arr1)) $cnt=0
for ($i=0, $i < arrsize($arr1)) if (($arr1[$i]>$cnt) and ($arr1[$i]<$cnt_last)) $cnt=$arr1[$i] $n1=$arr2[$i] end_if end_cyc
arrpush($end,$n1) $cnt_last=$cnt end_cyc for ($i=0, $i < arrsize($end)) $k_tmp=$k_tmp+($end[$i]*pow(10,$i)) end_cyc
if ($flag = 1) if ($k_tmp > $k) $k=$k_tmp end_if $k_tmp=0 else $k=$k_tmp end_if
undefine($arr1) undefine($arr2) undefine($end)
end_cyc
if ($shmh=1) print("Кажется, мы ищем ШМХ!") print("") end_if
if ($k>0) if ($flag = 1) print("Лучший стат: ", $k) else print("Сумма статов: ", $k,", всего статов: ",$stcnt) end_if
if (($log>0) and ($min_l<$k) and ($min_n<$stcnt)) strwriteln("log.txt",strconcat($_time_h,":",$_time_m,":",$_time_s," найдено основных статов на сумму: ",$k,", количество статов: ",$stcnt)) if($k2>0) strwriteln("log.txt",strconcat($_time_h,":",$_time_m,":",$_time_s," найдено доп. статов: ",$k2)) end_if end_if else print("Статы не найдены") end_if
if ($k2>$num) $k2=$num end_if
if ($num > 0) if ($k2>0) print("Доп стат ",$k2," шт. Итог: ",($k2*$stat2+$k)) else print("Доп стат не найден") end_if end_if
$k=$k+$k2*$stat2 waitms($time)
if ($k < $stat) goto(retry) else waitms(5000) LCLICK($otm_x,$otm_y) halt end_if
|