通达信精品布林主图指标公式

N:=20;
DRAWGBK(CURRBARSCOUNT=1 RGB(110108108)RGB(88300)0''0);
BOLL:MA(CLOSEN)COLORGREENLINETHICK2;
IF(BOLL>REF(BOLL1)BOLLDRAWNULL)COLORREDLINETHICK2;
UPPER:BOLL+2*STD(CLOSEN)COLORCYAN;
LOWER:BOLL-2*STD(CLOSEN)COLOR0088FF;
{量能平台}
N1:=30;
T1:=CONST(HHVBARS(VN1));
T0:IF(CURRBARSCOUNT<=N1+7CONST(IF(T1=0CREF(CT1)))DRAWNULL)LINETHICK3;
IF(CURRBARSCOUNT=T1+1T0DRAWNULL)CIRCLEDOT;
DRAWTEXT(ISLASTBART0'　量能平台');
STICKLINE(ISLASTBARHHV(C5)*0.95-0.01HHV(C5)*0.951000)COLORWHITELINETHICK3;
DRAWNUMBER(ISLASTBARHHV(C5)*0.95-0.01HHV(C5)*0.95)LINETHICK3;
止损点:=(ISLASTBARHHV(C5)*0.95-0.01HHV(C5)*0.95)LINETHICK3;
DRAWTEXT(ISLASTBAR 止损点' 止损点')LINETHICK3;
{压力一}
TY:=C;
A1:=REF(TY10)=HHV(TY2*10+1); B1:=FILTER(A110); C1:=BACKSET(B110+1); HD:=FILTER(C110);
A2:=REF(TY10)=LLV(TY2*10+1); B2:=FILTER(A210); C2:=BACKSET(B210+1); LD:=FILTER(C210);
前期高位:REF(CBARSLAST(HD))COLOR00FF00POINTDOT;
STICKLINE(C前期高位前期高位80)COLORYELLOW;
MA18:=MA(C18);
VAR1:=C=HHV(C4) AND REF(C1)=LLV(C4);
VAR2:=C=LLV(C4) AND (REF(C1)<REF(C2) OR REF(C1)<REF(C3)) OR REF(C1)=LLV(C4) AND C<REF(C2) OR REF(C2)=LLV(C4) AND REF(C1)=HHV(C4) AND C<REF(C1) OR REF(C3)=LLV(C4) AND C<REF(C1) AND C<REF(C2);
VAR3:=REF(C1)=LLV(C4) AND C>=REF(C2) OR REF(C2)=LLV(C4) AND REF(C1)<=REF(C3) AND REF(C2)<REF(C4) AND C>=REF(C1);
A:=(3*C+L+O+H)/6;
VAR4:=(20*A+19*REF(A1)+18*REF(A2)+17*REF(A3)+16*REF(A4)+15*REF(A5)+
14*REF(A6)+13*REF(A7)+12*REF(A8)+11*REF(A9)+10*REF(A10)+9*REF(A11)+8*REF(A12)
+7*REF(A13)+6*REF(A14)+5*REF(A15)+4*REF(A16)+3*REF(A17)+2*REF(A18)+REF(A20))/210;
MTM:=C-REF(C1);
DX:=100*EMA(EMA(MTM6)6)/EMA(EMA(ABS(MTM)6)6);
CB:=EMA(VAR413);
{红}
STICKLINE(CLOSE>=OPENCLOSEOPEN30)COLOR0000FF;
STICKLINE(CLOSE>=OPENCLOSEOPEN0.50)COLORCC66FF;
{蓝}
STICKLINE(CLOSE<OPENCLOSEOPEN30)COLORFF9900;
STICKLINE(CLOSE<OPENCLOSEOPEN0.50)COLORFFCC00;
{粉}
STICKLINE(VAR1C(O+C)/230)COLORFF11FF;
STICKLINE(VAR1C(O+C)/20.50)COLORFFDDFF;
{灰}
STICKLINE(VAR2C(O+C)/230)COLOR999999;
STICKLINE(VAR2C(O+C)/20.50)COLORFFBBFF;
{绿}
STICKLINE(VAR3O(O+C)/230)COLOR00BB00;
STICKLINE(VAR3O(O+C)/20.50)COLOR00FF00;
卖:=HHV(DX2)=HHV(DX7) AND COUNT(DX>502) AND CROSS(MA(DX2)DX);
DRAWTEXT(FILTER(卖=11)HIGH*1.02'卖')COLORGREEN;
买:=LLV(DX2)=LLV(DX7) AND COUNT(DX<02) AND CROSS(DXMA(DX2));
DRAWTEXT(FILTER(买=15)LOW-0.03'买')COLORRED;
加仓:=SMA(EMA((C-REF(C1))/REF(C1)5)*10031)*10;
DRAWTEXT(FILTER((CROSS(加仓0) OR CROSS(CLOSECB)) AND 买=13)LOW-0.03'加')COLORWHITE;
跟:=MA18>=REF(MA183) AND CROSS(CLOSEMA18);
DRAWTEXT(跟LOW*0.96'跟')COLORCC66FF;
JRH:=HHV(C2);
JRL:=LLV(C2);
VAR01:=(CLOSE>REF(CLOSE1) AND CLOSE>REF(CLOSE2));
VAR02:=(REF(VAR011) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2));
VAR03:=(REF(VAR021) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2));
VAR04:=(REF(VAR031) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2));
VAR05:=(REF(VAR041) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2));
VAR06:=(REF(VAR051) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2));
VAR07:=(REF(VAR061) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2));
VAR08:=(REF(VAR071) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2));
VAR09:=(REF(VAR081) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2));
VARA:=(REF(VAR091) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2));
VARB:=(REF(VARA1) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2));
VARC:=(REF(VARB1) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2));
VARD:=(CLOSE<REF(CLOSE1) AND CLOSE<REF(CLOSE2)); {GUPIAOFF.COM}
VARE:=(REF(VARD1) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2));
VARF:=(REF(VARE1) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2));
VAR010:=(REF(VARF1) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2));
VAR011:=(REF(VAR0101) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2));
VAR012:=(REF(VAR0111) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2));
VAR013:=(REF(VAR0121) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2));
VAR014:=(REF(VAR0131) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2));
VAR015:=(REF(VAR0141) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2));
VAR016:=(REF(VAR0151) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2));
VAR017:=(REF(VAR0161) AND CLOSE<=REF(CLOSE1) AND CLOSE>=REF(CLOSE2));
VAR018:=(REF(VAR0171) AND CLOSE>=REF(CLOSE1) AND CLOSE<=REF(CLOSE2));
VAR019:=((REF(VARD OR VARE OR VARF OR VAR010 OR VAR011 OR VAR012 OR VAR013 OR VAR014 OR VAR015 OR VAR016 OR VAR017 OR VAR0181)) AND VAR01);
VAR1A:=((REF(VAR01 OR VAR02 OR VAR03 OR VAR04 OR VAR05 OR VAR06 OR VAR07 OR VAR08 OR VAR09 OR VARA OR VARB OR VARC1)) AND VARD);
红色持股:=VAR01 OR VAR02 OR VAR03 OR VAR04 OR VAR05 OR VAR06 OR VAR07 OR VAR08 OR VAR09 OR VARA OR VARB OR VARCCOLOR0000FFNODRAW;
离场:=IF(红色持股JRLDRAWNULL);
明离场价:=离场COLORFF99FFNODRAW;
青色观望:=VARD OR VARE OR VARF OR VAR010 OR VAR011 OR VAR012 OR VAR013 OR VAR014 OR VAR015 OR VAR016 OR VAR017 OR VAR018COLORFFFF00NODRAW;
进:=IF(青色观望JRHDRAWNULL);
今离场价:REF(离场1)COLOR0000FFNODRAW;
明进场价:=进COLOR33AACCNODRAW;
今进场价:REF(明进场价1)COLORGREENNODRAW;
TJ1:=L< REF(L1) OR REF(L1)<REF(L2);
TJ2:=REF(C1)<REF(O1);
TJ3:=C>O;
XG:=TJ1 AND TJ2 AND TJ3;
DRAWTEXT(XGREF(C2)'-------------------')COLORRED;
上涨家数:INDEXADVCOLOR0080FFNODRAW;
下跌家数:INDEXDECCOLORGREENNODRAW;
自动C:=INDEXC;
自动O:=INDEXO;
自动H:=INDEXH;
自动L:=INDEXL;
大盘低:=CONST(LLV(自动L120));
大盘高:=CONST(HHV(自动H120));
大盘差:=大盘高-大盘低;
当前低:=CONST(LLV(L120));
当前高:=CONST(HHV(H120));
当前差:=当前高-当前低;
比:=当前差*1.2/大盘差;
变C:=当前低+(自动C-大盘低)*比;
变H:=当前低+(自动H-大盘低)*比;
变L:=当前低+(自动L-大盘低)*比;
变O:=当前低+(自动O-大盘低)*比;
STICKLINE(CURRBARSCOUNT<10 AND 变C<变O变H变L00)COLORGREEN;
STICKLINE(CURRBARSCOUNT<10 AND 变C>=变O变H变L00)COLORMAGENTA;
STICKLINE(CURRBARSCOUNT<10 AND 变C<变O变O变C20)COLORGREEN;
STICKLINE(CURRBARSCOUNT<10 AND 变C>=变O变O变C20)COLORMAGENTA;
DRAWKLINE(HOLC);
DRAWTEXT_FIX(10.0000'所属行业：')COLORCYAN;
DRAWTEXT_FIX(10.0600HYBLOCK)COLORWHITE;
DRAWTEXT_FIX(10.1400'所属地区：')COLORCYAN;
DRAWTEXT_FIX(10.2000DYBLOCK)COLORWHITE;
;
DRAWTEXT_FIX(10.000.050'主营业务：')COLORCYAN;
DRAWTEXT_FIX(10.060.050EXTERNSTR(03))COLORRED;
;
DRAWTEXT_FIX(10.000.150'莸利比例:')COLORYELLOW;
DRAWNUMBER_FIX(10.060.150CONST(WINNER(C )*100))COLORWHITE;
DRAWTEXT_FIX(10.220.150'市值:')COLORYELLOW;
DRAWNUMBER_FIX(10.260.150FINANCE(40)/100000000)COLORWHITE;
DRAWTEXT_FIX (10.310.150'公积金(股):')COLORYELLOW;
DRAWNUMBER_FIX(10.380.150FINANCE(18))COLORWHITE;
DRAWTEXT_FIX (10.430.150'收益:')COLORYELLOW;
DRAWNUMBER_FIX(10.470.150FINANCE(33))COLORWHITE;
VAR111:=ZIG(313);
STICKLINE((REF(VAR1112) < REF(VAR1111)) AND (VAR111 < REF(VAR1111))CLOSEOPEN30)COLOR66FF00;
DRAWTEXT_FIX(STICKLINE((REF(VAR1112) < REF(VAR1111)) AND (VAR111 < REF(VAR1111))CLOSEOPEN50)0.000.110'')COLOR00FF00LINETHICK1;
DIF:=EMA(CLOSE12)-EMA(CLOSE26);
DEA:=EMA(DIF9);
MACD:=(DIF-DEA)*2;
VAR113:=HHV(HIGH60);
VAR114:=LLV(LOW30);
VAR115:=(CLOSE-MA(CLOSE32))/MA(CLOSE32)*100;
VAR116:=(VAR113+VAR114+VAR115)/3;
VAR117:=EMA(VAR1165);
K01:=EMA(VAR1175)*2 COLORFF00FF;
D01:=EMA(K015) COLORWHITE;
J01:=K01*3-D01*2 COLORYELLOW;
ENTERLONG:=CROSS(K01D01);
EXITLONG:=CROSS(D01K01);
B01:=(DRAWICON((ZIG(35)>REF(ZIG(35)1)) AND (REF(ZIG(35)1)<=REF(ZIG(35)2))
AND (REF(ZIG(35)2)<=REF(ZIG(35)3))L*0.981))*D01*2/3;
B02:=IF(TROUGHBARS(3151)=1 AND HIGH>LOW+0.01200);
必卖:=IF(PEAKBARS(3151)=180100)COLORGREENLINETHICK1;
QQ:=必卖=80;
B03:=((ZIG(35)>REF(ZIG(35)1)) AND (REF(ZIG(35)1)<=REF(ZIG(35)2)) AND (REF(ZIG(35)2)<=REF(ZIG(35)3)));
V1:=EMA(CLOSE60)-EMA(CLOSE300);
V2:=EMA(V1300);
V3:=(CLOSE-(LOW8))/((HIGH8)-LLV(LOW8))*100;
V4:=SMA(V321)NODRAW;
V5:=SMA(V421)NODRAW;
V6:=CLOSE/REF(CLOSE3)>=1.1;
V7:=BACKSET(V63);
大涨:=(V7 AND COUNT(V73)=1);
总股本:=STRCAT(STRCAT('总股本: 'CON2STR(TOTALCAPITAL/10000002))'亿');
流通盘:=STRCAT(STRCAT(' 流通盘: 'CON2STR(CAPITAL/10000002))'亿');
全流通:=STRCAT(' 全流通: 'CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000)2));
市值:=STRCAT(STRCAT(' 流通市值: 'CON2STR((CAPITAL/1000000)*C2))'亿');
上市日期:=STRCAT(' 上市天数: 'CON2STR(FINANCE(42)0));
股本市值:=STRCAT('股本市值: 'STRCAT(STRCAT(STRCAT(STRCAT(总股本流通盘)全流通)市值)上市日期));
{}
市盈率:=STRCAT('市盈率: 'CON2STR(C/FINANCE(33)2));
市销率:=STRCAT(' 市销率: 'CON2STR(C/(FINANCE(20)/FINANCE(1))2));
市净率:=STRCAT(' 市净率: 'CON2STR(C/FINANCE(34)2));
净资收益率:=STRCAT(' 净资收益率: 'CON2STR(FINANCE(33)/FINANCE(34)*1002));
毛利率:=STRCAT(' 毛利率: 'CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*1002));
净利润率:=STRCAT(' 净利润率 'CON2STR(FINANCE(30)/FINANCE(20)*1002));
主营利润率:=STRCAT(' 主营利润率 'CON2STR(FINANCE(23)/FINANCE(20)*1002));
利润同比:=STRCAT(' 利润同比: 'CON2STR(FINANCE(43)2));
收入同比:=STRCAT(' 收入同比: 'CON2STR(FINANCE(44)2));
当前业绩:=STRCAT('当前业绩: 'STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(市盈率市销率)市净率)净资收益率)毛利率)净利润率)主营利润率) 利润同比) 收入同比));
{}
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(ISLASTBAR0.0050.010财务系数)COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR0.0050.060当前业绩)COLORLIMAGENTA;
DRAWTEXT_FIX(ISLASTBAR0.0050.1150股本市值)COLORYELLOW;