CONNEXION
  • RetourJeux
    • Sorties
    • Hit Parade
    • Les + populaires
    • Les + attendus
    • Soluces
    • Tous les Jeux
    • Gaming
  • RetourActu Gaming
    • News
    • Astuces
    • Tests
    • Previews
    • Toute l'actu gaming
  • RetourBons plans
    • Bons plans
    • Bons plans Smartphone
    • Bons plans Hardware
    • Bons plans Image et Son
    • Bons plans Amazon
    • Bons plans Cdiscount
    • Bons plans Decathlon
    • Bons plans Fnac
    • Tous les Bons plans
  • RetourJVTech
    • Actus High-Tech
    • Intelligence Artificielle
    • Smartphones
    • Mobilité urbaine
    • Hardware
    • Image et son
    • Tutoriels
    • Tests produits High-Tech
    • Guides d'achat High-Tech
    • JVTech
  • RetourCulture
    • Actus Culture
    • Culture
  • RetourVidéos
    • A la une
    • Gaming Live
    • Vidéos Tests
    • Vidéos Previews
    • Gameplay
    • Trailers
    • Chroniques
    • Replay Web TV
    • Toutes les vidéos
  • RetourForums
    • Hardware PC
    • PS5
    • Switch 2
    • Xbox Series
    • Switch
    • Pokemon pocket
    • FC 25 Ultimate Team
    • League of Legends
    • Tous les Forums
  • PC
  • PS5
  • Xbox Series
  • Switch 2
  • PS4
  • One
  • Switch
  • iOS
  • Android
  • MMO
  • RPG
  • FPS
En ce moment Genshin Impact Valhalla Breath of the wild Animal Crossing GTA 5 Red dead 2
Liste des sujets

J'aide les personnes dans DarkBasic Pro

Timorite
Timorite
Niveau 10
22 mai 2005 à 04:44:11

lol a02halo, non le code de bob85778 était tout à fait correct. :sarcastic:

Timorite
Timorite
Niveau 10
22 mai 2005 à 05:04:59

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

Grobourrin_II
Grobourrin_II
Niveau 10
22 mai 2005 à 15:40:18

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.

Timorite
Timorite
Niveau 10
22 mai 2005 à 17:52:19

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 :rire:

Grobourrin_II
Grobourrin_II
Niveau 10
22 mai 2005 à 17:56:06

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"

Timorite
Timorite
Niveau 10
22 mai 2005 à 17:57:01

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.

Timorite
Timorite
Niveau 10
22 mai 2005 à 18:05:13

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

Grobourrin_II
Grobourrin_II
Niveau 10
22 mai 2005 à 18:11:37

Euh... OK.
En fait j´ai fait ça :

Else
Play Sound 1
Inc questionsperdues,1

Et ça marche aussi.

Bob85778
Bob85778
Niveau 6
22 mai 2005 à 19:22:02

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?

Timorite
Timorite
Niveau 10
22 mai 2005 à 23:01:58

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 :rire: 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 :rire: ) 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é.

prog_debutant
prog_debutant
Niveau 4
23 mai 2005 à 16:00:54

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 !

theRPGplayer
theRPGplayer
Niveau 10
23 mai 2005 à 17:51:56

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 ?

Bob85778
Bob85778
Niveau 6
23 mai 2005 à 19:07:37

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

Timorite
Timorite
Niveau 10
23 mai 2005 à 21:07:31

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 :bye:

prog_debutant
prog_debutant
Niveau 4
24 mai 2005 à 19:15:51

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.

prog_debutant
prog_debutant
Niveau 4
24 mai 2005 à 19:26:09

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.
----------------------------------------------

prog_debutant
prog_debutant
Niveau 4
24 mai 2005 à 19:27:08

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

Bob85778
Bob85778
Niveau 6
24 mai 2005 à 21:15:33

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()

Timorite
Timorite
Niveau 10
26 mai 2005 à 17:06:58

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.

Timorite
Timorite
Niveau 10
26 mai 2005 à 17:29:28

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?

Sous forums
  • Aide à l'achat Mac
  • Création de Jeux
  • Linux
  • Programmation
  • Création de sites web
  • Internet
  • Steam Deck
  • Macintosh
  • Hardware