筹码堆积 通达信副图指标 九毛八公式指标网

筹码堆积 通达信副图指标 源码 贴图

参数精灵:
请设置计算参数:
N1: PARAM#0 (1.00--1000.00)
用法注释:无
公式源码:}

VAR1:=13;
VAR2:=30;
VAR3:=(CLOSE+OPEN+LOW+HIGH)/4;
VAR4:=WINNER(VAR3*1.04)*100;
VAR5:=WINNER(VAR3*0.96)*100;
A04:VAR5,NODRAW;
A08:VAR4-VAR5,NODRAW;
A06:100-VAR4,NODRAW;
STICKLINE(1,100,VAR4,2,1),COLORGREEN;
STICKLINE(1,0,A08,2,0),COLOR000080;
STICKLINE(1,0,A04,2,0),COLORRED;
中轴:50,DOTLINE,COLORGREEN;
VAR6:=EMA(CLOSE,60)-EMA(CLOSE,300);
VAR7:=EMA(VAR6,300);
VAR8:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
买入线:SMA(VAR8,2,1),COLORWHITE;
卖出线:SMA(买入线,2,1),COLORGREEN;
VAR9:=CLOSE/REF(CLOSE,3) =1.1;
VAR10:=BACKSET(VAR9,3);
大涨买:IF(VAR10 AND COUNT(VAR10,3)=1,50,0),LINETHICK0;
DRAWTEXT(大涨买,50,5);
STICKLINE(FILTER(大涨买,5)=1,0,20,3,0),COLORYELLOW;
DRAWTEXT(大涨买 AND 大涨买,LOW*0.8,6),COLORWHITE;
VAR11:=PEAKBARS(3,15,1)
VAR12:=IF(VAR11=1,50,0);
VAR13:=IF(VAR12=50,100,0);
卖:IF(VAR13 REF(VAR13,1),50,0),LINETHICK0;
STICKLINE(FILTER(卖,5)=1,0,20,3,0),COLORFF8800;
DRAWTEXT(卖 AND 卖,LOW*0.6,7),COLORWHITE;
VAR14:=TROUGHBARS(3,15,1)
VAR15:=IF(VAR14=1,50,0);
VAR16:=IF(VAR15=50,50,0);
买:IF(VAR16 REF(VAR16,1),40,0),LINETHICK0;
DRAWTEXT(买,40,8);
STICKLINE(FILTER(买,5)=1,0,20,2,0),COLOR999999;
DRAWTEXT(买 AND 买,LOW*0.2,9),COLORWHITE;
DRAWRECTREL(323,999,0,632.400024,IF(120,RGB(0,20,0),0));
VAR17:=L2_AMO(0,2)/10000;
VAR18:=L2_AMO(1,2)/10000;
VAR19:=L2_AMO(2,2)/10000;
VAR20:=L2_AMO(3,2)/10000;
VAR21:=(-L2_AMO(0,3))/10000;
VAR22:=(-L2_AMO(1,3))/10000;
VAR23:=(-L2_AMO(2,3))/10000;
VAR24:=(-L2_AMO(3,3))/10000;
VAR25:=VAR17+VAR18+VAR19+VAR20+(VAR21+VAR22+VAR23+VAR24);
VAR26:=VAR19+VAR23;
VAR27:=VAR17+VAR18+(VAR21+VAR22);
VAR28:=SUM(VAR27,3);
VAR29:=SUM(VAR27,10);
VAR30:=VAR17+VAR21;
VAR31:=VAR18+VAR22;
VAR32:=VAR20+VAR24;
VAR33:=VAR17+VAR18;
VAR34:=VAR21+VAR22;
VAR35:=VAR19+VAR20;
VAR36:=VAR23+VAR24;
VAR37:=SUM(VAR25,3);
VAR38:=SUM(VAR25,10);
VAR39:=LARGEINTRDVOL*100/VOL;
VAR40:=LARGEOUTTRDVOL*100/VOL;
VAR41:=IF(TRADENUM 0,(LARGETRDINNUM-LARGETRDOUTNUM)/TRADENUM*100,0);
VAR42:=IF(TRADENUM 0,(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM,0);
VAR43:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*100/CAPITAL;
DRAWRECTREL(100,910,2,805,IF(CONST(VAR41) 0,RGB(192,17,127),RGB(0,100,0)));
DRAWRECTREL(207,910,115,805,IF(CONST(VAR42) 0,RGB(192,17,27),RGB(0,100,0)));
DRAWRECTREL(324,910,219,805,IF(CONST(VAR43) 0,RGB(192,17,27),RGB(0,100,0)));
{www.9m8.cn 九毛八公式指标网}
DRAWTEXT_FIX(1,0.003,0.807,0,STRCAT(10,CON2STR(VAR41,2))),COLOR00AA00;
DRAWTEXT_FIX(1,0.118,0.807,0,STRCAT(11,CON2STR(VAR42,2))),COLORWHITE;
DRAWTEXT_FIX(1,0.223,0.807,0,STRCAT(12,CON2STR(VAR43,2))),COLORWHITE;
VAR44:=IF(VAR41 0 AND REF(VAR41,1) 0,1,0);
VAR45:=IF(VAR41 0 AND REF(VAR41,1) 0 AND REF(VAR41,2) 0,2,VAR44);
VAR46:=IF(VAR41 0 AND REF(VAR41,1) 0 AND REF(VAR41,2) 0 AND REF(VAR41,3) 0,3,VAR45);
VAR47:=IF(VAR41 0 AND REF(VAR41,1) 0 AND REF(VAR41,2) 0 AND REF(VAR41,3) 0 AND REF(VAR41,4) 0,4,VAR46);
VAR48:=IF(VAR41 0 AND REF(VAR41,1) 0 AND REF(VAR41,2) 0 AND REF(VAR41,3) 0 AND REF(VAR41,4) 0 AND REF(VAR41,5) 0,5,VAR47);
VAR49:=IF(VAR41 0 AND REF(VAR41,1) 0 AND REF(VAR41,2) 0 AND REF(VAR41,3) 0 AND REF(VAR41,4) 0 AND REF(VAR41,5) 0 AND REF(VAR41,6) 0,6,VAR48);
VAR50:=IF(VAR41 0 AND REF(VAR41,1) 0 AND REF(VAR41,2) 0 AND REF(VAR41,3) 0 AND REF(VAR41,4) 0 AND REF(VAR41,5) 0 AND REF(VAR41,6) 0 AND REF(VAR41,7) 0,7,VAR49);
VAR51:=IF(VAR41 0 AND REF(VAR41,1) 0 AND REF(VAR41,2) 0 AND REF(VAR41,3) 0 AND REF(VAR41,4) 0 AND REF(VAR41,5) 0 AND REF(VAR41,6) 0 AND REF(VAR41,7) 0 AND REF(VAR41,8) 0,8,VAR50);
VAR52:=IF(VAR41 0 AND REF(VAR41,1) 0 AND REF(VAR41,2) 0 AND REF(VAR41,3) 0 AND REF(VAR41,4) 0 AND REF(VAR41,5) 0 AND REF(VAR41,6) 0 AND REF(VAR41,7) 0 AND REF(VAR41,8) 0 AND REF(VAR41,9) 0,9,VAR51);
VAR53:=IF(VAR41 0 AND REF(VAR41,1) 0 AND REF(VAR41,2) 0 AND REF(VAR41,3) 0 AND REF(VAR41,4) 0 AND REF(VAR41,5) 0 AND REF(VAR41,6) 0 AND REF(VAR41,7) 0 AND REF(VAR41,8) 0 AND REF(VAR41,9) 0,10,VAR52);
DRAWTEXT_FIX(1,0.075,0.803,0,STRCAT(STRCAT(13,CON2STR(VAR53,0)),14)),COLORWHITE;
VAR54:=IF(VAR42 0 AND REF(VAR42,1) 0,1,0);
VAR55:=IF(VAR42 0 AND REF(VAR42,1) 0 AND REF(VAR42,2) 0,2,VAR54);
VAR56:=IF(VAR42 0 AND REF(VAR42,1) 0 AND REF(VAR42,2) 0 AND REF(VAR42,3) 0,3,VAR55);
VAR57:=IF(VAR42 0 AND REF(VAR42,1) 0 AND REF(VAR42,2) 0 AND REF(VAR42,3) 0 AND REF(VAR42,4) 0,4,VAR56);
VAR58:=IF(VAR42 0 AND REF(VAR42,1) 0 AND REF(VAR42,2) 0 AND REF(VAR42,3) 0 AND REF(VAR42,4) 0 AND REF(VAR42,5) 0,5,VAR57);
VAR59:=IF(VAR42 0 AND REF(VAR42,1) 0 AND REF(VAR42,2) 0 AND REF(VAR42,3) 0 AND REF(VAR42,4) 0 AND REF(VAR42,5) 0 AND REF(VAR42,6) 0,6,VAR58);
VAR60:=IF(VAR42 0 AND REF(VAR42,1) 0 AND REF(VAR42,2) 0 AND REF(VAR42,3) 0 AND REF(VAR42,4) 0 AND REF(VAR42,5) 0 AND REF(VAR42,6) 0 AND REF(VAR42,7) 0,7,VAR59);
VAR61:=IF(VAR42 0 AND REF(VAR42,1) 0 AND REF(VAR42,2) 0 AND REF(VAR42,3) 0 AND REF(VAR42,4) 0 AND REF(VAR42,5) 0 AND REF(VAR42,6) 0 AND REF(VAR42,7) 0 AND REF(VAR42,8) 0,8,VAR60);
VAR62:=IF(VAR42 0 AND REF(VAR42,1) 0 AND REF(VAR42,2) 0 AND REF(VAR42,3) 0 AND REF(VAR42,4) 0 AND REF(VAR42,5) 0 AND REF(VAR42,6) 0 AND REF(VAR42,7) 0 AND REF(VAR42,8) 0 AND REF(VAR42,9) 0,9,VAR61);
VAR63:=IF(VAR42 0 AND REF(VAR42,1) 0 AND REF(VAR42,2) 0 AND REF(VAR42,3) 0 AND REF(VAR42,4) 0 AND REF(VAR42,5) 0 AND REF(VAR42,6) 0 AND REF(VAR42,7) 0 AND REF(VAR42,8) 0 AND REF(VAR42,9) 0,10,VAR62);
DRAWTEXT_FIX(1,0.183,0.803,0,STRCAT(STRCAT(13,CON2STR(VAR63,0)),14)),COLORWHITE;
VAR64:=IF(VAR43 0 AND REF(VAR43,1) 0,1,0);
VAR65:=IF(VAR43 0 AND REF(VAR43,1) 0 AND REF(VAR43,2) 0,2,VAR64);
VAR66:=IF(VAR43 0 AND REF(VAR43,1) 0 AND REF(VAR43,2) 0 AND REF(VAR43,3) 0,3,VAR65);
VAR67:=IF(VAR43 0 AND REF(VAR43,1) 0 AND REF(VAR43,2) 0 AND REF(VAR43,3) 0 AND REF(VAR43,4) 0,4,VAR66);
VAR68:=IF(VAR43 0 AND REF(VAR43,1) 0 AND REF(VAR43,2) 0 AND REF(VAR43,3) 0 AND REF(VAR43,4) 0 AND REF(VAR43,5) 0,5,VAR67);
VAR69:=IF(VAR43 0 AND REF(VAR43,1) 0 AND REF(VAR43,2) 0 AND REF(VAR43,3) 0 AND REF(VAR43,4) 0 AND REF(VAR43,5) 0 AND REF(VAR43,6) 0,6,VAR68);
VAR70:=IF(VAR43 0 AND REF(VAR43,1) 0 AND REF(VAR43,2) 0 AND REF(VAR43,3) 0 AND REF(VAR43,4) 0 AND REF(VAR43,5) 0 AND REF(VAR43,6) 0 AND REF(VAR43,7) 0,7,VAR69);
VAR71:=IF(VAR43 0 AND REF(VAR43,1) 0 AND REF(VAR43,2) 0 AND REF(VAR43,3) 0 AND REF(VAR43,4) 0 AND REF(VAR43,5) 0 AND REF(VAR43,6) 0 AND REF(VAR43,7) 0 AND REF(VAR43,8) 0,8,VAR70);
VAR72:=IF(VAR43 0 AND REF(VAR43,1) 0 AND REF(VAR43,2) 0 AND REF(VAR43,3) 0 AND REF(VAR43,4) 0 AND REF(VAR43,5) 0 AND REF(VAR43,6) 0 AND REF(VAR43,7) 0 AND REF(VAR43,8) 0 AND REF(VAR43,9) 0,9,VAR71);
VAR73:=IF(VAR43 0 AND REF(VAR43,1) 0 AND REF(VAR43,2) 0 AND REF(VAR43,3) 0 AND REF(VAR43,4) 0 AND REF(VAR43,5) 0 AND REF(VAR43,6) 0 AND REF(VAR43,7) 0 AND REF(VAR43,8) 0 AND REF(VAR43,9) 0,10,VAR72);
DRAWTEXT_FIX(1,0.285,0.803,0,STRCAT(STRCAT(13,CON2STR(VAR73,0)),14)),COLORWHITE;
VAR74:=LARGEINTRDVOL-LARGEOUTTRDVOL;
VAR75:=LARGEINTRDVOL-LARGEOUTTRDVOL;
VAR76:=(LARGEINTRDVOL+LARGEOUTTRDVOL)*10000/(2*FINANCE(7));
VAR77:=(L2_AMO(0,0)+L2_AMO(1,0)-L2_AMO(0,1)-L2_AMO(1,1))/10000;
DRAWRECTREL(100,765,2,668,IF(CONST(VAR77) 0,RGB(192,17,27),RGB(0,50,150)));
DRAWTEXT_FIX(1,0.005,0.665,0,STRCAT(15,CON2STR(VAR77,2))),COLORWHITE;
DRAWRECTREL(207,765,115,668,IF(CONST(VAR75) 0,RGB(192,17,27),RGB(0,50,150)));
{DRAWRECTREL(324,765,219,668,IF(CONST(DRAWTEXT_FIX(1,0.118,0.665,0,STRCAT(16,CON2STR(VAR76,2))),COLORWHITE) 0,RGB(192,17,27),RGB(0,50,150)));}
DRAWTEXT_FIX(1,0.223,0.665,0,STRCAT(STRCAT(17,CON2STR(VAR73,0)),18)),COLORYELLOW;
DRAWRECTREL(304,632,0,0.4,IF(120,RGB(0,20,0),0));
{www.9m8.cn 九毛八公式指标网}
VAR78:=ACTINVOL;
VAR79:=ACTOUTVOL;
VAR80:=VAR78*100/(VAR78+VAR79);
VAR81:=VAR79*100/(VAR78+VAR79);
买卖差:VAR78+VAR79,NODRAW,COLORCYAN;
DRAWTEXT_FIX(1,0.005,0,0,STRCAT(STRCAT(19,CON2STR(VAR78,1)),20)),COLORRED;
DRAWTEXT_FIX(1,0.005,0.2,0,STRCAT(STRCAT(21,CON2STR(VAR79,1)),20)),COLORGREEN;
DRAWRECTREL(100,90,90+CONST(VAR80*300/100),20,RGB(250,0,0));
DRAWRECTREL(100,290,90+CONST(VAR81*300/100),220,RGB(0,250,0));
VAR82:=ACTINVOL-ACTOUTVOL;
VAR83:=(L2_AMO(0,0)+L2_AMO(1,0)-L2_AMO(0,1)-L2_AMO(1,1))/10000;
DRAWTEXT_FIX(1,0.005,0.35,0,STRCAT(STRCAT(22,CON2STR(VAR83,1)),23)),COLORRED;
DRAWTEXT_FIX(1,0.15,0.35,0,STRCAT(STRCAT(24,CON2STR(VAR27,1)),23)),COLORRED;
DRAWTEXT_FIX(1,0.005,0.5,0,STRCAT(STRCAT(25,CON2STR(VAR74,1)),26)),COLORWHITE;
DRAWTEXT_FIX(1,0.15,0.5,0,STRCAT(STRCAT(27,CON2STR(VAR82,1)),26)),COLORWHITE;