sm4.c 5.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202
  1. //sm4.c - simple 4-axis stepper control
  2. #include "sm4.h"
  3. #include <avr/io.h>
  4. #include <avr/pgmspace.h>
  5. #include <math.h>
  6. #include "Arduino.h"
  7. #include "boards.h"
  8. #define false 0
  9. #define true 1
  10. #include "Configuration_prusa.h"
  11. #ifdef NEW_XYZCAL
  12. // Signal pinouts
  13. // direction signal - MiniRambo
  14. //#define X_DIR_PIN 48 //PL1 (-)
  15. //#define Y_DIR_PIN 49 //PL0 (-)
  16. //#define Z_DIR_PIN 47 //PL2 (-)
  17. //#define E0_DIR_PIN 43 //PL6 (+)
  18. //direction signal - EinsyRambo
  19. //#define X_DIR_PIN 49 //PL0 (+)
  20. //#define Y_DIR_PIN 48 //PL1 (-)
  21. //#define Z_DIR_PIN 47 //PL2 (+)
  22. //#define E0_DIR_PIN 43 //PL6 (-)
  23. //step signal pinout - common for all rambo boards
  24. //#define X_STEP_PIN 37 //PC0 (+)
  25. //#define Y_STEP_PIN 36 //PC1 (+)
  26. //#define Z_STEP_PIN 35 //PC2 (+)
  27. //#define E0_STEP_PIN 34 //PC3 (+)
  28. #define XDIR INVERT_X_DIR:!INVERT_X_DIR
  29. #define YDIR INVERT_Y_DIR:!INVERT_Y_DIR
  30. #define ZDIR INVERT_Z_DIR:!INVERT_Z_DIR
  31. #define EDIR INVERT_E0_DIR:!INVERT_E0_DIR
  32. uint8_t dir_mask = 0x0F^(INVERT_X_DIR | (INVERT_Y_DIR << 1) | (INVERT_Z_DIR << 2) | (INVERT_E0_DIR << 3));
  33. sm4_stop_cb_t sm4_stop_cb = 0;
  34. sm4_update_pos_cb_t sm4_update_pos_cb = 0;
  35. sm4_calc_delay_cb_t sm4_calc_delay_cb = 0;
  36. uint16_t sm4_cpu_time = 0;
  37. uint8_t sm4_get_dir(uint8_t axis)
  38. {
  39. switch (axis)
  40. {
  41. #if ((MOTHERBOARD == BOARD_RAMBO_MINI_1_0) || (MOTHERBOARD == BOARD_RAMBO_MINI_1_3))
  42. case 0: return (PORTL & 2)?XDIR;
  43. case 1: return (PORTL & 1)?YDIR;
  44. case 2: return (PORTL & 4)?ZDIR;
  45. case 3: return (PORTL & 64)?EDIR;
  46. #elif ((MOTHERBOARD == BOARD_EINSY_1_0a))
  47. case 0: return (PORTL & 1)?XDIR;
  48. case 1: return (PORTL & 2)?YDIR;
  49. case 2: return (PORTL & 4)?ZDIR;
  50. case 3: return (PORTL & 64)?EDIR;
  51. #endif
  52. }
  53. return 0;
  54. }
  55. void sm4_set_dir(uint8_t axis, uint8_t dir)
  56. {
  57. switch (axis)
  58. {
  59. #if ((MOTHERBOARD == BOARD_RAMBO_MINI_1_0) || (MOTHERBOARD == BOARD_RAMBO_MINI_1_3))
  60. case 0: if (dir == INVERT_X_DIR) PORTL |= 2; else PORTL &= ~2; break;
  61. case 1: if (dir == INVERT_Y_DIR) PORTL |= 1; else PORTL &= ~1; break;
  62. case 2: if (dir == INVERT_Z_DIR) PORTL |= 4; else PORTL &= ~4; break;
  63. case 3: if (dir == INVERT_E0_DIR) PORTL |= 64; else PORTL &= ~64; break;
  64. #elif ((MOTHERBOARD == BOARD_EINSY_1_0a))
  65. case 0: if (dir == INVERT_X_DIR) PORTL |= 1; else PORTL &= ~1; break;
  66. case 1: if (dir == INVERT_Y_DIR) PORTL |= 2; else PORTL &= ~2; break;
  67. case 2: if (dir == INVERT_Z_DIR) PORTL |= 4; else PORTL &= ~4; break;
  68. case 3: if (dir == INVERT_E0_DIR) PORTL |= 64; else PORTL &= ~64; break;
  69. #endif
  70. }
  71. asm("nop");
  72. }
  73. uint8_t sm4_get_dir_bits(void)
  74. {
  75. uint8_t register dir_bits = 0;
  76. uint8_t register portL = PORTL;
  77. //TODO -optimize in asm
  78. #if ((MOTHERBOARD == BOARD_RAMBO_MINI_1_0) || (MOTHERBOARD == BOARD_RAMBO_MINI_1_3))
  79. if (portL & 2) dir_bits |= 1;
  80. if (portL & 1) dir_bits |= 2;
  81. if (portL & 4) dir_bits |= 4;
  82. if (portL & 64) dir_bits |= 8;
  83. dir_bits ^= dir_mask;
  84. #elif ((MOTHERBOARD == BOARD_EINSY_1_0a))
  85. if (portL & 1) dir_bits |= 1;
  86. if (portL & 2) dir_bits |= 2;
  87. if (portL & 4) dir_bits |= 4;
  88. if (portL & 64) dir_bits |= 8;
  89. dir_bits ^= dir_mask;
  90. #endif
  91. return dir_bits;
  92. }
  93. void sm4_set_dir_bits(uint8_t dir_bits)
  94. {
  95. uint8_t register portL = PORTL;
  96. portL &= 0xb8; //set direction bits to zero
  97. //TODO -optimize in asm
  98. #if ((MOTHERBOARD == BOARD_RAMBO_MINI_1_0) || (MOTHERBOARD == BOARD_RAMBO_MINI_1_3))
  99. dir_bits ^= dir_mask;
  100. if (dir_bits & 1) portL |= 2; //set X direction bit
  101. if (dir_bits & 2) portL |= 1; //set Y direction bit
  102. if (dir_bits & 4) portL |= 4; //set Z direction bit
  103. if (dir_bits & 8) portL |= 64; //set E direction bit
  104. #elif ((MOTHERBOARD == BOARD_EINSY_1_0a))
  105. dir_bits ^= dir_mask;
  106. if (dir_bits & 1) portL |= 1; //set X direction bit
  107. if (dir_bits & 2) portL |= 2; //set Y direction bit
  108. if (dir_bits & 4) portL |= 4; //set Z direction bit
  109. if (dir_bits & 8) portL |= 64; //set E direction bit
  110. #endif
  111. PORTL = portL;
  112. asm("nop");
  113. }
  114. void sm4_do_step(uint8_t axes_mask)
  115. {
  116. #if ((MOTHERBOARD == BOARD_RAMBO_MINI_1_0) || (MOTHERBOARD == BOARD_RAMBO_MINI_1_3) || (MOTHERBOARD == BOARD_EINSY_1_0a))
  117. uint8_t register portC = PORTC & 0xf0;
  118. PORTC = portC | (axes_mask & 0x0f); //set step signals by mask
  119. asm("nop");
  120. PORTC = portC; //set step signals to zero
  121. asm("nop");
  122. #endif //((MOTHERBOARD == BOARD_RAMBO_MINI_1_0) || (MOTHERBOARD == BOARD_RAMBO_MINI_1_3) || (MOTHERBOARD == BOARD_EINSY_1_0a))
  123. }
  124. uint16_t sm4_line_xyze_ui(uint16_t dx, uint16_t dy, uint16_t dz, uint16_t de)
  125. {
  126. uint16_t dd = (uint16_t)(sqrt((float)(((uint32_t)dx)*dx + ((uint32_t)dy*dy) + ((uint32_t)dz*dz) + ((uint32_t)de*de))) + 0.5);
  127. uint16_t nd = dd;
  128. uint16_t cx = dd;
  129. uint16_t cy = dd;
  130. uint16_t cz = dd;
  131. uint16_t ce = dd;
  132. uint16_t x = 0;
  133. uint16_t y = 0;
  134. uint16_t z = 0;
  135. uint16_t e = 0;
  136. while (nd)
  137. {
  138. if (sm4_stop_cb && (*sm4_stop_cb)()) break;
  139. uint8_t sm = 0; //step mask
  140. if (cx <= dx)
  141. {
  142. sm |= 1;
  143. cx += dd;
  144. x++;
  145. }
  146. if (cy <= dy)
  147. {
  148. sm |= 2;
  149. cy += dd;
  150. y++;
  151. }
  152. if (cz <= dz)
  153. {
  154. sm |= 4;
  155. cz += dd;
  156. z++;
  157. }
  158. if (ce <= de)
  159. {
  160. sm |= 4;
  161. ce += dd;
  162. e++;
  163. }
  164. cx -= dx;
  165. cy -= dy;
  166. cz -= dz;
  167. ce -= de;
  168. sm4_do_step(sm);
  169. uint16_t delay = SM4_DEFDELAY;
  170. if (sm4_calc_delay_cb) delay = (*sm4_calc_delay_cb)(nd, dd);
  171. if (delay) delayMicroseconds(delay);
  172. nd--;
  173. }
  174. if (sm4_update_pos_cb) (*sm4_update_pos_cb)(x, y, z, e);
  175. return nd;
  176. }
  177. #endif //NEW_XYZCAL