MA1:MA(CLOSE,5);
MA2:MA(CLOSE,10);
MA3:MA(CLOSE,20);
MA4:MA(CLOSE,40);
MA5:MA(CLOSE,60);
DD1:=CROSS(MA1,MA2);
KK1:=CROSS(MA2,MA1);
DD2:=CROSS(MA2,MA3);
KK2:=CROSS(MA3,MA2);
DD3:=CROSS(MA3,MA4);
KK3:=CROSS(MA4,MA3);
DD4:=CROSS(MA4,MA5);
KK4:=CROSS(MA5,MA4);
VERTLINE1(DD1 ),COLORRED;
VERTLINE1(KK1 ),COLORGREEN;
VERTLINE1(DD2 ),COLORMAGENTA;
VERTLINE1(KK2 ),COLORYELLOW;
VERTLINE1(DD3 ),COLORWHITE;
VERTLINE1(KK3 ),COLORCYAN;
VERTLINE1(DD4 ),RGB(255,128,0);
VERTLINE1(KK4 ),COLORBLUE;
gspt:=REF(DD1 OR DD2 OR DD3 OR DD4,1);
KKK:=REF(KK1 OR KK2 OR KK3 OR KK4,1);
PLAYSOUND(gspt,'A');
PLAYSOUND(KKK,'B');
MA1_UP:=MA1>REF(MA1,1);
MA2_UP:=MA2>REF(MA2,1);
MA3_UP:=MA3>REF(MA3,1);
MA4_UP:=MA4>REF(MA4,1);
MA5_UP:=MA5>REF(MA5,1);
DRAWCOLORLINE(MA1_UP,MA1,COLORRED,COLORGREEN),LINETHICK2;
DRAWCOLORLINE(MA2_UP,MA2,COLORRED,COLORGREEN),LINETHICK2;
DRAWCOLORLINE(MA3_UP,MA3,COLORMAGENTA,COLORYELLOW),LINETHICK2;
DRAWCOLORLINE(MA4_UP,MA4,COLORMAGENTA,COLORCYAN),LINETHICK2;
DRAWCOLORLINE(MA5_UP,MA5,COLORMAGENTA,COLORYELLOW),LINETHICK2;
gspt1:=REF(CROSS(MA1>REF(MA1,1),0.5) OR CROSS(MA2>REF(MA2,1),0.5) OR CROSS(MA3>REF(MA3,1),0.5) OR CROSS(MA4>REF(MA4,1),0.5),1);
KKK1:=REF(CROSS(MA1< REF(MA1,1),0.5) OR CROSS(MA2< REF(MA2,1),0.5) OR CROSS(MA3< REF(MA3,1),0.5) OR CROSS(MA4< REF(MA4,1),0.5),1);
PLAYSOUND(gspt1,'A');
PLAYSOUND(KKK1,'B');
多头排列:=MA1>MA2 AND MA2>MA3 AND MA3>MA4 AND MA4>MA5;
空头排列:=MA1< MA2 AND MA2< MA3 AND MA3< MA4 AND MA4< MA5;
DRAWICON(多头排列,MA5,4),VALIGN0;
DRAWICON(空头排列,MA5,5),VALIGN2;
gspt2:=REF(多头排列,1);
KKK2:=REF(空头排列,1);
PLAYSOUND(gspt2,'A');
PLAYSOUND(KKK2,'B');
粘合比例:=1.003;
间距比例:=MAX1(MA1,MA2,MA3,MA4,MA5)/MIN1(MA1,MA2,MA3,MA4,MA5);
粘合:=EVERY(间距比例< 粘合比例,10) AND 间距比例>0.97;
突破上沿:=CROSS(CLOSE,MAX(MA1,MAX(MA2,MAX(MA3,MAX(MA4,MA5)))));
突破下沿:=CROSS(MIN(MA1,MIN(MA2,MIN(MA3,MIN(MA4,MA5)))),CLOSE);
DRAWICON(突破上沿 AND REF(粘合,1),HIGH,1);
DRAWICON(突破下沿 AND REF(粘合,1),LOW,2);
gspt3:=REF(突破上沿 AND REF(粘合,1),1);
KKK3:=REF(突破下沿 AND REF(粘合,1),1);
PLAYSOUND(gspt3,'A');
PLAYSOUND(KKK3,'B');
