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