以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  策略编写求助区  (http://weistock.com/bbs/list.asp?boardid=11)
----  [求助]用RSI写个小程序  (http://weistock.com/bbs/dispbbs.asp?boardid=11&id=54694)
--  作者：jackie123
--  发布时间：2013/8/5 17:15:09
--  [求助]用RSI写个小程序
谁帮忙写个用RSI写个图表的小策略？

想法如下：当DMI里PDI+MDI<40时，RSI1〈20时买入开仓，当RSI1>80时平仓，并反向开空仓；RSI1〉80时相反。
--  作者：fly
--  发布时间：2013/8/5 17:31:09
--  
请您耐心等待
--  作者：jinzhe
--  发布时间：2013/8/6 15:46:17
--  

 

mdi:=stkindi(stklabel,\'dmi.mdi\',0,datatype);//调用指标数据
pdi:=stkindi(stklabel,\'dmi.pdi\',0,datatype);//调用指标数据
rsi1:=stkindi(stklabel,\'rsi.rsi1\',0,datatype);//调用指标数据

 

//DMI里PDI+MDI<40时,且RSI1<20时平平仓反手开多仓

if pdi+mdi<40 and rsi1<20  then begin
 sellshort(holding<0,0,market);
 buy(holding=0,1,market);
end

 

//DMI里PDI+MDI<40时,且RSI1>80时平多仓反手开空仓

if pdi+mdi<40 and rsi1>80 then begin
 sell(holding>0,0,market);
 buyshort(holding=0,1,market);
end