; fix it for secondary monitor
WidthX := 1920 / 3
HeightY := (1080 + 20) / 2
OffsetX := 1280
OffsetY := 0
WinWait, Control Center
WinActivate, Control Center
WinGetPos,,, Width, Height, Control Center
WinMove, Control Center,, (A_ScreenWidth/2)-(Width/2), (A_ScreenHeight/2)-(Height/2)
OpenChart(0, "ES", "60 Min", "Future", 0, "F")
OpenChart(0, "ES", "30 Min", "Future", 1, "F")
OpenChart(1, "TF", "30 Min", "Future", 0, "F")
OpenChart(1, "YM", "30 Min", "Future", 1, "F")
OpenChart(2, "NQ", "30 Min", "Future", 0, "F")
OpenChart(2, "TICK", "2 Min", "Index", 1, "D")
OpenChart(3, "ES", "2 Min", "Future", 0, "F")
OpenChart(3, "ES", "15 Min", "Future", 1, "F")
OpenChart(4, "GS", "30 Min", "Stock", 0, "S")
OpenChart(4, "EURUSD", "30 Min", "Currency", 1, "C")
OpenChart(5, "VIX", "30 Min", "Index", 1, "I")
OpenChart(5, "AUDUSD", "30 Min", "Currency", 0, "C")
WinMinimize, Control Center
OpenChart(ChartPosition, Symb, Period = "5 Min", SType = "Stock", OffSet = 0, Template = "D")
{
;define globals
global WidthX, HeightY, OffsetX, OffsetY
WinActivate, Control Center
MouseClick, left, 25, 40
MouseClick, left, 190, 64
MouseClick, left, 220, 110
WinWait, Format Data Series
WinActivate, Format Data Series
if (SType = "Currency")
{
MouseClick, left, 215, 80
MouseClick, left, 105, 150
}
if (SType = "Future")
{
MouseClick, left, 215, 80
MouseClick, left, 105, 162
; Set 06-10
MouseClick, left, 215, 100
Send {Up}{Up}
MouseClick, left, 215, 100
}
if (SType = "Index")
{
MouseClick, left, 215, 80
MouseClick, left, 105, 175
}
if (SType = "Stock")
{
MouseClick, left, 215, 80
MouseClick, left, 105, 188
}
; Set template
MouseClick, left, 40, 236
Send %Template%
MouseClick, left, 40, 236
MouseClick, left, 160, 100
Send {BS}{BS}{BS}{BS}{BS}{BS}
MouseClick, left, 160, 100, 2
Send %Symb%
Sleep 20
StringSplit, PeriodArray, Period, " "
PeriodNumber = %PeriodArray1%
PeriodTimeframe = %PeriodArray2%
MouseClick, left, 75, 180, 2
Send %PeriodNumber%
Sleep 20
MouseClick, left, 160, 310
SetTitleMatchMode RegEx
WinWait %Symb% .*\(%Period%\)
Sleep 200
ChartX := Mod(ChartPosition, 3) * WidthX
ChartY := (ChartPosition // 3) * HeightY - 25
WinMove, %Symb%.*\(%Period%\),, OffsetX + ChartX + (12 * OffSet), OffsetY + ChartY, WidthX - 12, (HeightY + 25)
SetTitleMatchMode 1
Sleep 20
}
|