Bueno pues me encontrado esta macro tirada por ay en un post viejo pero la macro esta incompleta la e provado pero no compra bien los regs que le indica y tampoco se como va el tema para que deje los regs en casa bueno os dejo la macro y aver si entre todos podemos hacer que tire
Código:set %ns WZF ;nightshade set %gl KZF ;garlic set %bp KUF ;black pearl set %bm JUF ;blood moss set %gi JZF ;ginseng set %md MZF ;mandrake set %sf SZF ;sulfurus set %ss RZF ;spider silk set %cofre IFOGTPD ; id del cofre donde deja y coge los regentes set %comprarbp 1 ; poner a 0 si no quieres comprar este regente set %comprarbm 1 ; poner a 0 si no quieres comprar este regente set %comprargl 1 ; poner a 0 si no quieres comprar este regente set %comprargi 1 ; poner a 0 si no quieres comprar este regente set %comprarmd 1 ; poner a 0 si no quieres comprar este regente set %comprarns 1 ; poner a 0 si no quieres comprar este regente set %comprarsf 1 ; poner a 0 si no quieres comprar este regente set %comprarss 1 ; poner a 0 si no quieres comprar este regente initevents set %inicio 0 set %posruna 5 gosub librecall wait 10 gosub recalear msg antonio buy $ wait 1s gosub comprarmago msg allaard buy $ wait 1s gosub comprarmago set %posruna 6 gosub librecall wait 10 gosub recalear msg stacia buy $ wait 1s gosub compraralquimista set %posruna 7 gosub librecall wait 10 gosub recalear msg nigel buy $ wait 1s gosub comprarmago wait 10 msg briona buy $ wait 1s gosub compraralquimista set %posruna 8 gosub librecall wait 10 gosub recalear msg nathaniel buy $ wait 1s gosub compraralquimista set %posruna 9 gosub librecall wait 10 gosub recalear msg thorpe buy $ wait 1s gosub comprarmago msg iain buy $ wait 1s gosub comprarmago set %posruna 10 gosub librecall wait 10 gosub recalear msg danior buy $ wait 1s gosub comprarmago set %posruna 11 gosub librecall wait 10 gosub recalear msg ellery buy $ wait 1s gosub comprarmago set %posruna 12 gosub librecall wait 10 gosub recalear msg lionel buy $ wait 1s gosub comprarmago msg allen buy $ wait 1s gosub comprarmago wait 1s event macro 5 3 wait 1s event macro 5 3 wait 1s event macro 5 3 wait 1s msg canute buy $ wait 1s gosub comprarmago set %posruna 13 gosub librecall wait 10 gosub recalear msg velma buy $ wait 1s gosub comprarmago msg maris buy $ wait 1s gosub comprarmago msg crystal buy $ wait 1s gosub comprarmago set %posruna 14 gosub librecall wait 10 gosub recalear msg gana buy $ wait 1s gosub comprarmago set %posruna 15 gosub librecall wait 10 gosub recalear msg raoul buy $ wait 1s gosub comprarmago msg tobias buy $ wait 1s gosub compraralquimista set %posruna 16 gosub librecall wait 10 gosub recalear msg beck buy $ wait 1s gosub compraralquimista wait 1s event macro 5 5 wait 1s event macro 5 5 wait 1s event macro 5 5 wait 1s msg adem buy $ wait 1s gosub compraralquimista wait 1s set %posruna 2 gosub librecall wait 10 gosub recalear msg soterios buy $ wait 1s gosub comprarmago wait 1s msg melvin buy $ wait 1s gosub comprarmago wait 1s event macro 5 6 wait 1s event macro 5 6 wait 1s event macro 5 6 wait 1s msg farley buy $ wait 1s gosub comprarmago wait 1s set %posruna 3 gosub librecall wait 10 gosub recalear msg becca buy $ wait 1s gosub compraralquimista wait 1s msg bowman buy $ wait 1s gosub comprarmago set %posruna 4 gosub librecall wait 10 gosub recalear msg felix buy $ wait 1s gosub compraralquimista wait 1s event macro 5 5 wait 1s event macro 5 5 wait 1s event macro 5 5 wait 1s event macro 5 5 wait 1s msg bowman buy $ wait 1s gosub comprarmago set %inicio 1 gosub recallcasa sub recalear { set #LOBJECTID QVDNAQD event macro 17 wait 1s click %runex %runey wait 1s event macro 13 46 wait 11s event macro 13 46 msg .resend $ wait 10 return } sub comprarmago { if %comprarbp = 1 { wait 1s click 378 150 } if %comprarbm = 1 { wait 1s click 378 210 } if %comprargl = 1 { wait 1s click 378 270 } if %comprargi = 1 { wait 1s click 378 330 } if %comprarmd = 1 { wait 1s click 378 390 } if %comprarns = 1 { wait 1s click 378 450 } if %comprarsf = 1 { wait 1s click 400 540 wait 1s click 378 150 } if %comprarsf = 1 { wait 1s click 400 540 wait 1s click 378 210 } wait 1s click 600 535 wait 1s gosub compruebapeso wait 10 return } sub compraralquimista { if %comprarbp = 1 { wait 1s click 378 210 } if %comprarbm = 1 { wait 1s click 378 270 } if %comprargl = 1 { wait 1s click 378 330 } if %comprargi = 1 { wait 1s click 378 390 } if %comprarmd = 1 { wait 1s click 378 450 } if %comprarns = 1 { wait 1s click 400 540 wait 1s click 378 150 } if %comprarsf = 1 { wait 1s click 400 540 wait 1s click 378 210 } if %comprarsf = 1 { wait 1s click 400 540 wait 1s click 378 270 } wait 1s click 600 535 wait 1s gosub compruebapeso wait 10 return } sub compruebapeso { if #WEIGHT > 350 { gosub recallcasa } return } sub librecall { if %posruna < 9 { set %runex 130 if %posruna = 1 { set %y 0 } else { set %runea %posruna - 1 set %y 15 * %runea } set %runey 70 + %y } if %posruna > 8 { set %runex 290 if %posruna = 9 { set %y 0 } else { set %runea %posruna - 9 set %y 15 * %runea } set %runey 70 + %y } return } sub recallcasa { set %posruna 1 gosub librecall wait 10 gosub recalear wait 10 gosub dejarregs wait 1s gosub cogerregs if %inicio > 0 { msg Ronda realizada $ halt } return } sub cogerregs { wait 1s click 440 285 d wait 1s findItem %md C_ , %cofre event drag #FINDID wait 1s msg 45 $ click 1105 205 p wait 1s findItem %bp C_ , %cofre event drag #FINDID wait 1s msg 45 $ click 1105 205 p wait 1s findItem %bm C_ , %cofre event drag #FINDID wait 1s msg 45 $ click 1105 205 p wait 1s return } sub dejarregs { set %noregs 0 finditem %bp c_ , #BACKPACKID if #FINDSTACK = 0 { findItem %bm C_ , #BACKPACKID if #FINDSTACK = 0 { finditem %gl c_ , #BACKPACKID if #FINDSTACK = 0 { findItem %gi C_ , #BACKPACKID if #FINDSTACK = 0 { finditem %md c_ , #BACKPACKID if #FINDSTACK = 0 { findItem %ns C_ , #BACKPACKID if #FINDSTACK = 0 { finditem %sf c_ , #BACKPACKID if #FINDSTACK = 0 { findItem %ss C_ , #BACKPACKID if #FINDSTACK = 0 { set %noregs 1 } } } } } } } } if %noregs = 0 { event drag #FINDID wait 20 KEY ENTER wait 10 click 440 285 p gosub dejarregs } return }
Citar
