RagBot Forum
 

Вернуться   RagBot Forum > • Всё что касается бота • > Макросы и Плагины

Макросы и Плагины Всё что относится к макросам и плагинам. Сборник готовых макросов.

Ответ
 
Опции темы Опции просмотра
Старый 28.05.2008, 19:21   #1
4epT
Админ
 
Аватар для 4epT
 
Регистрация: 10.12.2006
Сообщений: 4,370
Вы сказали Спасибо: 7
Поблагодарили 387 раз(а) в 240 сообщениях
Отправить сообщение для 4epT с помощью ICQ
Лампочка Макрос: Автоматическая продажа варпов

Во первых всё нагло содрано отсюда, за что огромное спасибо Kissa2k.

Итак, мы решили написать макро для продажи варпов. Скажем так не самый лучший способ быстро получить много зеней, но это интересно, не правда ли?
Начнём, в этой теме я расскажу о своём макро и о том как на его можно модифицировать. Итак, настраиваем control/config.txt:
Код:
#Координаты где будет стоять наш продавец 
lockMap prontera 
lockMap_x 95 
lockMap_y 65 
#Для работы макро нужно выставить так 
dealAuto 0 
#и так 
sitAuto_idle 0
Настройка config.txt закончена, теперь для работы моего макро нам понадобиться сделать небольшой хак исходников openkore:

1. Открываем файл src/Network/Receive.pm с помощью редактора Notepad++ или на худой конец Word Pad'ом (но не блокнотом, это важно)

2. Ищем там строчку:
Цитата:
my $amount = formatNumber($args->{amount});
и меняем её на такую
Цитата:
my $amount = $args->{amount};
3. Сохраняем. Готово!

Теперь сам макрос:
Код:
#Продажа варпа за деньги. 
automacro createChatFirst { 
   console /Your Coordinates: / 
   location prontera 95 65 #Тут те же координаты что и в директиве lockMap в config.txt 
   delay 5 
   call { 
      do chat create "Айс - 5k" 2 0 pa55w0rd #Название и пароль чата 
   } 
} 
automacro createChatAfterWarp { 
   console /You opened Warp Portal on/ 
   delay 5 
   call { 
      do chat create "Айс - 5k" 2 0 pa55w0rd #Название и пароль чата 
   } 
} 

automacro detectDeal { 
   console /Requests a Deal/ 
   location prontera 95 65 #Тут те же координаты что и в директиве lockMap в config.txt 
   timeout 15 
   call acceptDeal 
} 

automacro detectZeny { 
   console /added (\d+) z to Deal/ 
   timeout 15 
   call checkZeny 
} 

automacro detectFailedWarp { 
   console /(Casting failed: Requirement|Skill Warp Portal failed)/ 
   call warp 
} 

macro acceptDeal { 
   pause @random ("0", "1", "2") 
   do deal 
   do deal 
} 

macro checkZeny { 
   if ($.lastMatch1 >= 5000) goto sell #Сколько зеней просим за варп? 
   do deal no 
   stop 
   :sell 
   pause 2 
   do deal 
   do chat leave 
   call warp 

} 

macro warp { 
   $x = @eval($::char->{pos}{x}) 
   $y = @eval($::char->{pos}{y}) 
   do deal 
   do sl 27 @eval($x + @random ("-2", "-1", "1", "2")) @eval($y + @random ("-2", "-1", "0", "1", "2")) 
   pause 2 
   do warp 1 #Номер варпа, который мы будем открывать. 
}
Цитата:
Работает это примерно так:
когда наш бот подключается - он ставит чат и ждёт пока ему не кинут сделку, потом он смотрит сколько зеней положили в дил, если достаточно, то подтверждает сделку, выходит из чата и кастует варп (если варп не получился, например скастовался в место где кто-то стоит, то он его перекастовывает), после удачного открытия варпа - все повторяется по кругу.
Цитата:
Что-то стоит добавить:
- проверку на гемстоны
- автоматический сбор гемстонов из хранилища кафры
- сделать возможность продажи нескольких варпов одновременно.
Цитата:
Кстате найдено несколько багов:
1. Если запросить сделку у бота и тут же ее отменить, а потом сразу же еще раз кинуть то бот залипнет, из-за таймаута на обработку события предложения сделки.. т.е. если еще раз кинуть ему сделку, то мы увидим что якобы персонаж уже занят сделкой..
С другой стороны без таймаута нельзя, так как сделку могут кинуть тогда когда он уже открывает варп, т.е. тоже угроза залипания.. Хелп плз

2. Если боту флудить в приват сообщениями вроде "Requests a Deal", то он тоже будет залипать, так как сработает условие console //... как сделать так чтобы автомакрос запускался только при виде сообщения в консоли, а не скажем в паблик или приват чате? Плз, хелп

за обновлениями и дополнениями следить тут
__________________
¤Config checker¤Руководство¤Файлы¤Конфиги¤Макросы¤
Быстро и качественно напишу конфиг (макрос) за yAD! Стучи!
4epT вне форума   Ответить с цитированием
Старый 29.05.2008, 10:50   #2
masterspirta
Опытный Ботовод
 
Аватар для masterspirta
 
Регистрация: 22.08.2007
Сообщений: 304
Вы сказали Спасибо: 1
Поблагодарили 9 раз(а) в 9 сообщениях
По умолчанию

automacro detectDeal {
console /Requests a Deal/
location prontera 95 65
timeout 15
run-once 1
call acceptDeal
}
macro acceptDeal {
pause @random ("0", "1", "2")
do deal
do deal
release detectDeal
}

Теоретически проблема
Цитата:
1. Если запросить сделку у бота и тут же ее отменить, а потом сразу же еще раз кинуть то бот залипнет, из-за таймаута на обработку события предложения сделки.. т.е. если еще раз кинуть ему сделку, то мы увидим что якобы персонаж уже занят сделкой..
С другой стороны без таймаута нельзя, так как сделку могут кинуть тогда когда он уже открывает варп, т.е. тоже угроза залипания.. Хелп плз
решается с помощью run-once 1, эта опция не дас сработать АМ предложения сделки до тех пор пока работа макроса не будет завершина)
-------------------------------------------------
Цитата:
2. Если боту флудить в приват сообщениями вроде "Requests a Deal", то он тоже будет залипать, так как сработает условие console //... как сделать так чтобы автомакрос запускался только при виде сообщения в консоли, а не скажем в паблик или приват чате? Плз, хелп
Предлагаю тут вот какое решение проблемы....создать еще один автомакрос с большим приоритетом чем detectDeal, условием срабатывание которого будет
pubm /Requests a Deal/

--> в итоге если какой то сраный флудер с мозгами на опе начнет нам палки в колеса вставлять, в от вет можна будет пустить ему смайл дули!
------------------------------------------------
по поводу этого
Цитата:
- сделать возможность продажи нескольких варпов одновременно.
Фак мой мозг если оно у вас будет работать как часики!
ну а...
Цитата:
- проверку на гемстоны
- автоматический сбор гемстонов из хранилища кафры
кнешно нужно, и не тяжко...так что думаю каждый сам себе до пишет
------------------------------------------------
У меня вопрос
Цитата:
1. Открываем файл src/Network/Receive.pm с помощью редактора Notepad++ или на худой конец Word Pad'ом (но не блокнотом, это важно)

2. Ищем там строчку:
Цитата:
my $amount = formatNumber($args->{amount});
и меняем её на такую
Цитата:
my $amount = $args->{amount};
Зачем, для чего, почему не блокнотом, что означают переменные!
masterspirta вне форума   Ответить с цитированием
Старый 29.05.2008, 14:06   #3
vitt
Продвинутый
 
Регистрация: 26.02.2007
Сообщений: 300
Вы сказали Спасибо: 0
Поблагодарили 23 раз(а) в 14 сообщениях
По умолчанию

Цитата:
Сообщение от masterspirta Посмотреть сообщение

Зачем, для чего, почему не блокнотом, что означают переменные!
Не блокнотом, так как это хреновый редактор, и он хреново сохраняет файлы(например известный глюк с utf8, когда надо в начале файла несколько строчек закомментить).
А изменение для того, чтобы выводилось просто число, а не число, разделённое запятыми, т. е. 5000000 а не 5,000,000.
vitt вне форума   Ответить с цитированием
Старый 11.06.2008, 17:39   #4
B@R@B@SHK@
Новичок
 
Регистрация: 11.11.2007
Сообщений: 13
Вы сказали Спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
По умолчанию

Помогите Я настраиваю все правильно, макрос прописываю и конфиги. Но когда бот в игре, он стоит на правильных координатах но чат не ставит и ничего не прадает. Помогите что за вата.
B@R@B@SHK@ вне форума   Ответить с цитированием
Старый 11.06.2008, 19:37   #5
B@R@B@SHK@
Новичок
 
Регистрация: 11.11.2007
Сообщений: 13
Вы сказали Спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
По умолчанию

Теперь я в конфиге прописал Uself_skill Warp и так далее. Но когда бот заходит в игру он начинает повсюду раскидывать варпы. А чат не ставит, помогите
Вот ошибка:
Изображения
Тип файла: jpg Owu6ko.JPG (85.4 Кб, 26 просмотров)
B@R@B@SHK@ вне форума   Ответить с цитированием
Старый 13.06.2008, 19:34   #6
vitt
Продвинутый
 
Регистрация: 26.02.2007
Сообщений: 300
Вы сказали Спасибо: 0
Поблагодарили 23 раз(а) в 14 сообщениях
По умолчанию

Цитата:
Сообщение от B@R@B@SHK@ Посмотреть сообщение
Теперь я в конфиге прописал Uself_skill Warp
Молодец, но такого в инструкции нету xD
vitt вне форума   Ответить с цитированием
Старый 14.06.2008, 18:58   #7
B@R@B@SHK@
Новичок
 
Регистрация: 11.11.2007
Сообщений: 13
Вы сказали Спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
По умолчанию

Цитата:
Сообщение от vitt Посмотреть сообщение
Молодец, но такого в инструкции нету xD
Хм=)) Ну как тогда, я вот на форуме рофана скопировал конфигу он вроде чат ставит, но дил кидаешь он нифига, пишет что зен мало

Добавлено через 9 часов 7 минут 58 секунд
Всё разобрался=)) Макрос клевый, за день вчера заработал 400к Осталось тока с 1 разобратся, как сделать чтоб бот послесмерти на кафру не улетал

Последний раз редактировалось B@R@B@SHK@; 14.06.2008 в 18:58. Причина: Добавил
B@R@B@SHK@ вне форума   Ответить с цитированием
Старый 13.04.2009, 00:58   #8
ranche
Гость
 
Сообщений: n/a
По умолчанию

блин у мну он деюшку берет а варп не открывает скажите плз чё дописать надо чтоб открывал? говорит якобы скил варп непрально прописан я в макросах не силёно но как не вертел все равно не полуилось((((((

Последний раз редактировалось ranche; 13.04.2009 в 01:10.
  Ответить с цитированием
Старый 13.04.2009, 02:19   #9
4epT
Админ
 
Аватар для 4epT
 
Регистрация: 10.12.2006
Сообщений: 4,370
Вы сказали Спасибо: 7
Поблагодарили 387 раз(а) в 240 сообщениях
Отправить сообщение для 4epT с помощью ICQ
По умолчанию

а по конкретнее, что пишет? желательно лог консоли
__________________
¤Config checker¤Руководство¤Файлы¤Конфиги¤Макросы¤
Быстро и качественно напишу конфиг (макрос) за yAD! Стучи!
4epT вне форума   Ответить с цитированием
Старый 21.04.2009, 18:25   #10
ranche
Гость
 
Сообщений: n/a
По умолчанию

Цитата:
macro warp {
$x = @eval($::char->{pos}{x})
$y = @eval($::char->{pos}{y})
do deal
do sl 27 @eval($x + @random ("-2", "-1", "1", "2")) @eval($y + @random ("-2", "-1", "0", "1", "2"))
pause 2
do warp 1
здесь проблема я думаю, сорь но лог выложить немогу(

Добавлено через 2 минуты
Цитата:
Syntax error in function 'sl' (Use Skill on Location)
Usage: sl <skill #> <x> <y> [level
вот лог на рофане такаяже проблема у ребят была но там глухо чегот((
p.s если не затруднит можеш пжалуйста рабочий кинуть
  Ответить с цитированием
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Продажа варпов Gamer Макросы и Плагины 9 15.04.2008 19:13
Продажа лута St91 Вопросы по Боту 3 21.01.2008 05:18
покупка продажа стрел BlooDKiLL Мусорка 1 23.08.2007 17:39
продажа лута из аматсу 786512 Конфиги 5 24.06.2007 22:36
продажа лута neko Конфиги 1 29.12.2006 10:13


Текущее время: 20:34. Часовой пояс GMT +3.