Buenas a todos!
He hecho una macro para entrenar combate, con ella un amigo y yo hemos subido a los guerreros y nos ha ido bien, el unico problema es que a alguno de los dos se os vaya la conexion.
La macro cura al otro, limpia vendas cuando se acaban y cuando la vida baja de un limite que configuras tu, se aleja, se cura y vuelve al combate.
La parte que guarda las coordenadas del pilon la copie de una macro que creo que era de trokolo, espero que no le moleste
Usadla y me comentais que tal va
Código:;Macro combate por Haidey / Johnny Beretta ;Necesitamos: ;============ ;1.Estar al lado del pilon, a pie, paralelos a el, uno a la izquierda y otro a la derecha ; con espacio detras de cada uno para al menos dar un paso. ;2.IMPORTANTE comentar las dos lineas dependiendo de si te has puesto a la izquierda o a la derecha. ;2.Utilizar las vendas contra el otro para que pille el lastTarjet ;3.Encender la macro, pegarnos y listo. ;--------CONFIGURACION------------------------------ ;Limite de HP (cuando la vida baja de este valor, el pj se retira, se cura y vuelve) set %limite 50 ;Si eres el que esta a la izquierda comenta estas dos lineas ;set %pasoUno 3 ;set %pasoDos 7 ;Si eres el que esta a la derecha comenta estas dos lineas set %pasoUno 7 set %pasoDos 3 ;---------FIN CONFIGURACION-------------------------- ;Inicializando habilidades chooseskill heal real set %heal_ini #skill chooseskill parr real set %parr_ini #skill chooseskill swor real set %swor_ini #skill chooseskill tact real set %tact_ini #skill set %confp 1 configurar: if %confp = 1 { event sysmessage Pon el cursor sobre el pilon y pulsa ESC set %conf 1 set %confp 2 goto TESC } if %confp = 2 { set %conf 2 goto TESC } TESC: onHotKey ESC { if %conf = 1 { set %pilonx #CURSORX set %pilony #CURSORY goto configurar } if %conf = 2 { goto combate } } goto TESC ;----------------------------------------------------------------------- combate: if #HITS < %limite { goSub emergencia } goSub curarCompi if #HITS < 100 { gosub curarse } goSub limpiavendas goSub status goto combate ;----------------------------------------------------------------------- sub emergencia msg voy a curarme... que me matas $ event macro 5 %pasoUno event macro 5 %pasoUno wait 50 gosub curarse wait 50 event macro 5 %pasoDos wait 50 return sub curarse msg $.Vendas$ wait 20 event macro 23 0 if #SYSMSG = Te_aplicas_las_vendas_pero_fallas. { gosub curarse } wait 16s if #HITS < #MAXHITS { goSub curarse } return sub curarCompi msg $.Vendas$ wait 10 event macro 22 0 wait 6s return sub limpiavendas FINDITEM ZLF C_ , #BACKPACKID IF #FINDSTACK = 0 { msg me quede sin vendas $ findItem AMF C_ , #BACKPACKID set %oldtarjetid #LTARGETID set #LOBJECTID #FINDID event macro 17 0 msg limpiando vendas $ wait 1s click %pilonx %pilony set #LTARGETID %oldtarjetid } return sub status chooseskill heal real set %heal_gain #skill - %heal_ini chooseskill parr real set %parr_gain #skill - %parr_ini chooseskill swor real set %swor_gain #skill - %swor_ini chooseskill tact real set %tact_gain #skill - %tact_ini SetUoTitle He ganado : %heal_gain de Curar | %parr_gain de Escudo | %swor_gain de espada | %tact_gain de Tacticas return
Citar
Iniciado por Jack Bauer
