Das deutsche QBasic- und FreeBASIC-Forum

[AntonEngelmann]

Hallo!

Ich habe noch nie etwas in Assembler programmiert, bin aber dennoch neugierig und habe deswegen erst einmal mir den Assemblertext in der Funktion Revers aus dem FB-Archiv angesehen.

https://www.freebasic-portal.de/code-beispiele/string-funktionen/asm-text-revers-srever-txet-28.html

Zu meinem Erstaunen läuft das Beispielprogramm aber nicht.

Fehlermeldung:
REVERSviaASM.asm: Assembler messages:
REVERSviaASM.asm:37: Error: invalid use of operator "lt"

(Ich habe das Programm umbenannt in REVERSviaASM.bas)

Was muß korrigiert werden?

Die Funktion (à la MIRROR$() in Omikron.BASIC auf dem Atari) könnte ich gebrauchen, vor allem in einer besonders schnellen Version.

[grindstone]

Hallo AntonEngelmann,

das sieht mir auf den ersten Blick nach einem 32/64 bit-Problem aus. Versuche mal, beim DIMensionieren von lt INTEGER durch LONG zu ersetzen. Das könnte das Problem lösen.

Gruß
grindstone
_________________
For ein halbes Jahr wuste ich nich mahl wie man Proggramira schreibt. Jetzt bin ich einen!

[AntonEngelmann]

Gruß und Dank, grindstone, für die prompte Antwort.

Leider funktioniert das Programm auch mit LT als LONG oder ULONG nicht. Bevor ich damit zumForum kam, hatte ich sogar UBYTE probiert.

Am Freitagabend melde ich mich wieder und werde bis dahin das Programm einmal mit dem 32bit-, einmal mit dem 64bit-Compiler getestet haben. Den Prozessor meines 64bit-Rechners tausche ich allerdings nicht aus!

[grindstone]

Das ist keine Frage des Prozessors, sondern des Betriebssystems. Assembler mit 32-bit-Windows und 32-bit-FB funktioniert auf jeden Fall. Inwieweit die 64-bit-Systeme (Windows oder Linux) abwärtskompatibel sind, weiß ich nicht, ich lese nur häufig im internationalen Forum, daß es mit dem Assembler der 64-bit-FB - Version Probleme gibt.

Gruß
grindstone
_________________
For ein halbes Jahr wuste ich nich mahl wie man Proggramira schreibt. Jetzt bin ich einen!

[hhr]

Anscheinend ist lt bei neueren asm-Versionen ein Operator: less than, kleiner als
Im Beispiel kann man lt zum Beispiel durch l ersetzen.
Mit l als long funktioniert es auch mit FB64.

[grindstone]

Ich habe mal ein bisschen mit dem Code herumgespielt. Von der Geschwindigkeit her ist Assembler unschlagbar, aber auch mit FB-Bordmitteln lässt sich eine Spiegelungsfunktion programmieren, die dem kaum nachsteht:

[hhr]

Ich verwende FreeBASIC-1.10.1-winlibs-gcc-9.3.0 und musste die Änderungen machen, die ich weiter oben beschrieben habe.
Die Anzahl der Schleifendurchläufe habe ich mit 10 multipliziert ( 0 angehängt ) und habe folgende Ergebnisse in Sekunden:

[AntonEngelmann]

Guten Abend!

Grindstone, ich habe dein Programm „ReversGrindstone“ benannt und darin die Variable LT in LENtext umbenannt.


Dann mit dem 64bit-Compiler laufen lassen.

Die Umbenennung (Danke, hhr!) ersparte mir die Fehlermeldung von wegen LT sei Bezeichner für einen Operator.

Resultat war trotzdem erst einmal die folgende Fehlermeldung:
ReversGrindstone.asm:62: Error: incorrect register `ebx‘ used with `q‘ suffix

Dieselbe Fehlermeldung auch beim Test des aus der er FreeBASIC-Referenz (Stichwort: ASM) entnommenen Beispielprogramms „Funktion Mal“.

Als nächstes ein Versuch mit ReversGrindstone ohne die Funktion mit ASM, also nur mit Revers2 und Revers3: Revers3 mit SWAP ist schneller als Revers2: 0,60 : 0,75.


Dann habe ich beide Programme mit dem 32bit-Compiler laufen lassen.

Zuerst „Funktion Mal“: Es läuft und erledigt seine Multiplikationsaufgabe perfekt.

Sodann ReversGrindstone mit der Funktion mit ASM. Endlich macht es alles richtig.
Assembler ist wie erwartet am schnellsten: 0,59
Funktion Revers2 (ohne SWAP) kommt auf: 0,69
Funktion Revers2 (mit SWAP) kommt auf: 0,65 d.i. um 0,05 langsamer als mit dem 64bit-Compiler

Fazit: Mit dem 32bit-Compiler ungeachtet des 64bit-Prozessors funktionieren vom Assembler zumindest die paar Befehle, die in den beiden Beispielprogrammen enthalten sind, mit dem 64bit-Compiler gerät man an eine Fehlermeldung, die zumindest ich ASM-Laie noch nicht verstehe.

Eine Bemerkung noch am Rande:
Auch ich habe mit reinem BASIC-Werkzeug mir eine MIRROR$-Funktion geschrieben, dabei MID() benutzt. An sich ist mir die Benutzung der eckigen Klammern bei Strings zwar geläufig, der Gedanke an deren Anwendung ist mir in diesem Fall aber nicht gekommen.

Erst einmal vielen Dank, grindstone. Wenn es neue Erkenntnisse oder Fortschritte bei ASM mit dem 64bit-Compiler gibt, würde ich gern davon erfahren.

Kann mein Resultat daran liegen, daß ich alles in meinem freeBASIC-Ordner unverändert ließ und nur eine Kopie des 64bit-Compilers statt einer Kopie des 32bit-Compilers als fbc.exe benannt habe? Hätte ich auch an den Libraries etwas verändern müssen? (Ordner lib: Größe 174 MB, 1304 Dateien)

Vielleicht helfen die Erörterungen zu diesem Thema manchem anderen FreeBASIC-Anwender weiter!

[hhr]

Wenn es mit FB64 laufen soll, musst Du LENtext als Long deklarieren.
Dann funktioniert es mit FB64 genauso wie mit FB32.

[AntonEngelmann]

Danke, hhr, für die Erinnerung!

Das habe ich jetzt gemacht und auch in Function Mal die Übergabevariablen auf Long abgeändert. Auf einmal funktioniert alles.

Vielen Dank für deine und grindstones freundliche Beschäftigung mit meinem Thema.

Gruß

[hhr]

Dazu muss ich noch was sagen.
Integer verwendet man nur für Adressen.
FB32 verwendet 32Bit Adressen, FB64 verwendet 64Bit Adressen.
Wenn man Integer für Adressen verwendet, wird das für FB32 und FB64 automatisch umgestellt. Für alle anderen Anwendungen soll man Datentypen mit fester Länge verwenden, so erspart man sich Konflikte.