FOR..NEXT – PBP Türkçe
FOR Count = Start TO End {STEP {-} Inc}
{Body}
NEXT {Count}
FOR..NEXT fonksiyonu bir değişkeni sayaç olarak kullanarak belirli bir kod grubunu istenilen sayıda çalışıtırılmayı sağlar. Fonksiyonun karmaşıklığı ve çok yönlü çalıştırlabilmesinden dolayı, fonksiyonu adım adım açıklamak daha anlaşılır olacaktır.
- 1- Start parametresi ile belirtilmiş değer, Count ile belirtilmiş olan değişkene atanır.
- 2- Body ile belirtilmiş kod grubu çalıştırılır. Body kısmı istenirse boş olabilir. (Örneğin gecikme sağlamak için kurulan bir döngüde bu kısım boş olabilir.)
- 3- Count değişkeni Inc parametresi ile belirtilmiş değer kadar arttırılır. (Eğer - ifadesi kullanılmış ise çıkartılır.) Eğer STEP komutu ile bir tanımlama yapılmamışsa, öntanımlı olarak Count değişkeni bir sayı artmaktadır.
- 4- Eğer Count değişkeni End ile belirtilen değeri geçmemişse ya da taşmamışsa (overflow), program 2 nolu adıma geri döner. Eğer döngüde Count değişkenin 255′ten daha fazla değer alması gerekiyorsa “word” büyüklüğünde bir değişken tanımlanmalıdır.
Örnek
FOR i = 1 TO 10 ‘ 1′den 10′a kadar say.
SEROUT 0,N2400,[#i,” “] ‘ Her sayıyı Pin0 üzerinden seri iletişim ile yolla.
NEXT i ‘ Geri dön ve bir sonraki saymayı yap.
SEROUT 0,N2400,[10] ‘ Yeni satıra geç.
SEROUT 0,N2400,[#i,” “] ‘ Her sayıyı Pin0 üzerinden seri iletişim ile yolla.
NEXT i ‘ Geri dön ve bir sonraki saymayı yap.
SEROUT 0,N2400,[10] ‘ Yeni satıra geç.
FOR B2 = 20 TO 10 STEP -2 ‘ 20′den 10′a doğru ikişer ikişer say.
SEROUT 0,N2400,[#B2,” “] ‘ Her sayıyı Pin0 üzerinden seri iletişim ile yolla.
NEXT B2 ‘ Geri dön ve bir sonraki saymayı yap.
SEROUT 0,N2400,[10] ‘ Yeni satıra geç.
SEROUT 0,N2400,[#B2,” “] ‘ Her sayıyı Pin0 üzerinden seri iletişim ile yolla.
NEXT B2 ‘ Geri dön ve bir sonraki saymayı yap.
SEROUT 0,N2400,[10] ‘ Yeni satıra geç.
İkinci kodun simülasyon üzerindeki çalışması aşağıdaki gibi olacaktır.
Bunlara da Bakın
- WHILE..WEND
- REPEAT..UNTIL
Tüm fonksiyonların listesine buradan bakabilirsiniz.
