Beiträge von peethebee

Gleiches bei mir...
Könnte sein, dass Gun-Food gerade daran arbeitet (ist sogar wahrscheinlich). Oder beim Einbau eines Hack ist was schief gegangen, das glaube ich aber eher nicht.

peethebee

Danke!

peethebee

p.s. admin : Kommst du mal wieder im ICQ online?

Tut gut das Lob, danke!

peethebee

I was there... anywhere!

Alternative (ungetestet, weiß nicht, ob nicht-Admins hin können): http://www.mywbb.info/board/thread.php?threadid=102306

peethebee

Hallo!

Versuch mal, es trotzdem zu kompilieren (Continue). Vermutlich ist dein SciTE (CheckAu3) nicht aktuell genug, um die neuen Beta-Funktionen zu kennen.

Ein weiterer Link zum Thema:
http://www.autoitscript.com/forum/index.php?showtopic=21268

peethebee

Hi gTaSpIdEr!

Wieso nutzt du bei meinem Nick eigentlich so inflationär Großbuchstaben?
In meiner Version ist da keine drin... (siehe Signatur)...

peethebee :admin:

Hallo!

Das mit der HIlfsvariable habe ich dann auch gemerkt, aber wenn neuer Rechner da ist, dann ist mir das wurscht
Ich denke, unsere beiden Kommentare sollten zusammen reichen *g*.

peethebee

Hallo!

Also, ich mach es mal:
die While-Schleife ist eine Endlosschleife. Das verhindert, dass das Skript sich beendet, weil es unten angekommen ist. Auf diesem Weg kann das Skript auf GUI-Nachrichten reagieren.
Diese Nachrichten werden mit GUIGetMsg() in die Variable $msg geholt.
Der Select...Case...[Case...]EndSelect-Block wertet diese Variable aus und tut verschiedene Dinge abhängig von dem Wert der Nachricht. Wird ein Button geklickt, hat die $msg die Button-ID, die GUICTRLCreateButton.
Statt diesem Select, könnte man auch If..Then..ElseIf...usw. verwenden. Wäre verständlicher, aber etwas länger.
Was mir auch nicht klar ist, ist, warum gtaspider eine HIlfsvariable $VolLevel einführt. Das scheint mir überflüssig zu sein...

Teil 2 der Erklärungen, diesmal direkt im Skript von gta, das ich leicht angepasst und nicht getestet habe:

; Hier werden Konstanten eingebunden, mit denen man häufige Nachrichten-IDs von Windows als sprechende Variable abgreifen kann
#include <GUIConstants.au3>
; Variable für das Speichern des letzten Slider-Wertes vorbelegen
Global $Vol_alt = 100
; GUI-Aufbau (zunächst das Fenster mit Titel, Größe und Position
GUICreate("Slidertest", 166, 62, 193, 126)
; Die ID des Sliders wird in $Volume gespeichert
$Volume = GUICtrlCreateSlider(10, 10, 150, 45)
; der Slider wird auf den Wert 100 gesetzt:
GUICtrlSetData($Volume, 100)
; Die GUI wird angezeigt (nicht vergessen!)
GUISetState(@SW_SHOW)


; hier beginnt die oben angesprochenen Endlosschleife
While 1
; Hier holt man die Nachrichten-ID von Windows in die Variable $msg
	$msg = GUIGetMsg()
; Beginn der Select-Anweisung
	Select
; "Für den Fall, dass $msg (Nachrichten-ID) gleich der Zahl $GUI_EVENT_CLOSE ist, tue folgendes:
		Case $msg = $GUI_EVENT_CLOSE 
; Raus aus der Schleife (While-Endlosschleife) -> Programm ist ganz unten -> wird beendet
			ExitLoop
; In allen anderen Fällen tue folgendes:
		Case Else
; Wenn der ausgelesene Wert aus dem Slider anders ist als der Wert des Sliders bei der letzten Änderung (Im Klartext: Slider wurde verschoben), dann ...
			If GUICtrlRead($Volume) <> $Vol_alt Then
; ... setze die Lautstärke auf den Wert, den der Slider hat und...
                                SoundSetWaveVolume(GUICtrlRead($Volume))
; ... speichere die jetzige Sliderposition als alte Position
                                $Vol_alt = GUICtrlRead($Volume)
                        EndIf
; Abschluss der Select-Anweisung
	EndSelect
; Ende der While-Schleife		
WEnd

So weit erst mal, bei weiteren Fragen einfach melden,
peethebee

Hallo!

Es gibt zahlreiche Kommandozielen-MD5-Programme, die man mit AUtoIt ganz einfach ansprechen kann. Einfach mal ein bisschen danach googlen. Berim Einbau können wir dann helfen, hängt aber davon ab, wie das Programm sich verhält.

peethebee

Hallo!

Um das ZUVOR aktive Fenster zu aktivieren, müsstest du vermutlich ständig alle Fenstertitel mitloggen.
Denn WinActivate("") ist wirkungslos, glaube ich.

peethebee

Hi

Ich versteh nicht genau, was du machen willst. Aber um eine Liste zu füllen und später festzustellen, welcher Eintrag angeklickt wurde sollten 2 Möglichkeiten zum Ziel führen.
Die "klassische" Methode ist, die IDs in einem Array zu speichern, sodass man dieses einfach durchgehen kann und mit der ID des geklickten Controls vergleichen kann (dazu gibt es ein Makro, das ich gerade nicht auswendig weß).
Die andere Methode wären UDF, die zu vielen Controls in der Beta-Version mitgeliefert werden. Die Feunktionsnamen beginnen mit "_" und dem Namen des Controls. Vielleicht hilft dir da eine davon weiter.

peethtebee

Hallo!

Du könntest 2 Skripte machen, eines, das lauscht und eines, das den Befhl zum Starten sendet...

peethebee

Hallo!

Meine Variante:

While 1
	MouseMove(Random(1, 700, 1), Random(1, 700, 1))
	Sleep(15000)
WEnd

peethebee

Willkommen rabbit!

Dann haben wir ja einen weiteren langjährigen Experten in unseren Reihen. Wäre schön, wenn du auch ab und zu Zeit finden würdest, den Usern hier zu helfen!
Deine Meinung über AutoIt teile ich natürlich.

peethebee

mit

Func maennlichPressed()
  ; Reaktionen des Skriptes
EndFunc

peethebee

Hallo!

Kann natürlich sein, dass dein

WinWaitActive("FreePDF XP 3.04","Frame2")

nicht funktioniert, z.B. weil das Fenster nicht aktiv wird.
Versuche es mit WinWait, WinActivate und WinSAitActive direkt nacheinander.
Ansonsten zum Klicken selbst ginge noch z.B. ControlClick.

peethebee

Auf jeden Fall brauchst du eine Endlosschleife, also mach die doch schon mal unten rein:

While 1
  Sleep(100)
WEnd

pethebee

Hallo!

Das Skript einfach mal ausführen. Dann wählt man die Ecken des Bereiches, der gescannt werden soll. Wenn sich darin was ändert, dann spielt der PC eine kurze Melodie über den Speaker aus. Man könnte auch eine MP3- oder WAV-Datei abspielen.

ToolTip("ChangeAlarm gestartet." & @CRLF & "Bitte Maus über linker oberer Scanecke positionieren!", 0, 0, "Los geht's!")
Sleep(10000)
$mouse1_x = MouseGetPos(0)
$mouse1_y = MouseGetPos(1)
ToolTip("Erste Koordinaten ausgelesen." & @CRLF & "Bitte Maus über rechter unterer Scanecke positionieren!", 0, 0, "Weiter geht's!")
Sleep(5000)
$mouse2_x = MouseGetPos(0)
$mouse2_y = MouseGetPos(1)


$sleep = InputBox("Wie lange warten?", "Bitte Zeit in Sekunden eingeben:", 10) * 1000
ToolTip("Scan beginnt.", 0, 0, "Ab geht's!")


$reference_cs = PixelChecksum($mouse1_x, $mouse1_y, $mouse2_x, $mouse2_y, 4)
Sleep(2000)
ToolTip("")


While 1
	Sleep($sleep)
	$new_cs = PixelChecksum($mouse1_x, $mouse1_y, $mouse2_x, $mouse2_y, 4)
	ToolTip($reference_cs & @CRLF & $new_cs, 0, 0)
	If $new_cs <> $reference_cs Then 
		Beep(250, 1000)
		Beep(500, 500)
		Beep(750, 500)
		Beep(1000, 1500)
	EndIf
WEnd

Feedback natürlich erwünscht. Wenn es fertig ist, kommt es auch in die DB.

peethebee

Bittes sehr. Das kenne ich leider auch :D.
Aber in diesem Fall ist AutoIt wie fast alle anderen Programmiersprachen, d.h. es ist schön angenehm.

peethebee