Repeat / Until

Repeat/Until的語法是用來定義一段迴圈的執行邏輯。,語法如下:

Repeat
  執行的指令;
Until 判斷式;

程式會不斷的執行Repeat之後的指令,一直到Until後續的判斷式變成False值時才會離開迴圈。

如果迴圈內需要執行的指令超過一個的話,則可以使用Begin/End來包圍:

Repeat
  Begin
    執行的指令1;
    執行的指令2;
  End;
Until 判斷式;

以下是一個範例:

SumValue = 0;
Repeat
  Begin
    SumValue = SumValue + Close[i];
    i = i + 1;
  End;
Until i = 4;
AvgValue = SumValue / 5;

上述範例內Repeat的迴圈會一直執行,每次執行時SumValue會累加前幾期的Close數值,同時變數 i 會每次加1。這個迴圈會一直跑到 i = 4 的時候才會離開。以這個範例而言,SumValue的數值會變成是最近5期收盤價的加總,最後算出AvgValue為最近5期的平均收盤價。

系統內還提供不同的迴圈控制方式,請參考While 以及 For