begin process at 2008 05 16 08:51:07
1 173 235 membres
76 nouveaux aujourd'hui
13 970 membres club

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 !

SCROLLING 2D DIRECTX7


Information sur la source

Description

scrolling 2d avec la méthode bien connu des tiles en directX 7.
C'est une bonne base pour commencé un petit rpg pourquoi pas.

Conclusion

-l'animation du perso reste à faire, j'ai utilisé un timer pour faire une petite animation de l'eau (pas très pratique je le reconnai)

-la superposition des objets (rendu avant ou apres le perso) bug un peu

Voila :) libre à vous d'améliorer tout ça sinon c'est moi qui le ferait :p
Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip

  • signaler à un administrateur
    Commentaire de VeRs_iOn le 26/03/2004 17:53:49

    pas mal mais faut optimiser si tu veux en tirer un truc vraimant bien :

    - le chargement est beaucoup trop long à cause de la taille énorme de ton fichier .map, je suis sûr que y'a moyen de faire plus court, surtout pour une map simple comme ça

    - essaie de te servir plus de tampons intermédiaires que tu réactualise seulement en cas de scrollling, pour effectuer un minimum de blits/cycle

  • signaler à un administrateur
    Commentaire de gwen49 le 01/05/2004 21:46:32

    SVP avec quoi on édite les .map???

  • signaler à un administrateur
    Commentaire de ShadowMaster le 01/05/2004 22:55:13

    la map est en faite une matrice (Private Map(0 To 1024, 0 To 1024) As Byte), chaque byte quel contient corespond une texture. Pour modif la map il suffit donc de modif la matrice comme je l'ai fait pour les objets (l'herbe) ObjetMat(I, J) = 101
    donc exemple pour la map:
    map(50,50)=1 'brique

    pour sauver la map:

    Open App.Path & "\map.map" For Output As #1
    For I = 0 To 1024
    For J = 0 To 1024
    Print #1, Map(I, J)
    DoEvents
    Next J
    Next I
    Close #1

    voila c'est tout simple

  • signaler à un administrateur
    Com