老师,帮忙改一下 (文华财经WH6赢顺V6.7)

投资者咨询:老师,帮忙改一下 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-9-18 1:17
  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),POINTDOT,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&&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;

两根线,现在是虚线在横线下边都是青色,在上边都是红色
再加一个条件,两线重叠显示一根线的时候,都变成绿色

谢谢
技术人员回复
日期:2018-9-18 8:17
 是要NP=FP时中间画绿线吗

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),POINTDOT,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&&EQU<=FP,EQU,0,-BARSLAST(EQU>0&&REF(ISNULL(EQU),1)),0,COLORCYAN),LINETHICK4;
DRAWSL(ISLASTBAR&&NP=FP,EQU,0,-BARSLAST(EQU>0&&REF(ISNULL(EQU),1)),0,COLORGREEN),LINETHICK4;
DRAWNUMBER(ISLASTBAR&&EQU>=FP,EQU,C,2,COLORRED),ALIGN0,FONTSIZE50,VALIGN1;
DRAWNUMBER(ISLASTBAR&&EQU<=FP,EQU,C,2,COLORCYAN),ALIGN0,FONTSIZE50,VALIGN1;

投资者咨询:老师,帮忙改一下 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-9-18 1:17
不理想,虚线没有了
保留虚线,只加个变色条件,是要NP=FP合成一条线的时候中间画绿线绿色报价,别的不用动
技术人员回复
日期:2018-9-18 20:45
 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),POINTDOT,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&&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;

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;