通达信建仓线副图通用源码

均价:=(2*C+(C+H+L+O)/4+O)/4;
 R:=(2*L+3*均价)/5;R1:=(2*H+3*均价)/5;
 kX:=(R+R1)/2;
 HL:=SQRT(r1-r)+(r1=r);
 JFC:=IF(CAPITAL>0,HL,SQRT(kx));
 SF:=JFC;zl:=1/JFC;
 sfx:=EMA(R*SF,90)/EMA(SF,90);
 MA90:=EMA(R*zl,90)/EMA(zl,90);
 Fx:=eMA(MA90-ema((MA(R*zl,2)/MA(zl,2)-MA90),1),2);
 A:(SFX-MA90)/MA90*100;
 B:EMA(A,5);
 F:EMA((FX-MA90)/MA90*100,5)/5;
 STICKLINE(a<0.5,0.5,-0.5,4,0),COLORRED;
 0;