QBasic

QBASIC (Quick BASIC) je inačica BASIC-a, koju je razvila tvrtka Microsoft za MS-DOS operacijski sustav. QBASIC je bila osnova za popularni Visual Basic.

Programski primjer

Na ekranu ispisuje "Mercedes ja volim , Mercedes je najbolji auto" i crta crtu veličine 10 pixela

 CLS
 PRINT"Mercedes ja volim"
 PRINT"Mercedes je najbolji auto"
 LINE(0,0)-(10,10)
 END

Ovaj program pita korisnika njegov omiljeni nogometni klub, i ispisuje navijačku pjesmu:

CLS
INPUT "Koji je vaš omiljeni nogometni klub" ; a$
PRINT UCASE$(a$) " je najbolji, ale ale!"
END

Osnovne naredbe

Tri osnovne naredbe su CLS,INPUT I PRINT. CLS je skraćenica od CLear Screen, cls koristimo na početku programa kako bi bili sigurni da je sav prijašnji tekst sa ekrana obrisan. INPUT naredba služi za unos podataka. PRINT naredba ispisuje tekst na ekran npr. 10 PRINT "Hello world". Ove tri naredbe se najćešće koriste u BASIC programima.

    10 CLS
    20 PRINT "Kako se zoveš?"
    30 INPUT A$
    40 PRINT "Drago mi je, ";A$
    50 END

Matematičke radnje

Svaki BASIC jezik pa tako i QBasic mora moći izvoditi matematičke radnje, u daljnjem tekstu objasnit ću kako napraviti program za zbrajanje. Da bi napravili matematički program morate znati simbole radnji.Također morate znati i osnovne naredbe iz prošlog teksta. Ali ima i jedna nova naredba: x$=y (x$ predstavlja tip podataka (x se zamijeni nekim slovom),a y vrijednost određenog slova). To je sve što treba znati za jednostavni matematički program. Simboli :

Zbrajanje +

Oduzimanje -

Djeljenje /

Množenje *

Primjer programa za množenje :

    10 CLS
    20 PRINT "Dobrodošao u program za množenje"
    30 PRINT "Unesi dva broja"
    40 INPUT "prvi:", no1
    50 INPUT "drugi:", no2
    70 PRINT no1*no2
    80 END

Crtanje

U Qbasicu postoji i osnovno crtanje. Možete crtati kružnice i linije te neke 3D oblike. Prije svakog crtanja morate upisati naredbu SCREEN 12, koja prebacuje računalo u VGA bitmap način rada s rezolucijom 640x480 u 16 boja.

Primjer programa za crtanje krugova: Nacrtat će kružnicu u sredini ekrana radijusa 50 pixela.

SCREEN 12

CIRCLE (320,240),100

Primjer programa za crtanje linija: Linija vodoravna po sredini ekrana.

SCREEN 12

LINE(320,0)-(320,480)

Vanjske poveznice

• qbasic.com (Engleski)