lol a02halo, non le code de bob85778 était tout à fait correct. ![]()
bob85778 pour le curseur qui bouge tu dois utiliser un programme avec une boucle ( par exmple do loop) du genre:
load image " ..." , 1
paste image 1 , coordx, coordy
do
cls
if downkey()=1
paste image 1 , coordx, ( coordy+10)
else
paste image 1 , coordx, coordy
endif
loop
J´ai une p´tite question: comment je fais pour faire un compteur? C´est-à-dire:
Euh...
Exemple:
Print " Vous avez fini ce quiz."
Wait Key
Print " Vous avez " ( nombre de point)
Et lorsque l´on réussi une question ça augmente la " variable" " questions réussies" ( je ne sais pas si c´est une variable ce que je veux faire) de 1, si on perd ça augmente la " variable" " questions ratées"...
J´espère avoir été assez clair. Merci d´avance.
Oui il y a " inc" et " dec", ou alors si on veut utiliser toutes les opérations mathématiques, que ce soit avec des nombres, ou entre différentes variables:
x=x+1
x=x+y
x=x*(y+z)
x=x/3.5
A chaque fois x prend la valeur de ce qui suit.
a02halo je t´ai largement expliqué tout ce qu´il y avait à savoir sur les pages précédentes pour le " if" " then" et " else", j´epère au moins que tu l´as lu? Je sens que la force est bien faible chez toi jeune Padawan ![]()
Euh je comprends toujours pas ce que je dois faire avec la ligne de code pour augmenter la variable de 1... Voici mon code:
Input " Quelle est la couleur de l´air? " ; couleurdelair$
If couleurdelair$<>"Incolore"
Play Sound 1
Inc ; questionsperdues$=;questionreussies+1
Ca me met " Mitschmatch command at ligne 40"
a02halo lis les deux premiers messages de cette page, et ensuite pose-moi des questions si tu ne comprends pas.
Et encore une fois, si quelqu´un veut que je lui envois le tutoriel officiel, qui est de très loin le plus complet et le plus didactique ( mais en anglais), il suffit de me le demander et de filer son mail.
Grobourrin_II je pense que tu n´as pas bien compris. Essaye ça et dis-moi si tu comprends:
Input " Quelle est la couleur de l´air? " , couleurdelair$
If couleurdelair$<>"Incolore"
Play Sound 1
questionsperdues=questionsperdues+1
endif
Tu vois, c´est la variable qui contiend le nombre de questions perdues qui doit être augmentée de 1, donc sa valeur doit devenir l´ancienne valeur de cette même variable plus 1:
questionsperdues=questionsperdues+1
Euh... OK.
En fait j´ai fait ça :
Else
Play Sound 1
Inc questionsperdues,1
Et ça marche aussi.
lu tt le monde
dsl mais g encore un prob avec mon prob de curseur
LOAD BITMAP " abstract03.bmp"
SET CURSOR 10,10
INPUT " Pour commencer, quel est ton nom, jeune humain?",nom$
PRINT nom$
PRINT " Est tu sur?"
WAIT KEY
REPEAT
PASTE IMAGE 1,coordx,coordy
SET CURSOR 40,55
PRINT " Oui, je suis sur."
SET CURSOR 40,90
PRINT " Non, attends!"
DO
CLS
IF DOWNKEY()=1
coordy=75
ELSE coordy=40
ENDIF
LOOP
UNTIL CONTROLKEY()=1
END
depuis que j´ai mit la boucle que tu ma di, quand j´arrive a " est tu sur?" et que j´appuie sur une touche, sa me met un ecran noir, et je pe plu rien faire-_-´
c´est quoi qu´il manque la?
a02halo oui, enfin quand tu dis qu´il n´y avait plus eu de message depuis deux mois je crois que tu exagères beaucoup
Mais bon c´est vrai que tu l´avais un peu ranimé.
Et pour ta question je t´ai répondu juste en-dessous de ton post ( tu as aussi besoin d´améliorer ton pouvoir de vision de Jedi
) Lis le haut de la page précédente et dis-moi exactement ce que tu ne comprends pas. De toute manière le mieux pour tout le monde c´est de lire le tuto officiel, puis d´essayer directement de programmer un jeu, et de venir me poser des questions quand on est bloqué.
bonjour !
je suis de passage. Je n´ai pas eu le temps de lire toutes vos questions, mais si je vois que ça marche toujours pas dans quelques jours, je tâcherai d´y répondre ( mais Timorite fait ça très bien!). J´ai inventé des fonctions PRINT avec des effet ( genre affiche le mot en bleu, etc...). Je les posterai peut être si ça peut vous être utile.
Surtout, ne vous découragez pas et continuez voos projets !
Hi hi ! Je suis en train de télécharger Dark Basic ^^
Voyons ce que ça va donner.
PS: Mais je n´ai aucune connaissance en langage, c´est grave ?
et vs savez koi?
ce site, tuto basic, c le frere d´un pote a moi ki la fait
et ce pote, precisement, c lui ki a fait les tuto du site du zero ( la classe^^)
au fait, vous m´avez pas rep pr moi prob en haut de page
Oui désolé bob85778, j´ai oublié de te répondre, et je vais devoir bientôt y aller donc je vais devoir être bref. En fait quand je t´ai dit d´utiliser do loop, c´était un exemple pour te dire qu´il fallait utiliser une boucle, mais avec do loop il n´y a pas moyen de sortir de la boucle, donc ton programme se bloque à cet endroit. Donc utilise plutôt un repeat until. Note que si ton but est plus tard de programmer un vrai jeu, tu devrais déjà commencer à voir comment marche un programme qui tourne entièrement dans une boucle. Je t´expliquerai ça si tu veux quand je rentrerai, en attendant pour ton code tu n´en as pas forcément besoin.
Allez à vendredi tout le monde, travaillez bien ![]()
hello les pros !
a02halo,
mais c´est simple mon ami : le voilà le code qui te pose tant problème :
REPEAT
PRINT " Entrez un mot de passe : " ;
INPUT mdp$
PRINT " Confirmez votre mot de passe : " ;
INPUT confirm$
IF mdp$ < > confirm$
PRINT " désolé, mais les mots de passe que vous avez entré sont différents"
PRINT " veuillez les entrer à nouveau"
ENDIF
UNTIL mdp$ = confirm$
PRINT " OK, votre mot de passe est donc " ; mdp$
WAIT KEY
END
voilà, je l´ai pas testé, mais cela devrait jouer ( le truc, c´est que les deux mots de passe ( le mot de passe et la confirmation du mot de passe) soit stockés dans des variables différentes.)
Si tu veux enregitrer le mot de passe, tu peux essayer le programme que j´ai laissé sur le site pour comprendre comment on fait, sinon, tu peux me reposer la question.
Autrement, il y en a parmi vous qui ont l´intention de créer un jeu style " futuriste" ?
Si oui, je vous ai concocter une commande que vous pouvez intégrer à votre programme. Il s´agit simplement d´une commande PRINT évoluée, qui affiche le texte de manière futuriste. J´espère que vous arriverez à l´utiliser et qu´elle vous sera utile !
------------------------------------------------
-utilisation-
1 : copier-coller le code entier dans l´éditeur DBPro.
2 : Lire les commentaires.
3 : avant de compiler, vous devez avoir un son " bip" inclus dans votre projet.
4 : changez le nom du son à loader par le nom de votre son.
5 : exécutez le programme
6 : vous venez de comprendre à quoi sert cette commande !
7 : si vous voulez l´utiliser dans un projet, copier simplement la partie commençant à
FUNCTION bipprint
et se terminant à
ENDFUNCTION
Collez-là après le END de votre programme, et utilisez la comme une commande normale.
----------------------------------------------
rem démontre comment créer des briefings animé avec bipprint
rem début du programme :
rem prépare le programme
set window off
set text font " Verdana",1
rem load le son " bip". Choisissez un son qui sonne " bip" et intégrez-le dans
rem votre exe. Si vous avez DarkBasicPro, " type.wav" marchera bien ( il se trouve
rem dans : C:\Program Files\The Game Creators\Dark Basic Professional\Projects\3DVideo)
load sound " votreson.wav",1
rem laisse un espace de libre
print
rem SYNTAX de la commande :
rem bipprint("text à afficher",délai entre deux lettres)
rem Note : " text à afficher" doit être une chaîne ( string)
rem et le délai doit être un nombre entier ( pas de virgule)
rem attend un petit moment avant de s´exécuter
wait 1000
rem affiche le mot ou la phrase entre parenthèses avec le style " briefing"
bipprint("mettez votre text ici",100)
rem attend une touche avant de terminer le programme
wait key
end
rem voici les entrailles de bipprint
rem début de la fonction...
function bipprint(string$,inter)
rem indique que a sera égal au nombre de caractères contenus dans la variable
rem string$
a = len(string$)
rem début de la boucle...
for i = 1 to a
rem crée une variable contenant la lettre suivante du mot à afficher
le$ = mid$(string$,i)
rem affiche le caractère n°i de la phrase
print le$;
rem joue le son bip
play sound 1
rem attend le temps spécifié
sleep inter
rem fin de la boucle...
next i
rem fin de la fonction...
endfunction
remstart
Cette commande peut être utilisée dans vos projet sans demande d´autorisation.
Vous pouvez la mettre en exemple sur votre site, la modifier etc...
pour toute question : prog_debutant
remend
leftkey
upkey
downkey
rightkey
returnkey ( pour enter)
controlkey
shiftkey
escapekey
spacekey
MOUSECLICK : Return Integer=MOUSECLICK()
MOUSEMOVEX : Return Integer=MOUSEMOVEX()
MOUSEMOVEY : Return Integer=MOUSEMOVEY()
MOUSEMOVEZ : Return Integer=MOUSEMOVEZ()
MOUSEX : Return Integer=MOUSEX()
MOUSEY : Return Integer=MOUSEY()
MOUSEZ : Return Integer=MOUSEZ()
prog_debutant c´est bizard, chez moi la commande bipprint n´est pas reconnue. A mon avis tu dois avoir une version plus récente que moi, ce qui expliquerait pourquoi les autres trucs foiraient ici.
Non, tu dois faire:
if upkey()=1
T´es sur que tu ne veux pas que je t´envois le tuto officiel? Il explique absolument tout ce qu´il faut savoir en détail, et reprend chaque commande avec une exlication. Tu comprends bien l´anglais?