INPUT:X(2008,1990,2020); 换手率:IF(CAPITAL=0,INDEXV/ESTDATA(12),VOL/FINANCE(7)),PRECISION2,LINETHICK0; variable:wday[7]='星期六';wday[1]:='星期日';wday[2]:='星期一'; wday[3]:='星期二';wday[4]:='星期三';wday[5]:='星期四';wday[6]:='星期五'; fy:=YEAR;fm:=MONTH;fd:=DAY;wd:=WEEKDAY;p:=SYSPARAM(1);BB:=BARPOS; str1:=''+NUMTOSTR(fy[p],0)+'年'+NUMTOSTR(fm[p],0)+'月'+NUMTOSTR(fd[p],0)+'日 '+wday[wd[p]+1]; SJ:=OPENMINUTES(CURRENTTIME)>1 and OPENMINUTES(CURRENTTIME)<239; qj0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);jj:=(HIGH+LOW+CLOSE)/3; 特大:IF(CAPITAL=0,qj0*(jj-MIN(CLOSE,OPEN)),qj0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW))),PRECISION0,COLOR0000FF,LINETHICK; 大户:IF(CAPITAL=0,qj0*(MIN(OPEN,CLOSE)-LOW),qj0*IF(HIGH=LOW,1,(jj-MIN(CLOSE,OPEN)))),PRECISION0,COLORFF00FF,LINETHICK; 中户:IF(CAPITAL=0,qj0*(HIGH-MAX(OPEN,CLOSE)),qj0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE)))),PRECISION0,COLOR00FF00,LINETHICK; 散户:IF(CAPITAL=0,qj0*(MAX(CLOSE,OPEN)-jj),qj0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-jj))),PRECISION0,COLORFF6600,LINETHICK; 总1:=(特大+大户)-(中户+散户);总:=vol; ww:=SYSPARAM(2);n1:=SYSPARAM(3);nn:=n1-ww+1;hh:=HHV(总,nn);ll:=LLV(总,nn); ZG:=hh[n1];ZD:=ll[n1];中0:=ZD+(ZG-ZD)*0.5;中:=中0*0.05;CM:=SUM(总1,25); ZJ:=REF(总1,1);ZSB:=(总1-REF(总1,1))/总*100; ZSA:=cm/IF(STKTYPE=0,SUM(VOL,25),IF(STKTYPE=13,SUM(VOL,10),CAPITAL)); cc:=REF(CLOSE,BARSLAST(fm>REF(fm,1)));主力成本:=(cc*(特大+大户)*100)/(特大+大户)/100; DF1:=EMA(CLOSE,12)-EMA(CLOSE,26);DA1:=EMA(DF1,9); qj6:=df1>da1 and da1<0;qj7:="kdj.k">"kdj.d" and "kdj.d"<30; qj8:=df1<da1;qj9:="kdj.k"<"kdj.d" and "kdj.k">80; w1:=SUM(大户,5)+SUM(特大,5);w2:=SUM(散户,5)+SUM(中户,5); 量振1:=特大>大户 and 大户>散户;量振2:=特大<散户 and 大户<散户; 标振1:=qj6 and qj7;标振2:=qj8 and qj9; a:=w1-w2;a0:=IF(a>0,a,0);b0:=IF(a<0,a,0); STICKLINE(总1<0,0,-总1+总/2,8,0),ColorFF4400;STICKLINE(总1<0,0,-总1+总/2,6,0),ColorFF8800; STICKLINE(总1<0,0,-总1+总/2,3,0),ColorFFaa00;STICKLINE(总1<0,0,-总1+总/2,1,0),ColorFFcc00; STICKLINE(总1>0,0,+总1+总/2,8,0),Color000044;STICKLINE(总1>0,0,+总1+总/2,6,0),Color000088; STICKLINE(总1>0,0,+总1+总/2,3,0),Color0000aa;STICKLINE(总1>0,0,+总1+总/2,1,0),Color0000cc; STICKLINE(a0,0,a0,8,0),Color000044;STICKLINE(a0,0,a0,5,0),Color000088; STICKLINE(a0,0,a0,3,0),Color0000aa;STICKLINE(a0,0,a0,1,0),Color0000cc; STICKLINE(b0,0,-b0,8,0),Color004400;STICKLINE(b0,0,-b0,5,0),Color008800; STICKLINE(b0,0,-b0,3,0),Color00aa00;STICKLINE(b0,0,-b0,1,0),Color00cc00; STICKLINE(BB=ww,中*0.2,中*9.2,(散户[P]/总*200)*1.02,1),COLORWHITE,LINETHICK2; STICKLINE(BB=ww,中*0.8,中*8.6,散户[P]/总*200,0),COLORFF8800; STICKLINE(BB=ww,中*10.2,中*19.2,(中户[P]/总*200)*1.02,1),COLORWHITE,LINETHICK2; STICKLINE(BB=ww,中*10.8,中*18.6,中户[P]/总*200,0),COLORFF00FF; STICKLINE(BB=ww,中*20.2,中*29.2,(大户[P]/总*200)*1.02,1),COLORWHITE,LINETHICK2; STICKLINE(BB=ww,中*20.8,中*28.6,大户[P]/总*200,0),COLOR0088FF; STICKLINE(BB=ww,中*30.2,中*39.2,(特大[P]/总*200)*1.02,1),COLORWHITE,LINETHICK2; STICKLINE(BB=ww,中*30.8,中*38.6,特大[P]/总*200,0),COLOR0000FF; STICKLINE(BB=ww-28,中*-0.2,中*40,500,0),COLOR000000; DRAWTEXTEX(CLOSE,1,420,0,str1),ColorffFF00; DRAWTEXTEX(CLOSE,1,200,0,STKLABEL+' '+STKNAME+''),ColorffFF00; DRAWTEXT(BB=ww,中*36,'特大:'+NUMTOSTR(特大[P]/总*100,2)+' %'),COLOR00FF00; DRAWTEXT(BB=ww,中*26,'大户:'+NUMTOSTR(大户[P]/总*100,2)+' %'),COLOR00FF00; DRAWTEXT(BB=ww,中*16,'中户:'+NUMTOSTR(中户[P]/总*100,2)+' %'),COLOR00FF00; DRAWTEXT(BB=ww,中*6,'散户:'+NUMTOSTR(散户[P]/总*100,2)+' %'),COLOR00FF00; 周趋势:MA(a0,5),ColorFF00FF,PRECISION0; 平滑值:WMA(周趋势,5),Color00FF00,PRECISION0; 买:量振1 and 标振1 and 周趋势>平滑值,Color0000FF,LINETHICK; 卖:量振2 and 标振2 and 周趋势<平滑值,Color00FF00,LINETHICK; DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26); DEA:=EMA(DIFF,9); MACD1:=2*(DIFF-DEA); CS1:=100; CS2:=HHV(ABS(MACD1),CS1); CS3:=ABS(100/CS2); MACD:(MACD1*CS3+100)/2,LINETHICK5,color00FF00; CS:=MACD; 日红:=CS>=REF(CS,1); 日转红:=日红 AND REF(日红,1)=0; PARTLINE(日红,CS),LINETHICK5,colorred; AA:=0; V1:=LLV(LOW,10); V2:=HHV(HIGH,25); 价位线:=EMA((CLOSE-V1)/(V2-V1)*4,4); DRAWTEXT(CROSS(价位线,0.3),AA,'买'),color0000FF; DRAWTEXT(CROSS(3.7,价位线),AA,'卖'),colorFF00; VERTLINE(CROSS(价位线,0.3)),color0000FF,LINEDASHDOT; VERTLINE(CROSS(3.7,价位线)),colorFF00,LINEDASHDOT; DRAWTEXTEX(CLOSE,1,200,130,'主力成本:'+NUMTOSTR(主力成本[p],2)),COLOR00FF00; DRAWTEXTEX(CLOSE,1,420,130,'主力筹码占流通:'+NUMTOSTR(IF(ZSA>0,ZSA[P]*100,0),2)+' %'),COLOR00FF00; DRAWTEXTEX(CLOSE,1,720,130,'较昨日增减:'+NUMTOSTR(ZSB[P],2)+' %'),COLOR00FF00; DRAWTEXTEX(c and 总1[P]<0,1,720,0,'散户主买 主力主卖'),COLORffee00; DRAWTEXTEX(c and 总1[P]>0,1,720,0,'主力主买 散户主卖'),COLOR0000ff; DRAWTEXTEX(c and 总1[P]>0,1,560,0,'金盾'),COLOR0000ff; 周仓:=SUM(总1,5);月仓:=SUM(总1,25);年仓:=SUM(总1,240);上周:=REF(周仓,1);上月:=REF(月仓,1); 上年:=REF(年仓,BARSLAST(fy=X));周增:=周仓-上周;月增:=月仓-上月;年增:=年仓-上年; EXPLAIN(1,'==================================='),colorwhite; EXPLAIN(1,'今日增减:'+NUMTOSTR((总1[p]*100)/10000,2)+' 万股'),COLOrffff00; EXPLAIN(1,'昨日增减:'+NUMTOSTR(zj[p]*100/10000,2)+' 万股'),ColorFF8B00; EXPLAIN(1,'==================================='),colorwhite; EXPLAIN(1,'周仓:'+NUMTOSTR(周仓[p]*100/10000,2)+' 万股'),COLORred; EXPLAIN(1,'上周:'+NUMTOSTR(上周[p]*100/10000,2)+' 万股'),COLORred; EXPLAIN(1,'增减:'+NUMTOSTR(周增[p]*100/10000,2)+' 万股'),COLORred; EXPLAIN(1,'==================================='),colorwhite; EXPLAIN(1,'月仓:'+NUMTOSTR(月仓[p]*100/10000,2)+' 万股'),COLORFF00FF; EXPLAIN(1,'上月:'+NUMTOSTR(上月[p]*100/10000,2)+' 万股'),COLORFF00FF; EXPLAIN(1,'增减:'+NUMTOSTR(月增[p]*100/10000,2)+' 万股'),COLORFF00FF; EXPLAIN(1,'==================================='),colorwhite; EXPLAIN(1,'年仓:'+NUMTOSTR(年仓[p]*100/10000,2)+' 万股'),COLOR00EE00; EXPLAIN(1,'上年:'+NUMTOSTR(上年[p]*100/10000,2)+' 万股'),COLOR00EE00; EXPLAIN(1,'增减:'+NUMTOSTR(年增[p]*100/10000,2)+' 万股'),COLOR00EE00; EXPLAIN(1,'==================================='),colorwhite; |
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!