Teacup_Firmware/mendel/mendel.c

161 lines
3.4 KiB
C

#include <stddef.h>
#include <stdint.h>
#include <string.h>
#include <avr/io.h>
#include <avr/interrupt.h>
#include "machine.h"
#include "serial.h"
#include "dda.h"
#include "gcode.h"
#include "timer.h"
#include "clock.h"
#include "temp.h"
#include "sermsg.h"
#ifndef DEBUG
#define DEBUG 0
#endif
inline void io_init(void) {
WRITE(X_STEP_PIN, 0); SET_OUTPUT(X_STEP_PIN);
WRITE(X_DIR_PIN, 0); SET_OUTPUT(X_DIR_PIN);
WRITE(X_MIN_PIN, 1); SET_INPUT(X_MIN_PIN);
WRITE(Y_STEP_PIN, 0); SET_OUTPUT(Y_STEP_PIN);
WRITE(Y_DIR_PIN, 0); SET_OUTPUT(Y_DIR_PIN);
WRITE(Y_MIN_PIN, 1); SET_INPUT(Y_MIN_PIN);
WRITE(Z_STEP_PIN, 0); SET_OUTPUT(Z_STEP_PIN);
WRITE(Z_DIR_PIN, 0); SET_OUTPUT(Z_DIR_PIN);
WRITE(Z_MIN_PIN, 1); SET_INPUT(Z_MIN_PIN);
WRITE(E_STEP_PIN, 0); SET_OUTPUT(E_STEP_PIN);
WRITE(E_DIR_PIN, 0); SET_OUTPUT(E_DIR_PIN);
#ifdef HEATER_PIN
disable_heater(); SET_OUTPUT(HEATER_PIN);
#endif
#ifdef FAN_PIN
disable_fan(); SET_OUTPUT(FAN_PIN);
#endif
#ifdef STEPPER_ENABLE_PIN
disable_steppers(); SET_OUTPUT(STEPPER_ENABLE_PIN);
#endif
WRITE(SCK, 1); SET_OUTPUT(SCK);
WRITE(MISO, 1); SET_INPUT(MISO);
WRITE(SS, 0); SET_OUTPUT(SS);
}
inline void init(void) {
// set up serial
serial_init();
// set up inputs and outputs
io_init();
// set up timers
setupTimerInterrupt();
// set up clock
clock_setup();
// enable interrupts
sei();
// say hi to host
serial_writestr_P(PSTR("Start\n"));
// start queue
//enableTimerInterrupt();
}
int main (void)
{
uint8_t report;
init();
// main loop
for (;;)
{
if (serial_rxchars()) {
uint8_t c = serial_popchar();
// TOGGLE(SCK);
scan_char(c);
}
if (clock_flag_250ms & CLOCK_FLAG_250MS_TEMPCHECK) {
clock_flag_250ms &= ~CLOCK_FLAG_250MS_TEMPCHECK;
temp_tick();
}
if (clock_flag_250ms & CLOCK_FLAG_250MS_STEPTIMEOUT) {
clock_flag_250ms &= ~CLOCK_FLAG_250MS_STEPTIMEOUT;
if (steptimeout > 25) {
disable_steppers();
}
else {
steptimeout++;
}
}
if (clock_flag_250ms & CLOCK_FLAG_250MS_REPORT) {
clock_flag_250ms &= ~CLOCK_FLAG_250MS_REPORT;
report++;
if (report == 4) {
report = 0;
if (DEBUG) {
// current move
serial_writestr_P(PSTR("DDA: f#"));
serwrite_int32(movebuffer[mb_head].f_counter);
serial_writechar('/');
serwrite_uint16(movebuffer[mb_head].f_scale);
serial_writechar('/');
serwrite_int16(movebuffer[mb_head].f_delta);
serial_writechar('\n');
// current position
serial_writestr_P(PSTR("Pos: "));
serwrite_int32(current_position.X);
serial_writechar(',');
serwrite_int32(current_position.Y);
serial_writechar(',');
serwrite_int32(current_position.Z);
serial_writechar(',');
serwrite_uint32(current_position.E);
serial_writechar(',');
serwrite_uint32(current_position.F);
serial_writechar('\n');
// target position
serial_writestr_P(PSTR("Dst: "));
serwrite_int32(movebuffer[mb_tail].endpoint.X);
serial_writechar(',');
serwrite_int32(movebuffer[mb_tail].endpoint.Y);
serial_writechar(',');
serwrite_int32(movebuffer[mb_tail].endpoint.Z);
serial_writechar(',');
serwrite_uint32(movebuffer[mb_tail].endpoint.E);
serial_writechar(',');
serwrite_uint32(movebuffer[mb_tail].endpoint.F);
serial_writechar('\n');
}
// Queue
print_queue();
// temperature
temp_print();
}
}
}
}