Salut j’ai commencer la programmation avec liberty basic et pour m’amuser j’ai voulu créer un petit programme dont voici le code :
NOMAINWIN
PROMPT "Quel est ton age ? "; age
NOTICE "Tu as "; age; " ans"
PROMPT "Tu es un garçon ou une fille ?"; sexe$
NOTICE "Je vais te chercher un garçon de "; age
PROMPT "Quel est ton magasin préféré ? "; magasin$
PROMPT "Tu recherche une fille ou un garçon ? "; recherche$
SELECT CASE
CASE (recherche$="garçon")
PROMPT "Tu veux qu'il soit plus jeune, plus vieux, ou qu'il est le même age que toi (vieux,jeune,pareil)? "; agerecherche$
SELECT CASE
CASE (agerecherche$="jeune")
GOSUB [age.jeune]
CASE (agerecherche$="pareil")
GOSUB [age.pareil]
CASE (agerecherche$="vieux")
GOSUB [age.vieux]
End select
CASE (recherche$="fille")
PROMPT "Tu veux qu'elle soit plus jeune, plus vielle, ou qu'il est le même age que toi (vielle,jeune,pareil)? "; agerecherche$
SELECT CASE
CASE (agerecherche$="jeune")
GOSUB [age.jeune]
CASE (agerecherche$="pareil")
GOSUB [age.pareil]
CASE (agerecherche$="vielle")
GOSUB [age.vieux]
End select
SELECT CASE
CASE (sexe$="fille")
SELECT CASE
CASE (recherche$="fille")
NOTICE "Tu es une fille qui recherche une fille, tu as "; age " ans et tu recherche une fille de "; année " ans "
CASE (recherche$="garçon")
NOTICE "Tu es une fille qui recherche un garçon, tu as "; age " ans et tu recherche un garçon de "; année " ans"
END SELECT
CASE (sexe$="garçon")
SELECT CASE
CASE (recherche$="fille")
NOTICE "Tu es un garçon qui recherche une fille, tu as "; age " ans et tu recherche une fille de "; année " ans"
CASE (recherche$="garçon")
NOTICE "Tu es un garçon qui recherche un garçon, tu as "; age " ans et tu recherche un garçon de "; année " ans"
END SELECT
END
[age.jeune]
Prompt "De combien d'année ?"; année
année=age-année
Return
[age.pareil]
Prompt "De combien d'année ?"; année
année=age
Return
[age.vieux]
Prompt "De combien d'année ?"; année
année=age+année
Return
Mais voila quand j’ai voulu le tester il me met syntaxe erreur.
Comme je lai dit je suis un débutant et j’ai eu bo cherche je n’ai pas trouvé l’erreur.
Si quelqu’un pouvait m’aider sa serait super parce que j’ai bien du mettre une heure a le faire ce code et sa ménérve de ne pas y avoir réussi.
MERCI d’avance