Besoin d ' aide pour la prog en Qbasic

Fermé
[Pk]TeDDeMorT - 14 oct. 2002 à 10:48
teebo Messages postés 33491 Date d'inscription jeudi 14 octobre 2004 Statut Modérateur Dernière intervention 24 février 2011 - 18 oct. 2002 à 16:31
Slt les gens!! J ai gros PB!!
je débute en programmation en Qbasic et il y a des erreur dans mon programme mais je n arrive pas à les corriger! AIDEZ MOI!!

Voici le listing de mon prog: (Bon oui je sais c un prog de merde! mais je débute donc... NE VOUS MARREZ PAS!!)

' Test Qbasic
BEEP
' Demande un mot
CLS
INPUT "Votre mot"; nm$
PRINT ' Affiche une ligne vide

' Fait retentir la sirène!
SOUND up, 3 ' Emet un son par le haut-parleur
NEXT up ' Fin de la boucle de son

' Affiche le mot à l'écran, de haut en bas
co1 = 1
FOR row = 1 TO 24
LOCATE row, col
PRINT nm$ ' Affiche le mot

col = col + 2
NEXT row ' Fin de la boucle d'affichage
END

Voilà! merci de me le corriger au plus vite! @++
Locate
A voir également:

6 réponses

sebsauvage Messages postés 32893 Date d'inscription mercredi 29 août 2001 Statut Modérateur Dernière intervention 21 octobre 2019 15 656
14 oct. 2002 à 12:53
Salut !

Bon, déjà ton NEXT up, je comprend pas bien.
NEXT sert à fermer une boucle FOR.
Il n'y a aucune boucle FOR correspondante.
Il faut donc supprimer ce NEXT up.

Ensuite, tu fais SOUND up, 3
Mais la variable up n'a aucune valeur !
Fais plutôt: SOUND 440,3
(440 Hz, c'est la fréquence du LA du diapason, et celle aussi du téléphone quand on décroche.)
Tu peux bien sûr choisir une autre fréquence ou une autre durée.


Ensuite, il y a une erreur de frappe:
co1 = 1
Je suppose que tu voulais écrire: col = 1
(attention à ne pas confondre le L minuscule et le chiffre 1.)

Le programme devient donc:

---------%---------------
' Test Qbasic
BEEP
' Demande un mot
CLS
INPUT "Votre mot"; nm$
PRINT ' Affiche une ligne vide

' Fait retentir la sirène!
SOUND 440, 3 ' Emet un son par le haut-parleur

' Affiche le mot à l'écran, de haut en bas
col = 1
FOR row = 1 TO 24
LOCATE row, col
PRINT nm$ ' Affiche le mot

col = col + 2
NEXT row ' Fin de la boucle d'affichage
END
---------%---------------

Et là, il fonctionne !

1
[Pk]TeDDeMorT
18 oct. 2002 à 14:19
Merci Sebsauvage pour ta correction! grace a toi maintenant je métrise le QBasic! Au faite pendand que j'y suis tu peu me dire quelle est la version la plus complète de Visual Basic! et aussi en passant le programme qui permet de programmer en C.
Merci l'ami! @++
0
sebsauvage Messages postés 32893 Date d'inscription mercredi 29 août 2001 Statut Modérateur Dernière intervention 21 octobre 2019 15 656
18 oct. 2002 à 14:53
Un conseil d'ami : Laisse tomber Visual Basic !

il te donnera de mauvaises habitudes de programmation, et tu souffrira ensuite dans les autres langages.


Par contre, je te recommande Delphi 6 : c'est du Pascal objet (pas du basic). C'est plus puissant que VB, mieux fourni en composants, le compilateur est meilleur.
En plus, c'est gratuit !
http://www.borland.com


Pour le C ou C++, il y a des tas de compilateurs gratuits !
Borland C++ 5.01, ou la série des gcc en différentes versions (mingw, cygwin, djgpp, lcc-win...).

Et tant qu'on y est, je vais prêcher pour mon église: Python est un excellent langage de programmation. Très facile à apprendre, très lisible, très puissant et ouvert.
http://www.python.org
et pour les cours:
http://www.python-eggs.org/links.html

Sans compter les centaines d'autres langages... :-)
0
teebo Messages postés 33491 Date d'inscription jeudi 14 octobre 2004 Statut Modérateur Dernière intervention 24 février 2011 1 793
18 oct. 2002 à 14:53
Ba la derniere vraie version de VB est la 6 je crois, et apres, il y a toute la galaxie .net ...

Pour programmer en C, tu n'as que l'embarras du choix, donc il n'y a pas "le" programme, il te faut un editeur (meme word peut faire l'affaire!!!!!) et un compilateur qui se trouvent un peu partout sur le net sur les sites de differents editeurs...

Il doit surement y avoir ca sur le site de sebsauvage...

ö,ö  "Il est plus facile de donner des conseils
\_/    que de les appliquer"
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
sebsauvage Messages postés 32893 Date d'inscription mercredi 29 août 2001 Statut Modérateur Dernière intervention 21 octobre 2019 15 656
18 oct. 2002 à 15:24
Il doit surement y avoir ca sur le site de sebsauvage...

...même pas !

En dehors d'une petite page Python, je n'ai rien mis concernant la programmation.

C'est sûrement une idée à creuser.
0
teebo Messages postés 33491 Date d'inscription jeudi 14 octobre 2004 Statut Modérateur Dernière intervention 24 février 2011 1 793
18 oct. 2002 à 16:31
Bon d'accord, depuis le temps que j'en entend parle, je viens enfin d'y faire un tour (1 bonne heure en fait!!!)

Ben il est bien, mais a vrai dire ca m'a pas particulierement surpris!!! ;-)

ö,ö  "Il est plus facile de donner des conseils
\_/    que de les appliquer"
0