比较准的分时主图（源码、分时主图 通达信 贴图）介绍
AA1:=(VOL/CLOSE)/3;AA2:=SUM((IF(((AA1>40) AND (CLOSE>(REF(CLOSE,1)))),AA1,0)),0);
AA3:=SUM((IF(((AA1>40) AND (CLOSE<(REF(CLOSE,1)))),AA1,0)),0);
AA4:=SUM((IF(((AA1<40) AND (CLOSE>(REF(CLOSE,1)))),AA1,0)),0);
AA5:=SUM((IF(((AA1<40) AND (CLOSE<(REF(CLOSE,1)))),AA1,0)),0);
AA6:=((AA2+AA3)+AA4)+AA5;AA7:=IF((BARSTATUS=2),((100*AA2)/AA6),0);
AA8:=((IF((BARSTATUS=2),((100*AA3)/AA6),0)));AA9:=((IF((BARSTATUS=2),((100*AA4)/AA6),0)));
AA10:=((IF((BARSTATUS=2),((100*AA5)/AA6),0)));机买:=(AA2),LINETHICK0;
机卖:=(AA3),LINETHICK0;散买:=(AA4);散卖:=(AA5);
总买:=AA2+AA4;总卖:=AA3+AA5;机构买比:=机买/总买*0.1,LINETHICK0;机构卖比:=机卖/总卖*0.1,LINETHICK0;
最新:CLOSE,LINETHICK2,COLORWHITE;AA:=SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C));
BB:=BETWEEN(C/AA,C+H,C-H);DRAWTEXT( ISLASTBAR AND 最新>REF(最新,1),最新,STRCAT( 涨▲,CON2STR(最新,2))),COLORMAGENTA;
DRAWTEXT( ISLASTBAR AND 最新1 AND TT<240;DRAWTEXT(CROSS(C,REF(HHV(H,TT),1)) AND {HHVBARS(VOL,TT)=0 AND} C/均价<1.09 AND TT>=1 AND TT<240 ,前高, ←突),COLORRED;主力扫盘:=COUNT(突破,13)>=3 AND CROSS(C,REF(HHV(H,TT),1)){ AND HHVBARS(VOL,TT)=0};DRA
WTEXT(主力扫盘,前高, ←扫盘),COLORYELLOW;{已主力扫盘:=BARSLAST(主力扫盘)<13;DRAWTEXT(BARSLAST(主力扫盘)<8,(DYNAINFO(3))*9.5/10 , I已扫),COLORGREEN;}全仓买进:=CROSS(C,REF(HHV(H,TT),1)) AND HHVBARS(VOL,TT)=0 AND C/均价<1.09 AND TT>1 AND TT<240 AND BARSLAST(主力扫盘)>=21;DRAWTEXT(全仓买进 ,前高, ←全仓),COLORCYAN;VAR1:=EMA(EMA(C,13),13);控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;JJ:=DYNAINFO(11);P:=55;S:=8;M1:=3;能量:=(EMA(C,S)-EMA(C,P))*10;空头:=EMA(能量,M1);BTJ11:=(C-JJ)/JJ<-0.03;BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2;BTJ3:=CROSS(能量,空头) AND 能量<-0.3;BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);有庄:=BTJ811;DRAWTEXT(BTJ811,C*0.999,←有庄),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;{DRAWICON(LONGCROSS(支撑,C,2),C,5);DRAWICON(LONGCROSS(C,阻力,2),C,6);}{资金流入:=SUM(IF(C>REF(C,1),C*V,0),FROMOPEN);资金流出:=-SUM(IF(C分时顶:HHV(H,480),COLORRED,DOTLINE;分时底:LLV(L,480),COLORGREEN,DOTLINE;{DRAWICON(FILTER(CROSS(C,DYNAINFO(3)*1.1-0.01),60),C,1);}DRAWNUMBER(FILTER(CROSS(C,DYNAINFO(3)*1.1-0.01),60),C*0.99,TIME);DRAWNUMBER(FILTER(CROSS(C,DYNAINFO(3)*1.1-0.01),60),C*0.98,C),COLORYELLOW;{分时量}{分时K}ZS:=DYNAINFO(3);ZG:=DYNAINFO(5);ZD:=DYNAINFO(6);OP:=500-(KP/ZS-1)*1200;CL:=500-(ZX/ZS-1)*1200;HI:=500-(ZG/ZS-1)*1200;LO:=500-(ZD/ZS-1)*1200;{N1:=IF(TIME2<125959,750,260);{360,860}N1:=IF(FROMOPEN">=120,250,750);Z1:=IF(ZX>=KP,255,0);Z2:=IF(ZX>=KP,0,255);Z3:=IF(ZX>=KP,0,255);MA5:="FSKY8.MA5#DAY";XMA5:=500-(MA5/ZS-1)*1200;DRAWRECTREL(N1+128,XMA5,N1+142,XMA5,RGB(255,255,255));{DRAWTEXT_FIX(N1+128,XMA5,1-0.15,0,STRCAT(STRCAT(MA5,CON2STR(A5,1)),)),COLORRED;}MA10:="FSKY8.MA10#DAY";XMA10:=500-(MA10/ZS-1)*1200;DRAWRECTREL(N1+118,XMA10,N1+152,XMA10,RGB(250,250,280));MA20:="FSKY8.MA20#DAY";XMA20:=500-(MA20/ZS-1)*1200;DRAWRECTREL(N1+108,XMA20,N1+162,XMA20,RGB(255,0,255)),COLORC0C0C0;{(0,0,255)}MA60:="FSKY8.MA60#DAY";XMA60:=500-(MA60/ZS-1)*1200;DRAWRECTREL(N1+98,XMA60,N1+172,XMA60,RGB(0,255,0)),COLOR808000;阻力1:=REFDATE(REF(HHV(C,60),FROMOPEN-60),DATE)DOTLINE,COLORCYAN;DRAWTEXT_FIX(1,0.880,1-0.20,0,STRCAT(STRCAT(MA5: ,CON2STR(MA5,2)),)),COLORWHITE;DRAWTEXT_FIX(1,0.880,1-0.15,0,STRCAT(STRCAT(MA10:,CON2STR(MA10,2)),)),COLORYELLOW;DRAWTEXT_FIX(1,0.880,1-0.10,0,STRCAT(STRCAT(MA20:,CON2STR(MA20,2)),)),COLORMAGENTA;DRAWTEXT_FIX(1,0.880,1-0.05,0,STRCAT(STRCAT(MA60:,CON2STR(MA60,2)),)),COLORGREEN;IF(MACD.DEA<0,CLOSE,DRAWNULL),COLORYELLOW,LINETHICK9;XA_1:=MAX(DYNAINFO(3),DYNAINFO(5));XA_2:=MIN(DYNAINFO(3),DYNAINFO(6));XA_3:=XA_1-XA_2;XA_4:=XA_2+XA_3*7/8;XA_5:=XA_2+XA_3*0.5/8;DRAWICON(LONGCROSS(XA_5,CLOSE,2),CLOSE,1);DRAWICON(LONGCROSS(CLOSE,XA_4,2),CLOSE,6);XA_6:=DYNAINFO(4);XA_7:=DYNAINFO(5);XA_8:=DYNAINFO(6);XA_9:=DYNAINFO(11);XA_10:=CLOSE;XA_11:=BARSCOUNT(XA_10);XA_12:=SUM(VOL*CLOSE,0)/SUM(VOL,0);XA_13:=MA(XA_10,XA_11);XA_14:=XA_13+2*STD(XA_10,3);XA_15:=XA_13-2*STD(XA_10,3);DRAWICON(CROSS(XA_12,XA_13),XA_12,38);XA_16:=TIME>93000;XA_17:=XA_10/REF(CLOSE,1)>1.02;XA_18:=XA_10/REF(CLOSE,1)<0.98;XA_19:=(HHV(XA_10,XA_11)-LLV(XA_10,XA_11))/XA_10<0.05;XA_20:=SMA(VOL,30,1);XA_21:=(XA_20-LLV(LLV(XA_20,1),30))/(HHV(HHV(XA_20,1),30)-LLV(LLV(XA_20,1),30))>0.95;XA_22:=XA_17 OR XA_18;XA_23:=XA_22=0 AND XA_19 AND XA_21 AND CROSS(XA_12,XA_13);DRAWTEXT(FILTER(XA_23,10),XA_12,506),COLORYELLOW;XA_24:=XA_22=0 AND XA_19 AND XA_21 AND CROSS(CLOSE,XA_12) AND CROSS(CLOSE,XA_13);DRAWTEXT(FILTER(XA_24,10),XA_12*0.99,507),COLORRED;AAA:=MAX(DYNAINFO(3),DYNAINFO(5));BBB:=MIN(DYNAINFO(3),DYNAINFO(6));CCC:=AAA-BBB;中轨:=(AAA+BBB)/1,POINTDOT;阻力6:BBB+CCC*7/8,COLORBLUE,POINTDOT;支撑6:BBB+CCC*1/8,COLORMAGENTA,POINTDOT;支撑1:BBB+CCC*0.5/8,POINTDOT;上顶:BBB+CCC*2/3,POINTDOT;下底:BBB+CCC/3,COLORBLUE,POINTDOT;STICKLINE(C>阻力6,阻力6,C,2,0),COLORGREEN;STICKLINE(C<支撑6,支撑6,C,2,0),COLORLIMAGENTA;DRAWTEXT(LONGCROSS(支撑1,C,2),下底,B),COLORYELLOW;{B}DRAWTEXT(LONGCROSS(C,阻力6,2),上顶,S),COLORRED;{S};攻击量:=((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=0,(攻击比+50),100-ABS((攻击比-50)));资金流入:=SUM(IF(C>REF(C,1),V,0),FROMOPEN),STICK,COLORRED;资金流出:=-SUM(IF(C=0,(资金比+100)/2,100-ABS((资金比-100)/2));DRAWTEXT_FIX(1,0.200,0.87,0,STRCAT(STRCAT(资金流量比,CON2STR(资金流量比,2)),％买)),COLORCYAN;DRAWTEXT_FIX(1,0.000,0.87,0,STRCAT(STRCAT(资金攻击度,CON2STR(资金攻击度,2)), ％买)),COLORCYAN;A1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0); A3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0); A4:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0); A5:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0); A6:=((A2+A3)+A4)+A5; A7:=IF((ISLASTBAR),((100*A2)/A6),0); A8:=IF((ISLASTBAR),((100*A3)/A6),0); A9:=IF((ISLASTBAR),((100*A4)/A6),0); A10:=IF((ISLASTBAR),((100*A5)/A6),0); DD1:=1; AAA1:=STRCAT(STRCAT(机构买入,CON2STR((100*A2)/A6,0)),%); AAA2:=STRCAT(STRCAT(机构卖出,CON2STR((100*A3)/A6,0)),%); AAA0:=STRCAT(STRCAT(机构总买入,CON2STR((100*(A2-A3))/A6,0)),%); AAA3:=STRCAT(STRCAT(散户买入,CON2STR((100*A4)/A6,0)),%); AAA4:=STRCAT(STRCAT(散户卖出,CON2STR((100*A5)/A6,0)),%); AAA5:=STRCAT(STRCAT(散户总买入,CON2STR((100*(A4-A5))/A6,0)),%);DRAWTEXT_FIX(DD1=1,0.000,1.00,0,AAA1),COLORRED; DRAWTEXT_FIX(DD1=1,0.150,1.00,0,AAA2),COLORGREEN; DRAWTEXT_FIX(DD1=1,0.300,1.00,0,AAA3),COLORRED; DRAWTEXT_FIX(DD1=1,0.450,1.00,0,AAA4),COLORGREEN; DRAWTEXT_FIX(DD1=1,0.600,1.00,0,AAA0),LINETHICK5,COLORYELLOW; DRAWTEXT_FIX(DD1=1,0.750,1.00,0,AAA5),LINETHICK5,COLORCYAN;
