ANIMATION DE LOGO EN 3D, SOUS BUILDER C++ 3.0, EN UTILISANT LES ÉQUATIONS PARAME
celiphane
Messages postés466Date d'inscriptionsamedi 16 février 2002StatutMembreDernière intervention20 avril 2007
-
18 mai 2002 à 01:09
benjionline
Messages postés14Date d'inscriptionmercredi 27 décembre 2006StatutMembreDernière intervention11 mai 2008
-
9 juin 2007 à 17:03
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
pour améliorer la rapidité, il faudrai deja penser a declarer correctemet les varibles, c'est a dire
dim j as integer, j as double, k as double, m as double, x as double y as double, s as double ,t as double, l as integer
et puis on peut accelerer le tout en stokant les operations executées plusieurs fois dans une variable par exemple a=1-s ; b=t+pi*s ; c=2*t
voial, ce sont de petits conseils pour optimiser le code.
ATH|500|
Messages postés155Date d'inscriptionmardi 7 août 2001StatutMembreDernière intervention30 janvier 2008 18 mai 2002 à 18:04
Mais je dois dire que c'est pas mal même très bien si on le retravaille ça fait de beau effet 3d Super cool !
charlesvb
Messages postés19Date d'inscriptionsamedi 26 janvier 2002StatutMembreDernière intervention17 juin 2002 18 mai 2002 à 14:15
La rapidité par contre n'est pas fameuse!
cs_jp50
Messages postés45Date d'inscriptionsamedi 14 avril 2001StatutMembreDernière intervention 3 janvier 2008 18 mai 2002 à 03:05
Si vous voulez avoir le code pour VB ca donne ca
Me.AutoRedraw = True
Me.Show
DoEvents
Const pi = 3.141
Const z = 0.7
mm = 8
Dim i, j, k, l, m
Dim x, y, s, t As Double
For l = 1 To 6
For s = 0 To 1 Step 0.01
For t = 0 To 2 * pi Step 0.002
x = (1 - s) * Cos(t + pi * s) + s * Cos(2 * t)
y = (1 - s) * Sin(t + pi * s) - s * Sin(2 * t)
x = 100 * x + 200
i = x
y = 100 * y + 200
j = y
k = 255
Me.ForeColor = RGB(k, 0, 0)
Me.PSet (j * mm, i * mm)
Next t
DoEvents
Me.Refresh
Me.Cls
Next s
Next l
cs_Dalamar
Messages postés63Date d'inscriptionsamedi 22 décembre 2001StatutMembreDernière intervention22 décembre 2003 18 mai 2002 à 02:01
Ce code, il faut le mettre sur www.cppfrance.com
celiphane
Messages postés466Date d'inscriptionsamedi 16 février 2002StatutMembreDernière intervention20 avril 2007 18 mai 2002 à 01:09
9 juin 2007 à 17:03
18 mai 2002 à 19:09
dim j as integer, j as double, k as double, m as double, x as double y as double, s as double ,t as double, l as integer
et puis on peut accelerer le tout en stokant les operations executées plusieurs fois dans une variable par exemple a=1-s ; b=t+pi*s ; c=2*t
voial, ce sont de petits conseils pour optimiser le code.
18 mai 2002 à 18:04
18 mai 2002 à 14:15
18 mai 2002 à 03:05
Me.AutoRedraw = True
Me.Show
DoEvents
Const pi = 3.141
Const z = 0.7
mm = 8
Dim i, j, k, l, m
Dim x, y, s, t As Double
For l = 1 To 6
For s = 0 To 1 Step 0.01
For t = 0 To 2 * pi Step 0.002
x = (1 - s) * Cos(t + pi * s) + s * Cos(2 * t)
y = (1 - s) * Sin(t + pi * s) - s * Sin(2 * t)
x = 100 * x + 200
i = x
y = 100 * y + 200
j = y
k = 255
Me.ForeColor = RGB(k, 0, 0)
Me.PSet (j * mm, i * mm)
Next t
DoEvents
Me.Refresh
Me.Cls
Next s
Next l
18 mai 2002 à 02:01
18 mai 2002 à 01:09