tasm/Array_1digit.asm at env · amartyasinha/tasm · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
.model small
.386

.data
ARRAY DB 10 DUP (?)
DATA1 dw 0000H

msg db 10,13,"Enter the size of the array :: $"
msg2 db 10,13,"Enter the array :: $"
msg3 db 10,13,"The entered array is :: $"

.code
.startup

MOV AH,09
MOV DX,OFFSET msg
INT 21H

MOV AH,01
INT 21H
SUB AL,30H
MOV AH,0
MOV CX,AX
MOV DATA1,AX

MOV AH,09
MOV DX,OFFSET msg2
INT 21H

MOV AH, 0
MOV SI, 0
MOV BX, OFFSET ARRAY
L1: MOV DL, 0AH ; jump onto next line
MOV AH, 02H
INT 21H

MOV AH, 01H
INT 21H
SUB AL,30H
mov ah, 00
MOV [BX + SI], AX
INC SI
LOOP L1

MOV AH, 09H
MOV DX, OFFSET MSG3
INT 21H

MOV CX, DATA1
MOV SI, 0
L2:mov ah, 02h
mov dl, 0ah
int 21h

mov dl, 0dh
int 21h

MOV DX, [BX+SI]
ADD DL, 30h
MOV AH, 02
INT 21H
INC SI
LOOP L2

.EXIT
END