MI: LINEAR SEARCH Pranav

INCLUDE IO.H

CR EQU 0DH
LF EQU 0AH

DATA SEGMENT

N DW (?)
X DW 40 DUP (?)
I DW 0H ;USED AS FLAG VARIABLE
TEMP DW 0H
KEY DW (?)
STRING DB 40 dup (?)

PROMPT1 DB 'ENTER THE NUMBER OF ELEMENTS:'
    DB CR,LF,0
PROMPT2 DB 'ENTER ELEMENTS'
    DB CR,LF,0

PROMPT3 DB 'ENTER ELEMENT TO SEARCH FOR'
    DB CR,LF,0



PROMPT5 DB 'ELEMENT NOT FOUND'
    DB CR,LF,0

PROMPT4 DB CR,LF,'ELEMENT FOUND AT LOCATION'
L DB 2 dup (?)
DB CR,LF,0


DATA ENDS




CODE SEGMENT
ASSUME CS:CODE, DS:DATA

START: MOV AX, SEG DATA
    MOV DS, AX

    OUTPUT PROMPT1
    INPUTS STRING,40
    ATOI STRING
    MOV N,AX

    MOV SI, OFFSET X
    MOV BX,N
    OUTPUT PROMPT2

REPEAT1:INPUTS STRING,40
    ATOI STRING
    MOV [SI],AX
    ADD SI,02H
    DEC BX
    JNZ REPEAT1

    OUTPUT PROMPT3
    INPUTS STRING,40
    ATOI STRING
    MOV KEY,AX


    MOV BX,N
    MOV SI, OFFSET X
    MOV AX, 0000H
    MOV DX,KEY

REPEAT2:
    CMP DX,[SI]
    JE FOUND
    JMP NXT


FOUND:
    INC AX      ; POSTTIONS STARTING FROM 1
    ITOA L,AX
    OUTPUT PROMPT4
    MOV CX,01H
    MOV I,CX

NXT:
    INC SI;
    INC SI;
    INC AX;
    DEC BX;
    JNZ REPEAT2


    MOV AX,01H
    CMP I,AX
    JE CONTINUE
    OUTPUT PROMPT5

CONTINUE:
    MOV AL,0
    MOV AH,4CH
    INT 21H

CODE ENDS
END START





;OUTPUT 1

;ENTER THE NUMBER OF ELEMENTS:
;5
;ENTER ELEMENTS
;1
;9
;6
;4
;1
;ENTER ELEMENT TO SEARCH FOR
;1
;ELEMENT FOUND AT LOCATION     1
;ELEMENT FOUND AT LOCATION     5



;OUTPUT 2

;ENTER THE NUMBER OF ELEMENTS:
;4
;ENTER ELEMENTS
;6
;9
;8
;4
;ENTER ELEMENT TO SEARCH FOR
;0
;ELEMENT NOT FOUND