Пытаюсь понять код user32.dll и gdi32.dll

[Goodwin98]

   asm
    push   0
    push   -1
    push   00CC0020h	//[ebp+28h] = SRCCOPY
    push   YSrc		//[ebp+24h] = YSrc: Integer
    push   XSrc		//[ebp+20h] = XSrc: Integer
    push   BufHandle	//[ebp+1Ch] = BufHandle: HDC
    push   H		//[ebp+18h] = H: Integer
    push   W		//[ebp+14h] = W: Integer
    push   dispY	//[ebp+10h] = dispY: Integer
    push   dispX	//[ebp+0Ch] = dispX: Integer
    push   DCs		//[ebp+08h] = DCs: HDC
    call @func
; <- в этом месте нужно поместить jmp или какой-то выход, иначе func выполнится еще раз.
  @func:
    mov   eax,0000100dh
    mov   edx,7FFE0300h
    call  [edx]
  end;

[Beermonza]

Можно прыгнуть в конец через jmp, а там нужно прописать pop для регистров eax и edx?

[Goodwin98]

Вы можете оформить func как отдельную процедуру или просто разместить ее в другом месте.

[Beermonza]

Толку никакого, этот код только в одном месте, используется только там и нигде более, посему это будет лишнее.

[Goodwin98]

Я описал, что именно не так, а что вам исправить, решайте, конечно, сами

[Beermonza]

Сообщение от Goodwin98

Не очень понял

Ну, знаете, ...если есть указатель на область памяти, то с ней можно работать. Например, у меня есть указатели на массивы PChar, я беру указатели и с помощью MMX регистров быстренько перекидываю нужные участки, по 8 байт за такт. Таким же образом я могу в объект типа TBitmap закинуть графические данные. Теперь проблема с таким же перекидыванием в форму. У нее указателя на участок графических данных просто нет (или я его не нашел), а есть только контекст, ...приходится использовать BitBlt, однократно, при выводе готового кадра в форму.

Собственно, в этой теме я, с вашей помощью, пытался упростить BitBlt. Вроде вышло, но работает не всегда. В таймере пока отказывается, ...сейчас только это обнаружил (ошибка по адресу FE011870h).

[Goodwin98]

Теперь понял, но такой указатель врядли можно получить, наверное, только при работе с Direct Draw...

А насчет ошибки трудно сказать, т.к. в моем тестовом проекте код работает. Попробуйте вставить такой код перед вызовом func. ( я просто незнаю что эта за переменная)

mov eax, fs:[18h]
mov [eax+6d0h],edi ; в edi ноль

[Ulex]

Но быстрей же ведь не стало?

[Beermonza]

Вот такая получилась процедура для Delphi, она четко работает:

procedure DrawScreen(DCs: HDC; DispX, DispY, W, H: Integer; BufHDC: HDC);
begin

  asm
    push	0
    push	-1
    push	00CC0020h
    push	00000000h
    push	00000000h
    push	BufHDC
    push	H
    push	W
    push	DispY
    push	DispX
    push	DCs
    call  @func
    jmp @end

  @func:
    mov   eax,0000100dh
    mov   edx,7FFE0300h
    call dword ptr [edx]
    ret 2ch
  @end:

  end;
end;

...не понял только чем отличается call dword ptr [edx] от просто call [edx].

Теперь результаты по загрузке CPU:
BitBlt - 19-25%
SetDIBitsToDevice - 17-25%
DrawScreen - 5-16%

Вуаля!

[Ulex]

А как таймер победили?
У меня моя погремушка только один раз отрисовывает и всё.

Вообще странно такое повышение производительности.
Ну мы убрали 20-30 команд (вполне возможно в ущерб стабильности, не зря же там всё-таки перед вызовом какие-то cmp идут).
Это ничтожно по сравнению с копированием массива (примерно 1024*768).

И ещё. Так как это системный вызов, то он недокументирован (это такая типа политика MS). Т.е. не факт, что то что работает на одной системе, будет работать на другой (или даже на той же + SP_x).