 | |  |  |
分析家新能量潮源码公式：
N:=26;
N1:=6;
MAA:= MAX(HIGH,REF(CLOSE,1));
MI:= MIN(LOW,REF(CLOSE,1));
A1:=DISPSTATUS=1;
A2:=DISPSTATUS=2;
B2:=BARSSINCE(A1)+1;
HHN:=HHVBARS(HIGH,B2)+1;
LLN:LLVBARS(LOW,B2)+1,PRECIS0,COLORGRAY,LINETHICK0;
HS:IF(CATEGORY=1,100*VOL/CAPITAL,IF(CATEGORY=0,VOL/100000000,VOL/10000)),PRECIS2,LINETHICK0,COLORGRAY;
X:=SGN(CLOSE-REF(CLOSE,1))*HS;
KN:=IF(MAA=MI,HS/2,IF(HIGH=LOW,X,(MAA-CLOSE)*HS/(MAA-MI)));{空头能量}
DN:=IF(MAA=MI,HS/2,IF(HIGH=LOW,X,(CLOSE-MI)*HS/(MAA-MI)));{多头能量}
JN:=DN-KN;{净能量}
M:=MIN(B2,N);
SJN:SUM(JN,M),LINESTICK,PRECIS2,LINETHICK2,COLORGRAY;;
EM:EMA(SJN,N1),PRECIS2,LINETHICK2,color0088ff;
EEM:EMA(EM,N1),PRECIS2,LINETHICK2,COLOR9900FF;
LTHS:SUM(HS,LLN)/100,COLOR9900FF,PRECIS2,LINETHICK0;{低起总换手圈}
THS:SUM(HS,B2)*(DATATYPE>0)/100,PRECIS2,LINETHICK0;
上市天数:COUNT(close,0),pointdot,PRECIS0,LINETHICk0;{上市以来的总计交易天数。单位：百天}
sv:=SUM(vol,0);
上市来总均量:=sv/上市天数;{单位：手/天}
上市来总量比: vol/上市来总均量,PRECIS1,LINETHICK0,COLORgreen;
总换筹:=SUM(vol,0)/CAPITAL; {上市以来的总计换筹（手）次数。单位：次;对于上市后股本有过扩张的公司，若除权不准，则此结果可能有较大误差}
总均换手率: 总换筹/上市天数,LINETHICK0,COLORWHITE; {上市以来的平均换手率。单位：%;对于上市后股本有过扩张的公司，此数据可能有较大误差}
总换筹圈:总换筹,LINETHICK0,COLORyellow; {上市以来的总计换筹（手）次数。单位：次;对于上市后股本有过扩张的公司，若除权不准，则此结果可能有较大误差}; |
| |  | |  |
|
