WHILE ... WEND

GW-Basic, utilisé par PC-Basic
Exemple de programmation

PC-BASIC

Pour exécuter une série d'instructions dans une boucle tant qu'une condition donnée est vraie.

Syntaxe:

WHILE expression
.
.
.
[loop statements]
.
.
.
WEND 

Commentaires:

Si expression est différent de zéro (vrai), les instructions de boucle sont exécutées jusqu'à ce que l'instruction WEND soit rencontrée.

GW-BASIC revient ensuite à l'instruction WHILE et vérifie l'expression. Si c'est toujours vrai, le processus est répété.

Si ce n'est pas vrai, l'exécution reprend avec l'instruction suivant l'instruction WEND.

Les boucles WHILE et WEND peuvent être imbriquées à n'importe quel niveau. Chaque WEND correspond au WHILE le plus récent.

Une instruction WHILE sans correspondance provoque une erreur "WHILE sans WEND". Une instruction WEND sans correspondance provoque une erreur "WEND sans WHILE".

Exemples:

90 'BUBBLE SORT ARRAY A$
100 FLIPS=1
110 WHILE FLIPS
115 FLIPS=0
120 FOR N=1 TO J-1
130 IF A$(N)>A$(N+1) THEN SWAP A$(N), A$(N+1): FLIPS=1
140 NEXT N
150 WEND

vous pouvez remplacer WHILE ... WEND par un IF .... THEN et un GOTO

Remplacez WHILE par IF NOT expression THEN 160

et WEND par GOTO 110 suivi d'un REM

90 'BUBBLE SORT ARRAY A$
100 FLIPS=1
110 IF FLIPS = 0 THEN 160
115 FLIPS=0
120 FOR N=1 TO J-1
130 IF A$(N)>A$(N+1) THEN SWAP A$(N), A$(N+1): FLIPS=1
140 NEXT N
150 GOTO 110
160 REM

110 IF NOT expression THEN 160.
.
.
[loop statements]
.
.
.
150 GOTO 110
160 ....