FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» Découpe dans une image
par JL35 Hier à 23:03

» FNC IsDateValide(d$) pour vérifier la validité d'une date
par Marc Hier à 21:51

» Pour faire plaisir à Marc37.
par Marc Hier à 21:46

» Couleur d'une variable qui n'est pas un mot-clé
par bignono Hier à 14:03

» Un catalogue de photos de fleurs, avec KBDD, affichage HTML
par Klaus Mer 21 Fév 2018 - 22:44

» KGF_dll - nouvelles versions
par Klaus Mer 21 Fév 2018 - 22:30

» Mah-Jong anglais
par jjn4 Mer 21 Fév 2018 - 14:22

» Partie fractionnaire d'un flottant
par silverman Mer 21 Fév 2018 - 14:19

» bug CREATE_HIDE : corruption de form
par silverman Mer 21 Fév 2018 - 13:32

» Racine carrée d’un nombre par l’algorithme de Héron
par Ouf_ca_passe Mer 21 Fév 2018 - 9:52

» Méthode manuelle d'extraction de la racine carrée
par pascal10000 Mer 21 Fév 2018 - 7:47

» [annulé]ON_MOVE n,l ne fonctionne que sur le form 0
par silverman Mar 20 Fév 2018 - 16:52

» Ludothèque Panoramic
par jjn4 Mar 20 Fév 2018 - 15:42

» Calculus
par Ouf_ca_passe Mar 20 Fév 2018 - 9:06

» 6 (en analyse):confusion de variable locale entre SUB et FNC
par Jack Mar 20 Fév 2018 - 8:18

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Février 2018
LunMarMerJeuVenSamDim
   1234
567891011
12131415161718
19202122232425
262728    
CalendrierCalendrier

Partagez | 
 

 Equation de la pomme

Aller en bas 
AuteurMessage
papydall

avatar

Nombre de messages : 5744
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Equation de la pomme   Ven 6 Mai 2016 - 5:23

Après les œufs, voici l’équation de la pomme.

Code:

rem ============================================================================
rem         Equation de la Pomme
rem ============================================================================
picture 10 : full_space 10 : 2d_target_is 10
Pomme(300,120,1,1.2,0.15,0.08)
end
rem ============================================================================
SUB Pomme(xc,yc,a,b,p,q)
    dim_local x,y,t,dt,r,s,pi2
    dt = pi/180 : s = 200 : pi2 = pi/2
    2d_pen_color 255,0,0
    for t = 0-pi/2 to 3*pi/2 step dt
        r = a*(1-sin(t))
        x = r*exp(0-p*(t-pi2)*(t-pi2))*cos(t)
        y = b*r*exp(0-q*(t-pi2)*(t-pi2))*sin(t)
        if t = 0-pi/2
           2d_poly_from xc+s*x,yc-s*y
        else
           2d_poly_to xc+s*x,yc-s*y
        end_if
    next t
    2d_flood xc,2*yc,255,0,0
END_SUB
rem ============================================================================
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
JL35



Nombre de messages : 6148
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Equation de la pomme   Ven 6 Mai 2016 - 9:45

Maintenant, un café, et l'addition !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 5744
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Equation de la pomme   Ven 6 Mai 2016 - 11:40

Hmmm! Tu me donnes des idées.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Contenu sponsorisé




MessageSujet: Re: Equation de la pomme   

Revenir en haut Aller en bas
 
Equation de la pomme
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» [Pomme > Fraise] Dollies ? (2ème Essai) [Terminé]
» pomme grenade
» [Toutes les créas' sont là ;) ] Une Pomme qui tombe du Ciel /0w0\
» <@¿@> du 12 Janvier : pomme pin rongée par écureuil
» Tu es la pomme de ma vie.

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: Vos sources, vos utilitaires à partager-
Sauter vers: