通达信大单流入流出指标 副图源码 贴图

N:=20;JJ:=(HIGH+LOW+CLOSE)/3;QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
 QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
 QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));
 QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
 QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));
 DDX:((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,1000000,10000),COLOR00AAAA,LINETHICK;
 DX:=MA(DDX,5)*N;
 STICKLINE(DDX>0,0,DDX,3,0),COLOR000088;
 STICKLINE(DDX>0,0,DDX,2.5,0),COLOR0000AA;
 STICKLINE(DDX>0,0,DDX,1.5,0),COLOR0000CC;
 STICKLINE(DDX>0,0,DDX,1,0),COLOR0000EE;
 STICKLINE(DDX<0,0,DDX,3,0),COLOR008800;
 STICKLINE(DDX<0,0,DDX,2.5,0),COLOR00AA00;
 STICKLINE(DDX<0,0,DDX,1.5,0),COLOR00CC00;
 STICKLINE(DDX<0,0,DDX,1,0),COLORFFFF00;
万:AMOUNT/10000,COLORFF00FF,NODRAW;
 VAR1:=AMOUNT/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
流入万:IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),AMOUNT/2))/10000,COLORRED,NODRAW;
流出万:IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-AMOUNT/2))/10000,COLOR00FF00,NODRAW;
额万:流入万+流出万,COLORFFFF00,NODRAW;
 {线:=MA(CLOSE,1)-MA(CLOSE,6),NODRAW;}
 YUWEI:=MA(CLOSE,1)-MA(CLOSE,6),NODRAW;
 {量:(线),VOLSTICK;};