Binary to Gray conversion
Write a Program for Binary to Gray conversion in Assembly language . Algorithm for Binary-Gray conversion is given below and it can be easily implemented by this algorithm .
Algorithm for Binary to Gray conversion
Step I : Get the number whose gray code equivalent is to be found.
Step II : Add number with itself.
Step III : XOR this added result with the original number.
Step IV : Shift the XOR ed number by 1 bit position to the right to get the Gray equivalent.
Step V : Display the result.
Step VI : Stop.
Program for Binary to Gray conversion
.model small .data a db 0AH .code mov ax, @data ; Initialize data section mov ds, ax mov al, a ; Load number1 in al mov bl, al ; get the number in bl also mov ah, 00h ; ah=00 add ax, ax ; add contents of ax with itself xor bx, ax ; xor the added contents with number itself ror bx, 01h ; roll by 1 bit to right to get gray equivalent mov ax, bx ; copy result to ax also mov ch, 02h ; Count of digits to be displayed mov cl, 04h ; Count to roll by 4 bits mov bh, al ; Result in reg bh l2: rol bh, cl ; roll bl so that msb comes to lsb mov dl, bh ; load dl with data to be displayed and dl, 0fH ; get only lsb cmp dl, 09 ; check if digit is 0-9 or letter A-F jbe l4 add dl, 07 ; if letter add 37H else only add 30H l4: add dl, 30H mov ah, 02 ; Function 2 under INT 21H (Display character) int 21H dec ch ; Decrement Count jnz l2 mov ah, 4cH ; Terminate Program int 21H end
How to Run this Program
For Running this program you should have installed Tasm on you computer .
C:\programs>tasm bin-gray.asm
Turbo Assembler Version 3.0 Copyright (c) 1988, 1991 Borland International
Assembling file: bin-gray.asm
Error messages: None
Warning messages: None
Passes: 1
Remaining memory: 438k
C:\programs>tlink bin-gray.obj
Turbo Link Version 3.0 Copyright (c) 1987, 1990 Borland International
Warning: No stack
C:\programs>bin-gray
0F
Burhan says
Sir can you please tell me how to convert binary to grey code after exe file is created?
ProjectsGeek says
You need to run exe and provide input to it.
Kerstin says
Keep on working, great job!