{主力持仓}
{大智慧L2源码，需要DDE数据支持，定义好特买，特卖，大买，大卖。再导入网上下载的DDE相关数据即可}
基金买入:=SELFDATA('特买');
基金卖出:=SELFDATA('特卖');
T席买入:=SELFDATA('大买');
T席卖出:=SELFDATA('大卖');
基金买入1:=IF(基金买入<>ref(基金买入,1),基金买入,0);
基金卖出1:=IF(基金卖出<>ref(基金卖出,1),基金卖出,0);
T席买入1:=IF(T席买入<>ref(T席买入,1),T席买入,0);
T席卖出1:=IF(T席卖出<>ref(T席卖出,1),T席卖出,0);
vvv:=vol;
JJ:=(基金买入1-基金卖出1)*vvv;
TX:=(T席买入1-T席卖出1)*vvv;
QF:=(JJ+TX);
主力持仓:sum(QF,0);
主力买入:(基金买入+T席买入)*vvv,linethick0,COLORRED;
主力卖出:(基金卖出+T席卖出)*vvv,linethick0,COLORGREEN;
主力增减:=主力持仓-REF(主力持仓,1);
STICKLINE(主力增减<0,主力增减+主力持仓,主力持仓,0.8,1),COLORGREEN;
STICKLINE(主力增减>0,主力持仓,主力增减+主力持仓,0.8,1),COLORRED;
STR1:=''+'←(主力持仓) '+NUMTOSTR(主力持仓)+'\n'+' 比昨天'+NUMTOSTR(主力增减);
DRAWTEXT(BARSTATUS,主力持仓,STR1),COLORYELLOW;
------------------------------------------------
飞狐5.0源码：
基金买入:=SELFDATA('特买');
基金卖出:=SELFDATA('特卖');
T席买入:=SELFDATA('大买');
T席卖出:=SELFDATA('大卖');
基金买入1:=IF(基金买入<>ref(基金买入,1),基金买入,0);
基金卖出1:=IF(基金卖出<>ref(基金卖出,1),基金卖出,0);
T席买入1:=IF(T席买入<>ref(T席买入,1),T席买入,0);
T席卖出1:=IF(T席卖出<>ref(T席卖出,1),T席卖出,0);
vvv:=vol;
JJ:=(基金买入1-基金卖出1)*vvv;
TX:=(T席买入1-T席卖出1)*vvv;
QF:=(JJ+TX);
主力持仓:sum(QF,0);
主力买入:(基金买入+T席买入)*vvv,linethick0,COLORRED;
主力卖出:(基金卖出+T席卖出)*vvv,linethick0,COLORGREEN;
主力增减:=主力持仓-REF(主力持仓,1);
STICKLINE(主力增减<0,主力增减+主力持仓,主力持仓,0.8,1),COLORGREEN;
STICKLINE(主力增减>0,主力持仓,主力增减+主力持仓,0.8,1),COLORRED;
STR1:=''+'←(主力持仓) '+NUMTOSTR(主力持仓,3)+'\n'+' 比昨天'+NUMTOSTR(主力增减,3);
DRAWTEXT(ISLASTBAR,主力持仓,STR1),COLORYELLOW,align4;
************************
{散户持仓}
{大智慧L2源码，需要DDE数据支持，定义好特买，特卖，大买，大卖，中买，中卖。再导入网上下载的DDE相关数据即可}
基金买入:=SELFDATA('特买');
基金卖出:=SELFDATA('特卖');
T席买入:=SELFDATA('大买');
T席卖出:=SELFDATA('大卖');
券本买入:=SELFDATA('中买');
券本卖出:=SELFDATA('中卖');
基金买入1:=IF(基金买入<>ref(基金买入,1),基金买入,0);
基金卖出1:=IF(基金卖出<>ref(基金卖出,1),基金卖出,0);
T席买入1:=IF(T席买入<>ref(T席买入,1),T席买入,0);
T席卖出1:=IF(T席卖出<>ref(T席卖出,1),T席卖出,0);
券本买入1:=IF(券本买入<>ref(券本买入,1),券本买入,0);
券本卖出1:=IF(券本卖出<>ref(券本卖出,1),券本卖出,0);
QFII买入:=1-(券本买入1+T席买入1+基金买入1);
QFII卖出:=1-(券本卖出1+T席卖出1+基金卖出1);
vvv:=vol;
QF:=((QFII买入-QFII卖出)*vvv);
持仓:=(QF/CAPITAL)*100;
散户持仓:sum(QF,0),linethick1,COLORWHITE;
散户买入:QFII买入*vvv,linethick0,COLORRED;
散户卖出:QFII卖出*vvv,linethick0,COLORGREEN;
散户增减:=散户持仓-REF(散户持仓,1);
STICKLINE(散户增减<0,散户增减+散户持仓,散户持仓,0.8,1),COLORGREEN;
STICKLINE(散户增减>0,散户持仓,散户增减+散户持仓,0.8,1),COLORRED;
STR1:=''+'←(散户持仓) '+NUMTOSTR(散户持仓)+'\n'+' 比昨天'+NUMTOSTR(散户增减);
DRAWTEXT(BARSTATUS,散户持仓,STR1),COLORYELLOW;
------------------------
飞狐5.0源码：
基金买入:=SELFDATA('特买');
基金卖出:=SELFDATA('特卖');
T席买入:=SELFDATA('大买');
T席卖出:=SELFDATA('大卖');
券本买入:=SELFDATA('中买');
券本卖出:=SELFDATA('中卖');
基金买入1:=IF(基金买入<>ref(基金买入,1),基金买入,0);
基金卖出1:=IF(基金卖出<>ref(基金卖出,1),基金卖出,0);
T席买入1:=IF(T席买入<>ref(T席买入,1),T席买入,0);
T席卖出1:=IF(T席卖出<>ref(T席卖出,1),T席卖出,0);
券本买入1:=IF(券本买入<>ref(券本买入,1),券本买入,0);
券本卖出1:=IF(券本卖出<>ref(券本卖出,1),券本卖出,0);
QFII买入:=1-(券本买入1+T席买入1+基金买入1);
QFII卖出:=1-(券本卖出1+T席卖出1+基金卖出1);
vvv:=vol;
QF:=((QFII买入-QFII卖出)*vvv);
持仓:=(QF/CAPITAL)*100;
散户持仓:sum(QF,0),linethick1,COLORWHITE;
散户买入:QFII买入*vvv,linethick0,COLORRED;
散户卖出:QFII卖出*vvv,linethick0,COLORGREEN;
散户增减:=散户持仓-REF(散户持仓,1);
STICKLINE(散户增减<0,散户增减+散户持仓,散户持仓,0.8,1),COLORGREEN;
STICKLINE(散户增减>0,散户持仓,散户增减+散户持仓,0.8,1),COLORRED;
STR1:=''+'←(散户持仓) '+NUMTOSTR(散户持仓,3)+'\n'+' 比昨天'+NUMTOSTR(散户增减,3);
DRAWTEXT(ISLASTBAR,散户持仓,STR1),COLORYELLOW,align4;
 仅仅提供源码，不提供指标下载，需要设定自定义数据{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
