分时超赢指标分时图用(大智慧)

以下是超赢指标分时图用(大智慧)源码和使用说明

分时超赢指标分时图用(大智慧)源码：

   DRAWTEXTAbs(0,5,'《夏卫东-自编》'),COLOR0000FF;

   {叠加线}

   TC:=STRCMP(STRLEFT(MARKETLABEL,2),'SZ');

   DPSH:="SH000001$CLOSE"/HHV(STKINDI('SH000001','分超引用.昨收#DAY'),0);

   DPSZ:="399001$CLOSE"/HHV(STKINDI('399001','分超引用.昨收#DAY'),0);

   DPC:=IF(INBLOCK('A股'),DYNAINFO(3)*IF(TC=0,DPSZ,DPSH),C);

   POLYLINE(C 0,DPC),COLORFF00FF,LINETHICK2,LAYER0;

   {分时线}

   最新:C,COLORWHITE,LINETHICK2,PRECIS2,LAYER0;

   AA:=SUM(AMOUNT,BARSCOUNT(C))/SUM(*100,BARSCOUNT(C));

   BB:=BETWEEN(C/AA,C+H,C-H);

   :IF(BB=0,MA(C,BARSCOUNT(C)),AA),COLOR00FFFF,LINETHICK2,PRECIS2;

   {分时超赢}

   ZLLR:=SUM((AMOUNT*(DYNAINFO(95)+DYNAINFO(94))/10000),0);

   ZLLC:=SUM((AMOUNT*(DYNAINFO(98)+DYNAINFO(97))/10000),0);

   主净:ZLLR-ZLLC,COLOR00FFFF,LINETHICK0,PRECIS2;

   TDLR:=SUM((AMOUNT*DYNAINFO(95)/10000),0);

   TDLC:=SUM((AMOUNT*DYNAINFO(98)/10000),0);

   超净:TDLR-TDLC,COLORFF00FF,LINETHICK0,PRECIS2;

   DDLR:=SUM((AMOUNT*DYNAINFO(94)/10000),0);

   DDLC:=SUM((AMOUNT*DYNAINFO(97)/10000),0);

   大净:DDLR-DDLC,COLOR00FF00,LINETHICK0,PRECIS2;

   ZDLR:=SUM((AMOUNT*DYNAINFO(93)/10000),0);

   ZDLC:=SUM((AMOUNT*DYNAINFO(96)/10000),0);

   中净:ZDLR-ZDLC,COLORB5B5B5,LINETHICK0,PRECIS2;

   XDLR:=IF(AMOUNT*(DYNAINFO(95)+DYNAINFO(94)+DYNAINFO(93)) 0,SUM(((AMOUNT-AMOUNT*(DYNAINFO(95)+DYNAINFO(94)+DYNAINFO(93)))/10000),0),0);

   XDLC:=IF(AMOUNT*(DYNAINFO(98)+DYNAINFO(97)+DYNAINFO(96)) 0,SUM(((AMOUNT-AMOUNT*(DYNAINFO(98)+DYNAINFO(97)+DYNAINFO(96)))/10000),0),0);

   散净:XDLR-XDLC,COLORFF9911,LINETHICK0;

   外盘:=sum(if(DYNAINFO(23)*close,DYNAINFO(23),0),0)*0.003906;

   内盘:=sum(if(DYNAINFO(22)*close,DYNAINFO(22),0),0)*0.003906;

   主动率:=(外盘-内盘)/(内盘+外盘)*100;

   单数比:=DYNAINFO(92)/DYNAINFO(91);

   通吃率:=((DYNAINFO(95)+DYNAINFO(94))-(DYNAINFO(98)+DYNAINFO(97)))*VOL/VOL*100;

   DRAWTEXTABS(440,5,'主动率:'+NUMTOSTRN(主动率,2)+'单数比:'+NUMTOSTRN(单数比,2)+'通吃率:'+NUMTOSTRN(通吃率,2)),COLOR00FFFF;

   DRAWTEXTABS(110,5,'上涨家数:'+NUMTOSTRN(DYNAINFO(69),0)+'家'),COLOR0000FF;

   DRAWTEXTABS(210,5,'下跌家数:'+NUMTOSTRN(DYNAINFO(70),0)+'家'),COLOR00FF00;

   DRAWTEXTABS(310,5,'平盘家数:'+NUMTOSTRN(DYNAINFO(71),0)+'家'),COLORFFFFFF;

   {五分钟}

   主5:=主净-REF(主净,5);

   超5:=超净-REF(超净,5);

   大5:=大净-REF(大净,5);

   中5:=中净-REF(中净,5);

   散5:=散净-REF(散净,5);

   DRAWTEXTABS(110,20,'五分钟各单净买(万):'),COLORFFFF00;

   DRAWTEXTABS(230,20,':'+NUMTOSTRN(主5,2)),COLOR00FFFF;

   DRAWTEXTABS(320,20,'超大:'+NUMTOSTRN(超5,2)),COLORFF00FF;

   DRAWTEXTABS(410,20,'大户:'+NUMTOSTRN(大5,2)),COLOR00FF00;

   DRAWTEXTABS(500,20,'中户:'+NUMTOSTRN(中5,2)),COLORB5B5B5;

   DRAWTEXTABS(590,20,':'+NUMTOSTRN(散5,2)),COLORFF9911;

   {画柱图};

   最大值:=400/(MAX(ZLLR,ZLLC,TDLR,TDLC,DDLR,DDLC,ZDLR,ZDLC,XDLR,XDLC,散净,中净,大净,超净,主净));

   主力买:=600-(ZLLR*最大值);

   主力卖:=600-(ZLLC*最大值);

   超大买:=600-(TDLR*最大值);

   超大卖:=600-(TDLC*最大值);

   大户买:=600-(DDLR*最大值);

   大户卖:=600-(DDLC*最大值);

   中户买:=600-(ZDLR*最大值);

   中户卖:=600-(ZDLC*最大值);

   散户买:=600-(XDLR*最大值);

   散户卖:=600-(XDLC*最大值);

   散户净买:=600-(ABS(散净)*最大值);

   中户净买:=600-(ABS(中净)*最大值);

   大户净买:=600-(ABS(大净)*最大值);

   超大净买:=600-(ABS(超净)*最大值);

   主力净买:=600-(ABS(主净)*最大值);

   {各单增减比例显示}

   ZLB:=SUM((ORDERVOL(1,2)/CAPITAL*100),0);

   ZLS:=SUM((ORDERVOL(2,2)/CAPITAL*100),0);

   主增:=ZLB-ZLS;

   TDB:=SUM((ORDERVOL(1,3)/CAPITAL*100),0);

   TDS:=SUM((ORDERVOL(2,3)/CAPITAL*100),0);

   超增:=TDB-TDS;

   DDB:=SUM(((ORDERVOL(1,2)/CAPITAL*100-ORDERVOL(1,3)/CAPITAL*100)),0);

   DDS:=SUM(((ORDERVOL(2,2)/CAPITAL*100-ORDERVOL(2,3)/CAPITAL*100)),0);

   大增:=DDB-DDS;

   ZDB:=SUM(((ORDERVOL(1,1)/CAPITAL*100-ORDERVOL(1,2)/CAPITAL*100)),0);

   ZDS:=SUM(((ORDERVOL(2,1)/CAPITAL*100-ORDERVOL(2,2)/CAPITAL*100)),0);

   中增:=ZDB-ZDS;

   XDB:=SUM(((VOL-ORDERVOL(1,1))/CAPITAL*100),0);

   XDS:=SUM(((VOL-ORDERVOL(2,1))/CAPITAL*100),0);

   散增:=XDB-XDS;

   DRAwrECTREL(330,主力买,350,610,RGB(200,0,0)),COLOR000000,LAYER5;

   DRAWRECTREL(350,主力卖,370,610,RGB(0,200,0)),COLOR000000,LAYER5;

   DRAWRECTREL(370,主力净买,390,610,(IF((主净 =0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;

   DRAWRECTREL(445,超大买,465,610,RGB(200,0,0)),COLOR000000,LAYER5;

   DRAWRECTREL(465,超大卖,485,610,RGB(0,200,0)),COLOR000000,LAYER5;

   DRAWRECTREL(485,超大净买,505,610,(IF((超净 =0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;

   DRAWRECTREL(560,大户买,580,610,RGB(200,0,0)),COLOR000000,LAYER5;

   DRAWRECTREL(580,大户卖,600,610,RGB(0,200,0)),COLOR000000,LAYER5;

   DRAWRECTREL(600,大户净买,620,610,(IF((大净 =0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;

   DRAWRECTREL(675,中户买,695,610,RGB(200,0,0)),COLOR000000,LAYER5;

   DRAWRECTREL(695,中户卖,715,610,RGB(0,200,0)),COLOR000000,LAYER5;

   DRAWRECTREL(715,中户净买,735,610,(IF((中净 =0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;

   DRAWRECTREL(790,散户买,810,610,RGB(200,0,0)),COLOR000000,LAYER5;

   DRAWRECTREL(810,散户卖,830,610,RGB(0,200,0)),COLOR000000,LAYER5;

   DRAWRECTREL(830,散户净买,850,610,(IF((散净 =0),RGB(200,0,255),RGB(255,255,0)))),COLOR000000,LAYER5;

   DRAWRECTREL(330,620,390,635,RGB(255,255,0));

   DRAWRECTREL(445,620,505,635,RGB(255,0,255));

   DRAWRECTREL(560,620,620,635,RGB(0,200,0));

   DRAWRECTREL(675,620,735,635,RGB(200,200,200));

   DRAWRECTREL(790,620,850,635,RGB(0,0,200));

   DRAWTEXTREL(310,530,'主'),ColorddfFFF;

   DRAWTEXTREL(310,600,'力'),ColorDDFFFF;

   DRAWTEXTREL(425,530,'超'),ColorDDFFFF;

   DRAWTEXTREL(425,600,'大'),ColorDDFFFF;

   DRAWTEXTREL(540,530,'大'),ColorDDFFFF;

   DRAWTEXTREL(540,600,'户'),ColorDDFFFF;

   DRAWTEXTREL(655,530,'中'),ColorDDFFFF;

   DRAWTEXTREL(655,600,'户'),ColorDDFFFF;

   DRAWTEXTREL(770,530,'散'),ColorDDFFFF;

   DRAWTEXTREL(770,600,'户'),ColorDDFFFF;

   DRAWTEXTREL(290,660,'买入'),colorred;

   DRAWTEXTREL(290,720,'卖出'),Color00FF00;

   DRAWTEXTREL(290,780,'净买'),COLOR1199FF;

   DRAWTEXTREL(290,830,'增减'),COLORFFFF00;

   DRAWTEXTREL(330,660,NUMTOSTRN(ZLLR,2)),colorred;

   DRAWTEXTREL(330,720,NUMTOSTRN(ZLLC,2)),COLOR00FF00;

   DRAWTEXTREL(330,780,NUMTOSTRN(主净,2)),COLOR1199FF;

   DRAWTEXTREL(330,830,NUMTOSTRN(主增,2)+'%'),COLORFFFF00;

   DRAWTEXTREL(445,660,NUMTOSTRN(TDLR,2)),colorred;

   DRAWTEXTREL(445,720,NUMTOSTRN(TDLC,2)),COLOR00FF00;

   DRAWTEXTREL(445,780,NUMTOSTRN(超净,2)),COLOR1199FF;

   DRAWTEXTREL(445,830,NUMTOSTRN(超增,2)+'%'),COLORFFFF00;

   DRAWTEXTREL(560,660,NUMTOSTRN(DDLR,2)),colorred;

   DRAWTEXTREL(560,720,NUMTOSTRN(DDLC,2)),COLOR00FF00;DRAWTEXTREL(560,780,NUMTOSTRN(大净,2)),COLOR1199FF;

   DRAWTEXTREL(560,830,NUMTOSTRN(大增,2)+'%'),COLORFFFF00;

   DRAWTEXTREL(675,660,NUMTOSTRN(ZDLR,2)),colorred;

   DRAWTEXTREL(675,720,NUMTOSTRN(ZDLC,2)),COLOR00FF00;DRAWTEXTREL(675,780,NUMTOSTRN(中净,2)),COLOR1199FF;

   DRAWTEXTREL(675,830,NUMTOSTRN(中增,2)+'%'),COLORFFFF00;

   DRAWTEXTREL(790,660,NUMTOSTRN(XDLR,2)),colorred;

   DRAWTEXTREL(790,720,NUMTOSTRN(XDLC,2)),COLOR00FF00;

   DRAWTEXTREL(790,780,NUMTOSTRN(散净,2)),COLOR1199FF;

   DRAWTEXTREL(790,830,NUMTOSTRN(散增,2)+'%'),COLORFFFF00;

   BGTYU:=IF(DATE =1130107,1,0);

   GHYJKU:=BETWEEN((DCLOSE*BGTYU)/(SUM(AMOUNT,BARSCOUNT((DCLOSE*BGTYU)))/SUM(VOL*100,BARSCOUNT((DCLOSE*BGTYU)))),1.05,0.95);

   VBNH:=IF(GHYJKU=0,MA((DCLOSE*BGTYU),BARSCOUNT((DCLOSE*BGTYU))),(SUM(AMOUNT,BARSCOUNT((DCLOSE*BGTYU)))/SUM(VOL*100,BARSCOUNT((DCLOSE*BGTYU)))));

   底线:1.003,COLORRED,LINETHICK2;

   高线:1.03,COLORRED,LINETHICK3;

   黄色起动线:EXPMA((DCLOSE/VBNH),20),COLORYELLOW,POINTDOT;

   洋红色主力线:EXPMA((DCLOSE/VBNH),60),COLORMAGENTA,LINETHICK2;

   绿色散户线:EXPMA((DCLOSE/VBNH),120),COLORGREEN,LINETHICK2;

   DRAWICON(CROSS(EXPMA((DCLOSE/VBNH),60),EXPMA((DCLOSE/VBNH),120)),EXPMA((DCLOSE/VBNH),60)*1,1);

   DRAWICON(CROSS(EXPMA((DCLOSE/VBNH),120),EXPMA((DCLOSE/VBNH),60)),EXPMA((DCLOSE/VBNH),120)*1,2);

   DRAWICON(CROSS(EXPMA((DCLOSE/VBNH),20),1.02),1.02+0.005,18);

   STICKLINE(CROSS(EXPMA((DCLOSE/VBNH),20),1.02),1.02,1.025,4,0),,COLORMAGENTA;

   STICKLINE(EXPMA(C,10) EXPMA(C,60),1.03,1.034,1.0,0),COLORRED;

   STICKLINE(EXPMA(C,10) EXPMA(C,60),1.03,1.025,1.0,0),COLORGREEN;

   DRAWTEXT(CROSS(EXPMA((DCLOSE/VBNH),20),1.02),1.02,'拉升'),COLORWHITE;

   DRAWTEXT(CROSS(EXPMA((DCLOSE/VBNH),20),1.04),1.04,'可能'),COLORWHITE;

   STICKLINE(EXPMA((DCLOSE/VBNH),120) 1.003,1.03,1.039,1.0,0),COLORMAGENTA;

   DRAWTEXT(CROSS(EXPMA((DCLOSE/VBNH),120),1.0029),1.028,'买进'),COLORWHITE;

   DRAWICON(CROSS(EXPMA((DCLOSE/VBNH),120),1.0029),1.0326*1,13);

   DRAWTEXT(CROSS(EXPMA((DCLOSE/VBNH),120),1.0029),1.036,'观察分时量'),COLORWHITE;

   DRAWTEXT(CROSS(EXPMA((DCLOSE/VBNH),120),1.004),1.005,'超强'),COLORWHITE;

   DRAWICON(CROSS(EXPMA((DCLOSE/VBNH),120),1.004),1.003*1,13);

   JJ:=(CLOSE+HIGH+LOW)/3;

   A:=Ema(JJ,10);

   B:=REF(A,1);

   stICKLINE(A B,A,B,5,0),COLORYELLOW;

   STICKLINE(A B,A,B,5,0),COLORBLUE;

   M1:EMA(CLOSE,3);

   M2:EMA(CLOSE,8);

   M3:EMA(M2,13);

   M4:EMA(M2,55);

   VAR1:=EMA(M3,55);

   M5:EMA(M4,81),COLORRED,LINETHICK2;

   VAR2:=(REF(HIGH,1)+REF(LOW,1))/2;

   VAR3:=MA(CLOSE,21)+2*STD(CLOSE,21);

   DRAWICON(crOSS(VAR2,VAR3),HIGH*1.035,2);

   DRAWTEXT(CROSS(VAR2,VAR3),HIGH*1.02,'卖出'),COLORGREEN;

   VAR4:=REF(CLOSE,1);

   VAR5:=SMA(MAX(CLOSE-VAR4,0),7,1)/SMA(Abs(CLOSE-VAR4),7,1)*100;

   VAR6:=CROSS(79,VAR5);

   VAR7:=FILTER(VAR6,4);

   DRAWICON(VAR7,HIGH*1.035,2);

   DRAWTEXT(VAR7,HIGH*1.02,'卖出'),COLORGREEN;

   A7:=(2*C+H+L)/4;

   VAR10:=LLV(LOW,34);

   VAR11:=HHV(HIGH,34);

   SK:=EMA((A7-VAR1)/(VAR2-VAR1)*100,7);

   SD:=EMA(0.667*REF(SK,1)+0.333*SK,5);

   DRAWTEXT(IF(COUNT(CLOSE REF(CLOSE,1),8)/8 6/10ANDvol =1.5*MA(VOL,5)AND

   COUNT(SK =SD,3)ANDREF(LOW,1)=LLV(LOW,120),1,0),LOW,'●买进'),COLORRED;

   DRAWTEXT(IF(COUNT(CLOSE REF(CLOSE,1),13)/13 6/10AND

   COUNT(SK SD,6)ANDREF(LOW,5)=LLV(LOW,120)ANDREF(CLOSE =OPEN,4)AND

   REF(CLOSE OPEN,3)ANDREF(CLOSE OPEN,2)ANDREF(OPEN CLOSE,1)AND

   OPEN REF(CLOSE,1),1,0),LOW,'●买进'),COLORRED;

   D:=MA(CLOSE,80)-MA(CLOSE,10)/3;

   DRAWTEXT(IF(CLOSE DANDVOL/240 MA(VOL,5)/240ANDCLOSE REF(CLOSE,1)*1.08

   ANDCLOSE MA(CLOSE,13)*1.3,1,0),LOW,'●'),COLORRED;

分时超赢指标分时图用(大智慧)截图