N 1,100,3 M 1,100,10 VOL,VOLSTICK; VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 買:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED; 賣:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2)),COLOR00FF00 ; STICKLINE(VOL>0,VOL,0,2,1),COLORWHITE; STICKLINE( 買>0,0, 買,1 ,0),COLORLIRED; 買賣差:=(買+賣); 買賣比:ABS(買/賣); N日內(nèi)凈流入:SUM (買賣差,N), LINETHICK2,COLORGREEN; 流入:IF (N日內(nèi)凈流入>REF(N日內(nèi)凈流入,1),N日內(nèi)凈流入,DRAWNULL),COLORMAGENTA,LINETHICK2; M日內(nèi)翻紅天數(shù):=COUNT(買賣差>0,M); 連紅天數(shù):=BARSLASTCOUNT(買賣差>0); {當(dāng)天大單} VAR3:=BUYVOL ; VAR4:=SELLVOL; VAR5:=IF(VAR3*C*100>200000,VAR3,0);{成交在20萬以上的大單} VAR6:=IF(VAR4*C*100>200000,VAR4,0);{成交在20萬以上的大單} 委買:=SUM(VAR5,0); 委賣:=SUM(VAR6,0); 大單買賣比:委買/委賣; {當(dāng)天小單比} 小單買賣比:1-大單買賣比; |
|
來自: 我醉清風(fēng) > 《股票》