通达信指标公式源码分时主图指标 源码.docVIP

成交额:=V*C/100,NODRAW;{万元}A2:=SUM((IF(((成交额/820) AND (CLOSE(REF(CLOSE,1)))),成交额,0)),0);A3:=SUM((IF(((成交额/820) AND (CLOSE(REF(CLOSE,1)))),成交额,0)),0);A6:=(A2+A3);A7:=IF((ISLASTBAR),((100*A2)/A6),0);A8:=IF((ISLASTBAR),((100*A3)/A6),0);DD1:=1;AAA1:=STRCAT(STRCAT(机构买 = ,CON2STR((100*A2)/A6,0)),%);AAA2:=STRCAT(STRCAT(机构卖 = ,CON2STR((100*A3)/A6,0)),%);AAA3:=STRCAT(STRCAT(机构总买 = ,CON2STR((100*(A2-A3))/A6,0)),%);DRAWTEXT_FIX(DD1=1,0,0.83,0,AAA1),COLOR00FFFF;DRAWTEXT_FIX(DD1=1,0,0.89,0,AAA2),COLOR00FF00;DRAWTEXT_FIX(DD1=1,0,0.99,0,AAA3),COLOR0000FF; H1:=MAX(DYNAINFO(3),DYNAINFO(5));L1:=MIN(DYNAINFO(3),DYNAINFO(6));P1:=H1-L1;阻力:L1+P1*7/8,COLORGREEN;支撑:L1+P1*0.5/8,COLORRED;中:(支撑+阻力)/2,COLORWHITE,POINTDOT;现价:CLOSE,COLORWHITE,LINETHICK2; 底买:STICKLINE(C支撑,支撑,C,5,0),COLORRED; MR:=C支撑 AND CROSS(C,REF(C,2));DRAWTEXT(CROSS(现价,支撑),支撑,★买),COLORRED;DRAWTEXT(CROSS(现价,阻力),阻力-(支撑-中)/5,★卖),COLORMAGENTA; DRAWTEXT(ISLASTBAR,阻力,顶),COLORGREEN;DRAWTEXT(ISLASTBAR,支撑,底),COLORRED;DRAWTEXT(ISLASTBAR,(支撑+阻力)/2,中),COLORWHITE; X1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{盈余公积用资本公积金代替};X3:=FINANCE(23)/FINANCE(10)*3.3;X4:=FINANCE(19)/FINANCE(15)*0.6;{缺长期负债或负债总额}X5:=FINANCE(20)/FINANCE(15)*0.999;Z值:=X1+X2+X3+X4+X5;预警:=IF(Z值1.2,重警,IF(Z值=1.2 AND Z值2.6,轻警,无警));财务:=STRCAT(财务: ,STRCAT(预警,STRCAT( -Z值: ,CON2STR(Z值,3))));资产:=STRCAT( 优质率: ,CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2));{理论上越大越好但不同行业有不同标准};负债比:=STRCAT( 负债比: ,CON2STR(FINANCE(25)/FINANCE(15),3));{缺长期负债或负债总额，理论上越大越好但不同行业有不同标准};财务系数:=STRCAT(风险: ,STRCAT(STRCAT(财务,资产),负债比));{}DRAWTEXT_FIX(ISLASTBAR,0.2,0.96,0,财务),COLORFFFFFF;DRAWTEXT_FIX(1,0.2,0.8,0,行业：)COLORCYAN;DRAWTEXT_FIX(1,0.26,0.8,0,HYBLOCK),COLORWHITE;DRAWTEXT_FIX(1,0.42,0.8,0,地区：)COLORCYAN;DRAWTEXT_FIX(1,0.48,0.8,0,DYBLOCK),COLORWHITE; {开盘三线}{新版分时主图} T31:=BARSLAST(TIME2=093100);T40:=BARSLAST(TIME2=094000);T41:=BARSLAST(TIME2=094100);T50:=BARSLAST(TIME2=095000);T51:=BARSLAST(TIME2=095100);