以下是同花顺五因子K线图源码
DIFF:=(EMA(CLOSE,7)-EMA(CLOSE,19)),colorwhite;
DEA:=EMA(DIFF,9),COLORF00FF0;
MACD:=0.90*(DIFF-DEA),COLORSTICK;
TJ:=(DIFF>=DEA);
TJ1:=(DIFF>=0);
{STICKLINE(TJ,H,L,0,0),coloryellow;}
STICKLINE(TJ,0,C,3,1),coloryellow;
STICKLINE(TJ1 AND TJ,H,L,0,0),COLORFOOFFO;
STICKLINE(TJ1 AND TJ,0,C,3,1), COLORFOOFFO;
STICKLINE(DIFF<DEA,H,L,0,0), COLORFOOFFO;
STICKLINE(DIFF<DEA,0,C,3,0), COLORFOOFFO;
VAR1:=(CLOSE*2+HIGH+LOW)/4;
SK:= EMA(VAR1,13)-EMA(VAR1,73);
SD:=EMA(SK,2);
{DRAWTEXT((CROSS(SK,SD) AND SK=0.03) OR (CROSS(SK,SD)
AND SK<=-0.14 ) OR (CROSS(SK,SD) AND SK2 OR C/REF(C,1)>0.035)),
L*0.99,\’短线\’),colorred;}
{STICKLINE((CROSS(SK,SD) AND SK=0.03) OR (CROSS(SK,SD)
AND SK<=-0.14) OR(CROSS (SK,SD) AND SK2 OR C/REF(C,1)>0.035)),
H,L,0,0),colorred;}
STICKLINE((CROSS(SK,SD) AND SK=0.03) OR (CROSS(SK,SD)
AND SK<=-0.14) OR (CROSS(SK,SD) AND SK2 OR C/REF(C,1)>0.035)),
0,C,3,0),LINETHICK3,colorred;
二号线:=EMA(C,25),colorwhite,LINETHICK2;
八号线:=EMA(C,99),POINTDOT,LINETHICK2,colorwhite;
一号线:=EMA(CLOSE,144),POINTDOT,LINETHICK2,COLOROOOOFF;
三号线:=EMA(C,318), COLOROOOOFF, LINETHICK2;
四黑马线:=EMA(C,453),CIRCLEDOT,LINETHICK1,COLOR428899;
SS:=CROSS(二号线,八号线) AND C>1.5 AND C>REF(C,1.5) AND C/REF(C,1.5)>=0.98
OR CROSS(二号线,三号线) AND C>1.5 AND C>REF(C,1.5) AND C/REF(C,1.5)>=0.98
OR CROSS(二号线,一号线) AND C>1.5 AND C>REF(C,1.5) AND C/REF(C,1.5)>=0.98
AND CROSS(二号线,三号线);
DRAWICON(SS,L-0.04,1);
DD:=CROSS(八号线,一号线) AND C>1.5 AND C>REF(C,1.5) AND C/REF(C,1.5)>=0.98
OR CROSS(八号线,四黑马线) AND C>1.5 AND C>REF(C,1.5) AND C/REF(C,1.5)>=0.98
OR CROSS(八号线,三号线) AND C>1.5 AND C>REF(C,1.5) AND C/REF(C,1.5)>=0.98 AND CROSS
(二号线,四黑马线);
{DD:=CROSS(二号线,四黑马线);};