CodeS-SourceS est hébergé par Frontier.fr

Cliquez ici pour mettre ce site au démarrage de votre navigateur

AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

begin process at 2009 07 10 04:55:12

ET C'EST PARTI POUR SILVERLIGHT 3 ! par broux

[REFACTORING] TéLéCHARGEZ RESHARPER V5 PREVIEW POUR VISUAL STUDIO 2010 par tja

DéSACTIVER L'AUTOCOMPLéTION DANS OPENOFFICE CALC par MadMatt

ON A éTé TECHCRUNCHé ! par Nix

GOOGLE OS par Bidou

BRUTEFORCE EN DELPHI ? par jeremie77

DATETIMEPICKER. par youhibadelphi

TRI DE DBGRID par sparo83

RE : CHERCHER DES VALEURS DANS UN FICHIER BIN par Smith4400

RECHERCHE par sparo83

+ de logiciels à télécharger

1 467 643 membres
60 nouveaux aujourd'hui
15 053 membres club

Trouver une ressource

Trouvez une ressource parmi 40 108 codes, 1 304 672 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

SPACE RAIDER - JEU DE L'ESPACE

Information sur la source

Catégorie :Jeux Classé sous : Space, Jeu, Arcade, Espace Niveau : Débutant Date de création : 29/06/2008 Date de mise à jour : 30/06/2008 17:32:59 Vu / téléchargé: 3 022 / 256

Auteur : Bacterius

Ecrire un message privé

Note :

7,00 / 10

Commentaire sur cette source (7)

Ajouter un commentaire et/ou une note

Description

Cliquez pour voir la capture en taille normale

Bonjour,
alors je vous présente un petit jeu d'arcade, sympa a jouer de temps en temps. Le but est d'arriver au port galactique sans se faire tuer par les météores. Il y a des bonus, comme des balles et des vies.
Voila !
Les contrôles c'est Q pour aller à gauche, D pour aller à droite, et Z pour tirer !

Source

procedure DansLeZip;
begin
Extraire(WinZip);
Lire;
end;

procedure DansLeZip;
begin
     Extraire(WinZip);
     Lire;
end;

Conclusion

Voila, même si le principe et le jeu en lui même sont un peu rasoir... le code contient des trucs bien pour les débutants !

Bon amusement, et surtout bonne prog !

Cordialement, Bacterius !

Au fait, pour allonger le temps requis pour arriver au port (et donc la difficulté) peut être ajustée en modifiant la valeur de Distance dans la procédure Click du bouton NewGame. Plus cette valeur est élevée, plus c'est difficile !

Tous remarques, critiques, conseils, sont les bienvenus !

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Explosion.res43 616 octets
ImgResrc.res89 372 octets
Main.dcu14 984 octets
Main.dfm4 243 octets
Main.pas 16 270 octets
SpaceRaiderEXE.dof 1 897 octets
SpaceRaiderEXE.dpr 271 octets
SpaceRaiderEXE.res876 octets

Télécharger le zip

Historique

30 juin 2008 17:33:00 :: // correction de quelques beugs

Sources du même auteur

GÉNÉRATEUR DE NOMBRES PSEUDO-ALÉATOIRES

QUICK CS !

ALGORITHME DE HASH LEA-128

COUNTERS, UNITÉ DE CALCUL DE PERFORMANCE

ANIMATION AVEC PNG

Toutes les sources de Bacterius

Sources de la même categorie

UNE MACHINE À SOUS par debiars87

DES DÉS ... par f0xi

JEU SHOOT LE CANARD par Nicolas___

DEBIARS CONTRE LES LAPINS CRÉTINS par Debiars

CONQUÊTE TERRITORIALE par Debiars

Toutes les sources de la catégorie Jeux

Sources en rapport avec celle ci

SPRITE ENGINE : DE LA 2D FACILEMENT par Nicolas___

DEBIARS CONTRE LES LAPINS CRÉTINS par Debiars

CONQUÊTE TERRITORIALE par Debiars

SPACE SHOOT [JEUX] par Nicolas___

LES POINTEURS : LE PETIT JEU DU SERPENT... par PyRuSs

Commentaires et avis

Commentaire de Bacterius le 29/06/2008 20:43:49

Fait sous Delphi 6 Personal, les images sont toutes de moi sauf les images de la ressource Explosion.res (je les ai trouvées quelque part sur Internet en freeware, sous forme de Gif, et je les aie remises en série de bitmaps!).

Cordialement, Bacterius !

Commentaire de Nicolas___ le 29/06/2008 23:23:05

ya un truc qui foire a ton jeu : je lance , ca avance puis mon vaisseau disparait un ca me dit que j'ai gagner ...

pas du tout regardé le code ...

Commentaire de Forman le 30/06/2008 13:08:56

Pour les tests de collision (j'ai lu rapidement le code et j'ai vu que tu avais des problèmes à ce niveau-là) tu peux utiliser l'API IntersectRect:

http://msdn.microsoft.com/en-us/library/ms536125(VS.85).aspx

Exemple:

function Collide(const r1,r2:TRect):Boolean;
var
Dummy:TRect;
begin
Result:=IntersectRect(Dummy,r1,r2);
end;

Certes c'est pas très joli car l'intersection est calculée pour rien, mais ça fonctionne...

Commentaire de Bacterius le 30/06/2008 17:27:38

Bonjour,
@Nicolas___ : oui en fait j'avais zippé le source en mode debug, alors la distance était à 100, il faut la mettre à 3000 pour une jouabilité optimale. Alors dans New_btnClick :
***
Distance := 3000;
***

@Forman : j'avais essayé IntersectRect mais j'avais le même problème ... la collision se produisait bien en cas de contact, mais également si le météore était sur la même verticale que le joueur, et qu'il était à mi-chemin entre le haut et le joueur.
Alors j'ai fait ma propre fonction ...

Et j'ai également remarqué un beug : oubli de désactiver les timers de victoire et d'explosion à chaque nouvelle partie.

Je poste de suite la version corrigée.

Cordialement, Bacterius !

Commentaire de Nicolas___ le 30/06/2008 17:50:15

Dommage qu'il n'y a pas de vrais projectiles ...

Commentaire de cantador le 02/07/2008 22:32:04 7/10

quelques soucis avec le tir, mais c'est pas mal.

Commentaire de Bacterius le 03/07/2008 17:25:28

Bonjour,
d'abord merci pour vos commentaires, je vais tenter de rectifier les quelques beugs, alleger et simplifier le code, et puis la prochaine étape sera peut-être l'affichage et le mouvement des tirs du vaisseau :p

Cordialement, Bacterius !

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

help!!!!!svp les best en delphi :) [ par eedy31 ] j'ai un gro pblém : je debute en delphi et il me fo du temps pour apprendre!!!ET le pblém c'est que mon père monopolise le PC avec son jeu(atlantis3.. Jeu avec le source [ par Synthox ] Si ca vous dis de faire un jeu de carte, je vous met mes sources en telechargement sur mon site, il contiens aussi un fichier RES avec les cartes de t Fuite mémoire avec StringGrid [ par Stauf ] Bonjour,J'ai le problème suivant:Je crée dynamiquement des données puis libère l'espace une fois affichées. Jusque là, pas de soucis, l'espace est all Comment faire les menus d'un jeu en Delphi ?! Vite ça presse ! [ par Gropoli ] Je suis entrain de faire un jeu de type wargame en delphi et je me demande comment je dois faire les menus du jeu : menu principal (nouveau jeu, optio Comment faire les menus d'un jeu en Delphi ?! Vite ça presse ! [ par Gropoli ] Je suis entrain de faire un jeu de type wargame en delphi et je me demande comment je dois faire les menus du jeu : menu principal (nouveau jeu, optio enlever les espace avant et apres une chaine de caractere.... [ par intello2001 ] tt est ds le sujet :enlever les espace avant et apres une chaine de caractere ?HELP ME PLEASE ! Recherche de code pour jeu d'enregistrement [ par clemot ] Salut je recherche un exemple ou des exemples de code pourun jeu d'enregistrement à partir de TDBCtrlGrid et de stringgrid pouyr enregistrer des donn Probleme avec un TImage [ par sebastienbro ] Voila, je doi convertir une fonction VB en delphi. Je l'ai fait, mais voila, il met met une erreur ds kernel32.dll, ou de tmp en tmp, c'est une exepti Jeu de strategie avec directdraw [ par sebrs1 ] Tout d'abord, je vais vous expliquer ce que je veux fairec'est tout simple (enfin, simple a comprendre mais pas a faire)je voudrais faire un truc genr Cherche dessinateur [ par sebrs1 ] Bonjourje cherche un dessinateur qui pourrait m'aider dans les graphisme et animations de mon jeuc'est un jeu en directdraw en isometrique genre jeux