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
» Problème de compilateur.
par Pedro Alvarez Hier à 20:01

» COMPILATEUR V 0.9 beta 8 du 18 aout 2017
par Pedro Alvarez Hier à 19:54

» Pb 17 (en analyse): ITEM_SELECT ne fonctionne pas
par Jack Jeu 17 Aoû 2017 - 19:26

» Compilateur FBPano
par Mike Jeu 17 Aoû 2017 - 13:52

» un nouveau editeur panobasic
par Jean Claude Jeu 17 Aoû 2017 - 10:18

» Le compilateur.
par Pedro Alvarez Jeu 17 Aoû 2017 - 8:36

» Pb 16 (en analyse): ON_CLOSE plante à l'exécution
par Jack Mer 16 Aoû 2017 - 20:00

» Pb 15 (en analyse): TIMER_ON plante à l'exécution
par Jack Mer 16 Aoû 2017 - 19:58

» KGF_dll - nouvelles versions
par Yannick Dim 13 Aoû 2017 - 17:35

» probleme d'outil
par Yannick Dim 13 Aoû 2017 - 17:32

» Carte de France des régions
par Yannick Sam 12 Aoû 2017 - 21:33

» Pb 14 (en analyse): PRINT_LOCATE plante à l'exécution
par Jack Ven 11 Aoû 2017 - 22:37

» Petit avertissement [Mots réservés]
par papydall Ven 11 Aoû 2017 - 13:45

» Distances sur plan
par JL35 Jeu 10 Aoû 2017 - 21:29

» Tracé : Triangle, Carrée, Dents de scie, Sinusoïde redressée
par papydall Jeu 10 Aoû 2017 - 14:52

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Août 2017
LunMarMerJeuVenSamDim
 123456
78910111213
14151617181920
21222324252627
28293031   
CalendrierCalendrier

Partagez | 
 

 Triangle à coins arrondis

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
papydall

avatar

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

MessageSujet: Triangle à coins arrondis   Dim 13 Déc 2015 - 4:56

Laughing  Idea  Wink
Code:

rem ============================================================================
rem      Triangle à coins arrondis
rem ============================================================================
width 0,1000
Triangle_Coins_Arrondis(200,250,200,10,255,0,255)
Triangle_Coins_Arrondis(450,250,100,20,100,50,20)
Triangle_Coins_Arrondis(600,250,050,10,0,255,255)
Triangle_Coins_Arrondis(800,250,240,50,0,0,255)
Triangle_Coins_Arrondis(550,150,80,20,0,0,0)
end
rem ============================================================================
' Tracer un triangle équilateral plein à coins arrondis
' xcentre,ycentre : coordonnées du centre du triangle
' rayon : distance du centre du triangle aux sommets
' courbure : rayon de l'arrondi
' r,g,b : couleur de remplissage du triangle
SUB Triangle_Coins_Arrondis(xcentre,ycentre,rayon,courbure,r,g,b)
    dim_local xp,yp,i,r1,r2,r3,cr,cg,cb
    cr = COLOR_PIXEL_RED(0,Xcentre,Ycentre)
    cg = COLOR_PIXEL_GREEN(0,Xcentre,Ycentre)
    cb = COLOR_PIXEL_BLUE(0,Xcentre,Ycentre)
    r1 = courbure : r3 =  sqr(3) : r2 = r1*r3
    degrees
    xp = rayon * Cos(-90) + xcentre : yp = rayon * Sin(-90) + ycentre
    2d_fill_color r,g,b : 2d_pen_color r,g,b : 2d_poly_from xp,yp
    for i = 1 to 3
        xp = xcentre + rayon * Cos(120 * i - 90)
        yp = ycentre + rayon * sin(120 * i - 90)
        2D_poly_to xp,yp
        if i = 1 then 2d_circle xp-r2,yp-r1,r1
        if i = 2 then 2d_circle xp+r2,yp-r1,r1
    next i
    2d_circle xp,yp+2*r1,r1 : 2d_flood xcentre,ycentre,r,g,b
    2d_pen_color cr,cg,cb
    for i = 1 to 3
        xp = xcentre + rayon * Cos(120 * i - 90)
        yp = ycentre + rayon * sin(120 * i - 90)
        2D_poly_to xp,yp
    next i
END_SUB
rem ============================================================================

sunny sunny sunny
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Marc37



Nombre de messages : 443
Age : 56
Localisation : TOURS
Date d'inscription : 18/03/2014

MessageSujet: Re: Triangle à coins arrondis   Dim 13 Déc 2015 - 13:28

Quelle manne de programmes, tu nous offres ! Tous très pertinents !
Tu as le don d’enseigner et de démontrer avec des exemples simples, les techniques de programmation. Excellent pour un novice comme moi !
Tes sources sont toujours très documentés. Bref, que du bonheur !
De quoi faire un PLM hors-série de 500 pages !
Merci et bonne journée dominicale !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

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

MessageSujet: Re: Triangle à coins arrondis   Dim 13 Déc 2015 - 14:46

Salut Marc37

Merci pour les compliments.
Ça va droit au cœur. I love you
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Jicehel

avatar

Nombre de messages : 5849
Age : 45
Localisation : 77500
Date d'inscription : 19/04/2011

MessageSujet: Re: Triangle à coins arrondis   Dim 13 Déc 2015 - 18:58

S'il y en a bien un qui pourrait faire des articles c'est bien Papydall qui écrit très bien, fait de beaux programmes et connait pas mal de choses autour pour les illustrer ... enfin, c'est mon opinion et il est mieux placé que moi pour pouvoir en juger.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

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

MessageSujet: Re: Triangle à coins arrondis   Dim 13 Déc 2015 - 19:14

Continuez à flatter mon ego, messieurs, mais pas trop car je pourrais y croire ! jocolor
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Contenu sponsorisé




MessageSujet: Re: Triangle à coins arrondis   

Revenir en haut Aller en bas
 
Triangle à coins arrondis
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Coins arrondis dans un tableau
» Coins arrondis
» Mettre les coins arrondis sur l'infobulle
» Coins arrondis
» Les coins arrondis

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