老师还是那位大侠帮帮忙

fugongcha

文华改tb 哪里有问题
Params
        Numeric N(2);
        Numeric Q(0);
       
Vars
        NumericSeries HH;
        NumericSeries Lh;
        NumericSeries h1;
        NumericSeries l1;
        NumericSeries h2;
        NumericSeries l2;
        NumericSeries K1;
        NumericSeries K2;
        NumericSeries G;
Begin
        hh = HighestFC(High,n);
        lh = LowestFC(Low,n);
        h1 = IIF(hh<hh[1]&&lh<lh[1]&&OPEN[1]>Close&&OPEN>CLOSE&&(HighestFC(Open,q)-CLOSE)>q,hh[n],0);
        l1 = IIF(lh>lh[1]&&hh>hh[1]&&Open[1]<CLOSE&&Open<CLOSE&&(CLOSE-LowestFC(Open,0))>q,lh[n],0);
        If(h1>0)
        {
                h2=h1;
        }Else
        {
            h2=h1[1];
        }
        If(l1>0)
        {
                l2=l1;
        }Else
        {
            l2=l1[1];
        }
        k1 = IIF(CLOSE>h2,-3,IIF(Close<l2,1,0));
        If(k1!=0)
        {
            k2 = k1;
        }Else
        {
                k2 = k1[1];
        }
        If(k2==1)
        {
                G = h2;
        }Else
        {
                G =l2;
        }
        /*G =Iif(k2=1,h2,l2);*/
        PlotNumeric("g",g);




End


文华码
HH:=HHV(HIGH,N);
LH:=LLV(LOW,N);
H1:=IFELSE(HH<REF(HH,1)&&LH<REF(LH,1)&&REF(OPEN,1)>CLOSE&&OPEN>CLOSE&&(HHV(OPEN,Q)-CLOSE)>Q1,REF(HH,N1),0);
L1:=IFELSE(LH>REF(LH,1)&&HH>REF(HH,1)&&REF(OPEN,1)<CLOSE&&OPEN<CLOSE&&(CLOSE-LLV(OPEN,Q))>Q1,REF(LH,N1),0);
H2:=VALUEWHEN(H1>0,H1);
L2:=VALUEWHEN(L1>0,L1);
K1:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE<L2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
G:=IFELSE(K2=1,H2,L2);