8086 Assembly Language Program

8086 Assembly Language Program to find GCD of two
numbers
DATA SEGMENT
NUM1 DW 000AH
NUM2 DW 0004H
GCD DW ?
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA
START: MOV AX,DATA
;Load the Data to AX.
MOV DS,AX
;Move the Data AX to DS.
MOV AX,NUM1
;Move the first number to AX.
MOV BX,NUM2
;Move the second number to BX.
UP: CMP AX,BX
;Compare the two numbers.
JE EXIT
;If equal, go to EXIT label.
JB EXCG
;If first number is below than second,
;go to EXCG label.
UP1: MOV DX,0H
;Initialize the DX.
DIV BX
;Divide the first number by second number.
CMP DX,0
;Compare remainder is zero or not.
JE EXIT
;If zero, jump to EXIT label.
MOV AX,DX
;If non-zero, move remainder to AX.
JMP UP
;Jump to UP label.
EXCG:XCHG AX,BX
;Exchange the remainder and quotient.
JMP UP1
;Jump to UP1.
EXIT:MOV GCD,BX
;Store the result in GCD.
MOV AH,4CH
INT 21H
CODE ENDS
END START
8086 Assembly Language Program to generate the first n Fibonacci numbers.

DATA SEGMENT
f1 db 00h
f2 db 01h
f3 db ?
msg1 db "The Fibonacci series is", 10, 13, "$"
n db 12
DATA ENDS
code segment
assume cs:code, ds:data
start:
mov ax, data
mov ds, ax
lea dx, msg1
mov ah, 09h
int 21h
mov bl, f1
CALL DISPNUM
mov dl, ' '
mov ah, 02h
int 21h
mov bl, f2
CALL DISPNUM
mov dl, ' '
mov ah, 02h
int 21h
mov ch, 00h
up1:
cmp ch, n
jae exit
mov al, f1
add al, f2
mov f3, al
mov bl, f3
CALL DISPNUM
mov dl, ' '
mov ah, 02h
int 21h
mov al, f2
mov f1, al
mov al, f3
mov f2, al
inc ch
jmp up1
exit:
mov ah, 4ch
int 21h
DISPNUM PROC NEAR
MOV DL, BL
AND DL, 0F0H
; display 1st digit
MOV CL, 04H
SHR DL, CL
CMP DL, 09H
JBE L2
ADD DL, 07H
L2: ADD DL, 30H
MOV AH, 02H
INT 21H
MOV DL, BL
AND DL, 0FH
CMP DL, 09H
;display 2nd digit
JBE L3
ADD DL, 07H
L3: ADD DL, 30H
MOV AH, 02H
INT 21H
RET
DISPNUM ENDP
code ends
end start
8086 Assembly Language Program for given data is positive or negative
DATA SEGMENT
NUM DB 12H
MES1 DB 10,13,'DATA IS POSITIVE $'
MES2 DB 10,13,'DATA IS NEGATIVE $'
DATA ENDS
CODE SEGMENT
START: MOV AX,DATA
MOV DS,AX
MOV AL,NUM
ROL AL,1
JC NEGA
;Move the Number to AL.
;Perform the rotate left side for 1 bit position.
;Check for the negative number.
MOV DX,OFFSET MES1 ;Declare it positive.
JMP EXIT ;Exit program.
NEGA: MOV DX,OFFSET MES2;Declare it negative.
EXIT: MOV AH,09H
INT 21H
MOV AH,4CH
INT 21H
CODE ENDS
END START
8086 Assembly Language Program for given data is odd or even

DATA SEGMENT
X DW 27H
MSG1 DB 19,13,'NUMBER IS EVEN$'
MSG2 DB 10,13,'NUMBER IS ODD$'
DATA ENDS
CODE SEGMENT
START: MOV AX,DATA
MOV DS,AX
MOV AX,X
TEST AX,01H
JNZ EXIT
LEA DX,MSG1
MOV AH,09H
INT 21H
JMP LAST
;Test for Even/Odd number.
;If it is Even go to Exit label.
;(alternate logic)
;MOV BL,2
;DIV BL
;CMP AH,0H
;JNZ EXIT
;Declare it is Even number.
EXIT: LEA DX,MSG2 ;Declare it is Odd number.
MOV AH,09H
INT 21H
LAST: MOV AH,4CH
INT 21H
CODE ENDS
END START
8086 Assembly Language Program for Logical ones and zeros in a given data
DATA SEGMENT
X DB 0AAH
ONE DB ?
ZERO DB ?
DATA ENDS
CODE SEGMENT
ASSUME CS: CODE,DS:DATA
START: MOV AX,DATA
MOV DS,AX
MOV AH,X
MOV BL,8
;Initialize BL to 8.
MOV CL,1
;Initialize CL to 1.
UP: ROR AH,CL
;Perform the single bit rotate operation
;with respect to right.
JNC DOWN
;If no carry go to DOWN label.
INC ONE
;Increment one.
JMP DOWN1
;Jump to DOWN1.
DOWN: INC ZERO
;Increment ZERO.
DOWN1: DEC BL
;Decrement the BL.
JNZ UP
;If no zero go to UP label.
MOV AH,4CH
INT 21H
CODE ENDS
END START
8086 Assembly Language Program to Find Largest Number Among the Series
DATA SEGMENT
X DW 0010H,52H,30H,40H,50H
LAR DW ?
DATA ENDS
CODE SEGMENT
START: MOV AX,DATA
MOV DS,AX
MOV CX,05H
LEA SI,X
MOV AX,[SI]
DEC CX
UP: CMP AX,[SI+2]
JA CONTINUE
MOV AX,[SI+2]
CONTINUE:ADD SI,2
DEC CX
JNZ UP
MOV LAR,AX
MOV AH,4CH
INT 21H
CODE ENDS
END START
8086 Assembly Language Program to find smallest number among the series
DATA SEGMENT
X DW 0060H,0020H,0030H,0040H,0050H
MES DB 10,13,'SMALLEST NUMBER AMONG THE SERIES IS $'
DATA ENDS
CODE SEGMENT
START: MOV AX,DATA
MOV DS,AX
MOV CX,05H
LEA SI,X
MOV AX,[SI]
DEC CX
UP: CMP AX,[SI+2]
JB CONTINUE
MOV AX,[SI+2]
CONTINUE:ADD SI,2
DEC CX
JNZ UP
AAM
ADD AX,3030H
MOV BX,AX
MOV AH,09H
LEA DX,MES
INT 21H
MOV DL,BH
MOV AH,02H
INT 21H
MOV DL,BL
INT 21H
MOV AH,4CH
INT 21H
CODE ENDS
END START
8086 Assembly Language Program to sort numbers in ascending/descending orders

DATA SEGMENT
x DW 42H,34H,26H,17H,09H
LEN EQU 05
ASCD DB 10 DUP(0)
DATA ENDS
CODE SEGMENT
START: MOV AX,DATA
MOV DS,AX
MOV BX,LEN-1
MOV CX,BX
UP1: MOV BX,CX

LEA SI,X
UP: MOV AX,[SI]
MOV DX,[SI+2]
CMP AX,DX
JB DOWN/JA DOWN
MOV [SI],DX
MOV [SI+2],AX
DOWN: INC SI
INC SI
DEC BX
JNZ UP
DEC CX
JNZ UP1
MOV AH,4CH
INT 21H
CODE ENDS
END START
8086 Assembly Language Program Block Interchange

DATA SEGMENT
X DB 01H,02H,03H,04H,05H
Y DB 11H,12H,13H,14H,15H
DATA ENDS
CODE SEGMENT
START:MOV AX,DATA
MOV DS,AX
MOV CX,05H ; Load the counter
LEA SI,X ; SI pointed to the source location x
LEA DI,Y ; DI pointed to the destination location y
UP: MOV BL,[SI] ; Move the SI content to BL register
MOV AL,[DI] ; Move the DI content to AL register
MOV [SI],AL ; Move AL register content to content of SI
MOV [DI],BL ; Move BL register content to content of DI
INC SI ; Update SI and DI
INC DI
DEC CX ; Decrement the counter till it becomes zero
JNZ UP
MOV AH,4CH
INT 21H
CODE ENDS
END START
8086 Assembly Language Program for String Transfer

DATA SEGMENT
STR1 DB 'HOW ARE YOU'
LEN EQU $-STR1
STR2 DB 20 DUP(0)
DATA ENDS
CODE SEGMENT
;start of data segment
;end of data segment
;start of code segment
ASSUME CS:CODE,DS:DATA,ES:DATA
START: MOV AX,DATA
MOV DS,AX
MOV ES,AX
LEA SI,STR1
LEA DI,STR2
MOV CX,LEN
CLD
REP MOVSB
MOV AH,4CH
INT 21H
CODE ENDS
END START
8086 Assembly Language Program for Binary to BCD Conversion

DATA SEGMENT
BIN DW 01A9H
BCD DB 2 DUP(0)
DATA ENDS
CODE SEGMENT
START: MOV AX,DATA
MOV DS,AX
MOV AX,BIN
MOV CL,64H
DIV CL
MOV BCD+1,AL
MOV AL,AH
MOV AH,00H
MOV CL,0AH
DIV CL
MOV CL,04
ROR AL,CL
ADD AL,AH
MOV AH,4CH
INT 21H
CODE ENDS
END START
8086 Assembly Language Program for BCD to Binary Code Conversion

DATA SEGMENT
BCD DW 27H
BIN DW ?
DATA ENDS
CODE SEGMENT
START: MOV AX,DATA
MOV DS,AX
MOV AX,BCD
AND AX,07H
MOV BX,AX
MOV AX,BCD
AND AX,0F0H
MOV CX,0AH
MUL CX
ADD AX,BX
MOV BIN,AX
MOV AH,4CH
INT 21H
CODE ENDS
END START
8086 Assembly Language Program To Convert From Hex To Ascii or Display a

Number As String
; Program To Convert From Hex To Ascii or Display Number in 8086
Assembly Language
; Author : Murugan Andezuthu Dharmaratnam
; Modified : Oct 09 2012
org 100h
main proc near
mov ah,09h
; Display String
mov dx,offset message
int 21h
mov ax,55h
; AX Contains Hex 55H = 85 Decimal
mov si,offset strHextToAsc ;
SI Offset Where Converted
to String is stored
call hexToAsc
mov ah,,09h
; Display String : Number Converted
mov dx,offset strHextToAsc
int 21h
mov ah,4ch
mov al,00
int 21h
Return To Dos
endp
hexToAsc proc near
;AX input , si point result storage addres
mov cx,00h
mov bx,0ah
hexloop1:
mov dx,0
div bx
add dl,'0'
push dx
inc cx
cmp ax,0ah
jge hexloop1
add al,'0'
mov [si],al
hexloop2:
pop ax
inc si
mov [si],al
loop hexloop2
inc si
mov al,'$'
mov [si],al
ret
endp
message db "HexToAsc Character =
strHextToAsc db "
$"
"
end main
ret
Read the current time from the system and display it in the standard format on the
screen.
DATA SEGMENT
MSG1 DB 'CURRENT TIME IS
HR DB ?
MIN DB ?
SEC DB ?
MSEC DB ?
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE, DS:DATA
START:
MOV AX, DATA
MOV DS, AX
MOV AH,2CH
INT 21H
MOV HR, CH
MOV MIN, CL
MOV SEC, DH
MOV MSEC, DL
LEA DX, MSG1
MOV AH, 09H
INT 21H
MOV AL, HR
AND AL
AAM
MOV BX, AX
CALL DISPLAY
MOV DL, ':'
MOV AH, 02H
INT 21H
MOV AL, MIN
AAM
MOV BX, AX
CALL DISPLAY
MOV DL, ':'
MOV AH, 02H
INT 21H
MOV AL, SEC
: $'
; TO GET SYSTEM TIME

; CH -> HOUR
; CL -> MINUTES
; DH -> SECONDS
; DL -> 1/100TH SECOND
; DISPLAY MSG1
; IF AL=0D AAM WILL SPLIT THE NIBBLES INTO AH
; SO AH=01 AND AL=03
; DISPLAY HOURS
; DISPLAY ':' AFTER DISPLAYING HOUR
; DISPLAY MINUTES
; DISPLAY ':' AFTER DISPLAYING MINUTES
AAM
MOV BX, AX
CALL DISPLAY
MOV DL, '.'
MOV AH, 02H
INT 21H
MOV AL, MSEC
AAM
MOV BX, AX
CALL DISPLAY
MOV AH, 4CH
INT 21H
DISPLAY PROC NEAR
MOV DL, BH
ADD DL, 30H
MOV AH, 02H
INT 21H
MOV DL, BL
ADD DL, 30H
MOV AH, 02H
INT 21H
RET
DISPLAY ENDP
CODE ENDS
END START
; DISPLAY SECONDS
; DISPLAY '.' AFTER DISPLAYING SECONDS
; DISPLAY 1/100TH SECONDS
; DISPLAY BH VALUE
; DISPLAY BL VALUE

8086 Assembly Language Program

Uploaded by

Copyright:

Available Formats

8086 Assembly Language Program

Uploaded by

Document Information

Original Description:

Copyright

Available Formats

Share this document

Share or Embed Document

Sharing Options

Did you find this document useful?

Is this content inappropriate?

Copyright:

Available Formats

8086 Assembly Language Program

Uploaded by

Copyright:

Available Formats

8086 Assembly Language Program to find GCD of two

8086 Assembly Language Program to generate the first n Fibonacci numbers.

8086 Assembly Language Program for given data is positive or negative

8086 Assembly Language Program for given data is odd or even

8086 Assembly Language Program to sort numbers in ascending/descending orders

UP1: MOV BX,CX

8086 Assembly Language Program Block Interchange

8086 Assembly Language Program for String Transfer

8086 Assembly Language Program for Binary to BCD Conversion

8086 Assembly Language Program for BCD to Binary Code Conversion

8086 Assembly Language Program To Convert From Hex To Ascii or Display a

; TO GET SYSTEM TIME

; DISPLAY 1/100TH SECONDS

You might also like

Pfad - The Proxy pFad of © 2024 Garber Painting. All rights reserved.