hola chicos, soy nuevo en el mundo de los script, les queria consultar algo.
alguno sabe hacer esto
que cuando aprete por ejemplo !A:: se lance un texto, pero no solo eso, que haya una lista y cada vez que aprete !a:: se lance el texto que sigue por ejemplo
!A::
Send, Hi,ho,hu,he,ja,je
Return
entonces apretó 1 vez y se lanza la primera palabra Hi, apretó denuevo se lanza ho, apretó denuevo hu, y asi sucesivamente.
solo quiero poner una lista grande y cada vez que se repita la secuencia de texto, ponga el texto que le sigue, no el texto completo.
si alguien sabe algo asi porfavor que me ayude, se agradece.
Lista de texto Topic is solved
Moderator: Flipeador
Re: Lista de texto Topic is solved
Hola, prueba este script:
Code: Select all
#Warn
#SingleInstance Force
Lista := [ "Texto #1"
, "Texto #2"
, "Texto #3" ]
Indice := 1
!a::
SendInput % "{raw}" . Lista[Indice]
if (Indice == Lista.Length())
Indice := 0 ; reiniciar ìndice
Indice++ ; incrementar ìndice en 1
return
Re: Lista de texto
me sirvió muchas gracias
Re: Lista de texto
Flipeador una duda, este mismo comando se puede hacer que la entrada de texto sea aleatoria?, y en que sesion de la documentacion puedo aprender mas del tema, me gustaria poder aprende, de antemano muchas gracias
Re: Lista de texto
Hola @Atamo, prueba esto:
Saludos,
burque505
Code: Select all
#Warn
#SingleInstance Force
Lista := [ "Yo soy aleatorio.`n"
, "Pues, ¡yo también soy aleatorio!`n"
, "Vaya, no me lo creo.`n" ]
Indice := 1
MaxIndice := Lista.Count()
;msgbox %MaxIndice%
!a::
Random, rand, 1, %MaxIndice%
SendInput % "{raw}" . Lista[rand]
return
Escape::ExitApp
burque505
Re: Lista de texto
send2notepad , 4* alt+a
Code: Select all
#warn
#SingleInstance Force
setworkingdir,%a_scriptdir%
;SetKeyDelay,20,25
i=0
pr=notepad.exe
sc=ahk_exe notepad.exe
IfWinNotExist,%sc%
{
Run, %pr%,,,pid2
WinWait,%sc%
}
IfWinNotActive ,%sc%,,WinActivate,%sc%
WinWaitActive,%sc%
txt=
(Ltrim join`r`n
Line1 aaa
Line2 bbb
Line3 ccccccc
Line4 dd
)
stringsplit,k,txt,`n
total:=k0
return
esc::exitapp
$!a::
i++
if (i>total)
return
d:= % k%i%
;controlsendraw,,%d%,ahk_pid %pid2%
sendinput, % "{raw}" . d
return
Re: Lista de texto
Gracias chicos son lo maximos <3
Who is online
Users browsing this forum: No registered users and 79 guests