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

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

　　金兰看盘主图源码

　　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(黑马线

　　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(龙头线

　　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

　　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 CREF(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

　　DRAWTEXT(R2=1,H*1.01,'R'),COLORRED;

　　{单阴次阳}

　　A3:=REF(O,1)>REF(C,1) AND C>O {AND C

　　高位:=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 CREF(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

　　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

　　涨停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(CREF(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(CREF(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;};