Les membres ayant 30 points peuvent parler sur les canaux annonces, projets et hs du chat.
La shoutbox n'est pas chargée par défaut pour des raisons de performances. Cliquez pour charger.
Menu
Calculatrices
Graph 35 à 100
Graph 25+Pro/25+E/25+E II
Graph 35+USB/75(+E)/85/95 SD
Graph 100(+)
Classpad 300/330(+)
fx-CG 10/20 (Prizm)
Classpad 400(+E)
Graph 90+E
fx-92+ SC
Liens
¤ Vous cherchez une fonction ?
Utilitaires >> Graph 90+E >> Graphisme >> Mandelbrot Graph 90
Mandelbrot Graph 90
Version : 1.0 Taille : 350 octets Ajouté le : 2020-06-19 10:50 Modifié le : 2020-06-19 10:50
Auteur et posteur :
LightmareHors ligneMembre de CreativeCalcPoints: 690 Défis: 0 Message
Planète Casio - Programme Casio de graphisme - Mandelbrot Graph 90 - lightmare - Calculatrices
Nombre de visites sur cette page : 1636
Score au progrank : 27
Pas encore de note !
Vous devez être connecté(e) pour noter (inscription).
351 téléchargements | Soumettre un test


Description :

Ceci est ma réussite à visualiser la fractale de Mandelbrot sur une Garph 90, avec de jolies couleurs !

le programme nécessite C.Basic, et est très lent. Le zoom n'est donc pas possible.


Commentaires :


LephenixnoirHors ligneAdministrateurPoints: 24632 Défis: 170 Message
Posté le 19-06-2020 à 10:57 | #
Tiens, puisqu'on en avait parlé avec Redcmd, cette idée m'intéresse. Je vais le tester pour faire des mesures avec overclock, par pure curiosité.
LephenixnoirHors ligneAdministrateurPoints: 24632 Défis: 170 Message
Posté le 22-06-2020 à 15:39 | #
J'ai mesuré le temps que ça prend et... c'est pas si mal. Il faut plus de 5 minutes mais on obtient une image vraiment cool avec la coloration en plus. Honnêtement je suis assez surpris !

J'avais fait une version en C qui va beaucoup plus vite mais l'image est pas aussi jolie. Il va falloir que j'y retourne xD
LightmareHors ligneMembre de CreativeCalcPoints: 690 Défis: 0 Message
Posté le 22-06-2020 à 16:43 | #
Content de l'apprendre !
le secret que j'ai appris plus tard est qu'on peut faire sauter une racine carrée dans un des calculs récurrents, ce qui sauve des perfs. Et de toute façon, le détail est géré purement par le nombre d'itérations par pixel. (le mien est à 50, ce qui est standard )
LephenixnoirHors ligneAdministrateurPoints: 24632 Défis: 170 Message
Posté le 22-06-2020 à 16:45 | #
Oui j'ai vu en lisant ensuite que 50 itérations c'est pas mal pour cette résolution. J'ai modifié mon programme C et du coup j'obtiens à peu près pareil en noir et blanc.

Oui la racine carrée coûte cher... il vaut mieux modifier le seuil.
RedcmdHors ligneMembrePoints: 380 Défis: 7 Message
Posté le 20-08-2020 à 09:08 | # | Fichier joint
Using the "native" complex numbers in C.Basic makes the code much simpler and faster
This is the code I have for my fx-9750GII (Monochrome)

CASIO Basic

#Program name: Mndelbrt
#Password: <no password>
1 / 32 -> S
ViewWindow ﹣2 + S, 2 - S, 0, ﹣1 + S, 1 - S, 0, 0, 1, 1
AxesOff : LabelOff
BG-None : PlotOff 0, 0
Do : LpWhile GetKey
For ﹣2 -> X To 2 Step S
    For ﹣2 -> Y To 0 Step S
        0 -> A : 0 -> B
        For 1 -> I To 16
            A² -> C : B² -> D
            C + D > 4 => Break
            2AB + Y -> B
            C - D + X -> A
        Next
        If I > 20 :Then
            PlotOn X, ﹣Y :
            PlotOn X, ﹣Y
        IfEnd
    Next
Next
PlotChg 0, 0


C.Basic (Complex numbers)

#Program name: MndlbrtI
#Password: <no password>
'#CBcplx
1 / 32 -> S
ViewWindow ﹣2 + S, 2 - S, 0, ﹣1 - S, 1 - S, 0, 0, 1, 1
AxesOff : LabelOff
BG-None : PlotOff 0, 0
Do : LpWhile GetKey
For ﹣2 -> X To 2 Step S
    For ﹣1 -> Y To 0 Step S
        0 -> Z : X + Yi -> C
        For 1 -> I To 20
            Z² + C -> Z
            Abs Z > 2 => Break
        Next
        If I > 50 :Then
            PlotOn X, ﹣Y :
            PlotOn X, ﹣Y
            Break
        IfEnd
    Next
Next
PlotChg 0, 0


Mandelbrot Basic.zip
LephenixnoirHors ligneAdministrateurPoints: 24632 Défis: 170 Message
Posté le 20-08-2020 à 09:18 | #
Reminds me that I made a C version that renders the original fractal in ~300ms (low precision). I'll probably try to polish it and compare to alternatives one day

Planète Casio v4.3 © créé par Neuronix et Muelsaco 2004 - 2024 | Il y a 86 connectés | Nous contacter | Qui sommes-nous ? | Licences et remerciements

Planète Casio est un site communautaire non affilié à Casio. Toute reproduction de Planète Casio, même partielle, est interdite.
Les programmes et autres publications présentes sur Planète Casio restent la propriété de leurs auteurs et peuvent être soumis à des licences ou copyrights.
CASIO est une marque déposée par CASIO Computer Co., Ltd