[PROJET][Débutant] Programme de calcul de marées.

[Bowbaq]

Bonjour @ tous. Je n'ai pas vu de section "Présentation" donc c'est mon premier message ^^
Je voudrais créer un programme de calcul de marrées, c'est à dire un programme qui retourne les hauteurs d'eau, heure par heure, à partir des données de l'ouvrage de référence.
Il me faut donc entrer des données (dont des heures), puis les traiter et les afficher.

J'ai écrit sur ma calculatrice ce programme : (Premier programme en basiq de ma vie, sans le manuel ^^)

Le code est un peu... sauvage ^^. Sa fonctionne doucement, mais sa fonctionne.
Maintenant je vois bien que c'est codé avec les pieds ^^.
J'aimerais obtenir un programme plus rapide, et rajouter quelques fonctionnalités.
D'après ce que j'ai lu, le meilleur compromis serait de l'écrire en C (J'ai parcouru le tuto de Squalenet) . Et je me dit que tant qu'a apprendre un langage, autant en apprendre un qui est répandu et puissant ^^
Donc faisable ? (Ou pas!)

[Bowbaq]

Ok, donc en gros pour éviter les variables en bordel, faut que je fasse des listes?
Et sinon l'affichage est "rudimentaire", y'aurais pas moyen de faire un beau tableau?

[Bowbaq]

Ouais j'avais testé, le problème c'est que tout l'écran n'est pas disponible. Il me semble qu'en C on peut disposer de la totalité de l'écran. C'est possible en basiq?
PS: J'ai écris ça http://bowbaqholyknight.free.fr/marée.89p (le lien marche pas chaipa pourquoi) vite fait. J'ai testé vite fait aussi et j'ai un erreur de syntaxe. Normalement dans ce cas, la calto renvoie a la ligne posant problème via l'éditeur. Ici ce n'est pas le cas. C'est grave docteur? Elle est ou l'erreur de syntaxe

[tama]

en C, tu devrais accéder plus vite à tes données, c'est tout, mais c'est facilement faisable en TI-Basic également

pour ton erreur de syntaxe, tu peux mettre le code ici ?

EDIT : roooh, j'allais pas poster sans dire bienvenue, voilà maintenant c'est fait

[Bowbaq]

Le lien vers le prog est dans mon post, juste qu'il est pas sous forme de lien

[Bowbaq]

Ok no soucy

Code: Select all

marée()
Prgm
CrlDraw
ClrGraph
ClrHome
ClrIO
Local coef,dz,pm,pm1,hpm,hpm1,bm,bm1,bmh,bms,hbm,hbm1,hmar,ict
Dialog
 Title "Calcul de marée"
 Text "Port de référence"
 Request "Coef.",coef
 Request "Heure PM",pm
 Request "Hauteur PM",hpm
 Request "Heure BM",bm
 Request "Hauteur BM",hbm
EndDlog
Disp "Tableau de marée","Port de référence"
© Transformation des chaines de caractères en valeurs utilisables.
expr(bm)bm1
expr(hbm)hbm1
expr(pm)pm1
expr(hpm)hpm1
© dz prend la valeur d'un douzième du marnage.
approx((hpm1-hbm1)/12)dz
©Nombre de douziemes à ajouter ou retrancher.
{0,1,2,3,3,2,1,0}nbdz

{0,1,1,1,1,1,1,1}nbhm
newList(7)haut
newlist(7)heur
newList(7)mnt
© Début de l'algo de traitement des données
If pm1bm1 Then
 © hmar prend la valeur décimale de l'heure marée.
 (bm1-pm1)/6hmar
 {BM,-1,-2,-3,-4,-5,PM}h
 1ict
 While ictœ8
  hbm1+nbdz[ict]*dzhaut[ict]
  bm1+nbhm[ict]*hmarbm1
  iPart(bm1)heur[ict]
  iPart(60*fPart(bm1))mnt[ict]
  Disp "h[ict]  "heur[ict]"h"mnt[ict]"min  "haut[ict]"m"
  ict+1ict
  
 EndWhile
Else
EndIf
EndPrgm

[ProgVal]

Tu appelles ça coder avec les pieds?
C'est sur bien comme code! On doit être les deux seuls à indenter notre code TI-Basic.
Et en plus t'as mis des commentaires! Ce code est parfaitement présenté, et il me semble difficile de l'accélérer.

[Bowbaq]

Dl le premier programme (1er post) et regarde le code, tu comprendras

Sinon j'ai une erreur de syntaxe mais je sais pas ou, quelqun aurait une idée? (J'utilise TI Edit pour coder)

[Bisam]

Si tu appuies sur "Enter" quand l'erreur survient, cela te mène à l'endroit du programme où elle est apparue.

Les seuls cas où cela devient difficile à repérer c'est lorsque tu as oublié un guillemet quelque part.

PS : le "Else" à la fin est parfaitement inutile.

[ProgVal]

C'est cette ligne:

Code: Select all

{BM,-1,-2,-3,-4,-5,PM}h

Et c'est parce que tu as mis le "moins" de soustraction, et non pas le "moins" de négation (pour les nombres négatifs)