Programme FUNC à transformer en PGM

[Ameisen]

Voila
Il existe sur internet un programme tres utile pour trouver comment choisir u et v pour effectuer une intégration par partie

Mon soucis c'est que je le trouve vraiment pas agréable d'utilisation et j'aimerais en faire un PGM a part entiere qui détail un peu plus le résultat donc en PRGM ENDPRGM et pas FUNC ENDFUNC
le programme se trouve ICI
Je ne sais pas trop comment faire pour convertir ce FUNC en PGM, deja je n'arrive pas à récupérer les résultat issu de la fonction en effet la matrice "tab" qui contient les résultat est effacé a la fin de l'exécution du programme à cause de la déclaration de la variable locale, comment peut on faire pour que cette variable locale "tab" demeure présente à la fin et qu'ainsi je puisse la réutiliser pour un autre programme ? (meme si c'est pas vraiment ce que je voudrais faire en finalité ca m'aiderait deja pas mal)

Ma finalité serait de déclarer 2 fonctions avec dialog ou input
puis de les injecter dans le programme actuelle
puis de récupérer les valeurs u v et u' v'
Enfin de bien détailler les résultats car c'est un peu brute de décoffrage le programme actuel

[Loulou 54]

Pour récupérer la matrice, il suffit juste d'effacer "tab" de Local dans la fonction.

Si tu veux en faire un programme où la saisie se fait dans le programme par des boîtes de dialogue (et non par arguments dans les parenthèses) il faut :

* que tu sélectionne tout le code entre Func et EndFunc en faisant [MAJ](appuyé)et [flèches] (comme sur windows)
* que tu copies la sélection : [diamand]+[maj](copy)
* Tu crées un nouveau programme et tu insère tout ça entre Prgm et EndPrgm [diamand]+[ESC]
* Tu crées tes boîtes dialogue au début du programme et il va falloir que tu exprimes tes chaînes de caractères en les stockant dans les variables qui étaient initialement celles des arguments de la fonction d'origine..

Bref, si tu te débrouille un peu, tu y arriveras ! N'hésite pas à redemander si ce n'est pas clair. A+

[Bisam]

Plus simplement, tu tapes :

Code: Select all

Prgm
...
EndPrgm


en lieu et place de

Code: Select all

Func
...
EndFunc


[Ameisen]

Ca ne fonctionne pas malheureusement le simple remplacement

[critor]

Ca ne fonctionne pas malheureusement le simple remplacement

Dans ce cas là, crée un nouveau programme, et fais un copier coller du code contenu entre Func et EndFunc.

Ça, ça marchera!

[Bisam]

Ca ne fonctionne pas malheureusement le simple remplacement

Tu n'as pas dû t'y prendre comme il faut... car ça marche très bien chez moi.

[Loulou 54]

Plus simplement, tu tapes :

Code: Select all

Prgm
...
EndPrgm


en lieu et place de

Code: Select all

Func
...
EndFunc


Futé Bisam !

Alors, ça marche ?