【Delphi】ゲームつくるぞ(ﾟДﾟ)ｺﾞﾙｧ２【Delphi】

【Delphi】ゲームつくるぞ(ﾟДﾟ)ｺﾞﾙｧ２【Delphi】at GAMEDEV

【Delphi】ゲームつくるぞ(ﾟДﾟ)ｺﾞﾙｧ２【Delphi】 - 暇つぶし2ch■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト

804:名前は開発中のものです。
 08/07/08 00:50:53 v+eHlhNM
>>803 
向こうに書いてあるようにインラインアセンブラでBSWAP使った方が速くないかい？

805:名前は開発中のものです。
 08/07/11 23:45:56 RAHVdx3L
function Reverse_Bits(Bits: Longword):　　　　Longword; 
var 
i: longword; 
begin 
　　　　i:=Bits; 
　　　　asm 
　　　　  push EDI 
　　　　  push ESI 
　　　　  push ESP 
　　　　  push EBX 
 
　　　　  mov eax, i 
 
　　　　  {1行目} 
　　　　  mov edx, eax 
　　　　  and eax, $55555555 
　　　　  shl eax, 1 
 
　　　　  shr edx, 1 
　　　　  and edx, $55555555 
 
　　　　  or eax, edx 
 
 
　　　　  {2行目} 
　　　　  mov edx, eax 
　　　　  and eax, $33333333 
　　　　  shl eax, 2 
 
　　　　  shr edx, 2 
　　　　  and edx, $33333333

806:名前は開発中のものです。
 08/07/11 23:46:31 RAHVdx3L
　　　　  or eax, edx 
 
　　　　  {3行目} 
　　　　  mov edx, eax 
　　　　  and eax, $0F0F0F0F 
　　　　  shl eax, 4 
 
　　　　  shr edx, 4 
　　　　  and edx, $0F0F0F0F 
 
　　　　  or eax, edx 
 
　　　　  {4行目} 
　　　　  mov edx, eax 
　　　　  and eax, $00FF00FF 
　　　　  shl eax, 8 
 
　　　　  shr edx, 8 
　　　　  and edx, $00FF00FF 
 
　　　　  or eax, edx 
 
　　　　  {5行目} 
　　　　  mov edx, eax 
　　　　  shr eax, 16 
 
　　　　  shl edx, 16 
　　　　  or eax, edx 
 
　　　　  mov i, eax

次ページ