Le BASIC est un langage de programmation. La dernière version de QBASIC permet de compiler les programmes, vous pourrez la trouver dans la partie Liens du site. Pour les débutants en programmation, lisez le petit cours de QBASIC. Vous pouvez aussi observer les mini programmes BASIC que j'ai fait.
Le QBASIC prend automatiquement compte de certaines modifications (mise en majuscule des mots-clé, séparation par des espaces), cependant faites bien attention à l'orthographe des mots-clé et séparer toutes les instructions par des deux-points.
En BASIC on distingue plusieurs types de variables :
DIM Nom$(50) ' déclare 51 chaînes de caractères : Nom$(0), Nom$(1)...
Nom$(49), Nom$(50).DIM N(4) ' déclare 5 nombres : N(0), N(1), N(2), N(3),
N(4).Elles sont construites ainsi : IF [condition] THEN [Instructions]. Si la condition est vrai alors le programme effectue les instructions sur la suite de la ligne. Si elle est fausse il peut effectuer les instructions d'un ELSE facultatif. On peut aussi le mettre sur plusieurs lignes avec END IF
IF x < 0 THEN PRINT "x est strictement négatif"
IF x = 0 THEN PRINT "x est nul"
IF x > 0 THEN PRINT "x est strictement positif"
IF x<>0 THEN
IF x < 0 THEN PRINT "x est négatif" ELSE PRINT "x est positif"
ELSE
PRINT "x est nul"
END IF
DO: LOOP ' Boucle à l'infini, il faut appuyer sur Ctrl + Pause pour arrêter le programme.
DO: TT$ = INKEY$ : LOOP WHILE TT$ = "" ' Boucle tant qu'aucune touche n'est appuyée.
DO: TT$ = INKEY$ : LOOP UNTIL TT$ = "A" ' Boucle tant qu'on appuie pas sur la touche A.
FOR A = 0 TO 10 : PRINT A : NEXT A ' Affiche les valeurs entières de A allant de 0 à 10.
FOR X = 50 TO 5 STEP -5 : PRINT X : NEXT X ' Affiche les valeurs de X : 50, 45, 40, 35, 30 ... 10, 5.
Les chaines de caractères sont représentés par des variables commençant par $. Il existe diverses manipulations exposées dans le petit cours de QBASIC.
$nom = "WANG" ' déclare une chaine de caractères$prenom = "Frédéric"
$nom_et_prenom = $nom + " " + $prenom ' concatène des chaines