fredereis
11/07/2008, 2:44:15
Quero configurar meu bor pra corrida de hugel, pra ele poder ficar pegando medalhas... mais ae ta o problema... nao me dei muito bem aprincipio com macro... Todos openkore que baixei... na pasta plugins faltava um com o nome monsterDB... nunca consequi achar esse... mais mesmo assim, o meu bot conecta, e começa andar para un lado e para o outro, e desconecta a cada 1 minuto aproximadamente, e ele nao entra na corrida... criei a pasta macros dentro da pasta control... e coloquei uma config la que estava postada no forun...
ak tá a config que esta na pasta macros:
automacro Posiçao {
map hugel
location not hugel [54 79 74 69]
run-once 1
call posiçao
}
automacro Posiçao2 {
map hugel
location hugel 63 73
run-once 1
call posiçao
}
macro posiçao{
$look = 0
$x = 0
$y = 0
$look = @rand(0 , 7)
$x = @rand(54 , 69)
$y = @rand(74 , 79)
do move $x $y
pause 1
do look $look
pause 1
release Posiçao
release Posiçao2
}
automacro abriuCorrida{
map hugel
console /A Arena de Corrida|A entrada da Arena de Corrida/[i]
run-once 1
call antZeRuela
}
macro antZeRuela{
release all
if ($.lastLogMsg = "A Arena de Corrida de Um Monstro acabou de abrir.") goto entraSingle
if ($.lastLogMsg = "A Arena de Corrida de Um Monstro está aberta. Os participantes devem entrar na arena o mais rápido possível.") goto entraSingle
if ($.lastLogMsg = "A entrada da Arena de Corrida de Um Monstro logo será fechada. Participantes, entrem agora na arena.") goto entraSingle
if ($.lastLogMsg = "A entrada da Arena de Corrida de Um Monstro logo será fechada.") goto entraSingle
if ($.lastLogMsg = "A Arena de Corrida de Monstros em Dupla acabou de abrir.") goto entraDouble
if ($.lastLogMsg = "A Arena de Corrida de Monstros em Dupla está aberta. Os participantes devem entrar na arena o mais rápido possível.") goto entraDouble
if ($.lastLogMsg = "A entrada da Arena de Corrida Monstros em Dupla logo será fechada. Participantes, entrem agora na arena.") goto entraDouble
if ($.lastLogMsg = "A entrada da Arena de Corrida de Monstros em Dupla logo será fechada.") goto entraDouble
if ($.lastLogMsg != "A Arena de Corrida") goto naoEntra
if ($.lastLogMsg != "A entrada da Arena de Corrida") goto naoEntra
:naoEntra
release abriuCorrida
goto end
:entraSingle
call entraSingle
goto end
:entraDouble
call entraDouble
:end
}
macro entraSingle {
do talknpc 58 72 r1 c c r0 c
pause 2
release abriuCorrida
}
macro entraDouble {
do talknpc 62 69 c r1 c c r0 c
pause 2
release abriuCorrida
}
automacro dentroSingle {
location p_track01 75 41
inventory "Monster Ticket" < 1
run-once 1
call apostaSingle
}
automacro dentroDouble {
location p_track02 75 41
inventory "Monster Ticket" < 1
run-once 1
call apostaDouble
}
macro apostaSingle {
$x = @rand(70 , 76)
$y = @rand(26 , 33)
do move $x $y
pause 20
do talknpc 73 22 c r1 c
pause 2
$x = @rand(60 , 65)
$y = @rand(23 , 45)
do move $x $y
pause2
do look 2
pause 2
release dentroSingle
}
macro apostaDouble {
$x = @rand(70 , 76)
$y = @rand(26 , 33)
do move $x $y
pause 20
do talknpc 73 22 c r1 c c r1 c r0 c r2 c r0 c
pause 2
$x = @rand(60 , 65)
$y = @rand(23 , 45)
do move $x $y
pause2
do look 2
pause 2
release dentroDouble
}
automacro cabouSingle{
location p_track01
run-once 1
console /(O Monstro )/[i]
call testaSingle
}
automacro cabouDouble{
location p_track02
run-once 1
console /(O Monstro )/[i]
call testaDouble
}
macro testaSingle {
if ($.lastLogMsg = "O Monstro 1 é o vencedor desta corrida!") goto ganhouSingle
if ($.lastLogMsg = "O Monstro 2 é o vencedor desta corrida!") goto perdeuSingle
if ($.lastLogMsg = "O Monstro 3 é o vencedor desta corrida!") goto perdeuSingle
if ($.lastLogMsg = "O Monstro 4 é o vencedor desta corrida!") goto perdeuSingle
if ($.lastLogMsg = "O Monstro 5 é o vencedor desta corrida!") goto perdeuSingle
if ($.lastLogMsg = "O Monstro 6 é o vencedor desta corrida!") goto perdeuSingle
if ($.lastLogMsg != "O Monstro ") goto antZeMane
:ganhouSingle
call ganhouSingle
goto end
:perdeuSingle
call perdeuSingle
goto end
:antZeMane
release cabouSingle
goto end
:end
}
macro ganhouSingle {
do move 65 37
pause 6
do talknpc 67 45 c c c r0 c
pause 8
do talknpc 76 36 c c r0 c
pause 4
release cabouSingle
}
macro perdeuSingle {
do move 65 37
pause 2
do talknpc 76 36 c c r0 c
pause 4
release cabouSingle
}
macro testaDouble {
if ($.lastLogMsg = "O Monstro 1 acabou de cruzar a linha de chegada.") goto perdeuDouble
if ($.lastLogMsg = "O Monstro 2 acabou de cruzar a linha de chegada.") goto end
if ($.lastLogMsg = "O Monstro 3 acabou de cruzar a linha de chegada.") goto perdeuDouble
if ($.lastLogMsg = "O Monstro 4 acabou de cruzar a linha de chegada.") goto end
if ($.lastLogMsg = "O Monstro 5 acabou de cruzar a linha de chegada.") goto perdeuDouble
if ($.lastLogMsg = "O Monstro 6 acabou de cruzar a linha de chegada.") goto perdeuDouble
if ($.lastLogMsg != "O Monstro ") goto antZeMane
:perdeuDouble
call perdeuDouble
goto end
:antZeMane
release cabouDouble
goto end
:end
}
automacro waiting {
map p_track02
inventory "Monster Ticket" = 1
console /O jogo terminou quando o Monstro /[i]
run-once 1
call testaWaiting
}
macro testaWaiting {
if ($.lastLogMsg = "O jogo terminou quando o Monstro 1 cruzou a linha de chagada.") goto perdeuDoubleWaiting
if ($.lastLogMsg = "O jogo terminou quando o Monstro 2 cruzou a linha de chagada.") goto ganhouDouble
if ($.lastLogMsg = "O jogo terminou quando o Monstro 3 cruzou a linha de chagada.") goto perdeuDoubleWaiting
if ($.lastLogMsg = "O jogo terminou quando o Monstro 4 cruzou a linha de chagada.") goto ganhouDouble
if ($.lastLogMsg = "O jogo terminou quando o Monstro 5 cruzou a linha de chagada.") goto perdeuDoubleWaiting
if ($.lastLogMsg = "O jogo terminou quando o Monstro 6 cruzou a linha de chagada.") goto perdeuDoubleWaiting
if ($.lastLogMsg != "O jogo terminou quando o Monstro ") goto antZeMane
:ganhouDouble
call ganhouDouble
goto end
:perdeuDoubleWaiting
call perdeuDoubleWaiting
goto end
:antZeMane
release waiting
goto end
:end
}
macro ganhouDouble{
do move 65 37
pause 6
do talknpc 67 45 c c c r0 c
pause 8
do talknpc 76 38 c c r0 c
release waiting
release cabouDouble
}
macro perdeuDouble{
do move 73 40
pause 2
do talknpc 76 38 c c r0 c
pause 2
release cabouDouble
}
macro perdeuDoubleWaiting{
do move 73 40
pause 2
do talknpc 76 38 c c r0 c
pause 2
release waiting
}
automacro Portal{
location not hugel
location not p_track01
location not p_track02
run-once 1
call borboasa
}
macro borboasa{
do is Butterfly Wing
pause 10
do move 63 77
pause 2
release Portal
}
automacro cabouAgrana{
location hugel
zeny < 2000
run-once 1
call quit
}
macro quit{
do quit
}
~~>alquem que possa saber qual e o meu erro... favor me ajudar...
ps. nao mandem eu ler topicos pra macro que ja quase decorrei todos eles...
ak tá a config que esta na pasta macros:
automacro Posiçao {
map hugel
location not hugel [54 79 74 69]
run-once 1
call posiçao
}
automacro Posiçao2 {
map hugel
location hugel 63 73
run-once 1
call posiçao
}
macro posiçao{
$look = 0
$x = 0
$y = 0
$look = @rand(0 , 7)
$x = @rand(54 , 69)
$y = @rand(74 , 79)
do move $x $y
pause 1
do look $look
pause 1
release Posiçao
release Posiçao2
}
automacro abriuCorrida{
map hugel
console /A Arena de Corrida|A entrada da Arena de Corrida/[i]
run-once 1
call antZeRuela
}
macro antZeRuela{
release all
if ($.lastLogMsg = "A Arena de Corrida de Um Monstro acabou de abrir.") goto entraSingle
if ($.lastLogMsg = "A Arena de Corrida de Um Monstro está aberta. Os participantes devem entrar na arena o mais rápido possível.") goto entraSingle
if ($.lastLogMsg = "A entrada da Arena de Corrida de Um Monstro logo será fechada. Participantes, entrem agora na arena.") goto entraSingle
if ($.lastLogMsg = "A entrada da Arena de Corrida de Um Monstro logo será fechada.") goto entraSingle
if ($.lastLogMsg = "A Arena de Corrida de Monstros em Dupla acabou de abrir.") goto entraDouble
if ($.lastLogMsg = "A Arena de Corrida de Monstros em Dupla está aberta. Os participantes devem entrar na arena o mais rápido possível.") goto entraDouble
if ($.lastLogMsg = "A entrada da Arena de Corrida Monstros em Dupla logo será fechada. Participantes, entrem agora na arena.") goto entraDouble
if ($.lastLogMsg = "A entrada da Arena de Corrida de Monstros em Dupla logo será fechada.") goto entraDouble
if ($.lastLogMsg != "A Arena de Corrida") goto naoEntra
if ($.lastLogMsg != "A entrada da Arena de Corrida") goto naoEntra
:naoEntra
release abriuCorrida
goto end
:entraSingle
call entraSingle
goto end
:entraDouble
call entraDouble
:end
}
macro entraSingle {
do talknpc 58 72 r1 c c r0 c
pause 2
release abriuCorrida
}
macro entraDouble {
do talknpc 62 69 c r1 c c r0 c
pause 2
release abriuCorrida
}
automacro dentroSingle {
location p_track01 75 41
inventory "Monster Ticket" < 1
run-once 1
call apostaSingle
}
automacro dentroDouble {
location p_track02 75 41
inventory "Monster Ticket" < 1
run-once 1
call apostaDouble
}
macro apostaSingle {
$x = @rand(70 , 76)
$y = @rand(26 , 33)
do move $x $y
pause 20
do talknpc 73 22 c r1 c
pause 2
$x = @rand(60 , 65)
$y = @rand(23 , 45)
do move $x $y
pause2
do look 2
pause 2
release dentroSingle
}
macro apostaDouble {
$x = @rand(70 , 76)
$y = @rand(26 , 33)
do move $x $y
pause 20
do talknpc 73 22 c r1 c c r1 c r0 c r2 c r0 c
pause 2
$x = @rand(60 , 65)
$y = @rand(23 , 45)
do move $x $y
pause2
do look 2
pause 2
release dentroDouble
}
automacro cabouSingle{
location p_track01
run-once 1
console /(O Monstro )/[i]
call testaSingle
}
automacro cabouDouble{
location p_track02
run-once 1
console /(O Monstro )/[i]
call testaDouble
}
macro testaSingle {
if ($.lastLogMsg = "O Monstro 1 é o vencedor desta corrida!") goto ganhouSingle
if ($.lastLogMsg = "O Monstro 2 é o vencedor desta corrida!") goto perdeuSingle
if ($.lastLogMsg = "O Monstro 3 é o vencedor desta corrida!") goto perdeuSingle
if ($.lastLogMsg = "O Monstro 4 é o vencedor desta corrida!") goto perdeuSingle
if ($.lastLogMsg = "O Monstro 5 é o vencedor desta corrida!") goto perdeuSingle
if ($.lastLogMsg = "O Monstro 6 é o vencedor desta corrida!") goto perdeuSingle
if ($.lastLogMsg != "O Monstro ") goto antZeMane
:ganhouSingle
call ganhouSingle
goto end
:perdeuSingle
call perdeuSingle
goto end
:antZeMane
release cabouSingle
goto end
:end
}
macro ganhouSingle {
do move 65 37
pause 6
do talknpc 67 45 c c c r0 c
pause 8
do talknpc 76 36 c c r0 c
pause 4
release cabouSingle
}
macro perdeuSingle {
do move 65 37
pause 2
do talknpc 76 36 c c r0 c
pause 4
release cabouSingle
}
macro testaDouble {
if ($.lastLogMsg = "O Monstro 1 acabou de cruzar a linha de chegada.") goto perdeuDouble
if ($.lastLogMsg = "O Monstro 2 acabou de cruzar a linha de chegada.") goto end
if ($.lastLogMsg = "O Monstro 3 acabou de cruzar a linha de chegada.") goto perdeuDouble
if ($.lastLogMsg = "O Monstro 4 acabou de cruzar a linha de chegada.") goto end
if ($.lastLogMsg = "O Monstro 5 acabou de cruzar a linha de chegada.") goto perdeuDouble
if ($.lastLogMsg = "O Monstro 6 acabou de cruzar a linha de chegada.") goto perdeuDouble
if ($.lastLogMsg != "O Monstro ") goto antZeMane
:perdeuDouble
call perdeuDouble
goto end
:antZeMane
release cabouDouble
goto end
:end
}
automacro waiting {
map p_track02
inventory "Monster Ticket" = 1
console /O jogo terminou quando o Monstro /[i]
run-once 1
call testaWaiting
}
macro testaWaiting {
if ($.lastLogMsg = "O jogo terminou quando o Monstro 1 cruzou a linha de chagada.") goto perdeuDoubleWaiting
if ($.lastLogMsg = "O jogo terminou quando o Monstro 2 cruzou a linha de chagada.") goto ganhouDouble
if ($.lastLogMsg = "O jogo terminou quando o Monstro 3 cruzou a linha de chagada.") goto perdeuDoubleWaiting
if ($.lastLogMsg = "O jogo terminou quando o Monstro 4 cruzou a linha de chagada.") goto ganhouDouble
if ($.lastLogMsg = "O jogo terminou quando o Monstro 5 cruzou a linha de chagada.") goto perdeuDoubleWaiting
if ($.lastLogMsg = "O jogo terminou quando o Monstro 6 cruzou a linha de chagada.") goto perdeuDoubleWaiting
if ($.lastLogMsg != "O jogo terminou quando o Monstro ") goto antZeMane
:ganhouDouble
call ganhouDouble
goto end
:perdeuDoubleWaiting
call perdeuDoubleWaiting
goto end
:antZeMane
release waiting
goto end
:end
}
macro ganhouDouble{
do move 65 37
pause 6
do talknpc 67 45 c c c r0 c
pause 8
do talknpc 76 38 c c r0 c
release waiting
release cabouDouble
}
macro perdeuDouble{
do move 73 40
pause 2
do talknpc 76 38 c c r0 c
pause 2
release cabouDouble
}
macro perdeuDoubleWaiting{
do move 73 40
pause 2
do talknpc 76 38 c c r0 c
pause 2
release waiting
}
automacro Portal{
location not hugel
location not p_track01
location not p_track02
run-once 1
call borboasa
}
macro borboasa{
do is Butterfly Wing
pause 10
do move 63 77
pause 2
release Portal
}
automacro cabouAgrana{
location hugel
zeny < 2000
run-once 1
call quit
}
macro quit{
do quit
}
~~>alquem que possa saber qual e o meu erro... favor me ajudar...
ps. nao mandem eu ler topicos pra macro que ja quase decorrei todos eles...