Скрипт на автоматическую покупку карт у госвендров.
В свое время так заработал себе на прокачку mapmaking и даже продал остатки.
Как использовать:
1) находим всех 11 вендоров карт, и марчим руны рядом с ними.
2) Забиваем в массив ID рун и координаты на которые по этой руне телепортируетесь.
3) делаем у себя на базе безопасное место-реколку с сундуком. Да такое чтобы и не в АМ зоне, и достать ерсквейком нельзя было. Марчим там руну, забиваем в массив.
4) внизу скрипта забиваем координаты сундука - куда тащить карты и начальных карт лежащих в паке.
Скрипт вроде бы неплохо коментирован и разобраться особого труда не составляет. Работает очень даже неплохо, хотя можно было бы и добавить еще пару проверок.
Не забудьте дополнительно запустить в другом окне проверку на хиты - кричать гвардс.
Скрипт работал без проблем сутками (знай реги добавляй) и приносил порядка полутора тысяч карт в день.
PHP код:
//Скрипт на покупку карт by Luter
//Массив ID рун и координат
// Необходимо рекольнутся по каждой руне
// и забить в скрипт ее ID (LastTargetID), CharPosX, CharPosY
set %arr [1] 1073954676 // ID руны
set %pos[1 1] 2995 // координата X
set %pos[1 2] 815 // координата Y
set %arr [2] 1073938278
set %pos[2 1] 3668
set %pos[2 2] 2256
set %arr [3] 1073936770
set %pos[3 1] 1417
set %pos[3 2] 1746
set %arr [4] 1073936837
set %pos[4 1] 1450
set %pos[4 2] 3737
set %arr [5] 1073853788
set %pos[5 1] 603
set %pos[5 2] 2282
set %arr [6] 1074149097
set %pos[6 1] 3698
set %pos[6 2] 1215
set %arr [7] 1073918318
set %pos[7 1] 2023
set %pos[7 2] 2837
set %arr [8] 1074291176
set %pos[8 1] 3635
set %pos[8 2] 2639
set %arr [9] 1074320304
set %pos[9 1] 1130
set %pos[9 2] 3657
set %arr [10] 1074330710
set %pos[10 1] 1475
set %pos[10 2] 1742
set %arr [11] 1074320197
set %pos[11 1] 2946
set %pos[11 2] 933
set LastTargetKind 1 //тип - предмет
//home - отдельно забиваем чтобы не путать
set #home 1074580850 //ID руны домой
set #homex 1090 // X дома
set #homey 1629 // Y дома
:start
for #i 1 11 1 // Количество рун в массиве - у меня 11
gosub recall // реколимся
gosub buy // скупаем
end_for // закончили
gosub home // полетели домой
wait 1200000 // ждем 20 min, чтобы лететь в следующий раз. Если конкуренция высокая, можно поставить 15 или 10.
goto start
:recall
set LastTargetID %arr [#i] // Берем ID руны из массива
set #kx %pos [ #i 1 ] // временная координата X
set #ky %pos [ #i 2 ] // временная Y
if mana > 14
send f7 3000 // В клиенте - lastspell, lasttarget, необходимо один раз кастануть реколл перед началом.
else // иначе, если не хватает маны (кончается на 10-м реколе?)
send f9 2500 //медитируем F9 - медитация в клиенте
end_if
if_not ( (charposx = #kx) and (charposy = #ky) ) // облом, не рекольнулись, пробуем еще раз
gosub recall // если кончились реги, тут-то мы и застрянем ;)
end_if
return //recall // выход из процедуры реколл
:buy // процедура закупки - проста и гениальна ;))
say buy // к вендору близко надо стоять
wait 300
if lastmsg Sorry // нет карт
return // выходим, и летим дальше
end_if
repeat 30 // Есть карты! Наверное.. ;)
double_left 246, 93 // 30 раз даблкликаем на карты, покупая все.
end_repeat
left 364, 427 // подтверждаем покупку
wait 1000
if lastmsg Alas //уу, деньги кончились, пора домой.
gosub home
end_if
return //buy
:home // процедура рекола домой.
set LastTargetID #home
if mana > 14 // опять проверяем ману
send f7 3000
else
send f9 2500 // и реколимся.
end_if
if_not ( (charposx = #homex) and (charposy = #homey) ) // до дома не добрались ;)
gosub home // опять идем домой.
end_if
if wght > 165 // это примерно на начальный вес в 500 регов каждого типа для рекола
set #drag wght - 165 // сколько тащить - вес каждой карты 1.
drag 671, 537 423, 318 #drag //Перед началом нужно кинуть туда пару карт и задать заново координаты
// тащим из места в паке, где лежат карты на пол или в сундук.
// рекол должен быть на огороженный, защищенный от Earthquake участок, рядом с меджик
// зоной, куда можно складывать карты чтобы не пропали.
end_if
return
// Приятной прокачки ;)