====== Do...Loop ======

''Do...Loop'' will infinitely loop the enclosed commands unless ''Do While'' or ''Do
Until'' is used to conditionally terminate the loop. An ''Exit Do'' statement can
also be used within the ''DO...LOOP'' to exit from the loop.

  Do
    Commands 
  Loop

<code xbasic>
Dim K As Integer
Do
  K=Adin(0) ' Read AD input from channel 0
  Debug Dec K,Cr
  Delay 1000
Loop
</code>

In the above example, the program will loop indefinitely inside Do and Loop.
An ''Exit Do'' or ''GOTO'' statement must be used to get out of the infinite loop.

<code xbasic>
Do While [Condition]
   Commands
   [Exit Do]
Loop

Do
   Commands
   [Exit Do]
Loop While [Condition]
</code>

''Do...While'' will loop indefinitely until the ''While'' condition is met.

<code xbasic>
Do Until [Condition]
   Commands
   [Exit Do]
Loop

Do
   Commands
   [Exit Do]
Loop Until [Condition]
</code>

''Do...Until'' will loop indefinitely until the ''Until'' condition is met.

{{ :cubloc:do...loop:doloop1.png?nolink |}}

{{ :cubloc:do...loop:doloop2.png?nolink |}}



[[cubloc:index#system_library:|Go CUBLOC home]]