Soucis avec liberty Basic 4.0 'pb de commande
Deuterium
Messages postés
6
Date d'inscription
Statut
Membre
Dernière intervention
-
mario0610058714 -
mario0610058714 -
Voilà je vous explique mon problème:
j'ai souhaitez créé un petit programme de devinette mais selement une des commandes qui permet de faire une boucle en cas de mauvaise réponse ne fonctionne pas . Pour mieux comprendre je vous écrit le programme avec le message d'erreur:
'jeu de devinette de nombres
'
compNum=47 'nombre choisi par l'ordinateur
'
Print "Je pense à un nombre..."
Print "Essayez de le deviner."
'
Essais=0
'
'la valeur zéro à guess déclenche la boucle
guess=0
While (guess<>compNum)
Print
Input "Annoncez un nombre entre 0 et 100 : ";guess
If (guess<compNum) then
Print "Votre nombre est trop bas, choisissez un autre nombre."
Else
If (guess>compNum) then
Print "Votre nombre est trop haut, choisissez un autre nombre."
End If
Essais=Essais+1 'Ajoute 1 à la variable compteur
Wend
Print "Vous avez trouvé en seulement "; Essais; "tentative !"
End
Voilà mon problème c'est la commande Wend qui est censé faire répéter la phrase du choix du nombre.
Il refuse de démarrer le programme en me surlignant la commande Wend et en écrivant "Basic compile Halted : WEND without WHILE"
Je ne comprend pas. S'il vous plait dite moi où est l'erreur dans le code ou du moin si je tape la bonne commande.
Je vous en remerci d'avance.
"Je doute que cela ai des influences mon system d'exploitation est XP pro (normalement la version 4.0 de liberty Basic est compatible avec) mon proc est un athlon 2000 + avec 1024 de RAM carte graph G force 4800 et jai une license pour liberty basic ( la version Silver) "
Voilà
j'ai souhaitez créé un petit programme de devinette mais selement une des commandes qui permet de faire une boucle en cas de mauvaise réponse ne fonctionne pas . Pour mieux comprendre je vous écrit le programme avec le message d'erreur:
'jeu de devinette de nombres
'
compNum=47 'nombre choisi par l'ordinateur
'
Print "Je pense à un nombre..."
Print "Essayez de le deviner."
'
Essais=0
'
'la valeur zéro à guess déclenche la boucle
guess=0
While (guess<>compNum)
Input "Annoncez un nombre entre 0 et 100 : ";guess
If (guess<compNum) then
Print "Votre nombre est trop bas, choisissez un autre nombre."
Else
If (guess>compNum) then
Print "Votre nombre est trop haut, choisissez un autre nombre."
End If
Essais=Essais+1 'Ajoute 1 à la variable compteur
Wend
Print "Vous avez trouvé en seulement "; Essais; "tentative !"
End
Voilà mon problème c'est la commande Wend qui est censé faire répéter la phrase du choix du nombre.
Il refuse de démarrer le programme en me surlignant la commande Wend et en écrivant "Basic compile Halted : WEND without WHILE"
Je ne comprend pas. S'il vous plait dite moi où est l'erreur dans le code ou du moin si je tape la bonne commande.
Je vous en remerci d'avance.
"Je doute que cela ai des influences mon system d'exploitation est XP pro (normalement la version 4.0 de liberty Basic est compatible avec) mon proc est un athlon 2000 + avec 1024 de RAM carte graph G force 4800 et jai une license pour liberty basic ( la version Silver) "
Voilà
A voir également:
- Soucis avec liberty Basic 4.0 'pb de commande
- Invite de commande - Guide
- Net framework 4.0 - Télécharger - Divers Utilitaires
- Microsoft 365 basic - Accueil - Microsoft Office
- Commande terminal mac - Guide
- Visual basic - Télécharger - Langages
11 réponses
pour plus d'infos sur liberty BASIC
http://lbasic.atomysk.com
et le forum d'aide qui va avec
http://lbasic.atomysk.com/forum
et tout ça en français....
http://lbasic.atomysk.com
et le forum d'aide qui va avec
http://lbasic.atomysk.com/forum
et tout ça en français....
Personne ne sais me répondre?
Bonjour, j'ai essayé ton programme sur mon pc sous: windows 98, 2000, NT , milllenium, et enfin xp pro. Mais ton programme ne fonctionnait pas sur tout les système d'exploitation ci-dessus. Donc, je pense que ce n'est pas un problème de conpatibilité. Le plus étrange c'est que j'ai liberty basic 4.0 également. Donc il n'y a plus que 1 possibilité l'erreur de commande;
J'ai cherché partout dans mes bouquins sur internet mais je n'est pas trouvé. Je suis désolé, mais je peux déjà partiquement t'affirmer que c'est une erreur de commande.
J'ai cherché partout dans mes bouquins sur internet mais je n'est pas trouvé. Je suis désolé, mais je peux déjà partiquement t'affirmer que c'est une erreur de commande.
Salut !
Alors en fait tu as ouvert deux boucles "if" mais tu n'en as fermé k'une. Je viens d'essayé le programme, j'ai corrigé l'erreur et ça marche. Le code donne ceci :
' DEBUT DU CODE
compNum = 47
Print "Je pense à un nombre..."
Print
Print "Essayez de le deviner !"
Essai = 0
While (guess <> compNum)
print
input "Annoncez un nombre entre 1 et 100 : "; guess
if (guess < compNum) then
print "TROP BAS ! "
else
if (guess > compNum) then
print "TROP HAUT ! "
end if ' TON ERREUR SE SITUAIT LA
end if
Essai = Essai + 1
Wend
Print
Print "Vous avez trouvé en "; Essai; " tentatives !!"
End
' FIN DU CODE
Voilà, si tu as d'autres pb n'hésite pas !
klow_
Alors en fait tu as ouvert deux boucles "if" mais tu n'en as fermé k'une. Je viens d'essayé le programme, j'ai corrigé l'erreur et ça marche. Le code donne ceci :
' DEBUT DU CODE
compNum = 47
Print "Je pense à un nombre..."
Print "Essayez de le deviner !"
Essai = 0
While (guess <> compNum)
input "Annoncez un nombre entre 1 et 100 : "; guess
if (guess < compNum) then
print "TROP BAS ! "
else
if (guess > compNum) then
print "TROP HAUT ! "
end if ' TON ERREUR SE SITUAIT LA
end if
Essai = Essai + 1
Wend
Print "Vous avez trouvé en "; Essai; " tentatives !!"
End
' FIN DU CODE
Voilà, si tu as d'autres pb n'hésite pas !
klow_
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Ho j'y pense aurais tu MSN ou AIM pour que nous puissions comuniquer? Je débute en programmation et une petite aide de ta part me serais fort utile en cas de probleme et nous pourions peut être nous entendre je pense :)
Avec plaisir :)
J'ai MSN, envoie moi ton adresse sur mon mail :
aefandayl@yahoo.fr
et je te contacte dès que je le l'ai !
à+
klow_
J'ai MSN, envoie moi ton adresse sur mon mail :
aefandayl@yahoo.fr
et je te contacte dès que je le l'ai !
à+
klow_
Bonjour
Je débute tout juste avec liberty Basic. Existe-t'il une commande pour les racines carrées, voire cubiques ?
Merci
Je débute tout juste avec liberty Basic. Existe-t'il une commande pour les racines carrées, voire cubiques ?
Merci
Salut,
Ton problème est simple: il n'y a pas de fonction sqr() comme sur d'autres basics.
En fait la racine carrée est la puissance 1/2 et la racine cubique la puissance 1/3
Donc il faut écrire
X=Y^0.5
ou X=Y^(1/3)
Voilà!
PS: J'ai croisé un groupe d'utilisateurs francophones à l'adresse http://fr.groups.ya ho o.com/group/Liberty_Basic/
Encore peu d'utilisateurs, mais j'ai décidé de le faire mieux connaître parceque je ne vois que Visual et Q & compagnie sur les groupes, et c'est agaçant de ne pas avoir de point de RV.
Ton problème est simple: il n'y a pas de fonction sqr() comme sur d'autres basics.
En fait la racine carrée est la puissance 1/2 et la racine cubique la puissance 1/3
Donc il faut écrire
X=Y^0.5
ou X=Y^(1/3)
Voilà!
PS: J'ai croisé un groupe d'utilisateurs francophones à l'adresse http://fr.groups.ya ho o.com/group/Liberty_Basic/
Encore peu d'utilisateurs, mais j'ai décidé de le faire mieux connaître parceque je ne vois que Visual et Q & compagnie sur les groupes, et c'est agaçant de ne pas avoir de point de RV.
score=47
essai=0
print "je pense à un nombre"
[test]
input "lequel : ";test
if test=score then
print "bien joué!tu as eu besoin de"; essai; "tentatives";
end
else
goto [bad]
wait
[bad]
let essai=essai+1
print "perdu essai encore !"
goto [test]
wait
essai=0
print "je pense à un nombre"
[test]
input "lequel : ";test
if test=score then
print "bien joué!tu as eu besoin de"; essai; "tentatives";
end
else
goto [bad]
wait
[bad]
let essai=essai+1
print "perdu essai encore !"
goto [test]
wait
'voilà le code le mieu que tu puisse avoir, le plus simple
score=47
essai=0
print "je pense à un nombre"
[test]
input "lequel : ";test
if test=score then
print "bien joué!tu as eu besoin de"; essai; "tentatives";
end
else
if test<score then
print "trop bas"
goto [test]
else
if test>score then
print "trop haut"
goto [test]
end if
end if
end if
wait
score=47
essai=0
print "je pense à un nombre"
[test]
input "lequel : ";test
if test=score then
print "bien joué!tu as eu besoin de"; essai; "tentatives";
end
else
if test<score then
print "trop bas"
goto [test]
else
if test>score then
print "trop haut"
goto [test]
end if
end if
end if
wait
liberty Basic France : http://www.lbasic.fr
et son forum : http://www.lbasic.fr/forum/