WHILE-WEND/de

Funktion

Führt eine Folge von Anweisungen in einer Schleife aus solange eine Bedingung wahr ist.

 

 

Syntax

WHILE condition

 statements

WEND

 

 

Anmerkungen

Wenn die Bedingung wahr ist dann werden alle nachfolgenden Befehle ausgeführt bis das WEND erreicht wird.

BASCOM kehrt dann zum WHILE Befehl zurück und prüft die Bedingung.

Wenn die Bedingung immer noch wahr ist dann wiederholt sich dieser Ablauf.

Wenn die Bedingung nicht wahr ist dann wird der Programmablauf nach dem WEND fortgesetzt.

 

Im Gegensatz zum DO-LOOP Befehl wird bei WHILE-WEND also die Bedingung am Anfang geprüft so dass die Befehle in der WHILE-WEND Schleife nie ausgeführt werden wenn die Bedingung nicht erfüllt ist.  

 

Siehe auch

DO-LOOP

 

 

Beispiel

'-----------------------------------------------------------------------------------------
'name : while_w.bas
'copyright : (c) 1995-2005, MCS Electronics
'purpose : demo: WHILE, WEND
'micro : Mega48
'suited for demo : yes
'commercial addon needed : no
'-----------------------------------------------------------------------------------------
 
$regfile = "m48def.dat" ' specify the used micro
$crystal = 4000000 ' used crystal frequency
$baud = 19200 ' use baud rate
$hwstack = 32 ' default use 32 for the hardware stack
$swstack = 10 ' default use 10 for the SW stack
$framesize = 40 ' default use 40 for the frame space
 
Dim A As Byte
 
A = 1 'assign var
While A < 10 'test expression
Print A 'print var
Incr A 'increase by one
Wend 'continue loop
End

Languages	English • Deutsch