分时辅助看盘指标-资金MACD是我以前编用的,今早在地主会里发出,为使大家都分享,特在此发贴。分时主图在飞狐里的设置很简单,点右键点公式编辑,勾主图叠加,进入分时图,双击此指标就在分时图里显示了。分时图会因买卖的意愿变换背景颜色, 源码如下: N=403 (N 403 1 1000) 买卖意愿:=(SUM(BUYVOL,0)-SUM(SELLVOL,0))/DYNAINFO(8)*100; DRAWGBK(买卖意愿>0,COLORRGB(25,15,0),COLORRGB(10,160,0),0); DRAWGBK(买卖意愿<=0,COLORRGB(20,10,0) ,COLORRGB(50,90,50),0); a1:="macd.diff"; a2:="macd.dea"; a3:="macd.macd"; rc:=DYNAINFO( 3); s2:=sma(c,2,1); s6:=sma(c,6,1); dk:=2*(s2-s6); STICKLINE(dk>0,rc,rc+dk,0,1),COLORRED; STICKLINE(dk<0,rc,rc+dk,0,1),COLORCYAN; HS:=VOL/SUM(VOL,BARSCOUNT(C)); FBMAX:dma(c,hs),linethick2,COLORgreen; LC:=REF(CLOSE,1); RSI1:=((SMA(MAX((CLOSE - LC),0),14,1) / SMA(ABS((CLOSE - LC)),14,1)) * 100); DD:=BARSLAST(CROSS(RSI1,50)); SS:=BARSLAST(CROSS(50,RSI1)); HH1:=REF(HIGH,DD); HH2:=REF(HIGH,(DD - 1)); LL1:=REF(LOW,SS); LL2:=REF(LOW,(SS - 1)); 压力线:=MAX(HH1,HH2),LINETHICK2,color0000; 支撑线:=MIN(LL1,LL2),LINETHICK2,colorFF0000; A:=REF(HHV(HIGH,240),1); AA:=A[DATACOUNT]; B:=REF(LLV(LOW,240),1); BB:=B[DATACOUNT]; ZJ1:=(((HIGH + LOW) + (2 * CLOSE)) / 4); ZJ2:=(((ZJ1 - EMA(ZJ1,21)) / STD(ZJ1,21)) * 100); ZJ3:=EMA(ZJ2,5); ZJ4:=EMA(ZJ3,2); ZJ5:=EMA(ZJ4,2); ZJ6:=(((3 * ZJ4) - (2 * ZJ5)) / 2); IF((ZJ6 > 90),(AA * 0.995),AA),LINETHICK2,colorAAEE33; IF((ZJ6 < (0 - 95)),(BB * 1.005),BB),LINETHICK2,colorDD66AA; {技术指标} Var41:=IF(DYNAINFO( 7)<REF(ASKPRICE(1),1) AND REF(BIDVOL(1),1)>0 AND REF(ASKVOL(1),1)>0,BUYVOL,0); Var42:=IF((BUYVOL>REF(ASKVOL(1),1) AND DYNAINFO( 7)=REF(ASKPRICE(1),1) AND REF(BIDVOL(1),1)>0),BUYVOL,0); Var42a:=IF(Var42>0,Var42-REF(ASKVOL(1),1),0); Var4b:=Var41+Var42a; Var51:=IF(BUYVOL>REF(ASKVOL(1),1) AND DYNAINFO( 7)>REF(ASKPRICE(1),1) AND DYNAINFO( 7)<REF(ASKPRICE(2),1),BUYVOL,0); Var52:=IF(BUYVOL>(REF(ASKVOL(1),1)+REF(ASKVOL(2),1)) AND DYNAINFO( 7)=REF(ASKPRICE(2),1) AND REF(BIDVOL(1),1)>0,BUYVOL,0); Var52a:=IF(Var52>0,Var52-(REF(ASKVOL(1),1)+REF(ASKVOL(2),1)),0); Var5b:=Var51+Var52a; Var61:=IF(BUYVOL>REF(ASKVOL(1),1)+REF(ASKVOL(2),1) AND DYNAINFO( 7)>REF(ASKPRICE(2),1) AND DYNAINFO( 7)<REF(ASKPRICE(3),1),BUYVOL,0); Var62:=IF(BUYVOL>(REF(ASKVOL(1),1)+REF(ASKVOL(2),1)+REF(ASKVOL(3),1)) AND DYNAINFO( 7)=REF(ASKPRICE(3),1) AND REF(BIDVOL(1),1)>0,BUYVOL,0); Var62a:=IF( Var62>0,Var62-(REF(ASKVOL(1),1)+REF(ASKVOL(2),1)+REF(ASKVOL(3),1)),0); Var6b:=Var61+Var62a; VarA2:=IF(SELLVOL>REF(BIDVOL(1),1) AND DYNAINFO( 7)=REF(BIDPRICE(1),1) AND REF(ASKVOL(1),1)>0,SELLVOL,0); VarAa:=IF(VarA2>0,SELLVOL-REF(BIDVOL(1),1),0); VarB1:=IF(SELLVOL>REF(BIDVOL(1),1) AND DYNAINFO( 7)<REF(BIDPRICE(1),1) AND DYNAINFO( 7)>REF(BIDPRICE(2),1),SELLVOL,0); VarB2:=IF(SELLVOL>(REF(BIDVOL(1),1)+REF(BIDVOL(2),1)) AND DYNAINFO( 7)=REF(BIDPRICE(2),1) AND REF(ASKVOL(1),1)>0,SELLVOL,0); VarBa:=if(VarB2>0,SELLVOL-(REF(BIDVOL(1),1)+REF(BIDVOL(2),1)),0); VarAb:=VarB1+VarBa;{技术指标} VarC1:=IF(SELLVOL>REF(BIDVOL(1),1)+REF(BIDVOL(2),1) AND DYNAINFO( 7)<REF(BIDPRICE(2),1) AND DYNAINFO( 7)>REF(BIDPRICE(3),1),SELLVOL,0); VarC2:=IF(SELLVOL>(REF(BIDVOL(1),1)+REF(BIDVOL(2),1)+REF(BIDVOL(3),1)) AND DYNAINFO( 7)=REF(BIDPRICE(3),1) AND REF(ASKVOL(1),1)>0,SELLVOL,0); VarCa:=if(VarC2>0,SELLVOL-(REF(BIDVOL(1),1)+REF(BIDVOL(2),1)+REF(BIDVOL(3),1)),0); VarAc:=VarC1+VarCa;{技术指标} VarF:=IF(ASKVOL(1)<REF(ASKVOL(1),1) AND ASKPRICE(1)=REF(ASKPRICE(1),1) AND DYNAINFO( 7)<REF(ASKPRICE(1),1) AND (REF(ASKVOL(1),1)-ASKVOL(1))<>SELLVOL,REF(ASKVOL(1),1)-ASKVOL(1),0); Var10:=IF(ASKVOL(3)<REF(ASKVOL(3),1) AND ASKPRICE(3)=REF(ASKPRICE(3),1) AND DYNAINFO( 7)<REF(ASKPRICE(3),1),REF(ASKVOL(3),1)-ASKVOL(3),0); Var11:=IF((REF(BIDVOL(1),1)+REF(BIDVOL(2),1)+REF(BIDVOL(3),1))=0 AND REF(ASKVOL(1),1)>0 AND (REF(ASKVOL(1),1)-ASKVOL(1))<SELLVOL AND ASKVOL(1)<REF(ASKVOL(1),1) AND ASKPRICE(1)=REF(ASKPRICE(1),1) AND DYNAINFO( 7)<REF(ASKPRICE(1),1),REF(ASKVOL(1),1)-ASKVOL(1),0); Var12:=IF(ASKVOL(2)<REF(ASKVOL(3),1) AND ASKPRICE(2)=REF(ASKPRICE(3),1) AND DYNAINFO( 7)<REF(ASKPRICE(3),1),REF(ASKVOL(3),1)-ASKVOL(2),0); Var13:=IF(ASKVOL(3)<REF(ASKVOL(2),1) AND ASKPRICE(3)=REF(ASKPRICE(2),1) AND DYNAINFO( 7)<REF(ASKPRICE(2),1),REF(ASKVOL(2),1)-ASKVOL(3),0); Var14:=IF(BIDVOL(1)<REF(BIDVOL(1),1) AND BIDPRICE(1)=REF(BIDPRICE(1),1) AND DYNAINFO( 7)>REF(BIDPRICE(1),1) AND REF(BIDVOL(1),1)-BIDVOL(1)<>BUYVOL,REF(BIDVOL(1),1)-BIDVOL(1),0); Var15:=IF(BIDVOL(3)<REF(BIDVOL(3),1) AND BIDPRICE(3)=REF(BIDPRICE(3),1) AND DYNAINFO( 7)>REF(BIDPRICE(3),1),REF(BIDVOL(3),1)-BIDVOL(3),0); Var16:=IF(REF(ASKVOL(1),1)+REF(ASKVOL(2),1)+REF(ASKVOL(3),1)=0 AND REF(BIDVOL(1),1)>0 AND REF(BIDVOL(1),1)-BIDVOL(1)<BUYVOL AND BIDVOL(1)<REF(BIDVOL(1),1) AND BIDPRICE(1)=REF(BIDPRICE(1),1) AND DYNAINFO( 7)=REF(BIDPRICE(1),1),REF(BIDVOL(1),1)-BIDVOL(1),0); Var17:=IF(BIDVOL(2)<REF(BIDVOL(3),1) AND BIDPRICE(2)=REF(BIDPRICE(3),1) AND DYNAINFO( 7)>REF(BIDPRICE(3),1),REF(BIDVOL(3),1)-BIDVOL(2),0); {技术指标} Var18:=IF(BIDVOL(3)<REF(BIDVOL(2),1) AND BIDPRICE(3)=REF(BIDPRICE(2),1) AND DYNAINFO( 7)>REF(BIDPRICE(2),1),REF(BIDVOL(2),1)-BIDVOL(3),0); 委买:=BIDVOL(1)+BIDVOL(2)+BIDVOL(3); 委卖:=ASKVOL(1)+ASKVOL(2)+ASKVOL(3); 委买总量:=SUM(委买,0); 委卖总量:=SUM(委卖,0); www1:=SUM(BUYVOL,0)-SUM(SELLVOL,0); 买卖存量:=REF(www1,1)+www1; 总成交:=DYNAINFO(8)*100; 流通:=FINANCE(7)/10000; 市值:=DYNAINFO(7)*FINANCE(7)/10000; 老杨1:=1.0; 老杨2:=1.25; 老杨3:=1.55; 老杨4:=1.85; 老杨5:=2.0; 老杨6:=2.15; 老杨7:=2.45; 老杨8:=2.75;{技术指标} 系数:=IF(流通<1.0,老杨1,IF(流通>=1.0 AND 流通<5.0,老杨2,IF(流通>=5.0 AND 流通<10,老杨3,IF(流通>=10 AND 流通<20,老杨4,IF(流通>=20 AND 流通<50,老杨5,IF(流通>=50 AND 流通<100,老杨6,IF(流通>=100 AND 流通<300,老杨7,IF(流通>=300,老杨8,0)))))))); 门限:=(CAPITAL*系数)/3000; 特门限:=门限*3.35; XS:=门限; 特大买:=IF(BUYVOL>=特门限,BUYVOL,0); 特大卖:=IF(SELLVOL>=特门限,SELLVOL,0); 大单买:=IF((BUYVOL>=门限 and BUYVOL<特门限),BUYVOL,0); 大单卖:=IF((SELLVOL>=门限 and SELLVOL<特门限),SELLVOL,0); 小单买:=IF(BUYVOL<门限,BUYVOL,0); 小单卖:=IF(SELLVOL<门限,SELLVOL,0); 特大买入:=SUM(特大买,0); 特大卖出:=SUM(特大卖,0); 大单买入:=SUM(大单买,0);{技术指标} 大单卖出:=SUM(大单卖,0); 小单买入:=SUM(小单买,0); 小单卖出:=SUM(小单卖,0); 特买金:=SUM(IF(BUYVOL>=特门限,BUYVOL,0)*c,0); 特卖金:=SUM(IF(SELLVOL>=特门限,SELLVOL,0)*c,0); 大买金:=SUM(IF((BUYVOL>=门限 and BUYVOL<特门限),BUYVOL,0)*c,0); 大卖金:=SUM(IF((SELLVOL>门限 and SELLVOL<特门限),SELLVOL,0)*c,0); 小买金:=SUM(IF(BUYVOL<门限,BUYVOL,0)*c,0); 小卖金:=SUM(IF(SELLVOL<门限,SELLVOL,0)*c,0); 特买均价:=特买金/特大买入; 特卖均价:=特卖金/特大卖出; 大单买均价:=大买金/大单买入; 大单卖均价:=大卖金/大单卖出; 小单买均价:=小买金/小单买入; 小单卖均价:=小卖金/小单卖出; 大单净量:=大单买入-大单卖出;{技术指标} 总成交:=(特大买入+特大卖出+大单买入+大单卖出+小单买入+小单卖出); 大单标准:=门限*100/10000; 特单标准:=特门限*100/10000; 千钧剑:=大单净量/CAPITAL; 资金大单进量:=特大买入+大单买入; |
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!