BASIC_OP.H 3.3 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364
  1. /*___________________________________________________________________________
  2. | |
  3. | Constants and Globals |
  4. |___________________________________________________________________________|
  5. */
  6. extern Flag Overflow;
  7. extern Flag Carry;
  8. #define MAX_32 (Word32)0x7fffffffL
  9. #define MIN_32 (Word32)0x80000000L
  10. #define MAX_16 (Word16)0x7fff
  11. #define MIN_16 (Word16)0x8000
  12. /*___________________________________________________________________________
  13. | |
  14. | Operators prototypes |
  15. |___________________________________________________________________________|
  16. */
  17. Word16 sature(Word32 L_var1); /* Limit to 16 bits, 1 */
  18. Word16 add(Word16 var1, Word16 var2); /* Short add, 1 */
  19. Word16 sub(Word16 var1, Word16 var2); /* Short sub, 1 */
  20. Word16 abs_s(Word16 var1); /* Short abs, 1 */
  21. Word16 shl(Word16 var1, Word16 var2); /* Short shift left, 1 */
  22. Word16 shr(Word16 var1, Word16 var2); /* Short shift right, 1 */
  23. Word16 mult(Word16 var1, Word16 var2); /* Short mult, 1 */
  24. Word32 L_mult(Word16 var1, Word16 var2); /* Long mult, 1 */
  25. Word16 negate(Word16 var1); /* Short negate, 1 */
  26. Word16 extract_h(Word32 L_var1); /* Extract high, 1 */
  27. Word16 extract_l(Word32 L_var1); /* Extract low, 1 */
  28. Word16 round(Word32 L_var1); /* Round, 1 */
  29. Word32 L_mac(Word32 L_var3, Word16 var1, Word16 var2); /* Mac, 1 */
  30. Word32 L_msu(Word32 L_var3, Word16 var1, Word16 var2); /* Msu, 1 */
  31. Word32 L_macNs(Word32 L_var3, Word16 var1, Word16 var2);/* Mac without sat, 1*/
  32. Word32 L_msuNs(Word32 L_var3, Word16 var1, Word16 var2);/* Msu without sat, 1*/
  33. Word32 L_add(Word32 L_var1, Word32 L_var2); /* Long add, 2 */
  34. Word32 L_sub(Word32 L_var1, Word32 L_var2); /* Long sub, 2 */
  35. Word32 L_add_c(Word32 L_var1, Word32 L_var2); /*Long add with c, 2 */
  36. Word32 L_sub_c(Word32 L_var1, Word32 L_var2); /*Long sub with c, 2 */
  37. Word32 L_negate(Word32 L_var1); /* Long negate, 2 */
  38. Word16 mult_r(Word16 var1, Word16 var2); /* Mult with round, 2 */
  39. Word32 L_shl(Word32 L_var1, Word16 var2); /* Long shift left, 2 */
  40. Word32 L_shr(Word32 L_var1, Word16 var2); /* Long shift right, 2 */
  41. Word16 shr_r(Word16 var1, Word16 var2);/* Shift right with round, 2 */
  42. Word16 mac_r(Word32 L_var3, Word16 var1, Word16 var2);/* Mac with rounding, 2*/
  43. Word16 msu_r(Word32 L_var3, Word16 var1, Word16 var2);/* Msu with rounding, 2*/
  44. Word32 L_deposit_h(Word16 var1); /* 16 bit var1 -> MSB, 2 */
  45. Word32 L_deposit_l(Word16 var1); /* 16 bit var1 -> LSB, 2 */
  46. Word32 L_shr_r(Word32 L_var1, Word16 var2);/* Long shift right with round, 3*/
  47. Word32 L_abs(Word32 L_var1); /* Long abs, 3 */
  48. Word32 L_sat(Word32 L_var1); /* Long saturation, 4 */
  49. Word16 norm_s(Word16 var1); /* Short norm, 15 */
  50. Word16 div_s(Word16 var1, Word16 var2); /* Short division, 18 */
  51. Word16 norm_l(Word32 L_var1); /* Long norm, 30 */