QUICK BASIC

[IlaCrazy]

CIAO!!!
IN questo momento in informatica stiamo facendo il Quick Basic,però vorrei avere delle informazioni più chiare sulla programmazione e i comandi..
Qualcuno mi sa consigliare un sito chiaro??
Oppure ha del materiale da passarmi??
Grazie tante!!

[eugenio.amitrano]

In questo sito c'e' materiale per affrontare i primi passi:
http://www.vettorpisani.net/forum-scuol ... index.html
Se hai bisogno di qualche chiarimento chiedi pure.

Ciao
EugenioA

[superpunk733]

@ IlaCrazy: il tuo avatar e' troppo bello. Sid Vicious e' uno dei miti della storia.... non so come definirlo...

[IlaCrazy]

X Eugenio.amitrano..Grazie del sito!!!Sicuramente qualche dubbio ci sarà data la mia bravura...magari se posto qui mi dai una mano??GRAZIE!!
@superpunk
Grazie!!!è il mio mito da tanto...se ti va ci sentiamo per pm così si parla di musica..o qui rischio di andare in off topic...se inizio a parlare di punk e questa roba...

[IlaCrazy]

Vorrei un info:
-potete spiegarmi cosa sia il comando WHILE WEND?? magari con un esempio...
-e poi:qual è in generale la funzione di NEXT??grazie a tutti!!

[IlaCrazy]

Dimenticavo...e cosa significa LOOP??

[eugenio.amitrano]

Ciao,
cio' che ti interessa sono i cicli.

In basic esistono 3 tipi differenti di ciclo :

1) Incondizionato/Indicizzato FOR-NEXT
2) Condizionato di Tipo 1 WHILE-WEND oppure DO WHILE-LOOP
3) Condizionato di Tipo 2 DO - LOOP UNTIL

Il ciclo FOR-NEXT serve per eseguire n volte un ciclo e la sintassi e' la seguente:

FOR %Indice%=Valore_Iniziale TO Valore_Finale STEP Valore_Step
Istruzione 1....
Istruzione 2....
....
NEXT %Indice%

Per esempio vogliamo calcolare il quadrato dei numeri interi pari positivi fino a 20:
un modo semplice per effettuare cio' e':

FOR I = 2 TO 20 STEP 2 '' Assegno all'indice i valori che vanno da 2 a 20 di 2 in 2
PRINT "il quadrato di";I;"e'"I^2
NEXT I

un altro esempio che puo' rendere l'idea del ciclo FOR e'

FOR I = 1 TO 10
PRINT "Questa riga sara' stampata 10 volte."
NEXT I
PRINT "Questa riga invece sara' stampata una volta sola." '' perche' e' fuori dal ciclo (Dopo il next)

--------------------

i cicli condizionati di Tipo 1 ripetono un ciclo finche' e' vera la condizione:

Sintassi:

WHILE %Condizione%
Istruzione 1...
Istruzione 2...
....
WEND

oppure

DO WHILE %Condizione%
Istruzione 1...
Istruzione 2...
...
LOOP

per esempio ipotizziamo di stampare i numeri positivi con il quadrato minore di 1000

n = 1
q = n ^ 2
WHILE q < 1000
PRINT "Il numero";n;"ha quadrato";q
n = n + 1
q = n ^ 2
WEND
PRINT "Fine"

--------------------------

In fine, i cicli condizionati di tipo 2 ripetono un ciclo finche' non si verifica la condizione.

Sintassi

DO
Istruzione 1...
Istruzione 2...
...
LOOP UNTIL %Condizione%

Ipotizziamo un ciclo che viene eseguito finche' il valore inserito non e' compreso tra 1 e 10:

DO
INPUT"Inserisci un valore compreso tra 1 e 10: ";Valore
LOOP UNTIL (Valore >= 1 AND Valore <=10)

--------------------------

Spero sia tutto chiaro....

a presto
EugenioA

[IlaCrazy]

Grazie mille!!!Chiarissimo!!!!!!!!!!
Grazie!

[IlaCrazy]

Sorry ma avevo ancora qualche domanda...
come si tracciano linee e altre forme geometriche con QB??Non so,non esiste un metodo generale per tracciare delle funzioni??(tipo funzione seno e coseno)
GRAZIE TANTE!

[eugenio.amitrano]

Ciao,
il qbasic inizialmente funziona con una modalita' schermo di tipo testo (SCREEN 0).
Per utilizzare la grafica occorre impostare lo schermo attraverso l'istruzione SCREEN.

Le modalita' grafiche piu' utilizzate sono:

1) 640x480 pixels e 16 attributi di colore (SCREEN 12)
2) 320x200 pixels e 256 attributi di colore (SCREEN 13)

La prima modalita' permette di inserire testo per 25 righe e 80 colonne mentre la seconda solo per 40 colonne.

Le principali istruzioni per disegnare sono :

1) PSET(X, Y), C
per disegnare un punto di colore 'C' di coordinate x, y
2) CIRCLE(X, Y), R, C
per disegnare una circonferenza di colore C, di Raggio R e di centro (X, Y)
3) LINE (X1, Y1)-(X2, Y2), C
per disegnare una linea di colore C dal punto (X1, Y1) al punto (X2, Y2)

Attenzione:
IL PUNTO DI COORDINATE (0,0) E' IN ALTO A SINISTRA...

inoltre le istruzioni CIRCLE e LINE fanno anche altro, ma per il momento credo che la funzionalita' standard e' sufficiente per fare pratica.


Programma di esempio:
Stampa a video delle funzioni trigonometriche adattate alle caratteristiche dello schermo.
Spero che non sia troppo difficile per te che sei alle prime armi.

-----------

CONST PI = 3.141592 '' Costante PI greco

SCREEN 12 '' Modalita' grafica 640x480x16
CLS '' Cancella lo schermo

FOR ANGLE = 0 TO 360 STEP 0.1 '' Ciclo di da 0 a 360 gradi di un decimo di grado per volta

RAD = ANGLE * PI / 180 '' Trasformazione in radianti
Y = SIN(RAD) '' Calcolo del seno

X_VIDEO = ANGLE * 640 / 360 '' Calcolo delle
Y_VIDEO = 240 - Y * 240 '' Coordinate vdeo

PSET(X_VIDEO, Y_VIDEO), 15 '' Stampa di un punto di colore bianco

NEXT ANGLE

-----------

Il programma precedente ti stampa solo la sinusoide mediante l'istruzione SIN.
Per il coseno e' COS mentre per la tangente e TAN.

La tabella dei colori in screen 12 e' :

0 - Nero
1 - Blu scuro
2 - Verde scuro
3 - Azzurro scuro
4 - Rosso scuro
5 - Magenta scuro
6 - Marrone
7 - Grigio chiaro
8 - Grigio scuro
9 - Blu chiaro
10 - Verde chiaro
11 - Azzurro chiaro
12 - Rosso chiaro
13 - Magenta chiaro
14 - Giallo
15 - Bianco

Se ti occorre qualche chiarimento chiedi pure.
Quando vuoi ti posso spiegare l'istruzione WINDOW che ti permette di adattare lo schermo
alle dimensioni che vuoi eccetto mantenendo la stessa qualita' video.
Se ti fa piacere posso realizzarti esempi molto interessanti.

A presto,
EugenioA