FORUM MP | ADA : Chronomètre sur Ada pour un jeu

COMMUNAUTE MP

Identifiez vous ...

DOMAINE MP

Bavardages

Langages Généraux

Langages Web

Langages DotNet

Autres langages

Dev. Jeux Video

Sécurité

Sys. Exploitation

Graphismes

Logiciels

Réseaux

Bases de données

Méthodologies

Emplois High-tech

Aide juridique

Articles juridiques

FORUM

CHAT MP IRC

Votre pseudo ...

Serv: irc.irc-land.org

Chan: #MoteurProg

PARTICIPER

Plus de 3500 emplois.

Visiteur MP

Chronomètre sur Ada pour un jeu
	Forum : ADA Sous Catégorie : Aucune Type du sujet : Sujet Normale FAQ : FAQ ADA
		SUIVI PAR MAIL INACTIF
		SUJET NON RESOLU
		SUJET ACTIF
		N'APPARTIENT PAS A LA FAQ

FORUM ADA
	Page précedente	Page suivante

nelly3007
Nouveau membre

Inscrit : 04/12/2005
Messages : 1

#81828 Posté le 05/12/05 à 09:38

Bonjour,
J'ai un jeu à programmer sur Ada, (le taquin) il est d'ailleurs bientôt fini si j'arrive à corriger les erreurs de compilation !
Pour améliorer mon jeu j'ai pensé à rajouter un chronomètre qui démarre quand on commence à jouer et qui s'arrête quand on gagne et par exemple quand l'utilisateur gagne on affiche un message du style : "bravo vous avez gagné en 2 minutes et 34 secondes "
Est ce possible en Ada ?
Je crois qu'il existe un package calendar qui pourrait faire ça mais comme je n'ai aucune leçon là dessus je n'ai aucune idée de comment ça marche, qu'est ce qu'il faut déclarer et où ? bref comment l'utiliser ? bref merci de m'aider !!!!!
Mél

HAUT DE PAGE

Publicité

Inscrit : X
Messages : X

#Aucun

HAUT DE PAGE

hoang
Nouveau membre

Inscrit : 09/12/2005
Messages : 3

#82185 Posté le 09/12/05 à 17:53

Utilise le package Ada.Calendar : Voici un exemple pratique, qui affiche le temps passé entre le lancement du programme et l'entrée d'un entier au clavier.

J'ai laissé les Ada.Calendar la où je m'en sert pour mieux voir d'où vient la fonction, par contre pour faire le "-", je n'ai pas trouver d'autre solution que d'utiliser le use Ada.Calendar :/

with Ada.Calendar, ada.Integer_Text_IO, ada.Text_IO; use Ada.Calendar; procedure Test is start, now : Ada.Calendar.Time; n : integer; begin Start := Ada.Calendar.Clock; Ada.Integer_Text_IO.Get(N); Now := Ada.Calendar.Clock; Ada.Text_Io.Put(Duration'Image(now-start)); end Test;

HAUT DE PAGE

PAGE : [1]

.: Site Web développé par Julien Pichot et l'équipe MPWG avec www.evolvia-web.com :.