Forum de Programmation en langage PANORAMIC


Rejoignez le forum, c’est rapide et facile

Forum de Programmation en langage PANORAMIC
Forum de Programmation en langage PANORAMIC
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
Rechercher
 
 

Résultats par :
 


Rechercher Recherche avancée

Derniers sujets
» Bonne année 2024
En moins de 10 lignes de code : Effet spectaculaire ! EmptyLun 1 Jan - 0:25 par Papydall-Admin

» A ceux qui célèbre Noël, bonnes fêtes
En moins de 10 lignes de code : Effet spectaculaire ! EmptyDim 24 Déc - 10:49 par Papydall-Admin

» Joyeux Noël et Bonne Année
En moins de 10 lignes de code : Effet spectaculaire ! EmptyVen 8 Déc - 1:34 par Papydall-Admin

» Planets of the Solar System : Tilts and Spins
En moins de 10 lignes de code : Effet spectaculaire ! EmptyLun 20 Mar - 15:43 par Papydall-Admin

» Bonne Année 2023
En moins de 10 lignes de code : Effet spectaculaire ! EmptySam 31 Déc - 1:39 par Papydall-Admin

» Fractals - Mandelbrot
En moins de 10 lignes de code : Effet spectaculaire ! EmptyVen 21 Aoû - 22:51 par Papydall-Admin

» Convertisseur Décimal ---> Binaire, Octal, Hexadécimal, ...
En moins de 10 lignes de code : Effet spectaculaire ! EmptyMer 21 Nov - 1:08 par Papydall-Admin

» Balises {USER...}
En moins de 10 lignes de code : Effet spectaculaire ! EmptyLun 19 Nov - 22:12 par Papydall-Admin

» Useful Dog
En moins de 10 lignes de code : Effet spectaculaire ! EmptyVen 6 Avr - 14:25 par Papydall-Admin

Avril 2024
LunMarMerJeuVenSamDim
1234567
891011121314
15161718192021
22232425262728
2930     

Calendrier Calendrier

Le Deal du moment : -29%
PC portable – MEDION 15,6″ FHD Intel i7 ...
Voir le deal
499.99 €

En moins de 10 lignes de code : Effet spectaculaire !

Aller en bas

En moins de 10 lignes de code : Effet spectaculaire ! Empty En moins de 10 lignes de code : Effet spectaculaire !

Message par Papydall-Admin Ven 16 Juin - 2:13

Code:
dim x,y,xc,yc,d,i
full_space 0 : caption 0,"!!! Veuillez patienter !!!  <CLICK> pour arrêter"
D = 1.20123456789 + rnd(1): xc = width(0)*0.5:yc = height(0)*0.5 : color 0,0,0,0
repeat
     i = i + 1.25 : X = X + sin(D * power(I,D)): Y = Y + COS(D *power(I,D))
     2d_pen_color mod(i,255),rnd(255),mod(i,255)
     2d_point xc+x,yc+y:2d_point xc-x,yc-y:2d_point xc+x,yc-y:2d_point xc-x,yc+y
until i > 240000 or scancode <> 0
caption 0,"!!! Terminé !!!"
Papydall-Admin
Papydall-Admin
Admin

Messages : 93
Réputation : 0
Date d'inscription : 08/09/2015
Age : 73
Localisation : MOKNINE (Tunisie)

https://papydall-panoramic.forumarabia.com

Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum