辛苦老师改成博易用，谢谢！　[博易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.CXH99.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; 多谢老师！ 来源 程序化久久网