///支撑压力主图////
N:=5;
明支:CLOSE-(AMOUNT/VOL/100-LOW),LINETHICK0;
明阻:CLOSE+(AMOUNT/VOL/100-LOW),LINETHICK0;
B:=CLOSE*VOL;
D:=EMA((MA(B,4)/MA(VOL,4)+MA(B,6)/MA(VOL,6)+MA(B,13)/MA(VOL,13)+MA(B,24)/MA(VOL,24))/4,1);
1.08*D,COLORB27FCE;
D*0.92,COLORB27FCE;
压力:MA(EMA(CLOSE,34)*N,5),LINETHICK0,COLORblue;
支撑:MA(EMA(CLOSE,34)*(2-N),5),LINETHICK0,COLORblue;
CYC∞:DMA(AMOUNT/(100*VOL),VOL/(100*FINANCE(7))),linethick3,COLOR8138F3;

Var1:=SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)*100;
Var2:=(3*CLOSE+LOW+OPEN+HIGH)/6;
Var3:=(20*Var2+19*REF(Var2,1)+18*REF(Var2,2)+17*REF(Var2,3)+16*REF(Var2,4)+15*REF(Var2,5)+14*REF(Var2,6)+13*REF(Var2,7)+12*REF(Var2,8)+11*REF(Var2,9)+10*REF(Var2,10)+9*REF(Var2,11)+8*REF(Var2,12)+7*REF(Var2,13)+6*REF(Var2,14)+5*REF(Var2,15)+4*REF(Var2,16)+3*REF(Var2,17)+2*REF(Var2,18)+REF(Var2,20))/210;
Var4:=MA(Var3,13);
DRAWTEXT(CROSS(84,Var1),HIGH*1.1,'▼卖出点'), colorblue;
DRAWTEXT(REF(CROSS(Var3,Var4),2) AND Var3>1.005*Var4,Var4,'▲买入点'), colorblue;

Var5:=MA(C,5);
Var6:=MA(C,10);
Var7:=MA(C,20);
Var8:=MA(C,30);
h1a:=(var5+var6+var7+var8)/4;
MA(h1a,5),colorblue;
MA(h1a,6),COLORGREEN;
MA(h1a,7),COLORGREEN;
MA(h1a,8),COLORGREEN;
MA(h1a,9),COLORGREEN;
MA(h1a,10),COLORGREEN;
MA(h1a,11),COLORGREEN;
MA(h1a,12),COLORYELLOW;
MA(h1a,13),colorblue,linethick3;
MA(h1a,14),colorYELLOW;
MA(h1a,15),COLORGREEN;
MA(h1a,16),COLORGREEN;
MA(h1a,17),COLORGREEN;
MA(h1a,18),COLORGREEN;
MA(h1a,19),COLORGREEN;
MA(h1a,20),COLORGREEN;
MA(h1a,21),COLORBLUE;

partline(C>MA(h1a,13),MA(h1a,13)),COLORYELLOW,linethick3;
partline(C>MA(h1a,13),MA(h1a,5)),COLORYELLOW;
partline(C>MA(h1a,13),MA(h1a,6)),COLORRED;
partline(C>MA(h1a,13),MA(h1a,7)),COLORRED;
partline(C>MA(h1a,13),MA(h1a,8)),COLORRED;
partline(C>MA(h1a,13),MA(h1a,9)),COLORRED;
partline(C>MA(h1a,13),MA(h1a,10)),COLORRED;
partline(C>MA(h1a,13),MA(h1a,11)),COLORRED;
partline(C>MA(h1a,13),MA(h1a,12)),COLORGREEN;
partline(C>MA(h1a,13),MA(h1a,13)),COLORYELLOW,LINETHICK2;
partline(C>MA(h1a,13),MA(h1a,14)),COLORGREEN;
partline(C>MA(h1a,13),MA(h1a,15)),COLORRED;
partline(C>MA(h1a,13),MA(h1a,16)),COLORRED;
partline(C>MA(h1a,13),MA(h1a,17)),COLORRED;
partline(C>MA(h1a,13),MA(h1a,18)),COLORRED;
partline(C>MA(h1a,13),MA(h1a,19)),COLORRED;
partline(C>MA(h1a,13),MA(h1a,20)),COLORRED;
partline(C>MA(h1a,13),MA(h1a,21)),COLORYELLOW;

KOH:=L>REF(H,1);
KOL:=H<REF(L,1);
HIF:=L>REF(H,BARSLAST(KOH)+1);
NHIF:=L<=REF(H,BARSLAST(KOH)+1);
LIF:=H<REF(L,BARSLAST(KOL)+1);
NLIF:=H>=REF(L,BARSLAST(KOL)+1);
DRAWICON(HIF AND barslast(koh)<barslast(nhif) and BARSLAST(HIF)<BARSLAST(NHIF),REF(H,BARSLAST(KOH)+1),10),ALIGN0;
DRAWICON(LIF AND barslast(kol)<barslast(nlif) and BARSLAST(LIF)<BARSLAST(NLIF),REF(L,BARSLAST(KOL)+1),11),ALIGN0;

A:=AMOUNT/VOL/100;
C0:=REF(C,2)*0.865;
C1:=REF(C,13)*0.772;
DSY:=100*vol/CApitAl;
MR1:If((C-MIN(C0,C1))/C<0.1 AND SUM(DSY,5)/5<1.8,0.75*CLOSE+(MA(C,20)-0.75*CLOSE)/3, 0.75*CLOSE),COLORRED;
PJ:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
HJ:=SUM(AMOUNT,13)/A/100;
CN:= DMA(PJ,VOL/HJ);Delarbo:=((((CLOSE-CN)/CN)*100-REF(((CLOSE-CN)/CN)*100,1)));
MR2:if(  CROSS(  ((CLOSE-CN)/CN)*100  ,-20 )  OR CROSS(  ((CLOSE-CN)/CN)*100  ,-19 )   OR     ( SUM(DSY,5)/5<2.8
AND (CLOSE-min(C0,C1))/CLOSE<0.15 AND ((REF(C,2)-REF(C,1))/REF(C,2))<0.025 AND (    ( CROSS(  ((CLOSE-CN)/CN)*100  ,-18 ) ) 
OR( CROSS(  ((CLOSE-CN)/CN)*100  ,-17 ) ) or( CROSS(  ((CLOSE-CN)/CN)*100  ,-16 ) ) or( CROSS(  ((CLOSE-CN)/CN)*100  ,-15 ) And (Delarbo>2.8))  or(
CROSS(  ((CLOSE-CN)/CN)*100  ,-14 ) And (Delarbo>2.8))  or( CROSS(  ((CLOSE-CN)/CN)*100  ,-13 ) And (Delarbo>2.8)) or( CROSS(  ((CLOSE-CN)/CN)*100  ,-12 )
And (Delarbo>2.8))  or( CROSS(  ((CLOSE-CN)/CN)*100  ,-11 ) And (Delarbo>2.8))  or( CROSS(  ((CLOSE-CN)/CN)*100  ,-10 ) And (Delarbo>2.8)) or( CROSS(  ((CLOSE
-CN)/CN)*100  , -9 ) And (Delarbo>2.8))  or( CROSS(  ((CLOSE-CN)/CN)*100  , -8 ) And (Delarbo>2.8)) or( CROSS(  ((CLOSE-CN)/CN)*100  , -7 ) And (Delarbo>2.8))
  or( CROSS(  ((CLOSE-CN)/CN)*100  , -6 ) And (Delarbo>2.8))  or( CROSS(  ((CLOSE-CN)/CN)*100  , -5 ) And (Delarbo>2.8))  or( CROSS(  ((CLOSE-CN)/CN)*100  ,
-4 ) And (Delarbo>2.8))  or( CROSS(  ((CLOSE-CN)/CN)*100  , -3 ) And (Delarbo>2.8))  or( CROSS(  ((CLOSE-CN)/CN)*100  , -2 ) And (Delarbo>2.8))  or( CROSS( 
((CLOSE-CN)/CN)*100  , -1 ) And (Delarbo>2.8))  or( CROSS(  ((CLOSE-CN)/CN)*100  ,  0 ) And (Delarbo>2.8))  or( CROSS(  ((CLOSE-CN)/CN)*100  ,  1 ) And
(Delarbo>2.8))  )  ),0.75*CLOSE+(MA(C,20)-0.75*CLOSE)/3,0.75*C),COLORGREEN;
MR3:IF( ( (Delarbo>5.8) AND ((C-REF(C,1))/REF(C,1))<0.08 AND REF(((CLOSE-CN)/CN)*100,1)<-3.8 ),0.75*CLOSE+(MA(C,20)-0.75*CLOSE)/3,0.75*C),COLORblack;