begin process at 2008 07 05 07:41:05
1 205 059 membres
45 nouveaux aujourd'hui
14 118 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 !

3D SANS DLL NI OCX -> 3D CALCULÉE (3D PARTIE 1 -> DÉBUT)


Information sur la source

Catégorie :Graphique Niveau : Débutant Date de création : 16/08/2003 Date de mise à jour : 19/08/2003 15:00:45 Vu / téléchargé: 3 283 / 249

Note :
9,25 / 10 - par 4 personnes
9,25 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (14)
Ajouter un commentaire et/ou une note


Description

C'est le début d'un programme qui calcule la 3D et donc n'utilise pas de DLL ni de OCX ni rien d'autre ... juste du code (évidemment VB n'est pas vraiment le langage pour réaliser ce genre de programme mais c'est juste pour montrer les formules de maths -> avis aux personnes qui connaissent les matrices !). Le programme ne fais tourner qu'un cube car il n'existe pas de Zbuffering pour le moment (le cube s'affiche très bien parce qu'il est convexe mais avec un autre objet c'est pas gagné que cela ressemble à ce que vous aviez modéliser). Certaines fonctions écrites dans le module ne servent pas pour le moment et je ne garantis pas qu'elles fonctionnent ! Je travaille dessus et devrait être opérationnelle dans une prochaine mise à jour de ce programme.
Ne me blamer pas trop, c'est juste un programme de démonstration pour savoir un peu comment on fais pour pouvoir afficher un objet 3D sur un écran.
Désolé le code n'est pas encore commenté mais il le sera, soyez sans crainte !
Bon cube !  

Source

  • Tout est dans le zip !
Tout est dans le zip !  

Conclusion

La connaissance appartient à tous !  
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 Cyberdevil le 17/08/2003 11:45:52

    marche po du tout je vois un e fneetre blanche nul !

  • signaler à un administrateur
    Commentaire de neodante le 17/08/2003 13:29:37 administrateur CS

    Au lieu de critiquer à la va vite tu aurais peut-être dû décompresser tout le répertoire avec le cube.asc (c'est lui qui est affiché !) et ça marche chez tout le monde même sur 486 -> ce n'est que du code et une API qui affiche -> donc forcément ça marche !
    En tout cas j'aime bien ta photo sois dit en passant !
    @+

  • signaler à un administrateur
    Commentaire de Cyberdevil le 17/08/2003 13:32:49

    j'aie tout décompreséé j'ai meme exécuté pas a pas.. il ouvre le fichier cube.asc correc tement il le lit correctement mais la fenetre reste blanche ! Je ne critique pas g dit que ça marche po... c tout :) !
    Dommage

  • signaler à un administrateur
    Commentaire de neodante le 17/08/2003 13:37:00 administrateur CS

    C'est vraiment étrange et c'est la première fois que je vois kk1 qui me dit que cela ne marche pas !!!! C'est que du code comme tu as pu le voir et une API (qui marche sur tous les OS Windows !).
    Sinon regarde la capture je ne mens jamais !!!
    @+

  • signaler à un administrateur
    Commentaire de Cyberdevil le 17/08/2003 13:42:36

    en faite il bloque dans la fonction LoadASC !
    dès quil exécute la boucle suivante:
    Do While i < NbPoint
            PosX = InStr(DebC, Out, "X:")
            PosY = InStr(PosX, Out, "Y:")
            PosZ = InStr(PosY, Out, "Z:")
            FinC = InStr(PosZ, Out, Chr(13) & Chr(10))
            
            Point3D(i).X = CSng(Mid(Out, PosX + 3, PosY - PosX - 3))
            Point3D(i).Y = CSng(Mid(Out, PosY + 3, PosZ - PosY - 3))
            Point3D(i).Z = CSng(Mid(Out, PosZ + 3, FinC - PosZ - 3))
            Point3D(i).Couleur = RGB(100, 100, 100)
            DebC = FinC
            i = i + 1
            DoEvents
        Loop
    Il en sort jamais !

  • signaler à un administrateur
    Commentaire de Cyberdevil le 17/08/2003 13:44:24

    en faite gtrouvé l'erreur
    dans form_load tu avais mis un on error resume next... je l'ai enlevé et il fait une erreur à la ligne:
    Point3D(i).X = CSng(Mid(Out, PosX + 3, PosY - PosX - 3))
    dansl a fonction LoadASC !!!!!!!! Type Mistmatch !
    Et voila... jsais pas pq ça marche chez toi mais bon... :) !
    A+

  • signaler à un administrateur
    Commentaire de neodante le 17/08/2003 13:46:16 administrateur CS

    Je viens de la tester et il marche très bien (en fait ce prog à plus de deux ans et je l'ai réutiliser dans plusieurs apli pour afficher des petit logo en 3D et il à toujours très bien marché même sur NT). !
    Je vais regarder le code de suite quand même !!!
    @+

  • signaler à un administrateur
    Commentaire de Cyberdevil le 17/08/2003 13:47:31

    ben voila g trouvé la soluce :) !
    En faite ton OS est reglé comme point décimale "," (je pense que tout les français c comme ça) mais moi étant suisse, et en suisse on respecte les normes :) ben le point déciumal c "." et non "," donc dans ton fichier cube.asc tu me 20,00000 ça va pas fo mettre 20.00000 et c bon !
    A+

  • signaler à un administrateur
    Commentaire de neodante le 17/08/2003 13:50:10 administrateur CS

    Effectivement le point décimal est "," en france et donc maintenant ça marche alors ???
    @+

  • signaler à un administrateur
    Commentaire de Cyberdevil le 17/08/2003 13:58:54

    parfaitement !
    Mirci de la source lol :)
    A+

  • signaler à un administrateur
    Commentaire de Kirua le 17/08/2003 15:16:54

    respecte la norme... dis plutôt que chez vous c'est comme ça et chez nous (france, belgique...) c'est la virgule. c'est pas parce que les anglosaxons utilisent un . que c'est la norme :-)
    en tt cas, bravo pr ton programme neodante, un moteur 3D c hard O_o même si c'est que le début.

  • signaler à un administrateur
    Commentaire de Skywalker13 le 17/08/2003 15:20:27

    me semblait aussi ..
    cyberdevil.. bien joué parce que franchement j'aurais pas vu cette histoire de décimal.. je cherchais dans le code où était le prob :-)

  • signaler à un administrateur
    Commentaire de Skywalker13 le 17/08/2003 15:22:55

    - c'est pas parce que les anglosaxons utilisent un . que c'est la norme :-)

    bien sûr lol.. les normes ISO entre autre c'est pas pour rien qu'elles existent.. et microsoft à jamais su les respecter correctement.. :-)
    si tout le monde fesait comme il veut.. et ben on aurait un logiciel recompilé pour chaque pays..
    et manquerait plus que ca!

  • signaler à un administrateur
    Commentaire de DeathAngel le 18/08/2003 10:23:09

    Superbe !
    Je voulais savoir comment ça fonctionnait la 3D.
    Rien à dire, si ce n'est un poil de commentaire en plus ^_^

    9/10

    DA

Ajouter un commentaire

Pub



Appels d'offres

CalendriCode

Juillet 2008
LMMJVSD
 123456
78910111213
14151617181920
21222324252627
28293031   

Boutique

Boutique de goodies CodeS-SourceS