Forum de Programmation en langage PANORAMIC
Rechercher
 
 

Résultats par :
 


Rechercher Recherche avancée

Mots-clés

fichiers  

Derniers sujets
» Bonne année
Dim 6 Jan - 23:09 par Papydall-Admin

» Joyeux Noel
Lun 24 Déc - 17:30 par Papydall-Admin

» Fête de Noël
Dim 16 Déc - 23:58 par Papydall-Admin

» Convertisseur Décimal ---> Binaire, Octal, Hexadécimal, ...
Mer 21 Nov - 1:08 par Papydall-Admin

» Balises {USER...}
Lun 19 Nov - 22:12 par Papydall-Admin

» Useful Dog
Ven 6 Avr - 14:25 par Papydall-Admin

» Les Courbes de Bézier cubiques
Ven 30 Mar - 4:08 par Papydall-Admin

» Animation flash
Mer 14 Mar - 2:50 par Papydall-Admin

» Mega-Strip
Lun 12 Mar - 1:24 par Papydall-Admin

Janvier 2019
LunMarMerJeuVenSamDim
 123456
78910111213
14151617181920
21222324252627
28293031   

Calendrier Calendrier


Courbe ornémentale

Aller en bas

Courbe ornémentale

Message par Papydall-Admin le Jeu 13 Oct - 4:01

Code:
rem ============================================================================
rem        Courbe ornementale
rem          Par Papydall
rem ============================================================================
dim x,y,xc,yc,t,p
p = pi/180 : xc = width(0)/2 : yc = height(0)/2
color 0,0,0,255 : 2d_pen_color 255,255,255 : 2d_pen_width 2  : 2d_poly_from xc,yc+10
for t = 0 to 2*pi step p
    x = sin(2*t) - 6*sin(5*t) : y = power(cos(4*t),5) - 1.1*cos(t)
    2d_poly_to xc + 20 * x,yc -100 * y : pause 10 : ' Pour observer le tracé de la courbe
next t
rem ============================================================================

_________________
Invité, merci d'être passé par ici.
avatar
Papydall-Admin
Admin

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

Voir le profil de l'utilisateur http://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