SelfProfan²:Schleifen
Schleifen
Schleifen sind in jeder Programmiersprache enthalten und sind eigentliche die wichtigstenAnweisungen. In Profan� hat jedes Programm, dass mehrere Eingaben in gemischter Reihenfolge
immer wieder verarbeitet mindestens eine Schleife. Bei jedem Beispiel mit einer Datei wurde
eine Schleife verwendet. Ein kleines Beispiel mit Schleifen:
Declare buf$,zahl%,exit%
Assign #1,"datei.txt"
Reset #1
WhileNot Eof(#1)
Input #1,buf$
print buf$
Wend
close #1
zahl%=0
While Lt(zahl%,10)
zahl%=Add(zahl%,10) MessageBox(Add$("Zahl betr�gt:",Str$(zahl%)),"Nachricht",64)
Wend
WhileLoop 5
print &loop
Wend
WhileNot exit%
WaitInput
If Equ(%key,90)
exit%=1
EndIf
Wend Hier wurden 3 Arten von Schleifen gezeigt:
While,WhileNot und WhileLoop.
While:Danach muss (wie bei If) eine Bedienung stehen.Solange,wie diese Bedienung erf�llt ist,
wird das Ausgef�hrt,was zwischen While und Wend steht.
WhileNot:Wie While,nur wird der zwischen WhileNot und Wend stehende Text ausgef�hrt,wenn
die Bedienung nicht in Erf�llung geht.
WhileLoop:Hier ist keine Bedienung,sondern eine Zahl.Sie bestimmt die Anzahl der Durchl�ufe.
Bei einem Durchlauf wird der Text ausgef�hrt, der zwischen WhileLoop und Wend steht.
Einführung Grundlagen Windows-Modus Anhang