跟庄分时通达信主图，超短操盘理念

量价:=(VOL/CLOSE)/3;

AB2:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0);

AB3:=SUM((IF(((量价>0.20) AND (CLOSE<(REF(CLOSE,1)))),量价,0)),0);

AB6:=AB2+AB3;BDD1:=1;比:=AB2/AB3;

BAAA1:=STRCAT(STRCAT('买= ',CON2STR((100*AB2)/AB6,0)),'%');

BAAA2:=STRCAT(STRCAT('卖= ',CON2STR((100*AB3)/AB6,0)),'%');

BAAA3:=STRCAT(STRCAT('差= ',CON2STR((100*(AB2-AB3))/AB6,0)),'%');

DRAWTEXT_FIX(BDD1=1,0,0.88,0,BAAA1),COLORRED;

DRAWTEXT_FIX(BDD1=1,0,0.92,0,BAAA2),COLORGREEN;

DRAWTEXT_FIX(BDD1=1,0,1.1,0,BAAA3),COLOR00FFFF;

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,25);

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,26);

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

DRAWICON(CROSS(主力,1.04),C,24);

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;

MA5:=MA.MA1#DAY;

IF(BETWEEN(MA5,DYNAINFO(6),DYNAINFO(5)),MA5,DRAWNULL),COLORWHITE,LINETHICK2;

DRAWTEXT_FIX(1,0,0,0,STRCAT('MA5：',STRCAT(VAR2STR(MA5,2),'元'))),COLORWHITE;

时间:=TIME2=100000;

N:=BARSLAST(时间);

CS1:CONST(IF(N,MAX(REF(HHV(H,0),N),DYNAINFO(4)),HHV(H,0))),DOTLINE,COLORFF00FF,LINETHICK2;

CS2:CONST(IF(N,MIN(REF(LLV(L,0),N),DYNAINFO(4)),LLV(L,0))),DOTLINE,COLORGREEN,LINETHICK2;

DRAWICON(CROSS(C,CS1),CS1,1);

DRAWICON(CROSS(C,CS2),CS2,2);

DRAWTEXT(ISLASTBAR,CS1,'左锋'),COLOR00FFFF;

DRAWTEXT(ISLASTBAR,CS2,'支撑'),COLORGREEN;

Y:="NK.庄Y#DAY";

KJ6:REFDATE(Y,DATE),COLORCYAN,LINETHICK2;

DRAWTEXT(ISLASTBAR,KJ6,'昨高'),COLORFFFF00;

最高涨幅:=NK.庄O#DAY;

DRAWTEXT_FIX(1,0.95,0,0,STRCAT('最高：',STRCAT(VAR2STR(最高涨幅,2),'%'))),COLORRED;

DRAWTEXT_FIX(1,0.41,0,0,STRCAT('均价：',STRCAT(VAR2STR(DYNAINFO(11),2),''))),COLORYELLOW;

K:="NK.庄K#DAY";

KJ5:REFDATE(K,DATE),COLORYELLOW,LINETHICK2;

DRAWTEXT(ISLASTBAR,KJ5,'昨收'),COLORYELLOW;

天线:IF(C<500,AMOUNT/V/100,DRAWNULL),COLORWHITE;

人线:SUM(V*C,0)/SUM(V,0),LINETHICK2,COLORYELLOW;

IF(天线>人线,天线,DRAWNULL),COLORRED,LINETHICK2;

IF(天线=人线,天线,DRAWNULL),COLORWHITE,LINETHICK;

IF(天线<人线,天线,DRAWNULL),COLORFFFF00,LINETHICK2;

NE:=IF(NAMELIKE('S') OR NAMELIKE('*S'),0.05,0.1);{适用ST股}

涨停价:=ZTPRICE(DYNAINFO(3),NE);

跌停价:=DTPRICE(DYNAINFO(3),NE);

{分时线 涨跌停变色}

IF(PERIOD=0 AND CLOSE=涨停价,CLOSE,DRAWNULL),LINETHICK2,COLORFF00B5;

IF(PERIOD=0 AND CLOSE=跌停价,CLOSE,DRAWNULL),LINETHICK2,COLOR00BB00;

{涨幅值 适用分时重播}

涨幅值:=IF(C=DYNAINFO(3),CON2STR(0,2),IF(C>DYNAINFO(3),CON2STR((C-DYNAINFO(3))/DYNAINFO(3)*100,2),CON2STR((DYNAINFO(3)-C)/DYNAINFO(3)*100,2)));

动态图标:=IF(涨停价=C,STRCAT(CON2STR(C,2),'★ '),IF(C=REF(C,1),STRCAT(CON2STR(C,2),'◆ '),IF(C>REF(C,1),STRCAT(CON2STR(C,2),'▲ '),STRCAT(CON2STR(C,2),'▼ '))));

价格变化:=STRCAT(STRCAT(' ',动态图标),STRCAT(涨幅值,'％'));

{文字图标 动态跟随}

DRAWTEXT(ISLASTBAR,C*IF(DYNAINFO(3)>C,0.9973,1.0027),'');{扩显字符}

DRAWTEXT(ISLASTBAR AND C>DYNAINFO(3) ,C*1,价格变化),COLOR3333FF;{涨幅区}

DRAWTEXT(ISLASTBAR AND C=DYNAINFO(3) ,C*1,价格变化),COLORWHITE;{零轴区}

DRAWTEXT(ISLASTBAR AND C<DYNAINFO(3) ,C*1,价格变化),COLOR42C800;{跌幅区};

大盘:=NK.庄P#DAY*DYNAINFO(3)+DYNAINFO(3);

DRAWNUMBER(ISLASTBAR,DYNAINFO(11),DYNAINFO(11)),COLORYELLOW;

DRAWNUMBER(ISLASTBAR,大盘,大盘),COLORLIBLUE;

行业:=NK.庄R#DAY*DYNAINFO(3)+DYNAINFO(3);

DRAWNUMBER(ISLASTBAR,行业,行业),COLORGRAY;

昨日成交量:=NK.庄I#DAY,LINETHICK2;

今日成交量:=SUM(V,0),LINETHICK2;

今昨量比:=今日成交量/昨日成交量;

DRAWTEXT_FIX(ISLASTBAR=1,0.1,0,0,'量倍数:')COLORWHITE;

DRAWNUMBER_FIX(ISLASTBAR=1,0.15,0,0,今昨量比)COLORWHITE;

封成比:=DYNAINFO(58)/DYNAINFO(8);

DRAWTEXT_FIX(ISLASTBAR=1,0.2,0,0,'封成比:')COLORLIMAGENTA;

DRAWNUMBER_FIX(ISLASTBAR=1,0.25,0,0,封成比)COLORLIMAGENTA;

前高:HHV(H,0),DOTLINE,COLORCYAN;

DRAWTEXT(ISLASTBAR,前高,VARCAT(VARCAT('峰',VAR2STR(前高,2)),'元'))COLORFFFF00;

{放量上穿左峰，可关注。上穿回踩不破左峰就是建仓良机。遇到大盘强势，出信号可以小建仓，弱势就等回踩不破再建仓。跌破左峰可以放弃。跌破谷线就清仓};

D1:=YEAR AND MONTH AND DAY;

ABA1:=STRCAT(CON2STR(YEAR,0),'年');

ABA2:=STRCAT(CON2STR(MONTH,0),'月');

ABA3:=STRCAT(CON2STR(DAY,0),'日');

ABA4:=STRCAT('星期',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日'))))))); 

ABA:=STRCAT(STRCAT(STRCAT(ABA1,ABA2),STRCAT(ABA3,ABA4)),'');

DRAWTEXT_FIX(D1,0.86,0.001,0,ABA),COLORLIGRAY;

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

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

P1:=H1-L1;

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

支撑:=L1+P1*0.5/8,COLOR00DD00;

DRAWTEXT(LONGCROSS(支撑,C,2),支撑*1.001,'★B'),COLORYELLOW;{吸}

DRAWTEXT(LONGCROSS(C,阻力,2),C,'★S'),COLORGREEN;{抛};

现均差:=(天线-人线)/人线*100;

DRAWTEXT_FIX(ISLASTBAR=1,0.29,0,0,'现均差%:')COLORLIGREEN;

DRAWNUMBER_FIX(ISLASTBAR=1,0.35,0,0,现均差)COLORLIGREEN;

成交额:=V*C/100,NODRAW;

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

A3:=SUM((IF(((成交额/8>20) AND (C<(REF(C,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)),'％');

A000:=DRAWTEXT_FIX(DD1=1,0,0.02,0,AAA1);

A001:=DRAWTEXT_FIX(DD1=1,0,0.13,0,AAA2);

DRAWTEXT_FIX(DD1=1,0.842,1,0,AAA3),COLORYELLOW;

现手买:=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(595,1000,795,940,RGB(0,128,0));

DRAWRECTREL(595,995,795,945,RGB(0,148,0));

DRAWRECTREL(595,990,795,950,RGB(0,168,0));

DRAWRECTREL(595,985,795,955,RGB(0,188,0));

DRAWRECTREL(595,980,795,960,RGB(0,208,0));

DRAWRECTREL(595,975,795,965,RGB(0,228,0));

DRAWRECTREL(595,970,795,970,RGB(0,248,0));

DRAWRECTREL(595,1000,595+现手买*210/合,940,RGB(128,0,0));

DRAWRECTREL(595,995,595+现手买*210/合,945,RGB(148,0,0));

DRAWRECTREL(595,990,595+现手买*210/合,950,RGB(168,0,0));

DRAWRECTREL(595,985,595+现手买*210/合,955,RGB(188,0,0));

DRAWRECTREL(595,980,595+现手买*210/合,960,RGB(208,0,0));

DRAWRECTREL(595,975,595+现手买*210/合,965,RGB(228,0,0));

DRAWRECTREL(595,970,595+现手买*210/合,970,RGB(248,0,0));

DRAWRECTREL(595+现手买*210/合,940,595+现手买*210/合,1000,RGB(128,0,0));

DRAWRECTREL(795,940,795,1000,RGB(0,0.0,10));

DRAWRECTREL(594.8,939.8,594.8,1000,RGB(0,0,10));

DRAWRECTREL(594.8,939.8,594.8,939.8,RGB(0,0,10));

DRAWRECTREL(594.8,1000,594.8,1000,RGB(0,0,10));

DRAWTEXT_FIX(1,0.560,0.89,0,STRCAT(STRCAT('',CON2STR(现手买,1)),'万')),COLORRED;

DRAWTEXT_FIX(1,0.800,0.89,0,STRCAT(STRCAT('',CON2STR(现手卖,1)),'万')),COLORGREEN;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)>0,0.678,0.888,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万'))) COLORRED;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)<0,0.678,0.888,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万'))) COLORGREEN;

DRAWTEXT_FIX(CURRBARSCOUNT=1 AND(差)=0,0.678,0.888,0,STRCAT(' ',STRCAT(CON2STR(差,1),'万'))) COLOR80FFFF;

DRAWTEXT_FIX(1,0.800,0.98,0,STRCAT(STRCAT(' ',CON2STR(MPB2,1)),'％')),COLORGREEN;

DRAWTEXT_FIX(1,0.560,0.98,0,STRCAT(STRCAT('',CON2STR(MPB1,1)),'％')),COLORRED;

DRAWICON(CROSS(天线,MA5),MA5,23);

DRAWICON(CROSS(天线,人线),人线,7);

DRAWICON(CROSS(天线,大盘),大盘,1);