Скрипт на закупку карт blank maps

[Luter]

Скрипт на автоматическую покупку карт у госвендров.
В свое время так заработал себе на прокачку 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
// Приятной прокачки

[/PHP]

долго ляпал ?

[Kocmoc]

ВЫтикающий вопрос - А РАЗВЕ такой скрипт работает на пилоте?
Помойму он только может пахать на и н ж е...

и что в нем такого что он только на инже по твоему мнению пашет?

[Stealps]

Сообщение от Kocmoc

ВЫтикающий вопрос - А РАЗВЕ такой скрипт работает на пилоте?
Помойму он только может пахать на и н ж е...

На инже этот скрипт работать не будет. Там ключевые слова другие... И реализация подобной задачи ИМХО многократно проще.

[Luter]

Сообщение от Bi^PooF

долго ляпал ?

Писал. Долго. Минут 15. На отладку, поднастройку и приписывание проверок еще час.

Сообщение от Kocmoc

ВЫтикающий вопрос - А РАЗВЕ такой скрипт работает на пилоте?
Помойму он только может пахать на и н ж е...

Это скрипт для пилота. Понятия не имею, с чего ты вдруг решил что это инжeкт - скрипты там совершенно другие.

[Luter]

Ну что, использует кто-нибудь?
Как успехи?

Эх ... скрипты у тебя хорошие, только я в них не шарю и потому у меня точно не будет пахать

[Cosmos[Gop-Stop]]

Молодца, а вот я даже на тинкер не мог раньше написать) А такой и щас никогда не напишу

Господи люди, да когда ж вы поймете что и на ПИЛОТЕ и на ИЗИУО можно сделать все тоже самое что и на инже.

Кому интересно для изиуо могу скинуть скрипт который сам копает, плавит складывает в банк, реколится если надо, ест и добирает кирки.
Фастлут на этих же вещщах тоже пишется.
Забудьте вы про ******, Уже кучу всего есть полноценно заменяющее его.

Не работает на клиенте Fw изи уо!

Если хорошенько подумать то заработает.