通达信动态黄金分割主图指标公式源码

[复制链接]
查看54 | 回复0 | 2022-7-24 08:28:46 | 显示全部楼层 |阅读模式

通达信动态黄金分割主图指标公式源码

源码:
 DRAWGBK(1,RGB(0,0,0),RGB(0,0,0),0,'BJ',0); {背景}
 {布林}
MA21:MA(CLOSE,21)COLORFFA900,CROSSDOT,LINETHICK2;
布林上:MA21+2*STD(CLOSE,21),COLORFFA900,LINETHICK2;
布林下:MA21-2*STD(CLOSE,21),COLORFFA900,LINETHICK2;
 STICKLINE(MA21>=REF(MA21,1),布林上,MA21,5,0),COLOR000088;{上涨彩带可以去掉}
STICKLINE(MA21<REF(MA21,1),MA21,布林下,5,0),COLOR880000;{下跌彩带可以去掉}

MA5:MA(CLOSE,5),COLORWHITE;
 MA13:MA(CLOSE,13)COLORMAGENTA;
 DRAWBAND(MA5,RGB(188,0,188),MA13,RGB(0,88,0));{短线波段彩带可以去掉}
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
 {以上内容全部可以去掉,以下内容可以叠加或复制到任何指标中}
 {动态黄金分割}
FG:IF (HIGH>PEAK(1,7,1),HHV(HIGH,21),PEAK(1,7,1)),COLORGREEN;
 FD:IF (LOW<TROUGH(2,7,1),LLV(LOW,21),TROUGH(2,7,1)),COLORRED;
分割0.191:(FG-FD)*0.191+FD,DOTLINE,COLORMAGENTA;
分割0.382:(FG-FD)*0.382+FD,DOTLINE,COLORCYAN;
分割0.5:(FG-FD)*0.5+FD,DOTLINE,COLORGREEN;
分割0.618:(FG-FD)*0.618+FD,DOTLINE,COLORCYAN;
分割0.809:(FG-FD)*0.809+FD,DOTLINE,COLORYELLOW;
 DRAWTEXT(ISLASTBAR>0 ,ABS(分割0.191),'F0.191')COLORMAGENTA;
 DRAWTEXT(ISLASTBAR>0 ,ABS(分割0.382),'F0.382')COLORCYAN;
 DRAWTEXT(ISLASTBAR>0 ,ABS(分割0.5),'F0.500')COLORGREEN;
 DRAWTEXT(ISLASTBAR>0 ,ABS(分割0.618),'F0.618')COLORCYAN;
 DRAWTEXT(ISLASTBAR>0 ,ABS(分割0.809),'F0.809')COLORYELLOW;
 {以下是理想论坛指标,组合进来很好}
 {斐波那契时间坐标以阶段低点为起点}
低:=CONST(LLV(L,377)); {周期数377,自己调}
LTJ:= L=低;
LSJ:=BARSLAST(LTJ)+1;
 DRAWTEXT(LSJ=3,LOW*0.995,'↑3G')COLORYELLOW;
 DRAWTEXT(LSJ=5,LOW*0.995,'↑5G')COLORYELLOW;
 DRAWTEXT(LSJ=8,LOW*0.995,'↑8G')COLORYELLOW;
 DRAWTEXT(LSJ=13,LOW*0.995,'↑13G')COLORYELLOW;
 DRAWTEXT(LSJ=21,LOW*0.995,'↑21G')COLORYELLOW;
 DRAWTEXT(LSJ=34,LOW*0.995,'↑34G')COLORYELLOW;
 DRAWTEXT(LSJ=55,LOW*0.995,'↑55G')COLORYELLOW;
 DRAWTEXT(LSJ=89,LOW*0.995,'↑89G')COLORYELLOW;
 DRAWTEXT(LSJ=144,LOW*0.995,'↑144G')COLORYELLOW;
 DRAWTEXT(LSJ=233,LOW*0.995,'↑233G')COLORYELLOW;
 DRAWTEXT(LSJ=377,LOW*0.995,'↑377G')COLORYELLOW;
 {斐波那契时间坐标以阶段高点为起点}
高:=CONST(HHV(H,120));{周期120}
 H_L:=高-低;{阶段高低差}
HTJ:= H=高;
HSJ:=BARSLAST(HTJ)+1;
 H00:=高+H_L*0.01;
 DRAWTEXT(HSJ=3,HIGH*1.01,'↓3天')COLORCYAN;
 DRAWTEXT(HSJ=5,HIGH*1.01,'↓5天')COLORCYAN;
 DRAWTEXT(HSJ=8,HIGH*1.01,'↓8天')COLORCYAN;
 DRAWTEXT(HSJ=13,HIGH*1.01,'↓13天')COLORCYAN;
 DRAWTEXT(HSJ=21,HIGH*1.01,'↓21天')COLORCYAN;
 DRAWTEXT(HSJ=34,HIGH*1.01,'↓34天')COLORCYAN;
 DRAWTEXT(HSJ=55,HIGH*1.01,'↓55天')COLORCYAN;
 DRAWTEXT(HSJ=89,HIGH*1.01,'↓89天')COLORCYAN;
 DRAWTEXT(HSJ=144,HIGH*1.01,'↓144天')COLORCYAN;
 DRAWTEXT(HSJ=233,HIGH*1.01,'↓233天')COLORCYAN;
 DRAWTEXT(HSJ=377,HIGH*1.01,'↓377天')COLORCYAN;


 说明:斐波那契以及江恩对牛牛指标漂泊的人来说是两位伟大的牛人!
 我把他们的神奇作为分析形态,预测点位的重要依据,如果主图公式限制取消,加上农历的节气,就更加完美,控制时空点位和转折点具有非凡的意义。
 背景需要把图BJ.zip解压放进T0002/signals文件夹中

193955785.jpg

193955785.jpg

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则