}

// Read temperature and update global temp vars

int16_t temp = 0;

uint8_t temp_frac = 0;

void update_temp() {

    // Assert CS

    GPIO_ResetBits(MAX_CS);

    delay(1);

    // This may not clock at all... might need to send 16 bits first

    SPI_I2S_SendData(SPI2, 0xAAAA); // send dummy data

    //SPI_I2S_SendData(SPI2, 0xAA); // send dummy data

    uint16_t temp_pre = SPI_I2S_ReceiveData(SPI2);

    if(temp_pre & 0b0000000000000010) {

        ssd1306_DrawString("Fatal Error", 2, 35);

    }

    else if(temp_pre & 0b0000000000000001) {

        ssd1306_DrawString("Error: No TC", 2, 40);

        temp = 0;

        temp_frac = 0;

    }

    else 

    {

        uint8_t sign = temp >> 15;// top bit is sign

        temp_pre = temp_pre >> 2; // Drop 2 lowest bits

        temp_frac = temp_pre & 0b11; // get fractional part

        temp_frac *= 25; // each bit is .25 a degree, up to fixed point

        temp_pre = temp_pre >> 2; // Drop 2 fractional bits 

        if(sign) {

            temp = -temp_pre;

        }

        else {

            temp = temp_pre;

        }

    }

    // Deassert CS

    delay(1);

    GPIO_SetBits(MAX_CS);

}

// PID implementation

int16_t last_pid_temp = 0;

uint8_t last_pid_temp_frac = 0;

int16_t i_state = 0;

int16_t update_pid(uint16_t k_p, uint16_t k_i, uint16_t k_d, int16_t temp, uint8_t temp_frac, int16_t setpoint) 

{

  // Calculate instantaneous error

  int16_t error = (int16_t)setpoint - (int16_t)temp; // TODO: Use fixed point fraction

  // Proportional component

  int16_t p_term = k_p * error;

  // Error accumulator (integrator)

  i_state += error;

  // to prevent the iTerm getting huge despite lots of 

  //  error, we use a "windup guard" 

  // (this happens when the machine is first turned on and

  // it cant help be cold despite its best efforts)

  // not necessary, but this makes windup guard values 

  // relative to the current iGain

  int16_t windup_guard_res = windup_guard / k_i;  

  // Calculate integral term with windup guard 

  if (i_state > windup_guard_res) 

    i_state = windup_guard_res;

  else if (i_state < -windup_guard_res) 

    i_state = -windup_guard_res;

  int16_t i_term = k_i * i_state;

  // Calculate differential term (slope since last iteration)

  int16_t d_term = (k_d * (temp - last_pid_temp));

  // Save temperature for next iteration

  last_pid_temp = temp;

  last_pid_temp_frac = temp_frac;

  int16_t result = p_term + i_term - d_term;

  // Put out tenths of percent, 0-1000. 

  if(result > 1000)

    result = 1000;

  else if(result < -1000)

    result = -1000;

  // Return feedback

  return result;

}

void draw_setpoint() {

    char tempstr[3];

    itoa_fp(temp, temp_frac, tempstr);

    //ssd1306_DrawString("        ", 3, 40);

    ssd1306_DrawString(tempstr, 3, 40);

    ssd1306_DrawString("-> ", 3, 80);

    itoa(setpoint, tempstr);

    ssd1306_DrawString("    ", 3, 95);

    ssd1306_DrawString(tempstr, 3, 95);

}

uint8_t goto_mode = 2;

// State machine

uint8_t sw_btn_last = 0;

uint8_t sw_up_last = 0;

uint8_t sw_down_last = 0;

uint8_t sw_left_last = 0;

uint8_t sw_right_last = 0;

#define SW_BTN_PRESSED (sw_btn_last == 0 && sw_btn == 1) // rising edge on buttonpress

#define SW_UP_PRESSED (sw_up_last == 0 && sw_up == 1)

#define SW_DOWN_PRESSED (sw_down_last == 0 && sw_down == 1)

#define SW_LEFT_PRESSED (sw_left_last == 0 && sw_left == 1)

#define SW_RIGHT_PRESSED (sw_right_last == 0 && sw_right == 1)

void save_settings()

{

   Minimal_EEPROM_Unlock();

    // Try programming a word at an address divisible by 4

    Minimal_EEPROM_ProgramWord(EEPROM_BASE_ADDR + EEPROM_ADDR_BOOTTOBREW, boottobrew);

    Minimal_EEPROM_ProgramWord(EEPROM_BASE_ADDR + EEPROM_ADDR_WINDUP_GUARD, windup_guard);

    Minimal_EEPROM_ProgramWord(EEPROM_BASE_ADDR + EEPROM_ADDR_K_P, k_p);

    Minimal_EEPROM_ProgramWord(EEPROM_BASE_ADDR + EEPROM_ADDR_K_I, k_i);

    Minimal_EEPROM_ProgramWord(EEPROM_BASE_ADDR + EEPROM_ADDR_K_D, k_d);

    Minimal_EEPROM_Lock();

}

void save_setpoints()

{

    Minimal_EEPROM_Unlock();

    Minimal_EEPROM_ProgramWord(EEPROM_BASE_ADDR + EEPROM_ADDR_BREWTEMP, setpoint_brew);

    Minimal_EEPROM_ProgramWord(EEPROM_BASE_ADDR + EEPROM_ADDR_STEAMTEMP, setpoint_steam); 

    Minimal_EEPROM_Lock();

}

void restore_settings()

{

    Minimal_EEPROM_Unlock();

    while(Minimal_FLASH_GetStatus()==FLASH_BUSY);

    boottobrew = (*(__IO uint32_t*)(EEPROM_BASE_ADDR + EEPROM_ADDR_BOOTTOBREW));

    while(Minimal_FLASH_GetStatus()==FLASH_BUSY);

    windup_guard = (*(__IO uint32_t*)(EEPROM_BASE_ADDR + EEPROM_ADDR_WINDUP_GUARD));

    while(Minimal_FLASH_GetStatus()==FLASH_BUSY);

    k_p = (*(__IO uint32_t*)(EEPROM_BASE_ADDR + EEPROM_ADDR_K_P));

    while(Minimal_FLASH_GetStatus()==FLASH_BUSY);

    k_i = (*(__IO uint32_t*)(EEPROM_BASE_ADDR + EEPROM_ADDR_K_I));

    while(Minimal_FLASH_GetStatus()==FLASH_BUSY);

    k_d = (*(__IO uint32_t*)(EEPROM_BASE_ADDR + EEPROM_ADDR_K_D));

    while(Minimal_FLASH_GetStatus()==FLASH_BUSY);

    setpoint_brew = (*(__IO uint32_t*)(EEPROM_BASE_ADDR + EEPROM_ADDR_BREWTEMP));

    while(Minimal_FLASH_GetStatus()==FLASH_BUSY);

    setpoint_steam = (*(__IO uint32_t*)(EEPROM_BASE_ADDR + EEPROM_ADDR_STEAMTEMP));    

    Minimal_EEPROM_Lock();

}

int16_t last_temp = 21245;

void machine()

{

    uint8_t last_state = state;

    uint8_t temp_changed = temp != last_temp;

    last_temp = temp;

    uint8_t sw_btn = !GPIO_ReadInputDataBit(SW_BTN);

    uint8_t sw_up = !GPIO_ReadInputDataBit(SW_UP);

    uint8_t sw_down = !GPIO_ReadInputDataBit(SW_DOWN);

    uint8_t sw_left = !GPIO_ReadInputDataBit(SW_LEFT);

    uint8_t sw_right = !GPIO_ReadInputDataBit(SW_RIGHT);

    switch(state)

    {

        // Idle state

        case STATE_IDLE:

        {

            // Write text to OLED