[Hilfe]

06/24/2010 17:37 Killermufin#1
hallo elitepvpers ahbe ein kleines prob.
PHP Code:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("PickupBot by Zuck", 279, 200, 211, 372)
$taste = GUICtrlCreateInput("y oder ^", 152, 48, 105, 21)
$Start = GUICtrlCreateButton("Start (F10)", 24, 40, 105, 33, $WS_GROUP)
$Exit = GUICtrlCreateButton("Beenden (F9)", 24, 120, 107, 33, $WS_GROUP)
$Stop = GUICtrlCreateButton("Stop (F11)", 24, 80, 107, 33, $WS_GROUP)
$Group1 = GUICtrlCreateGroup("Tasten", 16, 24, 129, 153)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$timeinms = GUICtrlCreateInput("100", 152, 128, 105, 21)
$Pick = GUICtrlCreateLabel("PickUp Taste:", 152, 24, 72, 17)
$Time = GUICtrlCreateLabel("Zeit zwischen den Picks", 152, 104, 119, 17)
$Info = GUICtrlCreateButton("Info", 200, 176, 73, 17, $WS_GROUP)
$hi   = GUICtrlCreateButton("Info", 70, 176, 73, 17, $WS_GROUP)
GUISetState(@SW_SHOW)
GUICreate("BildTest", 507, 397, 192, 124)
;erstellt ein GUI indem man das Bild sehen soll
$Button1 = GUICtrlCreateButton("Elitepvpers",  507, 397, 192, 124)
;Erstellt einen Button
GUICtrlSetBkColor(-1, 0x008080)
;Farbe des Buttons
GUICtrlSetCursor (-1, 0)
;Finger als Cursor
GUICtrlCreatePic(@ScriptDir & "\yang.jpg", 0, 0, 505, 393, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
;GUICtrlCreatePic ist der GUIbefehl für ein Bild. Mit @ScriptDir drückst du aus, dass das Bild in dem Ordner ist indem auch der Script bzw. nachher die .exe ist.
GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###


HotKeySet("{F10}", "_Start")
HotKeySet("{F11}", "_Stop")
HotKeySet("{F9}", "_Beenden")
  
Func _Beenden()
Exit
EndFunc ;==>_Beenden

Func _Stop()
While 1
Sleep(60000)
WEnd
EndFunc ;==>_Stop
Func _Start()
Sleep(1500)
While 1
$PickUp = GUICtrlRead($taste)
Send($PickUp)
$Time = GUICtrlRead($timeinms)
Sleep($Time)
WEnd
EndFunc ;==>_Start

Func 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Start
_Start ()
Case $Stop
_Stop ()
Case $Exit
_Beenden ()
Case $Info
_Info ()
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $Button1
ShellExecute("http://www.elitepvpers.com")


EndSwitch
WEnd 
i-wie willes es nicht fungsen....
P.S. bin neu mit programmiere
06/24/2010 17:45 omer36#2
erklär mir mal warum du hier und hier: [Only registered and activated users can see links. Click Here To Register...]
das selbe postest? das ist mit Autoit geschrieben, also kannst du es im Autoit forum lassen...

und dein script sieht so drucheinander aus.. sag mal erst was das sein soll... blick da irgentwie so garnciht durch o.O
06/24/2010 18:27 bladerofdarknes#3
2 mal switch drinn und nur ein endswitch, außerdem wirkt alles leicht gequetscht, arbeite mit etwas mehr raum mal hier mal da eine leerzeile wäre super ;)
Quote:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("PickupBot by Zuck", 279, 200, 211, 372)
$taste = GUICtrlCreateInput("y oder ^", 152, 48, 105, 21)
$Start = GUICtrlCreateButton("Start (F10)", 24, 40, 105, 33, $WS_GROUP)
$Exit = GUICtrlCreateButton("Beenden (F9)", 24, 120, 107, 33, $WS_GROUP)
$Stop = GUICtrlCreateButton("Stop (F11)", 24, 80, 107, 33, $WS_GROUP)
$Group1 = GUICtrlCreateGroup("Tasten", 16, 24, 129, 153)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$timeinms = GUICtrlCreateInput("100", 152, 128, 105, 21)
$Pick = GUICtrlCreateLabel("PickUp Taste:", 152, 24, 72, 17)
$Time = GUICtrlCreateLabel("Zeit zwischen den Picks", 152, 104, 119, 17)
$Info = GUICtrlCreateButton("Info", 200, 176, 73, 17, $WS_GROUP)
$hi = GUICtrlCreateButton("Info", 70, 176, 73, 17, $WS_GROUP)
GUISetState(@SW_SHOW)

$Button1 = GUICtrlCreateButton("Elitepvpers", 507, 397, 192, 124)
;Erstellt einen Button
GUICtrlSetBkColor(-1, 0x008080)
;Farbe des Buttons
GUICtrlSetCursor (-1, 0)
;Finger als Cursor
GUICtrlCreatePic(@ScriptDir & "\yang.jpg", 0, 0, 505, 393, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
;GUICtrlCreatePic ist der GUIbefehl für ein Bild. Mit @ScriptDir drückst du aus, dass das Bild in dem Ordner ist indem auch der Script bzw. nachher die .exe ist.
GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###


HotKeySet("{F10}", "_Start")
HotKeySet("{F11}", "_Stop")
HotKeySet("{F9}", "_Beenden")

Func _Beenden()
Exit
EndFunc ;==>_Beenden

Func _Stop()
While 1
Sleep(60000)
WEnd
EndFunc ;==>_Stop

Func _Start()
Sleep(1500)
While 1
$PickUp = GUICtrlRead($taste)
Send($PickUp)
$Time = GUICtrlRead($timeinms)
Sleep($Time)
WEnd
EndFunc ;==>_Start

While 2
$nMsg = GUIGetMsg()
Switch $nMsg
Case $Start
_Start ()
Case $Stop
_Stop ()
Case $Exit
_Beenden ()
Case $Info
_Info ()


Case $GUI_EVENT_CLOSE
Exit

Case $Button1
ShellExecute("http://www.elitepvpers.com")


EndSwitch
WEnd
und statt shellexecute hättest du auch #include <ie.au3> _iecreate("www.elitepvpers.com") nehmen können sieht i-wie schöner aus :P
06/24/2010 19:28 Killermufin#4
mein prob war eig das er das bild net anzeigen wollte ^^ aber thx
06/24/2010 21:00 Smincke2#5
Mach einfach das BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS) weg dan gehts