多空监控A 日线副图/分时副图 通达信副图指标 源码 贴图

{DRAWGBK(C>0, RGB(0,10,10),RGB(88,0,0),0,'11',0);}
DRAWGBK(C>0,RGB(8,10,4),RGB(8,10,4),0,'',0);
V1:=(C*2+H+L)/4*10;
V2:=EMA(V1,13)-EMA(V1,34);
V3:=EMA(V2,5);
V4:=(2*(V2-V3)*5.5)*10;
超大主力吃:=IF(V4>=0,V4,0),COLOR7F00FF,LINETHICK3;
{STICKLINE(CROSS(超大主力吃,30),0,100,1,0),COLORYELLOW;
STICKLINE(CROSS(超大主力吃,60),0,100,1,0),COLORRED;}
STICKLINE(超大主力吃>=60 AND 超大主力吃>REF(超大主力吃,1),0,50,3,1),COLORRED;
STICKLINE(超大主力吃>=60 AND 超大主力吃<REF(超大主力吃,1),0,50,3,1),COLORYELLOW;
STICKLINE(超大主力吃>=30 AND 超大主力吃>REF(超大主力吃,1),0,30,3,1),COLORRED;
STICKLINE(超大主力吃>=30 AND 超大主力吃<REF(超大主力吃,1),0,30,3,1),COLORYELLOW;

RSV:=(CLOSE-LLV(LOW,7))/(HHV(HIGH,7)-LLV(LOW,7))*100;
短线多:SMA(RSV,3,1),COLORFF00FF,DOTLINE;
短线空:SMA(短线多,3,1),COLORBLUE,DOTLINE;
RSV1:=(CLOSE-LLV(LOW,38))/(HHV(HIGH,38)-LLV(LOW,38))*100;
中线多:SMA(RSV1,5,1),COLORRED;
中线空:SMA(中线多,10,1),COLORGREEN;
{STICKLINE(短线多>短线空,短线多,短线空,1,0),COLORFF00FF;
STICKLINE(短线多<=短线空,短线多,短线空,1,0),COLORBLUE;}
STICKLINE(中线多>中线空,中线多,中线空,1,0),COLORRED;
STICKLINE(中线多<=中线空,中线多,中线空,1,0),COLORGREEN;
短期:=100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5)),COLORWHITE;
中期:=100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10)),COLORYELLOW;
中长期:=100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20)),COLORMAGENTA;
长期:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30)),COLORRED,LINETHICK2;
长强势区:=IF((EVERY(短线多>=REF(短线多,1),1)AND 短线多<短线空),5,0)COLOR0000FF,LINETHICK3;
长强势区1:=IF((EVERY(中线多>=REF(中线多,1),1)AND 中线多<18),5,0)COLOR0000FF,LINETHICK3;
长强势区11:=IF((EVERY(中线多<=REF(中线多,1),1)AND 中线多>85),5,0)COLOR0000FF,LINETHICK3;
长强势区2:=IF((EVERY(短线多<=REF(短线多,1),1)AND 短线多>短线空),5,0)COLOR0000FF,LINETHICK3;
50;
AQ1:=(DVOL/C)/2,NODRAW;
A2:=SUM(IF(AQ1>100 AND CLOSE>REF(CLOSE,1),AQ1,0),0);
A3:=SUM(IF(AQ1>100 AND CLOSE<REF(CLOSE,1),AQ1,0),0);
A4:=SUM(IF(AQ1<100 AND CLOSE>REF(CLOSE,1),AQ1,0),0);
A5:=SUM(IF(AQ1<100 AND CLOSE<REF(CLOSE,1),AQ1,0),0);
A6:=A2+A3+A4+A5;

{A2:=SUM((IF(((成交额/8>20) 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;}

机构买:=(A2),LINETHICK6,COLORRED;
机构卖:=(A3),LINETHICK6,COLORFFFF55;
机构进出:=机构买-机构卖,NODRAW;
散户买:=(A4),COLOR5555FF;
散户卖:=(A5),COLOR55FF55;
主力进%:=300*A2/A6,COLORRED,LINETHICK2;
主力出%:=300*A3/A6,COLORGREEN,LINETHICK2;
散户进%:=300*A4/A6;
散户出%:=300*A5/A6;
STICKLINE(主力进%>主力出%,-20,-10,4,0),COLORRED;
STICKLINE(主力进%<主力出%,-20,-10,4,0),COLORGREEN;
STICKLINE(主力进%>主力出% AND 散户卖>机构买,-20,-10,4,0),COLORGREEN;
STICKLINE(主力进%=主力出% AND 散户卖<机构买,-20,-10,4,0),COLORRED;
DRAWTEXT(CURRBARSCOUNT=1 AND 主力进%>主力出%,-15,' 主力买强'),LINETHICK2,COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1 AND 主力进%<主力出%,-15,' 主力卖强'),LINETHICK2,COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=1 AND 主力进%=主力出%,-15,' 多空平衡'),LINETHICK2,COLORWHITE;
DD1:=1;10;
80;
AVAR1:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36))*100;
AVAR2:=SMA(AVAR1,3,1);
AVAR3:=SMA(AVAR2,3,1);
AVAR4:=SMA(AVAR3,3,1);
波:=AVAR3,LINETHICK2,COLORRED;
段:=AVAR4,LINETHICK2,COLORYELLOW;
AVAR6:=CROSS(AVAR3,AVAR4) AND AVAR3<25;
AVAR7:=AVAR6 AND VOL>REF(VOL,1)*2 AND VOL>REF(MA(VOL,5),1)*2;
{ STICKLINE(AVAR6,0,AVAR3+5,1,1),LINETHICK2,COLORWHITE;}
{DRAWTEXT(AVAR6 AND COUNT(AVAR6,10)=1,AVAR3+15,'抄底'),LINETHICK2,COLORWHITE;}
AVAR9:=CROSS(AVAR4,AVAR3) AND AVAR3>80;
STICKLINE(AVAR9,AVAR3-5,100,1,1),LINETHICK2,COLORYELLOW;
DRAWTEXT(AVAR9 AND COUNT(AVAR9,10)=1,AVAR3-15,'逃顶'),LINETHICK2,COLORYELLOW;

{KDJ主线}
CCA:=(H+L+C)/3;
CCK:=段{SMA(太乙线,3,1)},LINETHICK2;
CCD:=SMA(CCK,3,1),LINETHICK1,COLORYELLOW;{止损线，破止损}
CCJ:=3*CCK-2*CCD,COLORWHITE,LINETHICK1;
超短:=(CCJ+CCD)/2,LINETHICK1,COLORYELLOW,DOTLINE;

AQ:=BETWEEN(C/(SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C))),1.05,0.95);
天:=IF(AQ=0,MA(C,BARSCOUNT(C)),(SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C))));
DRAWICON(CROSS((C/天),1.03),15,6);
买入涨停:STICKLINE(CROSS((C/天),1.03),15,0,4,0), COLORYELLOW;

{分时买入待涨源码}
A0:=HOUR=9 AND MINUTE=45;
A1:=HOUR=10 AND MINUTE=0;
AA2:=HHV(H,30);
AA3:=BARSLAST(A1);
AA4:=REF(AA2,AA3);
AA5:=CONST(AA4),COLORAA0099;
AA6:=C,COLORAABBAA;
AA7:=EMA(C,37),COLORAAFF33;
B1:=AA6>AA5 AND REF(AA6<=AA5,1) AND AA6>AA7;
B2:=BARSLAST(B1);
B3:=FILTER(B1,A3);
AA:=FILTER(C/REF(LLV(L,5),1)>1.015,BARSLAST(CROSS(AA6,DYNAINFO(11))));
分时关注:=DRAWICON(AA,波,14);
{DRAWICON(B3,波,13);}
{计算收益、已爆分钟}
PA1:=BARSSINCE(超大主力吃>=30)+1;
首次追涨价:=REF(C,PA1-1),NODRAW;

追涨收益:STRCAT((DYNAINFO(7)-首次追涨价)/首次追涨价*100,'%'),NODRAW;
PA2:=BARSSINCE(超大主力吃>=60)+1;
首次关注价:=REF(C,PA2-1),NODRAW;
关注收益:STRCAT((DYNAINFO(7)-首次关注价)/首次关注价*100,'%'),NODRAW;
{PA3:=BARSSINCE(熊市专用)+1;
首次熊市价:=REF(C,PA3-1),NODRAW;
熊市专用收益:(DYNAINFO(7)-首次熊市价)/首次熊市价*100,NODRAW;}

强势:((100*A2)/A6>50);
STICKLINE(强势,0,-10,1,0),COLORYELLOW;
拉升:((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18;
STICKLINE(拉升,2,10,1,0),COLORRED;
{DRAWTEXT(ISLASTBAR=1,机构买*0.95,''),LINETHICK2,COLORRED;
DRAWTEXT(ISLASTBAR=1,机构卖*0.95,''),LINETHICK2,COLORFFFF55;}
{DRAWICON(CROSS((C/Q2),1.03),波,5);}

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)),'%');
DRAWTEXT_FIX(DD1=1,0.88,0.02,0,AAA1),COLORRED;
DRAWTEXT_FIX(DD1=1,0.88,0.13,0,AAA2),COLORGREEN;
DRAWTEXT_FIX(DD1=1,0.88,0.24,0,AAA0),LINETHICK5,COLORCYAN;

DRAWTEXT(ISLASTBAR,-25,' 趋势'),COLORGREEN;
DRAWTEXT(ISLASTBAR,-15,' 资金'),COLORGREEN;
DRAWTEXT(ISLASTBAR AND 强势,-5,' 强势'),COLORRED;
DRAWTEXT(ISLASTBAR AND 拉升,5,' 拉升'),COLORYELLOW;

VAR1:=LLV(LOW,100);
VAR2:=HHV(HIGH,250);
{操盘线:=EMA((CLOSE-VAR1)/(VAR2-VAR1)*5,5);
绝底:=0.03,LINETHICK2,COLOR0000FF;
绝顶:=4.91,LINETHICK2,COLORFF00FF;
分界:=2.5,COLOR00FFFF;
DRAWTEXT(CROSS(操盘线,绝底),波*0.80,'买入'), COLORYELLOW;
DRAWTEXT(CROSS(操盘线,绝顶),段*0.78,'卖出'), COLORYELLOW;
STICKLINE(CROSS(操盘线,绝顶),100,80,1,0);
STICKLINE(CROSS(操盘线,绝底),0,50,1,0);}

TT:=BARSLAST(HOUR=9 AND MINUTE=(30+1))+1;
均价:=SUM(V*C,0)/SUM(V,10),COLORYELLOW;
均价1:=SUM(V*C,0)/SUM(V,0),COLORYELLOW;
盘整:IF(HOUR>9 AND RANGE(HHV(C,60)/LLV(C,60),1,1.02),C,DRAWNULL),COLORRED,LINETHICK2;

均价D:=SUM(V*C,0)/SUM(V,0),COLORYELLOW;
地:=EMA(均价D,50)/0.97,LINETHICK2,COLORGREEN;
STICKLINE(地,-21,-30,2.0,0),COLORGREEN;
STICKLINE(地>REF(地,1),-21,-30,2.0,0),COLORRED;

STICKLINE(CROSS(超大主力吃,30),0,100,1,1),COLORYELLOW;
STICKLINE(CROSS(超大主力吃,60),0,100,1,1),COLORRED;
DRAWTEXT(CROSS(超大主力吃,30) AND TIME2<100000,20,'吸筹'),LINETHICK2,COLORYELLOW;
DRAWTEXT(CROSS(超大主力吃,30) AND TIME2<100000,40,'涨停'),LINETHICK2,COLORRED;

{超级分时}
CJFSVAR1:=EMA(EMA(CLOSE,13),13);
控盘:=(CJFSVAR1-REF(CJFSVAR1,1))/REF(CJFSVAR1,1)*1000;
CJFSJJ:=AMOUNT/VOL/100;
CJFSP:=55;
CJFSS:=8;
CJFSM1:=3;
财:=(EMA(CLOSE,CJFSS)-EMA(CLOSE,CJFSP))*10;
神:=EMA(财,CJFSM1);
BTJ1:=(CLOSE-CJFSJJ)/CJFSJJ<(-0.005);
BTJ11:=(CLOSE-CJFSJJ)/CJFSJJ<(-0.03);
BTJ12:=LAST(CJFSJJ>=REF(CJFSJJ,1),5,1) AND (CLOSE-CJFSJJ)/CJFSJJ<0.005;
STJ1:=(CLOSE-CJFSJJ)/CJFSJJ>0.005;
STJ01:=控盘<REF(控盘,1) AND 控盘>0.5;
STJ02:=控盘>0;
BTJ2:=控盘>REF(控盘,1) AND 控盘<(-0.2);
BTJ22:=控盘>REF(控盘,1) AND 控盘<0;
BTJ3:=CROSS(财,神) AND 财<(-0.3);
BTJ32:=CROSS(财,神) AND 财<(-0.1);
STJ31:=CROSS(神,财);
STJ32:=CROSS(神,财) AND 财>1.618;
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13);
BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13);
有庄:=IF(BTJ81,1,0);
STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13);
VAR11:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100;
VAR22:=(CLOSE-LLV(LOW,43))/(HHV(HIGH,43)-LLV(LOW,43))*100;
VAR33:=SMA(VAR22,2,1);
CJFSNN:=SMA(VAR33,2,1);
CJFSMM:=ABS(VAR11);
买A:=STICKLINE(CROSS(CJFSNN,CJFSMM),3,20,2,0);
可买:IF(买A,60,0)COLORRED,LINETHICK2;
必买:IF(BTJ81,80,0)COLORYELLOW,LINETHICK2;
DRAWTEXT(买A,60,'可买'),LINETHICK2,COLORYELLOW;
DRAWTEXT(BTJ81,80,'必买'),LINETHICK2,COLORYELLOW;

TVAR1:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100;
TVAR2:=(CLOSE-LLV(LOW,43))/(HHV(HIGH,43)-LLV(LOW,43))*100;
TVAR3:=SMA(TVAR2,2,1);
天A:=100+(-ABS(TVAR1)),COLORRED;
下:=SMA(TVAR3,2,1);
无:=ABS(TVAR1),COLORGREEN;
敌:=50,COLORFFAA00,LINETHICK3;
TA:=80;
TB:=20;
买:STICKLINE(CROSS(下,无),3,20,2,0),COLORRED,LINETHICK1;
STICKLINE(CROSS(下,无),20,25,2,0),COLORFF9900,LINETHICK1;
DRAWTEXT(CROSS(下,无),30,'买'),COLORFFFFCC;
卖:STICKLINE(CROSS(下,天A),70,90,2,0),COLORRED,LINETHICK1;
STICKLINE(CROSS(下,天A),90,99,2,0),COLORFF9900,LINETHICK1;
DRAWTEXT(CROSS(下,天A),70,'卖 '),COLORFFFFCC;
{STICKLINE(下<11,下,11,5,0),COLORYELLOW;};

机构买盘:=(A2),LINETHICK2;
机构卖盘:=(A3),LINETHICK2;
散户买盘:=(A4);
散户卖盘:=(A5);
突破:=REF(EMA(C,14),1);
A1X:=(EMA(C,10)-突破)/突破*100;
多方:=IF(A1X>=0,REF(EMA(C,10),BARSLAST(CROSS(A1X,0))+1),DRAWNULL);
空方:=IF(A1X<0,REF(EMA(C,10),BARSLAST(CROSS(0,A1X))+1),DRAWNULL);
最新:CLOSE,LINETHICK1,COLORWHITE;

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

H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;{www.gpxiazai.com}
阻力:=L1+P1*7/8,COLORGREEN;
支撑:=L1+P1*0.5/8,COLORMAGENTA;
DRAWTEXT(LONGCROSS(支撑,C,2),中线多,'--反弹'),COLORYELLOW;
DRAWTEXT(LONGCROSS(C,阻力,2),中线多,'--出货'),COLORYELLOW;