AJUDA COM MACRO DE APRENDIZ [Arquivo]

mariwarez

08/05/2007, 15:42:10

# A Codificação do texto está correta?
# aiAuto by --Roger--
# macro plugin by arachno
#
#
# This source code is licensed under the
# GNU General Public License, Version 2.
# See http://www.gnu.org/licenses/gpl.html

automacro trancaUseless {
run-once 1
orphan reregister
exclusive 1
priority 1
macro_delay 0.1
call {
log --------------------------------------------------
log --------------------------------------------------
log --- Trancando macros que nao sao da sua classe ---
log --------------------------------------------------
log --------------------------------------------------
$class = @eval (return $::char->{jobID})
$classe = @config (classe)
if ($classe = espadachin) goto trancaNonEspadachin
if ($classe = gatuno) goto trancaNonGatuno
if ($classe = mercador) goto trancaNonMercador
if ($classe = aco) goto trancaNonAco
goto end

:trancaNonEspadachin
lock falaNecrus
lock pegaNpcAco
lock pegaNpcAco3
lock pegaNpcAco2
lock verificaCogumelos
lock iniciaPegarLocalSenha
lock pegarSenha
lock pegarLocal
goto verificaJobs

:trancaNonGatuno
lock falaNecrus
lock pegaNpcAco
lock pegaNpcAco3
lock pegaNpcAco2
lock iniciaPegarLocalSenha
lock pegarSenha
lock pegarLocal
lock treino1
lock caiuTreinoEspada
goto verificaJobs

:trancaNonMercador
lock falaNecrus
lock pegaNpcAco
lock pegaNpcAco3
lock pegaNpcAco2
lock verificaCogumelos
lock treino1
lock caiuTreinoEspada
goto verificaJobs

:trancaNonAco
lock treino1
lock caiuTreinoEspada
lock iniciaPegarLocalSenha
lock pegarSenha
lock pegarLocal
lock verificaCogumelos
goto verificaJobs

:verificaJobs
if ($class > 0) goto trancaRestante
goto end

:trancaRestante
log ---------------------------------------------
log ---------------------------------------------
log --- Trancando macros que nao serao usadas ---
log ---------------------------------------------
log ---------------------------------------------
lock evita123
lock voltarMorrer
lock evita5
lock job10
lock treino1
lock caiuTreinoEspada
lock iniciaPegarLocalSenha
lock pegarSenha
lock pegarLocal
lock verificaCogumelos
lock falaNecrus
lock pegaNpcAco
lock pegaNpcAco3
lock pegaNpcAco2
:end
}
}
automacro 2-MainMacro {
location not job_thief1
orphan reregister
run-once 1
macro_delay 0.1
exclusive 1
priority 2
call {
goto check

:check
$mapa = $.map
$nick = @eval (return $::char->{name})
$level = @eval (return $::char->{lv})
$job = @eval (return $::char->{lv_job})
$class = @eval (return $::char->{jobID})
$zeny = @eval (return $::char->{zenny} || '0')
$arma = @eval (return $::char->{equipment}{rightHand}{name} || 'none')
$cabeca = @eval (return $::char->{equipment}{topHead}{name} || 'none')
$status = $level/$job $zeny $arma $cabeca $mapa $class
if ('$x' == '') goto defineX
if ($x = setar) goto defineX
log $status
goto end

:end
if ($status = 1/1 $zeny $arma $cabeca $mapa 0) goto npcUm
if ($status = 2/1 $zeny $arma $cabeca $x-1 0) goto mapaDois
if ($status = 2/1 0 $arma $cabeca $x-2 0) goto npcDois
if ($status = 2/1 50 $arma $cabeca $x-2 0) goto npcTres
if ($status = 3/2 50 $arma $cabeca $x-2 0) goto npcQuatro
if ($status = 3/4 50 $arma $cabeca $x-2 0) goto npcCinco
if ($status = 4/5 50 $arma $cabeca $x-2 0) goto npcSeis
if ($status = 5/7 50 $arma $cabeca $x-2 0) goto npcSete
if ($status = 6/7 50 $arma $cabeca $x-2 0) goto npcOito
if ($status = 6/7 50 $arma $cabeca $x-3 0) goto baseSete
if ($status = 7/7 50 Knife [3] $cabeca $x-3 0) goto equipaNovice
if ($status = 7/7 50 none none $x-2 0) goto sairViaKrafa
if ($status = 7/7 50 none none geffen 0) goto guardarPotions
if ($status = $level/10 50 $arma Novice False Eggshell $x-4 0) goto npcNove
if ($status = $level/10 50 $arma none $x-4 0) goto npcFinal

if ($status = $level/10 150 Novice Main-Gauche Novice False Eggshell izlude_in 0) goto questPasso1
if ($status = $level/10 150 Novice Main-Gauche Novice False Eggshell izlude 0) goto questPasso1
if ($status = $level/10 150 none Novice False Eggshell izlude_in 0) goto questFim
if ($status = $level/10 150 none Novice False Eggshell izlude 0) goto questFim
if ($status = $level/1 150 none none $mapa 1) goto equipaFalchion
if ($status = $level/1 $zeny Falchion [3] none $mapa 1) goto vendeAll
if ($status = $level/1 $zeny +1 Falchion [3] none $mapa 1) goto vendeAll
if ($status = $level/1 $zeny +2 Falchion [3] none $mapa 1) goto vendeAll
if ($status = $level/1 $zeny +3 Falchion [3] none $mapa 1) goto vendeAll
if ($status = $level/1 $zeny +4 Falchion [3] none $mapa 1) goto vendeAll
if ($status = $level/1 $zeny +5 Falchion [3] none $mapa 1) goto vendeAll
if ($status = $level/1 $zeny +6 Falchion [3] none $mapa 1) goto vendeAll

if ($status = $level/10 150 Novice Main-Gauche Novice False Eggshell alberta_in 0) goto mercadorPasso1
if ($status = $level/10 150 Novice Main-Gauche Novice False Eggshell alberta 0) goto mercadorPasso1
if ($status = $level/10 $zeny none Novice False Eggshell alberta_in 0) goto mercadorPasso2
if ($status = $level/10 $zeny none Novice False Eggshell alberta 0) goto mercadorPasso2
if ($status = $level/10 $zeny Main Gauche [3] Novice False Eggshell alberta_in 0) goto mercadorPasso3
if ($status = $level/10 $zeny Main Gauche [3] Novice False Eggshell alberta 0) goto mercadorPasso3
if ($status = $level/10 $zeny none none $mapa 0) goto mercadorPasso4

if ($status = $level/10 150 Novice Main-Gauche Novice False Eggshell moc_ruins 0) goto gatunoPasso1
if ($status = $level/10 150 Novice Main-Gauche Novice False Eggshell moc_prydb1 0) goto gatunoPasso2
if ($status = $level/10 150 Novice Main-Gauche none moc_prydb1 0) goto gatunoPasso3
if ($status = $level/10 150 Novice Main-Gauche none moc_ruins 0) goto gatunoPasso3
if ($status = $level/1 $zeny none none moc_prydb1 6) goto gatunoPasso5
if ($status = $level/1 $zeny none none moc_ruins 6) goto gatunoPasso6
if ($status = $level/1 $zeny none none morocc 6) goto gatunoPasso6
if ($status = $level/1 $zeny none none morocc_in 6) goto gatunoPasso7
if ($status = $level/1 $zeny Main Gauche [3] none morocc_in 6) goto gatunoVendeTudo
if ($status = $level/1 $zeny Main Gauche [3] none morocc 6) goto gatunoUpMain
if ($status = $level/1 $zeny +1 Main Gauche [3] none $mapa 6) goto gatunoUpMain
if ($status = $level/1 $zeny +2 Main Gauche [3] none $mapa 6) goto gatunoUpMain
if ($status = $level/1 $zeny +3 Main Gauche [3] none $mapa 6) goto gatunoUpMain
if ($status = $level/1 $zeny +4 Main Gauche [3] none $mapa 6) goto gatunoUpMain
if ($status = $level/1 $zeny +5 Main Gauche [3] none $mapa 6) goto gatunoUpMain
if ($status = $level/1 $zeny +6 Main Gauche [3] none $mapa 6) goto gatunoUpMain

if ($status = $level/10 150 Novice Main-Gauche Novice False Eggshell prt_church 0) goto acoPasso1
if ($status = $level/10 150 Mace [3] none prt_church 0) goto acoPasso2
if ($status = $level/10 150 Mace [3] none prontera 0) goto acoPasso2
if ($status = $level/10 150 Mace [3] none prt_fild03 0) goto acoPasso2
if ($status = $level/1 150 none none $mapa 4) goto equipaMace
if ($status = $level/1 150 Mace [3] none prt_church 4) goto vendeAll
if ($status = $level/1 150 Mace [3] none prontera 4) goto vendeAll
if ($status = $level/1 $zeny Mace [3] none prt_in 4) goto oversAco
if ($status = $level/1 $zeny +1 Mace [3] none prt_in 4) goto oversAco
if ($status = $level/1 $zeny +2 Mace [3] none prt_in 4) goto oversAco
if ($status = $level/1 $zeny +3 Mace [3] none prt_in 4) goto oversAco
if ($status = $level/1 $zeny +4 Mace [3] none prt_in 4) goto oversAco
if ($status = $level/1 $zeny +5 Mace [3] none prt_in 4) goto oversAco
if ($status = $level/1 $zeny +6 Mace [3] none prt_in 4) goto oversAco
log -- Macro Main nao esta mais ativa --
goto acabou

:oversAco
log Upando Mace [3]
$arma = @eval (return $::char->{equipment}{rightHand}{name} || 'none')
log $arma
if ($arma = +1 Falchion [3]) goto UpaMainSeisAco
if ($arma = +2 Falchion [3]) goto UpaMainCincoAco
if ($arma = +3 Falchion [3]) goto UpaMainQuatroAco
if ($arma = +4 Falchion [3]) goto UpaMainTresAco
if ($arma = +5 Falchion [3]) goto UpaMainDoisAco
if ($arma = +6 Falchion [3]) goto UpaMainUmAco
$o = 1
goto overAco
:UpaMainSeisAco
$o = 2
goto overAco

:UpaMainCincoAco
$o = 3
goto overAco

:UpaMainQuatroAco
$o = 4
goto overAco

:UpaMainTresAco
$o = 5
goto overAco

:UpaMainDoisAco
$o = 6
goto overAco

:UpaMainUmAco
$o = 7
goto overAco
:overAco
log $o
do move prontera
pause 2
do move 62 65 prt_in
pause 2
while ($o <= 7) as upando
log deixando arma +$o
$o++
pause 2
do conf autoTalkCont 1
do talknpc 63 60 w2 r3 w2 r0 w2
pause 2
end upando
goto check

:equipaMace
pause 2
do eq @inventory (Mace [3])
goto check

:acoPasso2
$npcAco = @config (npcAco)
if ($npcAco = Simao) goto Simao
if ($npcAco = Bartolomeu) goto Bartolomeu
if ($npcAco = Matilda) goto Matilda
goto equipaAgainAco

:Simao
log Quest npc Simao
do conf useSelf_item_0_hp <= 90%
do timeout ai_item_use_auto 0.2
do conf teleportAuto_deadly 1
release 2-MainMacro
set orphan terminate
do move 364 250 prt_fild03
pause 2
do talk @npc (365 255)
pause 2
do move 184 34 prt_church
pause 2
do talknpc 184 41 w1 r0 w2
do conf useSelf_item_0_hp <= 50%
do timeout ai_item_use_auto 0.5
do conf teleportAuto_deadly 0
set orphan reregister
pause 2
log -----------------------------
log -----------------------------
log ---------- Virou Aco --------
log -----------------------------
log -----------------------------
release trancaUseless
goto check

:Bartolomeu
log Quest npc Bartolomeu
do move 209 215 prt_fild00
pause 2
do talknpc 208 218 w1 r0 w1
pause 3
do talknpc 208 218 w1 r0 w1
pause 3
do move 184 34 prt_church
pause 3
do talknpc 184 41 w3 r0
pause 3
log -----------------------------
log -----------------------------
log ---------- Virou Aco --------
log -----------------------------
log -----------------------------
release trancaUseless
goto check

:Matilda
log Quest npc Matilda
do move 282 205 prontera
pause 2
do talknpc 282 200 w1 r2 w1 r3 w1
pause 2
do move 41 350 moc_fild07
pause 2
do talk @npc (41 355)
pause 2
do move 160 253 morocc
pause 2
do talknpc 160 258 w1 r2 w1 r0 w1
pause 2
do move 184 34 prt_church
pause 2
do talknpc 184 41 w1 r0 w1
pause 2
log -----------------------------
log -----------------------------
log ---------- Virou Aco --------
log -----------------------------
log -----------------------------
release trancaUseless
goto check

:equipaAgainAco
pause 2
do eq @inventory (Novice False Eggshell)
pause 2
do eq @inventory (Novice Main-Gauche)
pause 2
release falaNecrus
releae pegaNpcAco
goto acabou

:acoPasso1
do move 184 34 prt_church
pause 2
do talknpc 184 41 w1 r0 w1 r0 w1
pause 2
do eq @inventory (Mace [3])
do conf npcAco none
do conf attackAuto 0
do conf itemsTakeAuto 0
do conf itemsGatherAuto 0
pause 3
goto check

:mercadorPasso5
log Indo entregar o pacote
$oLocal = @config (local)
pause 2
if ($oLocal = prontera) goto entregaProntera
if ($oLocal = geffen) goto entregaGeffen
if ($oLocal = morocc) goto entregaMorocc
if ($oLocal = izlu2dun) goto entregaIzlu2dun

:entregaProntera
log Destino do pacote Prontera
if ($mapa = alberta) goto viaNpcProntera
if ($mapa = alberta_in) goto viaNpcProntera
goto semNpcsProntera
:viaNpcProntera
do move 29 238 alberta
pause 2
do conf autoTalkCont 1
pause 2
do talknpc 28 229 w1 r2 w1 r1
pause 2
:semNpcsProntera
do move 247 48 prontera
pause 2
do talknpc 248 42 w3
pause 4
do talknpc 248 42 w3
pause 4
do is @inventory (Butterfly Wing)
pause 3
goto check

:entregaGeffen
log Destino do pacote Geffen
if ($mapa = alberta) goto viaNpcGeffen
if ($mapa = alberta_in) goto viaNpcGeffen
if ($mapa = geffen) goto semNpcGeffenDois
goto semNpcsGeffen
:viaNpcGeffen
do move 29 238 alberta
pause 2
do conf autoTalkCont 1
pause 2
do talknpc 28 229 w1 r2 w1 r1 w2
pause 2
:semNpcsGeffen
do move 147 33 prontera
pause 2
do talknpc 151 29 w2 r2 w2 r1
pause 2
:semNpcGeffenDois
do move geffen
pause 2
do move 156 118 geffen_in
pause 2
do talknpc 155 122 w2
pause 2
do move geffen
pause 2
do is @inventory (Butterfly Wing)
pause 2
goto check

:entregaMorocc
log Destino do pacote morocc
if ($mapa = alberta) goto viaNpcMorocc
if ($mapa = alberta_in) goto viaNpcMorocc
goto semNpcsMorocc
:viaNpcMorocc
do move 29 238 alberta
pause 2
do conf autoTalkCont 1
pause 1
do talknpc 28 229 w1 r2 w1 r2 w2
pause 3
:semNpcsMorocc
do move morocc
pause 2
do move 144 106 morocc_in
pause 2
do talknpc 140 102 w2
pause 2
do move morocc
pause 2
do is @inventory (Butterfly Wing)
pause 3
goto check

:entregaIzlu2dun
log Destino do pacote Izlu2dun
if ($mapa = alberta) goto viaNpcIzlu2dun
if ($mapa = alberta_in) goto viaNpcIzlu2dun
goto semNpcsIzlu2dun
:viaNpcIzlu2dun
goto acabou
:viaNpcIzlu2dun
do move 192 149 alberta
pause 2
do conf autoTalkCont 1
pause 1
do talknpc 189 151 w2 r1 w2
pause 2
:semNpcsIzlu2dun
do move 193 180 izlude
pause 2
do talknpc 201 181 w1 r0 w1
pause 2
do talknpc 106 58 w1 r0 w1
pause 2
do talknpc 106 58 w1 r0 w1
do is @inventory (Butterfly Wing)
pause 3
goto check

:mercadorPasso61
log fim da quest, entregando pacotes
pause 2
do move 24 29 alberta_in
pause 2
do conf autoTalkCont 1
pause 2
do conf local nenhum
do talknpc 28 29 w2
pause 2
do move 62 44 alberta_in
pause 2
do talknpc 53 43 w2
pause 2
log ______________________________
log ________Virou Mercador________
log ______________________________
release trancaUseless
pause 2
do eq @inventory (Main Gauche [3])
log Trancando macros de novice
lock evita123
lock voltarMorrer
lock evita5
lock job10
lock treino1
lock iniciaPegarLocalSenha
lock caiuTreinoEspada
lock pegarSenha
lock pegarLocal
goto check

:mercadorPasso5-1
log equipando Main Gauche [3]
do eq @inventory (Main Gauche [3])
goto check

:mercadorPasso6
log verficando Zeny para fazer upgrade
$zeny = @eval (return $::char->{zenny} || '0')
if ($zeny < 360) goto mercadorSemZeny
log tem zeny suficiente.
pause 2
$localsAtual = $.pos $mapa
if ($localsAtual = 24 58 alberta_in ) goto mercadorUpMainGauche
if ($localsAtual = 24 58 alberta_in ) goto mercadorUpMainGauche
if ($localsAtual = 24 58 alberta_in ) goto mercadorUpMainGauche
if ($localsAtual = 24 58 alberta_in ) goto mercadorUpMainGauche
do move 24 58 alberta_in
:mercadorUpMainGauche
pause 2
do talknpc 28 58 w2 r3 w2 r0 w1
pause 2
goto check

:mercadorSemZeny
log voce nao tem zeny suficiente =(
pause 2
log Continuando mesmo assim ;D
log Sem upgrade

goto mercadorPasso7

:mercadorPasso7
log Indo Prontera
pause 2
do move 29 238 alberta
pause 2
do conf autoTalkCont 1
pause 2
do talknpc 28 229 w1 r2 w1 r1
pause 2
goto check

:mercadorPasso4
do conf pacoteA @invamount (Delivery Box)
do conf pacoteB @invamount (Voucher)
pause 1
$pacoteA = @config (pacoteA)
$pacoteB = @config (pacoteB)
log PacoteA = $pacoteA
log PacoteB = $pacoteB
if ($pacoteB = 1) goto mercadorPasso61
if ($pacoteA = 1) goto mercadorPasso5
log nao tem nenhum pacote.
log verificando se existe local e senha
pause 2
$oLocal = @config (local)
$aSenha = @config (senha)
log o local eh $oLocal
log a senha eh $aSenha
:verificandoLocal
if ($oLocal = prontera) goto pegaPacote
if ($oLocal = geffen) goto pegaPacote
if ($oLocal = morocc) goto pegaPacote
if ($oLocal = izlu2dun) goto pegaPacote
log Estranho, nao existe um local definido.
log reequipando e refazendo a quest
pause 3
do eq @inventory (Main Gauche [3])
pause 2
do eq @inventory (Novice False Eggshell)
pause 2
release iniciaPegarLocalSenha
release pegarSenha
release pegarLocal
$senha = 1
goto check

:pegaPacote
if ($oLocal = prontera) goto respostaZero
if ($oLocal = geffen) goto respostaUm
if ($oLocal = morocc) goto respostaDois
if ($oLocal = izlu2dun) goto respostaTres
:respostaZero
$resposta = 0
goto pegandoPacoteFim

:respostaUm
$resposta = 1
goto pegandoPacoteFim

:respostaDois
$resposta = 2
goto pegandoPacoteFim

:respostaTres
$resposta = 3
goto pegandoPacoteFim

:pegandoPacoteFim
log $aSenha
do move 24 29 alberta_in
pause 2
do conf autoTalkCont 1
pause 2
do talknpc 28 29 w2 r0 w2 r$resposta w2 d$aSenha w2 r0 w2
pause 3
goto check

:mercadorPasso3
do conf pacoteA none
do conf pacoteB none
log ---------------------
log Pagando npc
log ---------------------
pause 2
do move alberta
pause 2
do move 57 43 alberta_in
pause 2
do talknpc 53 43 w2 r0 w2 r0 w2 r0 w2
log Falar mais uma vez com responses. Pode causar disconected.
pause 2
do talknpc 53 43 w2 r0 w2 r0 w2 r0 w2
pause 2
do uneq @inventory (Novice False Eggshell)
pause 2
goto acabou

:mercadorPasso2
$mainGauche = @invamount (Main Gauche [3])
if ($mainGauche > 0) goto equipandoMains
log -----------
log Comprando Main Gauche [3]
log -----------
pause 2
do move alberta
pause 2
do move 180 20 alberta_in
pause 2
do talk @npc (188 21)
pause 2
do store
pause 2
do store
pause 2
do store
pause 2
do buy @store (Main Gauche)
:equipandoMains
log Main Gauche encontrada no inventario
pause 3
do eq @inventory (Main Gauche [3])
pause 3
do eq @inventory (Main Gauche [3])
pause
goto check

:mercadorPasso1
do conf itemsGatherAuto 0
do conf attackAuto 0
log -----------
log Mercador Passo 1 Vendendo tudo
log -----------
pause 2
do move alberta
pause 3
do move 180 20 alberta_in
pause 2
do talk @npc (180 15)
pause 2
do sell
pause 2
$venda = 0
pause 2
release pegarSenha
release pegarLocal
release iniciaPegarLocalSenha
goto sellingAll

:overs
log Upando Falchion
$arma = @eval (return $::char->{equipment}{rightHand}{name} || 'none')
log $arma
if ($arma = +1 Falchion [3]) goto UpaMainSeis
if ($arma = +2 Falchion [3]) goto UpaMainCinco
if ($arma = +3 Falchion [3]) goto UpaMainQuatro
if ($arma = +4 Falchion [3]) goto UpaMainTres
if ($arma = +5 Falchion [3]) goto UpaMainDois
if ($arma = +6 Falchion [3]) goto UpaMainUm
$o = 1
goto over
:UpaMainSeis
$o = 2
goto over

:UpaMainCinco
$o = 3
goto over

:UpaMainQuatro
$o = 4
goto over

:UpaMainTres
$o = 5
goto over

:UpaMainDois
$o = 6
goto over

:UpaMainUm
$o = 7
goto over
:over
log $o
do move prontera
pause 2
do move 62 65 prt_in
pause 2
while ($o <= 7) as upando
log deixando arma +$o
$o++
pause 2
do conf autoTalkCont 1
do talknpc 63 60 w2 r3 w2 r0 w2
pause 2
end upando
goto check

:uneqMain
log removendo Novice Main-Gauche
pause 3
do uneq @inventory (Novice Main-Gauche)
pause 2
goto check

:vendeAll
if ($class = 4) goto vendeAco
if ($zeny > 300) goto overs
:vendeAco
log Vendendo itens
do move prontera
pause 2
do move 168 136 prt_in
log indo prontera
do move 168 136 prt_in
pause 3
$venda = 0
pause 2
do talk @npc (171 140)
pause 2
do sell
:sellingAll
pause 2
log vendas
goto vendas
:vendas
while ($venda <= 35) as checandos
log checando inventario $venda
$venda++
$inventario = @eval (exists $::char->{inventory}[$venda] ? $::char->{inventory}[$venda]{name} : 'nada')
log $inventario
if ($inventario = Free Ticket for Kafra Storage) goto vendas
if ($inventario = Free Ticket for Kafra Transportation) goto vendas
if ($inventario = Free Ticket for the Cart Service) goto vendas
if ($inventario = Phracon) goto vendas
if ($inventario = Butterfly Wing) goto vendas
if ($inventario = Red Potion) goto vendas
if ($inventario = Novice Potion) goto vendas
if ($inventario = Falchion [3]) goto vendas
if ($inventario = Tattered Novice Ninja Suit) goto vendas
if ($inventario = Somber Novice Hood) goto vendas
if ($inventario = Novice Main-Gauche) goto vendas
if ($inventario = Novice Guard) goto vendas
if ($inventario = Novice False Eggshell) goto vendas
if ($inventario = Novice Slippers) goto vendas
if ($inventario = Main Gauche [3]) goto vendas
if ($inventario = +1 Main Gauche [3]) goto vendas
if ($inventario = +2 Main Gauche [3]) goto vendas
if ($inventario = +3 Main Gauche [3]) goto vendas
if ($inventario = +4 Main Gauche [3]) goto vendas
if ($inventario = +5 Main Gauche [3]) goto vendas
if ($inventario = +6 Main Gauche [3]) goto vendas
if ($inventario = Mace [3]) goto vendas
if ($inventario = nada) goto vendas
pause 1
do sell @inventory ($inventario)
pause 2
end checandos
log Terminando a Venda
pause 1
do sell done
pause 3
$classe = @config (classe)
pause 2
if ($classe = mercador) goto uneqMain
goto check

:equipaFalchion
do eq @inventory (Falchion [3])
pause 2
goto check

:questFim
log fim da Quest
do conf route_randomWalk 0
do conf attackAuto 0
do conf autoTalkCont 1
do move izlude
pause 2
do move 74 167 izlude_in
pause 2
do talknpc 74 172 w2 r0 w2 r0 w2 r0 w2
pause 2
log ------------ Virou ----------------
log -----------Espadachin--------------
log -----------------------------------
release trancaUseless
log Trancando macros

lock evita123
lock voltarMorrer
lock evita5
lock job10
lock treino1
lock caiuTreinoEspada
goto check

:questPasso1
log inicio da quest aqui
do conf route_randomWalk 0
do conf attackAuto 0
do conf autoTalkCont 1
do move izlude
pause 2
do move 74 167 izlude_in
pause 2
do talknpc 74 172 w2 r0 w2 r0 w2 r0 w2
pause 2
do talknpc 62 170 w2
pause 2
do move 30 169 izlude_in
pause 2
do talknpc 30 163 w2
pause 2
lock evita123
lock voltarMorrer
lock evita5
lock job10
release treino1
goto check

:gatunoUpMain
$mapa = $.map
$localsAtual = $.pos $mapa
if ($localsAtual = 68 38 morocc_in) goto upaMainGatuno
do conf autoTalkCont 1
pause 2
do move morocc
pause 2
do move 68 38 morocc_in
:upaMainGatuno
log upgrade MainGauche
do talknpc 73 38 w2 r3 w2 r0 w2
pause 2
goto check

:gatunoPasso7
$mainGauche = @invamount (Main Gauche [3])
if ($mainGauche > 0) goto equipandoMains
:gatunoVendeTudo
$zeny = @eval (return $::char->{zenny} || '0')
if ($zeny > 800) goto gatunoUpMain
log ---------------------
log --- Vendendo tudo ---
log ---------------------
pause 2
do move 136 68 morocc_in
pause 3
do talk @npc (141 67)
pause 2
do sell
pause 2
$venda = 0
pause 2
goto sellingAll

:gatunoPasso6
log Vendendo os itens.
pause 2
do move morocc
pause 2
do move 136 68 morocc_in
pause 2
goto check

:gatunoPasso5
log Fazendo Respawn
pause 2
$bWing = @invamount (Butterfly Wing)
if ($bWing < 1) goto gatunoAndando
pause 2
do is @inventory (Butterfly Wing)
pause 2
goto check

:gatunoAndando
log Nao tem B wing. Vamos andando.
do move moc_ruins
pause 2
release 2-MainMacro
goto check

:gatunoPasso4
log Terminando a quest de Gatuno
do conf attackAuto 1
do conf route_randomWalk 0
release 2-MainMacro
do move 48 126 moc_prydb1
pause 2
do talknpc 42 133 w4
pause 3
log ______________________________
log ________Virou Gatuno________
log ______________________________
release trancaUseless
goto check

:gatunoPasso3
release verificaCogumelos
$cogumeloVenenoso = @eval (@invamount (Orange Net Mushroom) * 3)
$cogumeloBorrachento = @invamount (Orange Gooey Mushroom)
$cogumelosTotais = @eval ($cogumeloVenenoso + $cogumeloBorrachento)
log total de Cogumelos = $cogumelosTotais
if ($cogumelosTotais > 24) goto gatunoPasso4
log movendo para moc_ruins
do move moc_ruins
pause 2
do move 135 123 moc_ruins
pause 3
log falando com npc e entrando na quest
do talknpc 141 125 w2
pause 2
release 2-MainMacro
goto check

:gatunoPasso2
release verificaCogumelos
log movendo moc_prydb1 e falando com npc
do move 48 126 moc_prydb1
pause 2
do talknpc 39 129 w2 r0 w2 r0 w2 r0 w2 r0 w2 r0 w3
pause 2
log falando novamente. Pode causar disconnected from server
do talknpc 39 129 w2 r0 w2 r0 w2 r0 w2 r0 w2 r0 w3
pause 2
do uneq @inventory (Novice False Eggshell)
pause 2
release 2-MainMacro
goto check

:gatunoPasso1
lock evita123
lock voltarMorrer
lock evita5
lock job10
lock treino1
lock iniciaPegarLocalSenha
lock caiuTreinoEspada
lock pegarSenha
lock pegarLocal
release verificaCogumelos
do conf attackAuto 1
do conf itemsTakeAuto 2
do conf route_randomWalk 1
do conf itemsGatherAuto 0
log Salvando Krafa Piramides
pause 2
do move 58 157 moc_ruins
pause 2
do conf autoTalkCont 1
do talknpc 59 157 w2 r0 w2
pause 2
do talknpc 59 157 w2 r0 w2
pause 2
do move 48 126 moc_prydb1
pause 2
release 2-MainMacro
goto check

:npcFinal
$classe = @config (classe)
log ----------------------------------------
log ----------------------------------------
log Classe Definida no config.txt -> $classe
log ----------------------------------------
log ----------------------------------------
pause 5
if ($classe = mercador) goto respMercador
if ($classe = espadachin) goto respEspadachin
if ($classe = gatuno) goto respGatuno
if ($classe = aco) goto respAco
goto died

:respMercador
log Respondendo NPC - Escolhido: Mercador
pause 3
do eq @inventory (Novice False Eggshell)
pause 2
do move 99 24 new_4-4
pause 2
do talknpc 100 29 w1 r0 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 r1 w2 r0 w2
pause 3
release 2-MainMacro
goto check

:respEspadachin
log Respondendo NPC - Escolhido: Espadachin
pause 3
do eq @inventory (Novice False Eggshell)
pause 2
do move 99 24 new_4-4
pause 2
do talknpc 100 29 w1 r0 r1 r0 r0 r0 r0 r0 r0 r0 r0 r0 r0 r0 r0 r0 r0 r0 r0 r0 r0 r0 r0 r0 w2 r0 w2
pause 3
release 2-MainMacro
release treino1
release caiuTreinoEspada
goto check

:respGatuno
log Respondendo NPC - Escolhido: Gatuno
pause 3
do eq @inventory (Novice False Eggshell)
pause 2
do move 99 24 new_4-4
pause 2
do talknpc 100 29 w1 r0 r3 r0 r0 r0 r1 r2 r0 r0 r0 r0 r0 r1 r1 r0 r2 r2 r0 r0 r2 r2 r0 r1 w1 r0 w2
pause 3
release 2-MainMacro
goto check

:respAco
log Respondendo NPC - Escolhido: Acolyte
pause 3
do eq @inventory (Novice False Eggshell)
pause 2
do move 99 24 new_4-4
pause 2
do talknpc 100 29 w1 r0 r2 r1 r2 r1 r0 r1 r1 r1 r0 r1 r1 r1 r1 r0 r1 r1 r2 r1 r1 r2 r3 r2 w2 r0 w2
pause 3
release 2-MainMacro
goto check

:npcNove
log Definindo o uso de potions contra agressivos
log Anted de de falar com o npc que o enviara para a luta
pause 3
$agressivesPotion = @config (agressivesPotion)
if ($agressivesPotion < 2) goto padrao
do conf useSelf_item_0_aggressives < @eval ($agressivesPotion + 1)
goto aprendizes

:padrao
do conf useSelf_item_0_aggressives < 6
goto aprendizes

:aprendizes
log Falando com Instrutor de aprendizes
lock evita123
lock voltarMorrer
lock evita5
lock job10
release 2-MainMacro
pause 2
do move 91 20 $x-4
pause 2
do talknpc 91 22 w2 r4 w2 r6 w2
pause 3
do move 100 19 $x-4
pause 2
do uneq @inventory (Novice False Eggshell)
pause 2
goto check

:guardarPotions
do move 122 65 geffen
pause 3
do talknpc 120 62 w2 r1 w2
pause 3
do storage add @inventory (Novice Potion)
pause 2
do storage add @inventory (Free Ticket for Kafra Storage)
pause 3
log trocando de slots.
$slots = @config (char)
log Slot atual = $slots
$slots++
log Slot atual = $slots
do conf char $slots
$x = setar
pause 2
log relogando em 6 segundos
release 2-MainMacro
$skipConfig = 1
$x = setar
do relog 6
goto acabou

:sairViaKrafa
do move 117 108 $x-2
pause 2
do conf autoTalkCont 1
do talknpc 118 108 w2 r0 w2 r5 w2
pause 2
release 2-MainMacro
goto check

:novicePotions
log Configuracao para novice Potions esta ativada
pause 3
do uneq @inventory (Knife [3])
log Usando B Wing
pause 2
do is @inventory (Butterfly Wing)
pause 3
log indo krafa
do move 117 108
pause 5
$x = setar
release 2-MainMacro
goto check

:equipaNovice
$slots = @config (char)
if ($slots = 4) goto inicioEquipaTudo
$novicePotions = @config (novicePotions)
log slot atual = $slots
log Config para Novice Potions = $novicePotions
if ($novicePotions = 1) goto novicePotions
:inicioEquipaTudo
log Equipando Tudo
pause 2
do eq @inventory (Tattered Novice Ninja Suit)
pause 2
do eq @inventory (Somber Novice Hood)
pause 2
do eq @inventory (Novice Slippers)
pause 2
do eq @inventory (Novice False Eggshell)
pause 2
do eq @inventory (Novice Main-Gauche)
pause 2
do eq @inventory (Novice Guard)
pause 2
log Configurando ataque e uso de potion
do conf attackAuto 2
do conf route_randomWalk 1
do conf attackAuto_inLockOnly 0
do conf lockMap none
do conf itemsTakeAuto 2
do conf useSelf_item_0_disabled 0
do conf sitAuto_hp_lower 30
do conf sitAuto_hp_upper 70
pause 2
$x = setar
log fazendo relogon. Possvel bug nos statsAuto
release 2-MainMacro
do relog 6
goto acabou

:baseSete
log pega base 7
do is @inventory (Butterfly Wing)
pause 2
$x = setar
release 2-MainMacro
goto check

:npcOito
log Falando com Ajudante
pause 2
do move 28 179 $x-2
pause 2
do talknpc 38 182 w2 r0 w2
pause 3
$x = setar
release 2-MainMacro
goto check

:npcSete
log falando com Instrutor de Batalha
pause 2
do move 27 179 $x-2
pause 2
do talknpc 17 182 w2 r0 w2 r3 w2
pause 3
do move 28 179 $x-2
pause 1
release 2-MainMacro
goto check

:npcSeis
log falando com Instrutor de Habilidade
pause 2
do move 85 109 $x-2
pause 2
do talknpc 83 111 w2 r0 w2 r0 w2
pause 1
release 2-MainMacro
goto check

:npcCinco
log falando com Funcionaria Kafra
pause 2
do move 117 108 $x-2
pause 2
do talknpc 118 108 w2 r1 w2 r0 w2 r1 w2 r4 w2
pause 3
do move 85 109 $x-2
pause 1
release 2-MainMacro
goto check

:npcQuatro
log Falando com Instrutora de Itens
pause 2
do move 113 110 $x-2
pause 2
do talknpc 115 111 w2 r0 w2 r0 w2
pause 2
do move 117 108 $x-2
pause 1
release 2-MainMacro
goto check

:npcTres
log Falando com Instrutor de Interface
pause 2
do move 101 107 $x-2
pause 3
do talknpc 99 105 w2 r0 w2
pause 2
do move 113 102 $x-2
pause 1
release 2-MainMacro
goto check

:npcDois
pause 1
do move 97 27 $x-2
log falando com Recepcionista
pause 1
do talknpc 100 29 w2 r0 w2
pause 3
goto check

:mapaDois
log ---- Movendo-se para o mapa 2 do treino ---
pause 2
do move 97 27 $x-2
pause 2
goto check

:npcUm
$classe = @config (classe)
log ----------------------------------------
log ----------------------------------------
log Classe Definida no config.txt -> $classe
log ----------------------------------------
log ----------------------------------------
pause 5
if ($classe = mercador) goto confMercador
if ($classe = espadachin) goto confEspadachin
if ($classe = gatuno) goto confGatuno
if ($classe = aco) goto confAco
goto died
:confMercador
do conf statsAddAuto 1
do conf skillsAddAuto 1
do conf statsAddAuto_list 10 dex,10 agi,10 str,30 vit,20 str,20 agi,15 dex,25 agi,60 vit,30 str,60 agi
do conf skillsAddAuto_list Basic Skill 9
goto npcUmOK

:confEspadachin
do conf statsAddAuto 1
do conf skillsAddAuto 1
do conf statsAddAuto_list 10 dex,10 agi,10 str,30 vit,20 str,20 agi,15 dex,25 agi,60 vit,30 str,60 agi
do conf skillsAddAuto_list Basic Skill 9,Sword Mastery 10,Increase HP Recovery 10,Bash 10
goto npcUmOK

:confGatuno
do conf statsAddAuto 1
do conf skillsAddAuto 1
do conf statsAddAuto_list 15 dex,10 agi,10 str,10 vit,40 agi,20 str,30 dex,60 agi
do conf skillsAddAuto_list Basic Skill 9,Double Attack 10,Improve Dodge 10
goto npcUmOK

:confAco
do conf statsAddAuto 1
do conf skillsAddAuto 1
do conf statsAddAuto_list 10 dex,10 str,40 vit,60 int
do conf skillsAddAuto_list Basic Skill 9
goto npcUmOK

:died
log ----------------------------------------
log ----------------------------------------
log Voce nao especificou corretamente sintaxe classe no config.txt
log As classes permitidas sao: mercador, espadachin ou gatuno
log Voce setou como: $classe
log Seu openkore sera fechado em 15 segundos.
log Configure corretamente antes de abrir
log ----------------------------------------
log ----------------------------------------
pause 15
log bye
pause 2
do quit
goto acabou

:npcUmOK
if ($skipConfig = 1) goto jaConfigurado
log Definindo opcoes basicas do config.txt
do conf attackAuto 0
do conf attackAuto_party 0
do conf attackAuto_onlyWhenSafe 0
do conf attackAuto_followTarget 0
do conf attackAuto_inLockOnly 0
do conf attackDistance 2.5
do conf attackDistanceAuto 0
do conf attackMaxDistance 2.5
do conf attackMaxRouteTime 4
do conf attackUseWeapon 1
do conf attackCanSnipe 0
do conf attackCheckLOS 0
do conf attackLooters 0
do conf attackChangeTarget 1
do conf aggressiveAntiKS 0
do conf attackEquip_topHead none
do conf attackEquip_midHead none
do conf attackEquip_lowHead none
do conf attackEquip_leftHand none
do conf attackEquip_rightHand none
do conf attackEquip_leftAccessory none
do conf attackEquip_rightAccessory none
do conf attackEquip_robe none
do conf attackEquip_armor none
do conf attackEquip_shoes none
do conf attackEquip_arrow none

do conf avoidList 0

do conf dcOnDeath 0
do conf dcOnDualLogin 0
do conf dcOnDisconnect 0
do conf dcOnEmptyArrow 0
do conf dcOnMute 0
do conf dcOnPM 0
do conf dcOnZeny 0
do conf dcOnStorageFull 1

do conf itemsTakeAuto 1
do conf itemsTakeAuto_party 0
do conf itemsGatherAuto 0
do conf itemsMaxWeight 89
do conf itemsMaxWeight_sellOrStore 98

do conf lockMap none
do conf lockMap_x none
do conf lockMap_y none
do conf lockMap_randX none
do conf lockMap_randY none

do conf route_escape_unknownMap 0
do conf route_escape_reachedNoPortal 0
do conf route_escape_randomWalk 0
do conf route_randomWalk 0
do conf route_randomWalk_inTown 0
do conf route_teleport 0

do conf saveMap none
do conf saveMap_warpToBuyOrSell 0

do conf sitAuto_hp_lower 0
do conf sitAuto_hp_upper 0
do conf sitAuto_sp_lower 0
do conf sitAuto_sp_upper 0
do conf sitAuto_over_50 0
do conf sitAuto_idle 0

do conf teleportAuto_hp 0
do conf teleportAuto_sp 0
do conf teleportAuto_idle 0
do conf teleportAuto_portal 0
do conf teleportAuto_search 0
do conf teleportAuto_minAggressives 0
do conf teleportAuto_minAggressivesInLock 0
do conf teleportAuto_onlyWhenSafe 0
do conf teleportAuto_maxDmg 0
do conf teleportAuto_maxDmgInLock 0
do conf teleportAuto_deadly 0
do conf teleportAuto_useSkill 1
do conf teleportAuto_atkMiss 0
do conf teleportAuto_equip_leftAccessory none
do conf teleportAuto_equip_rightAccessory none

do conf dealAuto 0
do conf partyAuto 0
do conf partyAutoShare 0
do conf guildAutoDeny 0

log -------- Setando logs. Voce Deveria
log --- alterar da forma que achar melhor ---
pause 5
set macro_delay 1.0
do conf logChat 1
do conf logPrivateChat 1
do conf logPartyChat 1
do conf logGuildChat 1
do conf logSystemChat 1
do conf logEmoticons 0
do conf logConsole 0
do conf logAppendUsername 1
log ------- Done -----------
log ------- Setando o restante ------
pause 3
set macro_delay 0.1
do conf autoTalkCont 1
do conf portalRecord 0
do conf attackSkillSlot_0 none
do conf useSelf_skill_0 none
do conf useSelf_skill_smartHeal 0
do conf partySkill_0 0
do conf useSelf_item_0 Milk,Red Herb,Orange Potion,Monster's Feed,Novice Potion,Red Herb,Monster's Feed,Red Potion,White Potion
do conf useSelf_item_0_hp <= 50%
do conf useSelf_item_0_notWhileSitting 1
do conf useSelf_item_1 none
do conf useSelf_item_1_whenStatusInactive none
do conf useSelf_item_1_inLockOnly 1
do conf useSelf_item_1_notWhileSitting 1
do conf useSelf_item_1_notInTown 1
do conf useSelf_item_1_timeout none
do conf useSelf_item_1_disabled 0
do conf useSelf_item_1_inInventory none
do conf sellAuto 0
do conf sellAuto_npc 0
do conf sellAuto_standpoint none
do conf sellAuto_distance 8
do conf storageAuto 0
do conf storageAuto_npc none
do conf storageAuto_distance 8
do conf storageAuto_npc_type 3
do conf storageAuto_npc_steps c r1 n
do conf storageAuto_keepOpen 0
do conf relogAfterStorage 0
do conf buyAuto_0 none
do conf buyAuto_0_npc none
do conf buyAuto_0_standpoint none
do conf buyAuto_0_distance 7
do conf buyAuto_0_minAmount none
do conf buyAuto_0_maxAmount none
do conf buyAuto_1 none
do conf buyAuto_1_npc none
do conf buyAuto_1_standpoint none
do conf buyAuto_1_distance 7
do conf buyAuto_1_minAmount none
do conf buyAuto_1_maxAmount none
do conf buyAuto_2 none
do conf buyAuto_2_npc none
do conf buyAuto_2_standpoint none
do conf buyAuto_2_distance 7
do conf buyAuto_2_minAmount none
do conf buyAuto_2_maxAmount none
do conf buyAuto_3 none
do conf buyAuto_3_npc none
do conf buyAuto_3_standpoint none
do conf buyAuto_3_distance 7
do conf buyAuto_3_minAmount none
do conf buyAuto_3_maxAmount none
do conf getAuto_0 none
do conf getAuto_0_minAmount none
do conf getAuto_0_maxAmount none
do conf getAuto_0_passive none
do conf getAuto_1 none
do conf getAuto_1_minAmount none
do conf getAuto_1_maxAmount none
do conf getAuto_1_passive none
do conf getAuto_2 none
do conf getAuto_2_minAmount none
do conf getAuto_2_maxAmount none
do conf getAuto_2_passive none
do conf autoMoveOnDeath 0
do conf autoMoveOnDeath_x none
do conf autoMoveOnDeath_y none
do conf autoMoveOnDeath_map none
do conf storageAuto_notAfterDeath 0
do conf pacoteA none
do conf pacoteB none
do conf local nenhum
do conf senha 0

log ------------------------------
log ------------------------------
log ---Alteracoes Importantes ----
log ------------------------------
log ------------------------------
pause 5
set macro_delay 1.0
do conf clientSight 15
do conf removeActorWithDistance 15
do conf sleepTime 10000
set macro_delay 0.1
log -------- Setando timeouts. Voce Deveria
log --- alterar da forma que achar melhor ---
log _________________________________________
pause 5
do timeout ai_attack 1
do timeout ai_attack_auto 1.5
do timeout ai_attack_waitAfterKill 0.7
do timeout ai_items_take_start 1.7
do timeout ai_items_take_end 1.4
do timeout ai_take .9
do timeout ai_take_giveup 6
do timeout ai_items_gather_auto 1.6
do timeout ai_items_gather_start 1.3
do timeout ai_sit 3
do timeout ai_npcTalk 15
:jaConfigurado
pause 5
log O Mapa atual : $mapa
log Seu level : $level/$job
log Seu zeny : $zeny
log Seu arma : $arma
log Equipado na cabea: $cabeca
log Falando npc um
pause 3
do move 53 111 $x-1
pause 1
do talknpc 53 114 r1 w2
pause 4
do talk @npc (53 114)
pause 2
goto check

:defineX
pause 1
if ($mapa = new_1-1) goto um
if ($mapa = new_2-1) goto dois
if ($mapa = new_3-1) goto tres
if ($mapa = new_4-1) goto quatro
if ($mapa = new_5-1) goto cinco
if ($mapa = new_1-2) goto um
if ($mapa = new_2-2) goto dois
if ($mapa = new_3-2) goto tres
if ($mapa = new_4-2) goto quatro
if ($mapa = new_5-2) goto cinco
if ($mapa = new_1-3) goto um
if ($mapa = new_2-3) goto dois
if ($mapa = new_3-3) goto tres
if ($mapa = new_4-3) goto quatro
if ($mapa = new_5-3) goto cinco
if ($mapa = new_1-4) goto um
if ($mapa = new_2-4) goto dois
if ($mapa = new_3-4) goto tres
if ($mapa = new_4-4) goto quatro
if ($mapa = new_5-4) goto cinco
$x = Fora do campo
goto check
:um
$x = new_1
goto check
:dois
$x = new_2
goto check
:tres
$x = new_3
goto check
:quatro
$x = new_4
goto check
:cinco
$x = new_5
goto check
:acabou
}
}
######### Macros complementares campo de novices ##############
################################################## #############
################################################## #############
#Evita treino 1 2 3
automacro evita123 {
location new_1-3,new_2-3,new_3-3
run-once 1
orphan reregister
exclusive 1
priority 3
class novice
base > 6
call {
pause 2
do move 96 21
pause 1
do talknpc 95 30 w2 r1
pause 2
release evita123
release voltarMorrer
}
}
#Voltar caso morra
automacro voltarMorrer {
location new_1-2,new_2-2,new_3-2,new_4-2,new_5-2
equipped rightHand Novice Main-Gauche
class novice
exclusive 1
orphan reregister
base > 5
priority 4
delay 2
run-once 1
call {
do conf useSelf_item_0_disabled 0
do move 30 181
pause 2
do talknpc 38 182 w2 r0
pause 3
log relogando...
pause 3
do relog 5
release voltarMorrer
}
}
#Evita treino 5 ao pegar job 10
automacro evita5 {
location new_5-3
orphan reregister
exclusive 1
equipped rightHand Novice Main-Gauche
class novice
job = 10
priority 5
run-once 1
call {

pause 2
do move 96 21
pause 2
do talknpc 95 30 w2 r0
pause 2
release evita5
}
}
#Sair do treino no job 10
automacro job10 {
location new_4-3
orphan reregister
exclusive 1
class novice
priority 6
job = 10
timeout 5
call {
release 2-MainMacro
$x = setar
do conf attackAuto 0
do conf route_randomWalk 0
log Saindo do treino
do tele
pause 2
do move 92 168
pause 2
do talknpc 96 174 w2 r0 w2
pause 2
}
}
################################################## #############
################################################## #############
################################################## #############
################################################## #############

######### Macros complementares Espadachin ##############
################################################## #############
################################################## #############
# Treino espadachin
automacro treino1 {
location sword_1-1,sword_2-1,sword_3-1
class novice
run-once 1
priority 7
exclusive 1
call {
release 2-MainMacro
pause 2
$posicao = $.pos
log $posicao
if ($posicao = 10 245) goto parteUmEspada
goto fimEspada
:parteUmEspada
pause 2
do conf attackAuto 1
do conf itemsTakeAuto 0
do conf itemsGatherAuto 0
do conf attackMinPortalDistance 1
do conf attackMaxDistance 7
do conf attackDistance 1.5
do conf route_randomWalk 1
pause 2
do move 22 246
pause 2
do move 22 250
pause 2
do move 27 250
pause 2
do move 32 250
pause 2
do move 36 250
pause 2
do move 36 245
pause 2
do move 52 245
pause 2
do move 52 248
pause 2
do move 57 248
pause 2
do move 62 248
pause 2
do move 67 248
pause 2
do move 72 248
pause 2
do move 95 246
pause 2
do move 99 249
pause 2
do move 104 249
pause 2
do move 107 249
pause 2
do move 140 246
pause 2
do move 145 246
pause 2
do move 150 246
pause 2
do move 155 246
pause 2
do move 160 246
pause 2
do move 165 246
pause 2
do move 170 246
pause 2
do move 175 246
pause 2
do move 191 244
pause 2
$posicao = $.pos
log $posicao
if ($posicao = 215 244) goto parteDoisEspada
goto fimEspada
:parteDoisEspada
log parte Dois do treino
do move 223 244
pause 3
do move 15 211
pause 2
do move 20 211
pause 2
do move 25 211
pause 2
do move 188 211
pause 2
do move 189 207
pause 2
do move 192 207
pause 5
$posicao = $.pos
log $posicao
if ($posicao = 215 205) goto parteTresEspada
goto fimEspada
:parteTresEspada
log Parte Tres do treino
pause 2
do move 222 206
pause 2
do move 24 169
pause 2
do move 24 173
pause 2
do move 29 173
pause 2
do move 33 173
pause 2
do move 39 172
pause 2
do move 45 172
pause 2
do move 45 170
pause 2
do move 51 170
pause 2
do move 51 172
pause 2
do move 56 172
pause 2
do move 56 170
pause 2
do move 61 170
pause 2
do move 75 169
pause 2
do move 94 170
pause 2
do move 98 170
pause 2
do move 116 168
pause 2
do move 130 169
pause 2
do move 142 167
pause 2
do move 175 170
pause 2
do move 176 170
pause 2
do move 181 170
pause 2
do move 181 173
pause 2
do move 183 173
pause 2
do move 185 173
pause 2
do move 189 169
pause 2
do move 192 169
pause 2
$posicao = $.pos
log $posicao
if ($posicao = 215 167) goto parteQuatroEspada
goto fimEspada
:parteQuatroEspada
do conf autoTalkCont 1
pause 2
do conf attackAuto 0
do conf attackMinPortalDistance 8
do conf attackMaxDistance 1.5
do conf attackDistance 1.5
do conf route_randomWalk 0
pause 2
log Falando com NPC mae
do talknpc 223 167 w2
pause 5
do uneq @inventory (Novice Main-Gauche)
goto fimEspada
:fimEspada
log Fim da macro do treino.
log Sera verificado se voce passou ou caiu

}
}
# priority 23
automacro caiuTreinoEspada {
location sword_1-1,sword_2-1,sword_3-1
class novice
priority 8
exclusive 1
orphan reregister
monster fabre
run-once 1
call {
log $.lastMonster encontrado. Voce caiu...
log Relogando...
pause 2
do relog 5
release 2-MainMacro
pause 2
release caiuTreinoEspada
}
}
################################################## #############
################################################## #############
################################################## #############
################################################## #############

############ Macros complementares Mercador ###################
################################################## #############
################################################## #############
automacro iniciaPegarLocalSenha {
class novice
job = 10
equipped rightHand Main Gauche [3]
equipped topHead none
location alberta,alberta_in
priority 8
macro_delay 0.1
exclusive 1
run-once 1
call {
$localsAtual = $.pos $mapa
log $localsAtual
if ($localsAtual = 57 43 alberta_in ) goto falandoNpcSenha
if ($localsAtual = 58 42 alberta_in ) goto falandoNpcSenha
if ($localsAtual = 58 44 alberta_in ) goto falandoNpcSenha
if ($localsAtual = 58 43 alberta_in ) goto falandoNpcSenha
do move alberta
pause 2
do move 57 43 alberta_in
pause 2
:falandoNpcSenha
do talk @npc (53 43)
}
}
automacro pegarSenha {
class novice
job = 10
equipped rightHand Main Gauche [3]
equipped topHead none
location alberta,alberta_in
priority 9
exclusive 1
run-once 1
console /Mercador: O número de série é/i
call {
$senha = @arg ("$.lastLogMsg", 7)
pause 3
log --------------------------------------
log -------- A senha eh: $senha ---------
log --------------------------------------
if ($senha < 10) goto pedirSenha
if ('$senha' == '') goto pedirSenha
goto end
:pedirSenha
log Falhou pegar senha.Tentando novamente
release pegarSenha
:end
do conf senha $senha
release iniciaPegarLocalSenha
}
}

automacro pegarLocal {
class novice
job = 10
var senha > 10
exclusive 1
equipped rightHand Main Gauche [3]
equipped topHead none
location alberta,alberta_in
priority 10
run-once 1
console /Mercador: .* prontera|byalan|morroc|geffen/i
call {
$locals = @arg ("$.lastLogMsg", 14)
pause 3
if ($locals = Prontera) goto setaProntera
if ($locals = em) goto setaMorocc
if ($locals = Entregue) goto setaGeffen
if ($locals = Ilha) goto setaIzlu2dun
log $locals
pause 1
:setaProntera
log Setando config.txt
do conf local prontera
goto final

:setaMorocc
log Setando config.txt
do conf local morocc
goto final

:setaGeffen
log Setando config.txt
do conf local geffen
goto final

:setaIzlu2dun
log Setando config.txt
do conf local izlu2dun
goto final

:final
pause 2
$local = @config (local)
log --------------------------------------
log O local serah $local a senha eh $senha
log --------------------------------------
pause 3
if ($senha > 10) goto okay
if ($local = prontera) goto okay
if ($local = morocc) goto okay
if ($local = geffen) goto okay
if ($local = izlu2dun) goto okay
log alguma coisa errada, refazendo toda a quest.
pause 3
do eq @inventory (Novice False Eggshell)
pause 2
release 2-MainMacro
release iniciaPegarLocalSenha
release pegarSenha
release pegarLocal
pause 3
goto finalS
:okay
pause 2
log variaveis definidas corretamente.
pause 1
do uneq @inventory (Main Gauche [3])
pause 3
release 2-MainMacro
:finalS

}
}

############ Macros complementares Thief ###################
################################################## #############
################################################## #############
automacro verificaCogumelos {
class novice
location job_thief1
exclusive 1
job = 10
priority 10
timeout 30
run-once 1
macro_delay 0.1
overrideAI 1
call {
release verificaCogumelos
$cogumeloVenenoso = @eval (@invamount (Orange Net Mushroom) * 3)
$cogumeloBorrachento = @invamount (Orange Gooey Mushroom)
$cogumelosTotais = @eval ($cogumeloVenenoso + $cogumeloBorrachento)

log cogumeloVenenoso = $cogumeloVenenoso
log cogumeloBorrachento = $cogumeloBorrachento
log total $cogumelosTotais
if ($cogumelosTotais > 24) goto sairQuestGatuno
goto end
:sairQuestGatuno
log Saindo Quest
pause 2
do move 180 16 job_thief1
do conf attackAuto 0
release 2-MainMacro
:end
}
}
################################################## #############
################################################## #############
################################################## #############
################################################## #############

############ Macros complementares Aco #################################
################################################## #############
################################################## #############

automacro falaNecrus {
run-once 1
location prt_church
class novice
priority 9
run-once 1
macro_delay 0.1
equipped topHead Novice False Eggshell
call {
do talknpc 184 41 w1 r0 w1 r0 w1
}
}
automacro pegaNpcAco {
console /Bartolomeu/i
location prt_church
class novice
priority 10
run-once 1
exclusive 1
equipped topHead Novice False Eggshell
macro_delay 0.1
call {
do conf npcAco Bartolomeu
:retira
do uneq @inventory (Novice False Eggshell)
pause 3
$cabeca = @eval (return $::char->{equipment}{topHead}{name} || 'none')
if ($cabeca != none) goto retira
release 2-MainMacro
}
}
automacro pegaNpcAco2 {
console /Matilda/i
location prt_church
class novice
priority 10
run-once 1
exclusive 1
equipped topHead Novice False Eggshell
macro_delay 0.1
call {
do conf npcAco Matilda
:retira
do uneq @inventory (Novice False Eggshell)
pause 3
$cabeca = @eval (return $::char->{equipment}{topHead}{name} || 'none')
if ($cabeca != none) goto retira
release 2-MainMacro
}
}
automacro pegaNpcAco3 {
console /Abadia ao Nordeste de Prontera/i
location prt_church
class novice
priority 10
run-once 1
exclusive 1
equipped topHead Novice False Eggshell
macro_delay 0.1
call {
do conf npcAco Simao
:retira
do uneq @inventory (Novice False Eggshell)
pause 3
$cabeca = @eval (return $::char->{equipment}{topHead}{name} || 'none')
if ($cabeca != none) goto retira
release 2-MainMacro
}
}

essa ae só q ela não funciona + pq foi tirado os npcs eu queria saber ond eu altero