再發(fā)“盤中選股(動態(tài)買賣)”指標(biāo)、選股雙公式源碼 是盤中抓漲停和大漲股票神奇武器 - 公明...

本帖隱藏的內(nèi)容需要回復(fù)才可以瀏覽

附圖指標(biāo)：盤中選股：
VAR0:=VOL/CLOSE/2;
VAR1:=SUM(IF(VAR0>100 AND CLOSE>REF(CLOSE,1),VAR0,0),0);
VAR2:=SUM(IF(VAR0>100 AND CLOSE<REF(CLOSE,1),VAR0,0),0);
VAR3:=SUM(IF(VAR0<100 AND CLOSE>REF(CLOSE,1),VAR0,0),0);
VAR4:=SUM(IF(VAR0<100 AND CLOSE<REF(CLOSE,1),VAR0,0),0);
VAR5:=VAR1+VAR2+VAR3+VAR4;
VAR6:=IF(BARSTATUS=2,100*VAR1/VAR5,0);
VAR7:=IF(BARSTATUS=2,100*VAR2/VAR5,0);
VAR8:=IF(BARSTATUS=2,100*VAR3/VAR5,0);
VAR9:=IF(BARSTATUS=2,100*VAR4/VAR5,0);
機(jī)構(gòu)買盤:VAR1,LINETHICK3,COLORFF55FF;
機(jī)構(gòu)賣盤:VAR2,LINETHICK3,COLORFFFF55;
散戶買盤:VAR3,COLOR5555FF;
散戶賣盤:VAR4,COLOR55FF55;
DRAWTEXTREL(1003,870,'機(jī)構(gòu)買盤'),LINETHICK2,COLORFF55FF;
DRAWTEXTREL(1003,570,'機(jī)構(gòu)賣盤'),LINETHICK2,COLORFFFF55;
DRAWTEXTREL(1003,320,'散戶買盤'),LINETHICK2,COLOR5555FF;
DRAWTEXTREL(1003,50,'散戶賣盤'),LINETHICK2,COLOR55FF55;
IF BARSTATUS=2 THEN BEGIN
DRAWTEXTREL(1020,750,''+FLOOR(VAR6)+'%'),LINETHICK2,COLORFF55FF;
END
IF BARSTATUS=2 THEN BEGIN
LOOP0:=FLOOR(VAR7);
VAR10:=''+LOOP0;
VAR11:=VAR10 + '%';
DRAWTEXTREL(1020,460,VAR11),LINETHICK2,COLORFFFF55;
END
IF BARSTATUS=2 THEN BEGIN
LOOP1:=FLOOR(VAR8);
VAR12:=''+LOOP1;
VAR13:=VAR12+'%';
DRAWTEXTREL(1020,200,VAR13),LINETHICK2,COLOR5555FF;
END
IF BARSTATUS=2 THEN BEGIN
LOOP2:=FLOOR(VAR9);
VAR14:=''+LOOP2;
VAR15:=VAR14+'%';
DRAWTEXTREL(1020,-50,VAR15),LINETHICK2,COLOR55FF55;
END

選股公式：
VAR0:=VOL/CLOSE/2;
VAR1:=SUM(IF(VAR0>100 AND CLOSE>REF(CLOSE,1),VAR0,0),0);
VAR2:=SUM(IF(VAR0>100 AND CLOSE<REF(CLOSE,1),VAR0,0),0);
VAR3:=SUM(IF(VAR0<100 AND CLOSE>REF(CLOSE,1),VAR0,0),0);
VAR4:=SUM(IF(VAR0<100 AND CLOSE<REF(CLOSE,1),VAR0,0),0);
VAR5:=VAR1+VAR2+VAR3+VAR4;
VAR1>VAR2 AND VAR3>VAR4 AND VAR1>REF(VAR1,1) AND
REF(VAR1,1)>REF(VAR1,2) AND
(VAR1+VAR3)/VAR5*100>60;