Bueno como siempre trabajando con autoit para vosotros
con nuestros tutoriales únicos en HS4L
Este tutorial aprenderemos:
Primero que es un While?
Un while es un bucle que repite un conjunto de instrucciones
Si desea repetir las instrucciones un número fijo de veces ejemplo el For
Ejemplo de un While
Ahora usare estas funciones al juego.
[You must be registered and logged in to see this image.]
ire completando mas el tutorial dudas por comentarios
con nuestros tutoriales únicos en HS4L
Este tutorial aprenderemos:
- Dominar el while
- Dominar el Readmemory y entenderlo Descargar el readmemory abajo al final
- Dejar de spamear una función y spamearla hala vez.
Primero que es un While?
Un while es un bucle que repite un conjunto de instrucciones
Si desea repetir las instrucciones un número fijo de veces ejemplo el For
Ejemplo de un While
- Code:
Func msgbox()
While (1000) ;repite la instrucción cada 1 segundo.
msgbox(0,"","")
ExitLoop ;Pausa el While
Wend
EndFunc
Ahora usare estas funciones al juego.
- Code:
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <NomadMemory.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 328, 131, 192, 124)
$Input1 = GUICtrlCreateInput("Valor...", 72, 48, 185, 21)
$Label1 = GUICtrlCreateLabel("Hotkey Enter", 80, 88, 66, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
Dim $read = _MemoryRead(0x0227D748,_MEMORYOPEN(ProcessExists("S4Client.exe")),"char[255]")
if $read = "value_max" Then ;Detecta value_max
GUICtrlSetData($Input1, $read)
ExitLoop ;Pausa el While 1 para permitir cerrar el Programa
ElseIf $read = "value_max1" Then
GUICtrlSetData($Input1, $read)
ExitLoop ;Pausa el While 1 para permitir cerrar el Programa
else
MsgBox(64,"HS4L","No detecta el valor...")
ExitLoop ;Pausa el While 1 para evitar 100 msgbox de golpe xD!
EndIf
Wend
EndFunc
Func HS4LRead()
While 1
Dim $read = _MemoryRead(0x0227D748,_MEMORYOPEN(ProcessExists("S4Client.exe")),"char[255]")
GUICtrlSetData($Input1, $read) ;Lee el valor del Address es ...
msgbox(0,"","")
ExitLoop ;Pausa el While 1 para permitir cerrar el programa
Wend
EndFunc
[You must be registered and logged in to see this image.]
ire completando mas el tutorial dudas por comentarios
- Attachments