Страница 6 из 6

Добавлено: Чт июл 31, 2008 7:52 am
matilda
Imibion писал(а):работающий вариант на заточку одежки.
написано под @storage.
кому надо - переделает под себя.
поддержку по нему не предоставляю.

Код: Выделить всё

##########################################
########  REFINE ARMOR  ##################
##########################################
....................
....................
....................
[/size]
Мда , спасибо за код к размышлению, но он как дремучий лес, чтобы понять не один час с мачете прорубаться нужно.

Вот моя реализация заточки.
запускать так:
macro refine -- weapon_lvl weapon_name
например:
macro refine -- 1 Knife [1]
overrefine - контролирует количество переточки

Макрос точит оружие 1 и 2 лвл, для заточки оружия 3 лвл вставьте код или макрос вместо строки
#here write сod for getting ori
на свое усмотрение. Можно с кафры достать или купить у вендеров, кому как больше нравиться.
Если интересует точка шмота, то макрос нужо слегка доработать.
Мне пока дорого точить шмот и оружие 3 лвл макросом. ;)

Есть вопрос!
вещь в макрос передается параметром
сейчас в макрос можно передать вещь с названием из 2 слов, это само имя вещи и количесво дырок.
Например для заточки Main Gauche [3] придется изменять макрос в строке
$itemname = $.param2 $.param3 $.Param4
Это можно исправить если знать команду возвращающую количество переданных параметров макросу. В описании макро плагина такой команды нет.

Код: Выделить всё

macro refine {
	do move  prt_in
	$x0 = @rand (60,62) 
	$y0 = @rand (60,65)   
	$pos = $x0 $y0
	$posrefiner = 63 60
	$posseller = 56 68
	$lvl = $.param1
	$overrefine = 3
	$maxrefine = @eval(8 - $lvl + $overrefine)
	$itemname = $.param2 $.param3
	$refineitem = $itemname
	$talkresps = c r3 c r0 c c w1 r0 c 
	do move $pos
	pause @rand (1,2)
	$currentrefine = 0
	if ($lvl > 2) goto ori
		if ($lvl < 2 ) goto phra		
		$material = Emveretarcon
		goto letsgo
		:ori
		$material = Oridecon
		goto letsgo
		:phra
		$material = Phracon
	:letsgo	
	while ($currentrefine < $maxrefine) as refiner
		if (@invamount($refineitem) > 0) goto go
		$refineitem = +@eval($currentrefine + 1) $itemname
		$currentrefine++
		goto next
	:go
		if (  @invamount($material) > 0 ) goto gogogo
			if ($lvl > 3) goto getori
		do talknpc $posseller c r@eval($lvl-1) c d10 w2 c n
		goto gogogo
		:getori
#here write сod for getting ori
		goto gogogo
	:gogogo
		do eq $refineitem
		do talknpc $posrefiner $talkresps
	:next

	end refiner
	:end
}
[/size]

Добавлено: Ср авг 13, 2008 3:21 pm
Goster
Народ подскажите трабла есть с макросом!

Короче нпс заточки работает следущим образом ты вводишь цифру на сколько точить и он протачивает!

macro z77 {
do eq мафлер к примеру [1]
pause 1
do talknpc 63 60 c r5 c r1 c n7 c r0 c r0 c
}
запускаеться так

doCommand macro z77 {
inInventory Elunium > 1
timeout 3
}
проблема заключаеться в том что он начинает диалог, диалог доходит до момента когда надо ввести число, он начинает заново диалог, еще к этому моменту он не одевает шмотку! но если я первую шмотку протачю сам вручную командами талк, и потом включу интелект то он до конца без проблем весь корман протачивает!

Добавлено спустя 19 минут 41 секунду:

:) типо ему нужен разгончик

Добавлено: Сб авг 16, 2008 2:02 pm
Dimanenok
автомакрос решение

Добавлено: Ср авг 20, 2008 12:14 pm
nano
непоняла что м где мне нужно вписать =(

Добавлено: Ср авг 20, 2008 6:22 pm
Dimanenok
:) тада лучший вариант ручками ручками!

Добавлено: Ср авг 20, 2008 7:04 pm
Kissa2k
Еще раз напомню про новый плагин для чертовой заточки '-'
http://forums.openkore.com/viewtopic.php?f=34&t=1434

Добавлено: Вт сен 09, 2008 5:08 pm
Votbot
Kissa2k
Больсое сяб за плагин - клева работает :)

Добавлено: Вт сен 23, 2008 6:29 pm
Алекксандр
нашел проблемку мелкую, бот не смотрит, во время точа, на нпц.

Re: плагин/макрос на заточку ботом.

Добавлено: Пт ноя 21, 2008 8:07 am
AndreyLun
Всем привет.
Такой вопросик.
Вот пишу макрос автомат на заточку ботом кривых ножей и столкнулся с проблемой.

Код: Выделить всё

****
automacro start {
map prontera
delay 5
run-once 1
zeny > 100000
call Verification_Of_Inventory_1
}
macro Verificati_onOf_Inventory_1 {
  if (@inventory(Main Gauche [4]) == -1) goto take_Gauche
      call in_a_smithy
:take_Gauche
      move @rand(275,280) @rand(200,205) prontera
      do talknpc 282 200 c r1 n
      pause 2
  if (@storage(Main Gauche [4]) == -1) goto end
      do storage get Main Gauche [4] 20
      pause 1
      do storage close
      pause 1
      call in_a_smithy
:end
      call END
}

macro in_a_smithy {
********************
}
Т.е. идёт проверка: есть ли в инвертаре Main Gauche [4]? Если да, то запустить макрос in_a_smithy (движение в кузницу), если нет, то берём из кафры.
При тесте в консоли пишется
[macro] automacro start triggered.
[macro] Verification_Of_Inventory_1 error: error in 0: either '@inventory(Main Gauche [4])' or '-1' has failed

В чём трабла условия? вроде бы должно проверяться...

Re: плагин/макрос на заточку ботом.

Добавлено: Пт ноя 21, 2008 9:01 am
Aib0
Ты сам писал макру?
Если сам - почему ты решил что @inventory возвращает -1, если не нашла ножей?

Re: плагин/макрос на заточку ботом.

Добавлено: Пт ноя 21, 2008 3:38 pm
EternalHarvest
Aib0 писал(а):почему ты решил что @inventory возвращает -1, если не нашла ножей?
@inventory (<item>) Searches your inventory for <item> and returns ID or -1 if the item was not found.

Возможно между @inventory и скобками надо пробел?

Re: плагин/макрос на заточку ботом.

Добавлено: Вс ноя 23, 2008 2:50 pm
AndreyLun
Итак, спустя некоторое время написал я макрос автомат на заточку ботом Кривых ожей [4]
Запускать макрос: в консоли ввести macro Run
Как работает.
Бот проверяет есть ли у него в инвертаре любые Кривые ножи [4] любой заточки от 0 до 9 если есть идёт в кузницу. Проверяет есть ли у него Фраконы, если мало, то докупает до 100 шт. Точит.
Если нож сломался - берёт новый или ножи кончились в инвертаре идёт в кафру берёт нову партию.
Если заточился до +10 ложит его в телегу.
лишние Логи можете удалить.
Конечно это макрос написан не профессионально, наверное, но работает.
Подправил макрос, были замечены ошибки.