1 | ; Project name : Assembly Library
|
---|
2 | ; Description : Math related macros.
|
---|
3 | %ifndef MATH_INC
|
---|
4 | %define MATH_INC
|
---|
5 |
|
---|
6 | FALSE EQU 0
|
---|
7 | TRUE EQU 1
|
---|
8 |
|
---|
9 |
|
---|
10 | ;--------------------------------------------------------------------
|
---|
11 | ; MIN_U Unsigned comparison
|
---|
12 | ; MIN_S Signed comparison
|
---|
13 | ; Parameters:
|
---|
14 | ; %1: Operand 1
|
---|
15 | ; %2: Operand 2
|
---|
16 | ; Returns:
|
---|
17 | ; %1: Lesser operand
|
---|
18 | ; Corrupts registers:
|
---|
19 | ; Nothing
|
---|
20 | ;--------------------------------------------------------------------
|
---|
21 | %macro MIN_U 2
|
---|
22 | cmp %1, %2 ; Is %1 smaller?
|
---|
23 | jb %%Return ; If so, return
|
---|
24 | mov %1, %2 ; Copy %2 to %1
|
---|
25 | %%Return:
|
---|
26 | %endmacro
|
---|
27 |
|
---|
28 | %macro MIN_S 2
|
---|
29 | cmp %1, %2 ; Is %1 smaller?
|
---|
30 | jl %%Return ; If so, return
|
---|
31 | mov %1, %2 ; Copy %2 to %1
|
---|
32 | %%Return:
|
---|
33 | %endmacro
|
---|
34 |
|
---|
35 |
|
---|
36 | ;--------------------------------------------------------------------
|
---|
37 | ; MAX_U Unsigned comparison
|
---|
38 | ; MAX_S Signed comparison
|
---|
39 | ; Parameters:
|
---|
40 | ; %1: Operand 1
|
---|
41 | ; %2: Operand 2
|
---|
42 | ; Returns:
|
---|
43 | ; %1: Greater operand
|
---|
44 | ; Corrupts registers:
|
---|
45 | ; Nothing
|
---|
46 | ;--------------------------------------------------------------------
|
---|
47 | %macro MAX_U 2
|
---|
48 | cmp %1, %2 ; Is %1 greater?
|
---|
49 | ja %%Return ; If so, return
|
---|
50 | mov %1, %2 ; Copy %2 to %1
|
---|
51 | %%Return:
|
---|
52 | %endmacro
|
---|
53 |
|
---|
54 | %macro MAX_S 2
|
---|
55 | cmp %1, %2 ; Is %1 greater?
|
---|
56 | jg %%Return ; If so, return
|
---|
57 | mov %1, %2 ; Copy %2 to %1
|
---|
58 | %%Return:
|
---|
59 | %endmacro
|
---|
60 |
|
---|
61 |
|
---|
62 | ;--------------------------------------------------------------------
|
---|
63 | ; SHL_DXAX
|
---|
64 | ; Parameters:
|
---|
65 | ; %1: Number of bits to shift. Can be (in preferred order) CX, CL or an immediate value.
|
---|
66 | ; Returns:
|
---|
67 | ; DX:AX Shifted value
|
---|
68 | ; Corrupts registers:
|
---|
69 | ; CX
|
---|
70 | ;--------------------------------------------------------------------
|
---|
71 | %macro SHL_DXAX 1
|
---|
72 | %ifdef USE_386
|
---|
73 | %ifnidni %1, cx
|
---|
74 | ; %1 is CL or an immediate
|
---|
75 | shld dx, ax, %1
|
---|
76 | shl ax, %1
|
---|
77 | %else
|
---|
78 | ; %1 is CX
|
---|
79 | shld dx, ax, cl
|
---|
80 | shl ax, cl
|
---|
81 | %endif
|
---|
82 | %else
|
---|
83 | %ifidni %1, cl
|
---|
84 | ; %1 is CL
|
---|
85 | xor ch, ch
|
---|
86 | %elifnidni %1, cx
|
---|
87 | ; %1 is an immediate
|
---|
88 | mov cx, %1
|
---|
89 | %endif
|
---|
90 | ALIGN JUMP_ALIGN
|
---|
91 | .ShiftNextBit:
|
---|
92 | eSHL_IM ax, 1
|
---|
93 | eRCL_IM dx, 1
|
---|
94 | loop .ShiftNextBit
|
---|
95 | %endif
|
---|
96 | %endmacro
|
---|
97 |
|
---|
98 |
|
---|
99 | ;--------------------------------------------------------------------
|
---|
100 | ; SHR_DXAX
|
---|
101 | ; Parameters:
|
---|
102 | ; %1: Number of bits to shift. Can be (in preferred order) CX, CL or an immediate value.
|
---|
103 | ; Returns:
|
---|
104 | ; DX:AX Shifted value
|
---|
105 | ; Corrupts registers:
|
---|
106 | ; CX
|
---|
107 | ;--------------------------------------------------------------------
|
---|
108 | %macro SHR_DXAX 1
|
---|
109 | %ifdef USE_386
|
---|
110 | %ifnidni %1, cx
|
---|
111 | ; %1 is CL or an immediate
|
---|
112 | shrd ax, dx, %1
|
---|
113 | shr dx, %1
|
---|
114 | %else
|
---|
115 | ; %1 is CX
|
---|
116 | shrd ax, dx, cl
|
---|
117 | shr dx, cl
|
---|
118 | %endif
|
---|
119 | %else
|
---|
120 | %ifidni %1, cl
|
---|
121 | ; %1 is CL
|
---|
122 | xor ch, ch
|
---|
123 | %elifnidni %1, cx
|
---|
124 | ; %1 is an immediate
|
---|
125 | mov cx, %1
|
---|
126 | %endif
|
---|
127 | ALIGN JUMP_ALIGN
|
---|
128 | .ShiftNextBit:
|
---|
129 | shr dx, 1
|
---|
130 | rcr ax, 1
|
---|
131 | loop .ShiftNextBit
|
---|
132 | %endif
|
---|
133 | %endmacro
|
---|
134 |
|
---|
135 |
|
---|
136 | %endif ; MATH_INC
|
---|