Red de conocimiento informático - Aprendizaje de código fuente - Botón Juego Script Legend 3G

Botón Juego Script Legend 3G

¿Cuantos segundos? Tu máquina está bien.

He escrito un script de pulsación de teclas antes y usé el estado de vez en cuando.

Ahora lo cambié a CTRL alt

dim temp, RunTime, TimeNow, intervalo

interval=10

/ en Aquí el el intervalo de tiempo se establece en 10 segundos

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

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

/Encontrar cuántos segundos faltan para la ejecución

Si templt; 1

Gosub ch

EndIf

retraso 50

Ir a inicio

//Loop

Sub canal

KeyDown 17, 1

//Presione Ctrl

KeyPress 18, 1

// Donde ALT es 18, Tab es 9, CTRL es 17 y solo puedes presionar una vez en el bucle

KeyUp 17, 1

// Soltar Ctrl

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

Volver

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

No No sé qué presionas Ctrl alt.

Solo sé que el cambio de ventana se realiza a través de ALt TAB

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

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

dim temp, RunTime, TimeNow, intervalo

intervalo=10

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

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

Inicio remoto

Retraso 10

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

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

Si templt 1

Gosub ch

EndIf

Retraso 50

Ir a inicio

Sub canal

KeyDown 18, 1

KeyPress 9 , 1

KeyUp 18, 1

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

Regresar

Nota: En my Probado en mi máquina (presione automáticamente la tecla ALT TAB una vez dentro de 10 segundos para cambiar la ventana)

Nota: Probado en mi máquina (presione automáticamente la tecla ALT TAB una vez dentro de 10 segundos para cambiar la ventana)

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