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

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;
STICK