:main

// Атакуем в радиусе nextarget
send F3 200 (выбираем моба нексттаргетом)

:check_target

// Проверяем состояние HP моба, если живой - атакуем
if 580, 34 1251183 - (тоесть если цвет красный , то атакуем)
goto attack
end_if
goto main

:attack

send F1 200 (Атака)

// Атака в цикле с проверкой HP моба
while 580, 34 1251183
send F1 200

wait 1s
end_while

send F2 200 (это он типо должен дроп подбирать)
send F2 200
send F2 200

goto main невероятно простой. поэтому и "не безупречен" мягко говоря.
каждые 15 минут застревает в текстурах.. пока еще не решил что с этим делать ) доработанный:
:main
// Атакуем в радиусе nextarget send F3 200 :check_target
// Проверяем состояние HP моба, если живой - атакуем
if 774, 28 1251183
goto attack
end_if
goto main
:attack
send F1 200 //Атака
send F5 200 //споил
// Атака в цикле с проверкой HP моба
while 774, 28 1251183
send F1 200

wait 1s
end_while

send F6 200 //подбераем СПОИЛ
send F2 200 //подберает дроп
send F2 200
send F2 200
send F2 200
send F2 200
send F2 200
if 134, 41 2897277 //это юзает хилки, наводим мышку на своё хп и жмём контрл+A потом вставляем координаты и цвет в скрипт
goto main
end_if
send F4 200
Наводим мышку на самый крайний пиксель хп моба и жмём Ctrl+A и добавляем координаты и цвет в скрипт
Координаты этого пикселя
Описание действия

Добавлено через 27 минут
Несколько скриптов для ПВП:

:Start # HP
if_not 398, 33 8890211
send F11
end_if
Goto Start
Этот скрипт использует банки хп ну или можно поставить(на F11) квик поинты. Не забываем изменить координаты и цвет пикселя на свой.

:Start # СР
if_not 388, 31 1060190
send F10
end_if
Goto Start
Этот скрипт использует банки СР ставим на F10 ну или можно изменить клавишу в скрипте и поставить сваю кнопку. Не забываем изменить координаты и цвет пикселя на свой.

:Start # Skill
if_not 66, 99 1435019
send F8
wait 4s
end_if
Goto Start Этот скрипт для того что бы если хп уменьшилось то он жмёт на скилл например: френзи, уд, зиалот, икона и т.д. Так что выбераем пиксель подальше от конца хп))). Не забываем изменить координаты и цвет пикселя на свой.

Мой первый скрипт. Жрем цп (немного расширенно, чем постом выше))



+Рандомное время клика на цп( шоб не сильно палиться однотонными нажатиями)
+проверка окно ли линейки открыто. исключаем случайные нажатия при сворачивании\перекрытии окна
+жор больших банок с магазина(откат 5 мин), с проверкой, откатились ли они.
+после того как настроил все под себя - достаточно просто менять проценты от цп, при которых выполнять те или иные действия.
+звуковой сигнал при изменении цп до указанного уровня
+мб еще что то..

UPDATE
+поедание магазинных хп банок при заданном %
+кнопки-выключатели))
+вторая проверкка. линейка ли перед глазами
-звук мне кажется может через раз срабатывать(


Большие банки не будут кушаться повторно, пока не откатятся)



:First //v.03


//кнопка на панели с банками цп.
//лучше использовать первый ряд(F1 - F12)
set $button F8 //Гцп
set $buttonBCP F9 //Цп магазин
set $buttonBHP F10 //Хп магазин

//процент цп, при котором начинать орать,мигать,и хавать банки
set #procentBHP 1 //Хаваем Хп с магаз.
set #procentGCP 90 //Хаваем гцп
set #procentBCP 1 //Хаваем цп с магазина
set #procentAlarm 99 // "БЛЯ,МЕНЯ ПИЗДЯЯЯЯТ О_О" - орем мелодию
//мелодия
set $ring C:\WINDOWS\Media\Windows XP - уведомление.wav
// задержка между нажатиями кнопки с цп
// у обычных людей это около 170
set #timeout 170
//Банко-кнопки. любой из хавальников можно отключить,
// всего лишь убрав заданную тут банку с панели.
//ГЦП
set #xPGCP 661
set #yPGCP 824
set #colorPGCP 16244669
//Цп магаз
set #xPBCP 710
set #yPBCP 813
set #colorPBCP 15196093
//Хп магаз
set #xPBHP 743
set #yPBHP 819
set #colorPBHP 16771008
//данные контрольных точек
//сделано для отсутствия ложных срабатываний
//при сворачивании линейки, или перекрытия лини цп каким нить окном
//удобно взять например рамку слева от полосы цп и стрелку справа
set #xCheсkL2 11
set #yCheсkL2 29
set #colorCheсkL2 1779243
//Вторая
set #xCheckL 179
set #yCheckL 9
set #colorCheckL 9214878
//данные линии цп
//левая крайняя Х координата
set #x1CP 23 //правая крайняя Х координата
set #x2CP 171
//общая Y координата
set #yCP 29
//цвет цп на заданном выше Y
set #colorCP 23176
//данные линии хп
set #yHP 41
set #colorHP 2897277
//поехали,посчитаем.
set #ClickTime random(70) + #timeout //псевдо нажатие ручками ^^

set #xAlarm #x1CP + ( #x2CP - #x1CP ) * #procentAlarm / 100
set #xGCP #x1CP + ( #x2CP - #x1CP ) * #procentGCP / 100
set #xBCP #x1CP + ( #x2CP - #x1CP ) * #procentBCP / 100
set #xBHP #x1CP + ( #x2CP - #x1CP ) * #procentBHP / 100
set #BCPtime 0
set #BHPtime 0
// с богом:))
:Start
while #xCheсkL2, #yCheсkL2 #colorCheсkL2

while #xCheckL, #yCheckL #colorCheckL
if_not #xAlarm, #yCP #colorCP
alarm //$ring //закомментировать,если нахер не нужна сигнализация
//или коммент $ring и будет орать как аська:) end_if
:HPCHO
if_not #xBHP, #yHP #colorHP
if #xPBHP, #yPBHP #colorPBHP
if #BHPtime < timer
send $buttonBHP
set #BHPtime timer + 300000
end_if
end_if
end_if
if_not #xAlarm, #yCP #colorCP
if_not #xGCP, #yCP #colorCP
If #xPGCP, #yPGCP #colorPGCP
send $button
end_if
if_not #xBCP, #yCP #colorCP
if #xPBCP, #yPBCP #colorPBCP
if #BCPtime < timer
send $buttonBCP
set #BCPtime timer + 300000
end_if
end_if
end_if
wait #ClickTime
goto HPCHO
end_if
end_if
end_while
end_while
goto Start
end_script

Для эпилога

const
nik='xxxx';
Enchant=13;
var
UseItem, EnchantItem: string;
Count, CurrentEnch: integer;
Timer01: TTimer;
procedure Init;
begin
Timer01:=TTimer.Create(nil);
Timer01.OnTimer:=@OnTimer01;
Timer01.enabled:=false;
Timer01.interval:=500;
end;
procedure OnTimer01(Sender: TObject);
begin
buf:=UseItem;
SendToServerEx(nik);
buf:=EnchantItem;
SendToServerEx(nik);
end;
procedure Free;
begin
Timer01.free;
count:=0;
CurrentEnch:=0;
end;
begin
if FromServer and (pck[1]=#$87) then
begin
CurrentEnch:=ReadD(2);
if CurrentEnch=Enchant then Timer01.enabled:=false;
end;
if FromClient and (pck[1]=#$19) then UseItem:=pck;
if FromClient and (pck[1]=#$5F) then EnchantItem:=pck;
if FromClient and (pck=#$34#$02#$00#$00#$00) then
begin
pck:='';
Timer01.enabled:=not(Timer01.enabled);
end;
end.