【图】再次作画《色彩峰》飞狐,分折家

其实《色彩峰》并不是光为欣赏的指标公式。里面有日KD，周KD，MACD，Rsi6

和色彩峰。色彩峰本身就相当KD作用，现增加了一些提示符号，怎么用自己看吧。




VarA:=EMA(REF(CLOSE,1),4);
色彩峰:=(SMA(MAX(CLOSE-VarA,0),6,1)/SMA(ABS(CLOSE-VarA),6,1)*100);
STICKLINE(色彩峰,0,120,10,0),Color8BA400;
STICKLINE(色彩峰,0,100,10,0),Color8BA411;
STICKLINE(色彩峰,0,95,10,0),Color8BA422;
STICKLINE(色彩峰,0,90,10,0),Color8BA433;
STICKLINE(色彩峰,0,85,10,0),Color8BA444;
STICKLINE(色彩峰,0,80,10,0),Color8BA455;
STICKLINE(色彩峰,0,75,10,0),Color8BA466;
STICKLINE(色彩峰,0,70,10,0),Color8BA477;
STICKLINE(色彩峰,0,65,10,0),Color8BA488;
STICKLINE(色彩峰,0,60,10,0),Color8BA499;
STICKLINE(色彩峰,0,55,10,0),Color8BA4aa;
STICKLINE(色彩峰,0,50,10,0),Color8BA4cc;
STICKLINE(色彩峰,0,40,10,0),Color8BA4ee;
STICKLINE(色彩峰,0,30,10,0),Color8BA4ff;
STICKLINE(色彩峰,0,-30,10,0),Color8BA433;
STICKLINE(色彩峰,0,-20,10,0),Color8BA444;
STICKLINE(色彩峰,0,-10,10,0),Color8BA455;
STICKLINE(色彩峰,0,-5,10,0),Color8BA466;
STICKLINE(色彩峰>0,0,色彩峰,10,0),COLOR66FF00;
STICKLINE(色彩峰>0,0,色彩峰*0.9,10,0),COLOR66EE00;
STICKLINE(色彩峰>0,0,色彩峰*0.85,10,0),COLOR66DD00;
STICKLINE(色彩峰>0,0,色彩峰*0.8,10,0),COLOR66CC00;
STICKLINE(色彩峰>0,0,色彩峰*0.75,10,0),COLOR66BB00;
STICKLINE(色彩峰>0,0,色彩峰*0.7,10,0),COLOR66AA00;
STICKLINE(色彩峰>0,0,色彩峰*0.65,10,0),COLOR669900;
STICKLINE(色彩峰>0,0,色彩峰*0.6,10,0),COLOR668800;
STICKLINE(色彩峰>0,0,色彩峰*0.55,10,0),COLOR667700;
STICKLINE(色彩峰>0,0,色彩峰*0.5,10,0),COLOR666600;
STICKLINE(色彩峰>0,0,色彩峰*0.45,10,0),COLOR665500;
STICKLINE(色彩峰>0,0,色彩峰*0.4,10,0),COLOR664400;
STICKLINE(色彩峰>0,0,色彩峰*0.35,10,0),COLOR663300;
STICKLINE(色彩峰>0,0,色彩峰*0.3,10,0),COLOR662200;
STICKLINE(色彩峰>0,0,色彩峰*0.25,10,0),COLOR661100;
STICKLINE(色彩峰>0,0,色彩峰*0.2,10,0),COLOR660000;
STICKLINE(色彩峰,0,-色彩峰*0.2,10,0),Color324D00;
aa:=100*EMA((100*(high-ref(low,1))/ref(low,1)-2.618),2);
MACD:300*"MACD.MACD#DAY"(20,5,10)/EMA(C,30),LINETHICK0;
日Ｋ:"KD.K#DAY"(9,3,3),pointdot,COLORyellow,LINETHICK0;
日Ｄ:"KD.D#DAY"(9,3,3),pointdot,COLORred,LINETHICK0;
周Ｋ:"KD.K#WEEK"(9,3,3),LINETHICK3,COLORmagenta;
周Ｄ:"KD.D#WEEK"(9,3,3),LINETHICK3,COLORcyan;
J:="KDJ.J#DAY"(9,3,3);
STICKLINE(MACD>=0,0,MACD,8,0),ColorEAEAEA;
STICKLINE(MACD>=0 AND MACD>REF(MACD,1),MACD*0.1,MACD*0.9,6,0),Color666666;
STICKLINE(MACD>=0 AND MACD>REF(MACD,1),MACD*0.3,MACD*0.3,6,0),ColorEAEAEA;
STICKLINE(MACD>=0 AND MACD>REF(MACD,1),MACD*0.5,MACD*0.5,6,0),ColorEAEAEA;
STICKLINE(MACD>=0 AND MACD>REF(MACD,1),MACD*0.7,MACD*0.7,6,0),ColorEAEAEA;

STICKLINE(MACD>=0 AND MACD<REF(MACD,1),MACD*0.1,MACD*0.9,6,1),Color57E000;
STICKLINE(MACD>=0 AND MACD>REF(MACD,1),MACD*0.3,MACD*0.3,6,0),ColorEAEAEA;
STICKLINE(MACD>=0 AND MACD<REF(MACD,1),MACD*0.5,MACD*0.5,6,0),ColorEAEAEA;
STICKLINE(MACD>=0 AND MACD<REF(MACD,1),MACD*0.7,MACD*0.7,6,0),ColorEAEAEA;
STICKLINE(MACD>=0,0,-0.3*MACD,8,0),Color527856;
STICKLINE(MACD>=0,0,-0.2*MACD,6,0),Color2C432B;
STICKLINE(MACD>=0,-0.1*MACD,-0.1*MACD,6,0),Color527856;
STICKLINE(MACD<0 AND MACD>REF(MACD,1),0,-MACD,1,0),ColorEAEAEA;
STICKLINE(MACD<0 AND MACD>REF(MACD,1),0,0.3*MACD,1,0),Color527856;

STICKLINE(周Ｋ>=周Ｄ,周Ｄ,周Ｋ,8,0), COLORmagenta;
STICKLINE(周Ｋ<周Ｄ,周Ｋ,周Ｄ,8,0), COLORcyan;
DRAWTEXT(CROSS(日Ｋ,日Ｄ) and 日Ｄ <20,周Ｋ+10,'♀'), COLORbrown,LINETHICK3;
DRAWTEXT(CROSS(日Ｋ,日Ｄ) and 日Ｄ <20,周Ｋ+10,'ń'), COLORbrown,LINETHICK3;
DRAWTEXT(CROSS(周Ｋ,周Ｄ) and 周Ｄ <70,周Ｋ+10,'＆'), COLORbrown,LINETHICK3;
Rsi6:SMA(MAX(C-REF(C,1),0),6,1)/SMA(ABS(C-REF(C,1)),6,1)*100,LINETHICK2,Color00FF00;
准备:DRAWTEXT(CROSS(J,0),-3,'Ψ'), COLORbrown;
下海:DRAWTEXT(色彩峰<3.5,-10,'ャ'),ColorDBDBDB;
DRAWTEXT(色彩峰<3.5,-10,'︼'),Color688EC1;
天晚:DRAWTEXT(CROSS(J,80),120,'☆'),Color00FF00;
回归:DRAWTEXT(CROSS(色彩峰,90) or aa>800,98,'ヲ'),ColorDBDBDB;

[ 本帖最后由 唐仁政 于 2005-11-22 18:01 编辑 ]股票论坛 www.55188.com