抓妖分時，非常不錯的分時公式通達信公式 主圖

公式源碼：

{資金流量 攻擊流量}

{DRAWGBK(1,RGB(0,0,0),RGB(0,0,0),0,'019',0);}

資金流入:=SUM(IF(C>REF(C,1),V,0),FROMOPEN),STICK,COLORRED;

資金流出:=-SUM(IF(C<REF(C,1),V,0),FROMOPEN),STICK,COLOR00FF00;

資金出入:=資金流入+資金流出,COLORSTICK;

資金流量:=資金出入,COLORFFFFFF,LINETHICK1;

資金比:=資金出入/SUM(V,FROMOPEN)*100,COLOR00FFFF,LINETHICK1;

資金流量比:=IF(資金比>=0,(資金比+100)/2,100-ABS((資金比-100)/2));

增強流量比:=IF(資金流量比>50,資金流量比,50);

攻擊量:=((HSL*0.50+(REF(HSL,1)*0.33))+(REF(HSL,2)*0.17))*SUM(C,FROMOPEN)/FROMOPEN;

攻擊量A:=SUM(IF(C>REF(C,1),攻擊量*V,0),FROMOPEN),COLOR0000FF,LINETHICK0;

攻擊量B:=-SUM(IF(C<REF(C,1),攻擊量*V,0),FROMOPEN),COLOR00FF00,LINETHICK0;

攻擊流量:=攻擊量A+攻擊量B,COLORSTICK;

NOTEXT攻擊線:=攻擊流量,COLORYELLOW,LINETHICK1;

攻擊比:=攻擊流量/SUM(V,FROMOPEN)*100,COLORRED,LINETHICK1;

資金攻擊度:=IF(攻擊比>0,(攻擊比+50),100-ABS((攻擊比-50)));

攻擊度限制:=IF(資金攻擊度>100,100,IF(資金攻擊度<0,0,資金攻擊度));

增強攻擊度:=IF(資金攻擊度>50,資金攻擊度,50);

開始攻擊:=CROSS(攻擊流量,0) AND (C>REF(C,2) OR (資金流量>0 AND 資金流量>攻擊流量));

開始攻擊量:=CROSS(攻擊流量,0) AND C>REF(C,2) AND V>LLV(V,3)*3;

DRAWTEXT_FIX(1,0.500,80,1,'提供服務：公式修改,還原源碼,做選股。'),COLOR666666; 

Q:=250;

高點:=HHV(C,Q);

低點:=LLV(C,Q);

最高:=CONST(高點),NODRAW;

最低:=CONST(低點),NODRAW;

軸差:=最高-最低;

中價軸:=(最高+最低)/2;

HL3:=(100-0)/2*1.3;

HL4:=(100-0)/1*1.3;

中間價軸:=(50-HL3)*軸差/HL4+中價軸;

平安軸:=(中價軸+中間價軸)/2;

{BGTYU:=IF(DATE<=9991231,1,0);意思是日間小于等于9991231時值為1，否則為0 }

BGTYU:=1;

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

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

起動線:=EXPMA((CLOSE/VBNH),20)*1,COLORYELLOW,POINTDOT;

主力線:=EXPMA((CLOSE/VBNH),60)*1,COLORMAGENTA,LINETHICK2;

散戶線:=EXPMA((CLOSE/VBNH),120)*1,COLORGREEN,LINETHICK2;

限制起動線:=起動線*中間價軸;

限制主力線:=主力線*中間價軸;

限制散戶線:=散戶線*中間價軸;

主散MIN:=MIN(限制主力線,限制散戶線);

{分時轉強:=主散MIN>金龍線 AND ((LONGCROSS(限制主力線,金龍線,2) OR CROSS(限制主力線,限制散戶線)) OR (限制主力線>限制散戶線 AND LONGCROSS(牽引線,金龍線,2)));}

{DRAWBAND(限制主力線,RGB(250,125,0),限制散戶線,RGB(0,100,250));

STICKLINE(起動線<主力線,限制起動線,限制主力線,1.0,0),COLOR00FF00;

STICKLINE(起動線>主力線,限制起動線,限制主力線,1.0,0),COLORFFFFFF;

STICKLINE(VOL>EMA(VOL,60) AND 起動線>主力線,限制起動線,限制主力線,1,0),COLORFF00FF;

STICKLINE(VOL>EMA(VOL,30) AND 起動線>主力線 AND 起動線>1.01 AND 起動線>REF(起動線,1),限制起動線,限制主力線,1,0),COLOR00FFFF;}

主力:限制主力線,DOTLINE,COLORFF00FF,LINETHICK1;

分時均價線:=SUM(C*V,240)/SUM(V,240),DOTLINE,COLORFFFFFF,LINETHICK1;

追擊漲停:=限制散戶線>分時均價線 AND CROSS(C,限制散戶線);

拉升量:=IF(C>REF(C,1),VOL,0);

昨拉升最高值:=CONST(FINDHIGH(拉升量,FROMOPEN,240,1)),LINETHICK1,COLORMAGENTA;

今拉升最高值:=CONST(REF(HHV(拉升量,FROMOPEN),0)),COLORYELLOW,NODRAW;

攻擊力度:=今拉升最高值/昨拉升最高值,NODRAW;

TT:=BARSCOUNT(C);{取得有效收盤價}

均價黃:=SUM(C*V,TT)/SUM(V,TT);{分時均線的取值}

量兩步:=MA(V,5)>REF(MA(V,5),1) AND REF(MA(V,5),1)>REF(MA(V,5),2);

價兩步:= C>=REF(C,1) AND REF(C,1)>REF(C,2);

價上崗量破5:=C>均價黃 AND V>MA(V,5);

量起爆:=V>=REF(V,1)*1 ;

價創新高:=C>=HHV(C,0);

量創新高:=V>=HHV(V,0);

對昨日漲幅:=(C/DYNAINFO(3)-1)*100<=2.50;{漲幅控制2個點以內}

每日一點:=量兩步 AND 價兩步 AND 價上崗量破5 AND 量起爆 AND 價創新高  AND 量創新高 AND 對昨日漲幅;

TA:=BARSLAST(TIME=100000);

TC:=REF(HHV(C,0),TA+1);

TV:=REF(HHV(V,0),TA+1);

ZF:=C/DYNAINFO(3)<1.05;

XG1:=CROSS(C,TC) AND V>TV AND ZF,COLORWHITE;

TA1:=BARSLAST(TIME=110000);

CC1:=REF(HHV(C,0),TA1+1);

VV1:=REF(HHV(V,0),TA1+1);

ZF1:=CC1/DYNAINFO(3)<1.05;

XG2:=CROSS(C,CC1)  AND V>VV1 AND ZF1,COLORYELLOW;

突破:=XG1 OR XG2,COLORRED;

STICKLINE(FILTER(突破=1,15),最低+軸差*0.60,最低,1,0),COLORWHITE;

DRAWICON(FILTER(突破=1,15),最低+軸差*0.60,17);

DRAWTEXT(FILTER(突破=1,15),最低+軸差*0.60,'∠分時突破'),COLORWHITE;

STICKLINE(FILTER(開始攻擊量=1,15),最低+軸差*0.45,最低,1,0),COLORMAGENTA;

STICKLINE(FILTER(開始攻擊=1,30),最低+軸差*0.30,最低,1,0),COLORYELLOW;

STICKLINE(CROSS(EXPMA((CLOSE/VBNH),60),EXPMA((CLOSE/VBNH),120)),最低+軸差*0.15,最低,1,0),COLORCYAN;

DRAWICON(FILTER(開始攻擊量=1,15),最低+軸差*0.45,24);

DRAWICON(FILTER(開始攻擊,30),最低+軸差*0.30,30);

DRAWTEXT(FILTER(開始攻擊量=1,15),最低+軸差*0.45,'∠攻擊量'),COLORMAGENTA;

DRAWTEXT(FILTER(開始攻擊,30),最低+軸差*0.30,'開始攻'),COLORYELLOW;

DRAWTEXT(FILTER(CROSS(EXPMA((CLOSE/VBNH),60),EXPMA((CLOSE/VBNH),120)),30),最低+軸差*0.15,'★跡'),COLORCYAN;

DRAWICON(FILTER(CROSS(起動線,1.01),30),限制散戶線,17);

DRAWTEXT(FILTER(CROSS(起動線,1.01),30),最低,'可能漲停'),COLORMAGENTA;

DRAWTEXT(FILTER(追擊漲停,30),分時均價線+(限制散戶線-分時均價線)/2,'追擊'),COLORRED;

{自己加入的}

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

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

P1:=H1-L1;

阻力:=L1+P1*7/8,COLORGREEN;

支撐:=L1+P1*0.5/8,COLORMAGENTA;

DRAWTEXT(LONGCROSS(支撐,C,2),C,'--買入'),COLORFF00FF;

DRAWTEXT(LONGCROSS(C,阻力,2),C,'--出貨'),COLOR70DB93;

XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE));

主攻:=EXPMA(CLOSE/XX,20);

大戶:=EXPMA(CLOSE/XX,60);

散戶:=EXPMA(CLOSE/XX,120);

底:=1;1.02,NODRAW;

高:=1.03;

AA:=主攻>大戶 AND 主攻>1.003 AND 大戶>散戶 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60);

DRAWICON(主攻>大戶 AND 大戶>散戶 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60) AND 主攻=HHV(主攻,30) AND CROSS(主攻,1.003),C,38);

DRAWTEXT(主攻>大戶 AND 大戶>散戶 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60) AND 主攻=HHV(主攻,30) AND CROSS(主攻,1.003),C*0.999,'-主攻'),COLORYELLOW;

{DRAWICON(CROSS(主力,1.02),C,24);}

DRAWTEXT(CROSS(主攻,1.02),C*0.999,'--拉升'),COLORCYAN;

{DRAWICON(CROSS(主力,1.04),C,6);}

DRAWTEXT(CROSS(主攻,1.04),C*0.999,'--沖漲停'),COLORLIMAGENTA;

{DRAWICON(CROSS(散戶,主力),C,6);}

DRAWTEXT(CROSS(散戶,主攻),C*0.9995,'--小心'),COLORGREEN;

{DRAWICON(CROSS(散戶,大戶),C,6);}

DRAWTEXT(CROSS(散戶,大戶),C*0.9995,'--走弱'),COLORGREEN;

{均價:=SUM(C*V,240)/SUM(V,240),COLORYELLOW,LINETHICK1;

DRAWTEXT(CROSS(EXPMA((DCLOSE/VBNH),120),1.0029),均價,'觀察分時量 '),COLORCYAN;

DRAWICON(CROSS(EXPMA((DCLOSE/VBNH),120),1.004),均價,13);}

成交額:=V*C/100,NODRAW;{萬元}

A2:=SUM((IF(((成交額/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交額,0)),0);

A3:=SUM((IF(((成交額/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交額,0)),0);

A6:=(A2+A3);

A7:=IF((ISLASTBAR),((100*A2)/A6),0);

A8:=IF((ISLASTBAR),((100*A3)/A6),0);

DD1:=1;

AAA1:=STRCAT(STRCAT('機構買 = ',CON2STR((100*A2)/A6,0)),'%');

AAA2:=STRCAT(STRCAT('機構賣 = ',CON2STR((100*A3)/A6,0)),'%');

AAA3:=STRCAT(STRCAT('機構總買 = ',CON2STR((100*(A2-A3))/A6,0)),'%');

DRAWTEXT_FIX(DD1=1,0,0.89,0,AAA1),COLOR00FFFF;

DRAWTEXT_FIX(DD1=1,0,0.945,0,AAA2),COLOR00FF00;

現手買:=BUYVOL*DYNAINFO(7)*100/10000 COLOR0000FF,NODRAW;

現手賣:=SELLVOL*DYNAINFO(7)*100/10000 COLOR00FF00,NODRAW;

合:=ABS(現手買)+ABS(現手賣)COLOR80FFFF,NODRAW;

差:=ABS(現手買)-ABS(現手賣)COLOR80FFFF,NODRAW;

MPB1:=ABS(現手買)/合*100; 

MPB2:=ABS(現手賣)/合*100; 

TESTSKIP(NOT(現手買 OR 現手賣 OR 合 OR 差 OR MPB1 OR MPB2)!=0);

DRAWRECTREL(640,1000,940,940,RGB(190,190,190));

DRAWRECTREL(640,995,940,945,RGB(200,200,200));

DRAWRECTREL(640,990,940,950,RGB(210,210,210));

DRAWRECTREL(640,985,940,955,RGB(220,220,220));

DRAWRECTREL(640,980,940,960,RGB(230,230,230));

DRAWRECTREL(640,975,940,965,RGB(240,240,240));

DRAWRECTREL(640,970,940,970,RGB(250,250,250));

DRAWRECTREL(790-現手賣*210/合,1000,790,940,RGB(0,128,0));

DRAWRECTREL(790-現手賣*210/合,995,790,945,RGB(0,148,0));

DRAWRECTREL(790-現手賣*210/合,990,790,950,RGB(0,168,0));

DRAWRECTREL(790-現手賣*210/合,985,790,955,RGB(0,188,0));

DRAWRECTREL(790-現手賣*210/合,980,790,960,RGB(0,208,0));

DRAWRECTREL(790-現手賣*210/合,975,790,965,RGB(0,228,0));

DRAWRECTREL(790-現手賣*210/合,970,790,970,RGB(0,248,0));

DRAWRECTREL(790-現手賣*210/合,940,790-現手賣*210/合,1000,RGB(0,128,0));

DRAWRECTREL(790,1000,790+現手買*210/合,940,RGB(128,0,0));

DRAWRECTREL(790,995,790+現手買*210/合,945,RGB(148,0,0));

DRAWRECTREL(790,990,790+現手買*210/合,950,RGB(168,0,0));

DRAWRECTREL(790,985,790+現手買*210/合,955,RGB(188,0,0));

DRAWRECTREL(790,980,790+現手買*210/合,960,RGB(208,0,0));

DRAWRECTREL(790,975,790+現手買*210/合,965,RGB(228,0,0));

DRAWRECTREL(790,970,790+現手買*210/合,970,RGB(248,0,0));

DRAWRECTREL(790+現手買*210/合,940,790+現手買*210/合,1000,RGB(128,0,0));

DRAWRECTREL(789.8,940,790.2,1000,RGB(0,0.0,10));

DRAWRECTREL(639.8,940,640.2,1000,RGB(0,0,10));

DRAWRECTREL(939.8,940,940.2,1000,RGB(0,0,10));

DRAWRECTREL(0,940,1000,940.2,RGB(0,0,10));

DRAWTEXT_FIX(1,0.8,0.88,0,STRCAT(STRCAT('',CON2STR(現手買,2)),'萬')),COLOR0000FF;

DRAWTEXT_FIX(1,0.68,0.88,0,STRCAT(STRCAT('',CON2STR(現手賣,2)),'萬')),COLOR00FF00;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)>0,0.755,1.88,0,STRCAT('  ',STRCAT(CON2STR(差,2),'萬'))) COLOR00FFFF;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)<0,0.755,1.88,0,STRCAT('  ',STRCAT(CON2STR(差,2),'萬'))) COLOR00FF00;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)=0,0.755,1.88,0,STRCAT('  ',STRCAT(CON2STR(差,2),'萬'))) COLOR80FFFF;

DRAWTEXT_FIX(1,0.935,0.97,0,STRCAT(STRCAT(' ',CON2STR(MPB2,2)),'%')),COLOR00FF00;

DRAWTEXT_FIX(1,0.585,0.97,0,STRCAT(STRCAT('',CON2STR(MPB1,2)),'%')),COLOR0000FF;

{DRAWTEXT_FIX(1,0.05,0.1,0,HYBLOCK)COLOR0080FF;

DRAWTEXT_FIX(1,0.12,0.1,0,DYBLOCK)COLORRED;

DRAWTEXT_FIX(1,0.05,0.14,0,GNBLOCK)COLOR0000FF;

DRAWTEXT_FIX(1,0.05,0.18,0,FGBLOCK)COLORFF00FF;};