{动力线}
量:=V;
换手:=V/CAPITAL*100;
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买盘:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
卖盘:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2));
DLX:=(买盘-(-卖盘))/量*换手;
{STICKLINE(DLX>0,0,DLX,2,0),COLORRED;
STICKLINE(DLX<0,0,DLX,2,0),COLORLIBLUE;}
{STICKLINE(DLX>0,0,DLX,5,0),;COLORRED}
STICKLINE(DLX>0,0,DLX,4,0),COLOR0000CC;
STICKLINE(DLX>0,0,DLX,3,0),COLOR3300CC;
STICKLINE(DLX>0,0,DLX,2,0),COLORBB52FF;
STICKLINE(DLX>0,0,DLX,1,0),COLORA4D1FF;
{STICKLINE(DLX<0,0,DLX,5,0),;COLOR1EFF1E}
STICKLINE(DLX<0,0,DLX,4,0),COLOR00F700;
STICKLINE(DLX<0,0,DLX,3,0),COLOR51FF51;
STICKLINE(DLX<0,0,DLX,2,0),COLOR75FF75;
STICKLINE(DLX<0,0,DLX,1,0),COLORA4FFA4;DLX1:SUM(DLX,6),COLORYELLOW;
DLX2:MA(DLX1,5),COLORMAGENTA;
DLX3:MA(DLX1,10),COLORGREEN;
A1:=SUMBARS(VOL,CAPITAL);
CMA:=IF(CAPITAL>0,SUM(AMOUNT,A1)/SUM(VOL,A1)/100,EMA(CLOSE,120));
换手价:CMA,LINETHICK0,COLORFFC0FF;{100%换手平均成本价};
{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
