Bearbeiten von „Stückweise lineare Funktionen in Scripts“

Mit diesem sperrigen Begriff sind Funktions-Kurven gemeint, die vom Programmierer frei erstellt werden können. Definiert werden sie, indem (mindestens 2) X-Y-Paare (Punkte) definiert werden, die dann rechnerisch mit geraden Linien verbunden werden. An anderer Stelle treten solche Funktionen in LOTUS auch auf, z.B. als Volume-Kurven im Sound-Editor.
Ein typisches Beispiel hierfür sind Motorkennlinien. Diese folgen nicht einer einzelnen mathematischen Formel, sondern müssen entsprechenden Diagrammen der Datenblätter nachempfunden werden.



Die Funktionen werden nach folgendem Prinzip angelegt:

Im Initialisierungs-Teil eine neue "Funktionshülle" definieren
Im Initialisierungs-Teil der Funktion nacheinander Wertepaare hinzufügen
Funktion an beliebiger Stelle verwenden
Konkret werden diese Schritte wie folgt durchgeführt:



Zuerst muss eine globale Integer-Variable definiert werden, die zur Identifikation der Funktion dient:



Testfunction: integer;



Mit der Funktion LinFuncNew kann man nun im Initialisierungs-Teil eine neue Funktion anlegen:



Testfunction := LinFuncNew;



Dieser Funktion kann man nun mit mehrmaligem Aufruf von LinFuncAddPair(id, x, y) die nötigen Wertepaare übergeben. Die Reihenfolge ist wichtig! X muss stets größer werden!



Code
LinFuncAddPair(Testfunction, 2, 6);
LinFuncAddPair(Testfunction, 6, 5);
LinFuncAddPair(Testfunction, 7, 8);
LinFuncAddPair(Testfunction, 8, 2);


Schließlich kann man an jeder beliebigen Stelle (natürlich erst nach der Definition) die Funktion mit LinFuncGetValue(id, x) verwenden:



Ergebnis := LinFuncGetValue(Testfunction, 4); // Ergebnis = 5.5