通达信变异成交量源码附图

PRN:=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),N,1);
 HDN:=HIGH-REF(HIGH,1);
 LDN:=REF(LOW,1)-LOW;
 DMPN:=SMA(IF(HDN>0 AND HDN>LDN,HDN,0),N,1);
 DMMN:=SMA(IF(LDN>0 AND LDN>HDN,LDN,0),N,1);
 PDIN:=DMPN*100/TR;
 MDIN:=DMMN*100/TR;
 ADX:=SMA(ABS(MDIN-PDIN)/(MDIN+PDIN)*100,N,1);
熊力:=DMMN*100/TR;
 RRYUE:=DMMN*100/PRN;
 BJH:=RRYUE<14;谭氏富五代
MTR:=EXPMEMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
 HD:=HIGH-REF(HIGH,1);
 LD:=REF(LOW,1)-LOW;
 DMP:=EXPMEMA(IF(HD>0 AND HD>LD,HD,0),14);
 DMM:=EXPMEMA(IF(LD>0 AND LD>HD,LD,0),14);
 DI:=DMM*100/TR;
 PY:=COUNT(CLOSE>REF(CLOSE,1),12)/12*100;
 VOLU:=VOL/PY;
 FGBJ:MA(VOLU,60)*12/10000;
 VOLUME:VOL/DI/10000,VOLSTICK;
量动:IF(VOLUME>FGBJ,VOLUME*1.1,0);
量动绿红:0,NODRAW,COLORGREEN;
上升:IF(FGBJ>=REF(FGBJ,1),FGBJ,DRAWNULL),COLORRED,LINETHICK2;
下降:IF(FGBJ<REF(FGBJ,1),FGBJ,DRAWNULL),COLORGREEN,LINETHICK2;
 PPQ:=VOLUME>FGBJ AND VOLUME>REF(VOLUME,1)*5;
 XC1:=COUNT(PPQ,20);
 XC2:=VOLUME<REF(VOLUME,1)*0.3 OR VOLUME<REF(VOLUME,2)*0.2 AND XC1;
 XC22:=VOLUME<REF(VOLUME,1)*0.2 AND XC1;
 XC3:=VOLUME>REF(VOLUME,1)*5 OR VOLUME>REF(VOLUME,2)*5 AND VOLUME>FGBJ AND BJH;
 XC4:=VOLUME>REF(VOLUME,1)*10 OR VOLUME>REF(VOLUME,2)*10 AND VOLUME>FGBJ AND BJH;
 XC5:=VOLUME>REF(VOLUME,1)*20 OR VOLUME>REF(VOLUME,2)*20 AND VOLUME>FGBJ;
 TDXSTEP106:STICKLINE(XC3,0,VOLUME,3,0),COLORMAGENTA;
 TDXSTEP107:STICKLINE(XC4,0,VOLUME,3,0),COLORYELLOW;
 TDXSTEP108:STICKLINE(XC5,0,VOLUME,3,0),COLORGRAY;
 TDXSTEP109:STICKLINE(XC2,0,VOLUME,3,0),COLORGREEN;
 TDXSTEP110:STICKLINE(XC22,0,VOLUME,3,0),COLORWHITE;
 TDXSTEP111:DRAWICON(XC3,VOLUME+1,34);

{-----------------------------------}