咨詢內容：

請老師修改

N:=BARSLAST(DATE<>REF(DATE,1))+1;
HH:=HHVBARS(H,N);
LL:=LLVBARS(L,N);
A1:BACKSET(ISLASTBAR,REF(HH,N)+N+1),NODRAW;
A2:=BACKSET(ISLASTBAR,REF(LL,N)+N+1);
DRAWICON(CROSS(A1=1,0.5),H,'ICO88');//最高點是當日的第一根K線可表示
DRAWICON(CROSS(A2=1,0.5),L,'ICO88');//最低點是當日的第一根K線可表示
DRAWSL(CROSS(A1=1,0.5),H,0,1,2,COLORRED),LINETHICK2;
DRAWSL(CROSS(A2=1,0.5),L,0,1,2,COLORGREEN),LINETHICK2;
DRAWNUMBER(ISLASTBAR,VALUEWHEN(CROSS(A1=1,0.5),H),VALUEWHEN(CROSS(A1=1,0.5),H),0,COLORRED),ALIGN0;
DRAWNUMBER(ISLASTBAR,VALUEWHEN(CROSS(A2=1,0.5),L),VALUEWHEN(CROSS(A2=1,0.5),L),0,COLORGREEN),ALIGN0;



HH1:=IF(H<REF(H,2)&&REF(H,1)<REF(H,2),HV(H,2),0);
LL1:=IF(L>REF(L,2)&&REF(L,1)>REF(L,2),LV(L,2),0);
HH2:=VALUEWHEN(HH1>0,HH1);
LL2:=VALUEWHEN(LL1>0,LL1);
K1:=IF(CLOSE>HH2,-3,IF(CLOSE<LL2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
AA:BACKSET(ISLASTBAR,BARSLAST(CROSS(K2,0)||CROSS(0,K2))+1),NODRAW;
DRAWSL(AA&&BARSLAST( CROSSDOWN(K2,0))<BARSLAST(CROSS(K2,0)),VALUEWHEN( CROSSDOWN(K2,0), H),0,1,0,COLORBLUE),LINETHICK3;
DRAWSL(AA&&BARSLAST( CROSSDOWN(K2,0))>BARSLAST(CROSS(K2,0)),VALUEWHEN( CROSS(K2,0), L),0,1,0,COLORYELLOW),LINETHICK3;

DRAWCOLORKLINE(AA&&BARSLAST(CROSSDOWN(K2,0))<BARSLAST(CROSS(K2,0))&&C>VALUEWHEN(CROSSDOWN(K2,0),H),COLORRED,0);
DRAWCOLORKLINE(AA&&BARSLAST(CROSSDOWN(K2,0))<BARSLAST(CROSS(K2,0))&&C<VALUEWHEN(CROSSDOWN(K2,0),H),COLORBLUE,0);

DRAWTEXT(AA&&BARSLAST(CROSSDOWN(K2,0))<BARSLAST(CROSS(K2,0))&&CROSS(C,VALUEWHEN(CROSSDOWN(K2,0),H)),H,'漲破'),FONTSIZE25;

DRAWCOLORKLINE(AA&&BARSLAST(CROSSDOWN(K2,0))>BARSLAST(CROSS(K2,0))&&C>VALUEWHEN(CROSS(K2,0),L),COLORBLUE,0);
DRAWCOLORKLINE(AA&&BARSLAST(CROSSDOWN(K2,0))>BARSLAST(CROSS(K2,0))&&C<VALUEWHEN(CROSS(K2,0),L),COLORGREEN,0);

DRAWTEXT(AA&&BARSLAST(CROSSDOWN(K2,0))>BARSLAST(CROSS(K2,0))&&CROSSDOWN(C,VALUEWHEN(CROSS(K2,0),L)),L,'跌破'),FONTSIZE25;

?

?來源:程序化99網（ www.weiqiv.net.cn ）

博易技術人員： N:=BARSLAST(DATE<>REF(DATE,1))+1;
HH:=HHVBARS(H,N);
LL:=LLVBARS(L,N);
A1:BACKSET(ISLASTBAR,REF(HH,N)+N+1),NODRAW;
A2:=BACKSET(ISLASTBAR,REF(LL,N)+N+1);
DRAWICON(CROSS(A1=1,0.5),H,1);//最高點是當日的第一根K線可表示
DRAWICON(CROSS(A2=1,0.5),L,1);//最低點是當日的第一根K線可表示
DRAWSL(CROSS(A1=1,0.5),H,0,1,2),COLORRED,LINETHICK2;
DRAWSL(CROSS(A2=1,0.5),L,0,1,2),COLORGREEN,LINETHICK2;
DRAWNUMBER(ISLASTBAR,VALUEWHEN(CROSS(A1=1,0.5),H),VALUEWHEN(CROSS(A1=1,0.5),H),0),COLORRED,ALIGN0;
DRAWNUMBER(ISLASTBAR,VALUEWHEN(CROSS(A2=1,0.5),L),VALUEWHEN(CROSS(A2=1,0.5),L),0),COLORGREEN,ALIGN0;



HH1:=IF(H<REF(H,2)&&REF(H,1)<REF(H,2),HHV(H,2),0);
LL1:=IF(L>REF(L,2)&&REF(L,1)>REF(L,2),LLV(L,2),0);
HH2:=VALUEWHEN(HH1>0,HH1);
LL2:=VALUEWHEN(LL1>0,LL1);
K1:=IF(CLOSE>HH2,-3,IF(CLOSE<LL2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
AA:BACKSET(ISLASTBAR,BARSLAST(CROSS(K2,0)||CROSS(0,K2))+1),NODRAW;
DRAWSL(AA&&BARSLAST( CROSS(0,K2))<BARSLAST(CROSS(K2,0)),VALUEWHEN( CROSS(0,K2), H),0,1,0),COLORBLUE,LINETHICK3;
DRAWSL(AA&&BARSLAST( CROSS(0,K2))>BARSLAST(CROSS(K2,0)),VALUEWHEN( CROSS(K2,0), L),0,1,0),COLORYELLOW,LINETHICK3;

DRAWKLINEEX(AA&&BARSLAST(CROSS(0,K2))<BARSLAST(CROSS(K2,0))&&C>VALUEWHEN(CROSS(0,K2),H),H,O,L,C),COLORRED;
DRAWKLINEEX(AA&&BARSLAST(CROSS(0,K2))<BARSLAST(CROSS(K2,0))&&C<VALUEWHEN(CROSS(0,K2),H),H,O,L,C),COLORBLUE;

DRAWTEXT(AA&&BARSLAST(CROSS(0,K2))<BARSLAST(CROSS(K2,0))&&CROSS(C,VALUEWHEN(CROSS(0,K2),H)),H,'漲破'),FONTSIZE25;

DRAWKLINEEX(AA&&BARSLAST(CROSS(0,K2))>BARSLAST(CROSS(K2,0))&&C>VALUEWHEN(CROSS(K2,0),L),H,O,L,C),COLORBLUE;
DRAWKLINEEX(AA&&BARSLAST(CROSS(0,K2))>BARSLAST(CROSS(K2,0))&&C<VALUEWHEN(CROSS(K2,0),L),H,O,L,C),COLORGREEN;

DRAWTEXT(AA&&BARSLAST(CROSS(0,K2))>BARSLAST(CROSS(K2,0))&&CROSS(VALUEWHEN(CROSS(K2,0),L),C),L,'跌破'),FONTSIZE25; 謝謝老師
? 來源 程序化久久網