通达信别错过主图指标(源码)
N:=5;
A1:=(LLV((MA(HIGH,12)),1)),LINETHICK2,COLORGREEN;
{A2:(HHV((MA(HIGH,12)),6)),LINETHICK2,COLORYELLOW;
A3:(HHV((MA(HIGH,12)),12)),LINETHICK2,COLORYELLOW;
A5:(HHV((MA(HIGH,12)),24)),LINETHICK2,COLORYELLOW;
A6:(HHV((MA(HIGH,12)),30)),LINETHICK2,COLORYELLOW;
A7:(HHV((MA(HIGH,12)),36)),LINETHICK2,COLORYELLOW;}
A8:=(HHV((MA(HIGH,12)),42)),LINETHICK2,COLORYELLOW;
DRAWBAND(A1,RGB(0,0,0),A8,RGB(0,99,0));
DRAWKLINE(H,O,L,C);
M5:=MA(CLOSE,5),COLORWHITE,LINETHICK2;
M10:=MA(C,10);
A:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1));
B:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1);
分水岭:=IF(MA(CLOSE,17)<B,B,MA(CLOSE,17)),COLORFF00FF,LINETHICK2;
操作线:=分水岭-(EMA(C,3)-分水岭),COLORGREEN;
IF(操作线>M5,操作线,DRAWNULL),COLORGREEN;
STICKLINE(M5<操作线,操作线,M5,0,-1),COLORGREEN;
DRAWKLINE(H,O,L,C);
MA5:MA(CLOSE,5),COLORWHITE,LINETHICK2;
MA10:MA(CLOSE,10),COLORYELLOW;
MA20:MA(CLOSE,20),COLORRED;
M30:MA(CLOSE,30),LINETHICK1,COLORGREEN;
M60:MA(CLOSE,60),COLORMAGENTA;
M120:MA(CLOSE,120),COLORBROWN;
牛熊线241:MA(CLOSE,241),COLORCYAN;
IF(MA5<MA10,MA10,DRAWNULL),COLORGREEN;
{所属行业:DRAWTEXT_FIX(ISLASTBAR ,0.99,0.85,1,HYBLOCK),COLORWHITE;
所属概念:DRAWTEXT_FIX(ISLASTBAR ,0.99,0.90,1,GNBLOCK),COLORYELLOW;
所属地域:DRAWTEXT_FIX(ISLASTBAR ,0.99,0.99,1,DYBLOCK),COLORRED;
所属风格:DRAWTEXT_FIX(ISLASTBAR ,0.92,0.99,1,FGBLOCK),COLORYELLOW;}
BOLL1:=MA(CLOSE,20);
UB1:=BOLL1+2*STD(CLOSE,20),COLORWHITE;
UB:"BOLL-M".UB,LINETHICK1,COLOR777777;
IF(UB1>UB AND MA5>MA10,UB,DRAWNULL),COLORBLUE,LINETHICK2;
QA:=REF(H,N)=HHV(H,2*N+1);
QB:=BACKSET(QA,N+1);
QC:=FILTER(QB,N) AND H=HHV(H,N+1);
QD:=BARSLAST(QC);
QE:=IF(QC,CURRBARSCOUNT,0);
QF:=IF(QD,REF(QE,QD),QE);
QG:=CONST(QF);
QH:=REF(QF,QD+1);
QW:=CONST(QH);
DRAWLINE(CURRBARSCOUNT=QW,H,ISLASTBAR,REF(H,QW-1),1),COLORGREEN,POINTDOT;
DRAWLINE(CURRBARSCOUNT=QG,H,ISLASTBAR,REF(H,QG-1),1),COLOR0099FF,POINTDOT;
QA1:=REF(H,10)=HHV(H,2*10+1);
QB1:=BACKSET(QA1,10+1);
QC1:=FILTER(QB1,10) AND H=HHV(H,10+1);
QD1:=BARSLAST(QC1);
QE1:=IF(QC1,CURRBARSCOUNT,0);
QF1:=IF(QD1,REF(QE1,QD1),QE1);
QG1:=CONST(QF1);
QH1:=REF(QF1,QD1+1);
QW1:=CONST(QH1);
DRAWLINE(CURRBARSCOUNT=QW1,H,ISLASTBAR,REF(H,QW1-1),1),COLORMAGENTA,POINTDOT;
PC:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));
DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));
CYC1:=IF(JJJT,0.01*EXPMA(AMOUNT,5)/EXPMA(AMOUNT/(100*PC),5),EMA((HIGH+LOW+CLOSE)/3,5));
{CYC2:=IF(JJJT,0.01*EXPMA(AMOUNT,13)/EXPMA(AMOUNT/(100*PC),13),EMA((HIGH+LOW+CLOSE)/3,13));}
CYC3:=IF(JJJT,0.01*EXPMA(AMOUNT,34)/EXPMA(AMOUNT/(100*PC),34),EMA((HIGH+LOW+CLOSE)/3,34));
{DRAWBAND(CYC1,RGB(100,0,200),CYC3,RGB(0,200,0));}
{IF(CYC1>CYC3 AND M5>操作线,操作线,DRAWNULL),COLORRED,LINETHICK2;}
CYC∞:IF(JJJT,DMA(PC,100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120)),COLORMAGENTA,LINETHICK3;
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0.14,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;
DRAWTEXT_FIX(1,0.00,0.00,0,'主题投资:')COLOR0000FF;
DRAWTEXT_FIX(1,0.06,0.00,0,EXTERNSTR(0,1))COLOR0000FF;
DRAWTEXT_FIX(1,0.00,0.07,0,'主营业务:')COLORFF00FF;
DRAWTEXT_FIX(1,0.06,0.07,0,EXTERNSTR(0,2))COLORFF00FF;
ZT:=C>REF(C,1)*1.090 AND C<REF(C,1)*1.105;
DT:=C<REF(C,1)*0.901 AND C>REF(C,1)*0.898;
STICKLINE(ZT,C,O,2,0),COLORRED;
STICKLINE(DT,C,O,2,0),COLORGREEN;
{DRAWTEXT(ZT,L-0.1,'涨停'),COLORRED;
DRAWTEXT(DT,H+0.3,'跌停'),COLORBLUE;}
流通市值:(FINANCE(40)/100000000),NODRAW,COLORRED;
- 上一篇公式:通达信主力阵地指标(源码)
- 下一篇公式:通达信超牛主图指标(源码)