Something like this
Code: Select all
If %Window% = %Not same Window%
~b::fileappend, %Title% %time% b, %A_ScriptDir%\folder\lol.txt
if %Window% = %Same Window%
~b::fileappend, b, %A_ScriptDir%\folder\lol.txt
Code: Select all
If %Window% = %Not same Window%
~b::fileappend, %Title% %time% b, %A_ScriptDir%\folder\lol.txt
if %Window% = %Same Window%
~b::fileappend, b, %A_ScriptDir%\folder\lol.txt
Code: Select all
lastWindow := 0
Loop {
thisWindow := WinActive()
if (thisWindow != lastWindow){
soundbeep
lastWindow := thisWindow
}
Sleep 100
Code: Select all
#SingleInstance Force
#NoTrayIcon
lastWindow := 0
SendMode, Input
FormatTime, time, h:m:s tt
WinGetTitle, Title, A
thisWindow := WinActive()
~a::
if (thisWindow != lastWindow)
{
fileappend, `na`n, %A_ScriptDir%\folder\lol.txt
lastWindow := thisWindow
}
else
{
fileappend, %Title% %time% `na`n, %A_ScriptDir%\folder\lol.txt
lastWindow := thisWindow
MsgBox, %lastWindow%
}
return
Code: Select all
~a::
thisWindow := WinActive()
if (thisWindow != lastWindow)
Code: Select all
#SingleInstance Force
#NoTrayIcon
lastWindow := 0
SendMode, Input
FormatTime, time, h:m:s tt
WinGetTitle, Title, A
~a::
thisWindow := WinActive()
if (thisWindow != lastWindow)
{
fileappend, `na`n, %A_ScriptDir%\folder\lol.txt
lastWindow := thisWindow
}
else
{
fileappend, %Title% %time% `na`n, %A_ScriptDir%\folder\lol.txt
lastWindow := thisWindow
}
return
Code: Select all
else
{
fileappend, %Title% %time% `na`n, %A_ScriptDir%\folder\lol.txt
lastWindow := thisWindow ; <-- Pointless
}
Code: Select all
str := ""
if (thisWindow != lastWindow){
str := Title " " time "`n"
}
fileappend, %str%a`n, %A_ScriptDir%\folder\lol.txt
Code: Select all
#SingleInstance Force
#NoTrayIcon
lastWindow := 0
SendMode, Input
~a::
FormatTime, time, h:m:s tt
WinGetTitle, Title, A
thisWindow := WinActive()
str := ""
if (thisWindow != lastWindow) {
str := Title " " time "`n"
fileappend, %str%a`n, %A_ScriptDir%\folder\lol.txt
}
else
{
fileappend, %str%a`n, %A_ScriptDir%\folder\lol.txt
lastWindow := thisWindow
MsgBox, %thisWindow%
}
return
Code: Select all
#SingleInstance Force
#NoTrayIcon
lastWindow := 0
SendMode, Input
~a::
FormatTime, time, h:m:s tt
WinGetTitle, Title, A
thisWindow := WinActive()
str := ""
if (thisWindow != lastWindow) {
str := Title " " time "`n"
lastWindow := thisWindow
}
fileappend, %str%a`n, %A_ScriptDir%\folder\lol.txt
return
Users browsing this forum: Chunjee, Google [Bot] and 127 guests