Plasma
Description
Ce programme est une animation de type Plasma, effet très connu dans les démos du temps du DOS. Voici une version Windows optimisée à 100%, en plein écran, avec affichage des statistiques... J'ai limité le FrameRate à 50 FPS car au-delà l'animation est difficilement supportable, et provoque des maux de tête.
Vous pouvez appuyez sur la touche :
Echap pour quitter
S pour afficher/masquer les statistiques
Le code est basé sur un exemple trouvé dans les SWAG, une librairie de code pour Turbo Pascal très interressante, bien que la dernière mise à jour date de 1997. J'ai pas mal optimisé le code, de sorte à ce que l'animation soit fluide même en 1280x1024... Il devrait être compilable sous Delphi 3, 4, 5 et 6.
Liste des optimisations :
Remplacement des bytes par des integer
Utilisation d'un Bitmap Tile 256x2x6x8 pour le calcul
Utilisation d'un Bitmap Tile 256x256 à la profondeur d'écran pour l'affichage
Utilisation du ScanLine
Utilisation de Threads
Remplacement des mod par des and
Remplacement des * et / par des shr et shl
Conclusion :
Vous pouvez appuyez sur la touche :
Echap pour quitter
S pour afficher/masquer les statistiques
Le code est basé sur un exemple trouvé dans les SWAG, une librairie de code pour Turbo Pascal très interressante, bien que la dernière mise à jour date de 1997. J'ai pas mal optimisé le code, de sorte à ce que l'animation soit fluide même en 1280x1024... Il devrait être compilable sous Delphi 3, 4, 5 et 6.
Liste des optimisations :
Remplacement des bytes par des integer
Utilisation d'un Bitmap Tile 256x2x6x8 pour le calcul
Utilisation d'un Bitmap Tile 256x256 à la profondeur d'écran pour l'affichage
Utilisation du ScanLine
Utilisation de Threads
Remplacement des mod par des and
Remplacement des * et / par des shr et shl
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.