au3查看股票价格

拜读autoit脚本网站www.autoitx.com的帖子后，学会查看股票价格的代码。

新浪的股票数据接口：http://hq.sinajs.cn/list=**********
********** 为股票代码
如：sh600000，sz000913 (这里sh是上海股市，sz为深圳股市)
http://hq.sinajs.cn/list=sh600000
http://hq.sinajs.cn/list=sz000913
访问: http://hq.sinajs.cn/list=sh601006 返回
var hq_str_sh601006="大秦铁路, 27.55, 27.25, 26.91, 27.55, 26.20, 26.91, 26.92,
22114263, 589824680, 4695, 26.91, 57590, 26.90, 14700, 26.89, 14300,
26.88, 15100, 26.87, 3100, 26.92, 8900, 26.93, 14230, 26.94, 25150, 26.95, 15220, 26.96, 2008-01-11, 15:05:32";
这个字符串由许多数据拼接在一起，不同含义的数据用逗号隔开了，按照程序员的思路，顺序号从0开始。
0：”大秦铁路”，股票名字；
1：”27.55″，今日开盘价；
2：”27.25″，昨日收盘价；
3：”26.91″，当前价格；
4：”27.55″，今日最高价；
5：”26.20″，今日最低价；
6：”26.91″，竞买价，即“买一”报价；
7：”26.92″，竞卖价，即“卖一”报价；
8：”22114263″，成交的股票数，由于股票交易以一百股为基本单位，通常把该值除以一百；
9：”589824680″，成交金额，单位为“元”，通常以“万元”为成交金额的单位，所以通常把该值除以一万；
10：”4695″，“买一”申请4695股，即47手；
11：”26.91″，“买一”报价；
12：”57590″，“买二”
13：”26.90″，“买二”
14：”14700″，“买三”
15：”26.89″，“买三”
16：”14300″，“买四”
17：”26.88″，“买四”
18：”15100″，“买五”
19：”26.87″，“买五”
20：”3100″，“卖一”申报3100股，即31手；
21：”26.92″，“卖一”报价
(22, 23), (24, 25), (26,27), (28, 29)分别为“卖二”至“卖五的情况”
30：”2008-01-11″，日期；
31：”15:05:32″，时间；

 

While 1
        Local $HTML = BinaryToString(InetRead('http://hq.sinajs.cn/list=sh600000'))
        $aArray = StringSplit($HTML, ',')
        $gname = StringSplit($aArray[1], '"')
        $diff = Round($aArray[4] - $aArray[3], 2)
        $diffpercentage = Round($diff / $aArray[3] * 100, 3)
        $strcurrent = '现价: ' & $aArray[4] & '  涨跌幅: ' & $diff & '  涨跌%: ' & $diffpercentage
        $strhigh = '最高: ' & $aArray[5]
        $strlow = '  最低: ' & $aArray[6]
        $strtodayfirst = '  今开: ' & $aArray[2]
        $strold = '  昨收: ' & $aArray[3] & @CRLF
        $strshow2 =  $strhigh &$strlow & $strtodayfirst & $strold
        $strtitle = $gname[2] & ' ' & $strcurrent
        ToolTip($strshow2, 300, 0, $strtitle, 1)
        Sleep(3000)
WEnd

 

转载于:https://www.cnblogs.com/greershk/p/7490185.html