Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include API.ahk
- #IfWinActive
- #UseHook
- #SingleInstance, Force
- GoSub,UpdateTrayTip
- Menu,Tray,NoStandard
- Menu,Tray,Add,Reset,F12
- Menu,Tray,Add,Exit,Exit
- OnExit,LogAndExit
- Menu, Tray, Icon, klick_counter.ico, , 1
- L=0
- M=0
- R=0
- LH=0
- MH=0
- RH=0
- ;----------------------------------------------------------------------------------------------
- ;------------------------------------------Overlay---------------------------------------------
- ;----------------------------------------------------------------------------------------------
- Updates:
- Gui, Add, Text,, Suche nach Updates...
- Gui, Add, Text,, Bitte Warten !
- Gui, Show
- Sleep, 3000
- Gui Destroy
- return
- ;----------------------------------------------------------------------------------------------
- ;----------------------------------------------------------------------------------------------
- ;----------------------------------------------------------------------------------------------
- Exit
- SetTimer, Recordtimer, 100
- ;------------------------------
- Recordtimer:
- If M > %MH%
- Loop, read,ini.txt
- {
- last_line:=A_LoopReadLine
- }
- IfInString,last_line, MH=
- {
- FileAppend, %MH%=%M%
- }
- return
- ;-------------------------------
- F12::
- L=0
- M=0
- R=0
- return
- F10::
- MsgBox Klick Counter Ergebnis:`n===============`nLinks Klicks: %L%`nMittle Klicks: %M%`nRechts
- Klicks: %R%`n===============`n`nDie Klicks werden in einer Textdatei gespeichert.`nDie Textdatei
- heißt "Klick History".`n`n===============`nÜbersicht:`n`nF10: Hauptmenü aufrufen`nF12:Counter
- fast Reset`n`n`n`n`n Copyright To5ch.
- MsgBox, 4,, Soll weiter gezählt werden ?
- IfMsgBox yes
- return
- IfMsgBox no
- msgbox Bis zum Nächsten mal :-)
- ExitApp
- return
- F11:
- Test := Textcreate("Arial", 9, true, false)
- TextSetPos(Test, 58, 525)
- TextSetColor(Test, 0xFFFFFFFF)
- Textshow(Test)
- return
- ~LButton::L++
- ~MButton::M++
- ~RButton::R++
- UpdateTrayTip:
- Menu,Tray,Tip,Made by To5ch`n=============`nF10: Hauptmenü`nF12: Counter Reset`n=============`n
- %L% Links Klicks`n%M% Mittle Klicks`n%R% Rechts Klicks
- SetTimer,UpdateTrayTip,50
- Return
- LogAndExit:
- FormatTime,T,,dd/MM/yyyy hh:mm:ss
- FileAppend,%T% %L% Links Klicks`, %M% Mittle Klicks`, %R% Rechts Klicks`n,Klick History.log
- Sleep, 1000
- FileAppend,======================================================================`n,Klick
- History.log
- Exit:
- ExitApp
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement