Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
Wo ist die 5??? Wo ist die 5???
You last visited: Today at 04:01

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement


Advertise with us!

Wo ist die 5???

Discussion on Wo ist die 5??? within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Jul 2009
Posts: 492
Received Thanks: 126
Question Wo ist die 5???

Hi

Habe einen Bot geschrieben, für Nostale.Teste den erst mit dem Editor.
So, Wenn ich 'Aufsammeln' Anhake drückt er immer die 5 statt den Buchstabe den man eingiebt...Find die % einfach ned bitte Helft mir

Code:
#include <GUIConstants.au3>
Global $Paused
$running = false
HotKeySet("{PAUSE}", "Pause")
$windowname = "Unbenannt - Editor"
#Region ### START Koda GUI section ### Form=C:\Users\brtheuer\Desktop\LevelFreak By Jan25051\Levelfreak Koda Projekt.kxf
$Levelfreak = GUICreate("LevelFreak By Jan25051", 462, 568, 274, 133)
$Aufsammel = GUICtrlCreateCheckbox("Aufsammeln", 8, 40, 105, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Angreifen = GUICtrlCreateCheckbox("Angreifen", 328, 40, 105, 33)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$AufSamTaste = GUICtrlCreateInput("Aufsammel Taste", 136, 48, 161, 21)
$Skilltaste1 = GUICtrlCreateCheckbox("Skill Auf Taste 1", 0, 272, 137, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Skilltaste2 = GUICtrlCreateCheckbox("Skill Auf Taste 2", 5, 310, 137, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$StartButton = GUICtrlCreateButton("Starten!!!", 128, 448, 185, 49, 0)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Skilltaste3 = GUICtrlCreateCheckbox("Skill Auf Taste 3", 6, 348, 137, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Skilltaste4 = GUICtrlCreateCheckbox("Skill Auf Taste 4", 2, 387, 137, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Aufsammelgrp = GUICtrlCreateGroup("Aufsammeln", 0, 24, 321, 65)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Skilleing1 = GUICtrlCreateInput("Wielange zwischen Drücken Warten (In Millisekunden)", 143, 273, 281, 21)
$Skilleing2 = GUICtrlCreateInput("Wielange zwischen Drücken Warten (In Millisekunden)", 147, 314, 281, 21)
$Skilleing3 = GUICtrlCreateInput("Wielange zwischen Drücken Warten (In Millisekunden)", 150, 349, 281, 21)
$Skilleing4 = GUICtrlCreateInput("Wielange zwischen Drücken Warten (In Millisekunden)", 149, 390, 281, 21)
$Skillgrp = GUICtrlCreateGroup("Skills Benutzen", 0, 248, 449, 177)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Stoppen = GUICtrlCreateButton("Stoppen", 128, 504, 185, 49, 0)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Schlafen = GUICtrlCreateCheckbox("Schlafen", 8, 128, 105, 49)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$WielangeLeveln = GUICtrlCreateInput("Wielange Leveln?", 136, 128, 289, 21)
$WielangeSchlafen = GUICtrlCreateInput("Wielange muss Geschlafen werden?", 136, 160, 289, 21)
$Schlafgrp = GUICtrlCreateGroup("Schlaf Option", 0, 104, 441, 89)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

Func Start()
	$running = NOT $running
EndFunc



Func Pause()
	$Paused = Not $Paused
        While $Paused
            Sleep(100)
        WEnd
    EndFunc



While 1
$nMsg = GUIGetMsg()
Switch $nMsg
	Case $GUI_EVENT_CLOSE

	Case $StartButton
		Start()
	Case $Stoppen
		 Pause()






EndSwitch

Angreifen()

Aufsammeln()

Skill1()

Skill2()

Skill3()

Skill4()

Schlafen()

WEnd

Func Angreifen()
	if BitAnd(GUICtrlRead($Angreifen), $GUI_CHECKED) THEN
				ControlSend($windowname, '', '', "{SPACE}")
				Sleep(350)
	Else
				;NIX TUN --> WEIL NICHT AUSGEWÄHLT
	EndIf
EndFunc

Func Aufsammeln()
	if BitAnd(GUICtrlRead($Aufsammel), $GUI_CHECKED) THEN
				ControlSend($windowname, '', '', $AufSamTaste)
				Sleep(1500)
	Else
				;NIX TUN --> WEIL NICHT AUSGEWÄHLT
	EndIf
EndFunc

Func Skill1()
	if BitAnd(GUICtrlRead($Skilltaste1), $GUI_CHECKED) THEN
				Sleep($Skilleing1)
				ControlSend($windowname, '', '', "1")
				
	Else
				;NIX TUN --> WEIL NICHT AUSGEWÄHLT
	EndIf
EndFunc

Func Skill2()
	if BitAnd(GUICtrlRead($Skilltaste2), $GUI_CHECKED) THEN
					Sleep($Skilleing2)
				ControlSend($windowname, '', '', "2")
			
	Else
				;NIX TUN --> WEIL NICHT AUSGEWÄHLT
	EndIf
EndFunc

Func Skill3()
	if BitAnd(GUICtrlRead($Skilltaste3), $GUI_CHECKED) THEN
				Sleep($Skilleing3)
				ControlSend($windowname, '', '', "3")
				
	Else
				;NIX TUN --> WEIL NICHT AUSGEWÄHLT
	EndIf
EndFunc

Func Skill4()
	if BitAnd(GUICtrlRead($Skilltaste4), $GUI_CHECKED) THEN
				Sleep($Skilleing4)
				ControlSend($windowname, '', '', "4")
				
	Else
				;NIX TUN --> WEIL NICHT AUSGEWÄHLT
	EndIf
EndFunc


Func Schlafen()
	if BitAnd(GUICtrlRead($Schlafen), $GUI_CHECKED) THEN
				Sleep($WielangeLeveln)
				ControlSend($windowname, '', '', "C")
				Sleep($WielangeSchlafen)
				ControlSend($windowname, '', '', "C")
	Else
				;NIX TUN --> WEIL NICHT AUSGEWÄHLT
	EndIf
EndFunc
Findet ihr die 5?

mfg WiiZocker
WiiZocker is offline  
Old 12/20/2009, 12:24   #2
 
elite*gold: 0
The Black Market: 1/0/3
Join Date: Oct 2009
Posts: 370
Received Thanks: 105
Habe jetzt auch alles Durchgeguckt aber finde die 5 auch nicht
UniSoul is offline  
Old 12/20/2009, 12:26   #3
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Jul 2009
Posts: 84
Received Thanks: 17
bei skilltaste 2 steht eine 5^^
faflkakfakfkkfpqrstuhhwa is offline  
Old 12/20/2009, 16:43   #4
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Jul 2009
Posts: 492
Received Thanks: 126
Suche die 5 bei Aufsammeln da wird die immer ausgegeben...

mfg
WiiZocker is offline  
Old 12/20/2009, 20:33   #5
 
elite*gold: 20
The Black Market: 11/0/0
Join Date: Feb 2007
Posts: 3,080
Received Thanks: 4,294
ControlSend($windowname, '', '', guictrlread($AufSamTaste))

hf
kknb is offline  
Thanks
1 User
Old 12/20/2009, 23:36   #6
 
| Moep |'s Avatar
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Apr 2008
Posts: 1,079
Received Thanks: 438
Here they are!!!
| Moep | is offline  
Thanks
5 Users
Old 12/21/2009, 12:31   #7
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Jul 2009
Posts: 492
Received Thanks: 126
kknb Thx jetzt funktionierts richtig Thx und xD da steht nicht hilfsbereit bei dir unterm bild^^ ich bin anderer meinung thx

mfg glücklicher wiizocker^^

soweit so gut(=.
Ich habe noch eine klitze kleine Frage an euch(;
(Dafür will ich jetzt nicht extra ein Thread aufmachen)

Unzwar habe ich ein Problem mit den sleep bei der schlaf funktion.
Wenn man den Haken bei schlafen setzt und auch die Zeiten eingiebt,
soll er ja bis zu der ersten zeit (Wielange Leveln) leveln dann die zeit sitzen,
und dann wieder weiterleveln aber er macht es nicht ganz so...

Er Levelt nicht am anfang sondern wartet die zeit bis er sich setzen soll.Dann sitzt er und steht nach einer weile wieder auf,drückt 1 oder 2 mal Leertaste und sitzt auch schon wieder hmmm...

Bitte Helft mir.

Hier nochmal der Code...

Code:
#include <GUIConstants.au3>
Global $Paused
$running = false
HotKeySet("{PAUSE}", "Pause")
$windowname = "Unbenannt - Editor"
#Region ### START Koda GUI section ### Form=C:\Users\brtheuer\Desktop\LevelFreak By Jan25051\Levelfreak Koda Projekt.kxf
$Levelfreak = GUICreate("LevelFreak By Jan25051", 462, 568, 274, 133)
$Aufsammel = GUICtrlCreateCheckbox("Aufsammeln", 8, 40, 105, 41)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Angreifen = GUICtrlCreateCheckbox("Angreifen", 328, 40, 105, 33)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$AufSamTaste = GUICtrlCreateInput("Aufsammel Taste", 136, 48, 161, 21)
$Skilltaste1 = GUICtrlCreateCheckbox("Skill Auf Taste 1", 0, 272, 137, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Skilltaste2 = GUICtrlCreateCheckbox("Skill Auf Taste 2", 5, 310, 137, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Starten = GUICtrlCreateCheckbox("Starten!!!", 160, 448, 97, 33)
GUICtrlSetFont(-1, 12, 800, 0, "Comic Sans MS")
$Skilltaste3 = GUICtrlCreateCheckbox("Skill Auf Taste 3", 6, 348, 137, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Skilltaste4 = GUICtrlCreateCheckbox("Skill Auf Taste 4", 2, 387, 137, 25)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$Aufsammelgrp = GUICtrlCreateGroup("Aufsammeln", 0, 24, 321, 65)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Skilleing1 = GUICtrlCreateInput("Wielange zwischen Drücken Warten (In Millisekunden)", 143, 273, 281, 21)
$Skilleing2 = GUICtrlCreateInput("Wielange zwischen Drücken Warten (In Millisekunden)", 147, 314, 281, 21)
$Skilleing3 = GUICtrlCreateInput("Wielange zwischen Drücken Warten (In Millisekunden)", 150, 349, 281, 21)
$Skilleing4 = GUICtrlCreateInput("Wielange zwischen Drücken Warten (In Millisekunden)", 149, 390, 281, 21)
$Skillgrp = GUICtrlCreateGroup("Skills Benutzen", 0, 248, 449, 177)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Schlafen = GUICtrlCreateCheckbox("Schlafen", 8, 128, 105, 49)
GUICtrlSetFont(-1, 10, 800, 0, "Comic Sans MS")
$WielangeLeveln = GUICtrlCreateInput("Wielange Leveln?", 136, 128, 289, 21)
$WielangeSchlafen = GUICtrlCreateInput("Wielange muss Geschlafen werden?", 136, 160, 289, 21)
$Schlafgrp = GUICtrlCreateGroup("Schlaf Option", 0, 104, 441, 89)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

Func Start()
	$running = NOT $running
EndFunc



Func Pause()
	$Paused = Not $Paused
        While $Paused
            Sleep(100)
        WEnd
    EndFunc



While 1
$nMsg = GUIGetMsg()
Switch $nMsg
	Case $GUI_EVENT_CLOSE

	Case $Starten
		Start()






EndSwitch

Angreifen()

Aufsammeln()

Skill1()

Skill2()

Skill3()

Skill4()

Schlafen()

WEnd

Func Angreifen()

	If BitAnd(GUICtrlRead($Starten), $GUI_CHECKED) Then
	if BitAnd(GUICtrlRead($Angreifen), $GUI_CHECKED) THEN

				ControlSend($windowname, '', '', "{SPACE}")
		Sleep(350)

	Else
				;NIX TUN --> WEIL NICHT AUSGEWÄHLT
			EndIf
		EndIf

EndFunc

Func Aufsammeln()
	If BitAnd(GUICtrlRead($Starten), $GUI_CHECKED) Then
	if BitAnd(GUICtrlRead($Aufsammel), $GUI_CHECKED) THEN
				ControlSend($windowname, '', '', guictrlread($AufSamTaste))
				Sleep(1000)
	Else
				;NIX TUN --> WEIL NICHT AUSGEWÄHLT
			EndIf
			EndIf
EndFunc

Func Skill1()
	If BitAnd(GUICtrlRead($Starten), $GUI_CHECKED) Then
	if BitAnd(GUICtrlRead($Skilltaste1), $GUI_CHECKED) THEN
				Sleep($Skilleing1)
				ControlSend($windowname, '', '', "1")

	Else
				;NIX TUN --> WEIL NICHT AUSGEWÄHLT
			EndIf
			EndIf
EndFunc

Func Skill2()
	If BitAnd(GUICtrlRead($Starten), $GUI_CHECKED) Then
	if BitAnd(GUICtrlRead($Skilltaste2), $GUI_CHECKED) THEN
					Sleep($Skilleing2)
				ControlSend($windowname, '', '', "2")

	Else
				;NIX TUN --> WEIL NICHT AUSGEWÄHLT
			EndIf
			EndIf
EndFunc

Func Skill3()
	If BitAnd(GUICtrlRead($Starten), $GUI_CHECKED) Then
	if BitAnd(GUICtrlRead($Skilltaste3), $GUI_CHECKED) THEN
				Sleep($Skilleing3)
				ControlSend($windowname, '', '', "3")

	Else
				;NIX TUN --> WEIL NICHT AUSGEWÄHLT
			EndIf
			EndIf
EndFunc

Func Skill4()
	If BitAnd(GUICtrlRead($Starten), $GUI_CHECKED) Then
	if BitAnd(GUICtrlRead($Skilltaste4), $GUI_CHECKED) THEN
				Sleep($Skilleing4)
				ControlSend($windowname, '', '', "4")

	Else
				;NIX TUN --> WEIL NICHT AUSGEWÄHLT
			EndIf
			EndIf
EndFunc


Func Schlafen()
	If BitAnd(GUICtrlRead($Starten), $GUI_CHECKED) Then
	if BitAnd(GUICtrlRead($Schlafen), $GUI_CHECKED) THEN



			Sleep(guictrlread($WielangeLeveln))
			ControlSend($windowname, '', '', "C")



			Sleep(guictrlread($WielangeSchlafen))
			ControlSend($windowname, '', '', "C")



	Else
				;NIX TUN --> WEIL NICHT AUSGEWÄHLT
			EndIf
			EndIf
		EndFunc
Fazit: er soll sleepen und leertaste drücken(=
Bitte helft mir(=
WiiZocker is offline  
Old 12/21/2009, 18:11   #8
 
| Moep |'s Avatar
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Apr 2008
Posts: 1,079
Received Thanks: 438
guck dir mal TimerInit und TimerDiff an. Damit kannst du die Zeit erfassen ohne das Script zu pausieren

Bsp:

Code:
$Timer = TimerInit ()
Do
	Send("{SPACE}")
	Sleep(1000)
Until TimerDiff($Timer) > 10000
| Moep | is offline  
Thanks
1 User
Old 12/21/2009, 19:53   #9
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Jul 2009
Posts: 492
Received Thanks: 126
Ich probiere das mal^^ Thx das du mir so viel hilfst
GIBST AUCH THX WENNS KLAPPT xD

Edit: Wo muss ich das einfügen? habs zwar ohne Probleme ausprobieren können aber er drückt entweder nicht schlafen taste oder lässt sich nicht starten und stoppen
WiiZocker is offline  
Old 12/21/2009, 21:58   #10
 
| Moep |'s Avatar
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Apr 2008
Posts: 1,079
Received Thanks: 438
Na überleg mal wie die timer demo von mir funktioniert.
Wenn du verstanden hast warum des funktioniert, dann kannst du es auch in dein script einbinden. Einfach nur c&p is nich...
| Moep | is offline  
Old 12/22/2009, 18:27   #11
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Jul 2009
Posts: 492
Received Thanks: 126
Hmm lol^^

Eingebaut hab ich es ja auch schon,nur das funktioniert nicht so wie es soll)=
Bitte zeig mir wie man das RICHTIGEinbaut.

bitte...
WiiZocker is offline  
Old 12/22/2009, 21:38   #12
 
Xereon's Avatar
 
elite*gold: 0
The Black Market: 3/1/0
Join Date: Apr 2009
Posts: 793
Received Thanks: 366
Quote:
Originally Posted by WiiZocker View Post
Hmm lol^^

Eingebaut hab ich es ja auch schon,nur das funktioniert nicht so wie es soll)=
Bitte zeig mir wie man das RICHTIGEinbaut.

bitte...
Bitte bitte bitte gebt mir mal 100$

Also mal ehrlich, wenn du an deine Probleme mit solch einer Einstellung ran gehts, wirst du nicht ehr weit kommen.

Ich geb dir einfach 3 Begriffe die dir helfen werden:
If,TimerDiff,TimerInit

Wenn du es immer noch nicht verstehts, wie man sowas einbaut, dann hast du noch nicht einmal die Grundlagen von AutoIT verstanden. -.-
Xereon is offline  
Old 12/22/2009, 23:18   #13
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Jul 2009
Posts: 492
Received Thanks: 126
^^
WiiZocker is offline  
Old 12/23/2009, 18:46   #14
 
Shadow992's Avatar
 
elite*gold: 77
The Black Market: 13/0/0
Join Date: May 2008
Posts: 5,430
Received Thanks: 5,878
Quote:
Originally Posted by Xereon View Post
Wenn du es immer noch nicht verstehts, wie man sowas einbaut, dann hast du noch nicht einmal die Grundlagen von AutoIT verstanden. -.-
Zu den Grundlagen gehört auch sich über irgendeine andere sehr bekannte Seite (GOOGLE!!!) informationen zu beschaffen und die in AutoIT beigelegte Hilfe-Datei zu benutzen ...

Manchen fehlen leider diese 2 Grundlagen und dann wird derjenige , der diese Grundlagen nicht beherrscht nie etwas "gescheites" und vorallem nützliches code können ...

Das wollen nur leider viele nicht verstehen ...
Shadow992 is offline  
Old 12/24/2009, 13:06   #15
 
elite*gold: 0
The Black Market: 0/0/0
Join Date: Jul 2009
Posts: 492
Received Thanks: 126
Meinste Wikepedia?
WiiZocker is offline  
Reply

Tags
autoit, hilfe, nostale, nostale bot, suchen

« .ini help >.< | [IDE] Alternative zu Scite »



All times are GMT +1. The time now is 04:05.

elitepvpers - play less, get more - Top

Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2025 elitepvpers All Rights Reserved.