通达信力度探寻副图通用源码

m5:=MA(c,5);
 m10:=MA(c,10);
 m25:=MA(c,25);
 m60:=MA(c,60);
 m90:=MA(c,90);
 m120:=MA(c,120);
 m240:=MA(c,240);
 xl5:=ATAN((m5/ref(m5,1)-1)*100)*180/3.1416;
 xl10:=ATAN((m10/ref(m10,1)-1)*100)*180/3.1416;
 xl25:=ATAN((m25/ref(m25,1)-1)*100)*180/3.1416;
 xl60:=ATAN((m60/ref(m60,1)-1)*100)*180/3.1416;
 xl90:=ATAN((m90/ref(m90,1)-1)*100)*180/3.1416;
 xl120:=ATAN((m120/ref(m120,1)-1)*100)*180/3.1416;
 (xl5+2*xl10+3*XL25)/6;
 (3*xl25+2*xl60+XL90)/6;
 (1*xl60+2*xl90+3*XL120)/6;
 0;