Hej, czesc!!! To juz wakacje. W momencie gdy to czytacie my, czyli redakcja AM jestesmy wlasnie na wspolnym urlopie...:))) A po drugie...wakacje sie Wam juz chyba koncza...:(( Dobrze wiec o tym nie bede juz mowic. :)

Zaczynamy bawic sie troche mniej grzecznie. Jednym slowem zapoznam Was dzis z instrukcja warunkowa i petlami w QBasicu. :) Co do petli...wszyscy nauczyciele uczacy jezykow programowania w tym miejscu zawsze zaznaczaja: Zapamietajcie sobie kombinacje klawiszy ctrl+break, nie raz uratuje Wam zycie". I ja to w tej chwili Wam pisze...przekonacie sie, ze to swieta prawda. ;)

***Instrukcja warunkowa***

Jest nia instrukcja IF, dzieki ktorej dokonujemy wyboru pomiedzy DWIEMA mozliwosciami. Mozliwosci owe sygnalizujemy poprzez instrukcje THEN.

***Wyrazenie warunkowe***

Jest to wyrazenie skladajace sie z polaczonych instrukcji IF oraz THEN
Kazde wyrazenie konczymy instrukca END IF.

Przyklad 1
------------------------------------------------------------
CLS
INPUT "Ile masz lat?"; wiek 'Wczytanie danej
IF (wiek = 18) THEN 'Wyrazenie warunkowe
PRINT "Ojej, kiedy byl jumprez ;)"
END IF 'Koniec wyrazenia warunkowego
------------------------------------------------------------

Program wybiera jedynie pomiedzy dwoma przypadkami. Gdy zostanie wpisana liczba 18 lub inna. Moze pojsc dwiema drogami. Gdy wpisana dana bedzie rowna 18 wyswietli napis "Ojej, kiedy byl jumprez;)" a gdy dana bedzie rozna od 18 program nie zareaguje i zakonczy prace.
Jednym slowem tylko liczba 18 spelnia warunek. :)

<<<ELSE>>>

Gdy chcemy aby program reagowal na obydwie mozliwosci po THEN dodajemu jeszcze ELSE i wpisujemy dana "reakcje". :)

Przyklad 2
------------------------------------------------------------
CLS
INPUT "Ile masz lat?"; wiek 'Wczytanie danej
IF (wiek = 18) THEN PRINT "Ojej, kiedy byl jumprez ;)" ELSE PRINT "Masz jumprez za lub przed soba :))" 'Wyrazenie warunkowe
END IF 'Koniec wyrazenia warunkowego
------------------------------------------------------------

***Operatory logiczne***

"=" nie jest jedynym dostepnym operatorem logicznym. Rownie dobrze w programie moglam zastosowac warunek z innym operatorem, np: "IF (wiek < 18) THEN". Oto lista dostepnych operatorow. :)

------------------------------
| < - mniejsz niz |
| > - wieksze niz |
| = - rowne |
| >= - wieksze lub rowne |
| <= - mniejsze lub rowne |
| <> - rozne, ale nie rowne |
------------------------------

### Ojej! Mozliwosci jest wiecej! :( ###

W takim przypadku nalezy zastosowac instrukcje SELECT CASE (wybierz przypadek). Instrukcja powoduje odpowiednia reakcje programu w momencie, gdy podany zostanie przypadek na jaki ma zareagowac.

Przyklad 3
--------------------------------------------------------------
CLS
INPUT "Ile masz lat"; wiek
SELECT CASE (wiek)
CASE IS <18
PRINT "Ech...jeszcze nie bylo imprezy...;)"
CASE IS >18
PRINT "Czyli juz po imprezie...;)"
END SELECT
--------------------------------------------------------------

%%%%%%%%%%%%%%%%%%% PĘTLE %%%%%%%%%%%%%%%%%%%%%%%%


Petle sa strukturami niezyklwe pomocnymi. Pozwalaja na wykonywanie tych samych czynnosci wiele razy bez konieczniosci bezustannego powtarzania instrukcji. Skraca to kod i bardzo ulatwia zycie zarowno programiscie jak i uzytkowinikowi programu.


1) Petla typu <<<FOR NEXT>>>

Petla typu FOR NEXT pomocna jest w momencie, gdy wiemy z gory ile razy procedura bedzie musiala byc powtorzona. Petla wykonuje zadania do momentu osiagniecia przez licznik petli liczby wczesniej okreslonej.

Przyklad 4
--------------------------------------------------------------
CLS
FOR i = 1 TO 7
PRINT "Devi pisze trzecia czesc kursu"
NEXT i
END
--------------------------------------------------------------

Maksymalna liczba licznika petli moze byc podana tazke w trakcie dzialania programu.

Przyklad 5
--------------------------------------------------------------
CLS
INPUT "Ile razy trzba powtarzac"; max
FOR i = 1 TO max
PRINT "Devi pisze trzecia czesc kursu"
NEXT i
END
--------------------------------------------------------------

Tyle na dzis robaczki (jak zwykla mawiac Pazool ;). Za miesiac zabierzemy sie za trudniejsze petle konczac jednoczesnie wykorzystanie QBasica pod wzgledem czysto tekstowym. Za miesiac rowniez pokaze Wam jak za pomoca tego jezyka sprawic, aby nasz komp wydal z siebie dzwieki. :)


^^^^^^^^^^^^^^^^^^^^^PYTANIA^^^^^^^^^^^^^^^^^^^^^^^^^^^

Dlaczego czesci kursu sa takie male?

*** Coz, zaczelam pisac ten kurs podczas przygotowan do matury wiec sami rozumiecie. Poza tym chcialam ujac dany temat (zagadnienie) w jednej czesci.
W kazdym razie mysle, ze w czesci trzeciej nastapi pozytywna zmana objetosci. :)

Czy w Qbasicu można pisać gry, jeśli tak to czy jakieś powstały?

Gry pisac mozna, ale pisane sa one raczej w bardziej skomplikowanych jezykach. QBasic sluzy do nauki podstaw programowania, przydaje sie przy nauce Visual Basica. :)

Ile odcinków będzie miał ten kurs?

***Mysle, ze nie wiecej niz 10. :)

Czy w następnych numerach wraz z kursem dołączone będą programy
nawiązujące do lekcji?

***Tak, jak najbardziej. Mysle, ze juz w drugiej czesci znajdziecie jeden programik. :)

Właśnie robię swoją stronę internetową, czy mogę zamieścić na niej ten
właśnie kurs?

***Tak, pod warunkiem, ze ja wyraze zgode ;) A tak powaznie...chociaz nie, to bylo powaznie! :) W kazdym razie pod textem MUSI byc:

"Ania - Devi. Napisane dla Action Mag w CD - Action"

Dlaczego w kursie tak dokladnie wszystko tłumaczysz? Przeciez kazdy wie, co to jest instrukcja PRINT.

***Nie, nie kazdy to wie. Ten kurs w swoich zalozeniach mial byc niezwykle prosty i wielu czytelnikow to wlasnie w nim chwali.

Trzymajcie sie dzielnie i milej nauki! (zarowno QBasica jak i tej w szkole :)

Devi

Ew. pytania lub uwagi slijcie na adres:

kursqbasic@pf.pl