Spoiler anzeigen
#Include <Array.au3>
Const $Name = "Hotkey-CopyAll"
Global $Paused, $Mute
;standard: lautlos
$Mute = Not $Mute
;Tastenkombinatio
HotKeySet("^q", "_SelectAllCopyAll")
HotKeySet("^!h", "_Help")
HotKeySet("^!m", "_ToggleMute")
HotKeySet("{PAUSE}", "_TogglePause")
;Hilfe für Bedienung bei Start anzeigen
;Call("_Help")
;;;; Hauptteil des Programms ;;;;
While 1
Sleep(100)
WEnd
;;;;;;;;
Exit
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Eigene Funktionen
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Func _Help()
Call("_ToolTipInfo","Tasten:" & Chr(10) & Chr(10) & "[Pause] - Pausiert das Programm" & Chr(10) & "[Strg]+[Alt]+[m] - Ton an/aus" & Chr(10) & "[Strg]+[q] - Alles Markieren und Kopieren" & Chr(10), 5000, $name & " - Bedienung")
EndFunc
Func _ToggleMute()
$Mute = Not $Mute
If Not $Mute Then
Call("_ToolTipInfo","Sound on", 1000)
Else
Call("_ToolTipInfo","Sound off", 1000)
EndIf
EndFunc
Func _ToolTipInfo( $text, $wait = 3000, $title="Info", $ico = 1 )
TrayTip( $title, StringAddCR($text), $wait, $ico )
EndFunc
Func _SelectAllCopyAll()
Local $ca, $ct ;array and text
Send("{CTRLDOWN}a{CTRLUP}") ;Select all
Send("{CTRLDOWN}c{CTRLUP}") ;Copy
;Sleep( 500 )
$ct = ClipGet()
$ca = StringRegExp( $ct, '\* \[(\d{1}:\d{1,3}?):\d{1,2}\]', 1 )
If (IsArray($ca)) Then
$ct = $ca[0]
;_ToolTipInfo($ct, 0, "Koordinate gefunden")
;_ToolTipInfo("hit!")
Else
$ct = False
EndIf
If Not $Mute Then Beep(500, 200)
[/autoit] [autoit][/autoit] [autoit]Return $ct
EndFunc
Func _TogglePause()
$Paused = NOT $Paused
Call("_ToolTipInfo", $name & ' ist pausiert! (Pause-Taste)', 30000)
While $Paused
sleep(100)
WEnd
EndFunc
Func _Terminate()
;Call("_ToolTipInfo", $name & ' wird beendet!')
Exit 0
EndFunc
Mein erstes AutoIt-Script - kein Hammer Teil aber es funzt. Ich danke den hilfreichen Tips aus der Shoutbox.
Da ich ungern zwei Tastenkombinationen nutze und das Tool creatureScan für OGame sich so leichter füttern lässt, hier dieses Script.
Wenn jemand einen eleganteren bzw. konformeren Weg kennt bin ich immer offen für eure Vorschläge.
Eine Funktion für das automatische Scannen des ganzen Universums bzw. der Stats ist freilich leicht zu ergänzen IMHO aber nicht von den Regeln der Betreiber abgedeckt.
*edit: Spoiler ausprobiert
*edit2: Satz3 präzisiert