| Planétarium virtuel. | |
|
+7papydall mindstorm Jicehel Jean Claude Minibug RMont Pedro 11 participants |
|
Auteur | Message |
---|
Jack Admin
Nombre de messages : 2394 Date d'inscription : 28/05/2007
| Sujet: Re: Planétarium virtuel. Dim 5 Aoû 2018 - 22:36 | |
| Quelques nouvelles de l'avancement. Je "bute" toujours sur la ligne du sous-programme valider_lieu - Code:
-
x%=dll_call3("SearchStringList",object_internal(6),adr(element$),adr(te$)) Le problème est dans le passage à la DLL d'une adresse d'une chaîne de caractère. Et il avait été entrevu par Klaus en février dernier: https://panoramic.1fr1.net/t5634-adr_stringvJe vais essayer de le contourner dans le compilateur, mais tôt ou tard, il va falloir que je code une fonction de type ADR_STRING. Si je n'y arrive pas, je vais être obligé, en l'absence de Klaus, de modifier KGF.dll _________________ username : panoramic@jack-panoramic password : panoramic123 | |
|
| |
Jack Admin
Nombre de messages : 2394 Date d'inscription : 28/05/2007
| Sujet: Re: Planétarium virtuel. Lun 6 Aoû 2018 - 22:03 | |
| 1 - j'ai inséréré la nouvelle sub planetarium() de Pedro, qui évite les clignotements désagréables de l'écran. 2 - dans la sub afficher_planetes(numero_astre_a_calculer%), j'ai remis en commentaire la ligne qui avait servi à la mise au point: - Code:
-
caption 0,"Affichage de "+astre$+"."
3 - j'ai rendu (provisoirement) le compilateur compatible de la fonction ADR(V$) de Panoramic, ce qui permet d'appeler KGF.dll par la ligne - Code:
-
x%=dll_call3("SearchStringList",object_internal(6),adr(element$),adr(te$)) Il y a un problème avec cette fonction lorsqu'elle est appliquée sur un string, car elle ne renvoie pas réellement l'adresse du string. Klaus en avait tenu compte dans sa DLL. Il va falloir que je code une fonction spécifique (ADRSTR ?). Le résultat de ces 3 actions est sans appel : un affichage immédiat et la possibilité de changer le lieu d'observation sans problème. A vos tests. Voici l'exécutable: *** n'existe plus, voir la dernière version en bas de cette discussion *** _________________ username : panoramic@jack-panoramic password : panoramic123
Dernière édition par Jack le Sam 1 Sep 2018 - 9:20, édité 1 fois | |
|
| |
Minibug
Nombre de messages : 4570 Age : 58 Localisation : Vienne (86) Date d'inscription : 09/02/2012
| Sujet: Re: Planétarium virtuel. Lun 6 Aoû 2018 - 22:39 | |
| Bravo Jack ! Pedro, il y a encore un problème ! Dans FICHIER puis PREFERENCES GENERALES dans l'onglet HEURE LOCALECliquer dans CHOIX DU PAYSAGE LOCAL puis choisir un fichier. Je choisi volontairement un fichier qui fait plus de 250 pixels mais cela ne devrait pas planter le programme... Je pense qu'il faut faire un test supplémentaire sur la taille de l'image ! En plus j'ai parfois un message comme quoi l'objet existe déjà ! Donc il y a plusieurs erreurs à corriger... Bon courage à tous les 2 pour la suite ! | |
|
| |
Jean Claude
Nombre de messages : 5950 Age : 70 Localisation : 83 Var Date d'inscription : 07/05/2009
| Sujet: Re: Planétarium virtuel. Mar 7 Aoû 2018 - 9:02 | |
| Je viens d'essayer la version compilée. C'est impressionnant cette rapidité par rapport au dernier code de Pedro. Ça donne envie d'avoir un compilateur A+ | |
|
| |
Oscaribout
Nombre de messages : 471 Date d'inscription : 29/12/2016
| Sujet: Re: Planétarium virtuel. Mar 7 Aoû 2018 - 14:46 | |
| Bonjour, Dommage pour moi de ne pas pouvoir essayé. J'ai trouvé des rapports pour mon problème qui peut-être donne une raison du blocage - rapport:
Version=1 EventType=APPCRASH EventTime=131779588943786544 ReportType=2 Consent=1 ReportStatus=2 ReportIdentifier=fee04d74-bf7f-48e6-9b7c-118808f49b83 IntegratorReportIdentifier=43117008-3a3d-4dc8-afbf-88e13036553d Wow64Host=34404 Wow64Guest=332 NsAppName=planetarium_comp.exe AppSessionGuid=0000c648-0001-0049-6764-9b82d62cd401 TargetAppId=W:000645a13f6ce777466e4f5722633905500e0000ffff!0000e377c96e63990beb087c052378cbaff79175d71b!planetarium_comp.exe TargetAppVer=2018//08//04:15:32:04!2a94ab!planetarium_comp.exe BootId=4294967295 ServiceSplit=3539031 TargetAsId=12003 Response.type=4 Sig[0].Name=Nom de l’application Sig[0].Value=planetarium_comp.exe Sig[1].Name=Version de l’application Sig[1].Value=0.0.0.0 Sig[2].Name=Horodatage de l’application Sig[2].Value=5b65c6f4 Sig[3].Name=Nom du module par défaut Sig[3].Value=StackHash_9aa4 Sig[4].Name=Version du module par défaut Sig[4].Value=0.0.0.0 Sig[5].Name=Horodateur du module par défaut Sig[5].Value=00000000 Sig[6].Name=Code de l’exception Sig[6].Value=c00001a5 Sig[7].Name=Décalage de l’exception Sig[7].Value=PCH_93_FROM_ntdll+0x000722CC DynamicSig[1].Name=Version du système DynamicSig[1].Value=10.0.15063.2.0.0.768.101 DynamicSig[2].Name=Identificateur de paramètres régionaux DynamicSig[2].Value=1036 DynamicSig[22].Name=Information supplémentaire n° 1 DynamicSig[22].Value=9aa4 DynamicSig[23].Name=Information supplémentaire n° 2 DynamicSig[23].Value=9aa478dbab0cb4ef4d26cc2f28d142af DynamicSig[24].Name=Information supplémentaire n° 3 DynamicSig[24].Value=006a DynamicSig[25].Name=Information supplémentaire n° 4 DynamicSig[25].Value=006aed5d7c98ccaccda11151d8999b66 UI[2]=C:\ciel\planetarium_comp.exe UI[3]=planetarium_comp.exe a cessé de fonctionner UI[4]=Windows peut rechercher une solution au problème la prochaine fois que vous serez en ligne. UI[5]=Rechercher une solution en ligne et fermer le programme UI[6]=Rechercher ultérieurement une solution en ligne et fermer le programme UI[7]=Fermer le programme LoadedModule[0]=C:\ciel\planetarium_comp.exe LoadedModule[1]=C:\WINDOWS\SYSTEM32\ntdll.dll LoadedModule[2]=C:\WINDOWS\System32\KERNEL32.DLL LoadedModule[3]=C:\WINDOWS\System32\KERNELBASE.dll LoadedModule[4]=C:\WINDOWS\System32\GDI32.dll LoadedModule[5]=C:\WINDOWS\System32\gdi32full.dll LoadedModule[6]=C:\WINDOWS\System32\msvcp_win.dll LoadedModule[7]=C:\WINDOWS\System32\ucrtbase.dll LoadedModule[8]=C:\WINDOWS\System32\USER32.dll LoadedModule[9]=C:\WINDOWS\System32\win32u.dll LoadedModule[10]=C:\WINDOWS\System32\msvcrt.dll LoadedModule[11]=C:\WINDOWS\System32\IMM32.DLL LoadedModule[12]=C:\WINDOWS\System32\oleaut32.dll LoadedModule[13]=C:\WINDOWS\System32\combase.dll LoadedModule[14]=C:\WINDOWS\System32\RPCRT4.dll LoadedModule[15]=C:\WINDOWS\System32\SspiCli.dll LoadedModule[16]=C:\WINDOWS\System32\CRYPTBASE.dll LoadedModule[17]=C:\WINDOWS\System32\bcryptPrimitives.dll LoadedModule[18]=C:\WINDOWS\System32\sechost.dll LoadedModule[19]=C:\WINDOWS\System32\advapi32.dll LoadedModule[20]=C:\WINDOWS\SYSTEM32\version.dll LoadedModule[21]=C:\WINDOWS\System32\ole32.dll LoadedModule[22]=C:\WINDOWS\WinSxS\x86_microsoft.windows.common-controls_6595b64144ccf1df_5.82.15063.413_none_55bc94a37c2a2854\comctl32.dll LoadedModule[23]=C:\WINDOWS\System32\shell32.dll LoadedModule[24]=C:\WINDOWS\System32\cfgmgr32.dll LoadedModule[25]=C:\WINDOWS\System32\shcore.dll LoadedModule[26]=C:\WINDOWS\System32\windows.storage.dll LoadedModule[27]=C:\WINDOWS\System32\shlwapi.dll LoadedModule[28]=C:\WINDOWS\System32\kernel.appcore.dll LoadedModule[29]=C:\WINDOWS\System32\powrprof.dll LoadedModule[30]=C:\WINDOWS\System32\profapi.dll LoadedModule[31]=C:\WINDOWS\SYSTEM32\winspool.drv LoadedModule[32]=C:\WINDOWS\SYSTEM32\bcrypt.dll LoadedModule[33]=C:\WINDOWS\System32\comdlg32.dll LoadedModule[34]=C:\WINDOWS\SYSTEM32\winmm.dll LoadedModule[35]=C:\WINDOWS\SYSTEM32\winmmbase.dll LoadedModule[36]=C:\WINDOWS\SYSTEM32\GLU32.dll LoadedModule[37]=C:\WINDOWS\SYSTEM32\OPENGL32.dll LoadedModule[38]=C:\WINDOWS\system32\uxtheme.dll LoadedModule[39]=C:\WINDOWS\System32\MSCTF.dll LoadedModule[40]=C:\WINDOWS\WinSxS\x86_microsoft.windows.gdiplus_6595b64144ccf1df_1.1.15063.608_none_9e9d5d4256d15def\GDIPlus.dll LoadedModule[41]=C:\WINDOWS\system32\dwmapi.dll LoadedModule[42]=C:\WINDOWS\WinSxS\x86_microsoft.windows.common-controls_6595b64144ccf1df_6.0.15063.483_none_6dad63fefc436da8\comctl32.DLL LoadedModule[43]=C:\WINDOWS\System32\TextInputFramework.dll LoadedModule[44]=C:\WINDOWS\System32\CoreUIComponents.dll LoadedModule[45]=C:\WINDOWS\System32\CoreMessaging.dll LoadedModule[46]=C:\WINDOWS\SYSTEM32\wintypes.dll LoadedModule[47]=C:\WINDOWS\SYSTEM32\usermgrcli.dll LoadedModule[48]=C:\WINDOWS\SYSTEM32\ntmarta.dll LoadedModule[49]=C:\ciel\kgf.DLL LoadedModule[50]=C:\WINDOWS\System32\IMAGEHLP.DLL LoadedModule[51]=C:\WINDOWS\SYSTEM32\AVICAP32.dll LoadedModule[52]=C:\WINDOWS\SYSTEM32\AVIFIL32.DLL LoadedModule[53]=C:\WINDOWS\SYSTEM32\msimg32.dll LoadedModule[54]=C:\WINDOWS\SYSTEM32\URLMON.DLL LoadedModule[55]=C:\WINDOWS\SYSTEM32\wininet.dll LoadedModule[56]=C:\WINDOWS\SYSTEM32\MSVFW32.DLL LoadedModule[57]=C:\WINDOWS\SYSTEM32\MSACM32.dll LoadedModule[58]=C:\WINDOWS\SYSTEM32\iertutil.dll LoadedModule[59]=C:\WINDOWS\SYSTEM32\mpr.dll LoadedModule[60]=C:\WINDOWS\SYSTEM32\wsock32.dll LoadedModule[61]=C:\WINDOWS\System32\ws2_32.DLL LoadedModule[62]=C:\WINDOWS\SYSTEM32\olepro32.dll LoadedModule[63]=C:\Windows\System32\hhctrl.ocx FriendlyEventName=Fonctionnement arrêté ConsentKey=APPCRASH AppName=planetarium_comp.exe AppPath=C:\ciel\planetarium_comp.exe NsPartner=windows NsGroup=windows8 ApplicationIdentity=43FC22B155E72D36DFBC68EC622C734C MetadataHash=1205608262
Nom du journal :Application Source : Application Error Date : 05/08/2018 18:08:14 ID de l’événement :1000 Catégorie de la tâche :(100) Niveau : Erreur Mots clés : Classique Utilisateur : N/A Ordinateur : xxxxxxxxxxxxxxxxxxxxx Description : Nom de l’application défaillante planetarium_comp.exe, version : 0.0.0.0, horodatage : 0x5b65c6f4 Nom du module défaillant : unknown, version : 0.0.0.0, horodatage : 0x00000000 Code d’exception : 0xc00001a5 Décalage d’erreur : 0x0270f982 ID du processus défaillant : 0xc648 Heure de début de l’application défaillante : 0x01d42cd6829b6467 Chemin d’accès de l’application défaillante : C:\ciel\planetarium_comp.exe Chemin d’accès du module défaillant: unknown ID de rapport : 43117008-3a3d-4dc8-afbf-88e13036553d Nom complet du package défaillant : ID de l’application relative au package défaillant : XML de l’événement : <Event xmlns="http://schemas.microsoft.com/win/2004/08/events/event"> <System> <Provider Name="Application Error" /> <EventID Qualifiers="0">1000</EventID> <Level>2</Level> <Task>100</Task> <Keywords>0x80000000000000</Keywords> <TimeCreated SystemTime="2018-08-05T16:08:14.108442500Z" /> <EventRecordID>805862</EventRecordID> <Channel>Application</Channel> <Computer>xxxxxxxxxxxxxxxxxx</Computer> <Security /> </System> <EventData> <Data>planetarium_comp.exe</Data> <Data>0.0.0.0</Data> <Data>5b65c6f4</Data> <Data>unknown</Data> <Data>0.0.0.0</Data> <Data>00000000</Data> <Data>c00001a5</Data> <Data>0270f982</Data> <Data>c648</Data> <Data>01d42cd6829b6467</Data> <Data>C:\ciel\planetarium_comp.exe</Data> <Data>unknown</Data> <Data>43117008-3a3d-4dc8-afbf-88e13036553d</Data> <Data> </Data> <Data> </Data> </EventData> </Event>
Nom du journal :Application Source : Windows Error Reporting Date : 05/08/2018 18:08:39 ID de l’événement :1001 Catégorie de la tâche :Aucun Niveau : Information Mots clés : Classique Utilisateur : N/A Ordinateur : xxxxxxxxxxxxxxxx Description : Récipient d’erreurs , type 0 Nom d’événement : APPCRASH Réponse : Non disponible ID de CAB : 0
Signature du problème : P1 : planetarium_comp.exe P2 : 0.0.0.0 P3 : 5b65c6f4 P4 : StackHash_9aa4 P5 : 0.0.0.0 P6 : 00000000 P7 : c00001a5 P8 : PCH_93_FROM_ntdll+0x000722CC P9 : P10 :
Fichiers joints :
Ces fichiers sont peut-être disponibles ici : C:\ProgramData\Microsoft\Windows\WER\ReportQueue\AppCrash_planetarium_comp_7b616d89c8c9117f4b8162701d7fafb8cf6e3d54_27148bab_f48a04e9
Symbole d’analyse : Nouvelle recherche de la solution : 0 ID de rapport : 43117008-3a3d-4dc8-afbf-88e13036553d Statut du rapport : 6 Récipient avec hachage : XML de l’événement : <Event xmlns="http://schemas.microsoft.com/win/2004/08/events/event"> <System> <Provider Name="Windows Error Reporting" /> <EventID Qualifiers="0">1001</EventID> <Level>4</Level> <Task>0</Task> <Keywords>0x80000000000000</Keywords> <TimeCreated SystemTime="2018-08-05T16:08:39.941830900Z" /> <EventRecordID>805863</EventRecordID> <Channel>Application</Channel> <Computer>xxxxxxxxxxxxx</Computer> <Security /> </System> <EventData> <Data> </Data> <Data>0</Data> <Data>APPCRASH</Data> <Data>Non disponible</Data> <Data>0</Data> <Data>planetarium_comp.exe</Data> <Data>0.0.0.0</Data> <Data>5b65c6f4</Data> <Data>StackHash_9aa4</Data> <Data>0.0.0.0</Data> <Data>00000000</Data> <Data>c00001a5</Data> <Data>PCH_93_FROM_ntdll+0x000722CC</Data> <Data> </Data> <Data> </Data> <Data> </Data> <Data>C:\ProgramData\Microsoft\Windows\WER\ReportQueue\AppCrash_planetarium_comp_7b616d89c8c9117f4b8162701d7fafb8cf6e3d54_27148bab_f48a04e9</Data> <Data> </Data> <Data>0</Data> <Data>43117008-3a3d-4dc8-afbf-88e13036553d</Data> <Data>6</Data> <Data> </Data> </EventData> </Event>
Cela semble être le cas dans les lignes 119 et suivantes. A tout hasard, même si j'ai peut d'espoir. Merci. | |
|
| |
Pedro
Nombre de messages : 1594 Date d'inscription : 19/01/2014
| Sujet: Planétarium virtuel. Mar 7 Aoû 2018 - 15:34 | |
| Bonjour. @Jack. Je viens de mettre en ligne une version corrigée du logiciel. Merci d'utiliser cette nouvelle version pour la compilation future. https://e-nautia.com/share/76585-r6oqr6euJe viens juste de repérer une erreur ligne 127 dans le fichier compilé. - Code:
-
dim double_crlf$:double_crlf$=double_crlf$ Il faut - Code:
-
dim double_crlf$:double_crlf$=crlf$+crlf$ | |
|
| |
Jack Admin
Nombre de messages : 2394 Date d'inscription : 28/05/2007
| Sujet: Re: Planétarium virtuel. Mar 7 Aoû 2018 - 18:26 | |
| Et voici le source compilé, après correction de la ligne 127: - Code:
-
dim double_crlf$:double_crlf$=crlf$+crlf$ http://panoramic-language.pagesperso-orange.fr/planetarium_comp.zip@oscaribout: Ton fichier ne m'apporte aucun élément sur la raison du "crash". Je te proposes de faire l'essai suivant: 1 - tu télécharges la dernière version complète du 21 juillet: https://e-nautia.com/share/75964-9drq5y322 - tu l'installes dans un autre répertoire que c:\ciel, par exemple c:\ciel_test (ce que j'ai fait) 3 - tu télécharges le dernier exécutable compilé *** n'existe plus, voir la dernière version en bas de cette discussion *** 4 - à partir de planetarium_comp.zip, tu mets planetarium_comp.exe dans ce répertoire c:\ciel_test 5 - tu double-cliques sur planetarium_comp.exe pour l'exécuter _________________ username : panoramic@jack-panoramic password : panoramic123
Dernière édition par Jack le Sam 1 Sep 2018 - 9:20, édité 3 fois | |
|
| |
Pedro
Nombre de messages : 1594 Date d'inscription : 19/01/2014
| Sujet: Planétarium virtuel. Mar 7 Aoû 2018 - 18:35 | |
| Bonjour.
Merci Jack pour la correction rapide.
Je viens de réaliser le test suivant:
. Affichage de l'horizon sud. . Clic sur une étoile visible: j'obtiens bien les informations la concernant. . Menu Rechercher une étoile: je recherche la même étoile, d'après son numéro HD.
Un message me signale qu'elle est bien visible, et qu'une cible rouge la désignera. Et là, patatras. Après un certain délai, l'écran est rafraîchi, et aucune cible rouge n'apparaît.
Merci de la suite.
Je viens de réaliser un test avec l'interpréteur, et tout fonctionne correctement. | |
|
| |
Oscaribout
Nombre de messages : 471 Date d'inscription : 29/12/2016
| Sujet: Re: Planétarium virtuel. Mar 7 Aoû 2018 - 19:14 | |
| Merci Jack pour ta réponse. Je télécharge de suite pour faire l'essai. | |
|
| |
Oscaribout
Nombre de messages : 471 Date d'inscription : 29/12/2016
| Sujet: Re: Planétarium virtuel. Mar 7 Aoû 2018 - 19:29 | |
| Pas possible, même résultat! Merci d'avoir essayé de résoudre mon problème. Installé comme ta là dis. | |
|
| |
Minibug
Nombre de messages : 4570 Age : 58 Localisation : Vienne (86) Date d'inscription : 09/02/2012
| Sujet: Re: Planétarium virtuel. Mar 7 Aoû 2018 - 19:42 | |
| Bonjour à tous !
Pedro, Le problème relevé plus haut est toujours présent ! Le programme ne trouve pas le fichier une fois que je clique sur le bouton OK | |
|
| |
Pedro
Nombre de messages : 1594 Date d'inscription : 19/01/2014
| Sujet: Planétarium virtuel. Mar 7 Aoû 2018 - 20:08 | |
| | |
|
| |
Jean Claude
Nombre de messages : 5950 Age : 70 Localisation : 83 Var Date d'inscription : 07/05/2009
| Sujet: Re: Planétarium virtuel. Mar 7 Aoû 2018 - 20:21 | |
| @Oscaribout, Ton problème est assez incompréhensible.
D'après ce que je sais, tu es sous W10 et ton antivirus est Iobit.
Une question: as-tu essayé de désactiver ton antivirus, puis télécharger les fichiers indiqués par Jack. Faire le test et seulement après remettre ton antivirus en service.
A+ | |
|
| |
Oscaribout
Nombre de messages : 471 Date d'inscription : 29/12/2016
| Sujet: Re: Planétarium virtuel. Mer 8 Aoû 2018 - 0:45 | |
| - Jean Claude a écrit:
- Une question: as-tu essayé de désactiver ton antivirus, puis télécharger les fichiers indiqués par Jack.
Faire le test et seulement après remettre ton antivirus en service. Tout à fait. J'ai désactivé mon anti-virus et mon pare-feu. J'avais fait faire une analyse avec mon anti-virus, et il me dit que le programme est sain. J'ai fait une recherche sur le web, en regardant le rapport que j'ai mis avec la lecture de l'endroit où ça bloque: FriendlyEventName=Fonctionnement arrêté ConsentKey=APPCRASH Sur ce genre de problème il semblerait qu'il y ait des drivers qui ne sont pas à jour. J'ai fait une mise à jour avec les outils de iobit, mais c'est le même résultat. Ce qu'il faudrait savoir c'est ce qui vient dans la liste à l'endroit du blocage. Peut-être que c'est: LoadedModule[63]=C:\Windows\System32\hhctrl.ocx la cause dans la liste: LoadedModule[61]=C:\WINDOWS\System32\ws2_32.DLL LoadedModule[62]=C:\WINDOWS\SYSTEM32\olepro32.dll LoadedModule[63]=C:\Windows\System32\ hhctrl.ocxFriendlyEventName=Fonctionnement arrêté ConsentKey=APPCRASH AppName=planetarium_comp.exe Ca ne dit pas si c'est le fichier en cours ou le suivant. Je vais chercher dans ce sens là. Merci Jean Claude de te soucier de mon problème. | |
|
| |
Jack Admin
Nombre de messages : 2394 Date d'inscription : 28/05/2007
| Sujet: Re: Planétarium virtuel. Mer 8 Aoû 2018 - 17:49 | |
| - Pedro a écrit:
- Je viens de réaliser le test suivant:
. Affichage de l'horizon sud. . Clic sur une étoile visible: j'obtiens bien les informations la concernant. . Menu Rechercher une étoile: je recherche la même étoile, d'après son numéro HD.
Un message me signale qu'elle est bien visible, et qu'une cible rouge la désignera. Et là, patatras. Après un certain délai, l'écran est rafraîchi, et aucune cible rouge n'apparaît. C'est corrigé. Voici la dernière version compilée avec le source d'hier à 18H08, source qui corrige le problème signalé par Minibug. Je retourne en stand-by car tous les problèmes rencontrés sur le compilateur sont corrigés. *** n'existe plus, voir la dernière version en bas de cette discussion *** _________________ username : panoramic@jack-panoramic password : panoramic123
Dernière édition par Jack le Sam 1 Sep 2018 - 9:21, édité 1 fois | |
|
| |
Pedro
Nombre de messages : 1594 Date d'inscription : 19/01/2014
| Sujet: Planétarium virtuel. Mer 8 Aoû 2018 - 18:35 | |
| Bonjour. Merci Jack pour cette nouvelle version compilée. Je m'attache maintenant à la tester en long et en large. Je viens de repérer un problème d'affichage du nom des étoiles, bien que l'option voit validée dans les préférences. Les noms des étoiles ne sont tout simplement pas affichés. Voici le code incriminé, à partir de la ligne 5496. Je rappelle que tout fonctionne correctement avec le même code lancé depuis l'interpréteur. - Code:
-
if boucle%=1 and flag_labels_etoiles%=1 if nom$<>"" 2d_fill_off:font_color 1,0,130,132 if mode_horizon%=1 then font_color 1,255,255,255 arg=5:if magnitude<2 then arg=15 print_locate x1%+arg,y1%:print left$(nom$,1)+lower$(right_pos$(nom$,2)) end_if end_if
Merci de la suite. J'ai modifié légèrement le code. Merci d'utiliser cette nouvelle version. https://e-nautia.com/share/76628-xgznzv7e | |
|
| |
Minibug
Nombre de messages : 4570 Age : 58 Localisation : Vienne (86) Date d'inscription : 09/02/2012
| Sujet: Re: Planétarium virtuel. Jeu 9 Aoû 2018 - 19:13 | |
| Bonsoir ! J'ai eu un soucis dans le menu DIVERS et MOUVEMENT MENSUEL DES ASTRES SUR L'HORIZON ! Dès l'ouverture en ouvrant l'option et en cliquant sur GO parfois la fenêtre disparaît et d'autres fois pas. Si on ouvre ensuite les options générales, il y a un plantage avec un fichier qui n'éxiste pas. Pareil en désactivant l'ensemble des étoiles et en retournant dans DIVERS et MOUVEMENT MENSUEL DES ASTRES SUR L'HORIZON ! je pense Pedro que tu devrais vérifier les chemins dans tout ton programme car il doit y avoir un problème. A moins que cela provienne de la compilation de Jack ! Bon courage... | |
|
| |
Jack Admin
Nombre de messages : 2394 Date d'inscription : 28/05/2007
| Sujet: Re: Planétarium virtuel. Jeu 9 Aoû 2018 - 19:19 | |
| - Pedro a écrit:
- Je viens de repérer un problème d'affichage du nom des étoiles, bien que l'option voit validée dans les préférences.
Les noms des étoiles ne sont tout simplement pas affichés. C'est corrigé. Dans le code donné par Pedro, nom$ était vide. En fait, le problème était (une nouvelle fois) dans la ligne - Code:
-
res%=dll_call3("SearchStringList",object_internal(numero_liste%),adr(element$),adr(temporaire$)) de la sub chercher. En effet, je me suis rendu compte grace à la documentation de KGF.dll, que la fonction SearchStringList MODIFIE la dernière variable passée en paramètre: - Citation :
- res% = dll_call3("SearchStringList",N%,adr(crit$),adr(rec$))
rec$ : chaîne de caractères recevant l'élément retourné Or nom$ est issu de cette variable temporaire$ modifiée par KGF. Le téléchargement se fait comme d'habitude: *** n'existe plus, voir la dernière version en bas de cette discussion *** _________________ username : panoramic@jack-panoramic password : panoramic123
Dernière édition par Jack le Sam 1 Sep 2018 - 9:21, édité 1 fois | |
|
| |
Jack Admin
Nombre de messages : 2394 Date d'inscription : 28/05/2007
| Sujet: Re: Planétarium virtuel. Jeu 9 Aoû 2018 - 19:27 | |
| - Minibug a écrit:
- je pense Pedro que tu devrais vérifier les chemins dans tout ton programme car il doit y avoir un problème.
A moins que cela provienne de la compilation de Jack ! Pour trouver d'où cela provient, c'est extrêmement simple car le source utilisé par le compilateur est exactement le même que celui utilisé par l'interpréteur. - Problème observé avec le compilateur, mais pas avec l'interpréteur => le problème est dans le compilateur => c'est mon problème. - Problème observé avec l'interpréteur => c'est un problème pour Pedro. _________________ username : panoramic@jack-panoramic password : panoramic123 | |
|
| |
Minibug
Nombre de messages : 4570 Age : 58 Localisation : Vienne (86) Date d'inscription : 09/02/2012
| Sujet: Re: Planétarium virtuel. Jeu 9 Aoû 2018 - 19:37 | |
| Bonsoir Jack ! Merci pour la correction. J'avoue ne pas passer beaucoup de temps dans ces tests. lorsque je détecte quelque chose je le signale, c'est tout ! Après c'est plutôt à Pedro de rechercher la raison... EDIT : J'ai toujours le même problème ! Je désactive d'abord les étoiles puis je fais comme indiqué plus haut et boom !
Dernière édition par Minibug le Jeu 9 Aoû 2018 - 20:50, édité 2 fois | |
|
| |
Jean Claude
Nombre de messages : 5950 Age : 70 Localisation : 83 Var Date d'inscription : 07/05/2009
| Sujet: Re: Planétarium virtuel. Jeu 9 Aoû 2018 - 20:28 | |
| - Minibug a écrit:
- J'avoue ne pas passer beaucoup de temps dans ces tests. lorsque je détecte quelque chose je le signale, c'est tout !
Après c'est plutôt à Pedro de rechercher la raison... Je ne suis pas en reste sur la quantité de tests que j'ai fait et j'ai eu un doute sur l'implication de Pedro. Mais en réalité, Minibug, l'affaire n'est pas simple car il faut corriger 2 fichier.bas, un pour l’interpréteur et l'autre pour le compilateur. Pedro, ne possédant pas la possibilité de programmer directement sur le compilateur (et pour cause il est en élaboration) c'est pour lui difficile de corriger son code d'origine. Néanmoins, il essaie. En tous cas, on voit bien, au fil de la discussion que ça collabore à fond. Pour ma part, j'avoue m'être un peu fatigué de tester. Mon raisonnement, actuel, est de laisser Pedro et Jack travailler et d'y revenir un peu plus tard !. A+ PS : @Minibug, si tu pouvais poster des captures d'écran limitée à 700Px en largeur, ça rendrait service au personne qui ont des petits écrans. | |
|
| |
Jack Admin
Nombre de messages : 2394 Date d'inscription : 28/05/2007
| Sujet: Re: Planétarium virtuel. Jeu 9 Aoû 2018 - 21:32 | |
| - Jean Claude a écrit:
- Mais en réalité, Minibug, l'affaire n'est pas simple car il faut corriger 2 fichier.bas, un pour l’interpréteur et l'autre pour le compilateur.
Pas du tout. Il n'y a qu'un seul source, celui donné hier à 16h35 par Pedro: https://e-nautia.com/share/76628-xgznzv7e - Jean Claude a écrit:
- Pedro, ne possédant pas la possibilité de programmer directement sur le compilateur (et pour cause il est en élaboration) c'est pour lui difficile de corriger son code d'origine.
Pedro teste l'exécutable créé par le compilateur. S'il y a une différence par rapport au même source interprété, c'est un problème de compilateur. Sinon, il corrige son source, que je compilerai à nouveau, et ainsi de suite... _________________ username : panoramic@jack-panoramic password : panoramic123 | |
|
| |
Minibug
Nombre de messages : 4570 Age : 58 Localisation : Vienne (86) Date d'inscription : 09/02/2012
| Sujet: Re: Planétarium virtuel. Jeu 9 Aoû 2018 - 21:56 | |
| | |
|
| |
Pedro
Nombre de messages : 1594 Date d'inscription : 19/01/2014
| Sujet: Planétarium virtuel. Ven 10 Aoû 2018 - 7:22 | |
| Bonjour. Merci Jack pour cette nouvelle version compilée. Je supprime mes commentaires, car je pense que tout le monde a compris. Et je continue mes tests, au cas où d'autres bugs apparaîtraient. Nouvelle version en ligne à utiliser:- Au menu: affichage plus rapide des objets Messier. https://e-nautia.com/share/76773-trta5iym
Dernière édition par Pedro Alvarez le Ven 10 Aoû 2018 - 16:52, édité 1 fois | |
|
| |
Jean Claude
Nombre de messages : 5950 Age : 70 Localisation : 83 Var Date d'inscription : 07/05/2009
| Sujet: Re: Planétarium virtuel. Ven 10 Aoû 2018 - 8:42 | |
| Bonjour à tous, Merci Jack pour ces précisions, je n'avais pas compris qu'il n'y avait qu'un seul code. J'ai télécharger le code planetarium_comp.bas et je l'ai lancé avec Panoramic_Editor. A mon grand étonnement, ça n'a pas marché. Le code ne trouve pas KGF.DLL. Je me suis dit qu'il fallait l'enregistrer pour être sur d'être calé sur le bon répertoire (Ciel), mais j'ai toujours le même résultat. J'ai fini par trouver la raison: (Oscaribout, si tu me lis, ça pourrait être la solution de ton problème) Il faut absolument que le dossier "Ciel" soit à la racine C:\ (C:\Ciel). Par commodité je l'avais placé sur mon bureau et à cet endroit ça ne marche pas, malgré que la Dll soit bien dans le dossier. J'ai trouvé, dans le code, la raison du problème: il faut déplacer la ligne 128 avant l'appel de la DLL à la ligne 84. - Code:
-
dim repertoire_courant$:repertoire_courant$=dir_current$ dll_on "kgf"
Maintenant, le code fonctionne quelque-soit l'emplacement du dossier "Ciel". @Minibug, merci d'avoir redimensionné tes captures d'écran. A+ | |
|
| |
Contenu sponsorisé
| Sujet: Re: Planétarium virtuel. | |
| |
|
| |
| Planétarium virtuel. | |
|