Planétarium virtuel.

Nombre de messages : 1595 Date d'inscription : 19/01/2014

Bonjour.

Suite à des modifications de dernière minute, merci d'utiliser cette nouvelle version.

https://e-nautia.com/share/76774-xnjn0dvp

@Pedro,

Une petite remarque: tu as changé le nom de "planetarium_comp.bas" en "planetarium_comp .bas". Il y a un espace après comp.
Rien de grave je l'ai renommé. Very Happy

@tous,
De nouveau je suis obligé de placer le dossier "Ciel" à la racine C:\ sinon le code ne trouve pas KGF.dll ou s'il la trouve ça plante (bizarre, car ce matin ça marchait Question

).
J'en conclu que le problème est dans KGF.dll.
Donc j'ai remis le dossier "Ciel" à la racine, comme ça je suis tranquille, ça marche. cheers

Une autre remarque qui peut être utile à vos recherches: dans le code KGF.dll est appelée dll_on "kgf", ors le fichier qui est dans le dossier "Ciel" se nomme KGF.dll. Je ne sais pas si cela a une incidence pour l'interpréteur et pour le compilateur.

Bon courage.

PS: une précision, ce problème de placer ou pas "Ciel" à la racine C:\ n'existe pas avec "planetarium_comp.exe"

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

Pedro a écrit:: Je confirme que le code du fichier planetarium.bas peut également être lancé depuis l'interpréteur, à mon grand étonnement.

Alors là, c'est moi qui suis étonné ! Et même ébranlé. Je pensais naïvement que tout le monde avait compris le fonctionnement...
C'est un des principes du compilateur d'être compatible à 100% avec l'interpréteur: tout source compilable fonctionne tel quel avec l'interpréteur.
Cela fait presque 2 semaines que c'est sur ce principe même que je teste planetarium.bas …
Je pense qu'il y a un gros soucis de méthodologie. Soit j'ai mal expliqué comment je teste le compilateur avec planetarium, soit personne n'a lu mes messages…

Pedro a écrit:: Concernant le problème du choix du lieu d'observation, le problème semble résolu.
Je viens de tester an choisissant Poitiers, et je rencontre aucun souci.

Euh …
… Cà, c'était le problème qui a été corrigé lundi … c'est à dire il y a 4 jours …
Le dernier problème corrigé portait sur les noms d'étoiles qui n'apparaissaient pas ...

_________________

username : panoramic@jack-panoramic password : panoramic123

Nombre de messages : 1595 Date d'inscription : 19/01/2014

Bonjour.

@Jack.

Désolé pour ce malentendu.

Nouvelle version en ligne.

Au menu:
- Amélioration sensible de la vitesse d'affichage.
- Nouveau sous-menu: le ciel ce soir à 22h.

https://e-nautia.com/share/76797-cpnz17px

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

Aïe.

L'exécution de la version compilée de ce source donne:
(140) File extension is not correct

Avec panoramic_editor, l'exécution de la version interprétée de ce source donne:
(140) File extension is not correct. Line : 877

La ligne en question est dans sub planetarium():

Code:: file_load 2,chemin_paysage$

Si je fais:

Code:: message chemin_paysage$:file_load 2,chemin_paysage$

J'obtiens la chaine vide pour la valeur de chemin_paysage$

_________________

username : panoramic@jack-panoramic password : panoramic123

Nombre de messages : 1595 Date d'inscription : 19/01/2014

Bonjour.

Je pense que dans ce cas précis, le fichier preferences.ini doit être corrompu.

Merci de voir si'il contient bien la ligne suivante:

Code:: Paysage:fonds\mer2.bmp

Si cette ligne venait à manquer, il suffit de l'ajouter simplement.

Merci de la suite.

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

Effectivement, mon fichier preference.ini était vide. Tout est maintenant rentré dans l'ordre.

J'ai compilé le nouveau source. L'exécutable se trouve à l'endroit habituel:
*** n'existe plus, voir la dernière version en bas de cette discussion ***

Pour nos amis qui prennent le sujet en cours, je vais rappeler le contexte:
Pedro a écrit un logiciel de carte du ciel.
Pour augmenter la vitesse d'exécution de ce logiciel, j'utilise un compilateur qui est en cours de développement et à partir du source de Pedro, je fournis un exécutable compilé.
Nous testons à la fois le logiciel de Pedro et le compilateur.

Pour ceux qui voudraient aider aux tests, voici le mode opératoire:
1 - télécharger la dernière version complète du 21 juillet de la carte du ciel:
https://e-nautia.com/share/75964-9drq5y32
2 - l'installer dans c:\ciel, en suivant la procédure
3 - télécharger le dernier source (planetarium_comp.bas, Version 3.6 du 10 août 2018) de Pedro:
https://e-nautia.com/share/76797-cpnz17px
4 - mettre planetarium_comp.bas dans c:\ciel
5 - télécharger l'exécutable compilé (planetarium_comp.exe) de ce source
*** n'existe plus, voir la dernière version en bas de cette discussion ***
6 - à partir de planetarium_comp.zip, mettre planetarium_comp.exe dans ce répertoire c:\ciel

A ce stade, on teste la version compilée en double-cliquant sur planetarium_comp.exe

Si vous observez un problème, vous essayez de le reproduire avec l'interpréteur Panoramic-editor en utilisant planetarium_comp.bas comme source, c'est à dire le source téléchargé en 3.

Comme le source utilisé par le compilateur est exactement le même que celui utilisé par l'interpréteur (planetarium_comp.bas),
si le problème est observé UNIQUEMENT avec le compilateur, le problème est dans le compilateur => c'est mon problème.
si le problème est observé AUSSI avec l'interpréteur => c'est un problème pour Pedro.

_________________

username : panoramic@jack-panoramic password : panoramic123

Nombre de messages : 1595 Date d'inscription : 19/01/2014

Bonsoir.

Merci Jack pour cette nouvelle version.

Je viens de mettre en ligne une nouvelle version complète du logiciel, car elle comporte de nouveaux fichiers.

Au menu de cette version:

- Ajout d'un nouveau catalogue d'objets du ciel profond: catalogue de galaxies Markarian.

Pour les utilisateurs, il y a donc lieu de télécharger cette nouvelle version complète.

Jack, merci de recompiler le nouveau fichier planetarium.bas.

https://e-nautia.com/share/76817-91s9zkgn

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

Pedro a écrit:: Jack, merci de recompiler le nouveau fichier planetarium.bas.

Dans cette nouvelle version, je retrouve le source planetarium.bas V. 3.3 du 18 juillet 2018, qui ne peut pas compiler. !!!
La première erreur détectée par le compilateur est à la ligne 3693:

Code:: effacer_tableau_objets()

car ce sub n'est pas défini, et ainsi de suite… On retrouve tous les problèmes déjà signalés !

C'est, je suppose planetarium_comp.bas Version 3.7 du 11 août 2018 que je dois compiler …
...Mais, comme tu y as mis aussi un exécutable panoramic_comp.exe, j'ai appelé le mien planetarium_comp2.exe pour éviter la confusion...

Le voici:
*** n'existe plus, voir la dernière version en bas de cette discussion ***

Tout ça n'est pas fait pour simplifier les tests, car il est difficile de s'y retrouver, et je pense qu'il n'y a plus grand monde qui arrivera à suivre. Dur, dur. Mad

_________________

username : panoramic@jack-panoramic password : panoramic123

Bonjour Jack et Pedro,

J'ai lu vos messages d'hier et de ce matin. Cela devient Ardu pour tester drunken

Je n'est pas le temps aujourd'hui, mais je vais recharger tout ça demain.
Je suivrai la démarche indiquée par Jack.

A demain.

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

Jean Claude a écrit:: Je suivrai la démarche indiquée par Jack.

Oui, mais justement, la "démarche" a changé:

1 - Il faut télécharger la dernière version de Pedro:
https://e-nautia.com/share/76817-91s9zkgn

2 - et y tester panoramic_comp2.exe:
*** n'existe plus, voir la dernière version en bas de cette discussion ***

Bons tests !

_________________

username : panoramic@jack-panoramic password : panoramic123

Nombre de messages : 1595 Date d'inscription : 19/01/2014

Bonjour.

Je confirme que, suite à l'ajout d'un nouveau catalogue d'objets du ciel profond, il y a lieu de télécharger la dernière version complète, indiquée dans le dernier post de Jack.

Ensuite, télécharger le fichier compilé indiqué dans le même post.

Salut tout le monde.
Après une absence de plus de trois semaines me revoilà de retour sur le forum.
Par manque de temps je ne peux pas me manifester souvent et ça pourrait durer un bon moment dans les jours qui viennent.
Comme Jack s’est remis à faire évoluer le compilateur, je m’efforcerai à trouver du temps pour suivre cette évolution.
Pour dire vrai, j’ai juste testé (vite fait) l’excellent programme de Pedro que je salue au passage.

@Jack
Je te propose un tout petit code pour voir ce que ça donne pour le compilateur.
J’ai testé le code par l’interpréteur : le résultat est satisfaisant (quelques secondes tout de même !)
Voici le code et son résultat (en interprété)

Code:: rem ============================================================================
rem Fractal Tree
rem ============================================================================
dim level : level = 12 : ' Niveau de ramification, essayer avec 10 ou 15 ou autre valeur
dim long : long = 100 : ' Longueur initiale du tronc (branche initiale)
dim rotation : rotation = pi/2 : ' arbre vertical
dim a1 : a1 = pi/6 : ' valeurs à modifier pour ...
dim a2 : a2 = pi/8 : ' ... les inclinaisons des sous-branches
dim c1 : c1 = 0.7 : ' correction pour modifier les longueurs ...
dim c2 : c2 = 0.8 : ' ... des sous-branches
dim x,y,xs(level), ys(level)

picture 10 : full_space 10 : 2d_target_is 10 : color 10,0,0,0 : 2d_pen_color 0,255,0
x = width_client(10)*.5 : y = height_client(10)-20
caption 0,"tracé en cours .... <ESC> pour arrêter"
Tree()
caption 0,"Terminé "
end
rem ============================================================================
' Procédure récursive
SUB Tree()
   xs(level) = x : ys(level) = y : PutLine()
   if scancode = 27 then terminate
   if level > 0
   level = level - 1
   long = long * c1
   rotation = rotation - a1
   Tree() : ' 1er appel à la procédure en cours
   long = long / c1 * c2
   rotation = rotation + a1 + a2
   Tree() : ' second appel à la procédure en cours
   rotation = rotation - a2
   long = long / c2
   level = level + 1
   end_if
   x = xs(level) : y = ys(level)
END_SUB
rem ============================================================================
SUB PutLine()
   dim_local xn,yn
   xn = cos(rotation)*long + x
   yn = -1*sin(rotation)*long + y
   2d_line x,y,xn,yn
   display : ' pour suivre le tracé
   x = xn : y = yn
END_SUB
rem ============================================================================

Le résultat:

PS : Toutes mes excuses pour le hors-sujet Embarassed

Bonjour à tous,

Tests de planétarium:

Aucun problème à signaler aussi bien sur l'interpréteur que sur la version compilée. cheers

Il me reste à approfondir...

A+

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

@Papydall:
Voici ton source compilé:
http://panoramic-language.pagesperso-orange.fr/FRACTAL_TREE.zip

J'ai du modifier la ligne 12, car le compilateur n'accepte pas une variable pour définir la dimension d'un tableau:

Code:: dim x,y,xs(12), ys(12): rem dim x,y,xs(level), ys(level)

_________________

username : panoramic@jack-panoramic password : panoramic123

Merci Jack.
J’espère que l’on va disposer d’une nouvelle version du compilateur dans les meilleurs délais.
D’ici là, bonne continuation.

Nombre de messages : 1595 Date d'inscription : 19/01/2014

Bonjour.

Nouvelle version en ligne.

Au menu:

- Affichage de la position des 100 premiers astéroïdes.

Cette version est en test. Merci de me dire ce que vous en pensez.

Lien de téléchargement du fichier .bas:

https://e-nautia.com/share/76831-4ycazfwc

Lien de téléchargement des données des astéroïdes (fichier à placer dans le sous-dossier data du logiciel):

https://e-nautia.com/share/76832-izacg66d

@Jack: merci de recompiler ce dernier fichier .bas.

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

Dans le fichier, planetarium_comp.bas, Version 3.8 du 13 août 2018, le compilateur refuse la ligne 9454:

Code:: lire_elements_comete()

lire_elements_comete() est un appel à un sub non défini.

_________________

username : panoramic@jack-panoramic password : panoramic123

Nombre de messages : 1595 Date d'inscription : 19/01/2014

Bonjour.

@Jack.

Suite à l'erreur ligne 9454, tu peux mettre cette ligne en commentaires.

Merci de la suite.

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

Après mise en commentaire de la ligne 9454, voici le résultat du la compilation:
*** n'existe plus, voir la dernière version en bas de cette discussion ***

_________________

username : panoramic@jack-panoramic password : panoramic123

Bonjour,

@Jack,
Heu... c'est bizarre, le temps est très long, mais ça marche. Je pense que ce n'est pas la version compilée.

A+

Nombre de messages : 471 Date d'inscription : 29/12/2016

Jean Claude a écrit:: Heu... c'est bizarre, le temps est très long, mais ça marche. Je pense que ce n'est pas la version compilée.

J'ai essayé le programme compilé de Papydall, et ça marche. Je me suis dit: tout n'est pas perdu.

Mais en lisant le rapport de Jean Claude, je me demande si c'est la version compilée qu'on a reçu, car je n'ai pas vraiment vu de différence.

Nombre de messages : 1595 Date d'inscription : 19/01/2014

Bonjour.

Suite à de nombreuses modifications, j'ai mis en ligne une nouvelle version complète du logiciel.

Au menu:

- Affichage des comètes, et des astéroïdes à l'opposition en 2018.

Lien de téléchargement

https://e-nautia.com/share/76865-fkqz301g

@Jack: merci de recompiler le fichier .bas.

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

Voici la compilation de planetarium_comp.bas, Version 3.9 du 16 août 2018:
*** n'existe plus, voir la dernière version en bas de cette discussion ***

_________________

username : panoramic@jack-panoramic password : panoramic123

Nombre de messages : 1595 Date d'inscription : 19/01/2014

Bonjour.

Merci Jack pour cette nouvelle compilation.

Après avoir réalisé un test rapide, j'obtiens le message d'erreur suivant:

List index out of bounds(56)

J'ai pû repérer la ligne qui provoque cette erreur.

Il s'agit de la ligne 9513, à modifier comme suit:

Code:: for boucle%=3 to count(133)

au lieu de:

Code:: for boucle%=3 to 102

Et ensuite, procéder à une nouvelle compilation.

Merci de la suite.

» Logiciel de soutien scolaire et planétarium.
» Logiciel de planétarium.
» Clavier virtuel entièrement en Panoramic
» Compilation du logiciel de planétarium.
» Logiciel de traduction et planétarium.