通达信 八线合一定牛熊 主图源码

M:=(H+L+3*C+O)/6;

M3:MA(M,3);

M7:=MA(M,7);

M14:=MA(M,14);

M21:=MA(M,21);

M28:=MA(M,28);

M35:=MA(M,35);

M42:=MA(M,42);

M49:=MA(M,49);

M56:=MA(M,56);

MH7:=MA(H,7);

MH14:=MA(H,14);

MH21:=MA(H,21);

MH28:=MA(H,28);

MH35:=MA(H,35);

MH42:=MA(H,42);

MH49:=MA(H,49);

MH56:=MA(H,56);

ML7:=MA(L,7);

ML14:=MA(L,14);

ML21:=MA(L,21);

ML28:=MA(L,28);

ML35:=MA(L,35);

ML42:=MA(L,42);

ML49:=MA(L,49);

ML56:=MA(L,56);
MZ:(7*M7+14*M14+21*M21+28*M28+35*M35+42*M42+49*M49+56*M56)/252 LINETHICK3 COLORRED;

MH:=(7*MH7+14*MH14+21*MH21+28*MH28+35*MH35+42*MH42+49*MH49+56*MH56)/252;

ML:=(7*ML7+14*ML14+21*ML21+28*ML28+35*ML35+42*ML42+49*ML49+56*ML56)/252;

GB:=H-MH;

ZB:=C-MZ;

DB:=L-ML;

BZCZ:=SQRT(SUM(POW(ZB,2),20)/20);

BZCH:=SQRT(SUM(POW(GB,2),20)/20);
BZCL:=SQRT(SUM(POW(DB,2),20)/20);

CVH:=BZCH/MH;

CVL:=BZCL/ML;

UPPER:MH*(1+CVH*(1+1/SQRT(20))) LINETHICK3 COLORBLUE;

DOWN:ML*(1-CVL*(1+1/SQRT(20))) LINETHICK3 COLORGREEN;

DRAWICON(CROSS(C,MZ),MZ,1);