Forum de Programmation en langage PANORAMIC
Rechercher
 
 

Résultats par :
 


Rechercher Recherche avancée

Mots-clés

fichiers  

Derniers sujets
» 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

» Les oiseaux de mon jardin
Ven 9 Mar - 1:08 par Papydall-Admin

»  Création et gestion d’un livre
Jeu 8 Mar - 15:37 par Papydall-Admin

» Deux questions d’éthique
Mar 6 Mar - 1:56 par Papydall-Admin

»  La Blague Du Jour
Lun 5 Mar - 2:50 par Papydall-Admin

» Branle-Fesse
Lun 5 Mar - 2:46 par Papydall-Admin

Mai 2018
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 : 94
Réputation : 0
Date d'inscription : 08/09/2015
Age : 67
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