QBASIC era un semplice linguaggio di programmazione utilizzato per venire gratis con copie di MS- DOS e le versioni precedenti di Windows , come un modo per introdurre nuovi proprietari di computer per la programmazione , mentre non li coinvolge nella complessità dei linguaggi più sofisticati come il C + + . QBASIC permette di input e output di base , gestione dei file e anche funzionalità grafiche di base , che verrà utilizzato per creare un'animazione palla in movimento . Modalità grafiche

La prima decisione che dovete fare nella programmazione QBASIC è la modalità grafica . Dal QBASIC è costruito sulla base di MS- DOS , i dettagli come la risoluzione dello schermo sono hardcoded in 14 modi grafici . La modalità di default è 0 , e questa modalità permette di accedere ad una griglia di 80x25 caratteri che non hanno accesso a singoli pixel , che non è molto adatto per l'animazione . Invece , utilizzare la modalità grafica 7, che offre una risoluzione di 320x200 , 16 colori , accesso singolo pixel , e la più importante per l'animazione , l'accesso alle pagine grafiche multiple :

SCREEN 7 , 1,0 < br >
il Main loop

Dopo aver dichiarato la modalità grafica con schermo , digitare quanto segue:

DO

lOOP WHILE INKEY $ = " "

Questo dice al programma da eseguire , mentre il tasto premuto è uguale a niente , o , in altre parole , di correre fino a quando l'utente preme un tasto .

Disegnare un cerchio

Disegnare forme geometriche di base è semplice in QBASIC . Prima che il comando do , inizializzare le variabili come segue :

xpos ! = 50ypos ! = 50radius ! = 16color ! = 14

E tra DO e LOOP , digitare quanto segue :

CIRCLE ( xpos , ypos ) , raggio , colorPCOPY 1,0 CLS

Questo disegnare un cerchio giallo per " pagina 1 ", una sezione di memoria video accantonata per eseguire operazioni di disegno , e copia pagina 1 a pagina 0 , che rappresenta i dati video effettivamente visibili all'utente . Questa è una tecnica nota nella grafica di programmazione come il doppio buffer , ed elimina lo sfarfallio dello schermo . Se volete vedere un esempio del perché si dovrebbe passare attraverso la briga di implementare il doppio buffering , rimuovere la linea PCOPY e cambiare il vostro comando schermo in modo che , invece di SCREEN 7 , 1,0 , si legge semplicemente SCREEN 7 . < Br >
animate

per animare il cerchio , è necessario modificare le xpos e le variabili ypos all'interno del DO ... LOOP . Dopo DO , ma prima che il comando CERCHIO , digitare quanto segue :

xpos = xpos + 0.001ypos = ypos + 0.001

Salvare ed eseguire per l'animazione di una palla in movimento . Se desiderate una sfida , modificare il codice per avere la palla rimbalza fuori le mura .