分享

[大智慧II] 实用看盘龙虎榜

 青山孤松 2015-06-05
[大智慧II]


[大智慧II] 实用看盘龙虎榜
DRAWGBK(1, COLORRGB(180,180,180),COLORRGB(250,250,250),1);
{时间}
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);
str1:=''今日: ''+NUMTOSTR(fy[p],0)+''年''+NUMTOSTR(fm[p],0)+''月''+NUMTOSTR(fd[p],0)+''日 ''+wday[wd[p]+1];
{指标:-------------------☆功能开关--------------------}
{龙虎榜}
主动买入单:=EXTDATA(1);        //对应扩展数据序号1
主动卖出单:=EXTDATA(2);        //对应扩展数据序号2
大买手数:=EXTDATA(3);          //对应扩展数据序号3
大买金额:=EXTDATA(4);          //对应扩展数据序号4
大卖手数:=EXTDATA(5);          //对应扩展数据序号5
大卖金额:=EXTDATA(6);          //对应扩展数据序号6
撤买:=EXTDATA(7);              //对应扩展数据序号7
撤卖:=EXTDATA(8);             //对应扩展数据序号8
对敲买单:=EXTDATA(9);         //对应扩展数据序号9
对敲卖单:=EXTDATA(10);        //对应扩展数据序号10
上扫单:=EXTDATA(11);           //对应扩展数据序号11
下扫单:=EXTDATA(12);           //对应扩展数据序号12
主力资金进出:={(大买金额-大卖金额)}EXTDATA(13)/100000;  //对应扩展数据序号13

散买:=主动买入单-大买手数;
散卖:=主动卖出单-大卖手数;
差:=(大买手数-大卖手数)/1000;
大单买均价:=大买金额/(大买手数*100);
大单卖均价:=大卖金额/(大卖手数*100);
散户跟风系数:=散买/(大买手数*10-大卖手数)*100,LINETHICK;//?
变换:=IF(CLOSE>OPEN,1,-1);
总:=EXTDATA(1)+EXTDATA(2)+EXTDATA(3)+EXTDATA(5);
总1:=V;
{趋势}
X_L1:=reverse((3*C+2*O+L+H)/7)+2*wma(wma((3*C+2*O+L+H)/7,1),5);
皓翁:= 3*X_L1-2*sma(X_L1,2,1);
yyh1:=IF(C>=皓翁 or O>=皓翁,1,0);//多
yyh2:=IF(C<=皓翁 or O<=皓翁,1,0);//空
yyh3:=O<C;//多
yyh4:=O>C;//空
xL1:=散户跟风系数*变换;
xL2:=IF(xL1>60,1,IF(xL1<-60,1,0));
xL3:=IF(BARPOS=SYSPARAM(1)&&xL2>0,1,0);//散
xL4:=IF(xL1<31&&xL1>-31&&OPEN<CLOSE,1,IF(xL1>-31&&xL1<31&&OPEN>CLOSE,1,0));
xL5:=IF(BARPOS=SYSPARAM(1)&&xL4>0,1,0);//主
QD:=LBOUND(主动买入单);
IF P<QD THEN EXIT;
{-----------------【图解模板】---------------------}
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],''★代码:''+STKLABEL+''   ★名称:''+STKNAME+''   ★流通盘:''+NUMTOSTR(FINANCE(1)/10000,4)+''(亿股)''),PXDN8,align4,COLORBLACK;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n■■大单买:''+NUMTOSTR(大买手数[p],0)),align4,COLORRED;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n                    ■■占:''+NUMTOSTR(大买手数[p]/总[p]*100,0)+''%''),align4,COLORRED;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n                                  ■■大单买均价:''+NUMTOSTR(大单买均价[p],2)+''(元)''),align4,COLORRED;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n■■大单卖:''+NUMTOSTR(大卖手数[p],0)),PXDN3,align4,Color005200;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n                    ■■占:''+NUMTOSTR(大卖手数[p]/总[p]*100,0)+''%''),PXDN3,align4,Color005200;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n                                  ■■大单卖均价:''+NUMTOSTR(大单卖均价[p],2)+''(元)''),PXDN3,align4,Color005200;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n■■散单买:''+NUMTOSTR(散买[p],0)),PXDN6,align4,COLORMAGENTA;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n                                  ■■散单卖:''+NUMTOSTR(散卖[p],0)),PXDN6,align4,ColorFF0066;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n■■散户跟风系数:''+NUMTOSTR(散户跟风系数[p]*变换[p],2)+''%''),PXDN6,align4,COLORBLACK;                                          
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n                                  ■■大单差:''+NUMTOSTR(差[p],2)+''(万股)''),PXDN6,align4,Color0C1B16;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n \n■■对敲买单:''+NUMTOSTR(对敲买单[p],0)),PXDN6,align4,COLORMAGENTA;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n \n                                  ■■对敲卖单:''+NUMTOSTR(对敲卖单[p],0)),PXDN6,align4,ColorFF0066;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n \n \n■■撤买:''+NUMTOSTR(撤买[p],0)),PXDN6,align4,COLORMAGENTA;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n \n \n                                  ■■撤卖:''+NUMTOSTR(撤卖[p],0)),PXDN6,align4,ColorFF0066;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n \n \n \n■■上扫单:''+NUMTOSTR(上扫单[p],0)),PXDN6,align4,COLORMAGENTA;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n \n \n \n                                  ■■下扫单:''+NUMTOSTR(下扫单[p],0)),PXDN6,align4,ColorFF0066;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n \n \n \n \n■■主力资金进出:''+NUMTOSTR(主力资金进出[p],2)+''(万元)''),PXDN6,align4,COLORBLUE;                                          
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n  \n \n \n \n \n \n \n \n                                  ■■''+str1),PXUP8,align4,COLORBROWN;
{柱线}
STICKLINE(BARPOS=SYSPARAM(3)-8,0,总[p]*1.02,196,0),SHIFT1,ALIGN2,COLORBLUE;
STICKLINE(BARPOS=SYSPARAM(3)-8,0,总[p]*0.99,188,0),SHIFT1,ALIGN2,COLORWHITE;
STICKLINE(BARPOS=DATACOUNT,1,主动买入单[p],18,0),COLORRED;
STICKLINE(BARPOS=DATACOUNT-3,0,主动卖出单[p],18,0),COLOR8000;
STICKLINE(BARPOS=DATACOUNT-6,0,大买手数[p],18,0),COLORRED;
STICKLINE(BARPOS=DATACOUNT-9,0,大卖手数[p],18,0),COLOR8000;
STICKLINE(BARPOS=DATACOUNT-12,0,散买[p],18,0),COLORMAGENTA;
STICKLINE(BARPOS=DATACOUNT-15,0,散卖[p],18,0),COLOR8000;
DRAWTEXT(BARPOS=DATACOUNT-16,总[p],''散 \n卖''),PXUP38,align5,COLORBLACK;
DRAWTEXT(BARPOS=DATACOUNT-13,总[p],''散 \n买''),PXUP38,align5,COLORBLACK;
DRAWTEXT(BARPOS=DATACOUNT-10,总[p],''大 \n卖''),PXUP38,align5,COLORBLACK;
DRAWTEXT(BARPOS=DATACOUNT -7,总[p],''大 \n买''),PXUP38,align5,COLORBLACK;
DRAWTEXT(BARPOS=DATACOUNT- 4,总[p],''总 \n卖''),PXUP38,align5,COLORBLACK;
DRAWTEXT(BARPOS=DATACOUNT - 1,总[p],''总 \n买''),PXUP38,align5,COLORBLACK;
STICKLINE(BARPOS=SYSPARAM(3)-7,总[p]/2,总[p]/2,238,0),ALIGN2,Color008293;//中线
DRAWTEXT(BARPOS=DATACOUNT-16 and xL3[p],总[p]*0.99,'' \n今日涨跌:散户所为'' ),PXDN16,COLORBLACK;
DRAWTEXT(BARPOS=DATACOUNT-16 and xL5[p],总[p]*0.99,'' \n今日涨跌:主力所为'' ),PXDN16,COLORBLACK;
DRAWTEXT(BARPOS=DATACOUNT-16&&yyh2[p]&&yyh4[p],总[p]*0.99,''■趋势: →跌'' ),PXDN8,COLORBLUE;//空
DRAWTEXT(BARPOS=DATACOUNT-16&&yyh1[p]&&yyh3[p],总[p]*0.99,''■趋势: →涨'' ),PXDN8,COLORRED;//多
换手率:IF(CAPITAL=0,VOL/SUM(VOL,100)*100,VOL/FINANCE(7)),PRECISION2,LINETHICK,




DRAWGBK(1, COLORRGB(180,180,180),COLORRGB(250,250,250),1);
{时间}
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);
str1:=''今日: ''+NUMTOSTR(fy[p],0)+''年''+NUMTOSTR(fm[p],0)+''月''+NUMTOSTR(fd[p],0)+''日 ''+wday[wd[p]+1];
{指标:-------------------☆功能开关--------------------}
{龙虎榜}
主动买入单:=EXTDATA(1);        //对应扩展数据序号1
主动卖出单:=EXTDATA(2);        //对应扩展数据序号2
大买手数:=EXTDATA(3);          //对应扩展数据序号3
大买金额:=EXTDATA(4);          //对应扩展数据序号4
大卖手数:=EXTDATA(5);          //对应扩展数据序号5
大卖金额:=EXTDATA(6);          //对应扩展数据序号6
撤买:=EXTDATA(7);              //对应扩展数据序号7
撤卖:=EXTDATA(8);             //对应扩展数据序号8
对敲买单:=EXTDATA(9);         //对应扩展数据序号9
对敲卖单:=EXTDATA(10);        //对应扩展数据序号10
上扫单:=EXTDATA(11);           //对应扩展数据序号11
下扫单:=EXTDATA(12);           //对应扩展数据序号12
主力资金进出:={(大买金额-大卖金额)}EXTDATA(13)/100000;  //对应扩展数据序号13

散买:=主动买入单-大买手数;
散卖:=主动卖出单-大卖手数;
差:=(大买手数-大卖手数)/1000;
大单买均价:=大买金额/(大买手数*100);
大单卖均价:=大卖金额/(大卖手数*100);
散户跟风系数:=散买/(大买手数*10-大卖手数)*100,LINETHICK;//?
变换:=IF(CLOSE>OPEN,1,-1);
总:=EXTDATA(1)+EXTDATA(2)+EXTDATA(3)+EXTDATA(5);
总1:=V;
{趋势}
X_L1:=reverse((3*C+2*O+L+H)/7)+2*wma(wma((3*C+2*O+L+H)/7,1),5);
皓翁:= 3*X_L1-2*sma(X_L1,2,1);
yyh1:=IF(C>=皓翁 or O>=皓翁,1,0);//多
yyh2:=IF(C<=皓翁 or O<=皓翁,1,0);//空
yyh3:=O<C;//多
yyh4:=O>C;//空
xL1:=散户跟风系数*变换;
xL2:=IF(xL1>60,1,IF(xL1<-60,1,0));
xL3:=IF(BARPOS=SYSPARAM(1)&&xL2>0,1,0);//散
xL4:=IF(xL1<31&&xL1>-31&&OPEN<CLOSE,1,IF(xL1>-31&&xL1<31&&OPEN>CLOSE,1,0));
xL5:=IF(BARPOS=SYSPARAM(1)&&xL4>0,1,0);//主
QD:=LBOUND(主动买入单);
IF P<QD THEN EXIT;
{-----------------【图解模板】---------------------}
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],''★代码:''+STKLABEL+''   ★名称:''+STKNAME+''   ★流通盘:''+NUMTOSTR(FINANCE(1)/10000,4)+''(亿股)''),PXDN8,align4,COLORBLACK;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n■■大单买:''+NUMTOSTR(大买手数[p],0)),align4,COLORRED;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n                    ■■占:''+NUMTOSTR(大买手数[p]/总[p]*100,0)+''%''),align4,COLORRED;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n                                  ■■大单买均价:''+NUMTOSTR(大单买均价[p],2)+''(元)''),align4,COLORRED;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n■■大单卖:''+NUMTOSTR(大卖手数[p],0)),PXDN3,align4,Color005200;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n                    ■■占:''+NUMTOSTR(大卖手数[p]/总[p]*100,0)+''%''),PXDN3,align4,Color005200;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n                                  ■■大单卖均价:''+NUMTOSTR(大单卖均价[p],2)+''(元)''),PXDN3,align4,Color005200;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n■■散单买:''+NUMTOSTR(散买[p],0)),PXDN6,align4,COLORMAGENTA;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n                                  ■■散单卖:''+NUMTOSTR(散卖[p],0)),PXDN6,align4,ColorFF0066;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n■■散户跟风系数:''+NUMTOSTR(散户跟风系数[p]*变换[p],2)+''%''),PXDN6,align4,COLORBLACK;                                          
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n                                  ■■大单差:''+NUMTOSTR(差[p],2)+''(万股)''),PXDN6,align4,Color0C1B16;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n \n■■对敲买单:''+NUMTOSTR(对敲买单[p],0)),PXDN6,align4,COLORMAGENTA;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n \n                                  ■■对敲卖单:''+NUMTOSTR(对敲卖单[p],0)),PXDN6,align4,ColorFF0066;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n \n \n■■撤买:''+NUMTOSTR(撤买[p],0)),PXDN6,align4,COLORMAGENTA;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n \n \n                                  ■■撤卖:''+NUMTOSTR(撤卖[p],0)),PXDN6,align4,ColorFF0066;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n \n \n \n■■上扫单:''+NUMTOSTR(上扫单[p],0)),PXDN6,align4,COLORMAGENTA;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n \n \n \n                                  ■■下扫单:''+NUMTOSTR(下扫单[p],0)),PXDN6,align4,ColorFF0066;
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n \n \n \n \n \n \n \n■■主力资金进出:''+NUMTOSTR(主力资金进出[p],2)+''(万元)''),PXDN6,align4,COLORBLUE;                                          
DRAWTEXT(BARPOS=SYSPARAM(2),总[p],'' \n \n  \n \n \n \n \n \n \n \n                                  ■■''+str1),PXUP8,align4,COLORBROWN;
{柱线}
STICKLINE(BARPOS=SYSPARAM(3)-8,0,总[p]*1.02,196,0),SHIFT1,ALIGN2,COLORBLUE;
STICKLINE(BARPOS=SYSPARAM(3)-8,0,总[p]*0.99,188,0),SHIFT1,ALIGN2,COLORWHITE;
STICKLINE(BARPOS=DATACOUNT,1,主动买入单[p],18,0),COLORRED;
STICKLINE(BARPOS=DATACOUNT-3,0,主动卖出单[p],18,0),COLOR8000;
STICKLINE(BARPOS=DATACOUNT-6,0,大买手数[p],18,0),COLORRED;
STICKLINE(BARPOS=DATACOUNT-9,0,大卖手数[p],18,0),COLOR8000;
STICKLINE(BARPOS=DATACOUNT-12,0,散买[p],18,0),COLORMAGENTA;
STICKLINE(BARPOS=DATACOUNT-15,0,散卖[p],18,0),COLOR8000;
DRAWTEXT(BARPOS=DATACOUNT-16,总[p],''散 \n卖''),PXUP38,align5,COLORBLACK;
DRAWTEXT(BARPOS=DATACOUNT-13,总[p],''散 \n买''),PXUP38,align5,COLORBLACK;
DRAWTEXT(BARPOS=DATACOUNT-10,总[p],''大 \n卖''),PXUP38,align5,COLORBLACK;
DRAWTEXT(BARPOS=DATACOUNT -7,总[p],''大 \n买''),PXUP38,align5,COLORBLACK;
DRAWTEXT(BARPOS=DATACOUNT- 4,总[p],''总 \n卖''),PXUP38,align5,COLORBLACK;
DRAWTEXT(BARPOS=DATACOUNT - 1,总[p],''总 \n买''),PXUP38,align5,COLORBLACK;
STICKLINE(BARPOS=SYSPARAM(3)-7,总[p]/2,总[p]/2,238,0),ALIGN2,Color008293;//中线
DRAWTEXT(BARPOS=DATACOUNT-16 and xL3[p],总[p]*0.99,'' \n今日涨跌:散户所为'' ),PXDN16,COLORBLACK;
DRAWTEXT(BARPOS=DATACOUNT-16 and xL5[p],总[p]*0.99,'' \n今日涨跌:主力所为'' ),PXDN16,COLORBLACK;
DRAWTEXT(BARPOS=DATACOUNT-16&&yyh2[p]&&yyh4[p],总[p]*0.99,''■趋势: →跌'' ),PXDN8,COLORBLUE;//空
DRAWTEXT(BARPOS=DATACOUNT-16&&yyh1[p]&&yyh3[p],总[p]*0.99,''■趋势: →涨'' ),PXDN8,COLORRED;//多
换手率:IF(CAPITAL=0,VOL/SUM(VOL,100)*100,VOL/FINANCE(7)),PRECISION2,LINETHICK, 

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约