請教管理員技術問題

作者：開拓者 TB 來源：cxh99.com 發布時間：2016年06月07日

咨詢內容： Vars
Numeric i;
Numeric i1;
Numeric i2;
Numeric i3;
Numeric ah;
Numeric al;
Numeric bh;
Numeric bl;
Numeric ch;
Numeric cl;
Numeric A1;
Numeric B2;
Numeric C3;
Numeric D4;
Numeric E5;

Begin

If(h[1] > h[2] && l[1] >= l[2])
{
      For i = 1 to 100
   {
      If(h[i] > h[i+1] && l[i] >= l[i+1])
   {
         ah = h[1];
   al = l[i+1];
   i1 = i+1;
   }Else Break;
   }
      If(h[i1] <= h[i1+1] || l[i1] < l[i1+1])
   {
         For i = (i1+1) to 100
   {
         If(h[i] <= h[i+1] && l[i] < l[i+1])
{
      bh = h[i+1];
   bl = l[i1+1];
   i2 = i+1;
}Else Break;
   }
         If(h[i2] > h[i2+1] || l[i2] >= l[i2+1])
{
      For i = (i2+1) to 100
   {
      If(h[i] <= h[i+1] && l[i] < l[i+1])
   {
         ch = h[i+1];
   cl = l[i2+1];
   i3 = i+1;
   }Else Break;
   }
                     }
            }
   }
   A1 = ah;
   B2 = Lowest(al,bl);
   C3 = bh;
   D4 = cl;
   E5 = ch;

   Commentary("A1 = " + Text(A1));
   Commentary("B2 = " + Text(B2));
   Commentary("C3 = " + Text(C3));
   Commentary("D4 = " + Text(D4));
   Commentary("E5 = " + Text(E5));
   Commentary("i1 = " + Text(i1));
   Commentary("i2 = " + Text(i2));
   Commentary("i3 = " + Text(i3));

End

麻煩管理員幫忙看下，公式寫法上有沒有什么錯誤  ，為什么B2的值標注不出來？
TB技術人員： 管理員在么？為什么我發了好幾個問題都沒有人幫忙解答啊？是不是我問的問題沒有辦法解答或者問的太簡單了？還是我沒有問清楚？
TB客服：
cjy047 發表于 2016-4-5 19:55
管理員在么？為什么我發了好幾個問題都沒有人幫忙解答啊？是不是我問的問題沒有辦法解 ...

在公式里B2的計算依賴于al與bl的值，您可以輸出al 與bl的值看看都是什么情況。。
我這邊看到都是很奇怪的值，要么都是很大的值，要么都是0。自然出不了結果。。
另外，并非所有運算都需要循環，如果要用也要確保其結果是自己想要的。。
建議還是從循環這一塊著手再排查一下