🚀 go-pugleaf

Czesc

Uzytkownik "mikezum" <noname@poczta.onet.pl> napisal w wiadomosci
news:8j3qqhx2oh2t.16ahj7wfz15t2$.dlg@40tude.net...
> chcialbym przekonwertowac liczbe z postaci intelowskiej
> do zwyklego stringa, czyli normalnie jest tak
> a:int64
> a:=1
> rzutuje na stringa - czyli jest tak
> "$01$00$00$00$00$00$00$00"
> a chcialbym zeby bylo tak
> "$00$00$00$00$00$00$00$01"
> jak to zrobic bardzo szybko ( bez kopiowania bajt po bajcie), bo
kopiowanie

Jesli chcesz, zeby pierwszy bajt stal sie ostatnim, a ostatni pierwszym to
bez kopiowania po bajcie sie nie obejdzie.

> pamieci ztcw odbywa sie dla pierwszego i drugiego operandu w te sama
strone

Tak, to prawda, jesli mówimy o operacji typu movs...
[...]
> procedure ValueToValueIntel(var BufferIn;var BufferOut;const
> BufferLen:integer);

Chyba lepiej (klarowniej) byloby tak:
procedure ValueToValueIntel(const BufferIn;var BufferOut;const
BufferLen:integer);

>     LEA EBX,pBufferIn
>     MOV EBX,[EBX]

Tu bym dal po prostu:
    mov    ebx, [pBufferIn]
albo jeszcze prosciej - odwolal bezposrednio do parametrów zamiast do
zmiennej tymczasowej:
    mov    ebx, [BufferIn]

>     LEA EDX,pBufferOut
>     MOV EDX,[EDX]

a tu:
    mov    edx, [BufferOut] (tez bez zmiennej tymcz.)
    add    edx, ecx (koniec bufora)
i dodalbym (*1):
    shr    ecx, 2

>     MOV EAX,[EBX]
>     MOV [EDX-3],EAX
>     inc EBX
>     inc EBX
>     inc EBX
>     inc EBX
>     DEC EDX
>     DEC EDX
>     DEC EDX
>     DEC EDX

a to bym zastapil przez:
    dec    edx
    mov    al, [ebx]
    inc    ebx
    mov    [edx], al

lub (zwróc uwage na zmiane kolejnosci bajtów przed zapisem):

    mov    eax, [ebx]
    lea    ebx, [ebx + 4]
    xchg    al, ah
    lea    edx, [edx - 4]
    rol    eax, 16
    xchg    al, ah
    mov    [edx], eax

[...]
>     DEC ECX
>     DEC ECX
>     DEC ECX
>     DEC ECX

a tu zostawil tylko jeden dec ecx (patrz *1)

     DEC ECX
     JNZ @@Loop
-- 
Pozdrawiam :-)
Bartek
PS. Kod pisany "z glowy", wiec nie dam glowy, ze bezbledny...