当前位置: 网站首页 > 股票软件公式 > 通达信公式 > 文章 当前位置: 通达信公式 > 文章

通达信源码:资金进出,筹码堆积

点击: 次    来源:顶尖财经    作者:股市狙击 - 小 + 大

资金进出:

{资金进出}

DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD2:=2*(DIFF-DEA);
(CLOSE<0 AND CROSS(DIFF,0),H*1.3),COLOR000080,NODRAW;
(CLOSE<0 AND CROSS(MACD2,0),H*1.3),COLOR000080,NODRAW;
(CLOSE<0 AND CROSS(0,DIFF),H*1.3),COLOR808080,NODRAW;
(CLOSE<0 AND CROSS(0,MACD2),H*1.3),COLOR808080,NODRAW;
DU0:=CROSS(DIFF,0);
UD0:=CROSS(0,DIFF);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
UDGLINE:=IF(TDU3<TUD3,REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3));
JDU0:=REF(CLOSE,1)<=REF(UDGLINE,1) AND CLOSE>UDGLINE AND TDU0<TUD0;
JUD0:=REF(CLOSE,1)>=REF(UDGLINE,1) AND CLOSE<UDGLINE AND TUD0<TDU0;
JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1;
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1;
JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
JUD2:=JUD1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
JDU3:=JDU1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
JUD3:=JUD1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
BSLINE:=IF(BARSLAST(JDU2)<BARSLAST(JUD2),IF(REF(CROSS(0,MACD2),1),LLV(LOW,2),REF(LLV(LOW,2),BARSLAST(REF(CROSS
(0,MACD2),1)))),IF(REF(CROSS(MACD2,0),1),HHV(HIGH,2),REF(HHV(HIGH,2),BARSLAST(REF(CROSS(MACD2,0),1)))));
STICKLINE(MACD2>=0,0,MACD2,2,1),COLOR0000FF;
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,2,0),COLOR0000FF;
STICKLINE(MACD2<0,0,MACD2,2,0),COLORFFFF00;
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,2,1),COLORFFFF00;
DIF:DIFF,LINETHICK2,COLOR0000FF;
MACD:DEA,COLORFF0000;
DEF:MACD2,LINETHICK0,COLORFFFF00;
STICKLINE(CLOSE>0,0,0,2,0),COLOR808080;
DEFUT:=BARSLAST(CROSS(MACD2,0));
DEFDT:=BARSLAST(CROSS(0,MACD2));
DEFUL:=IF(MACD2>=0,HHV(MACD2,DEFUT+1),REF(HHV(MACD2,DEFUT+1),DEFDT+1));
DEFDL:=IF(MACD2<0,LLV(MACD2,DEFDT+1),REF(LLV(MACD2,DEFDT+1),DEFUT+1));
DEFU2L:=REF(DEFUL,DEFUT+1);
DEFD2L:=REF(DEFDL,DEFDT+1);
DRAWICON(LLV(MACD2,4)>0 AND MACD2<REF(MACD2,1) AND REF(MACD2,1)>REF(MACD2,2) AND REF(MACD2,2)>REF(MACD2,3),MACD2,2);
DRAWICON(HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3),MACD2,1);
DRAWICON((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND MACD2>=0 AND REF(MACD2,1)<REF(DEFU2L,1) AND MACD2>DEFU2L,MACD2,5);
DRAWICON((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND MACD2<0 AND REF(MACD2,1)>REF(DEFD2L,1) AND MACD2<DEFD2L,MACD2,3);
VAR111:=JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1);
VAR112:=HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3);




筹码堆积:

漂亮的筹码公式(顶尖财经 股票学院: www.58188.com)

{公式名称: 筹码堆积

公式描述: 副图   2☆☆☆◆保留
参数数量: 1
参数1: N1, 最小: 1, 最大: 1000, 缺省: 6
参数精灵:
请设置计算参数:
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)<10;
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)<10;
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)));
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));
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;
 

上一篇:通达信源码:追赶升浪,地瓜分时内部 合成版,军长专用MACD

下一篇:通达信源码:介入捕捉启动股抄底时机,复盘放宽 筹码穿透 筹码集中度