公式指标平台 股票指标公式源码分享 登录 注册
公式指标平台
未来函数检测
首 页 金钻指标 通达信公式 大智慧公式 同花顺公式 文华财经公式 操盘手公式 东财通公式 飞狐公式 其他公式 公式解答 股票软件 股票池
当前位置:→ 公式指标平台 > 飞狐公式 > 正文 → 正文

主副套装指标源码

发布时间:2015/4/14 6:58:46  浏览次数:

(主图)
{////////////////////////////////////}
 {平均价格}
A:=(3*C+H+L+O)/6;
 XJ:=(A+0.618*REF(A,1)+0.382*REF(A,2)+0.236*REF(A,3)+0.146*REF(A,4))/2.382;
 YCZXH:=(MA(HHV(A,2),5)+MA(HHV(A,2),13)+MA(HHV(A,2),21)+MA(HHV(A,2),32))/4;
 YCZXL:=(MA(LLV(A,2),5)+MA(LLV(A,2),13)+MA(LLV(A,2),21)+MA(LLV(A,2),32))/4;
 SMH:=EMA(YCZXH,21);
 SML:=EMA(YCZXL,21);
 SMJ:=(SML+SMH)/2;

PJ:=(10*A+9*REF(A,1)+8*REF(A,2)+7*REF(A,3)+6*REF(A,4)+5*REF(A,5)+4*REF(A,6)+3*REF(A,7)+2*REF(A,8)+REF(A,9))/55;
 A1:=EMA(PJ,3),COLOR004000;A2:=EMA(PJ,5),COLOR004000;
 A3:=EMA(PJ,7),COLOR004000;A4:=EMA(PJ,9),COLOR004000;
 A5:=EMA(PJ,11),COLOR004000;

LX:=REF(XJ,1);
 ZD:=(SMA(MAX(XJ-LX,0),5,1)/SMA(ABS(XJ-LX),5,1))*100;
 KX1:=(CLOSE>=OPEN) AND ZD>=50;
 KX2:=(CLOSE<OPEN) AND ZD>=50;
 KX3:=(CLOSE>=OPEN) AND ZD<50;
 KX4:=(CLOSE<OPEN) AND ZD<50;
 {////////////////////////////////////}
 PARTLINE(1,SMH),COLOR004000;
 PARTLINE(1,SML),COLOR004000;
 PARTLINE(1,SMJ),COLOR004000;

PARTLINE(A5<REF(A5,1),A5),COLOR820000,LINETHICK2;
 PARTLINE(A5>REF(A5,1),A5),COLOR00005B,LINETHICK2;
 PARTLINE(A4<REF(A4,1),A4),COLOR8C0000,LINETHICK1;
 PARTLINE(A4>REF(A4,1),A4),COLOR000055,LINETHICK1;
 PARTLINE(A3<REF(A3,1),A3),COLOR9B0000,LINETHICK1;
 PARTLINE(A3>REF(A3,1),A3),COLOR00006C,LINETHICK1;
 PARTLINE(A2<REF(A2,1),A2),COLORBB0000,LINETHICK1;
 PARTLINE(A2>REF(A2,1),A2),COLOR00007D,LINETHICK1;
 PARTLINE(A1<REF(A1,1),A1),COLORCC0000,LINETHICK1;
 PARTLINE(A1>REF(A1,1),A1),COLOR00009B,LINETHICK1;

STICKLINE(KX1,C,O,4,1),COLOR4440FF;
 STICKLINE(KX1,C,H,0.5,1),COLOR4440FF;
 STICKLINE(KX1,O,L,0.5,1),COLOR4440FF;
 STICKLINE(KX2,C,O,4,0),COLOR4440FF;
 STICKLINE(KX2,O,H,0.5,0),COLOR4440FF;
 STICKLINE(KX2,C,L,0.5,0),COLOR4440FF;
 STICKLINE(KX3,C,O,4,1),COLORFFFF33;
 STICKLINE(KX3,C,H,0.5,1),COLORFFFF33;
 STICKLINE(KX3,O,L,0.5,1),COLORFFFF33;
 STICKLINE(KX4,C,O,4,0),COLORFFFF33;
 STICKLINE(KX4,O,H,0.5,0),COLORFFFF33;
 STICKLINE(KX4,C,L,0.5,0),COLORFFFF33;


(副图
{////////////////////////////////////////////////}
A:=(C*3+O+H+L)/6;
 XJ:=(A+0.618*REF(A,1)+0.382*REF(A,2)+0.236*REF(A,3)+0.146*REF(A,4))/2.382;
 LX:=REF(XJ,1);
 ZD1:=(SMA(MAX(XJ-LX,0),5,1)/SMA(ABS(XJ-LX),5,1))*100;
 ZD2:=(SMA(MAX(XJ-LX,0),7,1)/SMA(ABS(XJ-LX),7,1))*100;
 LSC:=REF(C,4);
 RMI:=SMA(MAX(C-LSC,0),7,1)/SMA(ABS(C-LSC),7,1)*100;
 RMIM:=SMA(RMI,3,1);RMIMA:=SMA(RMIM,3,1);FRMIM:=RMIMA-100;
 {/////////////////////////////////////////////////}
 REFLINE:100,50,0,-100;
 FILLRGN(1,35,20),COLOR000040;
 FILLRGN(1,65,80),COLOR002000;
 PARTLINE(1,ZD1),COLOR0000FF;
 PARTLINE(1,ZD2),COLOR00FFFF;
 STICKLINE(RMIMA>=50,-50,FRMIM,4,0),COLOR000080;
 STICKLINE(RMIMA>=50,-50,FRMIM,3,0),COLOR0000A6;
 STICKLINE(RMIMA>=50,-50,FRMIM,2,0),COLOR0000CE;
 STICKLINE(RMIMA>=50,-50,FRMIM,1,0),COLOR0000FF;
 STICKLINE(RMIMA<50,-50,FRMIM,4,0),COLOR800000;
 STICKLINE(RMIMA<50,-50,FRMIM,3,0),COLORB00000;
 STICKLINE(RMIMA<50,-50,FRMIM,2,0),COLORD50000;
 STICKLINE(RMIMA<50,-50,FRMIM,1,0),COLORFF0000;
 STICKLINE(FRMIM<-80,-80,FRMIM,0.5,1),COLOR008080;
 STICKLINE(FRMIM>-20,-20,FRMIM,0.5,1),COLOR0080FF;


主副套装指标源码

资源下载链接   资源大小:unknow

手机移动版 - 关于我们 - 联系我们 - 广告合作 - 下载声明 - 网站帮助 - 友情链接 - 网站地图 - TOP
湘ICP备09016573号 增值电信业务经营ICP许可证:湘B2-20210269 湘公网安备43108102000039号
Copyright © GSZB.COM ,All Rights Reserved.
股票公式,股票指标,股票软件,股票知识