ATNEL tech-forum

Re: Załączanie i wyłączanie pętli for przyciskiem

2013-03-31T12:00:15+01:00

Użyj polecenia exit for

[syntax=basic4gl]
Dim I As Byte
I = 1
Dim Adres As Byte
Dim A As Byte
Do
If Pinb.6 = 0 Then

For Adres = 100 To 200 Step I

Cls
Lcd Adres

Waitms 250

if PINB.0 = 0 then exit for ' ot i cały kłopot z głowy

Next Adres

End If
Loop
[/syntax]

Statystyki: Napisane przez matrix — 31 mar 2013, o 12:00

Re: Załączanie i wyłączanie pętli for przyciskiem

2013-03-31T11:07:54+01:00

Nie znam Bascoma ale w pętli gdy włączysz (wciśniesz przycisk przepraszam za składnię w j. polskim ) przycisk musisz spełnić warunek wyjścia z petli czyli np. I=200 i finał bo pętla działa tak for( warunek początkowy ; warunek końcowy; inkrementacja (dekrementacja) lub inne działanie dążące do spełnienia warunku końcowego (warunku wyjścia))

Mam nadzieję że pomogłem

Statystyki: Napisane przez kidcowboy — 31 mar 2013, o 11:07

Załączanie i wyłączanie pętli for przyciskiem

2013-03-31T10:36:16+01:00

Witam,

mam mały problem nie umie napisać kodu w Bascomie ,który załączał i wyłączał pętlę for przyciskiem jedynie udało mi się napisać samo załączenie pętli [syntax=basic4gl]

Dim I As Byte
I = 1
Dim Adres As Byte
Dim A As Byte
Do
If Pinb.6 = 0 Then

For Adres = 100 To 200 Step I

Cls
Lcd Adres

Waitms 250
Next Adres

End If
Loop
[/syntax] a teraz chcę ją wyłączyć za pomocą przycisku w dowolnym momencie jej wykonywania

Kody w tym dziale umieszczamy przy pomocy [syntax=basic4gl] - Zielony J.

Statystyki: Napisane przez slawek3000 — 31 mar 2013, o 10:36