MESSAGE EN FEU D'ARTIFICE

Caribensila Messages postés 2527 Date d'inscription jeudi 15 janvier 2004 Statut Membre Dernière intervention 16 octobre 2019 - 25 déc. 2008 à 20:18
cincap Messages postés 460 Date d'inscription dimanche 5 décembre 2004 Statut Membre Dernière intervention 6 avril 2009 - 6 janv. 2009 à 14:51
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/48795-message-en-feu-d-artifice

cincap Messages postés 460 Date d'inscription dimanche 5 décembre 2004 Statut Membre Dernière intervention 6 avril 2009 2
6 janv. 2009 à 14:51
Bonjour à toutes et à tous,

@ Barbichette, en choisissant l'option 5, admiration de l'effet puis click sur l'écran pour fermer l'application on obtient une erreur avec D6 "Opération de pointeur incorrecte".

Voila voilou, sinon excellent travail.

Un site à retenir :

http://www.photojoy.com/index.aspx?id=11212

@+,

Cincap
Francky23012301 Messages postés 400 Date d'inscription samedi 6 août 2005 Statut Membre Dernière intervention 11 février 2016 1
3 janv. 2009 à 14:47
C'est super sympas ton source.
Coté code : simple mais efficace : fallait y penser ;)
cincap Messages postés 460 Date d'inscription dimanche 5 décembre 2004 Statut Membre Dernière intervention 6 avril 2009 2
2 janv. 2009 à 10:49
J'ai oublié le lien :

http://www1.jawink.ne.jp/koji-y/java/jhanabi4e.htm

Plusieurs effets.

@+,

Cincap
cincap Messages postés 460 Date d'inscription dimanche 5 décembre 2004 Statut Membre Dernière intervention 6 avril 2009 2
2 janv. 2009 à 10:41
Bonjour à toutes et à tous,

@ Barbichette, as tu déjà vu cette applet :











Désolé, il est temps de changer de navigateur (Iexploreur 5 et +)


Click sur l'image dirige les fusées, avec flou, sons et image de fond.

Sinon super ta source.

@+,

Cincap
aymenk Messages postés 77 Date d'inscription samedi 25 janvier 2003 Statut Membre Dernière intervention 29 octobre 2018
2 janv. 2009 à 01:36
Félicitations ,les Maths et la physique c'est tout ce que j'aime...
BONNE ANNÉE A TOUS LES MEMBRES DE DELPHIFR...
------>>>2009<<<------
offlake Messages postés 190 Date d'inscription mercredi 3 septembre 2008 Statut Membre Dernière intervention 17 janvier 2009
31 déc. 2008 à 23:44
Bon Code barbichette !!
Et je vous Souhaite Bonne Année et bonne continuation !!
BY OFFLAKE
Utilisateur anonyme
29 déc. 2008 à 19:28
j'ai malheureusement pas fait le rapport FPS !!!
mais il est certain qu'avant, l'animation était fluide et je parle bien de la version avec le flou.

Il est possible que le fait de passer de 5 à 9 pixels explique en partie le ralentissement mais je pense pas que ce soit tout !!! à voir ;)
cs_barbichette Messages postés 220 Date d'inscription lundi 30 octobre 2000 Statut Membre Dernière intervention 15 juillet 2013
29 déc. 2008 à 18:52
CIREC :
ben, le problème, c'est que je ne connais pas de façon rapide de faire un flou.
Par contre, la différence viens peut-être de la différence de matrice de filtre.
Dans la version précédente, j'utilisais 4 voisins plus le centre.
010
111 / 5
010
Maintenant, j'utilise 8 voisins plus le centre.
111
111 /9
111
Je vais regarder en repassant avec 5 pixels de flou...

Par contre, l'anime était déjà fortement saccadé chez moi avec l'ancienne version... 1 im/sec

Barbichette
Utilisateur anonyme
29 déc. 2008 à 18:40
oui la mémoire est libérée ... ^^
mais je ne suis pas certain que la nouvelle mouture soit meilleur que la précédente !!!!

en effet , que l'on utilise le flou ASM ou Pascal, l'animation est maintenant saccadée !!!!

comme je n'ai pas conservé l'ancienne version .. je ne peux donc plus faire de testes.

tout ce que je peux te dire c'est que ça consomme trop de ressources pour ce que ça fait !!!!
50% des ressources CPU pour une animation "basique" c'est beaucoup trop ... en comparaison j'anime 8 Bitmaps de 200x200 en vrai 32Bit "Transparence & Semi-Transparence" comme le png et je suis seulement à 15% !!!!

Voilà, pour la solution je te laisse regarder par toi même ^^
cs_barbichette Messages postés 220 Date d'inscription lundi 30 octobre 2000 Statut Membre Dernière intervention 15 juillet 2013
29 déc. 2008 à 16:12
Lafarge:
Le tableau BonneAnnee contient les points à afficher pour écrire un message.
Si le message est juste un O
on l'écrit par exemple :
OOO (1,1) (2,1) (3,1)
O O (1,2) (3,2)
O O (1,3) (3,3)
OOO (1,4) (2,4) (3,4)

donc avec un peu de patience, on peu afficher n'importe quel message.
Attention, il n'y a pas forcement 110 points dans le message.
cs_barbichette Messages postés 220 Date d'inscription lundi 30 octobre 2000 Statut Membre Dernière intervention 15 juillet 2013
29 déc. 2008 à 16:08
Voilà...
je vais faire la liste des modifications...
- J'ai laissé tombé le 2ieme bitmap (TMP), je n'utilise plus qu'une zone mémoire alloué au départ par getmem.
- JE LIBERE LA MEMOIRE....

Pour améliorer la vitesse :
- la dimension du bitmap n'est plus forcement celle de l'écran.
- quand on a de la culture, on l'étale. J'ai donc passé l'algo de flou en assembleur. Et là... Et ben, ça va un petit peu plus vite...
(J'ai laissé quand même la version pascal. A vous de choisir...)

Barbichette
cs_rt15 Messages postés 3874 Date d'inscription mardi 8 mars 2005 Statut Modérateur Dernière intervention 7 novembre 2014 13
29 déc. 2008 à 13:48
C'est trop bô. :,)

Chapeau l'artiste !
cincap Messages postés 460 Date d'inscription dimanche 5 décembre 2004 Statut Membre Dernière intervention 6 avril 2009 2
29 déc. 2008 à 10:45
Bonjour à toutes et à tous,

@ Tous, je présente mes meilleurs voeux pour l'an 2009 et 1000 merçi pour l'aide mise à la disposition de tous.

@ barbichette, bravo pour cette source qui fonctionne correctement sous D6.

Je me suis amusé en changeant une couleur dans le oncreate de la fiche, pour faire apparaître le message en vert mais la retombée des débris en une variation de couleurs pour revenir en rouge à la fin.

feu[i].color:= clred ;//Au lieu de $010101;

@+,

Cincap
cs_lafarge Messages postés 7 Date d'inscription mercredi 25 octobre 2000 Statut Membre Dernière intervention 29 décembre 2008
29 déc. 2008 à 00:32
Comme le dit si bien Caribensia, Fascinant, voilà qui inscite à être humble. Aussi de suite il m'est venu de le traduire en
Anglais "HAPPY NEW YEAR", Je cherche donc la construction du mot à l'aide de votre constante . de type tPoint:
Comme le graphisme n'est pas la matière ou j'excelle loin de là, pourriez-vous nous en dire plus. Sur quelle base (si je peux m'exprimer ainsi)
vous codez votre tableau ->
BonneAnnee:array[1..110] of tpoint=
( ((x:-10;y:0;),(x:-9;y:0;), // B
......................................................
(x:8;y:11;),(x:9;y:11;),(x:10;y:11;)); // E

Merci par avance et pardonnez mon ignorance...
Bravo.

Lafarge
Caribensila Messages postés 2527 Date d'inscription jeudi 15 janvier 2004 Statut Membre Dernière intervention 16 octobre 2019 18
28 déc. 2008 à 18:48
Allez, Barbichette!
Une Pampers anti-fuite à ton beau bébé... et Großonkel Cirec le baptise !
Utilisateur anonyme
28 déc. 2008 à 18:26
Salut & bonnes fêtes à vous tous ;)

ach ja c'est magnifique !!!
Bravo

j'ai suivi, dans l'ombre, l'évolution de ce code et la le rendu est parfait ... et on a, enfin, le temps de lire ce message avant qu'il n'explose ^^

mais ... il y a un mais ... désolé .. ^^
depuis la deuxième version des fuites de mémoires se sont invitées au code et dans la dernière version ces dernières se sont, légèrement, amplifiées !!!

---------------------------
Unexpected Memory Leak
---------------------------
An unexpected memory leak has occurred. The unexpected small block leaks are:

21 - 28 bytes: TBrush x 1
29 - 36 bytes: TPen x 1, Unknown x 2
37 - 44 bytes: TFont x 1
61 - 68 bytes: TBitmap x 2
101 - 108 bytes: TBitmapCanvas x 1
117 - 124 bytes: TBitmapImage x 2
149 - 156 bytes: Unknown x 1
--------------------------

Ajoute un OnDestroy a la fiche et libères les deux Bitmaps.
Pour améliorer le rendu tu peux aussi ajouter un "ShowCursor(False)" dans le OnCreate

procedure TForm1.FormDestroy(Sender: TObject);
begin
bmp.Free;
tmp.Free;
ShowCursor(True);
end;

Bravo encore pour ce code ... j'attends la correction pour noter ... je ne peux pas mettre un 10/10 a un code qui a des fuites !!!! :x ^^
Caribensila Messages postés 2527 Date d'inscription jeudi 15 janvier 2004 Statut Membre Dernière intervention 16 octobre 2019 18
28 déc. 2008 à 17:05
Pour les performances, il serait peut-être intéressant de passer en mode palettisé, pf8bit par exemple... Ou même pf4bit, puisque tu travailles avec moins de 16 couleurs...

Je ne me fais pas de souci pour toi, mais bonne chance quand même !
( il en faut tj un peu ds la vie ;)
cs_cantador Messages postés 4720 Date d'inscription dimanche 26 février 2006 Statut Modérateur Dernière intervention 31 juillet 2021 13
28 déc. 2008 à 12:17
C'est très beau barbichette !
Pour ton nouveau job,
je te donne le mot de cambronne !
cantador
Debiars Messages postés 285 Date d'inscription lundi 16 juin 2003 Statut Membre Dernière intervention 11 février 2018
28 déc. 2008 à 10:52
Avec le flou, ça devient du grand Art !!!
Au bout d'un moment, on obtient un tableau qui dépasse de loin la production de certains peintres modernes de m...ême qualificatif que celui que tu attribues au boulot que tu quittes.
Bonne chance pour ce nouveau départ.

jp
cs_barbichette Messages postés 220 Date d'inscription lundi 30 octobre 2000 Statut Membre Dernière intervention 15 juillet 2013
27 déc. 2008 à 21:04
Bon, parce que je quitte mon boulot de merde et que je rentre en formation pro, voilà un petit cadeau supplémentaire.
J'ai ajouté au zip la même version (ou presque) mais avec un effet de flou entre chaque image. La fumée des fusées est blanche et les explosions sont donc un peu plus persistante.
Par contre, you you youille la performance...
C'est un peu plus lent....

Barbichette
clipper1 Messages postés 8 Date d'inscription dimanche 21 novembre 2004 Statut Membre Dernière intervention 27 décembre 2008
27 déc. 2008 à 17:03
jolie spectacle bonne annee barbichette
clipper1 Messages postés 8 Date d'inscription dimanche 21 novembre 2004 Statut Membre Dernière intervention 27 décembre 2008
27 déc. 2008 à 16:57
barbichette; avant merci pour le spectacl ca fait rêver je vous souhaite bonne année on a des choses apprendre avec vous ne cesse pas de nous surprendres avec vous codes bonne année
beckerich Messages postés 302 Date d'inscription jeudi 29 septembre 2005 Statut Membre Dernière intervention 17 septembre 2013 2
26 déc. 2008 à 19:29
mettez la constante à zéro et on assiste à la naissance d'une naine blanche !
Luc.
beckerich Messages postés 302 Date d'inscription jeudi 29 septembre 2005 Statut Membre Dernière intervention 17 septembre 2013 2
26 déc. 2008 à 19:26
bravo bravo,
J'ai changé la constante TailleLettre = 20 et on lit mieux le message.
En 10, c'est pas mal non plus mais le mesage s'efface trop vite. Il faudrait ajouter un petit délais entre, mais la fluidité en pâtirait. Mes compétences en graphisme s'approchant de zéro, voire moins, j'ai pas osé essayer comprendre le code.

Merci Barbichette
Caribensila Messages postés 2527 Date d'inscription jeudi 15 janvier 2004 Statut Membre Dernière intervention 16 octobre 2019 18
26 déc. 2008 à 18:18
Superbe!
Et la longueur de la trainée qui varie en fonction de la vitesse, c'est bluffant !

M'en va regarder comment t'as fait ça... :)
cs_barbichette Messages postés 220 Date d'inscription lundi 30 octobre 2000 Statut Membre Dernière intervention 15 juillet 2013
26 déc. 2008 à 18:02
voilà, c'est pas vraiment de la fumée, mais plutôt une trainé dans le ciel.
Pour ce faire, je ne dessine plus dans le canvas mais dans un bitmap, puis j'applique un filtre (une sorte de motion blur des plus simple).

Barbichette
cs_cantador Messages postés 4720 Date d'inscription dimanche 26 février 2006 Statut Modérateur Dernière intervention 31 juillet 2021 13
26 déc. 2008 à 10:29
Salut,
transmission de pensée..quand je t'ai écrit, c'est ça que je voulais faire barbichette ! (je cherchais un traitement sur bonne année)
mais la combinaison feu d'artifice + message, super !

Vraiment excellent !

Juste un truc, l'affichage du message "bonne année" est un poil trop court et peut-être aurait il fallut le densifier légèrement.

Bonne année
offlake Messages postés 190 Date d'inscription mercredi 3 septembre 2008 Statut Membre Dernière intervention 17 janvier 2009
25 déc. 2008 à 22:22
Bon Code !! barbichette
Et bonne année a tous les membres du Site Codes-Souces !!
BY OFFLAKE
Caribensila Messages postés 2527 Date d'inscription jeudi 15 janvier 2004 Statut Membre Dernière intervention 16 octobre 2019 18
25 déc. 2008 à 20:18
Fascinant ! Il y a un style Barbichette, y'a pas à dire... :)
Les explications ne sont pas superflues, mais elles sont là. Heureusement !
Le bouquet du spectacle étant bien sûr le message. Chapeau !

Un petit regret cependant : Une petite trainée de fumée derrière les fusées qui permettrait de mieux mettre en valeur ces trajectoires si élégantes... Mais bon, c'est du chipotage.
Rejoignez-nous