投资者咨询：老师帮忙改一下 (文华财经WH6赢顺V6.7)
来源:文华财经 日期:2018-5-29 20:33
底分型:HHV(H,2)>REF(H,2)&&REF(HHV(H,2),3)>REF(H,2)&&LLV(L,2)>REF(L,2)&&REF(LLV(L,2),3)>REF(L,2);
KTEXT(底分型,-1,REF(L,2),0,COLORYELLOW,'底'),VALIGN0;
顶分型:HHV(H,2)<REF(H,2)&&REF(HHV(H,2),3)<REF(H,2)&&LLV(L,2)<REF(L,2)&&REF(LLV(L,2),3)<REF(L,2);
KTEXT(顶分型,-1,REF(H,2),0,COLORGREEN,'顶'),VALIGN2;
MA10:MA(C,10);
MA20:MA(C,20);
CROSS(MA10,MA20),BPK;
CROSSDOWN(MA10,MA20),SPK;
LL:IF(EXIST(N2=1,BARSBK),REF(LLV(L,5),N2),NULL);
C<LL-5*MINPRICE,SP;
HH:IF(EXIST(N1=1,BARSSK),REF(HHV(H,5),N1),NULL);
C>HH+5*MINPRICE,BP;
MA10:MA(C,10);
MA20:MA(C,20);
CROSS(MA10,MA20),BK;
AD:=(REF(H,1)>=REF(H,2)&&REF(L,1)<=REF(L,2))||(REF(H,1)<=REF(H,2)&&REF(L,1)>=REF(L,2));
DL:=H>REF(H,1)&&L>REF(L,1)&&REF(H,1)<REF(H,2)&&REF(L,1)<REF(L,2);//底分型
DL1:=H>LV(H,2)&&L>LV(L,2)&&LV(H,2)<REF(H,3)&&LV(L,2)<REF(L,3)&&AD;//包含关系处理的底分型
N2:=BARSLAST(DL||DL1)+1;
LL:=IF(EXIST(N2=1,BARSBK),REF(LLV(L,4),N2),NULL);
C<LL-5*MINPRICE,SP;
CROSSDOWN(MA10,MA20),SP;
AUTOFILTER;
AUTOFILTER;
技术人员回复
日期:2018-5-29 20:43
参考：
KTEXT(底分型,-1,REF(L,2),0,COLORYELLOW,'底'),VALIGN0;
N2:=BARSLAST(底分型)+1;
//这里不能通过，需要改一下
顶分型:HHV(H,2)<REF(H,2)&&REF(HHV(H,2),3)<REF(H,2)&&LLV(L,2)<REF(L,2)&&REF(LLV(L,2),3)<REF(L,2);
KTEXT(顶分型,-1,REF(H,2),0,COLORGREEN,'顶'),VALIGN2;
N1:=BARSLAST(顶分型)+1;//这里
MA10:MA(C,10);
MA20:MA(C,20);
CROSS(MA10,MA20),BPK;
CROSSDOWN(MA10,MA20),SPK;
LL:IF(EXIST(N2=1,BARSBK),REF(LLV(L,5),N2),NULL);
C<LL-5*MINPRICE,SP;
HH:IF(EXIST(N1=1,BARSSK),REF(HHV(H,5),N1),NULL);
C>HH+5*MINPRICE,BP;
CROSS(MA10,MA20),BK;
AD:=(REF(H,1)>=REF(H,2)&&REF(L,1)<=REF(L,2))||(REF(H,1)<=REF(H,2)&&REF(L,1)>=REF(L,2));
DL:=H>REF(H,1)&&L>REF(L,1)&&REF(H,1)<REF(H,2)&&REF(L,1)<REF(L,2);//底分型
DL1:=H>LV(H,2)&&L>LV(L,2)&&LV(H,2)<REF(H,3)&&LV(L,2)<REF(L,3)&&AD;//包含关系处理的底分型
CROSSDOWN(MA10,MA20),SP;
AUTOFILTER;
