[41] | 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:
|
---|
[181] | 43 | ; %1: Greater operand
|
---|
[41] | 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 |
|
---|
[172] | 62 | ;--------------------------------------------------------------------
|
---|
[287] | 63 | ; SHL_DXAX
|
---|
| 64 | ; Parameters:
|
---|
[592] | 65 | ; %1: Number of bits to shift. Can be (in preferred order) CX, CL or an immediate value.
|
---|
[287] | 66 | ; Returns:
|
---|
| 67 | ; DX:AX Shifted value
|
---|
| 68 | ; Corrupts registers:
|
---|
| 69 | ; CX
|
---|
| 70 | ;--------------------------------------------------------------------
|
---|
| 71 | %macro SHL_DXAX 1
|
---|
[592] | 72 | %ifdef USE_386
|
---|
[287] | 73 | %ifnidni %1, cx
|
---|
[592] | 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
|
---|
[287] | 88 | mov cx, %1
|
---|
| 89 | %endif
|
---|
| 90 | ALIGN JUMP_ALIGN
|
---|
| 91 | .ShiftNextBit:
|
---|
[445] | 92 | eSHL_IM ax, 1
|
---|
[589] | 93 | eRCL_IM dx, 1
|
---|
[287] | 94 | loop .ShiftNextBit
|
---|
[592] | 95 | %endif
|
---|
[287] | 96 | %endmacro
|
---|
| 97 |
|
---|
| 98 |
|
---|
| 99 | ;--------------------------------------------------------------------
|
---|
[172] | 100 | ; SHR_DXAX
|
---|
| 101 | ; Parameters:
|
---|
[592] | 102 | ; %1: Number of bits to shift. Can be (in preferred order) CX, CL or an immediate value.
|
---|
[172] | 103 | ; Returns:
|
---|
| 104 | ; DX:AX Shifted value
|
---|
| 105 | ; Corrupts registers:
|
---|
| 106 | ; CX
|
---|
| 107 | ;--------------------------------------------------------------------
|
---|
| 108 | %macro SHR_DXAX 1
|
---|
[592] | 109 | %ifdef USE_386
|
---|
[172] | 110 | %ifnidni %1, cx
|
---|
[592] | 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
|
---|
[172] | 125 | mov cx, %1
|
---|
| 126 | %endif
|
---|
| 127 | ALIGN JUMP_ALIGN
|
---|
| 128 | .ShiftNextBit:
|
---|
| 129 | shr dx, 1
|
---|
| 130 | rcr ax, 1
|
---|
| 131 | loop .ShiftNextBit
|
---|
[592] | 132 | %endif
|
---|
[172] | 133 | %endmacro
|
---|
| 134 |
|
---|
| 135 |
|
---|
[41] | 136 | %endif ; MATH_INC
|
---|