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
» track_bar circulaire
par pascal10000 Aujourd'hui à 13:13

» API Windows
par Klaus Aujourd'hui à 3:21

» KGF.dll - demandes ou suggestions de modifications ou ajouts
par pascal10000 Hier à 17:49

» Cartes de voeux, menus, etc.
par JL35 Hier à 17:48

» Mah-Jong européen new-look
par jjn4 Hier à 15:48

» a l'aide klaus
par Minibug Hier à 11:42

» KGF_dll - nouvelles versions
par Minibug Hier à 1:48

» bug SYNEDIT_TARGET_IS_OBJECT
par Jack Hier à 0:16

» Jukebox : Serge Reggiani
par papydall Sam 9 Déc 2017 - 5:58

» Ecouter la radio fm sur votre pc
par pascal10000 Sam 9 Déc 2017 - 3:42

» anomalie
par Klaus Sam 9 Déc 2017 - 3:21

» hommage
par Jicehel Ven 8 Déc 2017 - 11:29

» Logiciel de soutien scolaire en langues.
par Pedro Alvarez Ven 8 Déc 2017 - 10:43

» carte son
par Klaus Ven 8 Déc 2017 - 2:37

» mise a jour calculatrice
par joeeee2017 Mer 6 Déc 2017 - 22:19

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Décembre 2017
LunMarMerJeuVenSamDim
    123
45678910
11121314151617
18192021222324
25262728293031
CalendrierCalendrier

Partagez | 
 

 CARTE DE VOEUX

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

avatar

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

MessageSujet: CARTE DE VOEUX   Ven 1 Jan 2010 - 12:53

Pour le nouvel an, comme vous êtes tous sympa,
je vous envoie une petite carte de voeux
(en langage panoramic, bien sûr).
Je l'ai faite un peu comme une peinture.
J'espère que vous l'apprécierez.
Bonne année à tous !
Code:
rem ' Bonne année
dim i , j , x , y
width 0,800 : height 0,450 : caption 0,"CARTE DE VOEUX"
picture 1
left 1,0 : top 1,0 : width 1,791 : height 1,415 : color 1,0,0,0
alpha 2 : left 2,65 : top 2,362
color 2,0,0,0 : font_color 2,160,255,0
font_bold 2 : font_size 2,30 : font_name 2,"French Script MT"
caption 2,"  Bon nouvel an et bonne santé pour toute l'année  "
2d_target_is 1
for i=1 to 340
 2d_line 20,20+i,770,20+i : 2d_pen_color 255,99+i/4,0
next i
2d_pen_color 0,200,255 : 2d_fill_color 0,200,255
for i=1 to 50 : 2d_line 430,275+i,400,290+i : 2d_line 430,275+i,460,290+i : next i
2d_rectangle 460,270,500,320 : 2d_rectangle 415,275,420,300
for i=1 to 40 : 2d_line 481,240+i,460,269+i : 2d_line 481,240+i,502,269+i : next i
2d_pen_color 0,120,255 : 2d_fill_color 0,120,255
for i=1 to 70 : 2d_line 20,249+i,140,329+i : next i
for i=1 to 60 : 2d_line 40,285+i,80,255+i : 2d_line 80,255+i,120,285+i : next i
2d_rectangle 38,255,45,280 : 2d_rectangle 93,260,100,280
for i=1 to 70 : 2d_line 200,310+i,260,270+i : 2d_line 260,270+i,320,310+i : next i
for i=1 to 70 : 2d_line 310,315+i,370,265+i : 2d_line 370,265+i,430,315+i : next i
for i=1 to 60 : 2d_line 420,325+i,480,290+i : 2d_line 480,290+i,540,325+i : next i
2d_rectangle 230,275,237,340 : 2d_rectangle 295,284,305,340
2d_rectangle 385,267,395,320 : 2d_rectangle 385,260,395,262
2d_line 385,269,385,260 : 2d_line 394,269,394,260 : 2d_line 540,340,549,340
2d_rectangle 510,297,517,320 : 2d_rectangle 540,350,550,352
2d_rectangle 20,315,140,362 : 2d_rectangle 200,320,520,362
for i=1 to 5 : 2d_line 539+i*2,340,539+i*2,350 : next i
for i=1 to 80
 2d_line 170,120+i,140,260+i : 2d_line 170,120+i,200,260+i
next i
2d_rectangle 140,265,202,380 : 2d_rectangle 155,200,185,270
2d_line 170,110,170,121 : 2d_line 167,114,174,114
2d_rectangle 600,220,665,400 : 2d_rectangle 660,270,770,362
for i=0 to 6 : 2d_rectangle 600+i*10,215,605+i*10,220 : next i
for i=0 to 10 : 2d_rectangle 665+i*10,265,670+i*10,270 : next i
2d_line 660,190,660,220
for i=1 to 9 : 2d_line 660+i,190+i+sin(i),660+i,199+i+sin(i) : next i
2d_pen_color 0,0,255 : 2d_fill_color 0,0,255
for i=1 to 63 : 2d_line 20,260+i,70,300+i : next i
2d_rectangle 20,300,70,362 : 2d_rectangle 55,280,62,350
2d_line 70,325,79,325 : 2d_rectangle 70,335,80,337
for i=1 to 5 : 2d_line 69+i*2,325,69+i*2,335 : next i
for i=1 to 40 : 2d_line 300,329+i,250,361+i : 2d_line 300,329+i,350,361+i : next i
for i=1 to 40 : 2d_line 390,324+i,345,346+i : 2d_line 390,324+i,435,346+i : next i
2d_rectangle 435,350,530,370 : 2d_rectangle 265,340,273,360
2d_rectangle 405,323,412,360 : 2d_rectangle 485,343,504,360
for i=1 to 3 : 2d_line 488+i,338,484+i,350 : 2d_line 488+i,338,492+i,350 : next i
for i=1 to 3 : 2d_line 496+i,338,492+i,350 : 2d_line 496+i,338,500+i,350 : next i
for i=1 to 45 : 2d_line 630,315+i,580,350+i : 2d_line 630,315+i,680,350+i : next i
for i=1 to 22 : 2d_line 769,318+i,720,340+i : next i
2d_rectangle 721,341,770,362 : 2d_rectangle 680,356,721,362
2d_line 680,350,721,350 : 2d_rectangle 645,320,652,360 : 2d_rectangle 750,312,757,360
for i=1 to 13 : 2d_line 679+i*3,350,679+i*3,360 : next i
2d_pen_color 255,255,0 : 2d_fill_color 255,255,0
2d_rectangle 90,290,95,297 : 2d_rectangle 230,335,235,342
2d_rectangle 236,335,241,342 : 2d_rectangle 460,320,463,324
2d_rectangle 460,325,463,329 : 2d_rectangle 464,320,467,324
2d_rectangle 464,325,467,329 : 2d_rectangle 616,343,621,350
2d_pen_color 99,99,99
for i=1 to 100 : x=int(rnd(8))+295 : y=int(rnd(30))+245 : j=int(rnd(3))-1
if abs(j)=1 then x=x+int(rnd(4))*j : y=y+int(rnd(10))*j
2d_point x,y : next i
for i=1 to 100 : x=int(rnd(6))+93 : y=int(rnd(30))+224 : j=int(rnd(3))-1
if abs(j)=1 then x=x+int(rnd(4))*j : y=y+int(rnd(10))*j
2d_point x,y : next i
2d_pen_color 255,255,255 : 2d_fill_color 255,255,255
for i=1 to 400
 x=int(rnd(745)+24) : y=int(rnd(335)+24)
 2d_circle x,y,2.5
next i
cherry
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://jjn4.e-monsite.com
jjn4

avatar

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

MessageSujet: +   Ven 1 Jan 2010 - 13:14

Sinon, à propos, ce programme peut être l'occasion pour signaler
que faire des dessins avec seulement des 2d_rectangle, 2d_circle
et 2d_line, c'est dur-dur.
Ca manque de :
2d_triangle
2d_ovale
2d_trapeze
2d_parall (élogramme)
2d_polygone C,... (C étant le nombre de côtés)
et autres formes...
drunken
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://jjn4.e-monsite.com
Jean Claude

avatar

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

MessageSujet: Re: CARTE DE VOEUX   Ven 1 Jan 2010 - 13:43

BRAVO, çà du être dur dur.

Code:
for i=1 to 340
2d_line 20,20+i,770,20+i : 2d_pen_color 255,99+i/4,0
next i
Si on met un rem devant ces 3 lignes(11,12 et 13), on a l'image de nuit.
J'ai regardé de près ces 3 lignes, car je me demandait comment tu avais fait pour le dégradé de couleurs (Orange vers jaune).
Voila une belle astuce.


Le texte est plus grand que la carte postal (sur mon écran en tout cas), alors j'ai modifié left et font_size aux lignes 6et8, et c'est nickel.
Code:
alpha 2 : left 2,0 : top 2,362
color 2,0,0,0 : font_color 2,160,255,0
font_bold 2 : font_size 2,25 : font_name 2,"French Script MT"

Encore Bravo c'est très beau. Very Happy
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Invité
Invité



MessageSujet: Re: CARTE DE VOEUX   Ven 1 Jan 2010 - 14:12

Le résultat est formidable !
C'est sur, il manque des fonctions, dont la principale est de remplir une forme quelconque fermée.
Moi, j'ai rien fait pour l'année nouvelle. J'ai eu plein d'imprévu, qui mon pris mon temps, même pour venir ici.
Bonne année.
Revenir en haut Aller en bas
Invité
Invité



MessageSujet: Re: CARTE DE VOEUX   Ven 1 Jan 2010 - 18:25

C'est vrai que ça a l'air formidable !

Mais je suis partie pour le nouvel an


Dernière édition par Nicolas le Ven 1 Jan 2010 - 18:26, édité 1 fois (Raison : faute d'orthographe)
Revenir en haut Aller en bas
JL35



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

MessageSujet: Re: CARTE DE VOEUX   Ven 1 Jan 2010 - 19:03

Bravissimo jjn4, je trouve ta carte très jolie, bonne année à toi également.
Et à tous les autres !
J'ai juste exécuté, pas regardé le code en détail, ce qui m'intrigue un peu c'est comment tu as fait pour remplir les formes de couleurs ?
Pas trop d'accord avec toi pour le manque de fonctions parallélogrammes et autres polygones, avec le 2d_Line ça suffit il me semble. Sauf pour l'ellipse. De toute facçn il faut bien donner les coordonnées des points successifs.

Par contre je suis d'accord avec cosmos pour une fonction Fill (remplir une forme quelconque).
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
jjn4

avatar

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

MessageSujet: oui   Ven 1 Jan 2010 - 19:06

Citation :
Le texte est plus grand que la carte postal (sur mon écran en tout cas)
Oui, j'ai eu ça quand je faisais une démonstration d'un des mes programmes à quelqu'un d'autre sur son propre ordinateur, et (comme il était myope) il avait les lettres qui étaient réglées pour être en grand format, et ça fichait tout en l'air dans le programme panoramic que je présentais, en faisant apparaître des scoll-bar partout, qui en devenait absolument horrible.
C'est dommage que le format des lettres qu'on donne aux textes des alpha, memo... de panoramic ne soit pas indépendant des réglages donnés par Windows !
(petit clin d'oeil (décidément) à Jack.
Wink
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://jjn4.e-monsite.com
jjn4

avatar

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

MessageSujet: Re: CARTE DE VOEUX   Ven 1 Jan 2010 - 19:09

Citation :
le 2d_Line ça suffit il me semble. Sauf pour l'ellipse
Et le triangle, alors, essentiel, le triangle !
D'accord que pour les autres, ça fait un peu sophiqtiqué,
mais pourquoi pas ?
PS : réponse à la question de JL35 :
si c'est des rectangles, fill
et des line, pen
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://jjn4.e-monsite.com
JL35



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

MessageSujet: Re: CARTE DE VOEUX   Ven 1 Jan 2010 - 19:34

Le triangle ? 3 x 2d_line et le tour est joué.
Code:
2d_line x1,y1,x2,y2: 2d_poly_to x3,y3: 2d_poly_to x1,y1
Pour le remplissage c'est autre chose (j'ai vu comment tu fais, des lignes successives, mais c'est un peu laborieux à faire).
Je sais bien que c'est automatique pour les formes prédéfinies (cercles et rectangles, et d'ailleurs on ne peut pas ne pas les remplir, c'est parfois embêtant), mais ça n'existe pas pour les formes libres (avec les 2d_line Very Happy )

tiens un petit utilitaire pour connaître la couleur rgb d'un point quelconque de l'écran: colorpix, très pratique.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jean Claude

avatar

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

MessageSujet: Re: CARTE DE VOEUX   Ven 1 Jan 2010 - 20:19

Citation :
Oui, j'ai eu ça quand je faisais une démonstration d'un des mes programmes à quelqu'un d'autre sur son propre ordinateur

Avec SCREEN... , çà devrait s'arranger.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
jjn4

avatar

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

MessageSujet: ?   Ven 1 Jan 2010 - 20:34

Tu parles de screen_x et screen_y ?
scratch
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://jjn4.e-monsite.com
Jean Claude

avatar

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

MessageSujet: Re: CARTE DE VOEUX   Ven 1 Jan 2010 - 20:44

Oui, pour définir la taille de l'écran de l'utilisateur.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
jjn4

avatar

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

MessageSujet: non   Ven 1 Jan 2010 - 20:57

Ca ne résoud pas le problème, puisque
les lettres windows peuvent être agrandies
indépendamment de la taille des form
(si bien que les phrases dépassent les form panoramic)
sans que la résolution d'écran soit changée
(pour les images, quoi).
Donc, les screen ne peuvent pas servir.
Et là, pour le moment, je ne vois pas de solution.
scratch
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://jjn4.e-monsite.com
Jean Claude

avatar

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

MessageSujet: Re: CARTE DE VOEUX   Ven 1 Jan 2010 - 22:07

je pensais que suivant la taille de l'écran tu pourrais gérer le letf et le size de l'alpha 2. Je n'ai pas essayé, peut-être ce n'est pas la bonne voie.
De toute façons on peut corriger comme je l'ai fait et çà marche.
Et ta carte de voeux reste belle et ton tavail remarquable. A+
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
jjn4

avatar

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

MessageSujet: Re: CARTE DE VOEUX   Sam 2 Jan 2010 - 1:45

Pour prendre l'exemple de ma carte, chez moi, le texte était bon,
et sur n'importe quel autre écran, les rapports de taille restent les mêmes.
Pour que les phrases augmentent plus que l'image, il faut qu'il y ait
une commande spéciale de Windows qui fait augmenter la taille des
lettres sans augmenter la taille du reste.
Une de ces commandes se trouve dans :
pointeur sur le bureau, clic à droite, chapitre "Propriétés",
onglet "Paramètres", Bouton "Avancé", onglet "Général",
dans "Affichage" : choisir "Paramètres PPP",
à la place de "Taille normale (96 ppp)", choisir "Grande taille (120 ppp)",
cliquer "Ok", puis encore "Ok"
Et là, c'est le bordel, tous les textes se mettent à dépasser des objets panoramic qui auparavant les contenaient fort bien...
A mon avis, tu dois avoir un truc comme ça,
parce que c'est pas logique, que c'était trop grand.
Et quand on veut faire des programmes qui puissent aller sur tous les ordinateurs, ça pose un problème (j'espère que Jack entend ce que je viens de dire).
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://jjn4.e-monsite.com
Contenu sponsorisé




MessageSujet: Re: CARTE DE VOEUX   

Revenir en haut Aller en bas
 
CARTE DE VOEUX
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» La carte de voeux de Monsieur le Loup
» carte video [résolut]
» Souci carte memoire qui diminue la memoire
» Des Voeux pleins de soleil
» Question sur compatibilité entre carte mére et carte graphique

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