黄金K线，修饰得很漂亮的K线主图

{黄金K线}

M:=135;

DRAWGBK(1,RGB(38.200001,16.799999,6.18),RGB(16.799999,38.200001,6.18),0,1,0);

XA_1:=EMA(EMA(EMA(CLOSE,5),8),13);

XA_2:=(XA_1-REF(XA_1,1))/REF(XA_1,1)*618;

XA_3:=MA(XA_2,8);

XA_4:=XA_2-XA_3;

XA_5:=SMA(XA_4,3,1);

XA_6:=19000000+DATE;

XA_7:=209912.3125;

XA_8:=100*XA_7;

短:WMA(EXPMA((3*CLOSE+2*OPEN+HIGH+LOW)/7,3),3),COLORWHITE;

道:IF(XA_6<=XA_8,SMA(短,8,1),DRAWNULL),COLORCC99AA,LINETHICK2;

IF(XA_2>=XA_3 AND XA_6<=XA_8,道,DRAWNULL),COLOR6600CC,LINETHICK2;

XA_9:=BARSLAST(XA_4>=REF(XA_4,1)) AND XA_6<=XA_8;

XA_10:=BARSLAST(XA_4<=REF(XA_4,1)) AND XA_6<=XA_8;

STICKLINE(XA_9=0,HIGH,LOW,0,0),COLORRED;

STICKLINE(XA_9=0,CLOSE,OPEN,(-1),0),COLOR001235;

STICKLINE(XA_9=0,CLOSE,OPEN,2.73,0),COLOR002266;

STICKLINE(XA_9=0,CLOSE,OPEN,2.28,0),COLOR003378;

STICKLINE(XA_9=0,CLOSE,OPEN,1.83,0),COLOR004499;

STICKLINE(XA_9=0,CLOSE,OPEN,1.38,0),COLOR0055AA;

STICKLINE(XA_9=0,CLOSE,OPEN,1.03,0),COLOR0066BC;

STICKLINE(XA_9=0,CLOSE,OPEN,0.68,0),COLOR0077CD;

STICKLINE(XA_9=0,CLOSE,OPEN,0.38,0),COLOR0088EE;

STICKLINE(XA_9=0,CLOSE,OPEN,0.13,0),COLOR0099FF;

STICKLINE(XA_10=0,HIGH,LOW,0,0),COLORFFCC00;

STICKLINE(XA_10=0,CLOSE,OPEN,(-1),0),COLOR683501;

STICKLINE(XA_10=0,CLOSE,OPEN,2.73,0),COLOR996700;

STICKLINE(XA_10=0,CLOSE,OPEN,2.28,0),COLORAA7800;

STICKLINE(XA_10=0,CLOSE,OPEN,1.83,0),COLORBB9900;

STICKLINE(XA_10=0,CLOSE,OPEN,1.38,0),COLORCCAA00;

STICKLINE(XA_10=0,CLOSE,OPEN,1.03,0),COLORDDBB00;

STICKLINE(XA_10=0,CLOSE,OPEN,0.68,0),COLOREECC00;

STICKLINE(XA_10=0,CLOSE,OPEN,0.38,0),COLOREFDD00;

STICKLINE(XA_10=0,CLOSE,OPEN,0.13,0),COLORFFEE00;

XA_11:=260;

XA_12:=680;

XA_13:=7763;

QX1:DRAWNUMBER_FIX(XA_6>=XA_8,0.08,0.1,0,XA_11),COLORYELLOW;

QX2:DRAWNUMBER_FIX(XA_6>=XA_8,0.12,0.1,0,XA_12),COLORYELLOW;

QX3:DRAWNUMBER_FIX(XA_6>=XA_8,0.16,0.1,0,XA_13),COLORYELLOW;

IF(XA_6>XA_8,XA_7,DRAWNULL);

DRAWTEXT_FIX(XA_6>=XA_8,0.03,0.1,0,2),COLORYELLOW;