Beiträge von Schnitzel

**Schnitzel**

Spoiler anzeigen

[autoit]

While 1 ; While Schleife Nr. 1
$x = 0 ; Laufvariable wird auf 0 gesetzt
While 1 ; While Schleife Nr. 2
MouseWheel("up", 500) ; Mausrad drehen
MouseMove( 580, 300 , 10) ; Maus auf die Koordinaten x = 580, y = 300 bewegen
MouseClick( "left" , 580, 300 , 1 , 10) ; Linksklick auf die Koordinaten: x = 580, y = 300
Sleep(10000) ; mach 10 sec pause
MouseClick( "left" , 1045, 380 , 1 , 10) ; Linksklick auf die Koordinaten: x = 1045, y = 380
Sleep(1000) ; mach 1 sec pause
MouseClick( "left" , 1045, 395 , 1 , 10) ; Linksklick auf die Koordinaten: x = 1045, y = 395
Sleep(1000) ; mach 1 sec pause
MouseClick( "left" , 1045, 410 , 1 , 10) ; Linksklick auf die Koordinaten: x = 1045, y = 410
Sleep(1000) ; mach 1 sec pause
MouseClick( "left" , 1045, 425 , 1 , 10) ; Linksklick auf die Koordinaten: x = 1045, y = 425
Sleep(1000) ; mach 1 sec pause
MouseClick( "left" , 1045, 440 , 1 , 10) ; Linksklick auf die Koordinaten: x = 1045, y = 440
Sleep(10000) ; mach 10 sec pause
MouseClick( "left" , 620, 660 , 1 , 10) ; Linksklick auf die Koordinaten: x = 620, y = 660
Sleep(10000) ; mach 10 sec pause
MouseClick( "left" , 1050, 770 , 1 , 10) ; Linksklick auf die Koordinaten: x = 1050, y = 770
Sleep(10000) ; mach 10 sec pause
MouseWheel("down", 500) ; Mausrad drehen
MouseClick( "left" , 560, 730 , 1 , 10) ; Linksklick auf die Koordinaten: x = 560, y = 730
Sleep(10000) ; mach 10 sec pause
$x = $x + 1 ; Laufvariable $x um 1 erhöhen

if $x = 10 then exitloop ; wenn die laufvariable $x = 10 ist dann beendet er Schleife Nr. 2
; da er aber noch in Schleife Nr. 1 ist beginnt er wieder oben bei Zeile 2: $x = 0
wend
sleep(1800000) ; hier könnte man deine 30 minuten pause einfügen
wend

[/autoit]

**Schnitzel**

Zitat von L3viathan2142

[autoit]
Opt("TrayMenuMode", 1)
Opt("TrayAutoPause", 0)
[/autoit]

Ist Trayautopause Nicht unnötig wenn man Traymenumode auf 1 setzt?

bei mir funktionierts auch ohne...

**Schnitzel**

natürlich geht sowas, musst dir einfahc nur ne gui dazu machen

hatte mir da mal n programm geschrieben um hexwerte von farben zu bekommen und umzuwandeln, ist zwar etwas umfangreicher, aber kannst vllt etwas davon lernen

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>
#NoTrayIcon
HotKeySet("{F10}", "Pixelfarbe")
Global $maus, $farbe

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

$Wurm = GUICreate("Colorname", 242, 130, 194, 127)
GUICtrlCreateGroup("Farbe:", 120, 8, 113, 49)
GUICtrlCreateGroup("", 8, 56, 225, 65)
GUICtrlCreateGroup("Rot", 16, 64, 65, 49)
GUICtrlCreateGroup("Grün", 88, 64, 65, 49)
GUICtrlCreateGroup("Blau", 160, 64, 65, 49)
$Rot = GUICtrlCreateInput("0", 25, 81, 48, 25, 0x2001)
GUICtrlSetLimit(GUICtrlCreateUpdown($Rot), 255, 0)
$Gruen = GuiCtrlCreateInput("0", 97, 81, 48, 25, 0x2001)
GUICtrlSetLimit(GUICtrlCreateUpdown($Gruen), 255, 0)
$Blau = GuiCtrlCreateInput("0", 169, 81, 48, 25, 0x2001)
GUICtrlSetLimit(GUICtrlCreateUpdown($Blau), 255, 0)
GUICtrlCreateGroup("Hexwert", 8, 8, 105, 49)
$Color = GUICtrlCreateInput("", 17, 24, 86, 24)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlSetResizing(-1, $GUI_DOCKAUTO)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Graphic = GUICtrlCreateGraphic(128, 24, 94, 21)
GUISetState(@SW_SHOW)
WinSetOnTop("Colorname", "", 1)

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Color
GUICtrlSetBkColor(-1, "0x"&GUICtrlRead($Color))
GUICtrlSetData( $Rot, Dec(StringLeft(GUICtrlRead($Color), 2)))
GUICtrlSetData( $Gruen, Dec(StringMid(GUICtrlRead($Color), 3, 2)))
GUICtrlSetData( $Blau, Dec(StringRight(GUICtrlRead($Color), 2)))
Case $Rot
GUICtrlSetData( $Color, StringRight(Hex(Guictrlread($Rot)), 2) & StringRight(Hex(GUICtrlRead($Gruen)), 2) & StringRight(Hex(Guictrlread($Blau)), 2))
GUICtrlSetBkColor($Graphic, "0x"&GUICtrlRead($Color))
Case $Gruen
GUICtrlSetData( $Color, StringRight(Hex(Guictrlread($Rot)), 2) & StringRight(Hex(GUICtrlRead($Gruen)), 2) & StringRight(Hex(Guictrlread($Blau)), 2))
GUICtrlSetBkColor($Graphic, "0x"&GUICtrlRead($Color))
Case $Blau
GUICtrlSetData( $Color, StringRight(Hex(Guictrlread($Rot)), 2) & StringRight(Hex(GUICtrlRead($Gruen)), 2) & StringRight(Hex(Guictrlread($Blau)), 2))
GUICtrlSetBkColor($Graphic, "0x"&GUICtrlRead($Color))
EndSwitch
WEnd

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

Func Pixelfarbe()
$maus = MouseGetPos()
$farbe = PixelGetColor( $maus[0], $maus[1])
GUICtrlSetData( $Color, StringRight(Hex($farbe), 6))
GUICtrlSetBkColor($Graphic, "0x"&guictrlread($Color))
GUICtrlSetData( $Rot, Dec(StringLeft(GUICtrlRead($Color), 2)))
GUICtrlSetData( $Gruen, Dec(StringMid(GUICtrlRead($Color), 3, 2)))
GUICtrlSetData( $Blau, Dec(StringRight(GUICtrlRead($Color), 2)))
EndFunc

[/autoit]

**Schnitzel**

willkommen im autoit-forum

was soll das script denn mal werden wenns fertig ist? sieht mir nämlich ziemlich nach n spaßvirus aus.
und sowas wird hier nicht unterstützt

siehe Forenregeln:

Zitat

- Programme, die anderen, auch Freunden, einen Schreck einjagen sollen oder sich sonst über andere Nutzer lustig machen ("Spaßviren")

entschuldige wenn dies nicht der fall ist

**Schnitzel**

wenn er jemand dateien auf seinen server hochladen lassen will ist sowas wohl die falsche art.

selbst wenn er das pw irgendwo verschlüsselt im script speichern würde, würde es unverschlüsselt übertragen werden, und dann könnte man es recht leicht abfangen.

wäre mir bei nem ftp-server zu heikel

**Schnitzel**

Beispiel aus der hilfe zu GUICtrlCreateProgress -.-

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>

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

Opt('MustDeclareVars', 1)

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

Example()

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

Func Example()
Local $progressbar1, $progressbar2, $button, $wait, $s, $msg, $m

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

GUICreate("My GUI Progressbar", 220, 100, 100, 200)
$progressbar1 = GUICtrlCreateProgress(10, 10, 200, 20)
GUICtrlSetColor(-1, 32250); not working with Windows XP Style
$progressbar2 = GUICtrlCreateProgress(10, 40, 200, 20, $PBS_SMOOTH)
$button = GUICtrlCreateButton("Start", 75, 70, 70, 20)
GUISetState()

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

$wait = 20; wait 20ms for next progressstep
$s = 0; progressbar-saveposition
Do
$msg = GUIGetMsg()
If $msg = $button Then
GUICtrlSetData($button, "Stop")
For $i = $s To 100
If GUICtrlRead($progressbar1) = 50 Then MsgBox(0, "Info", "The half is done...", 1)
$m = GUIGetMsg()

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

If $m = -3 Then ExitLoop

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

If $m = $button Then
GUICtrlSetData($button, "Next")
$s = $i;save the current bar-position to $s
ExitLoop
Else
$s = 0
GUICtrlSetData($progressbar1, $i)
GUICtrlSetData($progressbar2, (100 - $i))
Sleep($wait)
EndIf
Next
If $i > 100 Then
; $s=0
GUICtrlSetData($button, "Start")
EndIf
EndIf
Until $msg = $GUI_EVENT_CLOSE
EndFunc ;==>Example

[/autoit]

**Schnitzel**

ach jetz glaub ich weiß ich wo das problem liegt
die standart tray icons von autoit

Spoiler anzeigen

[autoit]

Opt("TrayMenuMode", 1)

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

$iconmenu0001 = TrayCreateItem ("Fenster schließen")
$iconmenu0002 = TrayCreateItem ("Fenster öffnen")
TrayCreateItem ("")
$iconmenu0003 = TrayCreateItem ("Programminformationen")
$iconmenu0004 = TrayCreateItem ("Tasteninformationen")
$iconmenu0005 = TrayCreateItem ("Aktioneninformationen")
TrayCreateItem ("")
$iconmenu0006 = TrayCreateItem ("Pause")
$iconmenu0007 = TrayCreateItem ("Exit")

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

while 1
$tmsg = TrayGetMsg()
Switch $tmsg
Case $iconmenu0007
Exit
Case $iconmenu0006
Msgbox(0, "Info", "Pause gedrückt")
Case $iconmenu0005
Msgbox(0, "Info", "Aktioneninformationen")
Case $iconmenu0004
Msgbox(0, "Info", "Tasteninformationen")
Case $iconmenu0003
Msgbox(0, "Info", "Programminformationen")
Case $iconmenu0002
Msgbox(0, "Info", "Fenster öffnen")
Case $iconmenu0001
Msgbox(0, "Info", "Fenster schließen")
EndSwitch
WEnd

[/autoit]

Edit:
Erklärung:
wenn die Option

[autoit]

Opt("TrayMenuMode", 1)

[/autoit]

nicht gesetzt ist macht er automatisch pause wenn man auf das icon im tray bereich klickt, und ein pausiertes script wird nichts ausführen...

**Schnitzel**

meinst du so in der art?

Spoiler anzeigen

[autoit]

$iconmenu0001 = TrayCreateItem ("Fenster schließen")
$iconmenu0002 = TrayCreateItem ("Fenster öffnen")
TrayCreateItem ("")
$iconmenu0003 = TrayCreateItem ("Programminformationen")
$iconmenu0004 = TrayCreateItem ("Tasteninformationen")
$iconmenu0005 = TrayCreateItem ("Aktioneninformationen")
TrayCreateItem ("")
$iconmenu0006 = TrayCreateItem ("Pause")
$iconmenu0007 = TrayCreateItem ("Exit")

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

while 1
$tmsg = TrayGetMsg()
Switch $tmsg
Case $iconmenu0001
Exit
Case $iconmenu0003
Msgbox(0, "Info", "Bla bla")
EndSwitch
WEnd

[/autoit]

**Schnitzel**

Zitat

[autoit]
Switsch
...
EndSchwitsch
[/autoit]

sry scar aba des ist zu lustig

**Schnitzel**

zum weiter verarbeitet bietet sich

[autoit]

@DesktopHeight
@DesktopWidth

[/autoit]

an.
wenn du deine gui einfach nur mittig willst geht natürlich die antwort von Jam00

oder auch

[autoit]

GUICreate("Mein Menü", 300, 300, -1, -1)

[/autoit]

**Schnitzel**

also ich weiß nich ob es dir was hilft aber mit fileinstall könntest du dir die ganze runterladerei sparen.
bei 2 so kleinen installern, 4 mb oder was die haben werden ist es vllt ne ganz gute alternative

**Schnitzel**

in ordung isses, aber

[autoit]

ControlClick ( "title", "text", controlID [, button [, clicks [, x [, y ]]]] )

[/autoit]

is meistens die bessere lösung

**Schnitzel**

tolles script, gefällt mir.
funktioniert einwandfrei.

als kleinen verbesserungsvorschlag würd ich aber noch 2 Hotkeys einfügen um den bildschirm aktivieren/deaktivieren zu können

ansonsten saubere arbeit

**Schnitzel**

dann mach eins

und dazu eine

[autoit]

#include <Array.au3>
_ArraySearch ( $avArray, $vWhat2Find, $iStart = 0, $iEnd = 0, $iCaseSense = 0, $fPartialSearch = False )

[/autoit]

-Funktion

**Schnitzel**

Zitat von L3viathan2142

Schnitzel:
Dein Code wäre sinnfrei, da bei fehlendem Parameter der Code trotzdem ausgeführt wird. Besser:
[autoit]
if not $CMDLINE[0] Or $CMDLINE[1] <> "geheimerparameter" then Exit
[/autoit]

ups ja klar stimmt, wiedermal gepostet bevor nachgedacht
kanns leider in da arbeit immer nicht testen

Zitat

Mit den Parametern ist das keine sehr schlaue Idee, da man es mit Antiviren Programmen sehen kann, mit welcher Befehlszeile ein Programm geöffnent wurde. Du kannst es ja auch so machen, das dein Programm überprüft, ob dein Launcher gerade läuft.

hatte ich mir auch schon überlegt, aber wenn der quellcode der scripte editierbar ist, kann man ja die überprüfenden zeilen einfach löschen...

**Schnitzel**

hab hier leider kein firefox und kein autoit zum probiern, aber geht sowas nich?

[autoit]

ShellExecute ( "C:\Programme\Mozilla Firefox\firefox.exe" , "" , "" , "open" , @SW_HIDE )

[/autoit]

**Schnitzel**

schreib ihn doch einfach an wär doch viel einfacher

Zitat

Aber anscheinend weiß ja hier kaum wer was über das Thema, ansonsten würden sicher mehr Antworten kommen.

wahrscheinlich is es nich so das "Große Thema" weils für Firefox und Co sehr viele tolle plugins gibt die integriert sind und nicht ein extra programm benötigen

**Schnitzel**

lol iwie komisch

du könntest dich mit Roggazzz zusammentun, der hat vor ca ner stunde nen thread aufgemacht:

https://autoit.de/index.php?page=Thread&threadID=14410

er weiß einigermaßen wie man an die flv kommt aber weiß nich wie mans umsetzt, soweit ich das mitgekriegt hab.

**Schnitzel**

sry für doppelpost

Zitat

Und das bringt doch nichts da die Scripts doch geöffnet werden können und ediertiert??

du willst verhindern dass jemand ein script ausführt welches noch editierbar ist?
ich denke das wird schwer werden, da dieser jemand ja den vollen quelltext vor sich hat, und alles was blockieren könnte das es ausgeführt wird höchstwahrscheinlich in dein script mit rein muss.

**Schnitzel**

nein muss es nich

einfach ausprobieren

was allerdings in meinem post falsch ist:
es heißt nich

[autoit]

Run ( $meinPfadzumScript & " geheimerparameter" ) ; wichtig das lehrzeichen vor geheimerparameter

[/autoit]

sondern:

[autoit]

Run ( $meinPfadzumScript & " /geheimerparameter" ) ; wichtig das lehrzeichen und der Slash vor geheimerparameter

[/autoit]

Beiträge von Schnitzel

Schleife Wiederholen

Icon Menü

Koordinaten einfügen in AutoIt

Schleife Wiederholen

File Upload

GUI für Fortschrittanzeige

Icon Menü

Icon Menü

GUI Zeit Programm läuft seit ddd | hh:mm:ss

Ich brauche eine Idee. oder Mehrere

Downloader mit Checkbox (Problem)

Checken ob MsgBox kommt und drauf reagieren

Monitor zu bestimmten Zeiten ein- und ausschalten

Ordner nach Dateien durchsuchen

Zugriff auf .au3 verweigern ?

Firefox versteckt starten

*.flv datei via XML runterladen?

*.flv datei via XML runterladen?

Zugriff auf .au3 verweigern ?

Zugriff auf .au3 verweigern ?