MP Lab Final

1. Into Range or Not (3>=x<=8)
--------------------------------
DATA SEGMENT
NUM1 DB ?
MSG1 DB 10,13,"ENTER THE NUMBER : $"
MSG2 DB 10,13," INTO THE RANGE : $"
MSG3 DB 10,13," OUT OF THE RANGE : $"

ENDS
CODE SEGMENT
ASSUME DS:DATA CS:CODE
START:

MOV AX,@DATA
MOV DS,AX

LEA DX,MSG1
MOV AH,9
INT 21H

INPUT:
MOV AH,1
INT 21H
MOV BL,AL
SUB BL,48


CMP BL,3
JGE L2


L1:
 LEA DX,MSG3
 MOV AH,9
 INT 21H
 JMP EXIT

L2:
 CMP BL,8

 JNG L3
 JMP L1

 L3:

 LEA DX,MSG2
 MOV AH,9
 INT 21H


EXIT:

MOV AH,4CH
INT 21H

ENDS
END START


==============================
2. Addition Operation (Sum)
-----------------------------
.MODEL SMALL
.STACK 100H

.DATA
MSG1 DB 10,13, 'ENTER FIRST NUMBER: $'
MSG2 DB 10,13, 'ENTER SECOND NUMBER: $'
MSG3 DB 10,13, 'ADDITION RESULT IS: $'

.CODE
MAIN PROC
;initialize data segment
MOV AX,@DATA
MOV DS,AX

;message  1
LEA DX,MSG1
MOV AH,9
INT 21H

 ;input   1
MOV AH,1
INT 21H
MOV BL,AL

;message  2
LEA DX,MSG2
MOV AH,9
INT 21H

;input 2
MOV AH,1
INT 21H
MOV CL,AL

 ADD BL,CL

;message3
LEA DX,MSG3
MOV AH,9
INT 21H


;output
MOV AH,2
SUB BL,48
MOV DL,BL
INT 21H


 MOV AH,4CH
 INT 21H

MAIN ENDP
END MAIN

============================
3. Subtraction Operation
------------------------------
.MODEL SMALL
.STACK 100H
.DATA


MSG1 DB 10,13," ENTER A FIRST NUMBER:        $"
MSG2 DB 10,13,"ENTER A SECOND NUMBER:        $"
MSG3 DB 10,13,"               ANSWER:        $"

NUM1    DB ?,'$'
NUM2    DB ?,'$'

.CODE
START:
MOV AX,@DATA
MOV DS,AX
INT 21H

MOV AH,9
LEA DX,MSG1
INT 21H

MOV AH,1
INT 21H
SUB AL,30H
MOV NUM1,AL

MOV AH,9
LEA DX,MSG2
INT 21H

MOV AH,1
INT 21H
SUB AL,30H
MOV NUM2,AL

MOV AH,9
LEA DX,MSG3
INT 21H

MOV AL,NUM1
SUB AL,NUM2
ADD AL,30H

MOV AH,2
MOV DL,AL
INT 21H

MOV AH,4CH
INT 21H

END START



===============================
4. Show Star Using Loops
--------------------------

.MODEL SMALL
.DATA SEGMENT
NUM1 DB ?
MSG1 DB 10,13,"ENTER YOUR NUMBER  : $"
ENDS
CODE SEGMENT
ASSUME DS:DATA CS:CODE
START:

MOV AX,@DATA
MOV DS,AX

LEA DX,MSG1
MOV AH,9
INT 21H


MOV AH,1
INT 21H
MOV BL,AL
SUB AL,30H


MOV CX,0
MOV CL,AL


LOOP:

MOV AH,2
MOV DL,'*'


TOP:
INT 21H
LOOP TOP
EXIT:

MOV AH,4CH
INT 21H


============================
5. Finding Smaller number between 2 integer input
--------------------------------------------------
DATA SEGMENT
NUM1 DB ?
NUM2 DB ?
MSG1 DB 10,13,"ENTER FIRST NUMBER TO COMPARE : $"
MSG2 DB 10,13,"ENTER SECOND NUMBER TO COMPARE : $"
MSG3 DB 10,13,"SMALLER NUMBER IS : $"
ENDS
CODE SEGMENT
ASSUME DS:DATA CS:CODE
START:
MOV AX,DATA
MOV DS,AX

LEA DX,MSG1
MOV AH,9
INT 21H

MOV AH,1
INT 21H
MOV NUM1,AL

LEA DX,MSG2
MOV AH,9
INT 21H

MOV AH,1
INT 21H
MOV NUM2,AL

LEA DX,MSG3
MOV AH,9
INT 21H

MOV AL,NUM1

CMP AL,NUM2
JG SECOND

FIRST:  MOV AH,2
MOV DL,NUM1
INT 21H
JMP EXIT

SECOND: MOV AH,2
MOV DL,NUM2
INT 21H
EXIT:

MOV AH,4CH
INT 21H
ENDS
END START

============================
6. Show Numbers in Ascending Order:
------------------------------------
.MODEL SMALL
.STACK 100H
.DATA

MSG DB "Limit: $"
MSG1 DB 10,13, "Array: $"

.CODE
MAIN PROC
    MOV AX, @DATA
    MOV DS, AX

    LEA DX,MSG
    MOV AH,9
    INT 21H


    MOV AH,1
    INT 21H
    MOV BL,AL

    MOV CL,'1'

    LEA DX,MSG1
    MOV AH, 9
    INT 21H


TOP:
    MOV AH,2
    MOV DL,CL
    INT 21H
    INC CL

    CMP BL,CL
    JL EXIT
    JMP TOP
    EXIT:

    MOV AH,4CH
    INT 21H

    MAIN ENDP

END MAIN

===============================================