1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. oernzz

Beiträge von oernzz

  • Win DO

    • oernzz
    • 13. Mai 2010 um 22:39

    Hi!

    Wow, soviele Rückmeldungen! :rock:

    name22: Danke für den tollen Tip! Diese Udf wird auf alle Fälle Verwendung finden

    yxyx: also eigentlich hab ich mir das so vorgestellt das WinDo eine Anwendung sein soll mit dessen Hilfe nicht nur Programme, ähnlich wie bei Gnome Do, schnell gestartet werden können sondern zusätzlich noch was für die Windows Optik gemacht wird. Zum Beispiel eben das es ne kleine Explosion gibt wenn man einen Mouseclick macht, vorstellbar sind sicher auch andere "Grafik-Spielereien" zb.: eine Feuersbrunst die ein neu geöffnetes Fenster umschliest (natürlich nur einen moment) ;)

    € : yxyx Joa gerne, würd mich sehr freuen!

  • Win DO

    • oernzz
    • 13. Mai 2010 um 21:45

    Hi!

    Nachdem ich diesen Thread gelesen und dieses Video gesehen habe, frage ich mich ob sich sowas mithilfe von AutoIt für Windows realisieren ließe.
    Wahrscheinlich schon, glaube mit dem nötigen wissen wäre das sogar recht "schnell" gemacht...Obwohl das Know-How (zumindest noch) nicht vorhanden ist, werde ich mich mal an diese Idee ranwagen.

    Für Anregungen, Tips evtl. sogar "Code-Teile" :D bin ich natürlich mehr als offen!


    mfg oernzz


    ps: hoffe das ich schon bald hier die ersten Fortschritte posten kann

  • GDI+ Partikelexplosion

    • oernzz
    • 13. Mai 2010 um 18:18

    Hi!

    Also ich find es toll was mit GDI+ alles machbar ist...gerade diese Partikel Explosion ist echt stylisch!

    Frage mich ob man das so "umbauen" könnte das dieses Programm ohne (zumindest sichtbare) GUI auskommt und damit direkt auf den Desktop zeichnet, also als "mouse - effekt"...quasi wie bei Linux Compiz?


    mfg oernzz

  • Auf Firefox seitenaufbau warten lassen?

    • oernzz
    • 12. April 2010 um 18:26

    Hi!

    Der Thread ist zwar schon fast ein Jahr alt ^^ aber ich hatte vor kurzem das gleiche Problem, mit FF.au3 und der dazu nötigen Installation von MozRepl wollt (ehrlich gesagt konnte) ich nicht arbeiten...deswegen hab ich mir selber eine UDF geschrieben (hoffe das dies tatsächlich ne UDF is :) )
    Möchte aber dazu sagen das dieses Script sicherlich etwas "noobisch" ist...aber für mich und das Firefox Standart Thema funktionierts, auch ists egal welche grösse der Firefox hat.
    Falls erlaubt würd ich gerne den Thread dazu "missbrauchen" etwaige Verbesserungsvorschläge die evtl. kommen in meinem Script zu realisieren und danach hier zu posten.
    Genug mit dem Bla Bla, hier der Code:

    Spoiler anzeigen
    [autoit]

    #cs ----------------------------------------------------------------------------

    AutoIt Version: 3.3.4.0
    Author: oernzz

    Script Function: erkennen ob Firefox fertig geladen ist
    Template AutoIt script.

    Anwendung wäre folgendermassen: 1. FFLaden.au3 in den Ordner "include" kopieren
    2. beim jeweiligen Script mittels #include "FFladen.au3" einfügen
    3. dann zb. mit dem Befehl "FFLaden(http://www.Autoit.de)" verwenden

    #ce ----------------------------------------------------------------------------

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

    #Region Funktion

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

    Func FFLaden($Adresse = '')
    Opt("WinTitleMatchMode", 2)
    Opt("PixelCoordMode", 0)

    WinActivate("Mozilla Firefox")
    WinWaitActive("Mozilla Firefox")
    $geladen_Pixel = 15526360
    $gesicherte_Seite = 11702315

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

    If WinActive("Mozilla Firefox") Then
    $size = WinGetPos("Firefox")
    $FFx = $size[2] - 29
    $FFy = $size[3] - 17
    $FFxG = $size[2] - 60
    Send("^l")
    Send($Adresse & "{ENTER}")
    Sleep(500)
    EndIf

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

    While 1
    Sleep(500)
    $aktuell_Pixel = PixelGetColor($FFx, $FFy)
    If $aktuell_Pixel = $gesicherte_Seite Then
    ToolTip("Gesicherte Seite!")
    $aktuell_Pixel_gesichert = PixelGetColor($FFxG, $FFy)
    $aktuell_Pixel = $aktuell_Pixel_gesichert
    If $aktuell_Pixel_gesichert <> $geladen_Pixel Then
    ToolTip("Lade gesicherte Seite")
    Sleep(333)
    ElseIf $aktuell_Pixel_gesichert = $geladen_Pixel Then
    ToolTip("Fertig geladen")
    Sleep(1000)
    Return 1
    ExitLoop
    EndIf
    ElseIf $aktuell_Pixel <> $geladen_Pixel Then
    ToolTip("Lade Seite")
    Sleep(333)
    ElseIf $aktuell_Pixel = $geladen_Pixel Then
    ToolTip("Fertig geladen")
    Sleep(1000)
    Return 1
    ExitLoop
    EndIf

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

    WEnd

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

    EndFunc

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

    #EndRegion Funktion

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

    mfg oernzz

  • CDax Info Tool

    • oernzz
    • 5. Februar 2008 um 18:50

    Ach So! *Mit_der_Hand_auf_die_Stirn_klatsch* Tjo da wär ich nie drauf gekommen das das Komma nun nich mehr mitm Komma-Zeichen dargestellt werden muss^^ Ich sach ma Thnx 4 help!


    mfg oernzzz

  • CDax Info Tool

    • oernzz
    • 5. Februar 2008 um 15:08

    Hi!

    Hab mir so´n kleines Tool gemacht, welches immer den aktuellen Stand vom Cdax(->Is ne Citigroup Indikation des Deutschen Aktienindexes) holt und dazu gleich den durchschnitt der letzten 3 minuten ausrechnet.
    Um die Zahlen nicht immer nachschlagen zu müssen hab ich mit Splashtexton gearbeitet da ich mich mit GUI überhaupt nicht auskennne....
    Aber nun zum eigentlichen Thema:
    Wenn ich die AutoIt version 3.2.2.0 installiert hab funkt alles Problem los, nur bei der neueren Version rechnet er den Durchschnitt partout nicht aus ?(
    Fehlersuche hab ich gemacht: Hab das ganze so umgesciptet das er mir anzeigen soll ob er ne Zahl findet, wenn ja welche, wenn nein fehlermeldung. Auch ob er überhaupt die .txt findet etc.
    Komischerweise brachte er keine Fehler und das Prog. lief ansonsten normal weiter.

    Nur zur Info, ich kann auch mit der älteren Version arbeiten....mich interessiert eigentlich nur warums mitm alten geht und mitm neuen nich^^
    Falls eine/r Lust hat das ganze zu testen und mir evtl. ne Antwort geben kann würd ich mich freuen, ansonsten sag ich ma Dabke fürs lesen ;)

    Spoiler anzeigen
    [autoit]

    #cs ----------------------------------------------------------------------------

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

    AutoIt Version: 3.2.2.0
    Author: oernzzz

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

    Script Function:
    Template AutoIt script.

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

    #ce ----------------------------------------------------------------------------

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

    ; Script Start - Add your code below here

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

    #include <INet.au3>
    #include <Array.au3>
    #include <String.au3>
    #include <Date.au3>
    #include <file.au3>
    #include <math.au3>
    #include "misc.au3"

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

    $Datum = _NowDate()
    $Zeit = _NowTime()
    $find = "."
    $replace = ""
    $file = "C:\Dokumente und Einstellungen\Administrator\Desktop\Dax info tool\" & $Datum & ".txt"
    $Durchschnitt = "C:\Dokumente und Einstellungen\Administrator\Desktop\Dax info tool\Durchschnitt.txt"
    $Trend = "C:\Dokumente und Einstellungen\Administrator\Desktop\Dax info tool\Trend.txt"

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

    If FileExists ($file) = 0 Then
    _FileCreate("C:\Dokumente und Einstellungen\Administrator\Desktop\Dax info tool\" & $Datum & ".txt")
    EndIf

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

    If FileExists ($Durchschnitt) = 0 Then
    _FileCreate("C:\Dokumente und Einstellungen\Administrator\Desktop\Dax info tool\Durchschnitt.txt")
    EndIf

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

    If FileExists ($Trend) = 0 Then
    _FileCreate("C:\Dokumente und Einstellungen\Administrator\Desktop\Dax info tool\Trend.txt")
    EndIf

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

    Func ZahlenDa()
    $Zahl1 = FileReadLine($file,1)
    $Zahl2 = FileReadLine($file,3)
    $Zahl3 = FileReadLine($file,5)
    $Zahl4 = FileReadLine($file,7)
    $Zahl5 = FileReadLine($file,9)
    $Zahl6 = FileReadLine($file,11)

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

    If $Zahl6 > 0 Then
    $CdaxX = ($Zahl1+$Zahl2+$Zahl3+$Zahl4+$Zahl5+$Zahl6)/6
    FileWriteLine($Durchschnitt,$CdaxX)

    ElseIf $Zahl5 > 0 Then
    $CdaxX = ($Zahl1+$Zahl2+$Zahl3+$Zahl4+$Zahl5)/5
    FileWriteLine($Durchschnitt,$CdaxX)

    ElseIf $Zahl4 > 0 Then
    $CdaxX = ($Zahl1+$Zahl2+$Zahl3+$Zahl4)/4
    FileWriteLine($Durchschnitt,$CdaxX)

    ElseIf $Zahl3 > 0 Then
    $CdaxX = ($Zahl1+$Zahl2+$Zahl3)/3
    FileWriteLine($Durchschnitt,$CdaxX)

    ElseIf $Zahl2 > 0 Then
    $CdaxX = ($Zahl1+$Zahl2)/2
    FileWriteLine($Durchschnitt,$CdaxX)

    ElseIf $Zahl1 > 0 Then
    $CdaxX = $Zahl1
    FileWriteLine($Durchschnitt,$CdaxX)

    EndIf

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

    EndFunc

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

    ;Die Schleife:

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

    While 1
    $source = _INetGetSource("http://citiwarrants.onvista.de/snapshot.html?ID_ISSUER_GROUP=56444&ID_NOTATION=14097793")
    $found1 = _StringBetween($source, '<span class="s2gb">', "</span>");Cgax Grün
    $found2 = _StringBetween($source, '<span class="s2rb">', "</span>");Cgax Rot
    $foundzeit = _StringBetween($source, "Realtime-Kurs&nbsp;&nbsp;&nbsp;"&$Datum&",&nbsp;", "</td>")
    $Zeit = _NowTime()

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

    If IsArray($found1) Then $found1 = $found1[0]
    If IsArray($found2) Then $found2 = $found2[0]
    If IsArray($foundzeit) Then $foundzeit = $foundzeit[0]

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

    ;letzter Kurs vor abfrage
    $Cdaxvoriger = FileReadLine($file,1)

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

    If $found1 > $found2 Then
    _FileWriteToLine($file,1, $found1 & @CRLF & " "& $foundzeit)

    ElseIf $found1 < $found2 Then
    _FileWriteToLine($file,1, $found2 & @CRLF & " "& $foundzeit)

    Else
    _FileWriteToLine($file,1, $Cdaxvoriger & @CRLF & " "& $foundzeit)
    Sleep(25000)
    EndIf

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

    $Cdax = _ReplaceStringInFile($file, $find, $replace)

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

    ;Aktueller Kurs
    $Cdax = FileReadLine($file,1)

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

    ;Aktueller Zeit
    $CdaxZeit = FileReadLine($file,2)

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

    ;Voriger Kurs
    $CdaxAlt = FileReadLine($file,3)

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

    ;Durchschnitt der letzten 3 Minuten
    ZahlenDa()
    $CdaxXZeile = _FileCountLines($Durchschnitt)
    $CdaxX= FileReadLine($Durchschnitt,$CdaxXZeile)
    $CdaxX = Round($CdaxX,2)

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

    $CdaxXzeileAlt= _FileCountLines($Durchschnitt) - 1
    $CdaxXAlt= FileReadLine($Durchschnitt,$CdaxXzeileAlt)
    $CdaxXAlt=Round($CdaxXAlt,2)

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

    ;Darstellung der Zahlen
    $Splashtext=(@CRLF&$CdaxZeit&" Uhr: "&$Cdax&@CRLF&"Voriger : "&$CdaxAlt&@CRLF&"3min Schnitt :"&$CdaxX&@CRLF &"alter Schnitt :"&$CdaxXAlt&@CRLF)
    SplashTextOn("CDax Info Tool", $Splashtext,170,200,0,570,8)

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

    Sleep(25000)

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

    WEnd

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

    Exit

    [/autoit]

    Btw: wollt ich noch fragen warum die Zeilen 88-90 so wichtig sind bzw. was bedeutet [0] hinter den Array´s?

    Danke und mfg
    oernzz

  • Frage zu meinem Ip-Switcher

    • oernzz
    • 14. Dezember 2007 um 14:00

    Hi!

    Hab mir folgenden Ip-Switcher gebaut:

    C
    #cs ----------------------------------------------------------------------------
    
    
     AutoIt Version: 3.2.2.0
     Author:     	Oernzz
    
    
     Script Function:
    	Template AutoIt script.
    
    
    #ce ----------------------------------------------------------------------------
    
    
    ; Script Start - Add your code below here
    
    
    #include 
    
    
    ShellExecute('ipconfig', '/release')
    
    
    WinWaitClose("C:\WINDOWS\system32\ipconfig.exe")
    
    
    Sleep(1000)
    
    
    ShellExecute('ipconfig', '/renew')
    
    
    WinWaitClose("C:\WINDOWS\system32\ipconfig.exe")
    
    
    Sleep(1000)
    
    
    Run("C:\Programme\GoOnline V2\GoOnline.exe")
    
    
    ProcessWait("GoOnline.exe")
    
    
    Sleep(2000)
    
    
    ProcessClose("GoOnline.exe")
    
    
    Sleep(1000)
    
    
    ProcessWaitClose("GoOnline.exe")
    
    
    Exit
    Alles anzeigen

    In meinem System Tray (So heist doch der Balken wo auch die Uhr und z.b. AntiVir ist, oder?) wird immer die aktuell aktive Internet Verbindung angezeigt. Nur nachdem ich dieses Prog laufen lasse, kommt das Symbol nicht mehr im Tray vor. Da ich danach trotzdem mitm Internet verbunden bin is es ja nur n kleines Problem, trotzdem möcht ich gerne das dieses Symbol wieder da is...Hab zwar rausgefunden dass, wenn der Sleep in Zeile 31 auf 3 sek. erhöht wird, das Symbol "zurück" kommt. Allerdings frage ich mich ob das auch passiert wenn mein Computer mal n "Lag" hat und etwas länger braucht ?(

    P.s: Wie ihr seht hab ich n Umweg über das Programm "GoOnline" gemacht, um ne neue Internet Verbindung herzustellen. Mir ist klar das es sicherlich auch anders gehen würde, falls mir da einer n Tipp geben könnte wie´s auch ohne 3rd Prog geht ---> :love:


    Danke und mfg

    oernzz

  • eine zahl aus einem fenster auslesen, aber wie?

    • oernzz
    • 1. September 2006 um 11:45

    Hi!

    ich bin immer noch an meinem "handels-programm" dran, es soll mich beim traden unterstützen (kauf/verkauf-orders schneller ausführen, optimale stückzahl errechnen, n warnungs "tool-tip" abgeben falls kurs bei xy ist,...)

    hab eigentlich alles bisher so hingekriegt wie ich´s mir vorstelle, bis auf die "stückzahl". ziel ist das er einen bestimmten %-satz meines portolos einsetzt, dazu müsste er aber unter anderem eine zahl entweder aus einer i-net seite, oder aus einem programm das im hintergrund läuft, auslesen. das problem ist das ich nur einen kleinen teil dieser control id/class name brauch. da sich diese zahl ständig verändert, weis ich nicht wie ich die von den anderen "unterscheiden" lassen soll. einziger unterschied ist, das sie in einem kleinen farblichen rahmen dargestellt wird, allerdings hab ich keine ahnung wie mir das helfen sollte...


    hier mal die daten aus dem window-info tool:

    >>>>>>>>>>>> Window Details <<<<<<<<<<<<<
    Title: Auto aktualisierer - Desktop 1 - TradeSignal enterprise
    Class: WindowsForms10.Window.8.app12
    Size: X: -4 Y: -4 W: 1160 H: 872
    >>>>>>>>>>> Mouse Details <<<<<<<<<<<
    Window: X: 1134 Y: 216
    Cursor ID: 0
    >>>>>>>>>>> Pixel Color Under Mouse <<<<<<<<<<<
    RGB: Hex: 0xFFFFE1 Dec: 16777185
    >>>>>>>>>>> Control Under Mouse <<<<<<<<<<<
    Size: X: 1084 Y: 100 W: 57 H: 367
    Control ID: 1
    ClassNameNN: AfxWnd70su10
    Text:
    >>>>>>>>>>> Status Bar Text <<<<<<<<<<<

    >>>>>>>>>>> Visible Window Text <<<<<<<<<<<
    Auto aktualisierer - Desktop 1 - TradeSignal enterprise
    Auto aktualisierer
    TS_Chart
    TS_Analysis
    Daten von Reuters Limited - Copyright 2006. Klicken Sie hier für Lizenzinformationen und Benutzungshinweise. Nur Mitglieder des tradesignal.com Member Services sind berechtigt, diese Software zu benutzen.
    >>>>>>>>>>> Hidden Window Text <<<<<<<<<<<


    die x-y koordinaten können leider nicht verwendet werden da sich die zahl(im farbigen feld) innerhalb von "AfxWnd70su10" ständig rauf oder runter bewegt, es bleibt nur die möglichkeit nach dem farblichen feld suchen zu lassen und aus dem die zahl auszulesen...kann mir bitte einer helfen?

    mfg oernzz

  • Frage zu rechts Mausclick

    • oernzz
    • 27. Juli 2006 um 14:39

    öhmm, vielleicht: mouseclick("right",....)?

    mfg oernzz

  • Komischer fehler beim syntax-check

    • oernzz
    • 26. Juli 2006 um 16:58

    und wenn diese zeile leer ist? wie gesagt das programm wurde nur bis zeile 236 beschrieben und der fehler kam in zeile 238...

    mfg oernzz

  • Komischer fehler beim syntax-check

    • oernzz
    • 26. Juli 2006 um 13:13

    Hi!

    Eddy_Erpel: es sind alle zeilen drin im script...hab nur die obersten zeilen weggelassen weil die nichts mitm programm zu tun haben

    @th.meger: Dankööö! genau das wars. allerdings is es schon komisch das "er" in zeile 238 ein ^ "sieht"

    so einfach kanns sein, nochmals danke!

    mfg oernzz

  • Komischer fehler beim syntax-check

    • oernzz
    • 26. Juli 2006 um 12:05

    Hi!

    nach längerer abwesenheit muss ich wieder mal um eure hilfe bitten, hier mal das programm

    Spoiler anzeigen
    Code
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;HIER DIE EXTERNEN DATEIEN;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    
    
    
    
    $file = FileOpen("C:\Dokumente und Einstellungen\Administrator\Desktop\handelsprogramm\long.txt", 0) 
    $file2 = FileOpen("C:\Dokumente und Einstellungen\Administrator\Desktop\handelsprogramm\short.txt", 0)
    
    
    	$long = FileReadLine($file, 1)
    	$short = FileReadLine($file2, 1)
    
    
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;HIER DIE HOTKEYS:;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    
    
    Local $Paused
    HotKeySet("{PAUSE}", "TogglePause")
    HotKeySet("{ESC}", "Terminate")
    HotKeySet("^l", "long")
    ;HotKeySet("^s", "short")
    
    
    ;;;;;;;;;;;;;;;
    ;PAUSE FUNC;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;;
    
    
    Func TogglePause()
        $Paused = NOT $Paused
        While $Paused
            sleep(100)
            ToolTip('Script is "Paused"',0,0)
        WEnd
        ToolTip("")
    EndFunc
    
    
    ;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;PROGRAMM BEENDEN FUNC;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;;;;;;;
    
    
    Func Terminate()
        Exit 0
    EndFunc
    
    
    ;;;;;;;;;;;;;;;;;
    ;SCHLEIFEN FUNC;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;
    
    
    Func schleife()
    	While ProcessExists ("javaw.exe")
    
    
    	ToolTip("starte schleife")
    	Sleep(10000)
    	ToolTip("hole aktuellen kurs+aktualisiere")
    	MouseClick("left", 448, 593)
    	ToolTip("aktualisiert")
    	Sleep(10000)
    
    
    	WEnd
    EndFunc
    
    
    ;;;;;;;;;;;;;;;;;;;;
    ;KAUFE LONG HOTKEY;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;
    ;1  MOUSECLICK BEI TRADER-PW
    ;2  4X TAB AUF "WERTPAPIER"--->wp EINGEBEN+TAB--->1 sec WARTEN
    ;3  2X TAB AUF "BÖRSE" --->CITI
    ;4  2X TAB AUF "ANZAHL" 
    ;5  MOUSECLICK AUF "KURS HOLEN"--> 1sec WARTEN
    ;6  MOUSECLICK AUF "AUFGEBEN"--> 1sec WARTEN
    ;7  ???ENTER???-->RAUSFINDEN!!!!
    ;8  MOUSECLICK AUF "DIREKTHANDEL"
    ;9  MOUSECLICK BEI TRADER-PW--->PW EINGEBEN
    ;10 1X TAB AUF "KAUF/VERKAUF"-->1X PFEIL RUNTER
    ;11 3X TAB AUF "WERTPAPIER"--->EINGABE+TAB-->1sec WARTEN+????ENTER????----->!!!RAUSFINDEN!!!
    ;12 MOUSECLICK AUF "BÖRSE"-->nach click 1sec warten, dann enter
    ;13 SCHLEIFEN FUNC STARTEN
    
    
    
    
     Func long()
    	;1.
    	MouseClick ("left", 772, 287) 
    	;2.
    	ToolTip("gebe wertpapier ein")
    	Send ("{TAB 4}") 
    	Sleep(300)
    	Send($long)
    	Sleep(300)
    	Send("{TAB}")
    	Sleep(1000)
    	;3.
    	ToolTip("wähle börse aus")
    	Send ("{TAB 2}")
        Sleep(300)
    	Send("citi")
    	;4.
    	ToolTip("gebe stückzahl ein")
    	Send ("{TAB 2}")
        Sleep(300)
    	Send("1000")
    	;5.
    	ToolTip("hole aktuellen kurs")
        MouseClick("left", 448, 593)
        ToolTip("geholt")
    	;6.
    	ToolTip("kaufe LONG")
    	Sleep(1000)
        MouseClick("left", 448, 593)
        ToolTip("geholt")
    	;7.!!!!!!!!!!TESTEN!!!!!!!!!!!!
    	ToolTip("bestätige kauf LONG")
    	Sleep(500)
    	Send("{ENTER}")
    	;8.
    	ToolTip("Gehe zu direkthandel")
        MouseClick("left", 147, 190)
        WinWaitActive("direktanlage.at - Brokerage 6.08", "Kurs holen")
        Sleep(500)
    	;9.
    	ToolTip("Trader-PW eingabe")
        Send("passwort")
        Sleep(500)
    	;10.
    	ToolTip("gehe auf VERKAUF")
    	Send ("{TAB}")
    	Sleep(300)
    	Send("{DOWN}")
    	;11.!!!!!!!!!TESTEN!!!!!!!!!!!!
    	ToolTip("gebe wertpapier ein")
    	Send ("{TAB 3}")
    	Sleep(300)
    	Send($long)
    	Sleep(300)
    	Send("{TAB}")
    	Sleep(1000)
    	Send("{ENTER}")
    	;12.
    	ToolTip("wähle die börse")
    	Sleep(500)
        MouseClick("left", 574, 426)
        Sleep(1000)
        Send("{ENTER}")	
    	;13.
        schleife()
    
    
    
    
    
    
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	
    ;HIER DAS PROGRAMM;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;	
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    
    
    
    
    	
    ToolTip('öffne download-trader')
    MouseClick("left", 632, 418, 2)
    WinWaitActive("direktanlage.at - Brokerage 6.08", "Anmelden")
    
    
    
    
    ToolTip('Legitimation')
    Send("benutzername{TAB}")
        Sleep(200)
    Send("passwort1{TAB}")
    	Sleep(200)
    Send("passwort2{ENTER}")
    
    
    
    
    ToolTip('Warte auf Trader')
    WinWaitActive("direktanlage.at - Brokerage 6.08", "Logout")
    	Sleep(2000)
    
    
    
    
    ToolTip("Gehe zu direkthandel")
    MouseClick("left", 147, 190)
    WinWaitActive("direktanlage.at - Brokerage 6.08", "Kurs holen")
        Sleep(500)
    
    
    
    ToolTip("Trader-PW eingabe")
    Send("passwort")
        Sleep(500)
    
    
    
    ToolTip("Produkt eingabe (long)")
    MouseClick("left", 465, 375)
    Send($long)
        Sleep(500)
    
    
    
    ToolTip("gebe die anzahl ein")
    MouseClick("left", 786, 408)
        Sleep(1500)
    MouseClick("left", 786, 408)	
    Send("1")
    
    
    
    
    ToolTip("wähle die börse")
    MouseClick("left", 574, 426)
        Sleep(1000)
    Send("{ENTER}")	
    
    
    
    
    ToolTip("hole aktuellen kurs")
    MouseClick("left", 448, 593)
    ToolTip("geholt")
    
    
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;AB HIER DIE SCHLEIFE;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    
    
    schleife()
    Alles anzeigen

    und hier der fehler:

    "C:\Dokumente und Einstellungen\Administrator\Desktop\DownloadTrader.au3(238,1) : ERROR: syntax error
    ^"

    das problem ist, das programm "endet" auf zeile 236. was ist da "faul", wenn mir da jemand auf die sprünge helfen könnte wär ich extrem dankbar...die sch..se macht mich noch wahnsinnig ;)

    mfg oernzz

    Ps: ich hoff es is nich zu unübersichtlich...im editor siehts (für mich) gut aus

  • wie kann ich...

    • oernzz
    • 16. Mai 2006 um 23:30

    Hi!

    also das is ma komisch: wenn ich das "$a" mit dem "WinExists("Neuer Arbeitsbereich 1 - Desktop 1 - TradeSignal enterprise")" vertausche funktionierts prächtig. sollte doch das selbe sein ?(

    hier mal der code der funkt:

    Code
    $a = WinExists("Neuer Arbeitsbereich 1 - Desktop 1 - TradeSignal enterprise")
    
    
    
    
    While 1
    If WinExists("Neuer Arbeitsbereich 1 - Desktop 1 - TradeSignal enterprise") Then
    
    
     	Send("{F5}")
    
    	Sleep(5000)
    Else	
    
    	 ExitLoop
    EndIf	 
    
    WEnd
    
    Exit
    Alles anzeigen

    und hier der der nicht funkt:

    Code
    $a = WinExists("Neuer Arbeitsbereich 1 - Desktop 1 - TradeSignal enterprise")
    
    
    
    
    While 1
    If $a = 1 Then
    
    
     	Send("{F5}")
    
    	Sleep(5000)
    Else	
    
    	 ExitLoop
    EndIf	 
    
    WEnd
    
    Exit
    Alles anzeigen


    naja, hauptsache es geht jetzt ;) danke für die hilfe!

    mfg oernzz

    P.s: wie gesagt das mit processexists "interessiert" ihn schneinbar nicht, hab den prozess genauso wies im taskmanager steht reingeschrieben--->keine reaktion

  • wie kann ich...

    • oernzz
    • 16. Mai 2006 um 22:19

    Hi!

    danke, aber das hab ich auch scho versucht :(
    des funkt einfach nicht! irgendwie hab ich das gefühl das er, wenn er mal im loop ist keine abfrage macht ob das fenster überhaupt aktiv ist...
    auch das mitm processexists scheint ihm "egal" zu sein...

    mfg oernzz

  • wie kann ich...

    • oernzz
    • 16. Mai 2006 um 21:50

    lol, leider nicht!

    ich hab das wie du geschrieben hast mit while wend gemacht. wenn ich aber das prog (tradesignal) schliese bleibt mein script dennoch aktiv.

    sieht folgender massen aus:

    Code
    $a = WinExists("Neuer Arbeitsbereich 1 - Desktop 1 - TradeSignal enterprise")
    
    
    
    
    While $a = 1	
     	Send("{F5}")
    
    	Sleep(5000)
    
    WEnd
    
    Exit
    Alles anzeigen

    hab das ganze auch schon mit if..elseif, select...case, do...until etc versucht, imma bleibt das script aktiv ?(


    Ps: hab rausgefunden das der button mit f5 erreicht werden kann, leider hatte er imma eine neue controlid weshalb ich das ändern musste

    mfg oernzz

  • wie kann ich...

    • oernzz
    • 16. Mai 2006 um 20:25

    Hi!

    super danke! hat geklappt!

    danke

    mfg oernzz

  • wie kann ich...

    • oernzz
    • 16. Mai 2006 um 16:50

    Hi!

    bin schon etwas länger abwesend gewesen, sorry ;)

    hab nu eine frage bezüglich eines programms. ich möcht n proggie schreiben wo in regelmässigen abständen ein bestimmter button gedrückt werden soll. allerdings sollte das ohne mausclick oda ähnliches geschehen. wie müsste sowas genau gemacht werden? ich schreib mal die info´s für diesen button aus dem window tool rein:

    >>>>>>>>>>>> Window Details <<<<<<<<<<<<<
    Title: Neuer Arbeitsbereich 1 - Desktop 1 - TradeSignal enterprise
    Class: WindowsForms10.Window.8.app13
    Size: X: -4 Y: -4 W: 1032 H: 744

    >>>>>>>>>>> Mouse Details <<<<<<<<<<<
    Window: X: 1009 Y: 93
    Cursor ID: 2

    >>>>>>>>>>> Pixel Color Under Mouse <<<<<<<<<<<
    BGR: Hex: 0x008200 Dec: 33280

    >>>>>>>>>>> Control Under Mouse <<<<<<<<<<<
    Size: X: 991 Y: 51 W: 23 H: 24
    Control ID: 1770160
    ClassNameNN: WindowsForms10.Window.8.app1323
    Text:


    falls mir da jemand helfen könnte wär ich sehr froh...Danke!

    mfg oernzz

  • hilfe für mein 1. grösseres script

    • oernzz
    • 23. März 2006 um 21:24

    mal ne frage, wieso geht das

    Code
    If FileExists("C:\Dokumente und Einstellungen\Administrator\Desktop\clickoption\daxstand\short.txt") And $line1 > $line3 Or $line1 > $linebs then ...


    nicht?

    wenn ich statt dem or ein and einfüge läuft alles problemlos, mitm or drin wird das prog nochmal geöffnet, danach kommt der notepad wo eine datei geöffnet werden soll, da schreibt er dann ca. 1 mio sachen rein und dann hängt sich der pc auf ?(

    mfg oernzz

  • hilfe für mein 1. grösseres script

    • oernzz
    • 23. März 2006 um 19:03

    hi!

    ich sag ma fett merci, für die trend funktion!
    hab mein oben angedeutetes problem inzwischen gelöst, auch hab ich inzwischen n stop loss beim vergleicher eingebaut.(hab das alte mit dem neuen ersetzt)
    wegen denn 3 programmen, irgendwie find ichs angenemmer 3 kleine progs zu "behandeln" als 1 grosses...da ich noch sehr viel vor habe (gui machen, bestimmte zielmarken von vornherein zu deklarieren, max. handelsvorgänge, usw. usf.) ist noch massig arbeit zu erledigen. in jedem fall nochmals grossen dank, ist echt super wenn man als noob so freundlich und kompetent beraten wird.

    ps: ich hab natürlich für dieses forum gestimmt :D

    mfg oernzz

  • hilfe für mein 1. grösseres script

    • oernzz
    • 22. März 2006 um 22:02

    also, ich hab mich entschlossen den "vergleicher" neu zu schreiben. da ja leider nicht, die zahlen nacheinander geprüft werden.ich dachte da an select..case befehle.
    so in der richtung: falls die erste zahl kleiner ist als die zweite, und falls die 2te kleiner is als die 3te dann...
    das problem ist, sobald der erste case wahr ist wird nicht mehr weiter "gecased". die if..ifelse..else befehle helfen da leider auch nicht weiter.
    was tun sprach zeus? falls jemand ne idee hat, bitte bin froh wenn man mir auf die sprünge hilft.

    mfg oernzz

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™