您现在的位置：程序化交易>> 股票公式>> 其他>> 其他软件公式>>正文内容

周期全息图衡量股票的强弱和方向 指标 股票 公式[其他软件公式]

作者：飞狐 指标 公式 源码 来源：cxh99.com 发布时间：2023年03月12日 点击数： 　【收藏到本网的会员中心】
指标说明：
 
aaa引入.探索者指标是用来衡量股票的强弱和方向的，它是通过计算收盘价与13日均线的偏离程度来得到的。当偏离程度较大时，说明股票有较强的趋势性，当偏离程度较小时，说明股票处于震荡或反转状态。
 
aaa引入.zs指标是用来衡量股票的波动幅度和买卖点的，它是通过计算收盘价与5日均线、10日均线、20日均线、30日均线、60日均线之间的距离来得到的。当距离较大时，说明股票有较大的波动空间，当距离较小时，说明股票有可能出现拐点或回调。
 
两个指标结合起来，可以形成一个完整的交易系统。例如，当探索者指标为正且逐渐增大时，说明股票处于上涨趋势中；当zs指标为正且逐渐减小时，说明股票接近顶部或需要回调；此时可以考虑卖出或减仓。反之亦然。

 

 

先建一个引用指标


{AAA引入}

 

 
cxh1:=1/WINNER(C);
cxh2:=(C-MA(C,13))/MA(C,13)*100;
cxh3:=100-ABS(cxh2);
cxh4:=3*SMA((C-LLV(L,75))/(HHV(H,75)-LLV(L,75))*100,20,1)-2*SMA(SMA((C-LLV(L,75))/(HHV(H,75)-LLV(L,75))*100,20,1),15,1);
cxh5:=3*SMA((O-LLV(L,75))/(HHV(H,75)-LLV(L,75))*100,20,1)-2*SMA(SMA((O-LLV(L,75))/(HHV(H,75)-LLV(L,75))*100,20,1),15,1);
cxh6:=100-cxh5;
cxh7:=100-cxh4;
cxh8:=MA(WINNER(C*0.95)*100,3);
cxh9:=IF(cxh1>5,IF(cxh1<100,cxh1,cxh3-10),0);
cxhA:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
cxhB:=SMA(cxhA,3,1);
cxhC:=SMA(cxhB,3,1);
cxhE:=(-1)*(EMA(cxh7,12)-50)+50;
探索者:EMA(3*cxhB-2*cxhC,3),COLORWHITE;
ZS:MA(探索者,3),COLORRED;
ZM:MA(MA(探索者,3),3),COLORBROWN;
 
 
 
 
 
 
公式：
{周期全息主图}
 
 
 
aaat:=STKINDI('','aaa引入.探索者',0,0);
zst:=STKINDI('','aaa引入.zs',0,0);
aaa1:=STKINDI('','aaa引入.探索者',0,1);
zs1:=STKINDI('','aaa引入.zs',0,1);
aaa5:=STKINDI('','aaa引入.探索者',0,2);
zs5:=STKINDI('','aaa引入.zs',0,2);
aaa15:=STKINDI('','aaa引入.探索者',0,3);
zs15:=STKINDI('','aaa引入.zs',0,3);
aaa30:=STKINDI('','aaa引入.探索者',0,4);
zs30:=STKINDI('','aaa引入.zs',0,4);
aaa60:=STKINDI('','aaa引入.探索者',0,5);
zs60:=STKINDI('','aaa引入.zs',0,5);
aaah:=STKINDI('','aaa引入.探索者',0,11);
zsh:=STKINDI('','aaa引入.zs',0,11);
aaad:=STKINDI('','aaa引入.探索者',0,6);
zsd:=STKINDI('','aaa引入.zs',0,6);
aaaw:=STKINDI('','aaa引入.探索者',0,7);
zsw:=STKINDI('','aaa引入.zs',0,7);
aaam:=STKINDI('','aaa引入.探索者',0,8);
zsm:=STKINDI('','aaa引入.zs',0,8);
aaay:=STKINDI('','aaa引入.探索者',0,9);
zsy:=STKINDI('','aaa引入.zs',0,9);
CCT:=aaaT;
zdT:=CCT[SYSPARAM(3)];
CDT:=MAX(1,ABS(INTPART(10*zdt/100)));
HXT:='_________________________________________________________';
IF ZDT>=0 THEN BEGIN
DRAWTEXTEX(1,0,250,38,STRLEFT(HXt,CDt)),COLORCF;
DRAWTEXTEX(1,0,250,39,STRLEFT(HXt,CDt)),COLOREF;
DRAWTEXTEX(1,0,250,40,STRLEFT(HXt,CDt)),COLOR60FF;
DRAWTEXTEX(1,0,250,41,STRLEFT(HXt,CDt)),COLORA1FF;
DRAWTEXTEX(1,0,250,42,STRLEFT(HXt,CDt)),COLORCAFF;
DRAWTEXTEX(1,0,250,43,STRLEFT(HXt,CDt)),COLOR60FFFF;
DRAWTEXTEX(1,0,250,44,STRLEFT(HXt,CDt)),COLORD5FF;
DRAWTEXTEX(1,0,250,45,STRLEFT(HXt,CDt)),COLORC4FF;
DRAWTEXTEX(1,0,250,46,STRLEFT(HXt,CDt)),COLORA0FF;
DRAWTEXTEX(1,0,250,47,STRLEFT(HXt,CDt)),COLOR7FFF;
DRAWTEXTEX(1,0,250,48,STRLEFT(HXt,CDt)),COLOR50FF;
DRAWTEXTEX(1,0,250,49,STRLEFT(HXt,CDt)),COLOREF;
DRAWTEXTEX(1,0,250,50,STRLEFT(HXt,CDt)),COLORCF;
end;
ELSE BEGIN
DRAWTEXTEX(1,0,250,38,STRLEFT(HXt,CDt)),COLOR7E00;
DRAWTEXTEX(1,0,250,39,STRLEFT(HXt,CDt)),COLOR8E00;
DRAWTEXTEX(1,0,250,40,STRLEFT(HXt,CDt)),COLORAE00;
DRAWTEXTEX(1,0,250,41,STRLEFT(HXt,CDt)),COLORBE00;
DRAWTEXTEX(1,0,250,42,STRLEFT(HXt,CDt)),COLORCE00;
DRAWTEXTEX(1,0,250,43,STRLEFT(HXt,CDt)),COLORDE00;
DRAWTEXTEX(1,0,250,44,STRLEFT(HXt,CDt)),COLORFF60;
DRAWTEXTEX(1,0,250,45,STRLEFT(HXt,CDt)),COLORDE30;
DRAWTEXTEX(1,0,250,46,STRLEFT(HXt,CDt)),COLORCE00;
DRAWTEXTEX(1,0,250,47,STRLEFT(HXt,CDt)),COLORBE00;
DRAWTEXTEX(1,0,250,48,STRLEFT(HXt,CDt)),COLORAE00;
DRAWTEXTEX(1,0,250,49,STRLEFT(HXt,CDt)),COLOR9E00;
DRAWTEXTEX(1,0,250,50,STRLEFT(HXt,CDt)),COLOR8E00;
DRAWTEXTEX(1,0,250,51,STRLEFT(HXt,CDt)),COLOR7E00;
DRAWTEXTEX(1,0,250,52,STRLEFT(HXt,CDt)),COLOR7E00;
end;CC1:=aaa1;
zd1:=CC1[SYSPARAM(3)];
CD1:=MAX(1,ABS(INTPART(10*zd1/100)));
HX1:='_________________________________________________________';
IF ZD1>=0 THEN BEGIN
DRAWTEXTEX(1,0,250,53,STRLEFT(HX1,CD1)),COLORCF;
DRAWTEXTEX(1,0,250,54,STRLEFT(HX1,CD1)),COLOREF;
DRAWTEXTEX(1,0,250,55,STRLEFT(HX1,CD1)),COLOR60FF;
DRAWTEXTEX(1,0,250,56,STRLEFT(HX1,CD1)),COLORA1FF;
DRAWTEXTEX(1,0,250,57,STRLEFT(HX1,CD1)),COLORCAFF;
DRAWTEXTEX(1,0,250,58,STRLEFT(HX1,CD1)),COLOR60FFFF;
DRAWTEXTEX(1,0,250,59,STRLEFT(HX1,CD1)),COLORD5FF;
DRAWTEXTEX(1,0,250,60,STRLEFT(HX1,CD1)),COLORC4FF;
DRAWTEXTEX(1,0,250,61,STRLEFT(HX1,CD1)),COLORA0FF;
DRAWTEXTEX(1,0,250,62,STRLEFT(HX1,CD1)),COLOR7FFF;
DRAWTEXTEX(1,0,250,63,STRLEFT(HX1,CD1)),COLOR50FF;
DRAWTEXTEX(1,0,250,64,STRLEFT(HX1,CD1)),COLOREF;
DRAWTEXTEX(1,0,250,65,STRLEFT(HX1,CD1)),COLORCF;
end;
ELSE BEGIN
DRAWTEXTEX(1,0,250,53,STRLEFT(HX1,CD1)),COLOR7E00;
DRAWTEXTEX(1,0,250,54,STRLEFT(HX1,CD1)),COLOR8E00;
DRAWTEXTEX(1,0,250,55,STRLEFT(HX1,CD1)),COLORAE00;
DRAWTEXTEX(1,0,250,56,STRLEFT(HX1,CD1)),COLORBE00;
DRAWTEXTEX(1,0,250,57,STRLEFT(HX1,CD1)),COLORCE00;
DRAWTEXTEX(1,0,250,58,STRLEFT(HX1,CD1)),COLORDE00;
DRAWTEXTEX(1,0,250,59,STRLEFT(HX1,CD1)),COLORFF60;
DRAWTEXTEX(1,0,250,60,STRLEFT(HX1,CD1)),COLORDE30;
DRAWTEXTEX(1,0,250,61,STRLEFT(HX1,CD1)),COLORCE00;
DRAWTEXTEX(1,0,250,62,STRLEFT(HX1,CD1)),COLORBE00;
DRAWTEXTEX(1,0,250,63,STRLEFT(HX1,CD1)),COLORAE00;
DRAWTEXTEX(1,0,250,64,STRLEFT(HX1,CD1)),COLOR9E00;
DRAWTEXTEX(1,0,250,65,STRLEFT(HX1,CD1)),COLOR8E00;
DRAWTEXTEX(1,0,250,66,STRLEFT(HX1,CD1)),COLOR7E00;
DRAWTEXTEX(1,0,250,67,STRLEFT(HX1,CD1)),COLOR7E00;
end;CC5:=aaa5;
zd5:=CC5[SYSPARAM(3)];
CD5:=MAX(1,ABS(INTPART(10*zd5/100)));
HX5:='_________________________________________________________';
IF ZD5>=0 THEN BEGIN
DRAWTEXTEX(1,0,250,68,STRLEFT(HX5,CD5)),COLORCF;
DRAWTEXTEX(1,0,250,69,STRLEFT(HX5,CD5)),COLOREF;
DRAWTEXTEX(1,0,250,70,STRLEFT(HX5,CD5)),COLOR60FF;
DRAWTEXTEX(1,0,250,71,STRLEFT(HX5,CD5)),COLORA1FF;
DRAWTEXTEX(1,0,250,72,STRLEFT(HX5,CD5)),COLORCAFF;
DRAWTEXTEX(1,0,250,73,STRLEFT(HX5,CD5)),COLOR60FFFF;
DRAWTEXTEX(1,0,250,74,STRLEFT(HX5,CD5)),COLORD5FF;
DRAWTEXTEX(1,0,250,75,STRLEFT(HX5,CD5)),COLORC4FF;
DRAWTEXTEX(1,0,250,76,STRLEFT(HX5,CD5)),COLORA0FF;
DRAWTEXTEX(1,0,250,77,STRLEFT(HX5,CD5)),COLOR7FFF;
DRAWTEXTEX(1,0,250,78,STRLEFT(HX5,CD5)),COLOR50FF;
DRAWTEXTEX(1,0,250,79,STRLEFT(HX5,CD5)),COLOREF;
DRAWTEXTEX(1,0,250,80,STRLEFT(HX5,CD5)),COLORCF;
end;
ELSE BEGIN
DRAWTEXTEX(1,0,250,69,STRLEFT(HX5,CD5)),COLOR7E00;
DRAWTEXTEX(1,0,250,70,STRLEFT(HX5,CD5)),COLOR8E00;
DRAWTEXTEX(1,0,250,71,STRLEFT(HX5,CD5)),COLORAE00;
DRAWTEXTEX(1,0,250,72,STRLEFT(HX5,CD5)),COLORBE00;
DRAWTEXTEX(1,0,250,73,STRLEFT(HX5,CD5)),COLORCE00;
DRAWTEXTEX(1,0,250,74,STRLEFT(HX5,CD5)),COLORDE00;
DRAWTEXTEX(1,0,250,75,STRLEFT(HX5,CD5)),COLORFF60;
DRAWTEXTEX(1,0,250,76,STRLEFT(HX5,CD5)),COLORDE30;
DRAWTEXTEX(1,0,250,77,STRLEFT(HX5,CD5)),COLORCE00;
DRAWTEXTEX(1,0,250,78,STRLEFT(HX5,CD5)),COLORBE00;
DRAWTEXTEX(1,0,250,79,STRLEFT(HX5,CD5)),COLORAE00;
DRAWTEXTEX(1,0,250,80,STRLEFT(HX5,CD5)),COLOR9E00;
DRAWTEXTEX(1,0,250,81,STRLEFT(HX5,CD5)),COLOR8E00;
DRAWTEXTEX(1,0,250,82,STRLEFT(HX5,CD5)),COLOR7E00;
DRAWTEXTEX(1,0,250,83,STRLEFT(HX5,CD5)),COLOR7E00;
end;CC15:=aaa15;
zd15:=CC15[SYSPARAM(3)];
CD15:=MAX(1,ABS(INTPART(10*zd15/100)));
HX15:='_________________________________________________________';
IF ZD15>=0 THEN BEGIN
DRAWTEXTEX(1,0,250,84,STRLEFT(HX15,CD15)),COLORCF;
DRAWTEXTEX(1,0,250,85,STRLEFT(HX15,CD15)),COLOREF;
DRAWTEXTEX(1,0,250,86,STRLEFT(HX15,CD15)),COLOR60FF;
DRAWTEXTEX(1,0,250,87,STRLEFT(HX15,CD15)),COLORA1FF;
DRAWTEXTEX(1,0,250,88,STRLEFT(HX15,CD15)),COLORCAFF; 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】

 

 

有思路，想编写各种指标公式，交易模型，选股公式，还原公式的朋友

可联系技术人员 QQ: 262069696  点击在线交流或微信：cxhjy888 进行 有偿收费 编写！(注：由于人数限制，QQ或微信请选择方便的一个联系我们就行，加好友时请简单备注下您的需求，否则无法通过。谢谢您！)

（怎么收费，代编流程等详情请点击查阅！）

(注：由于人数限制，QQ或微信请选择方便的一个联系我们就行，加好友时请简单备注下您的需求，否则无法通过。谢谢您！)

 


【字体：小 大】【打印文章】【查看评论】

相关文章

    没有相关内容

栏目导航

 本月热门排行

 用户常看内容