Сдвиг битов

[XOKS]

есть задание : Дано 16 битное слово ..поменять местами 1 и 3 биты..


Как поменять эти биты..
используя команды shl и shr///
или как..помогите с кодом..

[Vergo]

Может так?

	#make_COM#
        ORG  100H  
      
	jmp start
	  
num     DW 1111111111110010b
	
start:
	mov ax, [num]
		
	ror ax, 1
	ror ax, 1
	
	pushf
	pop cx
	
	ror ax, 1
	ror ax, 1
	
	pushf
	push cx
	popf
	
	rcl ax, 1
	rol ax, 1
	
	popf
	
	rcl ax, 1
	rol ax, 1

	mov [num], ax

; Exit to operating system:
        MOV AH, 4Ch
        INT 21h

[XOKS]

спасибо ..я проверю

[yuran666666]

.386
.model flat,stdcall
option casemap:none

.code
start:
mov ax,0000000000000001b
push 3
mov ecx,[esp]
@@:
shr eax,1
rcr dl,1 
loop  @b
rcr dl,5
pop ecx
@@:
rcr dl,1
rcl eax,1
loop @b
ret
end start

[Mikl___]

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

Дано 16 битное слово ..поменять местами 1 и 3 биты..

mov ax,X; в регистр АХ 16 битное слово
and al,1010b; проверяем 1-ый и 3-ий бит на равенство нулю
jz OK; оба бита нулевые -- ничего менять не нужно
cmp al,1010b; проверяем 1-ый и 3-ий бит на равенство единицам
jz OK; оба бита единичные -- ничего менять не нужно 
xor X,1010b; там где был единичный бит будет нулевой и наоборот
OK:

[yuran666666]

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

mov ax,X; в регистр АХ 16 битное слово
and al,1010b; проверяем 1-ый и 3-ий бит на равенство нулю
jz OK; оба бита нулевые -- ничего менять не нужно
cmp al,1010b; проверяем 1-ый и 3-ий бит на равенство единицам
jz OK; оба бита единичные -- ничего менять не нужно 
xor X,1010b; там где был единичный бит будет нулевой и наоборот
OK:

шыкарно.. !