{本公式是根据多名高手指标改编，整理，如有不敬，还请谅解}

{抄来主图
本公式是根据多名高手指标改编，整理}
DRAWGBK(CLOSE=CLOSE,COLORRGB(90,90,90),COLORRGB(0,0,0),1);
var1:=INBLOCK('上海A股');
深沪转换:=if(var1=1,(2/7),1.3);
{此处加上转换，是为了更接近于今日收盘价，实际还是看趋势嘛}

收:=10000*close/indexc*深沪转换;
高:=10000*high/indexh*深沪转换;
低:=10000*low/indexl*深沪转换;
开:=10000*open/indexo*深沪转换;

BBI:=(MA(收,3)+MA(收,6)+MA(收,12)+MA(收,24))/4,colorgreen;
UPR:=BBI+2*STD(BBI,20),COLORRED;DWN:=BBI-2*STD(BBI,20),Color6D0076;
DRAWICON(BBI<REF(BBI,1) AND ISLASTBAR,BBI,5),SHIFT1,ALIGN2;
DRAWICON(BBI>REF(BBI,1) AND ISLASTBAR,BBI,4),SHIFT1,,ALIGN1;
DRAWICON(UPR<REF(UPR,1) AND ISLASTBAR,UPR,5),SHIFT1,,ALIGN2;
DRAWICON(UPR>REF(UPR,1) AND ISLASTBAR,UPR,4),SHIFT1,,ALIGN1;
DRAWICON(DWN>REF(DWN,1) AND ISLASTBAR,DWN,4),SHIFT1,,ALIGN1;
DRAWICON(DWN<REF(DWN,1) AND ISLASTBAR,DWN,5),SHIFT1,,ALIGN2;
FILLRGN(UPR>BBI,UPR,BBI),COLORGRAY;
FILLRGN(BBI>DWN,BBI,DWN),Color6d6666;

建仓:BBI>REF(BBI,1) AND UPR>REF(UPR,1) AND DWN>REF(DWN,1) AND ISLASTBAR,linethick0;

STICKLINE(收>=开,收,开,8,0.2),COLORRED;
STICKLINE(收>=开,高,低,0.2,0.2),COLORRED;
STICKLINE(收<开,收,开,8,0.2),colorgreen;
STICKLINE(收<开,低,高,0.2,0.2),colorgreen;
快线: EMA(SLOPE(EMA(收,15),10)*15+收,5),coloryellow,linethick1,PRECISION2;
均线:= EMA(EMA(快线,3),3),colorwhite,linethick2;

慢线: EMA(均线,3),colorcyan,linethick0,PRECISION2;
动态底部:if(EMA(IF(低<= LLV(低,60),SMA(ABS(低-REF(低,1)),60,1)/SMA(MAX(低-REF(低,1),0),99,1),0)*5,3),1,0),linethick0;

{黄金记号}
input: N(5,1,100);
A1:=ref(高,N)=hhv(高,2*N+1);
B1:=filter(A1,N);
C1:=backset(B1,N+1);
D1:=filter(C1,n);{高点}
A2:=ref(低,N)=llv(低,2*N+1);
B2:=filter(A2,N);
C2:=backset(B2,N+1);
D2:=filter(C2,N);{低点}
E1:=(ref(llv(低,2*N),1)+ref(hhv(高,2*N),1))/2;
E2:=(高+低)/2;{高低点出现在同一K线上时可作取舍}
H1:=(D1 AND not(D2 AND E1>=E2)) OR barstatus=2 OR barscount(c)=1;
L1:=(D2 AND not(D1 AND E1<E2)); 
H2:=D1 AND not(D2 AND E1>=E2);
X1:=ref(barslast(H1),1)+1;
F1:=backset(H1 AND count(L1,X1)>0,llvbars
(if(L1,l,10000),X1));
G1:=F1>ref(F1,1);
I1:=backset(G1,2);
LD:=I1>ref(I1,1);{过滤后低点}
L2:=LD OR barstatus=2 OR barscount(收)=1;
X2:=ref(barslast(L2),1)+1;
F2:=backset(L2 AND count(H2,X2)>0,hhvbars(if(H2,高,0),X2));
G2:=F2>ref(F2,1);
I2:=backset(G2,2); HD:=I2>ref(I2,1);{过滤后高点}
R1:=backset(barstatus=2,barslast(HD)+1); S1:=R1>ref(R1,1); {前一高}
T1:=backset(barstatus=2,barslast(LD)+1); U1:=T1>ref(T1,1); {前一低}
R2:=backset(S1,ref(barslast(HD),1)+2); S2:=R2>ref(R2,1); {前二高}
T2:=backset(U1,ref(barslast(LD),1)+2); U2:=T2>ref(T2,1); {前二低}
T3:=backset(U2,ref(barslast(LD),1)+2); U3:=T3>ref(T3,1); {前三低}
T4:=backset(U3,ref(barslast(LD),1)+2); U4:=T4>ref(T4,1); {前四低}
R3:=backset(S2,ref(barslast(HD),1)+2); S3:=R3>ref(R3,1); {前三高}
R4:=backset(S3,ref(barslast(HD),1)+2); S4:=R4>ref(R4,1); {前四高}
短压:drawline(S2,高,S1,高,1),Colorff;
中压:drawline(S3,高,S2,高,1),Colorwhite,linedot;
长压:drawline(S4,高,S3,高,1),Coloryellow;
{短撑:}drawline(U2,低,U1,低,1),Colorgreen,linedot;
{中撑:drawline(U3,低,U2,低,0),Colorgreen;
{长撑:}drawline(U4,低,U3,低,0),Colorgreen;}
DRAWICON(S1,高*1.01,10);
DRAWICON(S2,高*1.01,10);
DRAWICON(S3,高*1.01,10);
DRAWICON(S4,高*1.01,10);
DRAWICON(U1,低*0.99,9);
DRAWICON(U2,低*0.99,9);
DRAWICON(U3,低*0.99,9);
DRAWICON(U4,低*0.99,9);