主力凈買入

w2666 2011-01-30

展開全文

{【SUPERVIEW大資金流向】}
INPUT:N(0,0,300);
TODAY:="ddx.ddx"=0;{判斷是否有正版數(shù)據(jù)}
{4}
{疊加副盤}
DRAWTEXTREL(0,10,'大資金流'),COLORYELLOW;
DRAWTEXTABS(50,5,'《夏衛(wèi)東-原創(chuàng)》'),COLOR0000FF;
DRAWTEXTREL(190,5,datestr(REF((DATE),N))+' 星期'+REF(WEEKDAY,N)+' 【SUPERVIEW大資金流向】'+' '+STKLABEL+''+STKNAME+' '+N+'天前數(shù)據(jù)(有效天數(shù))'),LINETHICK4,Color00b5ff;{10}
{9}
{超贏}
主單買:=REF(IF(TODAY,"DDEDATA@BIGORDER"(1,2),IF(TODAY ,SELFDATA('特大買入')+SELFDATA('大單買入') ,BIGORDER(1,2))),N);
主單賣:=REF(IF(TODAY,"DDEDATA@BIGORDER"(2,2),IF(TODAY ,SELFDATA('特大賣出')+SELFDATA('大單賣出') ,BIGORDER(2,2))),N);
特單買:=REF(IF(TODAY,"DDEDATA@BIGORDER"(1,3),IF(TODAY ,SELFDATA('特大買入') ,bigorder(1,3))),N);
特單賣:=REF(IF(TODAY,"DDEDATA@BIGORDER"(2,3),IF(TODAY ,SELFDATA('特大賣出') ,bigorder(2,3))),N);
大單買:=REF(IF(TODAY,"DDEDATA@BIGORDER"(1,2)-"DDEDATA@BIGORDER"(1,3),IF(TODAY ,SELFDATA('大單買入') ,bigorder(1,2)-bigorder(1,3))),N);
大單賣:=REF(IF(TODAY,"DDEDATA@BIGORDER"(2,2)-"DDEDATA@BIGORDER"(2,3),IF(TODAY ,SELFDATA('大單賣出') ,bigorder(2,2)-bigorder(2,3))),N);
中單買:=REF(IF(TODAY,"DDEDATA@BIGORDER"(1,1)-"DDEDATA@BIGORDER"(1,2),IF(TODAY ,SELFDATA('中單買入') ,bigorder(1,1)-bigorder(1,2))),N);
中單賣:=REF(IF(TODAY,"DDEDATA@BIGORDER"(2,1)-"DDEDATA@BIGORDER"(2,2),IF(TODAY ,SELFDATA('中單賣出') ,bigorder(2,1)-bigorder(2,2))),N);
散單買:=REF(IF(TODAY,1-"DDEDATA@BIGORDER"(1,1),IF(TODAY ,1-(SELFDATA('特大買入')+SELFDATA('大單買入')+SELFDATA('中單買入')) ,1-bigorder(1,1))),N);
散單賣:=REF(IF(TODAY,1-"DDEDATA@BIGORDER"(2,1),IF(TODAY ,1-(SELFDATA('特大賣出')+SELFDATA('大單賣出')+SELFDATA('中單賣出')) ,1-bigorder(2,1))),N);
{21}
量比:=REF(VOL,N)/CAPITAL;{%}
散買:=散單買*REF(AMOUNT,N)/10000;{萬元}
散賣:=散單賣*REF(AMOUNT,N)/10000;{萬元}
散凈:=散買-散賣;{萬元}
散單:=散單買-散單賣;
散增:=量比*散單*100;{%}
散倉:= 25+Sum(散增,0);{%}
{29}
中買:=中單買*REF(AMOUNT,N)/10000;{萬元}
中賣:=中單賣*REF(AMOUNT,N)/10000;{萬元}
中凈:=中買-中賣;{萬元}
中單:=中單買-中單賣;
中增:=量比*中單*100;{%}
中倉:= 25+Sum(中增,0);{%}
{36}
大買:=大單買*REF(AMOUNT,N)/10000;{萬元}
大賣:=大單賣*REF(AMOUNT,N)/10000;{萬元}
大凈:=大買-大賣;{萬元}
大單:=大單買-大單賣;
大增:=量比*大單*100;{%}
大倉:=25+Sum(大增,0);{%}
{43}
超買:=特單買*REF(AMOUNT,N)/10000;{萬元}
超賣:=特單賣*REF(AMOUNT,N)/10000;{萬元}
超凈:=超買-超賣;{萬元}
超單:=特單買-特單賣;
超增:=量比*超單*100;{%}
超倉:=25+Sum(超增,0);{%}
{50}
主買:=主單買*REF(AMOUNT,N)/10000;{萬元}
主賣:=主單賣*REF(AMOUNT,N)/10000;{萬元}
主凈:=主買-主賣;{萬元}
主增:=(超增+大增);
主倉:=(超倉+大倉);{%}
{56}
{通欄顯示}
成交量:REF(VOL,N),LINETHICK0,COLOR00FFFF,PRECIS0;{萬手}
成交額:REF(AMOUNT/10000,N),LINETHICK0,COLORFF00FF,PRECIS2;{萬元}
主力凈買入:主凈,LINETHICK0,COLORFFFF00,PRECIS2;{萬元}
主力連紅:LAST(主凈 > 0),LINETHICK0,COLOR0030FF,PRECIS0;{天}
十日飚紅:COUNT(主凈 > 0,10),LINETHICK0,COLOR005BFF,PRECIS0;{天}
流通盤:CAPITAL,LINETHICK0,COLORFFFF00,PRECIS0;{萬手}
{64}
{柱圖值計算};
最大值:=400/(MAX(主買,主賣,超買,超賣,大買,大賣,中買,中賣,散買,散賣));
最大倉:=300/(MAX(主倉,超倉,大倉,中倉,散倉));
{68}
主力買:=600-(主買*最大值);
主力賣:=600-(主賣*最大值);
主倉增:=600-((主倉+(ABS(主增)*10))*最大倉);
主倉減:=600-((主倉-(ABS(主增)*10))*最大倉);
{73}
超大買:=600-(超買*最大值);
超大賣:=600-(超賣*最大值);
超倉增:=600-((超倉+(ABS(超增)*10))*最大倉);
超倉減:=600-((超倉-(ABS(超增)*10))*最大倉);
{78}
大戶買:=600-(大買*最大值);
大戶賣:=600-(大賣*最大值);
大倉增:=600-((大倉+(ABS(大增)*10))*最大倉);
大倉減:=600-((大倉-(ABS(大增)*10))*最大倉);
{83}
中戶買:=600-(中買*最大值);
中戶賣:=600-(中賣*最大值);
中倉增:=600-((中倉+(ABS(中增)*10))*最大倉);
中倉減:=600-((中倉-(ABS(中增)*10))*最大倉);
{88}
散戶買:=600-(散買*最大值);
散戶賣:=600-(散賣*最大值);
散倉增:=600-((散倉+(ABS(散增)*10))*最大倉);
散倉減:=600-((散倉-(ABS(散增)*10))*最大倉);
{93}
{畫柱圖}
DRAWRECTREL(245,主力買,270,610,RGB(200,0,0)),COLOR000000,LAYER5;{主力買}
DRAWRECTREL(270,主力賣,295,610,RGB(0,200,0)),COLOR000000,LAYER5;{主力賣}
DRAWRECTREL(245,612,320,655,(IF((主凈 >= 0),RGB(255,0,0),RGB(0,255,0)))),COLOR000000,LAYER5;{橫彩條}
DRAWRECTREL(295,主倉增,320,610,(IF((主增 >= 0),RGB(200,50,0),RGB(50,255,0)))),COLOR000000,LAYER5;{增倉比例增}
DRAWRECTREL(295,主倉減,320,610,RGB(255,255,0)),COLOR000000,LAYER5;{增倉比例減}
{100}
DRAWRECTREL(410,超大買,430,610,RGB(200,0,0)),COLOR000000,LAYER5;
DRAWRECTREL(430,超大賣,450,610,RGB(0,200,0)),COLOR000000,LAYER5;
DRAWRECTREL(410,612,470,655,(IF((超凈 >= 0),RGB(255,0,0),RGB(0,255,0)))),COLOR000000,LAYER5;{橫彩條}
DRAWRECTREL(450,超倉增,470,610,(IF((超增 >= 0),RGB(200,50,0),RGB(50,255,0)))),COLOR000000,LAYER5;{增倉比例增}
DRAWRECTREL(450,超倉減,470,610,RGB(255,255,0)),COLOR000000,LAYER5;{增倉比例減}
{106}
DRAWRECTREL(540,大戶買,560,610,RGB(200,0,0)),COLOR000000,LAYER5;
DRAWRECTREL(560,大戶賣,580,610,RGB(0,200,0)),COLOR000000,LAYER5;
DRAWRECTREL(540,612,600,655,(IF((大凈 >= 0),RGB(255,0,0),RGB(0,255,0)))),COLOR000000,LAYER5;{橫彩條}
DRAWRECTREL(580,大倉增,600,610,(IF((大增 >= 0),RGB(200,50,0),RGB(50,255,0)))),COLOR000000,LAYER5;{增倉比例增}
DRAWRECTREL(580,大倉減,600,610,RGB(255,255,0)),COLOR000000,LAYER5;{增倉比例減}
{112}
DRAWRECTREL(670,中戶買,690,610,RGB(200,0,0)),COLOR000000,LAYER5;
DRAWRECTREL(690,中戶賣,710,610,RGB(0,200,0)),COLOR000000,LAYER5;
DRAWRECTREL(670,612,730,655,(IF((中凈 >= 0),RGB(255,0,0),RGB(0,255,0)))),COLOR000000,LAYER5;{橫彩條}
DRAWRECTREL(710,中倉增,730,610,(IF((中增 >= 0),RGB(200,50,0),RGB(50,255,0)))),COLOR000000,LAYER5;{增倉比例增}
DRAWRECTREL(710,中倉減,730,610,RGB(255,255,0)),COLOR000000,LAYER5;{增倉比例減}
{118}
DRAWRECTREL(800,散戶買,820,610,RGB(200,0,0)),COLOR000000,LAYER5;
DRAWRECTREL(820,散戶賣,840,610,RGB(0,200,0)),COLOR000000,LAYER5;
DRAWRECTREL(800,612,860,655,(IF((散凈 >= 0),RGB(255,0,0),RGB(0,255,0)))),COLOR000000,LAYER5;;{橫彩條}
DRAWRECTREL(840,散倉增,860,610,(IF((散增 >= 0),RGB(200,50,0),RGB(50,255,0)))),COLOR000000,LAYER5;{增倉比例增}
DRAWRECTREL(840,散倉減,860,610,RGB(255,255,0)),COLOR000000,LAYER5;{增倉比例減}
{124}
{顯示文字}
DRAWTEXTREL(190,420,'主'),LINETHICK2,ColorDDFFFF;
DRAWTEXTREL(190,580,'力'),LINETHICK2,ColorDDFFFF;
DRAWTEXTREL(210,500,'='),LINETHICK2,ColorDDFFFF;
DRAWTEXTREL(225,400,'超'),LINETHICK0,ColorDDFFFF;
DRAWTEXTREL(225,450,'大'),LINETHICK0,ColorDDFFFF;
DRAWTEXTREL(225,500,'加'),LINETHICK0,ColorDDFFFF;
DRAWTEXTREL(225,550,'大'),LINETHICK0,ColorDDFFFF;
DRAWTEXTREL(225,600,'戶'),LINETHICK0,ColorDDFFFF;
DRAWTEXTREL(390,450,'超'),LINETHICK2,ColorDDFFFF;
DRAWTEXTREL(390,580,'大'),LINETHICK2,ColorDDFFFF;
DRAWTEXTREL(520,450,'大'),LINETHICK2,ColorDDFFFF;
DRAWTEXTREL(520,580,'戶'),LINETHICK2,ColorDDFFFF;
DRAWTEXTREL(650,450,'中'),LINETHICK2,ColorDDFFFF;
DRAWTEXTREL(650,580,'戶'),LINETHICK2,ColorDDFFFF;
DRAWTEXTREL(780,450,'散'),LINETHICK2,ColorDDFFFF;
DRAWTEXTREL(780,580,'戶'),LINETHICK2,ColorDDFFFF;
{142}
DRAWTEXTREL(190,680,'買入：'),colorred;
DRAWTEXTREL(190,750,'賣出：'),Color00FF00;
DRAWTEXTREL(190,820,'凈買：'),COLORFFFF00;
DRAWTEXTREL(190,890,'持倉：'),COLOR00FFFF;
DRAWTEXTREL(190,960,'增倉：'),COLORFFFF00;
{148}
{顯示數(shù)據(jù)}
DRAWTEXTREL(245,680,NUMTOSTRN(主買,2)),colorred;
DRAWTEXTREL(245,750,NUMTOSTRN(主賣,2)),COLOR00FF00;
DRAWTEXTREL(245,820,NUMTOSTRN(主凈,2)),COLORFFFF00;
DRAWTEXTREL(245,890,NUMTOSTRN(主倉,2)+'%'),COLOR00FFFF;
DRAWTEXTREL(245,960,NUMTOSTRN(主增,2)+'%'),COLORFFFF00;
{155}
DRAWTEXTREL(410,680,NUMTOSTRN(超買,2)),colorred;
DRAWTEXTREL(410,750,NUMTOSTRN(超賣,2)),COLOR00FF00;
DRAWTEXTREL(410,820,NUMTOSTRN(超凈,2)),COLORFFFF00;
DRAWTEXTREL(410,890,NUMTOSTRN(超倉,2)+'%'),COLOR00FFFF;
DRAWTEXTREL(410,960,NUMTOSTRN(超增,2)+'%'),COLORFFFF00;
{161}
DRAWTEXTREL(540,680,NUMTOSTRN(大買,2)),colorred;
DRAWTEXTREL(540,750,NUMTOSTRN(大賣,2)),COLOR00FF00;
DRAWTEXTREL(540,820,NUMTOSTRN(大凈,2)),COLORFFFF00;
DRAWTEXTREL(540,890,NUMTOSTRN(大倉,2)+'%'),COLOR00FFFF;
DRAWTEXTREL(540,960,NUMTOSTRN(大增,2)+'%'),COLORFFFF00;
{167}
DRAWTEXTREL(670,680,NUMTOSTRN(中買,2)),colorred;
DRAWTEXTREL(670,750,NUMTOSTRN(中賣,2)),COLOR00FF00;
DRAWTEXTREL(670,820,NUMTOSTRN(中凈,2)),COLORFFFF00;
DRAWTEXTREL(670,890,NUMTOSTRN(中倉,2)+'%'),COLOR00FFFF;
DRAWTEXTREL(670,960,NUMTOSTRN(中增,2)+'%'),COLORFFFF00;
{173}
DRAWTEXTREL(800,680,NUMTOSTRN(散買,2)),colorred;
DRAWTEXTREL(800,750,NUMTOSTRN(散賣,2)),COLOR00FF00;
DRAWTEXTREL(800,820,NUMTOSTRN(散凈,2)),COLORFFFF00;
DRAWTEXTREL(800,890,NUMTOSTRN(散倉,2)+'%'),COLOR00FFFF;
DRAWTEXTREL(800,960,NUMTOSTRN(散增,2)+'%'),COLORFFFF00;
{179}
{五分鐘資金趨勢}
主5:=(主買-主賣)-REF((主買-主賣),5);
超5:=超凈-REF(超凈,5);
大5:=大凈-REF(大凈,5);
中5:=中凈-REF(中凈,5);
散5:=散凈-REF(散凈,5);
DRAWTEXTABS(120,25,'五分鐘各單凈買(萬元)：'),COLORFFFF00;
DRAWTEXTABS(240,25,'主力：'+ NUMTOSTRN(主5,2)),COLOR00FFFF;
DRAWTEXTABS(340,25,'超大：'+ NUMTOSTRN(超5,2)),COLORFF00FF;
DRAWTEXTABS(440,25,'大戶：'+ NUMTOSTRN(大5,2)),COLOR00FF00;
DRAWTEXTABS(540,25,'中戶：'+ NUMTOSTRN(中5,2)),COLORB5B5B5;
DRAWTEXTABS(640,25,'散戶：'+ NUMTOSTRN(散5,2)),COLORFF9911;
{192}
DRAWTEXTABS(0,40,'大盤指數(shù)：'+INDEXC),COLORYELLOW;
DRAWTEXTABS(0,54,'大盤漲幅：'+((INDEXC-REF(INDEXC,1))/REF(INDEXC,1)*100)+'%'),LINETHICK0,PRECIS2,COLORred;
DRAWTEXTABS(0,68,'上漲家數(shù)：'+NUMTOSTRN(DYNAINFO(66),0)+'家'),COLOR0000FF;
DRAWTEXTABS(0,82,'下跌家數(shù)：'+NUMTOSTRN(DYNAINFO(67),0)+'家'),COLOR00FF00;
DRAWTEXTABS(0,96,'平盤家數(shù)：'+NUMTOSTRN(DYNAINFO(68),0)+'家'),COLORFFFFFF;
DRAWTEXTABS(0,112,'股票代碼：'+STKLABEL),COLORFFFF00;
DRAWTEXTABS(0,126,'股票名稱：'+STKNAME),COLORFFFF00;
DRAWTEXTABS(0,140,'最新價格：'+DYNAINFO(7)+'元'),COLORFF00FF;
DRAWTEXTABS(0,154,'今日漲幅：'+DYNAINFO(14)*100+'%'),COLOR00FFFF;
DRAWTEXTABS(0,168,'歷史最高：'+HHV(HIGH,0)+'元'),Colorred;
DRAWTEXTABS(0,182,'歷史最低：'+LLV(LOW,0)+'元'),COLOR00FF00;
DRAWTEXTABS(0,196,'換手率：'+ DYNAINFO(37)*100+'%'),COLORFF00FF;
DRAWTEXTABS(0,210,'市盈率：'+ DYNAINFO(39)+'%'),COLOR00FFFF;
DRAWTEXTABS(0,224,'市凈率：'+ DYNAINFO(58)+'%'),COLOR00FF00;
{207};