以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  文化代码帮忙转成金字塔的  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=157829)
--  作者：李小妞68
--  发布时间：2017/9/12 12:55:13
--  文化代码帮忙转成金字塔的
/*加载前手动更改Y1,Y2,Z1,Z2,SS的值
Y1-压力1
Y2-压力2
Z1-支撑1
Z2-支撑2
SS-止损
PP-止盈

压力折返开空
支撑折返开多
*/

划线日期:=170907;
划线时间:=0900;
IF (DATE=划线日期 && TIME>划线时间 && TIME<1630) || DATE>划线日期 THEN BEGIN

压力1:Y1,COLORGREEN;
压力2:Y2,COLORGREEN;
支撑1:Z1,COLORYELLOW;
支撑2:Z2,COLORYELLOW;

H>=Y1 && C<Y1,SPK;
H>=Y2 && C<Y2,SPK;

L<=Z1 && C>Z1,BPK;
L<=Z2 && C>Z2,BPK;

END

A:=MINPRICE1;//取模组交易合约的最小变动价位
(C<=BKPRICE-SS*A)&&BKPRICE>0,SP;//低于买开仓价SS个点差，多头止损
(C>=BKPRICE+PP*A)&&BKPRICE>0,SP;//高于买开仓价PP个点差，多头止赢
(C>=SKPRICE+SS*A)&&SKPRICE>0,BP;//高于卖开仓价SS个点差，空头止损
(C<=SKPRICE-PP*A)&&SKPRICE>0,BP;//低于卖开仓价PP个点差，空头止赢

AUTOFILTER;
--  作者：wenarm
--  发布时间：2017/9/12 14:44:29
--  

划线日期:=170907;
划线时间:=0900;
IF (DATE=划线日期 && TIME>划线时间 && TIME<1630) || DATE>划线日期 THEN BEGIN


压力1:Y1,COLORGREEN;
压力2:Y2,COLORGREEN;
支撑1:Z1,COLORYELLOW;
支撑2:Z2,COLORYELLOW;


//H>=Y1 && C<Y1,SPK;
//H>=Y2 && C<Y2,SPK;
if (H>=Y1 and C<Y1) or (H>=Y2 and C<Y2) then begin
 sell(1,HOLDING,MARKET);
 BUYSHORT(1,1,MARKET);

end

//L<=Z1 && C>Z1,BPK;
//L<=Z2 && C>Z2,BPK;

if (L<=Z1 and C>Z1) or (L<=Z2 and C>Z2) then begin
 sellSHORT(1,HOLDING,MARKET);
 BUY(1,1,MARKET);

end


END

 

A:=MINDIFF;//取模组交易合约的最小变动价位
//(C<=BKPRICE-SS*A)&&BKPRICE>0,SP;//低于买开仓价SS个点差，多头止损
if holding>0 and (c<=ENTERPRICE -SS*A) and  ENTERPRICE>0 then begin
 sell(1,HOLDING,MARKET);
end

//(C>=BKPRICE+PP*A)&&BKPRICE>0,SP;//高于买开仓价PP个点差，多头止赢
if holding>0 and (c>=ENTERPRICE+PP*A) and  ENTERPRICE>0 then begin
 sell(1,HOLDING,MARKET);
end
//(C>=SKPRICE+SS*A)&&SKPRICE>0,BP;//高于卖开仓价SS个点差，空头止损
if holding<0 and (c>=ENTERPRICE+SS*A) and  ENTERPRICE>0 then begin
 SELLSHORT(1,HOLDING,MARKET);
end
//(C<=SKPRICE-PP*A)&&SKPRICE>0,BP;//低于卖开仓价PP个点差，空头止赢

if holding<0 and (c<=ENTERPRICE-pp*A) and  ENTERPRICE>0 then begin
 SELLSHORT(1,HOLDING,MARKET);
end