借用新游客老师的DLL，给飞狐加把力55188DLL放到飞狐的FmlDLL里，建立fhlhb引用，建立凤凰龙虎榜公式
希望新游客老师能为飞狐做个DLL，非常感谢各位老师的贡献{建立引用名：fhlhb}TODAY:=DYNAINFO(7)=CLOSE and DYNAINFO(10)=AMOUNT AND TIME0<55800;特买:if(today,"55188@龙虎"(1),"zxDATA@BIGORDER"(1,3));特卖:if(today,"55188@龙虎"(8),"zxDATA@BIGORDER"(2,3));大买:if(today,"55188@龙虎"(2),"zxDATA@bigorder"(1,2)-"zxDATA@bigorder"(1,3));大卖:if(today,"55188@龙虎"(7),"zxDATA@bigorder"(2,2)-"zxDATA@bigorder"(2,3));中买:if(today,"55188@龙虎"(3),"zxDATA@bigorder"(1,1)-"zxDATA@bigorder"(1,2));中卖:if(today,"55188@龙虎"(6),"zxDATA@bigorder"(2,1)-"zxDATA@bigorder"(2,2));{凤凰龙虎榜}BB:=BARPOS=SYSPARAM(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];DRAWTEXTEX(CLOSE,1,180,10,STR1),colorFF00;沪昨金【亿元】:REF("SH1A0001$AMOUNT",1)/100000000,LINETHICK0,PRECISION2,color91FFEF;沪今量:"SH1A0001$VOL",LINETHICK0,PRECISION0,color91FFEF;深昨金【亿元】:REF("SZ399001$AMOUNT",1)/100000000,LINETHICK0,PRECISION2,color9CFF7A;沪深A股:STKCOUNT('A股板块'),LINETHICK0;{分时监控}N:=0;中单买入:="FHLHB.中买#day";中单卖出:="FHLHB.中卖#day";大单买入:="FHLHB.大买#day";大单卖出:="FHLHB.大卖#day";特大买入:="FHLHB.特买#day";特大卖出:="FHLHB.特卖#day";小单买入:=1-(中单买入+大单买入+特大买入);小单卖出:=1-中单卖出-大单卖出-特大卖出;主力买入:=特大买入+大单买入;主力卖出:=特大卖出+大单卖出;中单买:=AMOUNT*中单买入/10000;中单卖:=AMOUNT*中单卖出/10000;大单买:=AMOUNT*大单买入/10000;大单卖:=AMOUNT*大单卖出/10000;特大买:=AMOUNT*特大买入/10000;特大卖:=AMOUNT*特大卖出/10000;小单买:=AMOUNT*小单买入/10000;小单卖:=AMOUNT*小单卖出/10000;主力买:=特大买+大单买;主力卖:=特大卖+大单卖;小单净买:=SUM(小单买-小单卖,N);中单净买:=SUM(中单买-中单卖,N);大单净买:=SUM(大单买-大单卖,N);特大净买:=SUM(特大买-特大卖,N);主力净买:=SUM(主力买-主力卖,N);散户:=小单净买,LINETHICK1,colorgreen;中户:=中单净买,LINETHICK1,colorcyan;大户:=大单净买,LINETHICK1,colormagenta;超大:=特大净买,LINETHICK1,colorred;主力:=主力净买,LINETHICK1,coloryellow;KS:=DATACOUNT;DRAWTEXT(BARPOS=KS-18,0,'主力\n'+NUMTOSTR(主力/(IF(CAPITAL<1,CAPITAL,0))*100,2)),ALIGN5,PXUP48,coloryellow;DRAWTEXT(BARPOS=KS-15,0,'超大\n'+NUMTOSTR(超大/(IF(CAPITAL<1,0,CAPITAL))*100,2)),ALIGN5,PXUP48,colorred;DRAWTEXT(BARPOS=KS-11,0,'大户\n'+NUMTOSTR(大户/(IF(CAPITAL<1,0,CAPITAL))*100,2)),ALIGN5,PXUP48,colormagenta;DRAWTEXT(BARPOS=KS-8,0,'中户\n'+NUMTOSTR(中户/(IF(CAPITAL<1,0,CAPITAL))*100,2)),ALIGN5,PXUP48,colorcyan;DRAWTEXT(BARPOS=KS-5,0,'散户\n'+NUMTOSTR(散户/(IF(CAPITAL<1,0,CAPITAL))*100,2)),ALIGN5,PXUP48,colorgreen;STICKLINE(BARPOS=DATACOUNT-18,0,主力[P],20,0),coloryellow;STICKLINE(BARPOS=DATACOUNT-15,0,超大[P],20,0),colorred;STICKLINE(BARPOS=DATACOUNT-11,0,大户[P],20,0),colormagenta;STICKLINE(BARPOS=DATACOUNT-8,0,中户[P],20,0),colorcyan;STICKLINE(BARPOS=DATACOUNT-5,0,散户[P],20,0),colorgreen;DRAWTEXTEX(CLOSE,1,10,10,STKLABEL+' '+STKNAME+''),colorFF00;DRAWTEXTEX(CLOSE,1,10,150,'主力:'+' '+NUMTOSTR(主力[P],0)),coloryellow;DRAWTEXTEX(CLOSE,1,10,300,'超大:'+' '+NUMTOSTR(超大[P],0)),colorred;DRAWTEXTEX(CLOSE,1,10,450,'大户:'+' '+NUMTOSTR(大户[P],0)),colormagenta;DRAWTEXTEX(CLOSE,1,10,600,'中户:'+' '+NUMTOSTR(中户[P],0)),colorcyan;DRAWTEXTEX(CLOSE,1,10,750,'散户: '+NUMTOSTR(散户[P],0)),colorgreen; |
