主力资金监控
var1:=MA(MACD.DIF#WEEK,5);
var2:=MA(MACD.DIF#MONTH,20);
var3:=MA(KDJ.K#MONTH(9,3,3),20);
var6:=MA(KDJ.K#WEEK(9,3,3),5);
X39:=var2>=REF(var2,1) AND var1>=REF(var1,1);
X40:=var3>=REF(var3,1) AND var6>=REF(var6,1);
X41:IF(X39 AND X40,20,0);
gspt1:=VOL;
gspt2:=SMA((CLOSE-REF(CLOSE,1))*gspt1,3,1)/10000;
gspt3:=EMA(gspt2,12)-EMA(gspt2,26);
gspt4:=EMA(gspt3,9);
gspt5:=(gspt3-gspt4)*2;
主力资金:gspt5,NODRAW,COLORYELLOW;
流入:CROSS(gspt5,0),NODRAW,COLORRED;
DRAWICON(CROSS(gspt5,0),REF(gspt5,1),38);
流出:CROSS(0,gspt5),NODRAW,COLORGREEN;
DRAWICON(CROSS(0,gspt5),REF(gspt5,1),39);
gspt6:=1;
gspt7:=CLOSE*VOL;
gspt8:=EMA((EMA(gspt7,3)/EMA(VOL,3)+EMA(gspt7,6)/EMA(VOL,6)+EMA(gspt7,12)/EMA(VOL,12)+EMA(gspt7,24)/EMA(VOL,24))/4,13);
gspt9:=(EMA(CLOSE,5)*7+EMA(CLOSE,10)*3)/10;
gspt10:=gspt9;
gspt11:=gspt7;
gspt12:=gspt8;
gspt13:=1.06*gspt12;
gspt14:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>6;
gspt15:=EMA(HIGH,10)*(1+6/100);
gspt16:=gspt6 AND gspt14>0 AND CROSS(CLOSE,gspt15) AND CROSS(CLOSE,gspt13);
gspt17:=FILTER(CROSS(gspt10,EMA(HIGH,55)*(1+10/100)),5);
黑马启动:IF(gspt6 AND gspt16,1,0),NODRAW,COLORRED;
非妖即顶:IF(gspt6 AND gspt17,1,0),NODRAW,COLORMAGENTA;
STICKLINE(gspt5>0 AND gspt5>=REF(gspt5,1),gspt5,0,3,1),COLORRED;
STICKLINE(gspt5>0 AND gspt5<REF(gspt5,1),gspt5,0,3,1),COLORGREEN;
STICKLINE(gspt5<0,gspt5,0,3,1),COLORCYAN;
STICKLINE(黑马启动>0,gspt5,0,4,0),COLORRED;
STICKLINE(非妖即顶>0,gspt5,0,4,0),COLORMAGENTA;
gspt18:=gspt6;
gspt19:=IF(gspt6<=0,0,HHVBARS(gspt5,BARSLAST(gspt5<0)+1));
gspt20:=IF(gspt18>0,CROSS(BACKSET(CROSS(0,gspt5),REF(gspt19,1)+2),0.5),0);
gspt21:=CROSS(BACKSET(CROSS(0,gspt5) OR (ISLASTBAR AND gspt5>0),REF(gspt19,1)+2),0.5);
gspt22:=DRAWLINE(gspt20,gspt5,REF(gspt20,1),REF(gspt5,1),1);
NOTEXT前高:gspt22,COLORGRAY;
gspt23:=LLVBARS(gspt5,BARSLAST(gspt5>0)+1);
gspt24:=CROSS(BACKSET(CROSS(gspt5,0),REF(gspt23,1)+2),0.5);
gspt25:=BARSLAST(FILTERX(CROSS(0,gspt5),BARSCOUNT(CLOSE)));
gspt26:=DRAWLINE(gspt24,gspt5,REF(gspt24,1),REF(gspt5,1),1);
NOTEXT前低:gspt26,COLORGRAY;
gspt27:=IF(gspt5<0,FILTERX(gspt5=LLV(gspt5,BARSLAST(gspt5>0)),BARSCOUNT(CLOSE)),DRAWNULL);
gspt28:=BARSLAST(gspt27);
gspt29:=FILTERX(gspt5<CONST(LLV(gspt5,gspt25+1)),BARSCOUNT(CLOSE));
gspt30:=BARSLAST(gspt29);
gspt31:=IF(gspt25+1>=1,CONST(LLV(gspt5,gspt25+1)),DRAWNULL);
NOTEXT本低:gspt31,COLORWHITE;
gspt32:=CROSS(COUNT(CROSS(gspt5>gspt31/2 AND gspt5<0,0.5),gspt28)=1,0.5) AND gspt28>=0;
gspt33:=IF(ISLASTBAR AND gspt5>0 AND gspt5=HHV(gspt5,BARSLAST(gspt5<0)),1,IF(FILTERX(gspt21,BARSCOUNT(CLOSE)),2,DRAWNULL));
gspt34:=gspt33=1 OR gspt33=2 AND gspt5>0;
gspt35:=FILTERX(gspt34,BARSCOUNT(CLOSE));
gspt36:=DRAWLINE(gspt35,gspt5,REF(gspt35,1),REF(gspt5,1),1);
NOTEXT本高:gspt36,COLORWHITE;
gspt37:=CONST(REF(gspt5,BARSLAST(gspt35)));
gspt38:=gspt5>gspt37;
gspt39:=FILTERX(REFX(BARSLAST(gspt38),1)=1,BARSCOUNT(CLOSE));
NOTEXT天数:BARSLAST(gspt39),NODRAW,COLORYELLOW;
NOTEXT上横线:DRAWLINE(gspt39,gspt37,gspt35,gspt37,0),DOTLINE,COLORGREEN;
NOTEXT下横线:DRAWLINE(gspt29,CONST(LLV(gspt5,gspt25+1)),gspt27=1,gspt5,0),DOTLINE,COLORYELLOW;
PJJ:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4),0.9);
JJ:=REF(EMA(PJJ,3),1);
QJJ:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));
XVL:=(IF((CLOSE > OPEN),(QJJ * (HIGH - LOW)),IF((CLOSE < OPEN),(QJJ * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2))) + IF((CLOSE > OPEN),(0 - (QJJ * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (QJJ * (HIGH - LOW))),(0 - (VOL / 2)))));
ZLL:=(VOL / CAPITAL);
HSL1:=IF((ZLL > 10),10,ZLL);
HSL:=((XVL / 20) / 1.15);
攻击流量:(((HSL * 0.55) + (REF(HSL,1) * 0.33)) + (REF(HSL,2) * 0.22));
GJJ:=EMA(攻击流量,8);
LLJX:=EMA(攻击流量,3);
STICKLINE(((HSL * 0.4) >= 0),((HSL * 0.4) +LLJX),0,3,0),COLOR00A4A4;
STICKLINE(((HSL * 0.4) >= 0),((HSL * 0.4) +LLJX),0,2,0),COLOR00FFFF;
STICKLINE(((HSL * 0.4) < 0),((HSL * 0.4) +LLJX),0,3,0),COLOR808040;
STICKLINE(((HSL * 0.4) < 0),((HSL * 0.4) +LLJX),0,2,0),COLOR00FF00;
资金流入:=IF((HSL*0.4+LLJX)>0,(HSL*0.4+LLJX),DRAWNULL),COLORRED;
资金流出:=IF((HSL*0.4+LLJX)<0,(HSL*0.4+LLJX),DRAWNULL),COLOR00FF00;
资金进出:=(HSL*0.4+LLJX),LINETHICK0;
万元:=AMOUNT/10000{0000},VOLSTICK,COLORFF00FF;
资金净进出:IF((HSL*0.4+LLJX)>0,资金流入,资金流出),COLORWHITE;
进出比例%:IF((HSL*0.4+LLJX)>0,资金流入/万元*100,资金流出/万元*100),COLORYELLOW;
资金流量:=LLJX,LINETHICK0,COLOR0000FF;
STICKLINE((资金流量 > 0),资金流量,0,3,0),COLOR000073;
STICKLINE((资金流量 > 0),资金流量,0,2,0),COLOR0000FF;
STICKLINE((资金流量 < 0),资金流量,0,3,0),COLOR6A3500;
STICKLINE((资金流量 < 0),资金流量,0,2,0),COLORFF3300;
黄柱初出蓝:=REF(资金流出,1)<0 AND 资金流入>30 AND C>O AND C>REF(C,1) AND C>MA(C,3);
X:=(3*C+2*L+O+H)/7;
多空线:=(20*X+19*REF(X,1)+18*REF(X,2)+17*REF(X,3)+16*REF(X,4)+15*REF(X,5)+14*REF(X,6)
+13*REF(X,7)+12*REF(X,8)+11*REF(X,9)+10*REF(X,10)+9*REF(X,11)+8*REF(X,12)
+7*REF(X,13)+6*REF(X,14)+5*REF(X,15)+4*REF(X,16)+3*REF(X,17)+2*REF(X,18)+REF(X,20))/210;
多姐:= 资金流入>300 AND CROSS(C,多空线);
DRAWTEXT(黄柱初出蓝,-30,'★'),COLORFF00FF;
DRAWTEXT(多姐 ,((HSL * 0.4) * 1.5)*1.4 ,'★'),COLORRED;
 |
主力资金监控（通达信公式 副图 源码 测试图）
- 软件大小：0 Bytes
- 推荐星级：
- 更新时间：2025-07-14 00:11:26
- 软件类别： 国产软件 / 通达信公式
- 软件语言：简体中文
- 授权方式： 免费版
- 联系方式：暂无联系方式
- 官方主页： Home Page
- 点击大图： 【一键转帖到论坛】
- 插件情况：
- 运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
- 相关Tags：指标公式 股票软件,公式源码
-
(0)0%(0)0%
评论内容只代表网友观点，与本站立场无关！
评论摘要(共 0 条，得分 0 分，平均 0 分)
查看完整评论
* 使用方法：点击上面蓝色块，打开新页面按照提示进行
* 本网站提供的各种股票软件，例如大智慧软件，通达信软件，同花顺软件，东方财富通等等，和各种股票公式指标，例如大智慧公式，通达信公式，同花顺公式，文华公式，博易大师公式，股票价格计算公式等等公式指标等，都来源网上公开来源收集
本网提供的公式文件说明：
* alg格式飞狐股票公式，可以用飞狐交易师或者交易师软件导入；
* fnc格式大智慧新一代公式指标，可以用大智慧股票软件使用，少部分可以用分析家股票软件引入使用；
* exp格式大智慧经典版股票公式，仅可以用大智慧经典版股票软件引入使用；
* tni和tnc格式通达信股票公式，仅可以用通达信新引入使用，例如可以用通达信股票软件引入使用；
* tne，tn6格式通达信公式，可以用通达信公式编辑器5.0版导入，推荐通达信金融终端版本；
* hxf格式同花顺股票公式，仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式，交易师公式或者飞狐公式的时候，发现公式名称栏是空白的，这时候调整电脑时间到1997年，又能出现公式名称，并且能正常显示，可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式，通达信公式，同花顺公式,操盘手公式,飞狐公式，博易大师公式，金字塔公式，文华公式和交易师公式等等公式的密码，本网可帮恢复源码，有.偿.服.务无意勿扰，点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码，一般都可以编辑成公式，如果不明白公式的编辑，在本页右侧教程录像可参考，或者找公式教程资料学习，请搜索：教程
* 如果您发现软件内容或者链接错误，请点击报告错误谢谢！
* 站内提供的所有软件包含源码均是由网上搜集，若侵犯了你的版权利益，请联系通知我们!