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 |
---|