input:PER(5);
收盘价:CLOSE,LINETHICK0;
MA18:=EMA(CLOSE,18);
加码:((C-REF(MA18,1))/18+MA18)*1;
DD:=("tdb.tdb"+"ddb.ddb"-"tds.tds"-"dds.dds")*AMOUNT/1000000;
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4{,COLORYELLOW};
STICKLINE(ZIG(3,PER)>REF(ZIG(3,PER),1) ,O ,C ,8 ,1 ),COLORRED;
STICKLINE(ZIG(3,PER)<REF(ZIG(3,PER),1) ,O ,C ,8 ,1 ),COLORGREEN;
VARC:=(ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND (REF(ZIG
(3,5),2)<=REF(ZIG(3,5),3));买入ZIG:IF(ZIG(3,PER)>=REF(ZIG(3,PER),1)
AND REF(ZIG(3,PER),1)<REF(ZIG(3,PER),2) ,1 ,0) AND DD>0,PRECIS1,LINETHICK0;
卖出ZIG:=IF(ZIG(3,PER)<=REF(ZIG(3,PER),1)
AND REF(ZIG(3,PER),1)>REF(ZIG(3,PER),2) ,1 ,0);
选股BBI:IF(ZIG(3,PER)>=REF(ZIG(3,PER),1)
AND REF(ZIG(3,PER),1)<REF(ZIG(3,PER),2)
AND CROSS(CLOSE,BBI) and CLOSE>加码 ,1 ,0 ),PRECIS1,LINETHICK0;
STICKLINE(选股BBI,O,C,8,0),COLORYELLOW;
STICKLINE(买入ZIG,O,C,4,0),COLORMAGENTA;
{DRAWICON(买入ZIG>0,L*0.98,7);
DRAWICON(卖出ZIG>0,H*1.02,8);}
DRAWBMP(VARC>0,L*0.98,'buy1.bmp');
DRAWBMP(卖出ZIG>0,H*1.02,'sell1.bmp');
{STICKLINE(ZIG(3,PER)>REF(ZIG(3,PER),1),L*0.96,LLVALL(L ),10,0),COLOR600020;
STICKLINE(ZIG(3,PER)<REF(ZIG(3,PER),1),L*0.96,LLVALL(L ),10,0),COLOR404050;}
DRAWTEXTABS(6,30,'■大盘资金增减:'+NUMTOSTRN((100 * ((INDEXV / REF(INDEXV,1)) - 1)),0)+'%'+' '+'■大盘资金:'+SELFDATA('沪深资金' )/10000+'亿'),LINETHICK2,Color00FF00;
DRAWTEXTABS(250,50,'■沪市资金:'+SELFDATA('沪市资金' )/10000+'亿'),LINETHICK2,Color00FF00;
DRAWTEXTABS(250,70,'■深市资金:'+SELFDATA('深市资金' )/10000+'亿'),LINETHICK2,Color00FF00;ZL:=("tdb.tdb"+"ddb.ddb"-"tds.tds"-"dds.dds")*AMOUNT/1000000;
TD:=("tdb.tdb"-"tds.tds")*AMOUNT/1000000;
DD:=("ddb.ddb"-"dds.dds")*AMOUNT/1000000;
ZD:=("zdb.zdb"-"zds.zds")*AMOUNT/1000000;
SH:=sum((100-"tdb.tdb"-"DDB.DDB"-"ZDB.ZDB")-(100-"tds.tds"-"DDS.DDS"-"ZDS.ZDS"),1)*AMOUNT/1000000;
当日涨幅:=(c-ref(c,1))/ref(c,1)*100;
当日最大涨幅:=(h-ref(c,1))/ref(c,1)*100;
{主动买卖大单}
大笔买入:=EXTDATA(8 );
大笔卖出:=EXTDATA(9 );
大笔净额:=sum((EXTDATA(8 )-EXTDATA(9 ))*100,1)/CAPITAL*100;
主动买大单:=EXTDATA(12 );
主动卖大单:=EXTDATA(13 );
主动净额:=sum(EXTDATA(12 )-EXTDATA(13 ),1);
盘比:=主动净额/CAPITAL*100;
主动比:=主动买大单/主动卖大单;
bs1:=''+datestr(date)+'资金流向\n'+'4.主力:'+ZL+'\n'+'5.特大:'+TD+'\n'+'6.大户:'+DD+'\n'+'7.中户:'+ZD+'\n'+'8.散户:'+SH+'\n'+'9.当日涨幅:'+当日涨幅+'%'+'\n'+'10.最大涨幅:'+当日最大涨幅+'%'+'\n'+'11.主动买卖净额:'+主动净额+'手'+'\n'+'12.大笔买入净额:'+大笔净额+'%'+'\n'+'13.主动净额占盘比:'+盘比+'%'+'\n'+'14.主动买卖比:'+主动比+'\n'+'15.主动净量（ZDL）:'+EXTDATA(14)+'手';
drawflagtext(1,L,bs1);
DRAWTEXT( 主动比>10 AND MA(CLOSE,5)>REF(MA(CLOSE,5),1),L*0.98 ,'买入' ),COLOR0000FF;
TIPTEXT(主动比>10 AND MA(CLOSE,5)>REF(MA(CLOSE,5),1) ,L*0.99 ,'买入,主动比:'+主动比);{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
