以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://www.weistock.com/bbs/index.asp)
--  高级功能研发区  (http://www.weistock.com/bbs/list.asp?boardid=5)
----  [求助]  (http://www.weistock.com/bbs/dispbbs.asp?boardid=5&id=84727)
--  作者：kumingtc
--  发布时间：2015/9/4 19:56:58
--  [求助]
 我想在逐K线模式下获得图表交易系统中信号发出那根K线的回撤率，不知道这样写对不对？
Sub MARKETDATA_AlarmPleaceOrder(Name, Order, OrderType, Action, Volume, Price, Code, Market, Account)
gethuicelv
masgout "回撤率" & ihuicelv
End Sub

sub gethuicelv(ihuicelv)
set data=marketdata.GetHistoryData("if00","zj",3,1)
ihuicelv=data.close/data.high
end sub
--  作者：yukizzc
--  发布时间：2015/9/7 13:21:09
--  

dim ihuicelv

Sub MARKETDATA_AlarmPleaceOrder(Name, Order, OrderType, Action, Volume, Price, Code, Market, Account)
gethuicelv
application.msgout ihuicelv
End Sub

 

sub gethuicelv()
set data=marketdata.GetHistoryData("if00","zj",3,1)
ihuicelv = data.close(data.count-1)/data.high(data.count-1)
end sub