通达信成本箱体主图选股指标公式源码

通达信成本箱体主图选股指标公式源码

源码正文：

N:=21{XG51};
M:=13{XG51};
P:=2{XG51};
a:=(3*c+l+o+h)/6;
多:(20*a+19*ref(a,1)+18*ref(a,2)+17*ref(a,3)+16*ref(a,4)+15*ref(a,5)+14*ref(a,6)
+13*ref(a,7)+12*ref(a,8)+11*ref(a,9)+10*ref(a,10)+9*ref(a,11)+8*ref(a,12)
+7*ref(a,13)+6*ref(a,14)+5*ref(a,15)+4*ref(a,16)+3*ref(a,17)+2*ref(a,18)+
ref(a,20))/210;
空:ma(多,m);
MID : MA(CLOSE,N);
UPPER: MID + P*stD(CLOSE,N);
LOWER: MID - P*STD(CLOSE,N);
aa:=if(c>=o,(c-o)/4,0);
STICKLINE(c>=o,o,o+aa,7,0),colorred;
STICKLINE(c>=o,o+aa,o+2*aa,7,0),colorred;
STICKLINE(c>=o,o+2*aa,o+3*aa,7,0),colorred;
STICKLINE(c>=o,o+3*aa,c,7,0),colorred;
VarA:=IF(CLOSE>150,91.3,0.913){XG51};
箱体下沿:INTPART(CLOSE/VarA )*VarA,pointdot,linethick2,colorgreen;
箱体上沿:箱体下沿+VarA,pointdot,linethick2,coloryellow {XG51};
箱体中线:(箱体下沿+箱体上沿)/2,pointdot,colorwhite,linethick2;

{X_G-5~1_C_N_{}