以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  为太极解答的问题代码  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=3254)

--  作者:夏小飞
--  发布时间:2010/10/14 16:40:03
--  为太极解答的问题代码

上轨=开盘+0.1倍昨日震幅 
下轨=开盘-0.1昨日震幅
上轨二=开盘+0.5倍昨日震幅
下轨二=开盘-0.5倍昨日震幅


突破上轨做空,下轨止盈上轨二止损

 

//比如昨天是收盘价格是10,最高是11,最低是9 那么昨天是振幅是20%

那么上轨就是=开盘+(0.1*0.2),如果今天开盘是8,那么就是8+0.02

 

variable:maxprofit=0;
HY:=HHV( HIGH, 1 );{昨天最高价}
LY:=HHV( LOW, 1 );{昨天最高价}
CBY:=HHV( HIGH, 2 );{前天收盘价}

ZF:=(HY-LY)/CBY*100%;{昨天振幅}
SG:=OPEN+(ZF * 0.1);
XG:=OPEN-(ZF * 0.1);
SG2:=OPEN+(ZF * 0.5);
XG2:=OPEN-(ZF * 0.5);
close


//有2%振幅就买空
IF close=>SG THEN
BEGIN
 BUYSHORT(1,1);
 maxprofit:=0;
END

if holding > 0 and enterbars > 0 then
begin

//出现浮动亏损是开盘-0.5倍昨日震幅 止损
止损:SELLSHORT(close=>SG2 and openprofit < 0, 0);
 
///出现浮动盈利是开盘-0.1昨日震幅 止赢
止赢:SELLSHORT(close=<XG  and openprofit > 0, 0);
end