Das deutsche QBasic- und FreeBASIC-Forum

[Peaknut]

Hallo,

ich bräuchte im Rahmen eines Programms eine Möglichkeit eine mathematische Funktion eingeben zu können.

Bisher sieht meine Funktion so aus:

FUNCTION fkt (x AS Double) AS DOUBLE
Dim As Double e=Exp(1.0)
RETURN x^2 'Ein beispiel

Ich möchte die Funktion aber nicht immer im Editor umändern sondern dass der Nutzer sie in der Konsole eingeben kann.
Hat jemand eventuell eine Idee?

[Sebastian]

Hallo und willkommen im Forum!

Das heißt, du möchtest die Verarbeitung des Terms nicht fest in deinem Programm codiert haben, sondern ein beliebiger Term soll zur Laufzeit des Programms eingegeben und ggf. aufgelöst/berechnet werden, richtig?

Dafür müsstest du dir entweder einen eigenen Formelparser schreiben, eine bereits von jemand anders entwickelte "eval"-Funktion benutzen, auf eine Bibliothek zurückgreifen oder versuchen, sowas über Windows-Scripting zu lösen.

Da FreeBASIC Maschinencode erzeugt und zur Laufzeit nicht interpretiert wird (wie z. B. VBScript, php, ...), ist es nicht möglich, dein eigenes Programm zur Laufzeit selbst in seinem Quelltext zu modifizieren.

Im Folgenden ein paar Ansätze:

1. Eigener Formelparser: Du zerlegst deine String-Eingabe zunächst in Tokens (-> Lexer) und dann erzeugst du einen Baum (-> Parser), der die Struktur/Verschachtelung deines Ausdrucks widerspiegelt. Den Baum könntest du dann z. B. zu einem LaTeX-Ausdruck weiterverarbeiten oder Stück für Stück ausrechnen. (Viel Arbeit und erfordert viel Knowhow in dem Bereich.) Siehe: Andere Frage im Forum zu einem ähnlichen Problem.
   
2. Fertige Eval-Funktion: Für ähnliche Herausforderungen haben schon andere Programmierer vor dir Programme entwickelt. Siehe zum Beispiel: Lutz Ifers EVAL. Einen solchen fertigen Formelauswerter könntest du um deine individuell benötigten Funktionen erweitern.
   
3. Externe Bibliothek: Es gibt verschiedene Bibliotheken für mathematische oder statistische Berechnungen. Diese könntest du in FreeBASIC einbinden. Nachteile können sein ein hoher Einarbeitungsaufwand, lizenzrechtliche Probleme oder der Umstand, dass du eine externe Lib mit deinem Programm mitliefern musst.
   
4. Windows-Scripting: Du könntest zur Laufzeit deines Programms zunächst ein Script / Script-Stückchen erzeugen (Windows-Scripting), das deinen Formelausdruck enthält und berechnen kann. Dieses lässt du dann von deinem Programm ausführen und wertest dessen Ergebnis aus. Siehe ytwinkys eval. Nachteil: Funktioniert nur unter Windows und setzt aktiviertes Scripting voraus. Dein Programm wäre also nicht ganz selbstständig.
   

Ich hoffe, die aufgeführten Ideen helfen dir ein Stückchen weiter.

Viele Grüße!
Sebastian
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!

[Peaknut]

Okay danke dir !
Ich hab ein weiteres Problem (ich weiß nicht ob ich ein neues Thema eröffnen soll oder nicht)
Ich poste mal meinen Code:

[St_W]

Die Werte stimmen schon. Nur wenn du mit 1000 multiplizierst (was du ja machst) erhältst du Millisekunden - keine Sekunden. Timer liefert ja schon einen Wert in Sekunden.

Beachte dass die "Berechnung" in diesem Fall so gut wie keine Zeit benötigt und nur dir Ausgabe mit PRINT viel Zeit benötigt. Beachte weiters, dass Timer nicht so genau messen kann und einzelne Millisekunden oft nicht mehr ganz exakt sind.
_________________
Aktuelle FreeBasic Builds, Projekte, Code-Snippets unter http://users.freebasic-portal.de/stw/
http://www.mv-lacken.at Musikverein Lacken (MV Lacken)

[RockTheSchock]