#include <GUIConstants.au3>
#include <String.au3>
Opt("TrayMenuMode", 1)
Dim $shift
$shift = 1
#Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Angelika\Eigene Dateien\ICQ\579014273\ReceivedFiles\305563696 Zacharja\Virtual Keyboard.kxf
Global $Form1 = GUICreate("Virtual Keyboard | Virtuelle Tastatur by  Elbolamier", 714, 372, 213, 299)
Global $Button1 = GUICtrlCreateButton("q", 56, 240, 25, 25, 0)
Global $Button2 = GUICtrlCreateButton("w", 88, 240, 25, 25, 0)
Global $Button3 = GUICtrlCreateButton("e", 120, 240, 25, 25, 0)
Global $Button4 = GUICtrlCreateButton("r", 152, 240, 25, 25, 0)
Global $Button5 = GUICtrlCreateButton("t", 184, 240, 25, 25, 0)
Global $Button6 = GUICtrlCreateButton("z", 216, 240, 25, 25, 0)
Global $Button7 = GUICtrlCreateButton("u", 248, 240, 25, 25, 0)
Global $Button8 = GUICtrlCreateButton("i", 280, 240, 25, 25, 0)
Global $Button9 = GUICtrlCreateButton("o", 312, 240, 25, 25, 0)
Global $Button10 = GUICtrlCreateButton("p", 344, 240, 25, 25, 0)
Global $Button11 = GUICtrlCreateButton("ü", 376, 240, 25, 25, 0)
Global $Button12 = GUICtrlCreateButton("a", 64, 272, 25, 25, 0)
Global $Button13 = GUICtrlCreateButton("s", 96, 272, 25, 25, 0)
Global $Button14 = GUICtrlCreateButton("d", 128, 272, 25, 25, 0)
Global $Button15 = GUICtrlCreateButton("f", 160, 272, 25, 25, 0)
Global $Button16 = GUICtrlCreateButton("g", 192, 272, 25, 25, 0)
Global $Button17 = GUICtrlCreateButton("h", 224, 272, 25, 25, 0)
Global $Button18 = GUICtrlCreateButton("j", 256, 272, 25, 25, 0)
Global $Button19 = GUICtrlCreateButton("k", 288, 272, 25, 25, 0)
Global $Button20 = GUICtrlCreateButton("l", 320, 272, 25, 25, 0)
Global $Button21 = GUICtrlCreateButton("ö", 352, 272, 25, 25, 0)
Global $Button22 = GUICtrlCreateButton("ä", 384, 272, 25, 25, 0)
Global $Button23 = GUICtrlCreateButton("y", 72, 304, 25, 25, 0)
Global $Button24 = GUICtrlCreateButton("x", 104, 304, 25, 25, 0)
Global $Button25 = GUICtrlCreateButton("c", 136, 304, 25, 25, 0)
Global $Button26 = GUICtrlCreateButton("v", 168, 304, 25, 25, 0)
Global $Button27 = GUICtrlCreateButton("n", 232, 304, 25, 25, 0)
Global $Button28 = GUICtrlCreateButton("b", 200, 304, 25, 25, 0)
Global $Button29 = GUICtrlCreateButton("m", 264, 304, 25, 25, 0)
Global $Button30 = GUICtrlCreateButton(",", 296, 304, 25, 25, 0)
Global $Button31 = GUICtrlCreateButton(".", 328, 304, 25, 25, 0)
Global $Button32 = GUICtrlCreateButton("-", 360, 304, 25, 25, 0)
Global $Button33 = GUICtrlCreateButton("ENTER", 448, 240, 57, 57, 0)
Global $Button34 = GUICtrlCreateButton("SHIFT", 392, 304, 113, 25, 0)
Global $Button35 = GUICtrlCreateButton("BACKSPACE", 424, 208, 81, 25, 0)
Global $Button36 = GUICtrlCreateButton("<", 40, 304, 25, 25, 0)
Global $Button37 = GUICtrlCreateButton("SFT", 8, 304, 25, 25, 0)
Global $Button38 = GUICtrlCreateButton("CAPS", 8, 272, 49, 25, 0)
Global $Button39 = GUICtrlCreateButton("TAB", 8, 240, 41, 25, 0)
Global $Button40 = GUICtrlCreateButton("^", 8, 208, 25, 25, 0)
Global $Button41 = GUICtrlCreateButton("1", 40, 208, 25, 25, 0)
Global $Button42 = GUICtrlCreateButton("2", 72, 208, 25, 25, 0)
Global $Button43 = GUICtrlCreateButton("3", 104, 208, 25, 25, 0)
Global $Button44 = GUICtrlCreateButton("4", 136, 208, 25, 25, 0)
Global $Button45 = GUICtrlCreateButton("5", 168, 208, 25, 25, 0)
Global $Button46 = GUICtrlCreateButton("6", 200, 208, 25, 25, 0)
Global $Button47 = GUICtrlCreateButton("7", 232, 208, 25, 25, 0)
Global $Button48 = GUICtrlCreateButton("8", 264, 208, 25, 25, 0)
Global $Button49 = GUICtrlCreateButton("9", 296, 208, 25, 25, 0)
Global $Button50 = GUICtrlCreateButton("0", 328, 208, 25, 25, 0)
Global $Button51 = GUICtrlCreateButton("ß", 360, 208, 25, 25, 0)
Global $Button52 = GUICtrlCreateButton("+", 408, 240, 25, 25, 0)
Global $Button53 = GUICtrlCreateButton("#", 416, 272, 25, 25, 0)
Global $Button54 = GUICtrlCreateButton("´", 392, 208, 25, 25, 0)
Global $Button55 = GUICtrlCreateButton("STRG", 8, 336, 65, 25, 0)
Global $Button56 = GUICtrlCreateButton("ALT", 80, 336, 65, 25, 0)
Global $Button57 = GUICtrlCreateButton("STRG", 432, 336, 73, 25, 0)
Global $Button58 = GUICtrlCreateButton("ALT GR", 352, 336, 73, 25, 0)
Global $Button59 = GUICtrlCreateButton("SPACE", 152, 336, 193, 25, 0)
Global $Button60 = GUICtrlCreateButton("ESC", 8, 168, 25, 25, 0)
Global $Button61 = GUICtrlCreateButton("F1", 64, 168, 25, 25, 0)
Global $Button62 = GUICtrlCreateButton("F2", 96, 168, 25, 25, 0)
Global $Button63 = GUICtrlCreateButton("F3", 128, 168, 25, 25, 0)
Global $Button64 = GUICtrlCreateButton("F4", 160, 168, 25, 25, 0)
Global $Button65 = GUICtrlCreateButton("F5", 224, 168, 25, 25, 0)
Global $Button66 = GUICtrlCreateButton("F6", 256, 168, 25, 25, 0)
Global $Button67 = GUICtrlCreateButton("F7", 288, 168, 25, 25, 0)
Global $Button68 = GUICtrlCreateButton("F8", 320, 168, 25, 25, 0)
Global $Button69 = GUICtrlCreateButton("F9", 384, 168, 25, 25, 0)
Global $Button70 = GUICtrlCreateButton("F10", 416, 168, 25, 25, 0)
Global $Button71 = GUICtrlCreateButton("F11", 448, 168, 25, 25, 0)
Global $Button72 = GUICtrlCreateButton("F12", 480, 168, 25, 25, 0)
Global $Button73 = GUICtrlCreateButton("INS", 520, 208, 25, 25, 0)
Global $Button74 = GUICtrlCreateButton("DEL", 520, 240, 25, 25, 0)
Global $Button75 = GUICtrlCreateButton("END", 520, 272, 25, 25, 0)
Global $Button76 = GUICtrlCreateButton("/", 592, 208, 25, 25, 0)
Global $Button77 = GUICtrlCreateButton("*", 624, 208, 25, 25, 0)
Global $Button78 = GUICtrlCreateButton("-", 656, 208, 25, 25, 0)
Global $Button79 = GUICtrlCreateButton("+", 656, 240, 25, 49, 0)
Global $Button80 = GUICtrlCreateButton("7", 560, 240, 25, 25, 0)
Global $Button81 = GUICtrlCreateButton("8", 592, 240, 25, 25, 0)
Global $Button82 = GUICtrlCreateButton("9", 624, 240, 25, 25, 0)
Global $Button83 = GUICtrlCreateButton("6", 624, 272, 25, 25, 0)
Global $Button84 = GUICtrlCreateButton("5", 592, 272, 25, 25, 0)
Global $Button85 = GUICtrlCreateButton("4", 560, 272, 25, 25, 0)
Global $Button86 = GUICtrlCreateButton("1", 560, 304, 25, 25, 0)
Global $Button87 = GUICtrlCreateButton("2", 592, 304, 25, 25, 0)
Global $Button88 = GUICtrlCreateButton("3", 624, 304, 25, 25, 0)
Global $Button89 = GUICtrlCreateButton(",", 624, 336, 25, 25, 0)
Global $Button90 = GUICtrlCreateButton("0", 560, 336, 57, 25, 0)
Global $Button91 = GUICtrlCreateButton("ENTER", 656, 304, 49, 57, 0)
Global $Button92 = GUICtrlCreateButton("Homepage", 8, 136, 81, 25, 0)
Global $Button93 = GUICtrlCreateButton("Rechner", 96, 136, 81, 25, 0)
Global $Button94 = GUICtrlCreateButton("Editor", 184, 136, 81, 25, 0)
Global $Button95 = GUICtrlCreateButton("CMD", 272, 136, 81, 25, 0)
Global $Button96 = GUICtrlCreateButton("Herunterfahren", 360, 136, 81, 25, 0)
Global $Button97 = GUICtrlCreateButton("Schließen", 624, 136, 81, 25, 0)
Global $Button98 = GUICtrlCreateButton("Neustarten", 448, 136, 83, 25, 0)
Global $Button99 = GUICtrlCreateButton("Standby", 536, 136, 81, 25, 0)
$Edit = GUICtrlCreateEdit("", 16, 16, 673, 97)

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
   ;Buchstaben
 		    Case $Button1
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "q")
			Case $Button2
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "w")
			Case $Button3
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "e")
			Case $Button4
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "r")
     		Case $Button5
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "t")
			Case $Button6
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "z")
			Case $Button7
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "u")
			Case $Button8
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "i")
			Case $Button9
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "o")
			Case $Button10
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "p")
			Case $Button11
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "ü")
			Case $Button12
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "a")
			Case $Button13
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "s")
			Case $Button14
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "d")
			Case $Button15
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "f")
			Case $Button16
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "g")
			Case $Button17
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "h")
			Case $Button18
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "j")
			Case $Button19
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "k")
			Case $Button20
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "l")
			Case $Button21
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "ö")
			Case $Button22
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "ä")
			Case $Button23
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "y")
			Case $Button24
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "x")
			Case $Button25
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "c")
			Case $Button26
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "v")
			Case $Button27
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "n")
			Case $Button28
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "b")
			Case $Button29
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & "m")
			;Buchstaben befehle
		Case $Button33
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & @CRLF)
		Case $Button35	
			GUICtrlSetData ($Edit,StringTrimRight(GUICtrlRead($Edit),1))
		Case $Button59
			GUICtrlSetData ($Edit,GUICtrlRead($Edit) & " ")
		Case $Button34
			If $shift = 1 Then
				$shift = 0
			GUICtrlSetData ($Button1, "Q")
			GUICtrlSetData ($Button2,"W")
			GUICtrlSetData ($Button3, "E")
			GUICtrlSetData ($Button4,"R")
			GUICtrlSetData ($Button5, "T")
			GUICtrlSetData ($Button6,"Z")
			GUICtrlSetData ($Button7, "U")
			GUICtrlSetData ($Button8,"I")
			GUICtrlSetData ($Button9, "O")
			GUICtrlSetData ($Button10,"P")
			GUICtrlSetData ($Button11, "Ü")
			GUICtrlSetData ($Button12,"A")
			GUICtrlSetData ($Button13, "S")
			GUICtrlSetData ($Button14,"D")
			GUICtrlSetData ($Button15,"F")
			GUICtrlSetData ($Button16,"G")
			GUICtrlSetData ($Button17, "H")
			GUICtrlSetData ($Button18 ,"J")
			GUICtrlSetData ($Button19, "K")
			GUICtrlSetData ($Button20,"L")
			GUICtrlSetData ($Button21, "Ö")
			GUICtrlSetData ($Button22,"Ä")
			GUICtrlSetData ($Button23, "Y")
			GUICtrlSetData ($Button24,"X")
			GUICtrlSetData ($Button25, "C")
			GUICtrlSetData ($Button26,"V")
			GUICtrlSetData ($Button27, "N")
			GUICtrlSetData ($Button28,"B")
			GUICtrlSetData ($Button29,"M")
		    Else
			GUICtrlSetData ($Button1,"q")
			GUICtrlSetData ($Button2,"w")
			GUICtrlSetData ($Button3,"e")
			GUICtrlSetData ($Button4,"r")
			GUICtrlSetData ($Button5,"t")
			GUICtrlSetData ($Button6,"z")
			GUICtrlSetData ($Button7,"u")
			GUICtrlSetData ($Button8,"i")
			GUICtrlSetData ($Button9,"o")
			GUICtrlSetData ($Button10,"p")
			GUICtrlSetData ($Button11,"a")
			GUICtrlSetData ($Button12,"s")
			GUICtrlSetData ($Button13,"d")
			GUICtrlSetData ($Button14,"f")
			GUICtrlSetData ($Button15,"g")
			GUICtrlSetData ($Button16,"h")
			GUICtrlSetData ($Button17,"j")
			GUICtrlSetData ($Button18,"k")
			GUICtrlSetData ($Button19,"l")
			GUICtrlSetData ($Button20,"ö")
			GUICtrlSetData ($Button21,"ä")
			GUICtrlSetData ($Button22,"y")
			GUICtrlSetData ($Button23,"x")
			GUICtrlSetData ($Button24,"c")
			GUICtrlSetData ($Button26,"v")
			GUICtrlSetData ($Button25,"n")
			GUICtrlSetData ($Button27,"b")
			GUICtrlSetData ($Button28,"m")
         EndIf

			
	EndSwitch
WEnd