|
You last visited: Today at 03:09
Advertisement
[Hilfe]
Discussion on [Hilfe] within the AutoIt forum part of the Coders Den category.
06/24/2010, 17:37
|
#1
|
elite*gold: 0
Join Date: Apr 2010
Posts: 98
Received Thanks: 16
|
[Hilfe]
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
|
#2
|
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
|
erklär mir mal warum du hier und hier: 
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
|
#3
|
elite*gold: 0
Join Date: Mar 2008
Posts: 1,524
Received Thanks: 285
|
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
|
#4
|
elite*gold: 0
Join Date: Apr 2010
Posts: 98
Received Thanks: 16
|
mein prob war eig das er das bild net anzeigen wollte ^^ aber thx
|
|
|
06/24/2010, 21:00
|
#5
|
elite*gold: 0
Join Date: Jul 2009
Posts: 184
Received Thanks: 299
|
Mach einfach das BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS) weg dan gehts
|
|
|
Similar Threads
|
Hilfe Hilfe Pls Gucken Brauche Hilfe
04/04/2010 - Technical Support - 3 Replies
Ja wegen der Signatur sieht es euch ma an in pics
/http://img641.imageshack.us/img641/6070/unbenann t790kjkh.png
http://img444.imageshack.us/img444/6981/unbenannt kjhghzuijhbh.png
kann mir pls einer HELFEN...
|
HILFE HILFE HILFE MIT SjSro Startproblem
12/14/2009 - SRO Private Server - 4 Replies
Hi Leute hab ein Problem mit SjSro wenn ich auf starten klicke kommt diese Meldung Sorry.Failed to execute Silkroad. bitte helfen hab anti virus aus geht immer noch nicht wo liegt das problem
thx schon mal im voraus
BITTE HELFEN BITTE
WILL UMBEDINGT ZOCKEN!!
|
All times are GMT +1. The time now is 03:10.
|
|