文華指標2

N:=33;

UR:=6;

LR:=6;

TC1:=IF(H=HHV(H,8*UR),H,NULL);

TC2:=REFX1(BARSLAST(TC1=H),10000)+1;

UPPER:=REFX1(IF(TC2=1,H,REF(H,TC2-1)),10000),NODRAW;

BC1:=IF(L=LLV(L,8*LR),L,NULL);

BC2:=REFX1(BARSLAST(BC1=L),10000)+1;

LOWER:=REFX1(IF(BC2=1,L,REF(L,BC2-1)),10000),NODRAW;

CURRBARSCOUNT:=DATACOUNT-BARPOS+1;

LP:=CURRBARSCOUNT<=BC2 AND L=LOWER,NODRAW;

HP:=CURRBARSCOUNT<=TC2 AND H=UPPER,NODRAW;

NOD:=(IF(TC2>BC2,TC2,BC2)-IF(TC2>BC2,BC2,TC2));

LR1:=FORCAST(C,NOD+1);

NP:=IF(CURRBARSCOUNT<=MAX(BC2,TC2),REFX1(IF(MIN(TC2,BC2)=1,LR1,REF(LR1,MIN(TC2,BC2)-1)),10000),NULL),COLORFFFFFF;

LR2:=SLOPE(C,NOD+1);

LR3:=REFX1(IF(MIN(TC2,BC2)=1,LR2,REF(LR2,MIN(TC2,BC2)-1)),10000);

FP:=NP-LR3*(NOD),POINTDOT,COLORFFFFFF;

EQU:(NP+FP)/2,COLORFFFFFF;

DRAWSL(ISLASTBAR&&EQU>FP,EQU,0,-BARSLAST(EQU>0&&REF(ISNULL(EQU),1)),0,COLORRED),LINETHICK4;

DRAWSL(ISLASTBAR&&EQU0&&REF(ISNULL(EQU),1)),0,COLORCYAN),LINETHICK4;

DRAWNUMBER(ISLASTBAR&&EQU>FP,EQU,C,2,COLORRED),ALIGN0,FONTSIZE50,VALIGN1;

DRAWNUMBER(ISLASTBAR&&EQU

DRAWSL(ISLASTBAR&&EQU=FP,EQU,0,-BARSLAST(EQU>0&&REF(ISNULL(EQU),1)),0,COLORGREEN),LINETHICK4;

DRAWNUMBER(ISLASTBAR&&EQU=FP,EQU,C,2,COLORGREEN),ALIGN0,FONTSIZE50,VALIGN1;

IF(EQU=FP,FP,NULL),COLORGREEN;

DRAWSL(ISLASTBAR&&EQU>=FP,EQU,0,-BARSLAST(EQU>0&&REF(ISNULL(EQU),1)),0,COLORRED),LINETHICK4;

DRAWSL(ISLASTBAR&&EQU<=FP,EQU,0,-BARSLAST(EQU>0&&REF(ISNULL(EQU),1)),0,COLORCYAN),LINETHICK4;

DRAWNUMBER(ISLASTBAR&&EQU>=FP,EQU,C,2,COLORRED),ALIGN0,FONTSIZE50,VALIGN1;

DRAWNUMBER(ISLASTBAR&&EQU<=FP,EQU,C,2,COLORCYAN),ALIGN0,FONTSIZE50,VALIGN1;

HH:=H>HV(H,N);

NH:=BARSLAST(HH)+1;

LL:=L

NL:=BARSLAST(LL)+1;

AH:=BACKSET(COUNT(LL,NH)&&LL,NH);

AL:=BACKSET(COUNT(HH,NL)&&HH,NL);

DRAWLINE1(CROSS(AH=1,0.5),H,CROSS(AL=1,0.5),L,0),LINETHICK3,COLORRED;

DRAWLINE1(CROSS(AL=1,0.5),L,CROSS(AH=1,0.5),H,0),LINETHICK3,COLORCYAN;

DRAWCOLORLINE(REFX1(NP>=FP,1000),NP,COLORRED,COLORCYAN),POINTDOT;

DRAWSL(BARSLAST(CROSS(AH=1,0.5))

DRAWSL(BARSLAST(CROSS(AH=1,0.5))>BARSLAST(CROSS(AL=1,0.5))&&ISLASTBAR,VALUEWHEN(CROSS(AH=1,0.5),H),0,-BARSLAST(CROSS(AH=1,0.5)),0,COLORRED),LINETHICK3;

閱讀更多 德蒙爾樂 的文章

關鍵字: FP BC2 BARSLAST