分笔看盘资金进出情况尽收眼底,源码奉送
a1:=BARSCOUNT(CLOSE); DRAWTEXTREL(50,10,'资金净流'),linethick2,colorYellow; DRAWTEXTREL(200,10,' 代码: '+STKLABEL+' '+STKNAME+' 日期: '+YEAR+'年'+MONTH+'月 '+DAY+'日 '),linethick2,ColorFFFF80; a2:=DATE; a3:=(WEEKDAY); if (((BARSTATUS = 2) AND (a3 = 5)) ) Then DRAWTEXTREL(800,10,'星期五'),linethick2,ColorFFEF40; if (((BARSTATUS = 2) AND (a3 = 4)) ) Then DRAWTEXTREL(800,10,'星期四'),linethick2,ColorFFEF40; if (((BARSTATUS = 2) AND (a3 = 3)) ) Then DRAWTEXTREL(800,10,'星期三'),linethick2,ColorFFEF40; if (((BARSTATUS = 2) AND (a3 = 2)) ) Then DRAWTEXTREL(800,10,'星期二'),linethick2,ColorFFEF40; if (((BARSTATUS = 2) AND (a3 = 1)) ) Then DRAWTEXTREL(800,10,'星期一'),linethick2,ColorFFEF40; if (((BARSTATUS = 2) AND (a3 = 6)) ) Then DRAWTEXTREL(800,10,'星期六'),linethick2,ColorFFEF40; if (((BARSTATUS = 2) AND (a3 = 0)) ) Then DRAWTEXTREL(800,10,'星期日'),linethick2,ColorFFEF40; a4:=(BUYVOL * CLOSE) / 100;a5:=SUM(a4,0); a6:=(CLOSE * SELLVOL) / 100;a7:=SUM(a6,0); a8:=a5 + a7; a9:=a5 - a7; a10:=IF(((a4 < 20) AND (a4 >= 5)),a4,0);a11:=SUM(a10,0); a12:=IF(((a6 < 20) AND (a6 >= 5)),a6,0);a13:=SUM(a12,0); a14:=IF(((a4 < 100) AND (a4 >= 20)),a4,0);a15:=SUM(a14,0); a16:=IF(((a6 < 100) AND (a6 >= 20)),a6,0);a17:=SUM(a16,0); a18:=IF((a4 >= 100),a4,0);a19:=SUM(a18,0); a20:=IF((a6 >= 100),a6,0);a21:=SUM(a20,0); a22:=IF((a4 >= 20),a4,0);a23:=SUM(a22,0); a24:=IF((a6 >= 20),a6,0);a25:=SUM(a24,0); a26:=a11 - a13; a27:=a15 - a17; a28:=a19 - a21; a29:=a23 - a25; a30:=(100 * ((SUM((IF((a4 >= 10),VOL,0)),0)) - (SUM((IF((a6 >= 10),VOL,0)),0)))) / CAPITAL; a31:=(100 * ((SUM((IF((a4 >= 20),VOL,0)),0)) - (SUM((IF((a6 >= 20),VOL,0)),0)))) / CAPITAL; a32:=(a26); a33:=(a27); a34:=(a28); a35:=(a29); a36:=350 / (MAX(ABS(a32),ABS(a33),ABS(a34),ABS(a35))); a37:=500 - (a32 * a36); a38:=500 - (a33 * a36); a39:=500 - (a34 * a36); a40:=500 - (a35 * a36); DRAWRECTREL(0,505,320,510,3289855),colorRed; DRAWRECTREL(50,a37,80,500,(IF((a32 >= 0),3289855,3342080))),colorYellow; DRAWRECTREL(130,a38,160,500,(IF((a33 >= 0),3289855,3342080))),colorYellow; DRAWRECTREL(210,a39,240,500,(IF((a34 >= 0),3289855,3342080))),colorYellow; DRAWRECTREL(290,a40,320,500,(IF((a35 >= 0),3289855,3342080))),colorYellow; DRAWTEXTREL(18,440,'中户'),ColorDDFFFF; DRAWTEXTREL(95,440,'大户'),ColorDDFFFF; DRAWTEXTREL(175,440,'机构'),ColorDDFFFF; DRAWTEXTREL(255,440,'主力'),ColorDDFFFF; a41:=(a11); a42:=(a13); a43:=(a15); a44:=(a17); a45:=(a19); a46:=(a21); a47:=(a23); a48:=(a25); a49:=700 / (MAX(a41,a42,a43,a44,a45,a46,a47,a48)); a50:=940 - (a41 * a49); a51:=940 - (a42 * a49); a52:=940 - (a43 * a49); a53:=940 - (a44 * a49); a54:=940 - (a45 * a49); a55:=940 - (a46 * a49); a56:=940 - (a47 * a49); a57:=940 - (a48 * a49); DRAWRECTREL(700,a50,720,940,250),colorYellow; DRAWRECTREL(720,a51,740,940,6617600),colorYellow; DRAWRECTREL(780,a52,800,940,250),colorYellow; DRAWRECTREL(800,a53,820,940,6617600),colorYellow; DRAWRECTREL(860,a54,880,940,250),colorYellow; DRAWRECTREL(880,a55,900,940,6617600),colorYellow; DRAWRECTREL(940,a56,960,940,250),colorYellow; DRAWRECTREL(960,a57,980,940,6617600),colorYellow; DRAWTEXTREL(2,930,'主力净流:'+NUMTOSTR(a29)+'万'+' 机构净流:'+NUMTOSTR(a28)+'万'+' 大户净流:'+NUMTOSTR(a27)+'万'+' 中户净流:'+NUMTOSTR(a26)+'万'),colorWhite; DRAWTEXTREL(2,820,'控盘系数:'+NUMTOSTR(a30)+'%'+' 主力增仓:'+NUMTOSTR(a31) +'%'),linethick2,colorYellow; DRAWTEXTREL(940,965,'主力'),ColorDDFFFF; DRAWTEXTREL(865,965,'机构'),ColorDDFFFF; DRAWTEXTREL(785,965,'大户'),ColorDDFFFF; DRAWTEXTREL(705,965,'中户'),ColorDDFFFF; DRAWGBK((CLOSE > 0),STRIP(RGB(4,1,28),RGB(4,1,35),0)); |
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!