不含示来函数的缠论中枢（大智慧通达信通用源码 主图 不加密不限时 附图说明）

CC:=(H*3+C*2+O)/6;
C0:=(L*3+C*2+O)/6;
VAR1J:=REF(MA(C,20),10);
开:=O-VAR1J;
高:=H-VAR1J;
低:=L-VAR1J;
收:=C-VAR1J;
NX:=13;
BCJ:=(高*0.382+低*0.618+开*0.382+收*0.618)/2;
LJJ:=(BCJ+AMOUNT/(V*100)-VAR1J)/2;
HTJ:=REF((HHV(LJJ,NX*0.691)+HHV(LJJ,NX)+HHV(LJJ,NX*1.309))/3,1);
LTJ:=REF((LLV(LJJ,NX*0.691)+LLV(LJJ,NX)+LLV(LJJ,NX*1.309))/3,1);
ZTJ:=(HTJ+LTJ)/2;
stickline(LJJ<ZTJ,REF(C0,BARSLAST(CROSS(ZTJ,LJJ))),REF(CC,BARSLAST(CROSS(ZTJ,LJJ))),4,0),COLORGRAY;
DRAWKLINE(H,O,L,C);
 

2015112715245837564.jpg