WMA Signal for Amibroker (AFL)

_SECTION_BEGIN("mac signal fin");
m=Param("4° media",100,2,200,1);
n=Param("3° media",50,1,200,1);
p=Param("2° media",15,1,200,1);
q=Param("1° media",5,1,200,1);

MAc=(WMA(C,p)-WMA(C,n))/WMA(C,p);
MAc2=(WMA(C,n)-WMA(C,m))/WMA(C,n);

MAc4=(WMA(C,q)-WMA(C,p))/WMA(C,p);

diff=MAc+MAc2;


 MAC3 = diff;
signA=MAc2;
MAc5=diff+MAc4;
 MaxGraph=10;


Graph0 = MAC3 ;Graph0BarColor=colorBlue;
Graph1= signA;
Graph2=MAc5; Graph2Style= 6   

;Graph0BarColor=IIf(Graph2>Graph0 ,colorGreen,colorDarkRed); 
Graph5=2*(MAC5 -signA);
Graph5Style=16384  +4096;
Graph3Style=Graph0Style=Graph1Style=4;
Graph4=3*(mac5-MAC3 ) ;
; Graph4Style=6;
Graph3=0;
Graph0Style=4  ;
Graph2Style=4;


Graph4BarColor=Graph5BarColor=IIf( Graph5>=0 AND Graph2>=Ref(0,-1) , colorCustom1,IIf( Graph5>=0 AND Graph2<Ref(0,-1) , colorCustom1,IIf( Graph5<0 AND Graph2<Ref(0,-1) ,colorRed,colorRed)));
Graph4BarColor=IIf( Graph4>=0 , colorDarkGreen,colorDarkRed);
Graph3Color=colorBlack;

Title="mac 4 ("+q+" , "+p+" , "+n+" , "+m+")  =" +Prec(Graph2 ,3) + "  signal= "+ Prec(MAc3,3) + "  long mac="+ Prec(Graph1 ,3) + "  histo-dark="+ Prec(Graph2 ,3) + "  histo-bright="+ Prec(Graph5 ,3) ;
_SECTION_END();