辛苦老師改成博易用，謝謝！　[博易POBO]

咨詢內容： 辛苦老師改成博易用，謝謝！
QQ:=C;?
A1:=REF(QQ,10)=HHV(QQ,2*10+1);?
B1:=FILTER(A1,10);?
C1:=BACKSET(B1,10+1);?
HD:=FILTER(C1,10);
A2:=REF(QQ,10)=LLV(QQ,2*10+1);?
B2:=FILTER(A2,10);?
C2:=BACKSET(B2,10+1);?
LD:=FILTER(C2,10);
A:=REF(H,BARSLAST(HD));?
B:=REF(L,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
N:BACKSET(ISLASTBAR,MAX(BARSLAST(CROSS(T1,0.5)),BARSLAST(CROSS(T2,0.5)))+1);

DRAWHORIZONTALLINE(N&&CROSS(T2,0.5),L,COLORLIGHTGREEN),LINETHICK2;
DRAWHORIZONTALLINE(N&&CROSS(T1,0.5),H,COLORRED),LINETHICK2;

DRAWNUMBER(ISLASTBAR,VALUEWHEN(CROSS(T2,0.5),L),VALUEWHEN(CROSS(T2,0.5),L),0,COLORLIGHTGREEN),FONTSIZE20;
DRAWNUMBER(ISLASTBAR,VALUEWHEN(CROSS(T1,0.5),H),VALUEWHEN(CROSS(T1,0.5),H),0,COLORRED),FONTSIZE20;

?

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

博易技術人員： QQ:=C;?
A1:=REF(QQ,10)=HHV(QQ,2*10+1);?
B1:=FILTER(A1,10);?
C1:=BACKSET(B1,10+1);?
HD:=FILTER(C1,10);
A2:=REF(QQ,10)=LLV(QQ,2*10+1);?
B2:=FILTER(A2,10);?
C2:=BACKSET(B2,10+1);?
LD:=FILTER(C2,10);
A:=REF(H,BARSLAST(HD));?
B:=REF(L,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
N:BACKSET(ISLASTBAR,MAX(BARSLAST(CROSS(T1,0.5)),BARSLAST(CROSS(T2,0.5)))+1);

DRAWSL(N&&CROSS(T2,0.5),L,0,0,2),COLORGREEN,LINETHICK2;
DRAWSL(N&&CROSS(T1,0.5),H,0,0,2),COLORRED,LINETHICK2;

DRAWNUMBER(ISLASTBAR,VALUEWHEN(CROSS(T2,0.5),L),VALUEWHEN(CROSS(T2,0.5),L),0),COLORGREEN,FONTSIZE10;
DRAWNUMBER(ISLASTBAR,VALUEWHEN(CROSS(T1,0.5),H),VALUEWHEN(CROSS(T1,0.5),H),0),COLORRED,FONTSIZE10; 多謝老師！ 來源 程序化久久網