通达信短线主图A指标

通达信短线主图A指标

源码

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,O,C,3,0),COLORYELLOW; STICKLINE(TJ1 AND TJ,H,L,0,0),COLORF00FF0; STICKLINE(TJ1 AND TJ,O,C,3,1),COLORF00FF0; STICKLINE(DIFF<DEA,H,L,0,0),COLORF0F000; STICKLINE(DIFF<DEA,O,C,3,0),COLORF0F000; VAR1:=(CLOSE*2+HIGH+LOW)/4; SK:= EMA(VAR1,13)-EMA(VAR1,73); SD:= EMA(SK,2); DRAWTEXT((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 ) OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)) ,L*0.99,'短线'),COLORRED; {STICKLINE((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 ) OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),H,L,0.5,0),COLORRED}; STICKLINE((CROSS(SK,SD) AND SK<-0.04 AND (C-REF(C,1))/REF(C,1)>=0.03) OR (CROSS(SK,SD) AND SK<=-0.14 ) OR (CROSS(SK,SD) AND SK<=0.05 AND (V/MA(V,5)>2 OR C/REF(C,1)>0.035)),O,C,10,1),LINETHICK3,COLORRED; MA1:=MA(CLOSE,15); MA6:MA(C,5),COLORWHITE; MA18:MA(C,13),COLORGREEN; TY:=C; A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10); A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10); A:=REF(C,BARSLAST(HD)); B:=REF(L,BARSLAST(LD)); T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ; T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD); 顶:IF(T1,A,A),COLORYELLOW,POINTDOT,LINETHICK3; 底:IF(T2,B,B),COLORGREEN,POINTDOT,LINETHICK3; 加码价:=((C-REF(MA18,1))/18+MA18)*1.004; 加码条件:=CROSS(C,加码价) AND 加码价>REF(加码价,1); 黄K加码:=IF(加码条件,L,H),COLORYELLOW,POINTDOT; STICKLINE(加码条件,H,L,0,1),COLORYELLOW,LINETHICK2; STICKLINE(加码条件,O,C,3,1),COLORYELLOW,LINETHICK2; 买进价:=((C-REF(MA6,1))/6+MA6)*1.004; 买进条件:=CROSS(C,买进价) AND 买进价>REF(买进价,1);
白K买进:=IF(买进条件,L,H),COLORWHITE,POINTDOT; STICKLINE(买进条件,H,L,0,1),COLORWHITE,LINETHICK2; STICKLINE(买进条件,O,C,4,1),COLORWHITE,LINETHICK2;