This macro trade fish rainbow fish for certificades tested on 1024x768 resolution u need stay on cordinates 503 2078 to turn on macr
1 Installing Blue Eye Macro (V2.5) and avoiding Xtrap (functional in 32 and 64 bits)
Spoiler
1a. Download link (Blue Eye Macro - CNET Download.com)
1b. Install with a different folder name (eg C: \ Program Files (x86) \ AAA)
1c. Run the program (with aika closed) (always run the program as administrator).
1d. Go to General / Settings / Input / and click install (to install the driver). Done that restart COMPUTER (IF ALREADY BEEN INSTALLED SKIP THIS STEP)
1e. Open the program again, and go to General / Settings / Input / and SELECT the TWO Virtual drivers, switch to Screen tab and uncheck Enable DirectX. Save and close the program.
1f. Open Aika and when loading the login screen, run the B.E.M. Wait detection Xtrap and close everything.
1g. Rename the folder that is installed B.E.M. for any other size, name or letters you wish (eg AAA for ATPWEO)
1h. Open the program again, and go to General / Settings / Input / and SELECT the TWO Virtual drivers, switch to Screen tab and uncheck Enable DirectX. Save and close the program.
1i. Open Aika and when loading the login screen, run the B.E.M. BUT THIS TIME WILL NOT BE DETECTED. Login and go fishing.
1j. Whenever you reopen the B.E.M. repeat steps 1f/1g/1h/1i
Code
Spoiler
begin
Macro.Wait for current global loop execution time to exceed("417")
Mouse.Click at coordinate("586", "386", "left")
Macro.Wait for current global loop execution time to exceed("553")
Mouse.Click at coordinate("586", "386", "left")
Macro.Wait for current global loop execution time to exceed("553")
Mouse.Click at coordinate("586", "386", "left")
Macro.Wait for current global loop execution time to exceed("1259")
Mouse.Move to coordinate("511", "618")
Macro.Wait for current global loop execution time to exceed("3423")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("3499")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("4766")
Mouse.Move to coordinate("525", "643")
Macro.Wait for current global loop execution time to exceed("5335")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("5412")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("6103")
Mouse.Move to coordinate("507", "746")
Macro.Wait for current global loop execution time to exceed("7023")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("7501")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("7963")
Mouse.Move to coordinate("519", "617")
Macro.Wait for current global loop execution time to exceed("8169")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("8318")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("8580")
Mouse.Click at coordinate("586", "386", "left")
Macro.Wait for current global loop execution time to exceed("8953")
Mouse.Click at coordinate("586", "386", "left")
Macro.Wait for current global loop execution time to exceed("9100")
Mouse.Click at coordinate("586", "386", "left")
Macro.Wait for current global loop execution time to exceed("10400")
Mouse.Move to coordinate("511", "618")
Macro.Wait for current global loop execution time to exceed("10623")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("10899")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("11066")
Mouse.Move to coordinate("534", "619")
Macro.Wait for current global loop execution time to exceed("11299")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("11499")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("12799")
Mouse.Move to coordinate("507", "746")
Macro.Wait for current global loop execution time to exceed("13799")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("14099")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("15499")
Mouse.Move to coordinate("518", "617")
Macro.Wait for current global loop execution time to exceed("15899")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("16899")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("17199")
Mouse.Move to coordinate("586", "386")
end
PORTUGUÊS
Macro de cestificado de pesca para BEM 2.5
1 Instalando o Blue Eye Macro (V2.5) e evitando o Xtrap (funcional em 32 e 64 bits)
Spoiler
1a. Faça o Download aqui (Blue Eye Macro - CNET Download.com)
1b. Instale com um nome diferente de pasta (ex.: C:\Program Files (x86)\AAA)
1c. Execute o programa (com o aika fechado) (sempre execute o programa como administrador).
1d. Vá em General/Settings/Input/ e clique em instalar (para instalar o driver). Feito isso reinicie o COMPUTADOR (SE JÁ TIVER INSTALADO PULE ESTA ETAPA)
1e. Abra novamente o programa, e vá em General/Settings/Input/ e SELECIONE os DOIS Virtual drivers, mude para aba Screen e DESMARQUE Enable DirectX. Salva e fecha o programa.
1f. Abra o Aika e quando carregar a tela de login, execute o B.E.M. Aguarde até a detecção do Xtrap e feche tudo.
1g. Renomeie a pasta que está instalado o B.E.M. para qualquer outro nome do tamanho ou letras que desejar (Ex.: de AAA para ATPWEO)
1h. Abra novamente o programa, e vá em General/Settings/Input/ e SELECIONE os DOIS Virtual drivers, mude para aba Screen e DESMARQUE Enable DirectX. Salve e feche o programa.
1i. Abra o Aika e quando carregar a tela de login, execute o B.E.M. PORÉM DESTA VEZ NÃO SERÁ DETECTADO. Logue e vá para pesca.
1j. Sempre que for abrir novamente o B.E.M. repita os passos 1f/1g/1h/1i
Código
Spoiler
begin
Macro.Wait for current global loop execution time to exceed("417")
Mouse.Click at coordinate("586", "386", "left")
Macro.Wait for current global loop execution time to exceed("553")
Mouse.Click at coordinate("586", "386", "left")
Macro.Wait for current global loop execution time to exceed("553")
Mouse.Click at coordinate("586", "386", "left")
Macro.Wait for current global loop execution time to exceed("1259")
Mouse.Move to coordinate("511", "618")
Macro.Wait for current global loop execution time to exceed("3423")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("3499")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("4766")
Mouse.Move to coordinate("525", "643")
Macro.Wait for current global loop execution time to exceed("5335")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("5412")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("6103")
Mouse.Move to coordinate("507", "746")
Macro.Wait for current global loop execution time to exceed("7023")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("7501")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("7963")
Mouse.Move to coordinate("519", "617")
Macro.Wait for current global loop execution time to exceed("8169")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("8318")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("8580")
Mouse.Click at coordinate("586", "386", "left")
Macro.Wait for current global loop execution time to exceed("8953")
Mouse.Click at coordinate("586", "386", "left")
Macro.Wait for current global loop execution time to exceed("9100")
Mouse.Click at coordinate("586", "386", "left")
Macro.Wait for current global loop execution time to exceed("10400")
Mouse.Move to coordinate("511", "618")
Macro.Wait for current global loop execution time to exceed("10623")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("10899")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("11066")
Mouse.Move to coordinate("534", "619")
Macro.Wait for current global loop execution time to exceed("11299")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("11499")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("12799")
Mouse.Move to coordinate("507", "746")
Macro.Wait for current global loop execution time to exceed("13799")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("14099")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("15499")
Mouse.Move to coordinate("518", "617")
Macro.Wait for current global loop execution time to exceed("15899")
Mouse.Hold button("left")
Macro.Wait for current global loop execution time to exceed("16899")
Mouse.Release button("left")
Macro.Wait for current global loop execution time to exceed("17199")
Mouse.Move to coordinate("586", "386")
end
Obrigado ao Vampiro para compartilha como abri o BEM com XTRAP aberto.