Beiträge von Timo264

Timo264

1. Funktionsnamen dürfen nicht mit einer Zahl anfangen

dein problem ist das er zwar in die funktion spring die funktion auch ausführt, dann aber weiter im skript geht

gibt mehre ansätze die du jetzt verfolgen kannst.

eine pause funktion:

Spoiler anzeigen

[autoit]

HotKeySet("{Pause}","_pause")
Global $pause = False

[/autoit] [autoit][/autoit] [autoit]

Func _pause()
$pause = Not $pause
While $pause
Sleep(10)
WEnd
EndFunc

[/autoit]

oder eine abfrage von einer Variablen, die mit deiner Stop Funktion setzt und diese dann überprüfst.
Ist definitv nicht die schönste variante!

Spoiler anzeigen

[autoit]

HotKeySet("{Pause}","Stop")
Global $Stop = False

[/autoit] [autoit][/autoit] [autoit]

Func Stop()
$Stop = true
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func _2teFunktion()
$Stop = False
MouseClick("left",$x1,$y3,1,$s)
if $Stop then Return
MouseClick("left",$x2,$y3,1,$s)
if $Stop then Return
EndFunc

[/autoit]

ansonsten fällt mir da auch nichts ein

Timo264

hab nun das SDK installiert und es funktioniert.
Könnte man vielleicht dazusagen

Hab schon einen Fehler gefunden, zumindest in deiner Demo.
Die mag rezising nämlich überhaupt nicht

Timo264

DirectX SDK wird benötigt?
Bei mir kommt ein fehler:"d3dx11d_43.dll" nicht gefunden

Timo264

warum machst du es nicht einfach per FTP?

Timo264

[autoit]

$Timer = TimerInit()
$timertoggle = False
While 1
If TimerDiff($Timer) >= 1200000 and $timertoggle = False Then
$timertoggle = not $timertoggle
Send("!^") $Timer = TimerInit()
EndIf
If TimerDiff($Timer) >= 300000 and $timertoggle = True
Then $timertoggle = not $timertoggle
Send("!^") $Timer = TimerInit()
EndIf
Sleep(300)
WEnd

[/autoit]

deinem system zur liebe

keine einrückung, da hier getippt

Timo264

ich möchte das ja aber in meiner gui haben.
also embedded.

wenns nicht geht, dann mach ichs einfach wie bisher

Timo264

warum machst du geschwungene klammern?

[autoit]

ControlSend("[CLASS:DeSmuME]", "", "", "x")

[/autoit]

so sollte es klappen

Timo264

pos ist ein array

[autoit]

if $pos[0]=$pos2[0] and $pos[1]=$pos2[1] then
Mouseclick("left")

[/autoit]

Timo264

hi,
danke für die hilfe.
das hab ich mir auch schonmal angeguckt, aber das ist auch nicht das was ich wirklich will.
das wäre auch nur ein workaround.
am liebsten hätte ich eine art console in meiner GUI.
zumindest irgendwas an das ist streamen kann.

Timo264

Hi,
ich würde gerne die Consolwrite Funktion an eine Editbox umlenken.
(Muss nicht unbedingt eine Editbox sein, aber sollte in meiner GUI implementiert sein)

Es geht um folgendes:

[autoit]

Func _log($string,$CRLF=1)
$string = GUICtrlRead($E_Log)&$string
for $i = 0 to $CRLF-1
$string = $string&@CRLF
Next
GUICtrlSetData($E_Log,$string)
for $i = 0 to $CRLF
_GUICtrlEdit_Scroll($E_Log, $__EDITCONSTANT_SB_PAGEDOWN)
Next
EndFunc

[/autoit]

und um mir das ganze Gewurschtel mit GuiCtrlRead() zu ersparen würde ich gerne den STDOUT stream an mein edit senden.

Timo264

vielen dank ich hab es auch mit bitand probiert, hab auch gemerkt das immer nur 80 bei GUICtrlGetState rausgekommen ist
aber jetzt klappts
vielen dank

Timo264

ich möchte etwas nur ausführen, wenn ein input feld nicht den focus hat

[autoit]

if $ispeed GUICtrlGetState($ispeed) <> $GUI_FOCUS then GUICtrlSetData($ispeed,$was[0])

[/autoit]

und ich weiss nicht warum es nicht geht.

Timo264

und ich hab solange gesucht
vielen dank für die schnelle antwort
und das mit der klammer ist hier im forum dazugekommen

Timo264

Timo264

ich schnipple schon länger an einem script rum.
das hat auch bisher immer alles wunderbar geklappt aber jetzt hab ich ne GUI hinzugefügt
und seitdem funktionieren die Hotkeys, die immer funktioniert haben, ohne das ich was an denen geändert hab nicht mehr.

Spoiler anzeigen

[autoit]

[#include <GUIConstants.au3>

[/autoit] [autoit][/autoit] [autoit]

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 353, 177, 192, 121)
$LSplash = GUICtrlCreateLabel("Splash", 24, 32, 44, 17)
$LMana = GUICtrlCreateLabel("Mana", 128, 128, 39, 17)
$LHealth = GUICtrlCreateLabel("Health", 40, 128, 43, 17)
$ISplash = GUICtrlCreateInput("4", 80, 32, 33, 21)
$IMana = GUICtrlCreateInput("5", 184, 128, 33, 21)
$IHealth = GUICtrlCreateInput("3", 88, 128, 33, 21)
$BSetup = GUICtrlCreateButton("Setup Set", 248, 120, 75, 25, 0)
$GSplash = GUICtrlCreateGroup("", 16, 8, 113, 81)
$RSplash = GUICtrlCreateRadio("Splash", 24, 8, 57, 17)
$RFocus = GUICtrlCreateRadio("Focus", 152, 8, 49, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$GFocus = GUICtrlCreateGroup("", 144, 8, 121, 81)
$LFocus = GUICtrlCreateLabel("Focus", 152, 32, 41, 17)
$LMysterious = GUICtrlCreateLabel("Mysterious", 152, 56, 62, 17)
$IFocus = GUICtrlCreateInput("2", 216, 32, 33, 21)
$IMysterious = GUICtrlCreateInput("3", 216, 56, 33, 21)

[/autoit] [autoit][/autoit] [autoit]

GUICtrlCreateGroup("", -99, -99, 1, 1)
$GAllgemein = GUICtrlCreateGroup("Allgemein", 16, 104, 225, 57)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)

[/autoit] [autoit][/autoit] [autoit]

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

[/autoit] [autoit][/autoit] [autoit]

While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
Exit

Case $Msg = $BSetup
If $RSplash And BitAND(GUICtrlRead($RSplash), $GUI_CHECKED) = $GUI_CHECKED then
$Funktion = "splash"
$s = GUICtrlRead($ISplash)
$m = GUICtrlRead($IMana)
$h = GUICtrlRead($IHealth)
GUISetState(@SW_HIDE)

ElseIf $RFocus And BitAND(GUICtrlRead($RFocus), $GUI_CHECKED) = $GUI_CHECKED then
$Funktion = "focus"
$f = GUICtrlRead($IFocus)
$my = GUICtrlRead($IMysterious)
$m = GUICtrlRead($IMana)
$h = GUICtrlRead($IHealth)
GUISetState(@SW_HIDE)

Else
MsgBox (0, "Info:", "Nur Autopot wurde gewählt")
$m = GUICtrlRead($IMana)
$h = GUICtrlRead($IHealth)
GUISetState(@SW_HIDE)
EndIf
EndSelect
WEnd

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Global $Paused
HotKeySet("+d", "Funktion")
HotKeySet("+s", "Terminate")

[/autoit] [autoit][/autoit] [autoit]

While 1
Sleep(100)
WEnd

[/autoit] [autoit][/autoit] [autoit]

Func Funktion ()
If $Funktion = "splash" then
Call ("splash")
ElseIf $Funktion = "focus" Then
Call ("focus")
Else
Call ("autopot")
EndIf
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func splash()
$Paused = 1
Call("splash1")
Call("autopot")
EndFunc

Func focus()
$Paused = 1
Call ("focus1")
Call ("autopot")
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func splash1()
Do
Send($s)
Sleep (100)
Until $Paused = 0
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func autopot()
Do
sleep (200)
$tod = PixelGetColor (71, 55)
$mana = PixelGetColor ( 169, 62)
$health = PixelGetColor (150 , 55)
$healthcrit = PixelGetColor (80 , 55)
If $tod <>Dec("AA1122") Then
$Paused = 1
ElseIf $healthcrit <>Dec("AA1122") Then
Send ($h)
ElseIf $mana <> Dec("8899DD") Then
Send ($m)
ElseIF $health <> Dec("AA1122") Then
Send ($h)
EndIF
Until $Paused = 0
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func focus1()
Do
Send($my)
Send($f)
Sleep (2000)
$coord = PixelSearch(100,150,1150,900,0XFE01FE,10,40)
IF Not @error Then
MouseClick ("left", $coord[0],$coord[1])
Send($f)
EndIf
Sleep (2000)
$coord = PixelSearch(100,150,1150,900,0XFE01FE,10,40)
IF Not @error Then
MouseClick ("left", $coord[0],$coord[1])
sleep (100)
MouseClick ("right", $coord[0],$coord[1])
EndIf
Until $Paused = 0
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func Terminate()
$Paused = 0
EndFunc

[/autoit] [autoit][/autoit] [autoit][/autoit]

hat einer eine Idee?
sonstige anregungen sind natürlich auch wilkommen.

Danke schonmal im voraus
Timo264

Beiträge von Timo264

Laufende Funktion beenden

AutoItDrawObject ( Nachfolger von QuickDraw )

AutoItDrawObject ( Nachfolger von QuickDraw )

Webspace mit InetGet Ordner downlaoden + Inhalt?

Tastenkombination

Consolwrite an Editbox

Controlsend bei deSmuME

Befehl senden, wenn Mauszeiger still steht.

Consolwrite an Editbox

Consolwrite an Editbox

$GUI_Focus

$GUI_Focus

HotKey probleme

HotKey probleme