input:n(403,1,10000);
DRAWTEXTREL(20,30,STKLABEL),LINETHICK6,Colorffff00;
DRAWTEXTREL(180,30,STKNAME),LINETHICK6,Color00ffff;
DRAWTEXTREL(740,150, ' 遍'),LINETHICK4,Color00ffff;
DRAWTEXTREL(740,300, ' 訪'),LINETHICK4,Color00ffff;
DRAWTEXTREL(740,450, ' 高'),LINETHICK4,Color00ffff;
DRAWTEXTREL(740,600, ' 手'),LINETHICK4,Color00ffff;
DRAWTEXTREL(740,750, ' 新'),LINETHICK4,ColorFF00FF;
DRAWTEXTREL(740,900, ' 編'),LINETHICK4,Color00FF00;
DRAWTEXTREL(800,150,' 龍'),LINETHICK6,Color00ff00;
DRAWTEXTREL(800,400,' 虎'),LINETHICK6,Colorffffff;
DRAWTEXTREL(800,650,' 看'),LINETHICK6,Color0000ff;
DRAWTEXTREL(800,900,' 盤'),LINETHICK6,Color00FFFF;
DRAWTEXTREL(20,500,'-----------------------------------------------------------------------------2007.07.07---'),LINETHICK1,Coloreeeeee;
a:=BUYVOL*c/100;
bz:=sum(a,0);
b:=c*SELLVOL/100;
sz:=sum(b,0);
z:=bz+sz;
cz:=bz-sz;
xb5:=if(a<=5 ,a,0);b5:=sum(xb5,0);
xs5:=if(b<=5 ,b,0);s5:=sum(xs5,0);
xb10:=if(a<=10 and a>=5 ,a,0);b10:=sum(xb10,0);
xs10:=if(b<=10 and b>=5,b,0);s10:=sum(xs10,0);
xb30:=if(a<=30 and a>=10 ,a,0);b30:=sum(xb30,0);
xs30:=if(b<=30 and b>=10 ,b,0);s30:=sum(xs30,0);
xb50:=if(a<=50 and a>=30 ,a,0);b50:=sum(xb50,0);
xs50:=if(b<=50 and b>=30 ,b,0);s50:=sum(xs50,0);
xb70:=if(a<=70 and a>=50 ,a,0);b70:=sum(xb70,0);
xs70:=if(b<=70 and b>=50 ,b,0);s70:=sum(xs70,0);
xb100:=if(a<=100 and a>=70,a,0);b100:=sum(xb100,0);
xs100:=if(b<=100 and b>=70,b,0);s100:=sum(xs100,0);
xb150:=if(a>=100 ,a,0);b150:=sum(xb150,0);
xs150:=if(b>=100 ,b,0);s150:=sum(xs150,0);
j5:=b5-s5;
j10:=b10-s10;
j30:=b30-s30;
j50:=b50-s50;
j70:=b70-s70;
j100:=b100-s100;
j150:=b150-s150;
IF BARSTATUS=2 and (z) THEN BEGIN DRAWTEXTREL(320,45,' ■總成金額(萬元):'+NUMTOSTRN(DYNAINFO(10)/10000,2)),LINETHICK4,COLORccffcc;end;
IF BARSTATUS=2 and (bz) THEN BEGIN DRAWTEXTREL(30,550,'■■■■■買入:'+NUMTOSTRN(bz,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (sz) THEN BEGIN DRAWTEXTREL(250,550,' ■■■■■賣出:'+NUMTOSTRN(sz,2)),LINETHICK1,COLORgreen;end;
IF BARSTATUS=2 and (b5) THEN BEGIN DRAWTEXTREL(30,600,' 5 萬大單買入: ' +NUMTOSTRN(b5,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (s5) THEN BEGIN DRAWTEXTREL(250,600,' 5 萬大單賣出: '+NUMTOSTRN(s5,2)),LINETHICK1,COLORgreen;end;
IF BARSTATUS=2 and (b10) THEN BEGIN DRAWTEXTREL(30,650,' 10 萬大單買入:'+NUMTOSTRN(b10,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (s10) THEN BEGIN DRAWTEXTREL(250,650,' 10 萬大單賣出:'+NUMTOSTRN(s10,2)),LINETHICK1,COLORgreen;end;
IF BARSTATUS=2 and (b30) THEN BEGIN DRAWTEXTREL(30,700,' 30 萬大單買入:'+NUMTOSTRN(b30,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (s30) THEN BEGIN DRAWTEXTREL(250,700,' 30 萬大單賣出:'+NUMTOSTRN(s30,2)),LINETHICK1,COLORgreen;end;
IF BARSTATUS=2 and (b50) THEN BEGIN DRAWTEXTREL(30,750,' 50 萬大單買入:'+NUMTOSTRN(b50,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (s50) THEN BEGIN DRAWTEXTREL(250,750,' 50 萬大單賣出:'+NUMTOSTRN(s50,2)),LINETHICK1,COLORgreen;end;
IF BARSTATUS=2 and (b70) THEN BEGIN DRAWTEXTREL(30,800,' 70 萬大單買入:'+NUMTOSTRN(b70,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (s70) THEN BEGIN DRAWTEXTREL(250,800,' 70 萬大單賣出:'+NUMTOSTRN(s70,2)),LINETHICK1,COLORgreen;end;
IF BARSTATUS=2 and (b100) THEN BEGIN DRAWTEXTREL(30,850,'100 萬大單買入:'+NUMTOSTRN(b100,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (s100) THEN BEGIN DRAWTEXTREL(250,850,' 100 萬大單賣出:'+NUMTOSTRN(s100,2)),LINETHICK1,COLORgreen;end;
IF BARSTATUS=2 and (b150) THEN BEGIN DRAWTEXTREL(30,900,'150 萬大單買入:'+NUMTOSTRN(b150,2)),LINETHICK1,COLORred;end;
IF BARSTATUS=2 and (s150) THEN BEGIN DRAWTEXTREL(250,900,' 150 萬大單賣出:'+NUMTOSTRN(s150,2)),LINETHICK1,COLORgreen;end;
IF BARSTATUS=2 and (cz) THEN BEGIN DRAWTEXTREL(470,550,' ■■■■總凈買入:'+NUMTOSTRN(cz,2)),LINETHICK1,COLORccff00;end;
IF BARSTATUS=2 and (j5) THEN BEGIN DRAWTEXTREL(470,600, ' 5萬大單凈買入; '+NUMTOSTRN(j5,2)),LINETHICK1,COLORccff00;end;
IF BARSTATUS=2 and (j10) THEN BEGIN DRAWTEXTREL(470,650, ' 10萬大單凈買入; '+NUMTOSTRN(j10,2)),LINETHICK1,COLORccff00;end;
IF BARSTATUS=2 and (j30) THEN BEGIN DRAWTEXTREL(470,700, ' 30萬大凈買入; '+NUMTOSTRN(j30,2)),LINETHICK1,COLORccff00;end;
IF BARSTATUS=2 and (j50) THEN BEGIN DRAWTEXTREL(470,750, ' 50萬大單凈買入; '+NUMTOSTRN(j50,2)),LINETHICK1,COLORccff00;end;
IF BARSTATUS=2 and (j70) THEN BEGIN DRAWTEXTREL(470,800, ' 70萬大單凈買入; '+NUMTOSTRN(j70,2)),LINETHICK1,COLORccff00;end;
IF BARSTATUS=2 and (j100) THEN BEGIN DRAWTEXTREL(470,850,' 100萬大單凈買入; '+NUMTOSTRN(j100,2)),LINETHICK1,COLORccff00;end;
IF BARSTATUS=2 and (j150) THEN BEGIN DRAWTEXTREL(470,900,' 150萬大單凈買入; '+NUMTOSTRN(j150,2)),LINETHICK1,COLORccff00;end;
dd:=LN(FINANCE2(37)/(n*10))*ATAN(FINANCE2(37))*100;
主動買入:=SUM(BUYVOL,0);
主動賣出:=SUM(SELLVOL,0);
大單買:=if(BUYVOL>=dd,BUYVOL,0);
大單賣:=if(SELLVOL>dd,SELLVOL,0);
大單買入:=SUM(大單買,0);
大單賣出:=SUM(大單賣,0);
小單買入:=主動買入-大單買入;
小單賣出:=主動賣出-大單賣出;
大買金:=sum(if(BUYVOL>=dd,BUYVOL,0)*c,0);
大單買均價(jià):=大買金/大單買入;
大賣金:=sum(if(SELLVOL>dd,SELLVOL,0)*c,0);
大單賣均價(jià):=大賣金/大單賣出;
成交筆數(shù):=sum(if(BUYVOL>0,1,0),0)+sum(if(SELLVOL>0,1,0),0);
大單凈量:=大單買入-大單賣出;
DRAWTEXTABS(30,130,'☆ 散戶跟風(fēng)系數(shù):' +FLOOR(小單買入-小單賣出)/DYNAINFO(8)*100+' %'),COLORred,LINETHICK3;
DRAWTEXTABS(30,100,'■ 大單凈量:'),Color00FFFF,LINETHICK2;
DRAWTEXTABS(115,100,' '+大單凈量),Color00FFFF,LINETHICK2;
DRAWTEXTABS(200,100,' 占'+FLOOR(大單凈量/(主動買入+主動賣出)*100)+' %'),Color00FFFF,LINETHICK2;
DRAWTEXTABS(30,40,'■ 大單買入: '+大單買入),Color8000FF,LINETHICK2;
DRAWTEXTABS(200,40,' 占'+FLOOR(大單買入/(主動買入+主動賣出)*100)+'%'),Color8000FF,LINETHICK2;
DRAWTEXTABS(300,40,'大單買均價(jià): '+大單買均價(jià)),Color8000FF,LINETHICK2;
DRAWTEXTABS(30,70,'■ 大單賣出: '+大單賣出),Color00FF00,LINETHICK2;
DRAWTEXTABS(200,70,' 占'+FLOOR(大單賣出/(主動買入+主動賣出)*100)+' %'),Color00FF00,LINETHICK2;
DRAWTEXTABS(300,55,'大單賣均價(jià): '+大單賣均價(jià)),Color00FF00,LINETHICK2;
DRAWTEXTABS(30,55,'■ 小單買入: '+小單買入),Color2F73FF,LINETHICK2;
DRAWTEXTABS(200,55,' 占'+FLOOR(小單買入/(主動買入+主動賣出)*100)+' %'),Color2F73FF,LINETHICK2;
DRAWTEXTABS(30,85,'■ 小單賣出: '+小單賣出),ColorB4B043,LINETHICK2;
DRAWTEXTABS(200,85,' 占'+FLOOR(小單賣出/(主動買入+主動賣出)*100)+' %'),ColorA8A800,LINETHICK2;
DRAWTEXTABS(300,80,'總成交筆數(shù)(深): '+DYNAINFO(52)),ColorFFFFFF,LINETHICK2;
DRAWTEXTABS(300,95,'每筆成交手(深): '+DYNAINFO(53)),LINETHICK2;
DRAWTEXTABS(30,115,'∑ 總成交手?jǐn)?shù): '+DYNAINFO(8)),ColorFFFFFF,LINETHICK2;
DRAWTEXTABS(300,115,'總成交筆數(shù)(滬): '+成交筆數(shù)*3),ColorFFFFFF,LINETHICK2;
DRAWTEXTABS(300,130,'每筆成交手(滬): '+INTPART((主動買入+主動賣出)/成交筆數(shù)/3)),LINETHICK2;
總:=DYNAINFO(8);
STICKLINE((總 AND DISPSTATUS=2),0,總,60,1),COLORFFFFFF;
STICKLINE((大單買入+大單賣出+小單買入+小單賣出 AND DISPSTATUS=2),0,總,60,0),Color8000FF;
STICKLINE((大單賣出+小單買入+小單賣出 AND DISPSTATUS=2),0,大單賣出+小單買入+小單賣出,60,0),Color2F73FF;
STICKLINE((小單賣出+大單賣出 AND BARSTATUS=2),0,小單賣出+大單賣出,60,0),Color00FF00;
STICKLINE((小單賣出 AND BARSTATUS=2),0,小單賣出,60,0),ColorB4B043;
龍虎看盤功能詳解
盤口分析是K線技術(shù)分析的重要補(bǔ)充,,盤口分析和K線分析相驗(yàn)證,,可以大大提高研判的準(zhǔn)確性,盤口分析在短線操作中更為有效,。龍虎看盤通過細(xì)分成交、分類統(tǒng)計(jì)、綜合評測等功能,,為投資者提供極其重要的盤口數(shù)據(jù),。我們僅僅給出這些數(shù)據(jù)的理論解釋,,投資者需要在實(shí)踐中發(fā)現(xiàn)規(guī)律,靈活應(yīng)用,。
一,、細(xì)分成交 龍虎看盤把盤口成交細(xì)分為大單買入,、大單賣出、小單買入,、小單賣出四種成交模式,分類匯總畫出餅狀圖,。
二,、扣除對沖的大單買賣凈量 大單買入量減去大單賣出量,,并利用深交所即時(shí)披露的成交筆數(shù)判斷每筆成交是否為大買單和大賣單之間的對沖,如果是對沖則從買賣凈量中扣除(上證的該項(xiàng)數(shù)據(jù)沒有扣除對沖),。本數(shù)據(jù)可以看作是主力通過主動的市場運(yùn)作吃進(jìn)或放出的籌碼量。
三,、大單買入均價(jià)和大單賣出均價(jià) 買入大單的加權(quán)平均價(jià)和賣出大單的加權(quán)平均價(jià)??梢钥醋魇侵髁I入的平均成本和賣出的平均股價(jià)。
四,、大單買入筆數(shù),、大單賣出筆數(shù)和筆數(shù)差這三項(xiàng)數(shù)據(jù)非常重要,,一定要正確理解它們的意義,。大單買入筆數(shù)是所有買入大單的成交筆數(shù)累加值,,可以看作是所有大單吃掉的小單數(shù)量;大單賣出筆數(shù)是所有賣出大單的成交筆數(shù)累加值,,可以看作是大單拋出導(dǎo)致的小單接單數(shù)量。筆數(shù)差是大單買入筆數(shù)和大單賣出筆數(shù)的差值,。
五,、散戶跟風(fēng)系數(shù) 小單買入比例和小單賣出比例的差值,,用于衡量小單的主買和主賣程度,,反映散戶的參與程度,。
六、盤口能量盤口能量是綜合以上各項(xiàng)指標(biāo)得出的上漲能量值,,該值越大越好,。對于新股一般盤口能量值大于50才有參與價(jià)值,但市場環(huán)境不同,,該參考值也要做相應(yīng)調(diào)整,。對于相同市場環(huán)境下新股之間的比較更具價(jià)值。 注意,!本系統(tǒng)對數(shù)據(jù)采集的精度要求很高,營業(yè)部的數(shù)據(jù)采集差異會導(dǎo)致不同營業(yè)部之間統(tǒng)計(jì)數(shù)據(jù)的差異,。