求問為什么死循環了！　[開拓者 TB]

1. Params
   
2.     Numeric length(40);
   
3.         Numeric sob1(20);
   
4.         Numeric sob2(-20);
   
5.         Numeric lots(1);
   
6. Vars
   
7.     NumericSeries SOB;
   
8.         Numeric i;
   
9.         NumericSeries maxsob;
   
10.         NumericSeries minsob;
    
11. Begin
    
12.     if (Close<Close[1])  //今日收盤價低于昨日，計算這是過去多少天的最低價
    
13.         {
    
14.         i=2;
    
15.         While (Close<Close[i])
    
16.         i=i+1;
    
17.         SOB=-i;  //當收盤價不再小于某一天的收盤價，輸出SOB
    
18.         }
    
19.         else if (Close>Close[1])  //今日收盤價高于昨日，計算這是過去多少天的最高價
    
20.         {
    
21.         i=2;
    
22.         While (Close>Close[i])
    
23.         i=i+1;
    
24.         SOB=i;  //當收盤價不再大于某一天的收盤價，輸出SOB
    
25.         }
    
26.         maxsob=Highest(SOB,length);
    
27.         minsob=Lowest(SOB,length);
    
28.         if (SOB==maxsob&&SOB>sob1&&MarketPosition<>1)
    
29.         {
    
30.         Buy(lots,close);
    
31.         }
    
32.         else if (SOB==minsob&&SOB<sob2&&MarketPosition<>-1)
    
33.         {
    
34.         SellShort(lots,close);
    
35.         }
    
36.         Commentary( "SOB:"+Text(SOB) );
    
37. End

shingyscorpio 發表于 2016-2-5 10:34
求助啊求助啊

小米 發表于 2016-2-5 10:53
試著使用一個易滿足的條件來跳出循環吧。