通达信变异成交量源码附图
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 谭氏富五代
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);
{-----------------------------------}
