「翔博精选指标」黄金四色,和谐源码分享（通达信公式 副图 源码

{公式名称: 黄金四色

公式描述: 

无参数

公式类型: 技术指标公式-其他类型

画线方法: 主图叠加

公式版本: 0

显示小数: 缺省位数

坐标线位置: 自动

额外Y轴分界: 无

 

参数精灵:无

用法注释:无

公式源码:}

DRAWGBK(CLOSE>0,RGB(20,0,28),RGB(20,0,28),0,0,1);

XA_1:=120;

XA_2:=BARSLAST(CURRBARSCOUNT=XA_1);

XA_3:=CONST(IF(ISLASTBAR=1,HHV(HIGH,XA_2),0));

XA_4:=CONST(IF(ISLASTBAR=1,LLV(LOW,XA_2),0));

XA_5:=XA_3-XA_4;

高:IF(CURRBARSCOUNT<=XA_1,XA_3,DRAWNULL),POINTDOT,COLORYELLOW;

压:IF(CURRBARSCOUNT<=XA_1,XA_3-XA_5*0.191,DRAWNULL),NODRAW,COLORMAGENTA;

平衡:IF(CURRBARSCOUNT<=XA_1,XA_4+XA_5/2,DRAWNULL),NODRAW,COLORYELLOW;

支撑:IF(CURRBARSCOUNT<=XA_1,XA_4+XA_5*0.191,DRAWNULL),NODRAW,COLORGREEN;

低:IF(CURRBARSCOUNT<=XA_1,XA_4,DRAWNULL),POINTDOT,COLORGREEN;

天:BARSLAST(LOW=XA_4),NODRAW,COLORYELLOW;

STICKLINE(CURRBARSCOUNT<=XA_1,平衡,平衡,3,(-1)),COLORWHITE;

STICKLINE(CURRBARSCOUNT<=XA_1,压,压,3,(-1)),COLORRED;

STICKLINE(CURRBARSCOUNT<=XA_1,支撑,支撑,3,(-1)),COLORGREEN;

DRAWTEXT(CURRBARSCOUNT=1,压,1),COLORRED;

DRAWTEXT(CURRBARSCOUNT=1,平衡,2),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=1,支撑,3),COLORYELLOW;

XA_6:=EMA(CLOSE,21);

XA_7:=XA_6<REF(XA_6,1);

XA_8:=IF(XA_7-1,XA_6,DRAWNULL);

XA_9:=EMA(CLOSE,3)>EMA(CLOSE,21);

XA_10:=EMA(CLOSE,3)<EMA(CLOSE,21);

XA_11:=EMA(CLOSE,3)>EMA(CLOSE,8);

XA_12:=EMA(CLOSE,3)<EMA(CLOSE,8);

STICKLINE(XA_9,LOW,HIGH,0,0),COLOR0088EE;

STICKLINE(XA_9,CLOSE,OPEN,3,0),COLOR0055AA;

STICKLINE(XA_9,CLOSE,OPEN,2.8,0),COLOR0066BB;

STICKLINE(XA_9,CLOSE,OPEN,2.5,0),COLOR0077CC;

STICKLINE(XA_9,CLOSE,OPEN,2.2,0),COLOR0088DD;

STICKLINE(XA_9,CLOSE,OPEN,1.7,0),COLOR0099EE;

STICKLINE(XA_9,CLOSE,OPEN,1.2,0),COLOR00AAFF;

STICKLINE(XA_9,CLOSE,OPEN,0.7,0),COLOR00CCFF;

STICKLINE(XA_9,CLOSE,OPEN,0.2,0),COLORYELLOW;

STICKLINE(XA_10,HIGH,LOW,0,1),COLORGREEN;

STICKLINE(XA_10,CLOSE,OPEN,3.2,0),COLOR006600;

STICKLINE(XA_10,CLOSE,OPEN,2.6,0),COLOR008800;

STICKLINE(XA_10,CLOSE,OPEN,1.9,0),COLOR00AA00;

STICKLINE(XA_10,CLOSE,OPEN,1.1,0),COLOR00CC00;

STICKLINE(XA_10,CLOSE,OPEN,0.3,0),COLORGREEN;

STICKLINE(XA_10 AND XA_11,HIGH,LOW,0,1),COLORFF55FF;

STICKLINE(XA_10 AND XA_11,CLOSE,OPEN,3.2,0),COLOR880088;

STICKLINE(XA_10 AND XA_11,CLOSE,OPEN,2.6,0),COLORAA00AA;

STICKLINE(XA_10 AND XA_11,CLOSE,OPEN,1.9,0),COLORCC00CC;

STICKLINE(XA_10 AND XA_11,CLOSE,OPEN,1.1,0),COLOREE00EE;

STICKLINE(XA_10 AND XA_11,CLOSE,OPEN,0.3,0),COLORFF44FF;

STICKLINE(XA_9 AND XA_12,HIGH,LOW,0,1),COLORFF8800;

STICKLINE(XA_9 AND XA_12,CLOSE,OPEN,3.2,0),COLORFF2200;

STICKLINE(XA_9 AND XA_12,CLOSE,OPEN,2.6,0),COLORFF4400;

STICKLINE(XA_9 AND XA_12,CLOSE,OPEN,1.9,0),COLORFF6600;

STICKLINE(XA_9 AND XA_12,CLOSE,OPEN,1.1,0),COLORFF8800;

STICKLINE(XA_9 AND XA_12,CLOSE,OPEN,0.3,0),COLORFFAA00;

DRAWTEXT(CURRBARSCOUNT=XA_1/2+9,XA_3-XA_5/12,4),COLORYELLOW;

DRAWTEXT(CURRBARSCOUNT=XA_1/2+9,XA_3-XA_5/3,5),COLORGREEN;

DRAWTEXT(CURRBARSCOUNT=XA_1/2+9,XA_4+XA_5/3,6),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=XA_1/2+9,XA_4+XA_5/10,7),COLORCYAN;

XA_13:=EMA(CLOSE,13)-EMA(CLOSE,55);

XA_14:=EMA(0.618*REF(XA_13,1)+0.382*XA_13,3);

XA_15:=REF(CLOSE,1);

XA_16:=EMA(HHV(HIGH,1),8);

XA_17:=EMA(CLOSE,8);

XA_18:=XA_17<REF(XA_17,1) AND CLOSE<XA_17;

XA_19:=IF(XA_16<REF(XA_16,1) OR XA_18,1,0);

XA_20:=SMA(MAX(CLOSE-XA_15,0),2,1)/SMA(ABS(CLOSE-XA_15),2,1)*100;

XA_21:=45;

XA_22:=20;

XA_23:=XA_20<XA_21 AND REF(XA_20,1)>XA_21;

XA_24:=XA_20<XA_22 AND REF(XA_20,1)>XA_22;

XA_25:=(COUNT(XA_19=1,4)=3 AND XA_19=0 AND OPEN<CLOSE AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.065)*10>=10 OR ((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.065 AND (REF(XA_24,1) OR REF(XA_23,1)));

DRAWICON(XA_25,LOW,7);

STICKLINE(XA_25,LOW,LOW+(HIGH-LOW)/2,2.7,0),COLORYELLOW;