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
» quel est ce comportement de Panoramic_editor
par JL35 Aujourd'hui à 16:38

» bug BORDER_HIDE : bloque la commande full_space
par silverman Aujourd'hui à 1:19

» Découpe dans une image
par JL35 Hier à 22:00

» FNC IsDateValide(d$) pour vérifier la validité d'une date
par papydall Hier à 18:57

» Pour faire plaisir à jjn4.
par Pedro Alvarez Hier à 8:13

» Pour faire plaisir à Marc37.
par Marc Jeu 22 Fév 2018 - 21:46

» Couleur d'une variable qui n'est pas un mot-clé
par bignono Jeu 22 Fév 2018 - 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

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 | 
 

 Dites-le donc avec des fleurs

Aller en bas 
AuteurMessage
jjn4

avatar

Nombre de messages : 1679
Date d'inscription : 13/09/2009

MessageSujet: Dites-le donc avec des fleurs   Sam 30 Jan 2010 - 12:52

Jusqu'à présent, on a publié des inutilitaires qui étaient plutôt des stresstilitaires.
Alors après, les adhérants de ce forum vont se coucher stressés,
avec les mains qui tremblent, ne s'endormant pas avant 5h du matin
et cauchemardant le reste de la nuit...
Pensez, des missiles atomiques partout, des terroristes du Kougloufistan,
des ordinateurs qui veulent prendre le pouvoir sur les êtres humains,
il y a vraiment de quoi devenir très nerveux !
Alors, cette fois-ci, je vous propose un inutilitaire d'un genre nouveau,
on va dire un relaxtilitaire.
Détendez-vous bien...
Laissez-vos pensées venir toutes seules...
Après quelques instants, vous pourrez fermer les yeux...
Code:
rem ' Dites-Fleurs
dim i , j , x , y , x1 , y1
full_space 0 : x1=screen_x : y1=screen_y
caption 0,string$(12," ")+"DITES-LE DONC AVEC DES FLEURS"
for i=1 to 500
 x=int(rnd(x1-74)) : y=int(rnd(y1-118))
 2d_fill_color int(rnd(155)+100),int(rnd(155)+100),int(rnd(155)+100)
 2d_circle x+60,y+52,30
 for j=1 to 100
  2d_point x+45+int(rnd(30)),y+38+int(rnd(30))
 next j
 2d_fill_color int(rnd(155)+100),int(rnd(155)+100),int(rnd(155)+100)
 2d_circle x+120,y+52,30
 2d_circle x+89,y+104,30
 2d_circle x+29,y+103,30
 2d_circle x+0,y+51,30
 2d_circle x+31,y+0,30
 2d_circle x+91,y+1,30
next i
Moi : clown
Vous : Sleep Sleep Sleep Sleep Sleep Sleep Sleep Sleep Sleep Sleep Sleep Sleep Sleep Sleep Sleep Sleep


Dernière édition par jjn4 le Dim 31 Jan 2010 - 13:58, édité 1 fois
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://jjn4.e-monsite.com
Jean Claude

avatar

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

MessageSujet: Re: Dites-le donc avec des fleurs   Sam 30 Jan 2010 - 13:08

La dernière fois que j'ai vu un truc pareil, c'était, à un concert de PINK FLOYD, à Chantilly sur la pelouse de l'hippodrome.

afro
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Invité
Invité



MessageSujet: Re: Dites-le donc avec des fleurs   Sam 30 Jan 2010 - 14:28

J'ai bien aimé ton truc
peu de chose mais agréable
@+
Revenir en haut Aller en bas
JL35



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

MessageSujet: Re: Dites-le donc avec des fleurs   Sam 30 Jan 2010 - 14:40

Joli et au moins court (ce qui est rare) et facile à tester.
Mais il faut bien que je fasse un reproche dans ce concert de louanges: tu occupes tout l'écran avec full_space, mais tu ne dessines que sur une petite partie (du moins chez moi: j'ai un 1920x1200), c'est frustrant...
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Invité
Invité



MessageSujet: Re: Dites-le donc avec des fleurs   Sam 30 Jan 2010 - 15:26

On les voit les gens qui ont du fric.
Moi je m'en fiche, le jour où j'aurai un écran pareil, n'est pas pour demain.
(sans vexation bien sûr)
Revenir en haut Aller en bas
JL35



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

MessageSujet: Re: Dites-le donc avec des fleurs   Sam 30 Jan 2010 - 16:49

ACER 24" 16/10, je l'ai eu en solde à moins de 150 € (modèle d'expo), et c'est bien pratique pour afficher deux pages à la fois.
Un jour tu seras riche toi aussi cosmos, faut pas désespérer Very Happy
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Invité
Invité



MessageSujet: Re: Dites-le donc avec des fleurs   Sam 30 Jan 2010 - 17:50

Ne te désoles pas, mais moi cet plutôt la rue qui m'inquiète.
Revenir en haut Aller en bas
Invité
Invité



MessageSujet: Re: Dites-le donc avec des fleurs   Sam 30 Jan 2010 - 18:00

Pourquoi nous : Sleep Sleep Sleep Sleep Sleep Sleep Sleep
et toi : clown

Très drôle !!!
Revenir en haut Aller en bas
jjn4

avatar

Nombre de messages : 1679
Date d'inscription : 13/09/2009

MessageSujet: xxx   Dim 31 Jan 2010 - 13:19

Il y a des gens, comme ça,
qui sont toujours frustrés,
quoiqu'on fasse,
surtout quand ils ont des trucs plus grands affraid
ou anormalement longs...
lol!
PS: Ca y est, c'est corrigé, ça devrait aller aussi pour les très grands écrans.
(j'ai changé le programme situé plus haut)
Mais bien sûr, je ne peux pas vérifier moi-même si ça marche bien dans ce cas.
Je n'ai pas un écran géant.
Seules les personnes avec un machin très long peuvent le dire...


Dernière édition par jjn4 le Dim 31 Jan 2010 - 20:11, édité 1 fois
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://jjn4.e-monsite.com
JL35



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

MessageSujet: Re: Dites-le donc avec des fleurs   Dim 31 Jan 2010 - 15:58

Ben, euh, je me sens visé, en toute modestie, Embarassed et ça va beaucoup mieux comme ça, et quand j'aurai mon écran de 2 mètres cinquante (bientôt j'espère) au moins il n'y aura pas de modifs à faire.
Et blague à part j'aime bien quand tout est paramétré, quand c'est possible, qu'on n'ait que quelques variables à changer (ou même rien du tout comme ici) pour s'adapter aux situations nouvelles.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: Dites-le donc avec des fleurs   

Revenir en haut Aller en bas
 
Dites-le donc avec des fleurs
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» j ai des souci , je debute depuis ce jour avec linux fedora
» Lecture video interrompue avec mise en tampon
» probleme avec les cellules d'excel sur la mise en forme
» [Résolu]Mis a jour impossible avec Antivir
» [Résolu] Problème avec psg tv

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: Les inutilitaires-
Sauter vers: