实用看盘龙虎榜-极品指标公式源码

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,