文章
文章用户商铺文档快讯有问必答话题

老师你好，这个公式可否帮我继续优化 (文华财经WH6赢顺V6.7)

投资者咨询：老师你好，这个公式可否帮我继续优化 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-7-18 10:20
 希望改成只有两个颜色，上升阶段红色，下跌阶段绿色，震荡阶段黄色；拐点的时候，可否改成多线粘合形态，拐点生效后，开始发散线条；最好标记买卖点

 M1:=4;
M2:=6;
M3:=9;
M4:=13;
M5:=18;
M6:=24;
PB1:(EMA(CLOSE,M1)+MA(CLOSE,M1*2)+MA(CLOSE,M1*4))/3;
PB2:(EMA(CLOSE,M2)+MA(CLOSE,M2*2)+MA(CLOSE,M2*4))/3;
PB3:(EMA(CLOSE,M3)+MA(CLOSE,M3*2)+MA(CLOSE,M3*4))/3;
PB4:(EMA(CLOSE,M4)+MA(CLOSE,M4*2)+MA(CLOSE,M4*4))/3;
PB5:(EMA(CLOSE,M5)+MA(CLOSE,M5*2)+MA(CLOSE,M5*4))/3;
PB6:(EMA(CLOSE,M6)+MA(CLOSE,M6*2)+MA(CLOSE,M6*4))/3;//定义6条瀑布线
MM:=MIN1(PB1,PB2,PB3,PB4,PB5,PB6);
NN:=MAX1(PB1,PB2,PB3,PB4,PB5,PB6);
MN:=ABS(MM-NN);
TJ1:=PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1);
TJ2:=PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1);
CON:=MN<LV(MN,30)&&MN<REFX(MN,1)&&REFX(TJ1,1);
COM:=MN>HV(MN,30)&&MN>REFX(MN,1)&&REFX(TJ2,1);
DRAWICON(CON,MM,1);
DRAWICON(COM,NN,2);
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB1,NULL),COLORRED;
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB2,NULL),COLORRED;
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB3,NULL),COLORRED;
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB4,NULL),COLORRED;
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB5,NULL),COLORRED;
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB6,NULL),COLORRED;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB1,NULL),COLORGREEN;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB2,NULL),COLORGREEN;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB3,NULL),COLORGREEN;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB4,NULL),COLORGREEN;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB5,NULL),COLORGREEN;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB6,NULL),COLORGREEN;

技术人员回复
日期:2018-7-18 10:36

源码中MN:=ABS(MM-NN);是判断是否粘合的依据，是符合您1楼的思路的

 

改颜色参考：

 

M1:=4;
M2:=6;
M3:=9;
M4:=13;
M5:=18;
M6:=24;
PB1:(EMA(CLOSE,M1)+MA(CLOSE,M1*2)+MA(CLOSE,M1*4))/3,COLORYELLOW;
PB2:(EMA(CLOSE,M2)+MA(CLOSE,M2*2)+MA(CLOSE,M2*4))/3,COLORYELLOW;
PB3:(EMA(CLOSE,M3)+MA(CLOSE,M3*2)+MA(CLOSE,M3*4))/3,COLORYELLOW;
PB4:(EMA(CLOSE,M4)+MA(CLOSE,M4*2)+MA(CLOSE,M4*4))/3,COLORYELLOW;
PB5:(EMA(CLOSE,M5)+MA(CLOSE,M5*2)+MA(CLOSE,M5*4))/3,COLORYELLOW;
PB6:(EMA(CLOSE,M6)+MA(CLOSE,M6*2)+MA(CLOSE,M6*4))/3,COLORYELLOW;//定义6条瀑布线
MM:=MIN1(PB1,PB2,PB3,PB4,PB5,PB6);
NN:=MAX1(PB1,PB2,PB3,PB4,PB5,PB6);
MN:=ABS(MM-NN);
TJ1:=PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1);
TJ2:=PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1);
CON:=MN<LV(MN,30)&&MN<REFX(MN,1)&&REFX(TJ1,1);
COM:=MN>HV(MN,30)&&MN>REFX(MN,1)&&REFX(TJ2,1);
DRAWICON(CON,MM,1);
DRAWICON(COM,NN,2);
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB1,NULL),COLORRED;
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB2,NULL),COLORRED;
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB3,NULL),COLORRED;
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB4,NULL),COLORRED;
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB5,NULL),COLORRED;
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB6,NULL),COLORRED;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB1,NULL),COLORGREEN;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB2,NULL),COLORGREEN;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB3,NULL),COLORGREEN;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB4,NULL),COLORGREEN;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB5,NULL),COLORGREEN;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB6,NULL),COLORGREEN;

投资者咨询：老师你好，这个公式可否帮我继续优化 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-7-18 10:20
 你好，改完后，视觉上还是比较混乱，无法清晰提供进出场信号
技术人员回复
日期:2018-7-18 13:31

 原指标中进出点过多是因为判断粘合的参数太小，修改红字部分，可以改变进出场频率，参考：

 

N:=80;
M1:=4;
M2:=6;
M3:=9;
M4:=13;
M5:=18;
M6:=24;
PB1:(EMA(CLOSE,M1)+MA(CLOSE,M1*2)+MA(CLOSE,M1*4))/3,COLORYELLOW;
PB2:(EMA(CLOSE,M2)+MA(CLOSE,M2*2)+MA(CLOSE,M2*4))/3,COLORYELLOW;
PB3:(EMA(CLOSE,M3)+MA(CLOSE,M3*2)+MA(CLOSE,M3*4))/3,COLORYELLOW;
PB4:(EMA(CLOSE,M4)+MA(CLOSE,M4*2)+MA(CLOSE,M4*4))/3,COLORYELLOW;
PB5:(EMA(CLOSE,M5)+MA(CLOSE,M5*2)+MA(CLOSE,M5*4))/3,COLORYELLOW;
PB6:(EMA(CLOSE,M6)+MA(CLOSE,M6*2)+MA(CLOSE,M6*4))/3,COLORYELLOW;//定义6条瀑布线
MM:=MIN1(PB1,PB2,PB3,PB4,PB5,PB6);
NN:=MAX1(PB1,PB2,PB3,PB4,PB5,PB6);
MN:=ABS(MM-NN);
TJ1:=PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1);
TJ2:=PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1);
CON:=MN<LV(MN,N)&&MN<REFX(MN,1)&&REFX(TJ1,1);
COM:=MN>HV(MN,N)&&MN>REFX(MN,1)&&REFX(TJ2,1);
DRAWICON(CON,MM,1);
DRAWICON(COM,NN,2);
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB1,NULL),COLORRED;
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB2,NULL),COLORRED;
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB3,NULL),COLORRED;
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB4,NULL),COLORRED;
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB5,NULL),COLORRED;
IF(PB1>REF(PB1,1)&&PB2>REF(PB2,1)&&PB3>REF(PB3,1)&&PB4>REF(PB4,1)&&PB5>REF(PB5,1)&&PB6>REF(PB6,1),PB6,NULL),COLORRED;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB1,NULL),COLORGREEN;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB2,NULL),COLORGREEN;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB3,NULL),COLORGREEN;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB4,NULL),COLORGREEN;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB5,NULL),COLORGREEN;
IF(PB1<REF(PB1,1)&&PB2<REF(PB2,1)&&PB3<REF(PB3,1)&&PB4<REF(PB4,1)&&PB5<REF(PB5,1)&&PB6<REF(PB6,1),PB6,NULL),COLORGREEN;