咨詢內容：

請老師幫忙修改

D2:=FILTER(BACKSET(FILTER(REF(L,3)=LLV(L,2*3+1),3),3+1),3);
E1:=(REF(LLV(L,2*3),1)+REF(HHV(H,2*3),1))/2;?
H1:=(FILTER(BACKSET(FILTER(REF(H,3)=HHV(H,2*3+1),3),3+1),3) AND NOT(D2 AND E1>=(H+L)/2)) OR ISLASTBAR OR BARSCOUNT(C)=1;
F11:=BACKSET(H1 AND COUNT((D2 AND NOT(FILTER(BACKSET(FILTER(REF(H,3)=HHV(H,2*3+1),3),3+1),3) AND E1<(H+L)/2)),REF(BARSLAST(H1),1)+1)>0,LLVBARS(IF((D2 AND NOT(FILTER(BACKSET(FILTER(REF(H,3)=HHV(H,2*3+1),3),3+1),3) AND E1<(H+L)/2)),L,10000),REF(BARSLAST(H1),1)+1));
I1:=BACKSET(IF(ISNULL(F11),0,1)>REF(IF(ISNULL(F11),0,1),1),2);?
X2:=REF(BARSLAST(I1>REF(I1,1) OR ISLASTBAR OR BARSCOUNT(C)=1),1)+1;?
F22:=BACKSET(I1>REF(I1,1) OR ISLASTBAR OR BARSCOUNT(C)=1 AND COUNT(FILTER(BACKSET(FILTER(REF(H,3)=HHV(H,2*3+1),3),3+1),3) AND NOT(D2 AND E1>=(H+L)/2),X2)>0,HHVBARS(IF(FILTER(BACKSET(FILTER(REF(H,3)=HHV(H,2*3+1),3),3+1),3) AND NOT(D2 AND E1>=(H+L)/2),H,0),X2));
HD:=BACKSET(IF(ISNULL(F22),0,1)>REF(IF(ISNULL(F22),0,1),1),2)>REF(BACKSET(IF(ISNULL(F22),0,1)>REF(IF(ISNULL(F22),0,1),1),2),1);
VV:=BACKSET(ISLASTBAR,BARSLAST(I1>REF(I1,1))+1)>REF(BACKSET(ISLASTBAR,BARSLAST(I1>REF(I1,1))+1),1);
XX:=BACKSET(VV,REF(BARSLAST(I1>REF(I1,1)),1)+2)>REF(BACKSET(VV,REF(BARSLAST(I1>REF(I1,1)),1)+2),1);
VV2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1)>REF(BACKSET(ISLASTBAR,BARSLAST(HD)+1),1);
XX2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2)>REF(BACKSET(VV2,REF(BARSLAST(HD),1)+2),1);
大支撐:REF(L,BARSLAST(VV)),COLORRED,LINETHICK1;
小支撐:REF(L,BARSLAST(XX)),COLORRED,DOT,LINETHICK1;
大阻力:REF(H,BARSLAST(XX2)),COLORGREEN,LINETHICK1;
小阻力:REF(H,BARSLAST(VV2)),COLORGREEN,DOT,LINETHICK1;

?

?來源:程序化99網（ www.tumamayizhan.com ）

博易技術人員： D2:=FILTER(BACKSET(FILTER(REF(L,3)=LLV(L,2*3+1),3),3+1),3);
E1:=(REF(LLV(L,2*3),1)+REF(HHV(H,2*3),1))/2;?
H1:=(FILTER(BACKSET(FILTER(REF(H,3)=HHV(H,2*3+1),3),3+1),3) AND NOT(D2 AND E1>=(H+L)/2)) OR ISLASTBAR OR BARSCOUNT(C)=1;
F11:=BACKSET(H1 AND COUNT((D2 AND NOT(FILTER(BACKSET(FILTER(REF(H,3)=HHV(H,2*3+1),3),3+1),3) AND E1<(H+L)/2)),REF(BARSLAST(H1),1)+1)>0,LLVBARS(IF((D2 AND NOT(FILTER(BACKSET(FILTER(REF(H,3)=HHV(H,2*3+1),3),3+1),3) AND E1<(H+L)/2)),L,10000),REF(BARSLAST(H1),1)+1));
I1:=BACKSET(IF(F11,1,0)>REF(IF(F11,1,0),1),2);?
X2:=REF(BARSLAST(I1>REF(I1,1) OR ISLASTBAR OR BARSCOUNT(C)=1),1)+1;?
F22:=BACKSET(I1>REF(I1,1) OR ISLASTBAR OR BARSCOUNT(C)=1 AND COUNT(FILTER(BACKSET(FILTER(REF(H,3)=HHV(H,2*3+1),3),3+1),3) AND NOT(D2 AND E1>=(H+L)/2),X2)>0,HHVBARS(IF(FILTER(BACKSET(FILTER(REF(H,3)=HHV(H,2*3+1),3),3+1),3) AND NOT(D2 AND E1>=(H+L)/2),H,0),X2));
HD:=BACKSET(IF(F22,1,0)>REF(IF(F22,1,0),1),2)>REF(BACKSET(IF(F22,1,0)>REF(IF(F22,1,0),1),2),1);
VV:=BACKSET(ISLASTBAR,BARSLAST(I1>REF(I1,1))+1)>REF(BACKSET(ISLASTBAR,BARSLAST(I1>REF(I1,1))+1),1);
XX:=BACKSET(VV,REF(BARSLAST(I1>REF(I1,1)),1)+2)>REF(BACKSET(VV,REF(BARSLAST(I1>REF(I1,1)),1)+2),1);
VV2:=BACKSET(ISLASTBAR,BARSLAST(HD)+1)>REF(BACKSET(ISLASTBAR,BARSLAST(HD)+1),1);
XX2:=BACKSET(VV2,REF(BARSLAST(HD),1)+2)>REF(BACKSET(VV2,REF(BARSLAST(HD),1)+2),1);
大支撐:REF(L,BARSLAST(VV)),COLORRED,LINETHICK1;
小支撐:REF(L,BARSLAST(XX)),COLORRED,POINTDOT,LINETHICK1;
大阻力:REF(H,BARSLAST(XX2)),COLORGREEN,LINETHICK1;
小阻力:REF(H,BARSLAST(VV2)),COLORGREEN,POINTDOT,LINETHICK1; 來源 程序化久久網