Rechenprogramm

[Amateurprofi]

Neue Version vom 06.10.2020 (Version 3.4.1.1)
Info hierzu weiter unten in #91

Neue Version vom 26.09.2020 (Version 3.3.3.1)
Info hierzu weiter unten in #74

Neue Version vom 16.04.2018 (Version 3.3.2.1)
Info hierzu weiter unten in #73

Neue Version vom 12.04.2018 (Version 3.3.1.1)
Was neu ist siehe #60 weiter unten.

Neue Version vom 12.04.2018 (Version 3.2.1.1)
Was neu ist siehe letzter Beitrag weiter unten.

Neue Version vom 13.07.2010 (Version 2.3.1.1)
Was neu ist siehe letzter Beitrag weiter unten.

Neue Version vom 27.02.2010
Hochgeladen wegen eines Hinweises auf einen Bug (Siehe # 50)
Was alles neu ist : Siehe #51
Achtung, ich hab das jetzt nur wegen des Bugs hochgeladen.
Einige Teile des Programms befinden sich in einer Änderungsphase, und es ist mit Fehlern zu rechnen.
Die Teile, die bisher funktionierten sollten davon aber nicht betroffen sein.




Neue Version vom 28.07.2009

Vielleicht kann der oder die eine oder andere etwas mit anhängendem Rechenprogramm anfangen.
Das Hauptfenster enthält zwei Textfenster. In das rechte können numerische Ausdrücke eingegeben werden, im anderen werden die Ergebnisse ausgegeben.
Die Auswertung der Ausdrücke erfolgt immer dann, wenn im rechten Textfenster etwas geändert wird.
Das Programm kennt die gängigen Rechenoperatoren und Funktionen und etwas mehr.
Zum Beispiel werden Ein-/Ausgabe in unterschiedlichen Zahlensystemen, das Rechnen mit Datums- und Zeitangaben und mit Brüchen unterstützt.
Wer das Programm ausprobieren möchte, sollte nach dem ersten Start des Programmes mit Menu > Hilfe > Einführung auswählen. Ein (zugegebenermaßen simpel gestricktes) Tutorial gibt einen Einblick. Ausführlichere Infos können dem Helpfile, der mit Menu > Hilfe > Hilfe aufgerufen wird, entnommen werden.


Zahlen können ein- und ausgegeben werden als
Dezimalzahl, z.B. 2009, 3.14, 1.5e3
Hexzahl, z.B. $7D9 = Dezimal 2009
Binärzahl, z.B. "11111011001 = Dezimal 2009
Zahl mit anderer Basis, z.B. #8#3731 = Dezimal 2009
Römische Zahl, z.B. 'MMIX = Dezimal 2009
Datum, z.B. 10.5.2009 = 10. Mai 2009
Uhrzeit, z.B. 11:55:00 = Fünf vor 12
Datum + Uhrzeit, z.B. 10.5.2009 11:55:00
Kalenderwoche, z.B. wk19/2009
Bruch, z.B. 3//4 oder _3/4 = Dezimal 0.75
Winkel, z.B. 45°10'
Positionsangabe, z.B. 53°34'02.12"N, 10°01'20.24"E = Eine Position in Hamburg
Speicherauszug, z.B. ?00 00 00 00 00 00 20 FB 09 40 = Dezimal 2009

Als Operatoren sind z.Z. implementiert

Dyadische Operatoren, die zwischen 2 Werten stehen
Grundrechenarten
+, -, *, /
Erweiterte Grundrechenarten
\, Div Dividieren mit Integer-Resultat
|, Mod Modulo mit reellem Resultat
\\, IDiv Integer Division mit Integer-Resultat
||, IMod Modulo aus Integer Division
\*, DivMul Integer Division mit anschließender Multiplikation
^ Potenzieren
Logische- / Boolesche Operatoren
And, Or, Xor, Nand, Nor, Xnor
Vergleichs Operatoren mit Vergleichtoleranz
<, <=, =, <>, >=, >
Vergleichs Operatoren ohne Vergleichtoleranz
<< Kleiner
<== Kleiner oder identisch
== Identisch
<>> Nicht identisch
>== Größer oder identisch
>> Größer
Bitverschiebungs Operatoren
Shl, Shr, Rol, Ror
Bit-orientierte Operatoren
Bts Bit = 1 setzen
Btr Bit = 0 setzen
Btc Bit "umdrehen"
Btt Bit testen

Monadische Operatoren, die vor einem Wert stehen
- Vorzeichen bzw. Negation
+ Nur der Vollständigkeit halber
Not Boolesche / Bitweise Negation

Monadische Operatoren, die hinter einem Wert stehen
² Quadrieren
³ Dritte Potenz
° Umrechnung von Grad in Rad (Bogenmaß)
°° Umrechnung von Rad (Bogenmaß) in Grad
! Fakultät
€ Umrechnung von Euro in DM
€€ Umrechnung von DM in Euro
' Extrahieren des Exponenten

Als Funktionen sind zur Zeit implementiert
Standardfunktionen
Abs(v) Absolutwert
Sqr(v) Quadrat
Sqrt(v) Quadratwurzel
Winkelfunktionen
Sin(v) Sinus
Cos(v) Kosinus
Tan(v) Tangens
Cot(v) Kotangens
Sec(v) Sekans
Csc(v) Kosekans
SinH(v) Sinus Hyperbolicus
CosH(v) Kosinus Hyperbolicus
TanH(v) Tangens Hyperbolicus
CotH(v) Kotangens Hyperbolicus
SecH(v) Sekans Hyperbolicus
CscH(v) Kosekans Hyperbolicus
ArcSin(v) ArcusSinus
ArcCos(v) ArcusKosinus
ArcTan(v) ArcusTangens
ArcCot(v) ArcusCotangens
ArcSec(v) ArcusSekans
ArcCsc(v) ArcusCosekans
ArcSinH(v) AreaSinus Hyperbolicus
ArcCosH(v) AreaKosinus Hyperbolicus
ArcTanH(v) AreaTangens Hyperbolicus
ArcCotH(v) AreaCotangens Hyperbolicus
ArcSecH(v) AreaSekans Hyperbolicus
ArcCscH(v) AreaCosekans Hyperbolicus
RadToDeg(v) Bogenmaß in Grad umrechen
RadToGon(v) Bogenmaß in Gon umrechen
RadToCycle(v) Bogenmaß in Cycles umrechen
DegToRad(v) Grad in Bogenmaß umrechnen
DegToGon(v) Grad in Gon umrechnen
DegToCycle(v) Grad in Cycles umrechnen
GonToRad(v) Gon in Bogenmaß umrechnen
GonToDeg(v) Gon in Grad umrechnen
GonToCycle(v) Gon in Cycles umrechnen
CycleToRad(v) Cycles in Bogenmaß umrechnen
CycleToDeg(v) Cycles in Grad umrechnen
CycleToGon(v) Cycles in Gon umrechnen
Logarithmische und exponentielle Funktionen
Ln(v) Natürlicher Logarithmus
Lg(v) Dekadischer Logarithmus
Log10(v) Dekadischer Logarithmus
Log2(v) Dualer Logarithmus
LogN(base,v) Logarithmus zu beliebiger Basis
ALn(v) Umkehrung des natürlichen Logarithmus
ALg(v) Umkehrung des dekadischen Logarithmus
ALog10(v) Umkehrung des dekadischen Logarithmus
ALog2(v) Umkehrung des dualen Logarithmus
ALogN(base,v) Umkehrung des Logarithmus zu beliebiger Basis
Root(x, y) Yte Wurzel aus x
Power(x, y) Yte Potenz von x
Exp(v) Vte Potenz von e
ExpMod(b, e, m) Modulo einer Potenz (=(b ^ e) Mod m)
Exponent(v) Exponent eines reellen Wertes
Rundungsfunktionen
Int(v) Integerwert
Trunc(v) Nachkommateil entfernen
Frac(v) Nackkommateil
Round(v) Runden
Floor(v) Abrunden
Ceil(v) Aufrunden
Bitorientierte Funktionen
BTL(v, len) Unterstes gesetztes Bit
BTH(v, len) Höchstes gesetztes Bit
BTN(v, len) Anzahl gesetzter Bits
BTP(v, len) BitParität
Kalender-, Datums- und Zeitfunktionen
HDay(name,year) Datum eines Feiertages in einem Jahr
Easter(year) Datum des Ostersonntags
Advent(year) Datum des Ersten Advent
Time(hh, mm, ss) Zeit
Date(y, m, d) Datum
DT(y, m, d, hh, mm, ss) Datum und Zeit
Today Aktuelles Datum
Now Aktuelles Datum mit aktueller Zeit
Secs(v) Umrechnung in Sekunden
Mins(v) Umrechnung in Minuten
Hours(v) Umrechnung in Stunden
Days(v) Umrechnung in Tage
Weeks(v) Umrechnung in Wochen
Months(v) Umrechnung in Monate
Years(v) Umrechnung in Jahre
Julian(v) Nummer des Tages im Jahr
JD(v) Julianisches Datum
JDtoGreg(v) Gregorianisches Datum
Entfernungsberechnung
GeoDist(p1,p2,r,f) Entfernung zwischen 2 Orten
GeoPath(Liste) Summe von Entfernungen zwischen Orten
GeoPos(w1, w2) Positionsangabe aus 2 Winkeln erstellen
Latitude(p) Breitengrad aus Positionsangabe extrahieren
Longitude(p) Längengrad aus Positionsangabe extrahieren
Sonstiges
Min(Liste) Minimum
Max(Liste) Maximum
Sum(Liste) Summe
Avg(Liste) Mittelwert
Mul(Liste) Produkt
QSum(Liste) Summe von Quadraten
LCD(Liste) Größter gemeinsamer Teiler
SCM(Liste) Kleinstes gemeinsames Vielfaches
Frc(v) Dezimalzahl in Bruch wandeln
Combis(N, K, r) Anzahl Kombinationen
Varis(N, K, r) Anzahl Variationen
NK(N, K) N über K (Anzahl Kombinationen)
HGV(N, K, r, z, p) Hypergeometrische Verteilung
HGVX(N, K, g, r, p) Hypergeometrische Verteilung
Encode((Liste),Liste) Verschlüsseln
Cvt( v, from, to ) Maßeinheiten umrechnen
Convert( v, from, to ) Maßeinheiten umrechnen
Bmi( v1, v2) Body-Mass-Index

[Amateurprofi]

Zitat von Michael II:

Ich schlage dieses Verfahren ja nicht für "kleine" Werte von x (also nicht für x <= 1754) vor. Mir ist vollkommen klar, dass der Aufwand via log10 weit grösser ist. Wenn ich dich aber richtig verstehe, kann dein Programm Näherungswerte "nur" bis 1754! berechnen, dann ist aus.

In dem Programm werden im "Normal"-Modus zur Speicherung der Daten Extended-Variablen verwendet, und da gibt es nun einmal die Obergrenze 1.1E+4932

Anders ist es im "BigDecimal"-Modus.
Da kannst du die Fakultät bis 10000 berechnen. Exact übrigens und nicht nur näherungsweise.
Die 10000 als Obergrenze für Fakultät ist willkürlich festgelegt.

Allerdings können diese im Ausgabefeld nicht in voller Länge angezeigt werden.
Das hatte ich hier https://www.delphipraxis.net/195060-...extlaenge.html einmal angesprochen.

Aber mache einmal folgendes:
Stelle auf "BigDecimal"-Modus (2tes Panel in der Statusbar)
Stelle "Auch Integerzahlen in technischer Darstellung" auf "Nein" (9tes Panel in der Statusbar)
Gib 10000! ein.
Als Rechenergebnis erhältst du "Zahl zu lang" in grüner Schrift.
Rechtsklicke den Text.
In einem PopUp-Menu wird angeboten, die Zahl ins Clipboard zu stellen oder in einer Datei zu speichern.
Wenn du in Datei speichern wählst, wird in der Datei "Log.txt" im Programmverzeichnis gespeichert.
Oder rechtsklicke den Text mit gedrückter Ctrl-Taste.
Dann wird der "Dialog für lange Zahlen" geöffnet, in dem du die Zahl (in Worten) ansehen kannst.
Im Anhang findest du 2 Dateien, die Zahl in Ziffern, die Zahl in Worten.

[jaenicke]

Zitat von Michael II:

weisst du wie man deine hlp in Win10 öffnet?

Die .hlp Hilfedateien wurden vor über 20 Jahren mit Windows 98 abgekündigt und durch .chm ersetzt. Mit Vista wurde die Unterstützung dann ganz entfernt und konnte bis 8.1 noch per Download ergänzt werden.
Unter Windows 10 geht es schließlich nur noch umständlich:
https://entwickler-ecke.de/viewtopic...=697956#697956

[KodeZwerg]

Zitat von jaenicke:

Zitat von Michael II:

weisst du wie man deine hlp in Win10 öffnet?

Die .hlp Hilfedateien wurden vor über 20 Jahren mit Windows 98 abgekündigt und durch .chm ersetzt. Mit Vista wurde die Unterstützung dann ganz entfernt und konnte bis 8.1 noch per Download ergänzt werden.
Unter Windows 10 geht es schließlich nur noch umständlich:
https://entwickler-ecke.de/viewtopic...=697956#697956

Da ich keine Windows XP/Vista/7 Dateien besitze...
habe ich gerade eben das hier entdeckt: winhlp32_for_windows_10
Das ist ein Installer der WinHlp32 nachrüstet, funktioniert auch wenn man einen Doppelklick auf eine .hlp Datei macht.

Blöd ist aber es funktioniert nicht innerhalb der Applikation, da wird immer noch diese Microsoft Seite geladen.
Hat dazu jemand einen Tipp?

[jaenicke]

Zitat von KodeZwerg:

Da ich keine Windows XP/Vista/7 Dateien besitze...
habe ich gerade eben das hier entdeckt: winhlp32_for_windows_10
Das ist ein Installer der WinHlp32 nachrüstet, funktioniert auch wenn man einen Doppelklick auf eine .hlp Datei macht.

Blöd ist aber es funktioniert nicht innerhalb der Applikation, da wird immer noch diese Microsoft Seite geladen.
Hat dazu jemand einen Tipp?

Na, jetzt hast du die Datei aus dem Zusatzinstaller von Windows 8.1 Update 1 ja, denn die steckt ja in dem Installer drin. (Das siehst du, wenn du den auspackst und dann das darin enthaltene .cab Archiv auspackst.)

Ich vermute einmal der Installer legt die Datei wegen des Rechteproblems irgendwo anders hin und ersetzt die Originaldatei nicht. Du kannst also diese winhlp32.exe nehmen und damit meiner Anleitung folgen. Das sollte reichen.

[EdAdvokat]

Hallo, beim Aufruf des Programms erhalte ich eine Fehlermeldung: Olefehler 80045039. Erst nach Betätigung der ok-Taste startet das Programm.
Woran liegt das?

[Amateurprofi]

Zitat von EdAdvokat:

Hallo, beim Aufruf des Programms erhalte ich eine Fehlermeldung: Olefehler 80045039. Erst nach Betätigung der ok-Taste startet das Programm.
Woran liegt das?

Weiß ich nicht wirklich.
Hab mal gegoogelt und eine Info gesehen, dass der Fehler in Verbindung mit der Sprachausgabe auftritt.
Tatsächlich verwendet das Programm eine Sprachausgabe zum Vorlesen langer Zahlen.

Ist bei der Fehlermeldung nur der von dir angegebene Text "Olefehler 80045039" oder ist da noch mehr, z.B. die Adresse an der der Fehler auftritt?.

Da das bei mir nicht auftritt, kann ich nicht prüfen woran es liegt.
Eine Möglichkeit wäre, den ganzen Teil, der mit Sprachausgabe zu deaktivieren, wenn beim Erstellen einer Stimme eine Exception kommt.
Das kann ich bei Gelegenheit machen.

[EdAdvokat]

Der Fehler tritt bei allen von Dir eingestellten Versionen auf. Es wird lediglich die angegebene Fehlermeldung ausgegeben ohne Hinweis auf eine mögliche Quelle.
Ich werde nun das Programm auf eienm anderen Rechner bzw. auch in der VM aufrufen und dann vergleichen. Melde mich danach nochmals kurz.

[EdAdvokat]

Also wie es aussieht tritt der Fehler nur bei meinem Hauptrechner auf. In der VM und auch auf dem Laptop ist alles in Ordnung ohne Fehlermeldung.
Was die Ursache dafür sein kann, dass mein Hauptrechner den Fehler auswirft, habe ich noch nicht ergründet.

[Amateurprofi]

Zitat von EdAdvokat:

Also wie es aussieht tritt der Fehler nur bei meinem Hauptrechner auf. In der VM und auch auf dem Laptop ist alles in Ordnung ohne Fehlermeldung.
Was die Ursache dafür sein kann, dass mein Hauptrechner den Fehler auswirft, habe ich noch nicht ergründet.

Danke für die Info.
Ich werde trotzdem bei Gelegenheit eine Änderung vornehmen, so dass die Funktion Zahlen vorzulesen deaktiviert wird, wenn dieser Fehler auftritt.

[Michael II]

[QUOTE=jaenicke;1474422]

Zitat von Michael II:

Unter Windows 10 geht es schließlich nur noch umständlich:
https://entwickler-ecke.de/viewtopic...=697956#697956

Besten Dank!