Bot para last chaos

Participa en el tema Bot para last chaos en el foro Juegos de Pc.
hola soy de nuevo yo oscar quiero orto favor me puedes mandar el programa para ...6

Buscar en este tema:

Búsqueda avanzada

Ir al primer mensaje no leído

< 1 2 3 4 5 6

quenosenote escribió hace 4 meses

#1 Bot para last chaos

Mostrar el primer mensaje completo
desconectado
- 2
  
  MENSAJES
eldjoscar escribió hace 25 días ¿Mensaje inapropiado?

#51 Re: Bot para last chaos

hola soy de nuevo yo oscar quiero orto favor me puedes mandar el programa para extraer las cordenadas de los colores me urge el color amarillo atte oscar ojala me respondas en la brevedad posible

Responder

Citar

Me gusta este mensaje

desconectado

1

MENSAJES

maxilp33 escribió hace 20 días ¿Mensaje inapropiado?

#52 Re: Vamos desde cero...

Originalmente publicado por quenosenote

Aca chicos les posteo los tres scripts

BOT PARA LEVEAR EN PROCYON CON HECHICERO:

Código:

Opt("PixelCoordMode",2)
Opt("MouseCoordMode",2)


;F1: Ataque (lo tienes que sacar del menu de acciones ALT + A
;F2: Piel de Piedra o Escudo Divino (no esta preparado para escudo divino aun)
;F3: Agarrar objeros Mascota, conviene que sea siempre la mascota la que los recoja, si no queres que el jugador se mueva
;F4: Descansar en caso de poca energia... funciona pero no esta perfeccionado (problema con los mobs activos)
;F5: En Caso de poca energia es mejor colocar una buena posion aqui... para evitar una muerte jajaj 
;F6: SIN FUNCION
;F7: SIN FUNCION
;F8: SIN FUNCION
;F9: Hojas Azules
;F10: Piedas Shain
;F12: Mascota

WinWaitActive("LastChaos - Gamigo (Window 800x600)")
Global $Paused, $counter = 0
HotKeySet("{PAUSE}", "TogglePause")

Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('El control automatico ha entrado en modo de espera = presione pausa para continuar"',0,0)
    WEnd
    ToolTip("")
EndFunc

HotKeySet ("{ESC}","Quit")
Func Quit()
Exit
EndFunc

$Control = 0x3E1616 ; color del estado del mob... evita que busque mientas esta pegando
$Target = 0x5B9600 ;Verde
$Target2 = 0xC5C1C5 ;Blanco
$Target3 = 0x0089AA ;Azul
$Click = "Right"
$Su = 50
$In = 150
$Iz = 680
$De = 430

; piel de piedra "0x867FAF"

; Escudo Divino "0xFEF97D"

While 1 = 1
    
ToolTip ("Control automatico ejecutandose...",0,0)
	
$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
If @error Then
	MouseClick("Right")
	Sleep(100)
	EndIf
	
$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
If @error Then
	$coord = PixelSearch($Su,$In,$Iz,$De,$Target,5,2)
	If @error Then
		Else
		$x = Random($coord[0], $coord[0]+50)
		$y = Random($coord[1], $coord[1]+50)
		MouseClick("Right", $x, $y, 2, 0)
		Send("{F1}")
		EndIf
		Else
		Send("{F1}")
	EndIf

$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
If @error Then
	MouseClick("Right")
	Sleep(100)
	EndIf

$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
	If @error Then
	$coord = PixelSearch($Su,$In,$Iz,$De,$Target2,5,2)
	If @error Then
		Else
		$x = Random($coord[0], $coord[0]+50)
		$y = Random($coord[1], $coord[1]+50)
		MouseClick("Right", $x, $y, 2, 0)
		Send("{F1}")
		EndIf
	Else
	Send("{F1}")
	EndIf

$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
If @error Then
	MouseClick("Right")
	Sleep(100)
	EndIf

$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
	If @error Then
	$coord = PixelSearch($Su,$In,$Iz,$De,$Target3,5,2)
	If @error Then
		Else
		$x = Random($coord[0], $coord[0]+50)
		$y = Random($coord[1], $coord[1]+50)
		MouseClick("Right", $x, $y, 2, 0)
		Send("{F1}")
		EndIf
	Else
	Send("{F1}")
EndIf

$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
If @error Then
	MouseClick("Right")
	Sleep(100)
	EndIf


$SearchResult = PixelSearch(182,33,182,33,"0xB32B00",5,1);BUSCA PV y toma posion
	If @error Then
		Send("{F5}") ;posion de emergencia COLCALA EN EL F5
		Sleep(1000)
	Else
	EndIf
	
	
$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
If @error Then
$SearchResult = PixelSearch(516,579,516,579,"0x334433",5,1);BUSCA Si el casillero de posiones esta vacio
		If @error Then
		Else
		Send("{F7}") ;Si no hay posion se translada a la ciudad
		Send("{PAUSE}")
		Sleep(100)
	EndIf
EndIf

$SearchResult = PixelSearch(277,2,428,23,"0x867FAF",5,1);ACA CHEQUEA SI SE TE ACABO EL PIEL DE PIEDRA (hechicero) O EL ESCUDO DIVINO (caballero)
	If @error Then
	Send("{F2}")
	Sleep(100)
	Else
	EndIf

$SearchResult = PixelSearch(394,76,394,76,"0xD8CE8A",5,1);Alimento Mascota (Piedras Shain)
	If @error Then
		$SearchResult = PixelSearch(391,45,391,45,"0xEEBB55",5,1)
		If @error Then 
		Else
		Send("{F11}")
		Sleep(3000)
		EndIf
	Else
	EndIf
	
	
	
$SearchResult = PixelSearch(395,64,395,64,"0xCC0000",5,1);Vida Mascota (Hojas Azules)
	If @error Then
		$SearchResult = PixelSearch(391,45,391,45,"0xEEBB55",5,1)
		If @error Then
		Else
		Send("{F10}")
		Sleep(1000)
		Send("{F12}")
		Sleep(2000)
		Send("{F12}")
		EndIf
	Else
	EndIf
	
$SearchResult = PixelSearch(694,578,694,578,"0x00EFA7",5,1); QUITA LA MASCOTA En caso de que no tengas hojas, si llego hasta ese nivel es porque no tienes.
	If @error Then
		$SearchResult = PixelSearch(391,45,391,45,"0xEEBB55",5,1)
		If @error Then
		Else
			Send("{F12}")
		EndIf	
	Else
	EndIf

Send("{F3}")

$SearchResult = PixelSearch(401,26,402,27,$Control,5,2)
If @error Then
	Send("{Right}")
EndIf
WEnd

BOT PARA LEVEAR EN PROCYON CON CLERIGA:
Quiero aclarar que la variante que hay entre estos dos codigos es la necesidad de tener que activar el disparos certeros o el escudo de mana uno tiene que seleccionarse. y es esto lo que hace este codigo, tambien lo que hace es curarse a uno mismo.

Código:

Opt("PixelCoordMode",2)
Opt("MouseCoordMode",2)


;F1: Ataque (lo tienes que sacar del menu de acciones ALT + A
;F2: DISPAROS CERTEROS
;F3: Agarrar objeros Mascota, conviene que sea siempre la mascota la que los recoja, si no queres que el jugador se mueva
;F4: Descansar en caso de poca energia... funciona pero no esta perfeccionado (problema con los mobs activos)
;F5: CURACION
;F6: SIN FUNCION
;F7: ESCUDO DE MANA
;F8: SIN FUNCION
;F9: Hojas Azules
;F10: Piedas Shain
;F12: Mascota

WinWaitActive("LastChaos - Gamigo (Window 800x600)")
Global $Paused, $counter = 0
HotKeySet("{PAUSE}", "TogglePause")

Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('El control automatico ha entrado en modo de espera = presione pausa para continuar"',0,0)
    WEnd
    ToolTip("")
EndFunc

HotKeySet ("{ESC}","Quit")
Func Quit()
Exit
EndFunc

$Control = 0x3E1C11 ; color del estado del mob... evita que busque mientas esta pegando
$Target = 0x5B9600 ;Verde
$Target2 = 0xC5C1C5 ;Blanco
$Target3 = 0xD7A700 ;amarillo
$Click = "Right"
$Su = 50
$In = 150
$Iz = 680
$De = 430

While 1 = 1
    
ToolTip ("Control automatico ejecutandose...",0,0)
	
$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
If @error Then
	MouseClick("Right")
	Sleep(100)
	EndIf
	
$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
If @error Then
	$coord = PixelSearch($Su,$In,$Iz,$De,$Target,5,2)
	If @error Then
		Else
		$x = Random($coord[0], $coord[0]+50)
		$y = Random($coord[1], $coord[1]+50)
		MouseClick("Right", $x, $y, 2, 0)
		Send("{F1}")
		EndIf
		Else
		Send("{F1}")
	EndIf

$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
If @error Then
	MouseClick("Right")
	Sleep(100)
	EndIf

$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
	If @error Then
	$coord = PixelSearch($Su,$In,$Iz,$De,$Target2,5,2)
	If @error Then
		Else
		$x = Random($coord[0], $coord[0]+50)
		$y = Random($coord[1], $coord[1]+50)
		MouseClick("Right", $x, $y, 2, 0)
		Send("{F1}")
		EndIf
	Else
	Send("{F1}")
	EndIf

$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
If @error Then
	MouseClick("Right")
	Sleep(100)
	EndIf

$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
	If @error Then
	$coord = PixelSearch($Su,$In,$Iz,$De,$Target3,5,2)
	If @error Then
		Else
		$x = Random($coord[0], $coord[0]+50)
		$y = Random($coord[1], $coord[1]+50)
		MouseClick("Right", $x, $y, 2, 0)
		Send("{F1}")
		EndIf
	Else
	Send("{F1}")
EndIf

$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
If @error Then
	MouseClick("Right")
	Sleep(100)
	EndIf


$SearchResult = PixelSearch(182,33,182,33,"0xB32B00",5,1);BUSCA PV y  Se cura
	If @error Then
		Send("{F5}") 
		Sleep(1000)
	Else
	EndIf
	
$SearchResult = PixelSearch(401,26,402,27,$Control,5,1)
If @error Then
$SearchResult = PixelSearch(516,579,516,579,"0x334433",5,1);BUSCA Si el casillero de posiones esta vacio
		If @error Then
		Else
		Send("{F7}") ;Si no hay posion se translada a la ciudad
		Send("{PAUSE}")
		Sleep(100)
	EndIf
EndIf


$SearchResult = PixelSearch(277,2,428,23,"0xFEC059",5,1);ACA CHEQUEA SI SE TE ACABO Disparos Certeros
	If @error Then
	MouseClick("Left", 38, 56, 2, 0)
	Send("{F2}")
	Sleep(100)
	Else
	EndIf
	
$SearchResult = PixelSearch(277,2,428,23,"0x94F195",5,1);ACA CHEQUEA SI SE TE ACABO Escudo de Mana
	If @error Then
	MouseClick("Left", 38, 56, 2, 0)
	Send("{F7}")
	Sleep(100)
	Else
	EndIf

$SearchResult = PixelSearch(394,76,394,76,"0xD8CE8A",5,1);Alimento Mascota (Piedras Shain)
	If @error Then
		$SearchResult = PixelSearch(391,45,391,45,"0xEEBB55",5,1)
		If @error Then 
		Else
		Send("{F11}")
		Sleep(3000)
		EndIf
	Else
	EndIf
	
	
	
$SearchResult = PixelSearch(395,64,395,64,"0xCC0000",5,1);Vida Mascota (Hojas Azules)
	If @error Then
		$SearchResult = PixelSearch(391,45,391,45,"0xEEBB55",5,1)
		If @error Then
		Else
		Send("{F10}")
		Sleep(1000)
		Send("{F12}")
		Sleep(2000)
		Send("{F12}")
		EndIf
	Else
	EndIf
	
$SearchResult = PixelSearch(694,578,694,578,"0x00EFA7",5,1); QUITA LA MASCOTA En caso de que no tengas hojas, si llego hasta ese nivel es porque no tienes.
	If @error Then
		$SearchResult = PixelSearch(391,45,391,45,"0xEEBB55",5,1)
		If @error Then
		Else
			Send("{F12}")
		EndIf	
	Else
	EndIf

Send("{F3}")

$SearchResult = PixelSearch(401,26,402,27,$Control,5,2)
If @error Then
	Send("{Right}")
EndIf
WEnd

Atte. Matias

hola amigo me podes explicar bien como usar el programa, es decir quiero que me digas como ago para aser todo lo que decis
-----Agregado el 8/11/2009 a las 06 : 49 : 06-----
amigo a donde tengo que poner esos codogos disculpa que sea mmolesto pero no entiendo nada

Editado por maxilp33 - 08.11.2009 06:49 hs. | Motivo: Mensajes unidos automáticamente

Responder

Citar

Me gusta este mensaje

desconectado
- 35
  
  MENSAJES
quenosenote escribió hace 18 días ¿Mensaje inapropiado?

#53 Re: Bot para last chaos

hey chicos, tienen que bajarse el autoit de la pagina oficial. luego o bien bajan el archivo comprimido, o copian este codigo en el editor que vienen en el paquete de autoit.

para obtener los colores, tienen que usar el autoit window info. lean el posteo que esta explicado paso a paso como obtener el color.

atte. matias

Responder

Citar

Me gusta este mensaje
desconectado
- 1
  
  MENSAJES
kachobo escribió hace 15 días ¿Mensaje inapropiado?

#54 Re: Bot para last chaos

lo intento con el hechicero y no funciona

Responder

Citar

Me gusta este mensaje
desconectado
- 1
  
  MENSAJES
peketronick escribió hace 12 días ¿Mensaje inapropiado?

#55 Re: Bot para last chaos

holas, a mi me urgia para hacer ph en procicon con ladrona.me harias un gran favor si me lo explicas

Responder

Citar

Me gusta este mensaje
desconectado
- 1
  
  MENSAJES
SHADOWHUNTER_X6 escribió hace 10 días ¿Mensaje inapropiado?

#56 Re: Bot para last chaos

hola me podrias hacer un bot para titan pa poder hacer ph en procyon o lvlar mi pet porfas un saludo

Responder

Citar

Me gusta este mensaje
desconectado
- 1
  
  MENSAJES
chepapo escribió hace 4 días ¿Mensaje inapropiado?

#57 Re: Bot para last chaos

mmm ya instale el autoit y descargue los codigos para el bot pero no ocurre nada, no se mi personaje nada, lo unico que aparece es lo de control automatico activado y en modo de espera mi mono no se mueve

Responder

Citar

Me gusta este mensaje
desconectado
- 7,132
  
  MENSAJES
Sadie escribió ayer ¿Mensaje inapropiado?

#58 Re: Bot para last chaos

Junten Sp en Prokion y lvleen en Tumba.
Cheaters.

Responder

Citar

Me gusta este mensaje

< 1 2 3 4 5 6

Estás en: Inicio >> Foros

« Tema anterior | Siguiente tema »

Relacionados
Populares
Usuarios Destacados

Estadísticas del tema

57 RESPUESTAS
12993 VISTAS
28 USUARIOS RESPONDIERON

Ir arriba

Bot para last chaos

Participa en el tema Bot para last chaos en el foro Juegos de Pc. hola soy de nuevo yo oscar quiero orto favor me puedes mandar el programa para ...6

Participa en el tema Bot para last chaos en el foro Juegos de Pc.
hola soy de nuevo yo oscar quiero orto favor me puedes mandar el programa para ...6