通达信指标一样可以美化！
源码：
{晚归}
VARA:=EMA(REF(CLOSE,1),4);
色彩峰:=(SMA(MAX(CLOSE-VARA,0),6,1)/SMA(ABS(CLOSE-VARA),6,1)*100);
STICKLINE(色彩峰,0,150,5,0),COLORFFB06C;
STICKLINE(色彩峰,0,-50,5,0),COLORFFB000;
STICKLINE(色彩峰>0,0,色彩峰,5,0),COLOR00003A;
AA:=100*EMA((100*(HIGH-REF(LOW,1))/REF(LOW,1)-2.618),2);
VARA1:=VOL/CAPITAL/100< 0.015;
VARA2:=C/REF(C,1)> 1.05 AND C>O;
VARA3:=CLOSE<=1.47*LLV(CLOSE,58) AND CLOSE<=15;
VARA4:=(-100)*(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3));
VARZ:=IF(VARA1 AND VARA2 AND VARA4<40,1,0);
PF1 :=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
RSV:=SMA(PF1,9,1);
DIFF := EMA(CLOSE,12) - EMA(CLOSE,26);
DEA :=EMA(DIFF,9);
MACD :=2000* (2*(DIFF-DEA))/EMA(C,30),LINETHICK0;
FASTK1:=SMA(RSV,3,1);
K1:=SMA(FASTK1,2,1), COLORYELLOW;
D1:=SMA(K1,5,1),COLORB56C00;
T3:=(K1-D1)>REF((K1-D1),5);
STICKLINE(MACD>=0,0,MACD,4,0),COLOR666666;
STICKLINE(MACD>=0 AND MACD>REF(MACD,1),0,MACD,3,0),COLORAAAAAA;
STICKLINE(MACD<0,0,0.3*MACD,4,0),COLOR666666;
{STICKLINE(MACD<0,0,-0.3*MACD,0.1,0),COLOR9A9A9A;}
STICKLINE(MACD<0 AND MACD>REF(MACD,1),0,0.3*MACD,0.1,0),COLOR6A9A9A;
RSV2:= (CLOSE-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;
FASTK:=SMA(RSV2,3,1);
K:=SMA(FASTK,2,1), COLORYELLOW;
D:=SMA(K,5,1),COLORB56C00;
STICKLINE(K1>=D1,D1,K1,3,0),COLOR0000FF;
STICKLINE(K1<D1,D1,K1,3,0),COLORFFFFFF;
STICKLINE(K>=D,D,K,1,0),COLORMAGENTA;
STICKLINE(K<D,D,K,1,0),COLORB56C00;
DRAWTEXT(色彩峰<3.5,-30,'ャ'),COLORDBDBDB;
DRAWTEXT(色彩峰<3.5,-30,'︼'),COLOR688EC1;
DRAWTEXT(CROSS(色彩峰,90),98,'ヲ'),COLORFFFFFF;
DRAWTEXT(FILTER(MACD<0 AND MACD>REF(MACD,1) AND 色彩峰<20,5) AND T3,-1,'Ψ'), COLORFFFFFF;
{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
