Botón Asistente Juego Script Legend 3G

¿Cuántos segundos? La configuración de tu máquina no está mal.

He escrito sobre la tecla colgada antes. El principio es usar el estado de vez en cuando.

Ahora cámbialo Ahora, cambia a presionar CTRL+alt después de un período de tiempo

dim temp,RunTime,TimeNow,interval

interval=10

//Establezca el intervalo de tiempo, aquí establezca 10 segundos

TimeNow = CDate(CStr(Hour(Now))+":"+CStr(Minute(Now))+":" +CStr(Second(Now)))

//Obtener la hora actual

RunTime=DateAdd("s",interval,TimeNow)

// Obtenga el tiempo para ejecutar Ctrl+ALT

Rem start

Retraso 50

TimeNow = CDate(CStr(Hour(Now))+":"+CStr (Minute(Now))+":"+CStr( Second(Now)))

temp= DateDiff("s",TimeNow,RunTime)

//Obtener cuántos quedan segundos para el tiempo de ejecución

If temp<1

Gosub ch

EndIf

delay 50

Ir a inicio

//Bucle

Sub canal

KeyDown 17,1

//Presione Ctrl

KeyPress 18,1

/ /El valor clave correspondiente de ALT es 18, si tab debe ser 9, CTRL es 17, solo presiónelo una vez en un ciclo

KeyUp 17 ,1

//Soltar Ctrl

RunTime=DateAdd("s",interval,TimeNow)

Regresar

//= =============== ========

No sé de qué sirve presionar Ctrl+alt.

Solo sé que usas ALt+TAB para cambiar de ventana

------------------

//Lo siguiente es el código para presionar ALT+TAB cada 10 segundos

dim temp ,RunTime,TimeNow,interval

intervalo=10

TimeNow = CDate(CStr(Hora (Ahora))+":"+CStr(Minuto(Ahora))+":" +CStr(Segundo(Ahora)))

RunTime=DateAdd("s",interval,TimeNow)

Inicio remoto

Retraso 10

TiempoAhora = CDate(CStr(Hora(Ahora))+":"+CStr(Minuto(Ahora))+":" +CStr(Segundo(Ahora)))

temp= DateDiff( "s",TimeNow,RunTime)

Si temp<1

Gosub ch

EndIf

Retraso 50

Ir a inicio

Sub canal

KeyDown 18,1

KeyPress 9,1

KeyUp 18,1

RunTime=FechaAgregar

("s",interval,TimeNow)

Regresar

Nota: La prueba pasó en mi máquina (presione automáticamente ALT+TAB una vez cada 10 segundos para cambiar de ventana)

El asistente de botones que uso es la versión oficial 6.10.