FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  RechercherRechercher  Dernières imagesDernières images  S'enregistrerS'enregistrer  MembresMembres  Connexion  
Derniers sujets
» trop de fichiers en cours
Mots clés obsolète. Emptypar lepetitmarocain Aujourd'hui à 17:29

» Une calculatrice en une ligne de programme
Mots clés obsolète. Emptypar jean_debord Aujourd'hui à 8:47

» Form(résolu)
Mots clés obsolète. Emptypar leclode Hier à 17:59

» Bataille navale SM
Mots clés obsolète. Emptypar jjn4 Ven 26 Avr 2024 - 17:39

» Gestion d'un système client-serveur.
Mots clés obsolète. Emptypar Pedro Jeu 25 Avr 2024 - 19:31

» Les maths du crocodile
Mots clés obsolète. Emptypar jean_debord Jeu 25 Avr 2024 - 10:37

» Naissance de Crocodile Basic
Mots clés obsolète. Emptypar jean_debord Jeu 25 Avr 2024 - 8:45

» Editeur EliP 6 : Le Tiny éditeur avec 25 onglets de travail
Mots clés obsolète. Emptypar Froggy One Mer 24 Avr 2024 - 18:38

» Dessine-moi une galaxie
Mots clés obsolète. Emptypar jjn4 Lun 22 Avr 2024 - 13:47

» Erreur END_SUB
Mots clés obsolète. Emptypar jjn4 Lun 22 Avr 2024 - 13:43

» Bug sur DIM_LOCAL ?
Mots clés obsolète. Emptypar papydall Dim 21 Avr 2024 - 23:30

» 2D_fill_color(résolu)
Mots clés obsolète. Emptypar leclode Sam 20 Avr 2024 - 8:32

» Consommation gaz électricité
Mots clés obsolète. Emptypar leclode Mer 17 Avr 2024 - 11:07

» on_key_down (résolu)
Mots clés obsolète. Emptypar leclode Mar 16 Avr 2024 - 11:01

» Sous-programme(résolu)
Mots clés obsolète. Emptypar jjn4 Jeu 4 Avr 2024 - 14:42

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Avril 2024
LunMarMerJeuVenSamDim
1234567
891011121314
15161718192021
22232425262728
2930     
CalendrierCalendrier
Le Deal du moment :
Pokémon EV06 : où acheter le Bundle Lot ...
Voir le deal

 

 Mots clés obsolète.

Aller en bas 
+6
Jean Claude
jjn4
Georges
JL35
Jack
Tecking
10 participants
Aller à la page : 1, 2  Suivant
AuteurMessage
Tecking




Nombre de messages : 114
Age : 35
Localisation : Toulouse
Date d'inscription : 30/05/2010

Mots clés obsolète. Empty
MessageSujet: Mots clés obsolète.   Mots clés obsolète. EmptyMer 28 Juil 2010 - 23:38

C'est dingue, mais j'ai l'impression que le développement va à une de ces vitesse!!!
J'ai même pas le temps d'utiliser les mots clés actuels, que d'autre sortent déjà.

Je voulais juste dire que, à mon gout, les mots clés obsolètes doivent être supprimés, et les fonctions doubles unifiées.
Je m'adapterais sans soucis, et puis, l'utilitaire de remplacement est la pour ça...

PANORAMIC est encore très bien organisé, profitons en pour le garder le plus propre possible, avant qu'il ne s'encombre de fonction inutiles et obsolètes mais présentes par "soucis de compatibilité".

Cela reste un avis personnel bien sur.
Revenir en haut Aller en bas
Invité
Invité




Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyJeu 29 Juil 2010 - 10:18

Je ne suis pas chez moi, et j'essaye de me mettre hors course.
C'est vrai qu'en ce moment Panoramic fait un saut en avant.
J'ai pas tout analysé, mais je crois que les nouvelles commandes correspondent à ce que je demandais depuis septembre/octobre, et c'est tant mieux.

Ce qui me fais intervenir aujourd'hui, est la façon de vouloir imposer de la part des développeurs qui arrivent avec un bagage qu'on n'a pas (je n'ai qu'un cap de couvreur zingueur), des trucs pour tout compliquer.

La seule instruction obsolète à mon avis, est INPUT, qui ne s'adapte pas à Panoramic.
Qu'y a t'il d'obsolète? Print, et bien non, c'est d'ailleur la seule instruction qui permette d'écrire dans un picture.

Je ne comprends pas, parce qu'on fait du C++ ou autre, Delphy, Java, on veut absolument prendre le dessus sur les autres.
Personnellement je suis capable de m'adapté à des langages plus compliqué, jeme suis mis au C,au Pascal, à autilt...., mais chaque fois, manque de temps, j'ai du laisser de côté, et c'est pas l'envie qui manquait.
Laissé Jack de faire son basic à sa guise, on n'a pas à donner de leçon, il sait ce qu'il veut!

C'est énervant de donner des coup de semonce, alors qu'on en a aucune envie. Tu es très fort, mais ne martyrises pas les plus faibles qui ont moins de connaissances que toi! Tu es le très bien venu et tes connaissances bien reçues. Il y a Jack qui a envie de développer à sa façon, et qui rester maitre de son projet, alors laisse le tranquille!.

Je sais que c'est dans de bonnes intentions, et que ton intervention veut être profitable à tous, mais chacun a ses limites dans la programmation.

Je suis désolé de jouer les pères fouettards, et ça me gène énormémant, mais vous êtes plusieurs à vouloir tout bouleverser.
Laissons au temps, le temps. C'est dommage que je ne sois pas chez moi, j'avais une très bonne réponse d'un poête chinois de la dynastie des Ming je crois qui convenait ici.
Revenir en haut Aller en bas
Jack
Admin
Jack


Nombre de messages : 2381
Date d'inscription : 28/05/2007

Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyJeu 29 Juil 2010 - 11:45

Juste une petite intervention (je m'étais pourtant juré de ne plus intervenir sur de tels sujets) pour dire que si on commence à parler de PRINT, de INPUT, de GOTO, on va remplir des pages et des pages du forum pour aboutir à pas grand chose.
Je ne toucherai pas à ces 3 mots-clés obsolètes. il appartiennent au BASIC.

Bon, je ne vais pas verrouiller le sujet car c'est mal ressenti, et je le comprends, un forum est un endroit de discussion et d'échange.
Alors allez-y, trollez *.

* : "troller" de "troll".
Revenir en haut Aller en bas
https://panoramic.1fr1.net
Tecking




Nombre de messages : 114
Age : 35
Localisation : Toulouse
Date d'inscription : 30/05/2010

Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyJeu 29 Juil 2010 - 14:37

Je crois m'être mal fait comprentre.

Et cosmos sache que je n'ai jamémanqué de respect envers toi ni jack.
Je suis électronicien pas developpeur et comme tout le monde ici je pense, je suis venu par amour des choses simple (ce qui m'a justement éloigné des langages comme le C++ et companie).
De plus je pense que jack est assez grande pour prendre sa defense tout seul!!!

Jack quand je voulais parler des mots clés obsolètes et inutile, et j'insiste sur le 'et', c'est parce que je suis persuadé que, de temps en temps, dans ton developpement, tu dois te dire tien je remplacerais bien ça et ça par ça ou je renommerais bien tel mot clé par soucis de compatibilitée avec ce que je veux developper et la tu te retrouves bloqué par le mot clé en question.

et je voudrais te liberer de ça, mais je ne suis pas seul utilisateur de PANORAMIC c'est pourquoi j'en parle à la communautée.

De la à dire que GOTO est obsolète je ne saitpas, mais inutile certainement pas.
Je l'utilise presque tout les jours.
Revenir en haut Aller en bas
JL35




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

Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyJeu 29 Juil 2010 - 15:00

A mon avis cette polémique (?) n'a pas de sens, il n'y a pas de mots-clés obsolètes et il ne peut pas y en avoir.
Une fois qu'un mot-clé a été défini (et donc utilisé), on ne peut plus le supprimer, sous peine d'avoir des programmes qui ne marchent plus.
Voilà, c'est tout simple.
Revenir en haut Aller en bas
Georges

Georges


Nombre de messages : 290
Age : 55
Localisation : Martinique
Date d'inscription : 29/05/2009

Mots clés obsolète. Empty
MessageSujet: re   Mots clés obsolète. EmptyJeu 29 Juil 2010 - 17:10

salut à tous

a mon avis il n'y a de mots clés obsolètes que si il y en a de nouveaux avec des fonctions jumelles ou supérieures.

pour moi il n'y a pas encore de mots clés obsolète dans Panoramic.

@+
Revenir en haut Aller en bas
jjn4

jjn4


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

Mots clés obsolète. Empty
MessageSujet: +++   Mots clés obsolète. EmptyJeu 29 Juil 2010 - 18:55

Je ne voudrais surtout pas donner l'impression de "troller",
mais au contraire clore le sujet en disant que
même si un mot-clé est obsolète,
(par rapport à des programmes modernes)
son existence n'est absolument pas gênante.
Il suffit simplement de ne pas l'employer.
sunny
Revenir en haut Aller en bas
http://jjn4.e-monsite.com
Tecking




Nombre de messages : 114
Age : 35
Localisation : Toulouse
Date d'inscription : 30/05/2010

Mots clés obsolète. Empty
MessageSujet: exemples:   Mots clés obsolète. EmptyJeu 29 Juil 2010 - 19:52

Appa
rament vous avez besoin d'exemple pour concrétiser le fond de ma pensée:

Prenons un PICTURE.
N'est-ce pas un SCENE_2D avec moins de fonctions?

Prenons Key_down_code, key_up_code... etc
j'ai du mal à voir leur utilité depuis la création de SCANCODE...

pour l'instant je ne vois que ça vous voyez ce n'est pas grand chose...

Et ce n'est pas une polémique que j'ai voulu lancer mais une discussion.
Revenir en haut Aller en bas
Jean Claude

Jean Claude


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

Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyJeu 29 Juil 2010 - 20:20

Je ne voulait pas intervenir, mais
Citation :
Prenons Key_down_code, key_up_code... etc
j'ai du mal à voir leur utilité depuis la création de SCANCODE...
ces mots-clé ont été crée à la demande des PANORAMICIEN(s).

Alors, un conseil, laisse tomber.


Dernière édition par Jean Claude le Jeu 29 Juil 2010 - 20:49, édité 1 fois
Revenir en haut Aller en bas
Tecking




Nombre de messages : 114
Age : 35
Localisation : Toulouse
Date d'inscription : 30/05/2010

Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyJeu 29 Juil 2010 - 20:42

wais t'as raison j'ai plus qu'a la fermer, le sujet peut être verouillé!!
Revenir en haut Aller en bas
Nardo26

Nardo26


Nombre de messages : 2294
Age : 55
Localisation : Valence
Date d'inscription : 02/07/2010

Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyJeu 29 Juil 2010 - 22:34

On se calme tous !
Ce n'est pas la peine de s'énerver pour si peu.
Pour l'instant où est le problème ?
Il existe des fonctions récentes plus performante? soit, autant les utiliser...
Mais ça coute quoi de laisser les vieilles fonctions? pratiquement rien... sans compter que cela permet de garder une compatibilité avec de vieux programmes qui, au besoin, peuvent un jour ressortir des cartons pour un emploi spécifique.
Vous générez tous des exécutables quand vous avez fini de mettre au point un prog ?...

Puis Jack c'est déjà exprimé à ce sujet: il tient à conserver au max la compatibilité... qui vous dis qu'il ne s'appuie pas sur le code des anciennes fonctions pour créer des nouvelles? alors à ce stade autant les conserver.
Libre à chacun de vouloir ou pas mettre à jour ses prog en fct des nouvelles cde....

Amicalement,
Nardo
Revenir en haut Aller en bas
http://nardo26.lescigales.org
JL35




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

Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyJeu 29 Juil 2010 - 22:49

Histoire de remettre un peu d'huile sur le feu, je me demande si Jack n'aurait pas aussi bien fait de verrouiller finalement... Very Happy
Revenir en haut Aller en bas
Nardo26

Nardo26


Nombre de messages : 2294
Age : 55
Localisation : Valence
Date d'inscription : 02/07/2010

Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyJeu 29 Juil 2010 - 22:51

ok, on arrête de "troller" ? Very Happy
Revenir en haut Aller en bas
http://nardo26.lescigales.org
JL35




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

Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyJeu 29 Juil 2010 - 22:53

pourquoi, c'est marrant Very Happy
Revenir en haut Aller en bas
Nardo26

Nardo26


Nombre de messages : 2294
Age : 55
Localisation : Valence
Date d'inscription : 02/07/2010

Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyJeu 29 Juil 2010 - 22:57

[Troll]
Ben c'est jack qui va pas être content qu'on lui remplisse son forum de conversations qui ne mènent à pas grand chose... on tourne en rond... allez une p'tite pour cosmos : GOTOOoooo !! lol!
[/Troll]
Revenir en haut Aller en bas
http://nardo26.lescigales.org
Tecking




Nombre de messages : 114
Age : 35
Localisation : Toulouse
Date d'inscription : 30/05/2010

Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyJeu 29 Juil 2010 - 23:22

C'est pour ça que j'ai dit que le sujet pouvait être verrouillé.
De toute façon on dira que si je ne suis pas content j'ai qu'à me remettre au C++ et développer mon langage.
Comme ça tout le monde est content.
Revenir en haut Aller en bas
Invité
Invité




Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyVen 30 Juil 2010 - 0:15

Il n'y a aucune animausité contre ce que tu dis. Moi-même de temps en temps, on ne suit pas mes idées, et chacun a ses besoins, son point de vue, et tant qu'on se tolère, tout est parfait pour le meilleurs des mondes.

Mais franchement, qu'est-ce que tu en a affaire des instructions que tu n'aimes pas. Il est plus facile de tolérer des commandes qui semblent d'un autre temps, que d'utiliser une instruction qu'on ne connait pas.

Continu à donner ton avis. Ton approche a aussi de l'intéret, mais n'oublis pas que bien des utilisateurs n'ont pas ta maitraise, et ont aussi droit d'utiliser ce langage, qui était d'un abord facile pour les débutants.

Combien y a-t-il eu de débutant, qui ayant dépassés les bases, ont ensuite maitrisé la programmation et sont devenus très bon. Toi aussi tu as été un débutant un jour. Donc on laisse les choses tel quels.

Ensuite pour reprendre à mon encontre, Jack peut se défendre tout seul, mais personnellement je préfère qu'il passe son temps à programmer, que de perdre celui-ci à répondre pour un oui ou un non. Si il fallait qu'il réponde à chaque fois à chaque fois que le besoin nous fait sentir, je crois qu'il n'aurait pas fait la moitié du travail qu'on connait.

De plus cela ne concernait pas que Jack, mais pour la majorité des protagoniste de ce forum, avec les discutions qu'on a déjà eu, qui pense comme moi. Je rajoute que plus d'une fois j'ai eu tord, et cela ne m'a pas fait peur.

Je n'interviendrai plus sur ce sujet, c'est la majorité qui l'emporte.
Excusez mes fautes, j'ai un écran de 10 pouces, et les caractères sont petits.

dormez bien, la lune luit (Général! bonne nuit! -un chant de Noël-)
Revenir en haut Aller en bas
Tecking




Nombre de messages : 114
Age : 35
Localisation : Toulouse
Date d'inscription : 30/05/2010

Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyVen 30 Juil 2010 - 0:45

Premièrement c'est pour que ce langage reste simple que j'ai posté ce sujet.

Secondement si j'avais la maîtrise d'autres langages, crois-tu vraiment que j'utiliserait panoramic?

Avant j'utilisait ThinBasic, et c'est à peu près pareil.
Celui la est bien plus performant mais au prix de la cohérance.
Je voudrais, par l'intermédiaire de ce sujet éviter à panoramic de devenir incohérent.

*** j'allais dire des choses vilaines mais je retire.
Revenir en haut Aller en bas
jjn4

jjn4


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

Mots clés obsolète. Empty
MessageSujet: +++   Mots clés obsolète. EmptyVen 30 Juil 2010 - 1:40

Et si on arrêtait, sur ce sujet ?
alien
Revenir en haut Aller en bas
http://jjn4.e-monsite.com
Tecking




Nombre de messages : 114
Age : 35
Localisation : Toulouse
Date d'inscription : 30/05/2010

Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyVen 30 Juil 2010 - 10:32

tu as raison jjn4, de toutes façon,
un jour ou l'autre les choses s'imposeront d'elle mêmes.
Revenir en haut Aller en bas
RMont




Nombre de messages : 233
Age : 81
Localisation : charente maritime
Date d'inscription : 29/12/2008

Mots clés obsolète. Empty
MessageSujet: input et goto   Mots clés obsolète. EmptyVen 30 Juil 2010 - 11:38

]bonjour a tous.
lecteur assidu du forum, je reagis car je ne sais que faire . Vous avez( pour les plus forts en informatique)abandonné les instuctions INPUT et GOTO.
soit, mais alors comment faire pous remplacer celles-ci dans ce code qui suit. jusqu'a maintenant avec cette instruction (input) je suis obligé de faire tres attention en entrant mes données car il n'est pas possible de revenir en arriere :de meme je ne peu faire de test sur 2 entrées identiques.
Qui peu me donner une solution pour remplacer INPUT (lignes 28,31,58) et goto ligne 29.
pour essayer ce petit bout de code ,entrez 15 a la 1er question puis 1 a la 2eme.
entrez 10 chiffres entre 1 et 15 sans jamaismettre 2 fois le meme numero.
( en moyenne je rentre 5 fois des données par groupe de 10 donc 50 donnees en tout) si je me trompe a la 49eme, il faut que je relance tout le programme.
c'est pas logique
error_french
' **********************************************
' ** éssai programme sur pronostics hippiques **
' ** par Rmont **
' **********************************************
dim i,j :' variables de boucles
dim pro ,ch :' pronostiqueur et cheval n°
dim x :' sera compris entre 13 mini et 20 maxi
dim x1 , y:' distance bord gauche de l'ecran
dim a$ :' a$ = ","
dim n :' pour le pas d'entrée des n° dans les cases
dim y2
label affichage
' dim x2 ,a
' chr$(32) pour mettre un espace entre les chiffres lors d'un enregistrement supplementaire
' ***************************************
' ** début du programme **
' ***************************************
dim conc(20,1):' tableau 2 dimensions
label recom
full_space 0
recom:
font_bold 0
input " Combien de chevaux dans cette course ? ";x
If x<13 Or x>20 then Goto recom
print "Il y a "+str$(x)+" chevaux" :' pour verification
input "Combien de pronostiqueurs ? ";pro
print: print
x1=100 :' distance bord gauche pour faire les rectangles
for i= 0 to 9
2d_fill_color 255,255,255
2d_rectangle x1+(n*i),200,185+(n*i),310
print_locate 120,215:print "10 pts" : ' reste a amenager les autres cases
print_locate 123,235:print "pour"
print_locate 120,250:print "cheval"
print_locate 120,270:print " N°"
n=85
next i
' ****** Initialisation des N° de chevaux ********
for i = 1 to 20
conc(i,0)= i
next i
' *************** Entrée des points ******************
' les numeros chevaux sont dans conc(ch,0)
' les points attribues sont dans conc(ch,1)
y2=350
For j = 1 To pro
y = 145 :' distance bord gauche
For i = 10 To 1 Step -1
print_locate y,270 : print " " :' sert a affacer pour les tours suivants
print_locate y,270
input ch :' c'est le n° de cheval 1er cité puis suivant
conc(ch,1) = conc(ch,1)+i :' je donne 10 points au 1er cité et 1 point au 8em
conc(ch,0)=ch
print:print:print :' sera enlevé par la suite
gosub affichage
' print "Cheval n° " +str$(ch)+" points " +str$(conc(ch,1)):print :' pour verif
y = y + 85
Next i
Next j
' end
' affichage:
' print_locate 25,y2:print "Cheval n° " +str$(ch)+" points " +str$(conc(ch,1)) :' pour verif
' y2=y2+20
' return
' essai rectangle
' x2=100 :a=20
' 2d_rectangle x2,500,x2+a,530
file_open_write 1,"essai_fichier_pmu.txt"
a$=","
for i = 1 to x
file_write 1,conc(i,1)
file_write 1,a$
next i
file_write 1,chr$(32)
file_close 1

end
' affichage pour verification
affichage:
print_locate 25,y2:print "Cheval n° " +str$(ch)+" points " +str$(conc(ch,1)) :' pour verif
y2=y2+20
return
' a suivre ,essai pour enregistrements multiples
' wait 1000
' file_open_append 1,"essai_fichier_pmu.txt"
' for i = 1 to x
' file_write 1,conc(i,1)
' file_write 1,a$
' next i
' file_write 1,chr$(32):file_write 1,chr$(32)
' file_close 1
Code:
Revenir en haut Aller en bas
Invité
Invité




Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyVen 30 Juil 2010 - 12:41

J'ai fais un début: regarde pour la suite pour apprendre.
On verra si tu t'en sorts, sinon on t'aidera
Code:
error_french
' **********************************************
' ** éssai programme sur pronostics hippiques **
' ** par Rmont **
' **********************************************
dim i,j :' variables de boucles
dim pro ,ch :' pronostiqueur et cheval n°
dim x :' sera compris entre 13 mini et 20 maxi
dim x1 , y:' distance bord gauche de l'ecran
dim a$ :' a$ = ","
dim n :' pour le pas d'entrée des n° dans les cases
dim y2
label affichage
' dim x2 ,a
' chr$(32) pour mettre un espace entre les chiffres lors d'un enregistrement supplementaire
' ***************************************
' ** début du programme **
' ***************************************
dim conc(20,1):' tableau 2 dimensions
label recom  ,chev , pron  , verification
full_space 0
Alpha 1:top 1,10:left 1, 10:caption 1,"Nb de chevaux"      :font_size 1,10
alpha 2:top 2,10:left 2,150:caption 2,"Nb de pronostiqueurs":font_size 2,10
edit  3:top 3,30:left 3, 10:on_change 3,chev
edit  4:top 4,30:left 4,150:on_change 4,pron
memo 5:top 5,60:width 5,100:height 5,90:font_size 5,12 : width 5,200
end

chev:
a$= text$(3)
if numeric(a$)=1 then x= val( a$)  :' on récupère le texte de edit 3
gosub verification
return

pron:
if numeric(text$(4))=1 then pro=val(text$(4))
gosub verification
return

verification:
clear 5
item_add 5, "---vérification---"
item_add 5,str$(x)+" chevaux"
item_add 5,str$(pro)+" pronostiqueurs"
return

recom:
font_bold 0
input " Combien de chevaux dans cette course ? ";x
If x<13 Or x>20 then Goto recom
print "Il y a "+str$(x)+" chevaux" :' pour verification
input "Combien de pronostiqueurs ? ";pro
print: print
x1=100 :' distance bord gauche pour faire les rectangles
for i= 0 to 9
2d_fill_color 255,255,255
2d_rectangle x1+(n*i),200,185+(n*i),310
print_locate 120,215:print "10 pts" : ' reste a amenager les autres cases
print_locate 123,235:print "pour"
print_locate 120,250:print "cheval"
print_locate 120,270:print " N°"
n=85
next i
' ****** Initialisation des N° de chevaux ********
for i = 1 to 20
conc(i,0)= i
next i
' *************** Entrée des points ******************
' les numeros chevaux sont dans conc(ch,0)
' les points attribues sont dans conc(ch,1)
y2=350
For j = 1 To pro
y = 145 :' distance bord gauche
For i = 10 To 1 Step -1
print_locate y,270 : print " " :' sert a affacer pour les tours suivants
print_locate y,270
input ch :' c'est le n° de cheval 1er cité puis suivant
conc(ch,1) = conc(ch,1)+i :' je donne 10 points au 1er cité et 1 point au 8em
conc(ch,0)=ch
print:print:print :' sera enlevé par la suite
gosub affichage
' print "Cheval n° " +str$(ch)+" points " +str$(conc(ch,1)):print :' pour verif
y = y + 85
Next i
Next j
' end
' affichage:
' print_locate 25,y2:print "Cheval n° " +str$(ch)+" points " +str$(conc(ch,1)) :' pour verif
' y2=y2+20
' return
' essai rectangle
' x2=100 :a=20
' 2d_rectangle x2,500,x2+a,530
file_open_write 1,"essai_fichier_pmu.txt"
a$=","
for i = 1 to x
file_write 1,conc(i,1)
file_write 1,a$
next i
file_write 1,chr$(32)
file_close 1

end
' affichage pour verification
affichage:
print_locate 25,y2:print "Cheval n° " +str$(ch)+" points " +str$(conc(ch,1)) :' pour verif
y2=y2+20
return
' a suivre ,essai pour enregistrements multiples
' wait 1000
' file_open_append 1,"essai_fichier_pmu.txt"
' for i = 1 to x
' file_write 1,conc(i,1)
' file_write 1,a$
' next i
' file_write 1,chr$(32):file_write 1,chr$(32)
' file_close 1
Revenir en haut Aller en bas
jjn4

jjn4


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

Mots clés obsolète. Empty
MessageSujet: +++   Mots clés obsolète. EmptyVen 30 Juil 2010 - 13:40

Hi, hi , hi, (je ris) Laughing
Finalement, on va encore beaucoup écrire sur ce topic !
Et on est loin de finir le sujet !

Bon, eh bien pour faire comme tout le monde (eh oui !),
je dirai que la réponse de Cosmos ne répond pas vraiment à RMont
car elle met son programme linéaire en programmation évenementielle,
certes, mais il demandait comment faire pour INPUT et GOTO.

Alors, je ne vais pas lui refaire tout son programme (qui est trop long)
mais je lui propose de remplacer input par message_input$
et goto par gosub et repeat-until
comme dans l'exemple suivant :
Code:
dim a$ , b$ , k
b$="Course hippique"
label lala , bon

gosub lala
repeat
 gosub bon
until k=1

end

lala:
a$=message_input$(b$,"Combien de chevaux dans cette course (13 à 20) ?","")
return

bon:
if val(a$)<13 or val(a$)>20
 beep
 b$="On a dit 13 à 20 ni plus ni moins !"
 gosub lala
else
 k=1
end_if
return
Ceci dit, s'il trouve plus simple ou préfère la formule input et goto,
libre à lui de l'employer !
C'est ça, la force de panoramic, c'est de ne pas être sectaire,
et de permettre à tous de programmer comme il préfère
avec le même langage, et ça, c'est formidable !
(je suis sûr que ma réponse va faire encore beaucoup papoter...)
Hi, hi, hi, et moi qui disait d'arrêter... !
lol!
Revenir en haut Aller en bas
http://jjn4.e-monsite.com
Jean Claude

Jean Claude


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

Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyVen 30 Juil 2010 - 14:01

heureusement que Jack a dit:

Citation :
Je ne toucherai pas à ces 3 mots-clés obsolètes. il appartiennent au BASIC.
çà n'a rien empêché...

@Nardo, rassure toi, nous sommes calmes, simplement nous discutons.

@Rmont, comme te l'a dit Cosmos, pas de panique, d'abord parce que les mots-clé ne seront pas supprimés, mais surtout parce que naturellement au fur et à mesure que l'on code on finit par s'apercevoir qu'on n'utilise plus certains mots-clé. Sauf GOTO par commodité.

Jack a bien fait de ne pas vérouillé, on voit qu'il y avait des inquiétudes...
Par contre j'ai été surpris des réactions car le coté préventif de son intervention n'a pas fonctionné.


.JN4, tu viens de me doubler, ce qui fait que j'ajoute que tu as raison, Panoramic est avant tout un logiciel de programmation par évènements, et à l'intérieur de chaque Label on peut écrire en basic si çà nous chante.

Alors que demande le peuple ?

Pour moi, le sujet est clos.


Very Happy Very Happy
Revenir en haut Aller en bas
JL35




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

Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. EmptyVen 30 Juil 2010 - 16:43

Rien à voir, mais je salue la discrétion de RMont, inscrit depuis le 29/12/2008 et c'est son premier message.
Revenir en haut Aller en bas
Contenu sponsorisé





Mots clés obsolète. Empty
MessageSujet: Re: Mots clés obsolète.   Mots clés obsolète. Empty

Revenir en haut Aller en bas
 
Mots clés obsolète.
Revenir en haut 
Page 1 sur 2Aller à la page : 1, 2  Suivant
 Sujets similaires
-
» Panoramic Keywords
» Couleur d'une variable qui n'est pas un mot-clé
» Liste des mots-clés
» Nouvelle version 0.34
» Mots-clés : Majuscules ou minuscules ?

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