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
» un nouveau editeur panobasic
par Jean Claude Aujourd'hui à 10:18

» Compilateur FBPano
par jean_debord Aujourd'hui à 10:07

» Le compilateur.
par Pedro Alvarez Aujourd'hui à 8:36

» COMPILATEUR V 0.9 beta 7 du 10 aout 2017
par Jack Hier à 20:23

» Pb 16 (en analyse): ON_CLOSE plante à l'exécution
par Jack Hier à 20:00

» Pb 15 (en analyse): TIMER_ON plante à l'exécution
par Jack Hier à 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

» Troncature dans une image
par JL35 Mer 9 Aoû 2017 - 13:45

» A chacun son point de vue
par papydall Mar 8 Aoû 2017 - 17:20

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 | 
 

 je bulle dans mon coin

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

avatar

Nombre de messages : 391
Age : 65
Localisation : Hautes Alpes France
Date d'inscription : 09/01/2010

MessageSujet: je bulle dans mon coin   Mer 30 Juin 2010 - 16:37

Vu le calme sur le forum,je bulle!
Code:

' dessiner des cercles avec un click droit
 ' escape pour sortir
 dim a
 width 0,900
 height 0,900
  repeat
    if key_down_code  = 27 then terminate
    if mouse_right_down(0)=1
    if key_down_code  = 27 then terminate
 print mouse_x_right_down(0)
print mouse_y_right_down(0)
2d_fill_color rnd(255),rnd(255),rnd(255)
2d_circle  mouse_x_right_down(0), mouse_y_right_down(0),rnd (80)
  end_if
 until a=10
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://sergeauze.blog-video.tv/
Jean Claude

avatar

Nombre de messages : 4989
Age : 63
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: je bulle dans mon coin   Mer 30 Juin 2010 - 19:47

Il faut bien lire tes 2 commentaires du début avant de lancer.
çà pour buller, çà bulle... Sleep

Remarque: Si tu "click droit" sans te déplacer, tu finis par faire des roues de bagnole.

Very Happy
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
sergeauze

avatar

Nombre de messages : 391
Age : 65
Localisation : Hautes Alpes France
Date d'inscription : 09/01/2010

MessageSujet: Re: je bulle dans mon coin   Ven 2 Juil 2010 - 16:45

je ne clique meme plus!
Je promene ma souris.
J'apprends en m'amusant!
Code:


' je promene ma souris
'  escape pour sortir
  border_hide 0
 dim a,s ,c(100),x ,v  ,d(100)
  full_space 0
  width 0 ,1650
  height 0,1100
  v=1
  2d_target_is 0
  for x= 1 to 5
repeat

      if key_down_code  = 27 then terminate
      if mouse_right_down(0)=0
      c(v)=  mouse_x_position(0)
     
      print_locate 50,10
print "............c(v)......",c(v)
      print_locate 50,30
      d(v)=    mouse_y_position(0)
     
print  "........d(v).........." ,d(v)
2d_fill_color  rnd(255), rnd(255),rnd (255)
 2d_circle c(v),d(v),rnd (80)
 end_if
 wait 250
 until v=5
  v=v+1
    print c(v),d(v)

  next x
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://sergeauze.blog-video.tv/
Jean Claude

avatar

Nombre de messages : 4989
Age : 63
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: je bulle dans mon coin   Ven 2 Juil 2010 - 18:38

Celui-la il est génial!

il devrait plaire à JJN4 qui aime le psychédélique.

cherry flower lol!
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
JL35



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

MessageSujet: Re: je bulle dans mon coin   Ven 2 Juil 2010 - 18:45

Alors Jean Claude, on joue avec des gommettes ? à ton âge ? Suspect
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
659_minifly



Nombre de messages : 590
Age : 68
Localisation : Valenciennes Nord
Date d'inscription : 29/04/2010

MessageSujet: Re: je bulle dans mon coin   Ven 2 Juil 2010 - 20:48

Belles bulles. Bravo. drunken
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jean Claude

avatar

Nombre de messages : 4989
Age : 63
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: je bulle dans mon coin   Ven 2 Juil 2010 - 21:02

C'est pour le JL35,

Quoi mon age, qu'est qu'il a mon age....

Aque je crois que ton tien (d'age), aque c'est pas mieux.

Very Happy Very Happy Very Happy Very Happy Very Happy Very Happy Very Happy Very Happy Very Happy Very Happy Very Happy Very Happy Very Happy Very Happy Very Happy Very Happy
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
JL35



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

MessageSujet: Re: je bulle dans mon coin   Ven 2 Juil 2010 - 22:02

Oui mais moi, au moins, j'ai atteint la sagesse... je ne joue plus aux billes.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
sergeauze

avatar

Nombre de messages : 391
Age : 65
Localisation : Hautes Alpes France
Date d'inscription : 09/01/2010

MessageSujet: Re: je bulle dans mon coin   Ven 2 Juil 2010 - 22:36

je fais des essais pour me familiariser avec certaines fonctions
je suis tout contant quand j'obtiens un resultat
On se positionne sur le form de droite apres le lancement du programmeet on remue la souris lorsque les ecritures apparaissent en haut a gauche.
On dessine pendant quelques secondes et le resultat s'ffiche sur le form de droite
Code:

    dim a,s ,c(1000),x ,v  ,d(1000),k
  2d_fill_color 255,0,0
  color 0,125,192,47
  2d_pen_color 255,0,0
  width 0 ,800

 height 0,1000
 form 1
 height 1,1000
 width 1,800
 left 1, 800
 s=100
 v=0
 wait 1000
 for k = 1 to 900
 wait 10
  if key_down_code  = 27 then terminate







v=v+1
print "vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv",v
c(v)=  mouse_x_position(0)
print_locate 50,10
print "ccccccccccvvvvvvvvvv",c(v)

d(v)=    mouse_y_position(0)
print  "dddddddddddddddddddd" ,d(v)
2d_circle c(v), d(v),5
if mouse_right_down(0)=0
end_if
next k
' "................................................................."
  2d_target_is 0

 print_locate 20,150
 print mouse_x_position(0)
  print_locate 20,170
  print mouse_y_position(0)
  ' ...........................................................
 c(v)=c(1) :' on boucle?
 d(v)=d(1)
 v=0
  ' .....................................................
  2d_target_is 1
  2d_pen_width 2

  color 1,54,218,226
  for k= 2 to 900
    2d_fill_color rnd(255),0,rnd(255)
  print c(k) ," .................. ",d(k)

  if c(k)= 0 then c(k)=80
  if d(k)= 0 then d(k)=80
    if key_down_code  = 27 then terminate
  if c(k)= 0 then c(k)=c(1)
  if d(k)= 0 then d(k)=d(1)

    2d_circle  c(k),d(k),12
    2d_line  c(k),d(k), c(k-1),d(k-1)
  wait 10
  next k
 end
 
 
 
 
 
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://sergeauze.blog-video.tv/
JL35



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

MessageSujet: Re: je bulle dans mon coin   Ven 2 Juil 2010 - 23:23

J'ai rien compris scratch t'as raison JC, chuis trop vieux pour ces subtilités.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
sergeauze

avatar

Nombre de messages : 391
Age : 65
Localisation : Hautes Alpes France
Date d'inscription : 09/01/2010

MessageSujet: Re: je bulle dans mon coin   Ven 2 Juil 2010 - 23:39

Ai-je droit a un "muppet show " en direct?
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://sergeauze.blog-video.tv/
JL35



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

MessageSujet: Re: je bulle dans mon coin   Sam 3 Juil 2010 - 0:28

En quelque sorte...
Mais c'est vrai que je n'ai pas compris ton dernier programme ni ce qu'il est censé faire...

En tout cas, pour le moment... Sleep
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jean Claude

avatar

Nombre de messages : 4989
Age : 63
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: je bulle dans mon coin   Sam 3 Juil 2010 - 9:45

Hé bien moi j'ais compris (t'as eu raison d'aller te coucher JL35)

@sergeauze,
Apparement tu dois avoir un balaise d'écran, car sur le mien le Form de droite n'est pas entier. il faudrait 2 Form de WIDTH identique = à la moitié de la taille de l'écran avec screen_x
Bravo pour la prestation, on pourraiit s'en servir pour apprendre à un enfant à écrire.
Je n'ai pas analysé le code, mais c'est sympa...

queen jocolor geek
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: je bulle dans mon coin   

Revenir en haut Aller en bas
 
je bulle dans mon coin
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» ajouter une image dans le coin supérieur d'un message codé
» Créer une info-bulle dans le message d'accueil ?
» Petite Bulle dans un "Forum" [Description]
» Menu dans le coin gauche du forum!
» Placer animation flash dans un coin [RESOLU]

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 :: Les inutilitaires-
Sauter vers: