-
Notifications
You must be signed in to change notification settings - Fork 6
/
5.asm
162 lines (140 loc) · 2.08 KB
/
5.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
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
section .data
format1: db "%lf", 0
format2: db "%lf", 10, 0
msg1: db "Enter x:", 0Ah
len1: equ $-msg1
msg2: db "Enter n:", 0Ah
len2: equ $-msg2
msg3: db "Sum:", 0Ah
len3: equ $-msg3
msg4: db "Value of cos(x) by processor:", 0Ah
len4: equ $-msg4
section .bss
num: resw 1
a: resd 1
x: resq 1
n: resw 1
f: resq 1
sum: resq 1
temp: resb 1
section .text
global main:
extern scanf
extern printf
main:
;;Enter x
mov eax, 4
mov ebx, 1
mov ecx, msg1
mov edx, len1
int 80h
call read
fstp qword[x]
;; Enter n
mov eax, 4
mov ebx, 1
mov ecx, msg2
mov edx, len2
int 80h
call input
mov ax, word[num]
mov word[n], ax
cmp word[n], 0
je exit
call cosx
fld qword[sum]
mov eax, 4
mov ebx, 1
mov ecx, msg3
mov edx, len3
int 80h
call print
ffree ST0
fld qword[x]
fcos ;;;;Using inbuilt cos function
mov eax, 4
mov ebx, 1
mov ecx, msg4
mov edx, len4
int 80h
call print
exit:
mov eax, 1
mov ebx, 0
int 80h
;;;;;;;;;;;;;;;;;;;;function to read floating point
read:
push ebp
mov ebp, esp
sub esp, 8
lea eax, [esp]
push eax
push format1
call scanf
fld qword[ebp - 8]
mov esp, ebp
pop ebp
ret
;;;;;;;;;;;;;;;function to print floating point.........
print:
push ebp
mov ebp, esp
sub esp, 8
fst qword[ebp - 8]
push format2
call printf
mov esp, ebp
pop ebp
ret
;;;;;;;;;;;;;;;;function to calculate taylor series sum
cosx:
mov dword[a], 1
fild dword[a]
fst qword[sum]
fstp qword[f]
mov esi, 1
mov dword[a], esi
loop1:
cmp si, word[n]
je end_loop1
fld qword[f]
fmul qword[x]
fmul qword[x]
fidiv dword[a]
inc dword[a]
fidiv dword[a]
fchs
fst qword[f]
fld qword[sum]
fadd ST1
fstp qword[sum]
ffree ST0
inc dword[a]
inc esi
jmp loop1
end_loop1:
ret
;;;;;;;;;;;;;;;;;;Function to input a number;;;;;;;;;;;;;
input:
pusha
mov word[num], 0
loopadd:
mov eax, 3
mov ebx, 0
mov ecx, temp
mov edx, 1
int 80h
cmp byte[temp], 10
je end_input
mov ax, word[num]
mov bx, 10
mul bx
sub byte[temp], 30h
mov bh, 0
mov bl, byte[temp]
add ax, bx
mov word[num], ax
jmp loopadd
end_input:
popa
ret