资金力度（副图源码） - 分析家公式网

分析家公式网,提供指标公式,股票软件用户登录 |

当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：资金力度（副图源码）

软件名称：[B]资金力度（副图源码）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/
软件语言：简体中文
授权方式：免费版
软件大小：5.00 KB
官方主页：Home Page
更新时间：2011-02-09 02:48:58
软件简介:

VARM:=EMA(EMA(CLOSE,7),13);
控盘:=(VARM-REF(VARM,1))/REF(VARM,1)*1000;
STICKLINE(控盘<0,控盘,0,1,0),COLORWHITE,NODRAW;
A10:=CROSS(控盘,0);
无庄控盘:IF(控盘<0 AND 控盘<=REF(控盘,1),控盘,0),COLORWHITE,NODRAW;
{庄家进:IF(无庄控盘>=REF(无庄控盘,1),控盘,0),COLORYELLOW,NODRAW;
STICKLINE(无庄控盘>=REF(无庄控盘,1) AND 控盘<0,控盘,0,3,0),COLORBLUE;}
开始控盘:=IF(A10,20,0),LINETHICK2,COLORYELLOW,NODRAW;
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORRED;
有庄控盘:IF(控盘>=REF(控盘,1) AND 控盘>0,控盘,0),COLORRED,NODRAW;
VARN:=100*WINNER(CLOSE*0.95);
STICKLINE(VARN>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLORFF00FF;
高度控盘:IF(VARN>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW;
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLOR00FF00;
控盘趋弱:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLOR00FF00,NODRAW;
控盘趋强:IF(控盘>REF(控盘,1) AND 控盘<0,控盘,0),COLORLIRED,NODRAW;

FJX:=0,COLORYELLOW,LINETHICK2;
WJ:=(HIGH+LOW+2*CLOSE)/4;
WJJ:=(OPEN+HIGH+LOW+CLOSE)/4;
DJJ:=(WJ+WJJ)/2;
DIFF:=EMA(DJJ,3)-EMA(DJJ,9);
DEA:=EMA(DIFF,3);
MACD:=2*(DIFF-DEA);
X1:=EMA(DIFF,3)*50;
X2:=((EMA(CLOSE,3)-EMA(CLOSE,7)))*50;
X3:IF(X2>0,X2,0),POINTDOT,COLORRED;
X4:IF(X2<0,X2,0),POINTDOT,COLORGREEN;
STICKLINE(X2>0,0,X2,2.8,0),COLORRED;
STICKLINE(X2>0,0,X2,2.6,0),COLOR000099;
STICKLINE(X2>0,0,X2,2.4,0),COLOR0000AA;
STICKLINE(X2>0,0,X2,2.2,0),COLOR0000BB;
STICKLINE(X2>0,0,X2,1.8,0),COLOR0000DD;
STICKLINE(X2>0,0,X2,1.5,0),COLOR0000EE;
STICKLINE(X2>0,0,X2,1.0,0),COLOR0000FF;
STICKLINE(X2>0,0,X2,0.0,0),COLOR0000FF;
STICKLINE(X2<0,0,X2,2.8,0),COLORGREEN;
STICKLINE(X2<0,0,X2,2.8,0),COLOR007700;
STICKLINE(X2<0,0,X2,2.6,0),COLOR008800;
STICKLINE(X2<0,0,X2,2.6,0),COLOR009900;
STICKLINE(X2<0,0,X2,2.4,0),COLOR00BB00;
STICKLINE(X2<0,0,X2,2.0,0),COLOR00CC00;
STICKLINE(X2<0,0,X2,1.8,0),COLOR00DD00;
STICKLINE(X2<0,0,X2,1.5,0),COLOR00EE00;
STICKLINE(X2<0,0,X2,1,0),COLOR00FF00;
STICKLINE(X2<0,0,X2,0,0),,COLOR00FF00;
资金动能A:X2,COLORBLUE,LINETHICK3;
资金动能B:X1,COLORFFFF00,LINETHICK3;
{DRAWICON(CROSS(资金动能A,资金动能B),资金动能B,1);}

SSA:=IF(C>REF(C,1),AMOUNT,0);
SSB:=IF(C<REF(C,1),AMOUNT,0);
净流入:=SUM(SSA,34)-SUM(SSB,34);
总额:=SUM(AMOUNT,0);
JLRB:(净流入)/总额*1000,COLORYELLOW;
JLRBMA:EXPMA(JLRB,3)COLORRED,LINETHICK2;
JLRBJX:EMA(EMA(JLRB,3),3)COLORGREEN,LINETHICK2;

起步:=MA(1/WINNER(CLOSE)*100,9)/100,COLORLIRED,LINETHICK2;
STICKLINE(起步>5,45,50,1,1),COLORLIRED;

WJH:=(HIGH+LOW+2*CLOSE)/4;
WJJH:=(OPEN+HIGH+LOW+CLOSE)/4;
WY1001:=(WJH+WJJH)/2;
WY1002:=EMA(WY1001,3);
WY1003:=EMA(WY1002,3);
WY1004:=EMA(WY1003,3);
资金趋势:=(WY1004-REF(WY1004,1))/REF(WY1004,1)*1000,COLORMAGENTA,LINETHICK2;
STICKLINE(资金趋势>=0,资金趋势,0,3,0),COLOR102088;
STICKLINE(资金趋势<0,资金趋势,0,3,0),COLOR003300;
PJGJ:=AMOUNT/VOL/100;
SSRYDJX:=MA(PJGJ,13);
SSRCJL:=EMA(VOL,13);
SSRCJE:=EMA(AMOUNT,13);
SSRCBJX:=SSRCJE/SSRCJL/100;
CYS13:(CLOSE-SSRCBJX)/SSRCBJX*500,COLORYELLOW,LINETHICK2;
XYSHSL:EMA(VOL/CAPITAL*100,13);
动能分界:=0,COLORLIBLUE,LINETHICK1;
STICKLINE(资金趋势>=0,资金趋势,0,1.5,0),COLOR0000AA;
STICKLINE(资金趋势<0,资金趋势,0,1.5,0),COLORGREEN;
STICKLINE(XYSHSL>5 AND CYS13>4 ,25 ,15 ,0.5 ,0 ),COLORBLUE;
STICKLINE(资金趋势<-0.7,资金趋势,0,1.0,0),COLORGREEN;
STICKLINE(XYSHSL>2.1 AND CYS13>5 ,15 ,5 ,0.5 ,0 ),COLORLIBLUE;
STICKLINE(XYSHSL>1.8 AND CYS13>5 ,0.5 ,0 ,1 ,0 ),COLOR1020BB;
XYS1:=MA(资金趋势,2),COLORGREEN;
三日动能:=EMA(资金趋势,2),COLORBROWN,LINETHICK2;
买:=CROSS(资金趋势,三日动能),LINETHICK;
预警:=资金趋势<-0.30 AND 买;
{DRAWTEXT(预警,-40,'可买'),LINETHICK5,COLORYELLOW;};

[url=http://www.70822.com/soft/sort013/sort05/down-30228.html]资金力度（副图源码）[/url]