AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Delphi Floyd-Steinberg Dithering
Thema durchsuchen
Ansicht
Themen-Optionen

Floyd-Steinberg Dithering

Ein Thema von shmia · begonnen am 21. Aug 2008 · letzter Beitrag vom 30. Nov 2023
 
Amateurprofi

Registriert seit: 17. Nov 2005
Ort: Hamburg
1.043 Beiträge
 
Delphi XE2 Professional
 
#22

AW: Floyd-Steinberg Dithering

  Alt 8. Nov 2023, 01:32
In den Kommentaren verweist Peter Cordes auf einen Trick, der ermöglicht, direkt in eax zu laden und benötigt nicht das wiederholte nullen.

Ich war auch mal so frei, die non-volatilen Register korrekt zu sichern:

Code:
procedure TestCMov_Better;
asm
        push  esi
        push  edi

        xor   edx, edx
        mov   esi, 255          // High Limit
        mov   ecx, Count

@1:    mov   edi, 0

@2:    mov   eax, dword[Data + edi * 4]
        cmp   eax, esi   // compare v (eax) with high value
        cmovae eax, edx   // if negative (unsigned check) or 255 we fill 0 (edx)
        cmovge eax, esi   // if greater (signed check) or 255 we fill 255 (esi)
        mov   Byte[CData + edi], al
        inc   edi
        cmp   edi, DATA_LEN
        jl    @2
        dec   ecx
        jne   @1

        pop edi
        pop esi
end;
Wenn nicht genügend Register zur Verfügung sind, können wir auch das hier (nur die Stelle mit dem Vergleich) machen - ist ein kleines bisschen langsamer aber immernoch schneller als alles andere:

Code:
        xor   edx, edx
        cmp   eax, 255    // compare v (eax) with high value
        cmovae eax, edx   // if negative or 255 we fill 0 (edx)
        mov   edx, 255
        cmovge eax, edx   // if greater or 255 we fill 255 (edx)

Danke, Stevie
Zwei Fragen hätte ich:
1) Was ist "Data"?
Bei mir kommt der Wert, der ggfs. auf 0 oder 255 zu ändern ist, aus EDX (ist -255..255) und der (ggfs. geänderte Wert wird in [esp] gespeichert.

2) zu "Ich war auch mal so frei, die non-volatilen Register korrekt zu sichern:"
Ich mache
Delphi-Quellcode:
push edi
push esi
...
...
pop esi
pop edi
Du machst
Delphi-Quellcode:
push esi
push edi
...
...
pop edi
pop esi
Was ist daran korrekter?
Gruß, Klaus
Die Titanic wurde von Profis gebaut,
die Arche Noah von einem Amateur.
... Und dieser Beitrag vom Amateurprofi....
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:44 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz