通达信金兰看盘主副图指标公式源码

金兰看盘主图增加了极阴次阳战法-主力操盘强弱：强-主力上攻意愿强烈，精-主力深思熟虑震荡后选择方向，弱-虚晃一枪准备跑路。切记：强有强弩之末；弱有物极必反。有些没标注为精。
 

金兰看盘主图源码

DRAWTEXT_FIX(1,0.00,0.00,0,'主营业务：')COLOR0000FF;
DRAWTEXT_FIX(1,0.04,0.00,0,EXTERNSTR(0,1))COLOR0000FF;
DRAWTEXT_FIX(1,0.00,0.08,0,'主题概念：')COLORFF00FF;
DRAWTEXT_FIX(1,0.04,0.08,0,EXTERNSTR(0,2))COLORFF00FF;
DRAWTEXT_FIX(1,0.00,0.16,0,'公司亮点：')COLOR00FF00;
DRAWTEXT_FIX(1,0.04,0.16,0,EXTERNSTR(0,3))COLOR00FF00;

ZT:=C/REF(C,1)>1.095 AND H=C;
STICKLINE(ZT,C,O,3.0,0),COLORYELLOW;
持股线:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
黑马线:EMA(持股线,N2)+EMA(CLOSE,N2)*16.9/100,LINETHICK1,COLORYELLOW;
马升:IF(黑马线>=REF(黑马线,1),黑马线,DRAWNULL),LINETHICK1, COLORYELLOW;
马降:IF(黑马线<REF(黑马线,1),黑马线,DRAWNULL),LINETHICK1,COLORLICYAN;
HM:CROSS(C,马升) AND ZT;
DRAWICON(HM,L*0.989,38);
{龙头线}
龙头线:EMA((COST(99)+COST(93)+COST(85))/3,9),COLORLIMAGENTA;{获利筹}
{龙升:IF(龙头线>=REF(龙头线,1),龙头线,DRAWNULL),LINETHICK2 COLORYELLOW;
龙降:IF(龙头线<REF(龙头线,1),龙头线,DRAWNULL),LINETHICK2,COLORLICYAN;}

A11:=REF(龙头线,P1)=HHV(龙头线,2*P1+1);
B11:=FILTER(A11,P1);
C11:=BACKSET(B11,P+1);
D11:=FILTER(C11,P1);{高点}
A21:=REF(龙头线,P1)=LLV(龙头线,2*P1+1);
B21:=FILTER(A21,P1);
C21:=BACKSET(B21,P1+1);
D21:=FILTER(C21,P1);{低点}
龙上:REF(龙头线,BARSLAST(D11)),NODRAW;
龙下:REF(龙头线,BARSLAST(D21)),NODRAW;
{H11:STICKLINE(C>0,龙下,龙下,1,0),COLORLIBLUE;
H21:STICKLINE(C>0,龙上,龙上,1,0),COLORBROWN;}
L1:CROSS(C,龙上) AND ZT;
{L2:CROSS(C,龙下) AND ZT;}
DRAWICON(L1=1{ OR L2=1},H*1.03,1);
GL:CROSS(C,龙头线) AND ZT;
DRAWICON(GL,L*0.999,25);

SDX:MA(C,169);{上帝线}
上升:IF(SDX>=REF(SDX,1),SDX,DRAWNULL),LINETHICK2 COLORRED;
下降:IF(SDX<REF(SDX,1),SDX,DRAWNULL),LINETHICK2,COLORGREEN;
A1:=REF(SDX,P)=HHV(SDX,2*P+1);
B1:=FILTER(A1,P);
C1:=BACKSET(B1,P+1);
D1:=FILTER(C1,P);{高点}
A2:=REF(SDX,P)=LLV(SDX,2*P+1);
B2:=FILTER(A2,P);
C2:=BACKSET(B2,P+1);
D2:=FILTER(C2,P);{低点}
上:REF(SDX,BARSLAST(D1)),COLORFF00FF,NODRAW;
下:REF(SDX,BARSLAST(D2)),COLOR00FF00,NODRAW;
H1:=STICKLINE(C>0,下,下,1,0),COLOR00FF00;
H2:STICKLINE(C>0,上,上,1,0),COLORFF00FF;
CXG:CROSS(C,下) AND ZT;
DRAWICON(CXG=1,L*0.98,34);
SDY:CROSS(C,上) AND ZT;
STICKLINE(SDY,O,(C+O)/2,3,0),COLORLIMAGENTA;
{DRAWICON(SDY,L*0.975,11);}
GSD:CROSS(C,上升) AND ZT;
DRAWICON(GSD=1,L*0.999,5);

{双阴次阳}
SB1:REF(O,2)>REF(C,2) AND C>O {AND C<REF(O,2)} AND REF(O,1)>REF(C,1)  AND REF(COUNT(ZT,3),1);
SB高位:=REF(H,BARSLAST(SB1=1)),POINTDOT;
STICKLINE(H,SB高位,SB高位,1,0),COLORYELLOW;
SY:CROSS(C,SB高位)  AND  ZT,NODRAW;
STICKLINE(SY,C,O,0.5,0),COLORWHITE;
Q2:SB1=1 AND C>REF(H,3) AND C>REF(O,1) AND REF(H,2)>=REF(H,3);
DRAWTEXT(Q2=1,H*1.01,'Q'),COLORRED;
J2:SB1=1 AND C>REF(O,3) AND C>REF(C,1) AND C>REF(L,2);
DRAWTEXT(J2=1,H*1.01,'J'),COLORRED;
R2:SB1=1 AND C<REF(O,2) AND C<REF(C,1) ;
DRAWTEXT(R2=1,H*1.01,'R'),COLORRED;

{单阴次阳}
A3:=REF(O,1)>REF(C,1) AND C>O {AND C<REF(O,1)} AND REF(COUNT(ZT,2),1);
高位:=REF(H,BARSLAST(A3=1)),POINTDOT;
STICKLINE(H,高位,高位,1,0),COLORWHITE;
DY:CROSS(C,高位)  AND  ZT,NODRAW;
STICKLINE(DY,C,O,0.5,0),COLORWHITE;
Q1:A3=1 AND C>REF(H,2) AND C>REF(H,1) AND REF(O,1)>=REF(H,2);
DRAWTEXT(Q1=1,H*1.01,'Q'),COLORRED;
J1:A3=1 AND C<REF(O,1) AND C>REF(C,1) AND (C>REF(L,2) OR C>REF(H,3));
DRAWTEXT(J1=1,H*1.01,'J'),COLORRED;
R1:A3=1 AND C<REF(H,3) AND C<REF(L,1) ;
DRAWTEXT(R1=1,H*1.01,'R'),COLORRED;

{江恩线}
HDAY:=20;
{LDAY:=20;}
调点:=3;
CURR:=CURRBARSCOUNT;
TCH:=CONST(FINDHIGH(H,0,HDAY*10,1));
GTT:=CONST(BARSLAST(TCH=H))+1;
SX跌H:=CONST(IF(GTT=1,H,REF(H,GTT-1)));
BCL:=CONST(FINDLOW(L,0,LDAY*10,1));
DTT:=CONST(BARSLAST(BCL=L))+1;
SX涨L:=CONST(IF(DTT=1,L,REF(L,DTT-1)));
涨点:=BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(L=SX涨L)+1));
跌点:=BARSSINCE(BACKSET(ISLASTBAR,BARSLAST(H=SX跌H)+1));
最低:=IF(调点=1,跌点,IF(调点=2,涨点,IF(调点=3,涨点,跌点)));
L斜率:=下角度*10/IF(C<300,1000,10);
最高:=IF(调点=1,跌点,IF(调点=2,涨点,IF(调点=3,跌点,涨点)));
{H斜率:=上角度/IF(C<300,1000,10);}
IM68:=((SX跌H-SX涨L)/8-(SX跌H-SX涨L)/8);
GH跌X:=SX跌H+(SX跌H-SX涨L)/8; 
DL涨X:=SX涨L-(SX跌H-SX涨L)/8;
GTHT:=IF(DTT>GTT,DTT,GTT);
R:=ABS(GTT-DTT);
天线:=SX跌H;
地线:=SX涨L;
K:=(天线-地线)/(IF(跌点>=涨点,跌点,涨点)-IF(跌点>=涨点,涨点,跌点));
上斜线4:=IF(地线+CONST(L斜率*0.50)*最低>=地线,地线+CONST(L斜率*0.50)*最低,DRAWNULL);
上4:IF(上斜线4<=天线*1.05,上斜线4,DRAWNULL),COLOR0000FF,DOTLINE;
上斜线5:IF(地线+CONST(L斜率*0.25)*最低>=地线,地线+CONST(L斜率*0.25)*最低,DRAWNULL),DOTLINE,COLORLIBLUE;
上5:IF(上斜线5<=天线*1.05,上斜线4,DRAWNULL),COLOR0000FF,DOTLINE;

{炸板}
KCBB:=IF(CODELIKE('68') OR CODELIKE('30'),1,0);
ZF0:=IF(KCBB=1,1.195,1.093);
炸板1:=H>REF(C,1)*ZF0 AND C<H;
涨停10:=C>REF(C,1)*ZF0;
炸板2:=IF(炸板1 AND NOT(涨停10),1,0);
LX11:=BARSLAST(炸板2>0);
炸板3:IF(炸板1 AND NOT(涨停10),H*1,DRAWNULL),CIRCLEDOT,COLORFF00FF,LINETHICK2;

ZB:=炸板1 AND NOT(涨停10);
Z16:=BARSLAST(ZB>0);
Z26:=REF(HHV(H,2),Z16);
Z36:=CROSS(C,Z26 )AND 涨停10;
H3:=IF(BARSLAST(ZB)>0 AND BARSLAST(ZB)<190,REF(H,BARSLAST(ZB)),DRAWNULL),LINETHICK1,COLORGREEN;
{STICKLINE(CURRBARSCOUNT>=1,H3,H3,-1,0),,COLOR7CAE39,NODRAW;}
DRAWTEXT(ISLASTBAR,H3,'--炸板'),COLOR7CAE39;
BK:=BARSLAST(CURRBARSCOUNT=CONST(BARSLAST(FILTER(H3,3)))+1);
{DT:=REF(REF(H,1),BK),DOTLINE,COLORGREEN;}
STICKLINE(BK,H3,H3,-1,0),COLOR7CAE39;
{DT1:=REF(H3,BK),DOTLINE,COLORGREEN;}
{过前高}
GJ:=HHV(H,200),COLORFF00DD;
ZTS:=BARSLAST(GJ<>REF(GJ,1))>=6,NODRAW;
TJ1:=BARSLAST(GJ=REF(GJ,1));
HX:H>IF(ZTS=1,REF(GJ,1),DRAWNULL),NODRAW;
AA1:=REF(GJ,N1)=HHV(GJ,2*N1+1);
BB1:=FILTER(AA1,N1);
CC1:=BACKSET(BB1,N1+1);
DD1:=FILTER(CC1,N1),NODRAW;{高点}
前期高点:REF(GJ,BARSLAST(DD1)),COLORFF00FF,NODRAW;
PT:STICKLINE(C>0,前期高点,前期高点,1,0),COLORRED;
{PL:=(CROSS(C,REF(HX,1)) OR CROSS(C,REF(HX,3))) AND C/REF(C,1)>=1.098 AND C=H,NODRAW;}
PL1:=(CROSS(C,REF(前期高点,1))OR L<前期高点 AND C>前期高点) AND C/REF(C,1)>=1.098 AND C=H,NODRAW;
{DRAWICON(PL,L*0.99,21);
DRAWTEXT(PL1,L*0.98,'GD')COLORYELLOW;
STICKLINE(PL1,O,(C+O)/2,2,0),COLOR0088FF;}
STICKLINE(PL1,(C+O)/2,C,3,0),COLORRED;

金兰看盘副图源码

H_L:=0.1*CONST(HHV(AMOUNT,240));
V100:= V<=LLV(V,N)*1.2 AND V>0 AND BARSCOUNT(V)>=N;
百日地量群:COUNT(V100,5)>=3;
DRAWTEXT(FILTER(百日地量群,4),AMOUNT+2*H_L,'地量群'),COLORGRAY;

总量:AMOUNT,VOLSTICK;
MAVOL1:=MA(总量,M1);
MAVOL2:=MA(总量,M2);

去除次新股:=BARSCOUNT(C)>=15;{次新股的天数}
ZTB:=C>INTPART(REF(C,1)*(1+10/100)/0.01+0.5)*0.01-0.006 AND C=H;
STICKLINE(AMOUNT>800000000 AND ZTB,0,AMOUNT,-1,0),COLORRED;
STICKLINE(AMOUNT>1000000000 AND ZTB,0,AMOUNT,-1,0),COLORMAGENTA;

启动:=MA(总量,250),DOTLINE,LINETHICK1,COLORWHITE;
量比:V/REF(MA(V,5),1),COLORBROWN,NODRAW;
几倍:=1.9;
倍量: 总量 >=REF(总量,1)*几倍 AND (IF(C<O,C>REF(C,1),1)),COLORYELLOW,NODRAW;
倍缩: REF(总量,1)>= 总量 *几倍,COLORMAGENTA,NODRAW;
百低:总量=LLV(总量,125) AND BARSCOUNT(总量)>=125,COLORBLUE,NODRAW;
平量: RANGE(总量 /REF(总量,1),0.97,1.03) AND BARSCOUNT(总量)>=2,COLORWHITE,NODRAW;
天量:总量=HHV(总量,120), COLORRED;
量王:天量&&倍量&&量比>2&&(BARSCOUNT(C)+1)>120,COLORGREEN, NODRAW;
倍数:总量/REF(总量,1),COLORYELLOW,NODRAW;
量王后:REF(量王,1) AND V>REF(V,1),COLORMAGENTA;
STICKLINE(量王后,0,总量*0.88,2,0),COLORMAGENTA;
V1:=总量 *0.9;
V2:= 总量 *0.8;
STICKLINE(倍量, 0,V1,1,0),COLORYELLOW;
STICKLINE(倍缩, 0,V1,0.1,0),COLORMAGENTA;
STICKLINE(百低, 0,V1,1,0),COLORBLUE;

STICKLINE(天量,0,V1,0.1,0),COLORRED;
STICKLINE(量王&&COUNT(量王,2)<=1,0,AMOUNT,-1,0),COLORGREEN;
STICKLINE(C<O AND C>REF(C,1),0, 总量,0,0),COLORRED;{假阴柱}
STICKLINE((量王 AND 总量),总量/3,总量/3,2,0)COLORRED LINETHICK9;
STICKLINE((量王 AND 总量),总量*2/3,总量*2/3,2,0)COLORRED LINETHICK9;
STICKLINE((量王 AND 总量),总量*1/2,总量*1/2,2,0)COLORRED LINETHICK9;
LX1:=BARSLAST(量王>0);
NOTEXT8:IF(CURRBARSCOUNT<=CONST(LX1)+1,CONST(REF(总量,LX1)),DRAWNULL),COLORGREEN LINETHICK1;

天量王:总量=HHV(总量,500),COLORRED;
{DRAWLINE(天量王,H,REF(天量王,1),REF(H,1),1),COLORYELLOW,DOTLINE,LINETHICK2;}
LX3:=BARSLAST(天量王>=1);
NOTEXT10:IF(CURRBARSCOUNT<=CONST(LX3)+1,CONST(REF(总量,LX3)),DRAWNULL),COLORYELLOW, LINETHICK2;
STICKLINE((天量王 AND 总量),总量,总量*0.9,3,0),COLORYELLOW ;
梯量:=EVERY(C>O,3) AND  EVERY(C>REF(C,1),2) AND EVERY(V>REF(V,1),2){ AND SUM(涨幅,3)<15};
梯量王:梯量 AND 总量>NOTEXT8 AND 天量 AND 量比>1.618 {AND (BARSCOUNT(C)+1)>120};
LX2:=BARSLAST(梯量王>=1);
DRAWLINE(梯量王,H,REF(梯量王,1),REF(H,1),1),COLORLIRED,DOTLINE;
DRAWLINE(梯量王,L,REF(梯量王,1),REF(L,1),1),COLORLICYAN,DOTLINE;

{梯量王后:=LX2=1 AND V>REF(V,1),COLORMAGENTA;
DRAWLINE(梯量王后,H,REF(梯量王后,1),REF(H,1),1),COLORRED,DOTLINE;
梯量太后:=LX2=2 AND V>REF(V,2),COLORMAGENTA;
DRAWLINE(梯量太后,H,REF(梯量太后,1),REF(H,1),1),COLORRED,LINETHICK1;
DRAWLINE(梯量太后,L,REF(梯量太后,1),REF(L,1),1),COLORCYAN;}
{资金博弈}
{DRAWRECTREL(0,250,200,999.4,IF(120,RGB(10,0,0),0));}
代码:=STR2CON(CODE),NODRAW,COLORYELLOW;
净流入:=TDXDLL1(3,代码,2,1)/10000,NODRAW;
超大单:=TDXDLL1(3,代码,2,5)/10000,,NODRAW;
大单:=TDXDLL1(3,代码,2,4)/10000,NODRAW;
中单:=TDXDLL1(3,代码,2,3)/10000,NODRAW;
小单:=TDXDLL1(3,代码,2,2)/10000,NODRAW;
DAZHI:=CONST(MAX(ABS(净流入),MAX(ABS(超大单),MAX(ABS(大单),MAX(ABS(中单),ABS(小单)))))),NODRAW;
{DRAWRECTREL(0,CONST(830-(ABS(净流入)*500/DAZHI)),30,935,IF(CONST(净流入)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(40,CONST(830-(ABS(超大单)*500/DAZHI)),70,935,IF(CONST(超大单)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(80,CONST(830-(ABS(大单)*500/DAZHI)),110,935,IF(CONST(大单)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(120,CONST(830-(ABS(中单)*500/DAZHI)),150,935,IF(CONST(中单)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(160,CONST(830-(ABS(小单)*500/DAZHI)),190,935,IF(CONST(小单)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.002,0.98,0,'净流'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.040,0.98,0,'超大'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.080,0.98,0,'大单'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.120,0.98,0,'中单'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.160,0.98,0,'小单'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.05,0.25,0,'资金搏弈 (万元)'),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.002,0.55,0,INTPART(净流入)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.040,0.55,0,INTPART(超大单)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.080,0.555,0,INTPART(大单)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.120,0.550,0,INTPART(中单)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.160,0.55,0,INTPART(小单)),COLORWHITE;};