【通达信指标】资金分时指标，辅助判断买卖时机（分时主图）

第一部分 指标介绍

1.在分时图上用颜色区分强弱区域，叠加筹码获利比例、机构/散户买卖盘、量化评分、竞价动能、支撑阻力位，并标记"分时起爆"启动信号。

2.无未来函数，信号不漂移。

第二部分 公式源码（主图）

GHCZS1:=WINNER(C)*100;

GHCZS3:=GHCZS1>50 AND GHCZS1<59;

选:IF(REF(GHCZS3,1)=1,C>REF(H,1),IF(REF(GHCZS1,1)<=50,C>REF(REF(H,BARSLAST(GHCZS3)),1),0)) AND BARSLAST(GHCZS3)<8 AND REF(BARSLAST(GHCZS3),1)<8-1,NODRAW;

GHCZS4:=TOTALCAPITAL*100/FINANCE(46);

GHCZS5:=WINNER(C)*100;

GHCZS6:=DRAWSL(GHCZS3,H,0,IF(REFX(BARSNEXT(GHCZS3),1)=DRAWNULL,CURRBARSCOUNT,REFX(BARSNEXT(GHCZS3),1)+1),0);

GHCZS7:=WINNER(C)*100;

GHCZS8:=BETWEEN(GHCZS7,50,59);

GHCZS9:=BACKSET(BARSTATUS=2,BARSLAST(GHCZS8)+1);

GHCZS10:=GHCZS9>REF(GHCZS9,1);

GHCZS11:=REF(H,BARSLAST(GHCZS10));

GHCZS12:=(HIGH+LOW+OPEN+2*CLOSE)/5;

分时底:LLV(L,380),COLORGREEN,POINTDOT,NODRAW;

最新:C,COLORWHITE,NODRAW;

IF(C>=REF(GHCZS6,1),C,DRAWNULL),LINETHICK2,COLORCYAN;

IF(C>=REF(GHCZS11,1),C,DRAWNULL),LINETHICK2,COLORRED;

IF(C<=REF(分时底,1),C,DRAWNULL),LINETHICK2,COLORGREEN;

GHCZS13:=(VOL/CLOSE)/3;

GHCZS14:=SUM((IF(((GHCZS13>0.20) AND (CLOSE>(REF(CLOSE,1)))),GHCZS13,0)),0);

GHCZS15:=SUM((IF(((GHCZS13>0.20) AND (CLOSE<(REF(CLOSE,1)))),GHCZS13,0)),0);

GHCZS16:=GHCZS14+GHCZS15;

GHCZS18:=GHCZS14/GHCZS15;

GHCZS19:=STRCAT(STRCAT('买',CON2STR((100*GHCZS14)/GHCZS16,0)),'%');

GHCZS20:=STRCAT(STRCAT('卖',CON2STR((100*GHCZS15)/GHCZS16,0)),'%');

DRAWTEXT_FIX(1,1,0.87,0,GHCZS19),COLORRED;

DRAWTEXT_FIX(1,1,0.92,0,GHCZS20),COLORGREEN;

GHCZS21:=C;

GHCZS22:=SUM(C*V,240)/SUM(V,240);

GHCZS23:=BARSCOUNT(C);

GHCZS24:=REF(HHV(H,GHCZS23),1);

GHCZS25:=CROSS(C,REF(HHV(H,GHCZS23),1)) AND C/GHCZS22<1.09 AND GHCZS23>1 AND GHCZS23<240;

GHCZS26:=COUNT(GHCZS25,13)>=3 AND CROSS(C,REF(HHV(H,GHCZS23),1));

GHCZS27:=BARSLAST(GHCZS26)<13;

GHCZS28:=DYNAINFO(4)>0 AND HHV(HIGH,2)/LLV(LOW,2)<1.25 AND REF(CLOSE,1)<LLV(LOW,3)+(HHV(HIGH,3)-LLV(LOW,3))*0.85;

GHCZS29:=EMA(CLOSE,2);

GHCZS30:=EMA(CLOSE,3);

GHCZS31:=MAX(GHCZS29,GHCZS30);

GHCZS32:=CLOSE>GHCZS31 AND GHCZS28 AND (CLOSE>REF(HHV(HIGH,2),1) AND (CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.015) AND (V/CAPITAL<=0.2) AND C/REF(C,1)<1.07;

GHCZS33:=MA(((SLOPE(C,20)*5)+C),10);

GHCZS34:=HOUR=09 AND MINUTE=45;

GHCZS35:=LLV(L,15);

GHCZS36:=BARSLAST(GHCZS34);

GHCZS37:=REF(GHCZS35,GHCZS36);

GHCZS38:=CONST(GHCZS37);

GHCZS39:=HOUR=09 AND MINUTE=45;

GHCZS40:=HHV(H,15);

GHCZS41:=BARSLAST(GHCZS39);

GHCZS42:=REF(GHCZS40,GHCZS41);

GHCZS43:=CONST(GHCZS42);

GHCZS44:=EMA(CLOSE,12)-EMA(CLOSE,26);

GHCZS45:=EMA(GHCZS44,9);

GHCZS46:=(GHCZS44-GHCZS45)*2;

GHCZS47:=GHCZS46>0 AND GHCZS44>0 AND GHCZS45>0;

GHCZS48:=HOUR=10 AND MINUTE=0;

GHCZS49:=HHV(H,30);

GHCZS50:=BARSLAST(GHCZS48);

GHCZS51:=REF(GHCZS49,GHCZS50);

GHCZS52:=CONST(GHCZS51);

GHCZS53:=CLOSE>GHCZS52 AND REF(C<=GHCZS52,1) AND CLOSE>GHCZS33;

GHCZS54:=FILTER(GHCZS53,100);

GHCZS55:=DYNAINFO(3);

GHCZS56:=CLOSE<=GHCZS55*1.04 AND CLOSE>GHCZS55;

GHCZS57:=V/REF(MA(V,5),1);

GHCZS58:=GHCZS47 AND GHCZS54 AND GHCZS56 AND GHCZS51>GHCZS55 AND GHCZS57>=1;

GHCZS59:=CLOSE;

GHCZS60:=(CLOSE-REF(CLOSE,5))/REF(CLOSE,5);

GHCZS61:=STICKLINE(GHCZS60>0,DYNAINFO(3),DYNAINFO(3)*(1+GHCZS60),0.1,0);

GHCZS62:=STICKLINE(GHCZS60<0,DYNAINFO(3),DYNAINFO(3)*(1+GHCZS60),0.1,0);

GHCZS63:=CLOSE/DYNAINFO(3);

GHCZS64:=FILTER(GHCZS60>0.015 AND GHCZS60>REF(GHCZS60,1)*2 AND VOL>REF(VOL,1)*2 AND CLOSE>REF(CLOSE,1) OR GHCZS60>0.025,240);

GHCZS65:=MAX(DYNAINFO(3),DYNAINFO(5));

GHCZS66:=MIN(DYNAINFO(3),DYNAINFO(6));

GHCZS67:=GHCZS65-GHCZS66;

阻力:GHCZS66+GHCZS67*8/9,COLORLIRED,DOTLINE;

支撑:GHCZS66+GHCZS67*0.5/9,COLORGREEN,DOTLINE;

DRAWTEXT(FILTER(CROSS(C,支撑),240),L-0.01,'吸筹'),COLOR0000FF;

DRAWTEXT(FILTER(CROSS(阻力,C),240),H-0.01,'卖出'),COLOR0000FF;

GHCZS68:=V*C/100;

GHCZS69:=SUM((IF(((GHCZS68/8>20) AND (CLOSE>(REF(CLOSE,1)))),GHCZS68,0)),0);

GHCZS70:=SUM((IF(((GHCZS68/8>20) AND (CLOSE<(REF(CLOSE,1)))),GHCZS68,0)),0);

GHCZS71:=SUM((IF(((GHCZS68/8<20) AND (CLOSE>(REF(CLOSE,1)))),GHCZS68,0)),0);

GHCZS72:=SUM((IF(((GHCZS68/8<20) AND (CLOSE<(REF(CLOSE,1)))),GHCZS68,0)),0);

GHCZS73:=GHCZS69;

GHCZS74:=GHCZS70;

GHCZS75:=GHCZS71;

GHCZS76:=GHCZS72;

GHCZS77:=BARSLAST(CLOSE=HHV(CLOSE,60));

GHCZS78:=BARSLAST(CLOSE=LLV(CLOSE,60));

GHCZS79:=GHCZS78;

GHCZS80:=GHCZS77;

GHCZS81:=GHCZS78;

GHCZS82:=GHCZS77;

GHCZS83:=GHCZS79>GHCZS80 AND GHCZS81>GHCZS82;

GHCZS84:=GHCZS79>GHCZS80 AND GHCZS81<GHCZS82;

GHCZS85:=GHCZS80>GHCZS79 AND GHCZS82>GHCZS81;

GHCZS86:=GHCZS80>GHCZS79 AND GHCZS82<GHCZS81;

DRAWICON(FILTER(CROSS(GHCZS79,GHCZS80),240),OPEN*1,5);

DRAWTEXT(FILTER(CROSS(GHCZS79,GHCZS80),240),OPEN*0.995,'抓'),COLORYELLOW;

GHCZS87:=BARSCOUNT(C);

GHCZS88:=SUM(C*V,GHCZS87)/SUM(V,GHCZS87);

GHCZS89:=MA(V,5)>REF(MA(V,5),1) AND REF(MA(V,5),1)>REF(MA(V,5),2);

GHCZS90:=C>=REF(C,1) AND REF(C,1)>REF(C,2);

GHCZS91:=C>GHCZS88 AND V>MA(V,5);

GHCZS92:=V>=REF(V,1)*1;

GHCZS93:=C>=HHV(C,0);

GHCZS94:=V>=HHV(V,0);

GHCZS95:=(C/DYNAINFO(3)-1)*100<=2.50;

GHCZS96:=GHCZS89 AND GHCZS90 AND GHCZS91 AND GHCZS92 AND GHCZS93 AND GHCZS94 AND GHCZS95;

GHCZS97:=BARSSINCE(GHCZS96)+1;

GHCZS98:=REF(TIME/10000,GHCZS97);

GHCZS99:=GHCZS97-1;

DRAWICON(GHCZS96,C,25);

DRAWTEXT(GHCZS96,L-0.01,'←分时起爆'),COLOR0000FF;

GHCZS100:=FILTER(CROSS(GHCZS79,GHCZS80),240);

GHCZS101:=BARSSINCE(GHCZS100)+1;

GHCZS102:=IF(MA(C,5)>MA(C,10),20,0);

GHCZS103:=IF(MA(C,20)>MA(C,60),10,0);

GHCZS104:=IF(KDJ.J>KDJ.K,10,0);

GHCZS105:=IF(MACD.DIF>MACD.DEA,10,0);

GHCZS106:=IF(MACD.MACD>0,10,0);

GHCZS107:=IF(V>MA(V,60),10,0);

GHCZS108:=IF(WINNER(C)>0.5,10,0);

GHCZS109:=IF(C/REF(C,1)>1.03,10,0);

GHCZS110:=GHCZS102+GHCZS103+GHCZS104+GHCZS105+GHCZS106+GHCZS107+GHCZS108+GHCZS109;

DRAWTEXT_FIX(V>O,1,0.99,0,STRCAT('量化评分',STRCAT(CON2STR(GHCZS110,2),' '))),COLORYELLOW;

GHCZS111:=(VOL/CLOSE)/3;

GHCZS112:=SUM((IF(((GHCZS111>40) AND (CLOSE>(REF(CLOSE,1)))),GHCZS111,0)),0);

GHCZS113:=SUM((IF(((GHCZS111>40) AND (CLOSE<(REF(CLOSE,1)))),GHCZS111,0)),0);

GHCZS114:=SUM((IF(((GHCZS111<40) AND (CLOSE>(REF(CLOSE,1)))),GHCZS111,0)),0);

GHCZS115:=SUM((IF(((GHCZS111<40) AND (CLOSE<(REF(CLOSE,1)))),GHCZS111,0)),0);

GHCZS116:=((GHCZS112+GHCZS113)+GHCZS114)+GHCZS115;

GHCZS117:=V*C/100;

GHCZS118:=SUM((IF(((GHCZS117/8>20) AND (CLOSE>(REF(CLOSE,1)))),GHCZS117,0)),0);

GHCZS119:=SUM((IF(((GHCZS117/8>20) AND (CLOSE<(REF(CLOSE,1)))),GHCZS117,0)),0);

GHCZS120:=SUM((IF(((GHCZS117/8<20) AND (CLOSE>(REF(CLOSE,1)))),GHCZS117,0)),0);

GHCZS121:=SUM((IF(((GHCZS117/8<20) AND (CLOSE<(REF(CLOSE,1)))),GHCZS117,0)),0);

GHCZS122:=((GHCZS112+GHCZS113)+GHCZS114)+GHCZS115;

GHCZS123:=IF((ISLASTBAR),((100*GHCZS118)/GHCZS122),0);

GHCZS124:=IF((ISLASTBAR),((100*GHCZS119)/GHCZS122),0);

GHCZS125:=IF((ISLASTBAR),((100*GHCZS120)/GHCZS122),0);

GHCZS126:=IF((ISLASTBAR),((100*GHCZS121)/GHCZS122),0);

GHCZS127:=GHCZS118;

GHCZS128:=GHCZS119;

GHCZS129:=GHCZS120;

GHCZS130:=GHCZS121;

GHCZS131:=GHCZS127-GHCZS128;

GHCZS132:=GHCZS129-GHCZS130;

DRAWTEXT_FIX(1,1,0.05,0,STRCAT(STRCAT('【机买】',CON2STR(GHCZS127,2)),' 万')),COLORLIMAGENTA;

DRAWTEXT_FIX(1,1,0.09,0,STRCAT(STRCAT('【机卖】',CON2STR(GHCZS128,2)),' 万')),COLORGREEN;

DRAWTEXT_FIX(1,1,0.13,0,STRCAT(STRCAT('【散买】',CON2STR(GHCZS75,2)),' 万')),COLORMAGENTA;

DRAWTEXT_FIX(1,1,0.17,0,STRCAT(STRCAT('【散卖】',CON2STR(GHCZS76,2)),' 万')),COLORCYAN;

GHCZS133:=IF((FINANCE(46))/1000000>1,'亿股','万股');

GHCZS134:=DYNAINFO(15)/DYNAINFO(4);

GHCZS135:=REF(C,1);

GHCZS136:=GHCZS135*DAY;

GHCZS137:=GHCZS134/FINANCE(46)*10000*(O-GHCZS136)/GHCZS136;

DRAWTEXT_FIX(1,0.2,0.09,0,STRCAT(STRCAT('竞价动能值:',CON2STR(GHCZS137,2)),''))COLORRED;

GHCZS138:=DYNAINFO(15)/DYNAINFO(4)/100;

GHCZS139:=IF(DYNAINFO(15)>10000,'万元','元');

GHCZS140:=IF(DYNAINFO(15)>10000,CON2STR(DYNAINFO(15)/10000,1),CON2STR(DYNAINFO(15),1));

GHCZS141:=STRCAT(GHCZS140,GHCZS139);

GHCZS142:=STRCAT('竞价:',STRCAT(CON2STR(GHCZS138,0),'手'));

GHCZS143:=STRCAT(GHCZS142,'/ ');

DRAWTEXT_FIX(1,0.2,0.05,0,STRCAT(GHCZS143,GHCZS141)),COLORMAGENTA;

第四部分 指标图示