Live SPX on your desktop

September 30th, 2010, 09:56 PM

The code below runs using AutoIt (compiled exe is also attached). It shows SPX value in semi-transparent layer near system tray clock (bottom right). Great tool if you work full-time and trade for fun.

Next version will have price level alerts too :-)

Code

#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

Opt("TrayAutoPause", 0)

; User default proxy
HttpSetProxy(0)

#Region ### START Koda GUI section ### Form=C:\PortableApps\koda_1.7.3.0\Forms\GF.kxf
$Form1 = GUICreate("SPX", 108, 26, @DesktopWidth - 132, @DesktopHeight - 52, $WS_POPUPWINDOW, BitOR($WS_EX_TOPMOST, $WS_EX_TOOLWINDOW))
$Label1 = GUICtrlCreateLabel("0,000.00", 2, 2, 116, 22)
GUICtrlSetFont($Label1, 16, 800, 0, "Courier New")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

WinSetTrans("SPX", "", 160)

DirCreate(@TempDir & "\gf\")
$fName = @TempDir & "\gf\" & @AutoItPID & ".json"

$q = ".INX"

While @HOUR * 100 + @MIN >= 930 AND @HOUR * 100 + @MIN <= 1600
    ; pull SPX data every 15 seconds
    InetGet("http://www.google.com/finance/info?q=" & $q, $fName, 1, 1)
    Sleep(2000)
    $json = FileRead($fName)
    $array = StringRegExp($json, '"l_cur" : "(.*)"', 3)
    GUICtrlSetData($Label1, $array[0])
    Sleep(13000)
WEnd

Live SPX on your desktop

Discussion in Brokers

Live SPX on your desktop