同花顺缠背驰 均线背驰副图源码

以下是同花顺缠背驰 均线背驰副图源码

可以判断拐点的产生，准确率还算可以的，但不是百分百

var1:=MA(C,p1)-MA(C,P2);
 IF((var1>=0),var1,0),STICK,colorred;
 IF((var1<0),var1,0),STICK,colorgreen;
正:=IF((var1>=0),var1,0),colorred;
负:=IF((var1<0),var1,0),colorgreen;
 zheng:=0;
 fu:=0;
 var2:=0;
 i:=0;
 IF (var1>0) THEN BEGIN
 var2:=var1;
 WHILE (var2>0) DO BEGIN
 zheng:=zheng+var2;
 i:=i+1;
 var2:=REF(var1,i);
 IF (i>P3) THEN BREAK;
 END
 END
 ELSE
 BEGIN
 var2:=var1;
 WHILE (var2<0) DO
 BEGIN
 fu:=fu+var2;
 i:=i+1;
 var2:=REF(var1,i);
 IF (i>P3) THEN BREAK;
 END
 END
 {涨势面积和:zheng;}
涨势平均力度:zheng*p4/i,coloryellow;
 {跌势面积和:fu;}
跌势平均力度:fu*p4/i,colorwhite;
中轴:0;