通达信缠论系列指标 主图 源码

AC5:=REF(C,5)*1.03>HHV(C,5) AND C>MA(C,20) AND  VOL>MA(VOL,20);
AA:=(C-REF(C,1))/REF(C,1)*100;
BB:=AA>3 AND AA<6;
BIAS3:=(CLOSE-MA(CLOSE,30))/MA(CLOSE,30)*100;
CC:=BIAS3>0 AND BIAS3<5;
二买:=BB AND AC5 AND CC;
DRAWTEXT(二买=1,L,'二买'),COLORYELLOW;
STICKLINE(二买,OPEN,CLOSE,8,0),COLORYELLOW;
AC3:=REF(C,1);
DIFF1:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA1:=EMA(DIFF1,9);
MACD1:=2*(DIFF1-DEA1);
AA1:=BARSLAST(REF(CROSS(DIFF1,DEA1),1));
一买:=REF(CLOSE,AA1+1)>CLOSE AND DIFF1>REF(DIFF1,AA1+1) AND CROSS(DIFF1,DEA1) AND LLV(LOW,6)=LLV(LOW,60);
DRAWTEXT(一买=1,L,'一买'),COLORMAGENTA;
STICKLINE(一买,OPEN,CLOSE,8,0),COLORMAGENTA;
Ma5:Ma(C,5);Ma10:ma(C,10);Ma20:ma(C,20); Ma60:ma(C,60);
kx:="chanlun$kxian";
{这个放第一个 要不会出问题滴-_-\\\~~}
kxg:="chanlun$kxg";
kxd:="chanlun$kxd";
kxfx:="chanlun$kxfx";
笔:="chanlun$bi";
笔周期:"chanlun$bilast",linethick0, coloryellow;
bilast:="chanlun$bilast";{笔周期};
段:="chanlun$duan";
段周期:"chanlun$duanlast", linethick0, coloryellow;
duanlast:="chanlun$duanlast"; {段周期};
中枢:="chanlun$zs";
zszg:="chanlun$zszg";
zszd:="chanlun$zszd";
zsgg:="chanlun$zsgg";
zsdd:="chanlun$zsdd";
zszz:="chanlun$zszz";
zsks:="chanlun$zskslast";
zsjs:="chanlun$zsjslast";
bifx:=-REF(笔,bilast);
duanfx:=-REF(段,duanlast);  
kxqj:="chanlun$kxqj";
{画中枢Begin} {以背景方式画}
STICKLINE(zszg>zszd AND duanfx=1, zszg, zszd, 20, 502), colorf00ff0;
STICKLINE(zszg>zszd AND duanfx=-1, zszg, zszd, 20, 502), colore6002d;
{中枢震荡监视器}
DRAWLINE(zsks=1, zszz, zsjs=1, zszz, 0), coloryellow;
{画中枢END}  
{顶底分型}
STICKLINE(kx>0, kxg, kxd, 5, 1), colorwhite;
STICKLINE(kx<0, kxg, kxd, 5, 1), colorblue;
{笔段}
STICKLINE(笔=1, kxg, kxd, 5, 1), colorgreen, linethick1;
STICKLINE(笔=-1, kxg, kxd, 5, 1), colorred, linethick1;
STICKLINE(段=1, kxg, kxd, 5, 0), colore66878, linethick1;
STICKLINE(段=-1, kxg, kxd, 5, 0), color00cccc, linethick1;
{画K线END}
{画笔段}
drawline(笔=1,h,笔=-1,l,0),coloryellow,linethick2;
drawline(笔=-1,l,笔=1,h,0),coloryellow,linethick2;
drawline(段=1,h,段=-1,l,0),colorblue, linethick2;
drawline(段=-1,l,段=1,h,0),colorblue, linethick2;
{笔高低点 周期 力度 提示}
DRAWTEXT(笔= 1, h, ''+h+'/T'+bilast+'/'+(h-REF(l,bilast))), coloryellow, align1, valign2;
DRAWTEXT(笔=-1, l, ''+l+'/T'+bilast+'/'+(l-REF(h,bilast))), colorCyan, align1;
{当下提示 周期}
{DRAWTEXT(BARSTATUS=2 AND bifx=1 AND bilast>4, h*1.008, 'T'+bilast+'/+'+(c-REF(l,bilast))), colorMagenta, align0, valign2;}
{DRAWTEXT(BARSTATUS=2 AND bifx=-1 AND bilast>4, l*0.992,'T'+bilast+'/'+(c-REF(h,bilast))), colorGreen, align0;}