短线K线主图源码：
r
rDIFF:=( EMA(CLOSE,7) – EMA(CLOSE,19)),colorwhite;
rDEA:=EMA(DIFF,9),COLORf00ff0 ;
rMACD:=0.90*(DIFF-DEA), COLORSTICK;
rtj:=(diff>=dea);
rtj1:=(diff>=0);
r
STICKLINE(tj,H,L,0.5,0),coloryellow;
rSTICKLINE(tj,O,C,4,0),coloryellow;
rSTICKLINE(tj1 AND tj,H,L,0.5,0),colorf00ff0;
rSTICKLINE(tj1 AND tj,O,C,4,1),colorf00ff0;
rSTICKLINE(diff<dea,H,L,0.5,0),colorf0f000;
rSTICKLINE(diff<dea,O,C,4,0),colorf0f000;
r
Var1:=(CLOSE*2+HIGH+LOW)/4;
rSK:= EMA(Var1,13)-EMA(Var1,73);
rSD:= EMA(SK,2);
rDRAWTEXT((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;
rSTICKLINE((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;
rSTICKLINE((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;
r
MA1:=MA(CLOSE,15);
rMA6:MA(C,5),colorwhite;
rMA18:MA(C,13),colorgreen;
rTY:=C;
rA1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);
rA2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);
rA:=REF(C,BARSLAST(HD)); B:=REF(L,BARSLAST(LD));
rT1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
rT2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
r顶:IF(T1,A,A),coloryellow,POINTDOT;
r底:IF(T2,B,B),colorgreen,POINTDOT;
r
加码价:=((C-REF(ma18,1))/18+ma18)*1.004;
r加码条件:=CROSS(C,加码价) AND 加码价>REF(加码价,1);
r黄K加码:IF(加码条件,L,H),coloryellow,POINTDOT;
rSTICKLINE(加码条件,H,L,0,1),coloryellow,linethick2;
rSTICKLINE(加码条件,O,C,4,1),coloryellow,linethick2;
r
买进价:=((C-REF(ma6,1))/6+ma6)*1.004;
r买进条件:=CROSS(C,买进价) AND 买进价>REF(买进价,1);
r白K买进:IF(买进条件,L,H),colorwhite,POINTDOT;
rSTICKLINE(买进条件,H,L,0,1),colorwhite,linethick2;
rSTICKLINE(买进条件,O,C,4,1),colorwhite,linethick2;
r
暂无评论内容