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
» Traceur de courbes représentatives des fonctions y = f(x)
par Ouf_ca_passe Aujourd'hui à 20:51

» Problème de syntaxe
par Klaus Aujourd'hui à 12:40

» KGF_dll - nouvelles versions
par Klaus Aujourd'hui à 12:36

» Compilateur FBPano
par jean_debord Aujourd'hui à 12:31

» Toolbar en Panoramic
par ygeronimi Hier à 23:56

» Documentation des évènements
par Klaus Hier à 16:46

» Klaus est de retour!
par jjn4 Hier à 16:31

» Texte sur image
par Jicehel Hier à 12:23

» MIN - MAX avec SPIN
par ygeronimi Sam 21 Jan 2017 - 10:02

» HEIGHT_CLIENT(N)
par ygeronimi Ven 20 Jan 2017 - 16:41

» Non demande de commande
par ygeronimi Jeu 19 Jan 2017 - 11:50

» Bataille navale sous-marine
par papydall Jeu 19 Jan 2017 - 2:19

» Version instantanée du 16/01/2017 : PANORAMIC V 0.9.27i10
par mindstorm Mer 18 Jan 2017 - 21:05

» PLM N34
par Froggy One Mer 18 Jan 2017 - 17:32

» saving 1.png [RÉSOLU]
par Froggy One Mar 17 Jan 2017 - 19:44

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Janvier 2017
LunMarMerJeuVenSamDim
      1
2345678
9101112131415
16171819202122
23242526272829
3031     
CalendrierCalendrier

Partagez | 
 

 Hé ! Y- a-t-il quelqu’un ?

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



Nombre de messages : 5109
Age : 66
Localisation : Moknine (Tunisie)
Date d'inscription : 03/03/2012

MessageSujet: Hé ! Y- a-t-il quelqu’un ?   Ven 23 Oct 2015 - 4:54

Hé ! Y- a-t-il  quelqu’un  Question  
On boude le forum ou quoi  Question

Bon, alors voici ce code qui ne sert à rien, sauf peut-être à faire réagir quelqu'un  Exclamation


Code:

rem ============================================================================
dim n
full_space 0 : color 0,0,0,0
for n = 0 to 14 : spirale(100*n,height(0)*.8) : next n
end
rem ============================================================================
SUB Spirale(x0,y0)
    dim_local pi,twopi,p,a,i,x,y
    pi = acos(-1) : twopi = 2*pi : p = pi/180
    2d_pen_width 5 : 2d_pen_color 150+5*n,15*n,255-15*n
    for i = 1 to 6
        2d_line x0 + 15*twopi+i*2, y0 + 100 ,x0+15*twopi+i*2,y0-i*100
        2d_pen_width 2
        for a = twopi to 0 step 0-p
            x = 15*a * cos(a)+i*2 : y =  10*a * sin(a)
            2d_poly_to x0+x,y+y0-i*100
        next a
    next i

    2d_pen_width 5 : 2d_pen_color 255-15*n,150+5*n,15*n
    for i = 6 to 1 step -1
        2d_line x0 + 15*twopi +2*(10-i), y0 + 100 ,x0+15*twopi+2*(10-i),y0-i*100
        2d_poly_from x0+200,y0-i*100
        2d_pen_width 2
        for a = 0 to twopi  step p
            x = 200-15*a * cos(a) : y =  10*a * sin(a)
            2d_poly_to x0+x,y+y0-i*100
        next a
    next i

END_SUB
rem ============================================================================



Après une absence d'une année et quelques poussières Martiennes, JJN4 s’est connecté hier à 15 : 09  peut-être de sa planète Mars.
Donc il est en vie et ça c’est une bonne nouvelle.
JJN4, tu parleras (plutôt tu posteras) quand tu te sens prêt car c’est toujours un plaisir de te lire.  Laughing

Mais ne tarde pas trop!      
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
ygeronimi



Nombre de messages : 7009
Age : 45
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Ven 23 Oct 2015 - 10:36

Joli !...

Pour le forum, ne t' en fais pas, c' est juste le calme avant la tempête... Laughing
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Minibug



Nombre de messages : 2015
Date d'inscription : 10/02/2012

MessageSujet: Re: Hé ! Y- a-t-il quelqu’un ?   Ven 23 Oct 2015 - 11:23

Bonjour les gars !

Effectivement c'est très calme.
Etant en arrêt pour la semaine, je pensais avancer sur GPP, et au bout du compte... rien.
Je suis trop fatigué pour quoi que ce soit ! J'attends des résultats, on verra après.

En attendant, c'est la fin de semaine et je vous souhaite un très bon weekend a tous ! cheers cheers

Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jicehel



Nombre de messages : 5744
Age : 44
Localisation : 77500
Date d'inscription : 19/04/2011

MessageSujet: Re: Hé ! Y- a-t-il quelqu’un ?   Ven 23 Oct 2015 - 11:27

Oui bon week end à tous pour ce soir. Comme pour le moment je n'ai pas trop d'idée ni d'envie de programmer, je ferais un nouveau chapitre de cours dimanche (ou deux si j'ai le temps, on verra bien, mais je me mets un chapitre au moins à faire Wink )
Revenir en haut Aller en bas
Voir le profil de l'utilisateur En ligne
jpcr



Nombre de messages : 276
Age : 50
Localisation : Val de Marne (94)
Date d'inscription : 06/05/2011

MessageSujet: Re: Hé ! Y- a-t-il quelqu’un ?   Ven 23 Oct 2015 - 18:04

oui bon week end , moi aussi je suis lessivé par le boulot et les transports parisiens....

jp
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://jeanpierre.creis.free.fr/Panoramic/Panoramic.html
Marc37



Nombre de messages : 300
Age : 55
Localisation : TOURS
Date d'inscription : 18/03/2014

MessageSujet: Re: Hé ! Y- a-t-il quelqu’un ?   Ven 23 Oct 2015 - 23:01

Bonjour à tous !

Papydall : Très joli ! Je vais t'embaucher pour faire mes grilles en fer forgé !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall



Nombre de messages : 5109
Age : 66
Localisation : Moknine (Tunisie)
Date d'inscription : 03/03/2012

MessageSujet: Re: Hé ! Y- a-t-il quelqu’un ?   Ven 23 Oct 2015 - 23:55

Marc37 a écrit:
Papydall : Très joli ! Je vais t'embaucher pour faire mes grilles en fer forgé !

Oh ! Je suis trop vieux pour faire ça manuellement, mais  à coups de sin / cos peut-être.
En tout cas, merci pour la proposition.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Jicehel



Nombre de messages : 5744
Age : 44
Localisation : 77500
Date d'inscription : 19/04/2011

MessageSujet: Re: Hé ! Y- a-t-il quelqu’un ?   Sam 24 Oct 2015 - 0:17

Je viens de tester. C'est réussi Papydall. La colorisation était très bien alors je mets juste une variation par principe ici, mais le programme n'en avait pas particulièrement besoin.

Code:
rem ============================================================================
dim n
full_space 0 : color 0,0,0,0
for n = 0 to 14 : spirale(100*n,height(0)*.8) : next n
end
rem ============================================================================
SUB Spirale(x0,y0)
    dim_local pi,twopi,p,a,i,x,y
    pi = acos(-1) : twopi = 2*pi : p = pi/180
    2d_pen_width 5 : 2d_pen_color 150+5*n,15*abs(n - 8),255-16*n
    for i = 1 to 6
        2d_line x0 + 15*twopi+i*2, y0 + 100 ,x0+15*twopi+i*2,y0-i*100
        2d_pen_width 2
        for a = twopi to 0 step 0-p
            x = 15*a * cos(a)+i*2 : y =  10*a * sin(a)
            2d_poly_to x0+x,y+y0-i*100
        next a
    next i

    2d_pen_width 5 : 2d_pen_color 255-15*n,15*abs(n - 8),255-16*n
    for i = 6 to 1 step -1
        2d_line x0 + 15*twopi +2*(10-i), y0 + 100 ,x0+15*twopi+2*(10-i),y0-i*100
        2d_poly_from x0+200,y0-i*100
        2d_pen_width 2
        for a = 0 to twopi  step p
            x = 200-15*a * cos(a) : y =  10*a * sin(a)
            2d_poly_to x0+x,y+y0-i*100
        next a
    next i

END_SUB
rem ============================================================================
Revenir en haut Aller en bas
Voir le profil de l'utilisateur En ligne
papydall



Nombre de messages : 5109
Age : 66
Localisation : Moknine (Tunisie)
Date d'inscription : 03/03/2012

MessageSujet: Re: Hé ! Y- a-t-il quelqu’un ?   Sam 24 Oct 2015 - 1:42

Merci Jicehel.

Mais pourquoi le martien ne réagit-il point ?
Si ta longue absence t’ a fait oublier notre langage,  parle ‘ Martien’.  alien
Il y aura toujours quelqu’un qui saura traduire du Martien vers Panoramic.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Jicehel



Nombre de messages : 5744
Age : 44
Localisation : 77500
Date d'inscription : 19/04/2011

MessageSujet: Re: Hé ! Y- a-t-il quelqu’un ?   Sam 24 Oct 2015 - 10:58

Le clavier martien a peut être du mal à se reconnecter à notre système terrestre ? Wink
Revenir en haut Aller en bas
Voir le profil de l'utilisateur En ligne
JL35



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

MessageSujet: Re: Hé ! Y- a-t-il quelqu’un ?   Sam 24 Oct 2015 - 11:56

Ouah ! Ouah !
oh pardon, je me suis trompé, ça c'est du marchien (ou martien auvergnat)...
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Marc37



Nombre de messages : 300
Age : 55
Localisation : TOURS
Date d'inscription : 18/03/2014

MessageSujet: Re: Hé ! Y- a-t-il quelqu’un ?   Sam 24 Oct 2015 - 14:13

Je ne sais pas comment ça se passe sur Mars, mais pour nous, nous avons 1 heure de plus cette nuit pour programmer... sauf Papydall qui, je crois, est puni, et n'aura pas son heure supplémentaire.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall



Nombre de messages : 5109
Age : 66
Localisation : Moknine (Tunisie)
Date d'inscription : 03/03/2012

MessageSujet: Re: Hé ! Y- a-t-il quelqu’un ?   Sam 24 Oct 2015 - 14:14

M'énerve pas Terrechtre !    Je ne peux pas devenir méchant (non plus messant ! Ha! ha! ha!) !


Edit:
Bonjour Marc37
Mon message est destiné à un Terrechre au doux nom de Chi L Trente Chinq.

Marc37 a écrit:
Je ne sais pas comment ça se passe sur Mars, mais pour nous, nous avons 1 heure de plus cette nuit pour programmer... sauf Papydall qui, je crois, est puni, et n'aura pas son heure supplémentaire.

Ben oui, vous êtes revenus terre à terre (teras tos teras)
Nous, nous y étions toujours. Laughing
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
papydall



Nombre de messages : 5109
Age : 66
Localisation : Moknine (Tunisie)
Date d'inscription : 03/03/2012

MessageSujet: Re: Hé ! Y- a-t-il quelqu’un ?   Sam 24 Oct 2015 - 15:04

Voici comment les Martiens calculent PI

Code:

rem ============================================================================
rem       Calcul de PI
rem ============================================================================
dim pi,n
pi = 0
print "... Veuillez patienter .... Je calcule PI ..."
for n = 0 to 100000 : pi = pi + power(-1,n)*4/(2*n+1) : next n
print " pi = " + str$(pi)
rem ============================================================================
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Contenu sponsorisé




MessageSujet: Re: Hé ! Y- a-t-il quelqu’un ?   Aujourd'hui à 23:54

Revenir en haut Aller en bas
 
Hé ! Y- a-t-il quelqu’un ?
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Hé ! Y- a-t-il quelqu’un ?

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 :: Présentation et bavardage-
Sauter vers: