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

投资者咨询:请老师帮改一下 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-5-23 12:46
 Y:=(H+L)/2; 
R1:=REF(SMA(Y,8,1),5); 
A:=H;  
A1:=REF(H,1); 
A2:=REF(H,2); 
A3:=REF(H,3); 
A4:=REF(H,4); 
A5:=REF(H,5); 
A6:=REF(H,6); 
A7:=REF(H,7); 
A8:=REF(H,8); 
B:=L;  
B1:=REF(L,1); 
B2:=REF(L,2); 
B3:=REF(L,3); 
B4:=REF(L,4); 
B5:=REF(L,5); 
B6:=REF(L,6); 
B7:=REF(L,7); 
B8:=REF(L,8); 
FF1:=A2>A1 AND A2>A AND A2>A3 AND A2>A4; 
FF2:=A3=A2 AND A2>A1 AND A2>A AND A2>A4 AND A2>A5; 
FF3:=A4=A3 AND A3=A2 AND A2>A1 AND A2>A AND A2>A5 AND A2>A6; 
FF4:=A2=A4 AND A2>A1 AND A2>A AND A2>A3 AND A2>A5 AND A2>A6; 
FF44:=A2=A3 AND A2=A4 AND A2=A5 AND A2>A1 AND A2>A AND A2>A6 AND A2>A7; 
FF5:=A6=A4 AND A4=A2 AND A2>A1 AND A2>A AND A2>A7 AND A2>A8 AND A2>A3 AND A2>A5; 
FF6:=B2<B1 AND B2<B AND B2<B3 AND B2<B4; 
FF7:=B3=B2 AND B2<B1 AND B2<B AND B2<B4 AND B2<B5; 
FF8:=B2=B3 AND B4=B2 AND B2<B1 AND B2<B AND B2<B5 AND B2<B6; 
FF9:=B2=B4 AND B2<B1 AND B2<B AND B2<B3 AND B2<B5 AND B2<B6; 
FF99:=B2=B3 AND B2=B4 AND B2=B5 AND B2<B1 AND B2<B AND B2<B6 AND B2<B7; 
FF10:=B2=B4 AND B2=B6 AND B2<B1 AND B2<B AND B2<B3 AND B2<B5 AND B2<B7 AND B2<B8; 
FF11:=FF1 OR FF2 OR FF3 OR FF4 OR FF44 OR FF5; 
FF12:=FF6 OR FF7 OR FF8 OR FF9 OR FF99 OR FF10; 
FF13:=BACKSET(FF11,3); 
FF133:=FILTER(FF13,2); 
FF14:=BACKSET(FF12,3); 
FF144:=FILTER(FF14,2); 
SF:=IF(FF11,A2,REF(A2,BARSLAST(FF11))); 
XF:=IF(FF12,B2,REF(B2,BARSLAST(FF12))); 
KTEXT(FF133 AND H>R1,0,1.001*H,2,COLORGREEN,'∧'),ALIGN1,VALIGN0,FONTSIZE10;  
KTEXT(FF144 AND L<R1,0,1*L,1,COLORGREEN,'∨'),ALIGN1,VALIGN0,FONTSIZE10; 
KTEXT(FF133 AND H<R1,0,1.001*H,2,COLORGREEN,'∧'),ALIGN1,VALIGN0,FONTSIZE10;  
KTEXT(FF144 AND L>R1,0,1*L,1,COLORGREEN,'∨'),ALIGN1,VALIGN0,FONTSIZE10; 

上面是一个顶底分析指标,我想进一步过滤,也就是在原有的基础之上增加一个,当前后相邻的3个顶分型中,中间的顶分型是最高的则保留,两边的2个就过滤掉,底分型也一样。说简单的就是: 在顶分型里面 再 进行相邻三个比较再进一步顶分型。   


技术人员回复
日期:2018-5-23 13:48

参考:

 

 Y:=(H+L)/2;
R1:=REF(SMA(Y,8,1),5);
A:=H; 
A1:=REF(H,1);
A2:=REF(H,2);
A3:=REF(H,3);
A4:=REF(H,4);
A5:=REF(H,5);
A6:=REF(H,6);
A7:=REF(H,7);
A8:=REF(H,8);
B:=L; 
B1:=REF(L,1);
B2:=REF(L,2);
B3:=REF(L,3);
B4:=REF(L,4);
B5:=REF(L,5);
B6:=REF(L,6);
B7:=REF(L,7);
B8:=REF(L,8);
FF1:=A2>A1 AND A2>A AND A2>A3 AND A2>A4;
FF2:=A3=A2 AND A2>A1 AND A2>A AND A2>A4 AND A2>A5;
FF3:=A4=A3 AND A3=A2 AND A2>A1 AND A2>A AND A2>A5 AND A2>A6;
FF4:=A2=A4 AND A2>A1 AND A2>A AND A2>A3 AND A2>A5 AND A2>A6;
FF44:=A2=A3 AND A2=A4 AND A2=A5 AND A2>A1 AND A2>A AND A2>A6 AND A2>A7;
FF5:=A6=A4 AND A4=A2 AND A2>A1 AND A2>A AND A2>A7 AND A2>A8 AND A2>A3 AND A2>A5;
FF6:=B2<B1 AND B2<B AND B2<B3 AND B2<B4;
FF7:=B3=B2 AND B2<B1 AND B2<B AND B2<B4 AND B2<B5;
FF8:=B2=B3 AND B4=B2 AND B2<B1 AND B2<B AND B2<B5 AND B2<B6;
FF9:=B2=B4 AND B2<B1 AND B2<B AND B2<B3 AND B2<B5 AND B2<B6;
FF99:=B2=B3 AND B2=B4 AND B2=B5 AND B2<B1 AND B2<B AND B2<B6 AND B2<B7;
FF10:=B2=B4 AND B2=B6 AND B2<B1 AND B2<B AND B2<B3 AND B2<B5 AND B2<B7 AND B2<B8;
FF11:=FF1 OR FF2 OR FF3 OR FF4 OR FF44 OR FF5;
FF12:=FF6 OR FF7 OR FF8 OR FF9 OR FF99 OR FF10;
FF13:=BACKSET(FF11,3);
FF133:FILTER(FF13,2),NODRAW;
FF14:=BACKSET(FF12,3);
FF144:=FILTER(FF14,2);
SF:=IF(FF11,A2,REF(A2,BARSLAST(FF11)));
XF:=IF(FF12,B2,REF(B2,BARSLAST(FF12)));

HH:=VALUEWHEN(FF133,H);
NN1:SUMBARS(FF133,1),NODRAW;
NN2:SUMBARS(FF133,2),NODRAW;
NN3:SUMBARS(FF133,3),NODRAW;
TJ1:HH<REF(HH,NN1)&&REF(HH,NN1)>REF(HH,NN2),NODRAW;
LL:=VALUEWHEN(FF144,L);
MM1:SUMBARS(FF144,1),NODRAW;
MM2:SUMBARS(FF144,2),NODRAW;
MMJ3:SUMBARS(FF144,3),NODRAW;
TJ2:LL>REF(LL,MM1)&&REF(LL,MM1)<REF(LL,MM2),NODRAW;

KTEXT(FF133 AND H>R1 AND NOT(TJ1),0,1.001*H,2,COLORGREEN,'∧'),ALIGN1,VALIGN2,FONTSIZE10; 
KTEXT(FF144 AND L<R1 AND NOT(TJ2),0,1*L,1,COLORGREEN,'∨'),ALIGN1,VALIGN0,FONTSIZE10;
KTEXT(FF133 AND H<R1 AND NOT(TJ1),0,1.001*H,2,COLORGREEN,'∧'),ALIGN1,VALIGN2,FONTSIZE10; 
KTEXT(FF144 AND L>R1 AND NOT(TJ2),0,1*L,1,COLORGREEN,'∨'),ALIGN1,VALIGN0,FONTSIZE10;