通达信短线主图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;

 

原理解析：
DIFF赋值:( 收盘价的7日指数移动平均 - 收盘价的19日指数移动平均),画白色


DEA赋值:DIFF的9日指数移动平均,COLORF00FF0


MACD赋值:0.90*(DIFF-DEA), COLORSTICK


TJ赋值:(DIFF>=DEA)


TJ1:=(DIFF>=0)
当满足条件TJ时,在H和L之间画柱状线
当满足条件TJ时,在O和C之间画柱状线
当满足条件TJ1 AND TJ时,在H和L之间画柱状线
当满足条件TJ1 AND TJ时,在O和C之间画柱状线
当满足条件DIFF当满足条件DIFF

VAR1赋值:(收盘价*2+最高价+最低价)/4


SK赋值: VAR1的13日指数移动平均-VAR1的73日指数移动平均


SD赋值: SK的2日指数移动平均


DRAWTEXT((SK上穿SD AND SK<-0.04 AND (C-1日前的C)/1日前的C>=0.03) OR (SK上穿SD AND SK<=-0.14 ) OR (SK上穿SD AND SK<=0.05 AND (V/V的5日简单移动平均>2 OR C/1日前的C>0.035)) ,L*0.99,'短线'),画红色


{STICKLINE((SK上穿SD AND SK<-0.04 AND (C-1日前的C)/1日前的C>=0.03) OR (SK上穿SD AND SK<=-0.14 ) OR (SK上穿SD AND SK<=0.05 AND (V/V的5日简单移动平均>2 OR C/1日前的C>0.035)),H,L,0.5,0),画红色}


STICKLINE((SK上穿SD AND SK<-0.04 AND (C-1日前的C)/1日前的C>=0.03) OR (SK上穿SD AND SK<=-0.14 ) OR (SK上穿SD AND SK<=0.05 AND (V/V的5日简单移动平均>2 OR C/1日前的C>0.035)),O,C,10,1), 线宽为3,画红色


MA1赋值:收盘价的15日简单移动平均
输出

MA6:C的5日简单移动平均,画白色


MA18:C的13日简单移动平均,画绿色


TY赋值:C


A1赋值:10日前的TY=2*10+1日内TY最高值
B1赋值:A1的10过滤
C1赋值:BACKSET(B1,10+1)
HD赋值:C1的10过滤


A2赋值:10日前的TY=2*10+1日内TY最低值
B2赋值:A2的10过滤
C2赋值:BACKSET(B2,10+1)
LD赋值:C2的10过滤


A赋值:REF(C,上次HD距今天数)
B赋值:REF(L,上次LD距今天数)


T1:=上次HD距今天数

T2:=上次HD距今天数>BARSLAST(LD) AND NOT(LD)
如果T1返回A否则返回A
如果T2返回B否则返回B


加码价:=((C-1日前的MA18)/18+MA18)*1.004


加码条件:=C上穿加码价 AND 加码价>1日前的加码价
如果加码条件返回L否则返回H
当满足条件加码条件时,在H和L之间画柱状线
当满足条件加码条件时,在O和C之间画柱状线


买进价:=((C-1日前的MA6)/6+MA6)*1.004


买进条件:=C上穿买进价 AND 买进价>1日前的买进价
如果买进条件返回L否则返回H
当满足条件买进条件时,在H和L之间画柱状线
当满足条件买进条件时,在O和C之间画柱状线