通达信“新量能成交量”副图公式用法: {135均线} VOLUME:VOL,VOLSTICK; MAVOL1:MA(VOLUME,5)LINETHICK2,COLORFFFFFF; MAVOL2:MA(VOLUME,135),LINETHICK2,COLORYELLOW; {主力量能} SHORT:=12; LONG:=26; MID:=9; DIF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG); DEA:=EMA(DIF,MID); MACD:=(DIF-DEA)*2,COLORSTICK; STICKLINE(DIF>DEA,0,VOL,3,0),COLORRED; STICKLINE(DIF<DEA,0,VOL,3,0),COLORGREEN; N:=9; M1:=3; M2:=3; RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100; K:=SMA(RSV,M1,1); D:=SMA(K,M2,1); J:=3*K-2*D; STICKLINE(J>D,VOL/2,VOL,3,0),COLORRED; STICKLINE(J<D,VOL/2,VOL,3,0),COLORGREEN; {量能潮} TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,240,1))))); MTIME:=MOD(FROMOPEN,TOTAL); CTIME:=IF(MTIME<0.5,TOTAL,MTIME); VVOL:IF(CURRBARSCOUNT=1,VOL*TOTAL/CTIME,DRAWNULL),NODRAW; STICKLINE(CURRBARSCOUNT=1 && (SETCODE=0 || SETCODE=1),VVOL,0,-1,-1),COLOR00C0C0; VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL); OBV1:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0); OBV2:=EMA(OBV1,3)-MA(OBV1,9); OBV3:=EMA(IF(OBV2>0,OBV2,0),3); MAC3:=MA(C,3); STICKLINE(OBV3>REF(OBV3,1) AND MAC3>REF(MAC3,1),0,OBV3,2,0),COLORYELLOW; |
