超B:=L2_AMO(0,2)/10000.0; 大B:=L2_AMO(1,2)/10000.0; 中B:=L2_AMO(2,2)/10000.0; 小B:=L2_AMO(3,2)/10000.0; 超S:=L2_AMO(0,3)/10000.0; 大S:=L2_AMO(1,3)/10000.0; 中S:=L2_AMO(2,3)/10000.0; 小S:=L2_AMO(3,3)/10000.0; TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0); 净流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S); 超大单:=(超B)-(超S); 大单:=(大B)-(大S); 中单:=(中B)-(中S); 小单:=(小B)-(小S); DAZHI:=CONST(MAX(ABS(净流入),MAX(ABS(超大单),MAX(ABS(大单),MAX(ABS(中单),ABS(小单)))))),NODRAW; 近3净入:=SUM(净流入,3); 近3超:=SUM(超大单,3); 近3大:=SUM(大单,3); 近3中:=SUM(中单,3); 近3小:=SUM(小单,3); 近5净入:=SUM(净流入,5); 近5超:=SUM(超大单,5); 近5大:=SUM(大单,5); 近5中:=SUM(中单,5),; 近5小:=SUM(小单,5); 近10净入:=SUM(净流入,10); 近10超:=SUM(超大单,10); 近10大:=SUM(大单,10); 近10中:=SUM(中单,10),; 近10小:=SUM(小单,10); 流入:=ABS(超B+大B+中B+小B)*1000/VOL; 流出:=ABS(超S+大S+中S+小S)*1000/VOL; 近3流入:=ABS(SUM(超B,3)+SUM(大B,3)+SUM(中B,3)+SUM(小B,3))*1000/VOL; 近3流出:=ABS(SUM(超S,3)+SUM(大S,3)+SUM(中S,3)+SUM(小S,3))*1000/VOL; 近5流入:=ABS(SUM(超B,5)+SUM(大B,5)+SUM(中B,5)+SUM(小B,5))*1000/VOL; 近5流出:=ABS(SUM(超S,5)+SUM(大S,5)+SUM(中S,5)+SUM(小S,5))*1000/VOL; 近10流入:=ABS(SUM(超B,10)+SUM(大B,10)+SUM(中B,10)+SUM(小B,10))*1000/VOL; 近10流出:=ABS(SUM(超S,10)+SUM(大S,10)+SUM(中S,10)+SUM(小S,10))*1000/VOL; 净流买比:=流入*100/(流入+流出); 净流买比3:=近3流入*100/(近3流入+近3流出); 净流买比5:=近5流入*100/(近5流入+近5流出); 净流买比10:=近10流入*100/(近10流入+近10流出); AAS:=CONST(MAX(ABS(流入),ABS(流出)))*4,NODRAW; {当日} DRAWRECTREL(0,0,243,999.2,IF(120,RGB(10,0,0),0)); {DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0,0.001,0,'单位(万元)'),COLORDDDDDD;} DRAWRECTREL(10,ABS(CONST(880-(ABS(净流入)*50/DAZHI))),25,880,IF(CONST(净流入)>0,RGB(170,0,170),RGB(0,155,0))); DRAWRECTREL(48,ABS(CONST(880-(ABS(超大单)*50/DAZHI))),80,880,IF(CONST(超大单)>0,RGB(240,130,140),RGB(23,125,255))); DRAWRECTREL(96,ABS(CONST(880-(ABS(大单)*50/DAZHI))),128,880,IF(CONST(大单)>0,RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(144,ABS(CONST(880-(ABS(中单)*50/DAZHI))),176,880,IF(CONST(中单)>0,RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(192,ABS(CONST(880-(ABS(小单)*50/DAZHI))),224,880,IF(CONST(小单)>0,RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(30,205,190,145,RGB(0,140,0)); DRAWRECTREL(30,195,190,155,RGB(0,160,0)); DRAWRECTREL(30,185,190,165,RGB(0,180,0)); DRAWRECTREL(30,175,190,175,RGB(0,210,0)); DRAWRECTREL(30,205,30+CONST(净流买比*160/100),145,RGB(140,0,0)); DRAWRECTREL(30,195,30+CONST(净流买比*160/100),155,RGB(160,0,0)); DRAWRECTREL(30,185,30+CONST(净流买比*160/100),165,RGB(180,0,0)); DRAWRECTREL(30,175,30+CONST(净流买比*160/100),175,RGB(210,0,0)); DRAWTEXT_FIX(1,0.05,0.01,0,STRCAT(STRCAT('净流买比',CON2STR(净流买比,2)),'%')),COLORYELLOW; DRAWRECTREL(110,205,110,145,RGB(250,250,0)); DRAWTEXT_FIX(CURRBARSCOUNT=1,0.2,0.001,0,'当日'),COLORFFFFFF; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.005,1,0,'净流'),COLORFFFFFF; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.050,1,0,'超大'),COLOR00FFFF; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.095,1,0,'大单'),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.145,1,0,'中单'),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.192,1,0,'小单'),COLORGREEN; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.005,0.79,0,CEILING(净流入)),COLORYELLOW; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.048,0.71,0,CEILING(超大单)),COLORYELLOW; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.096,0.63,0,CEILING(大单)),COLORYELLOW; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.148,0.55,0,CEILING(中单)),COLORYELLOW; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.192,0.47,0,CEILING(小单)),COLORYELLOW; {3日} DRAWRECTREL(243,0,505,999.2,IF(120,RGB(10,0,0),0)); DRAWRECTREL(260,ABS(CONST(880-(ABS(近3净入)*35/DAZHI))),275,880,IF(CONST(近3净入)>0,RGB(180,0,180),RGB(000,155,000))); DRAWRECTREL(301,ABS(CONST(880-(ABS(近3超)*35/DAZHI))),333,880,IF(CONST(近3超)>0,RGB(240,130,140),RGB(23,125,255))); DRAWRECTREL(349,ABS(CONST(880-(ABS(近3大)*35/DAZHI))),381,880,IF(CONST(近3大)>0,RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(397,ABS(CONST(880-(ABS(近3中)*35/DAZHI))),429,880,IF(CONST(近3中)>0,RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(445,ABS(CONST(880-(ABS(近3小)*35/DAZHI))),477,880,IF(CONST(近3小)>0,RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(280,205,440,145,RGB(0,155,0)); DRAWRECTREL(280,205,280+CONST(净流买比3*160/100),145,RGB(160,0,0)); DRAWTEXT_FIX(1,0.3,0.01,0,STRCAT(STRCAT('净流买比',CON2STR(净流买比3,2)),'%')),COLORYELLOW; DRAWRECTREL(360,205,360,145,RGB(250,250,0)); DRAWTEXT_FIX(CURRBARSCOUNT=1,0.460,0.001,0,'3日'),COLORFFFFFF; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.260,1,0,'净流'),COLORFFFFFF; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.305,1,0,'超大'),COLOR00FFFF; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.353,1,0,'大单'),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.400,1,0,'中单'),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.447,1,0,'小单'),COLORGREEN; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.260,0.790,0,CEILING(近3净入)),COLORYELLOW; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.301,0.710,0,CEILING(近3超)),COLORYELLOW; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.349,0.630,0,CEILING(近3大)),COLORYELLOW; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.397,0.550,0,CEILING(近3中)),COLORYELLOW; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.445,0.470,0,CEILING(近3小)),COLORYELLOW; {5日} DRAWRECTREL(500,0,750,999.3,IF(120,RGB(10,0,0),0)); DRAWTEXT_FIX(CURRBARSCOUNT=1,0.70,0.001,0,'5日'),COLORFFFFFF; DRAWRECTREL(520,ABS(CONST(880-(ABS(近5净入)*25/DAZHI))),535,880,IF(CONST(近5净入)>0,RGB(180,0,180),RGB(000,155,000))); DRAWRECTREL(565,ABS(CONST(880-(ABS(近5超)*25/DAZHI))),595,880,IF(CONST(近5超)>0,RGB(240,130,140),RGB(23,125,255))); DRAWRECTREL(613,ABS(CONST(880-(ABS(近5大)*25/DAZHI))),645,880,IF(CONST(近5大)>0,RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(661,ABS(CONST(880-(ABS(近5中)*25/DAZHI))),693,880,IF(CONST(近5中)>0,RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(709,ABS(CONST(880-(ABS(近5小)*25/DAZHI))),741,876,IF(CONST(近5小)>0,RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(530,205,690,145,RGB(0,155,0)); {DRAWRECTREL(530,195,690,155,RGB(0,175,0)); DRAWRECTREL(530,185,690,165,RGB(0,195,0)); DRAWRECTREL(530,175,690,175,RGB(0,225,0));} DRAWRECTREL(530,205,530+CONST(净流买比5*160/100),145,RGB(160,0,0)); {DRAWRECTREL(530,195,530+CONST(净流买比20*160/100),155,RGB(180,0,0)); DRAWRECTREL(530,185,530+CONST(净流买比20*160/100),165,RGB(200,0,0)); DRAWRECTREL(530,175,530+CONST(净流买比20*160/100),175,RGB(230,0,0));} DRAWTEXT_FIX(1,0.55,0.01,0,STRCAT(STRCAT('净流买比',CON2STR(净流买比5,2)),'%')),COLORYELLOW; DRAWRECTREL(610,205,610,145,RGB(250,250,0)); DRAWTEXT_FIX(CURRBARSCOUNT=1,0.520,1,0,'净流'),COLORFFFFFF; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.565,1,0,'超大'),COLOR00FFFF; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.618,1,0,'大单'),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.666,1,0,'中单'),COLORRED; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.710,1,0,'小单'),COLORGREEN; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.520,0.79,0,CEILING(近5净入)),COLORYELLOW; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.565,0.71,0,CEILING(近5超)),COLORYELLOW; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.613,0.63,0,CEILING(近5大)),COLORYELLOW; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.661,0.55,0,CEILING(近5中)),COLORYELLOW; DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.709,0.470,0,CEILING(近5小)),COLORYELLOW; {10日} DRAWRECTREL(750,0,1001,999.3,IF(120,RGB(10,0,0),0)); DRAWTEXT_FIX(CURRBARSCOUNT=1,0.95,0.001,0,'10日'),COLORFFFFFF; DRAWRECTREL(770,ABS(CONST(880-(ABS(近10净入)*25/DAZHI))),785,880,IF(CONST(近10净入)>0,RGB(180,0,180),RGB(000,155,000))); DRAWRECTREL(815,ABS(CONST(880-(ABS(近10超)*25/DAZHI))),845,880,IF(CONST(近10超)>0,RGB(240,130,140),RGB(23,125,255))); DRAWRECTREL(863,ABS(CONST(880-(ABS(近10大)*25/DAZHI))),895,880,IF(CONST(近10大)>0,RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(911,ABS(CONST(880-(ABS(近10中)*25/DAZHI))),943,880,IF(CONST(近10中)>0,RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(959,ABS(CONST(880-(ABS(近10小)*25/DAZHI))),991,876,IF(CONST(近10小)>0,RGB(255,0,0),RGB(23,125,255))); DRAWRECTREL(800,205,960,145,RGB(0,155,0)); |
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!