-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathAssembly_Project.asm
145 lines (119 loc) · 2.09 KB
/
Assembly_Project.asm
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
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
.model small
lfcr macro
mov ah, 02
mov dl, 0ah
int 21h
mov dl, 0dh
int 21h
lfcr endm
.stack 100h
.data
nl1 db "Enter 1st number: $"
nl2 db "Enter 2nd number: $"
opl db "enter any (+, -, *, /) : $"
rel db "result: $"
integer dw 0
integer2 dw 0
count dw ?
.code
main proc
mov ax, @data
mov ds, ax
mov ah, 09
lea dx, nl1
int 21h
call readInt
mov dx, integer
mov integer2, dx
lfcr
mov integer, 0
mov ah, 09
lea dx, nl2
int 21h
call readInt
lfcr
mov ah, 09
lea dx, opl
int 21h
mov ah, 01
int 21h
cmp al, '+'
je addnum
cmp al, '*'
je mulnum
jmp exit
mov ah, 09
lea dx, rel
int 21h
addnum:
lfcr
call addition
jmp exit
mulnum:
lfcr
call multiply
jmp exit
exit:
mov ah, 4ch
int 21h
main endp
multiply proc
mov ax, integer
mul integer2
mov bx, 10000
idiv bx
mov integer, ax
mov integer2, dx
call writeInt
mov dx, integer2
mov integer, dx
call writeInt
ret
multiply endp
addition proc
mov dx, integer
add dx, integer2
mov integer, dx
call writeInt
ret
addition endp
readInt proc
xor cx, cx
xor bx, bx
mov cx, 4
l1:
mov ah, 01
int 21h
mov bl, al
sub bl, 48
mov ax, 10
mul integer
mov integer, ax
add integer, bx
loop l1
ret
readInt endp
writeInt proc
mov cx, 5
mov count, 0
mov ax, integer
mov bx, 10
l2:
xor dx, dx
cmp ax, 0
je outt
div bx
push dx
inc count
loop l2
outt:
mov cx, count
l3:
mov ah, 02
pop dx
add dx, 48
int 21h
loop l3
ret
writeInt endp
end main