通达信副图源码

V3:=1;
 VAR1:=(HIGH+LOW+CLOSE)/3;
 CZ1:=SUM(MAX(0,HIGH-REF(VAR1,1)),26)/SUM(MAX(0,REF(VAR1,1)-LOW),26)*100;
 CZ:=EMA(CZ1,4)*V3;
 AA:= REF(MA(CZ,10),5);
 BB:= REF(MA(CZ,20),9);
 CC:= REF(MA(CZ,40),17);
 AA1:="OBV";
 XX:=IF(AA>BB,IF(AA>CC,AA,CC),IF(BB>CC,BB,CC))*V3;
 QQ:=IF(AA<BB,IF(AA<CC,AA,CC),IF(BB<CC,BB,CC))*V3;
 D1:=XX*AA1;
 D2:=QQ*AA1;
 MMNL:CZ*AA1 COLORRED;
 ZZ1:=(XX+QQ)/2*AA1;
 VAR5:=CZ*AA1;
 VAR3:=1;
 MM:=EMA(SLOPE(VAR5,21)*20+VAR5,55)*VAR3;
 QS:MM;
 SS:=EMA(VAR5,3);
 SS1:=EMA(SS,5)*VAR3;
 MFNL:SS  COLORWHITE;
 MM1:=REF(SS,1);
 KK:=SS1 ;
 KL:=VAR5-MM;
 STICKLINE(KL>=0,VAR5,MM,0.5,0) COLORRED;
 STICKLINE(KL<0,VAR5,MM,0.5,0) COLORGREEN;
 MA21:MA(SS,21);