// 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;

}

uint32_t last_ssr_on = 0;

uint32_t last_led = 0;

int32_t setpoint = 0;

int16_t ssr_output = 0; // Duty cycle of ssr, 0 to SSR_PERIOD 

uint8_t pid_enabled = 0;

// Process things

void process()

{

    update_temp(); // Read MAX31855

    // TODO: Add calibration offset (linear)

    if(ticks - last_led > 400) 

    {

        GPIO_ToggleBits(LED_POWER);

        last_led = ticks;

    }

    // Every 200ms, set the SSR on unless output is 0

    if((ticks - last_ssr_on > SSR_PERIOD))

    {

        if(pid_enabled) 

        {

            // Get ssr output for next time

            int16_t power_percent = update_pid(k_p, k_i, k_d, temp, temp_frac, setpoint);

            //power-percent is 0-1000

            ssr_output = power_percent; //(((uint32_t)SSR_PERIOD * (uint32_t)10 * (uint32_t)100) * power_percent) / (uint32_t)1000000;

        }

        else 

        {

            ssr_output = 0;

        }

        // Only support heating (ssr_output > 0) right now

        if(ssr_output > 0) {

            char tempstr[6];

            itoa(ssr_output, tempstr);

            ssd1306_DrawString("#=", 2, 45);

            ssd1306_DrawString("    ", 2, 57);

            ssd1306_DrawString(tempstr, 2, 57);

            GPIO_SetBits(LED_STAT);

            GPIO_SetBits(SSR_PIN);

            last_ssr_on = ticks;

        }

    }

    // Kill SSR after elapsed period less than SSR_PERIOD 

    if(ticks - last_ssr_on > ssr_output || ssr_output == 0)

    {

        GPIO_ResetBits(LED_STAT);

        GPIO_ResetBits(SSR_PIN);

    }

}

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);

}

// 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();

}

// TODO: Make a struct that has all settings in it. Pass by ref to this func in a library.

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

            // [ therm :: idle ]

            ssd1306_DrawString("therm :: idle ", 0, 40);

            pid_enabled = 0;

            if(temp_changed) {

                char tempstr[6];

                itoa_fp(temp, temp_frac, tempstr);

                ssd1306_DrawString("Temp: ", 3, 40);

                ssd1306_DrawString("    ", 3, 72);

                ssd1306_DrawString(tempstr, 3, 72);

            }

            ssd1306_drawlogo();

            switch(goto_mode) {

                case 2:

                {

                    ssd1306_DrawString("-> brew     ", 1, 40);

                } break;

                case 1:

                {

                    ssd1306_DrawString("-> setup    ", 1, 40);

                } break;

                case 0:

                {

                    ssd1306_DrawString("-> reset    ", 1, 40);

                } break;

            }

            // Button handler

            if(SW_BTN_PRESSED) {

                switch(goto_mode) {

                    case 2:

                        state = STATE_PREHEAT_BREW;

                        break;

                    case 1:

                        state = STATE_SETP;

                        break;

                    case 0:

                        state = STATE_IDLE;

                        break;

                    default:

                        state = STATE_PREHEAT_BREW;

                }

            }

            else if(SW_UP_PRESSED && goto_mode < 2) {

                goto_mode++;

            }

                goto_mode--;

            }

            // Event Handler

            // N/A

        } break;

        case STATE_SETP:

        {

            // Write text to OLED

            // [ therm :: set p ]

            // [ p = 12         ]

            ssd1306_DrawString("Proportional", 0, 40);

            ssd1306_drawlogo();

            char tempstr[6];

            itoa(k_p, tempstr);

            ssd1306_DrawString("P=", 1, 45);

            ssd1306_DrawString("    ", 1, 57);

            ssd1306_DrawString(tempstr, 1, 57);

            ssd1306_DrawString("Press to accept", 3, 40);

            // Button handler

            if(SW_BTN_PRESSED) {

                state = STATE_SETI;

            }

            else {

                user_input(&k_p);

            }

            // Event Handler

            // N/A

        } break;

        case STATE_SETI:

        {

            // Write text to OLED

            // [ therm :: set i ]

            // [ i = 12         ]

            ssd1306_DrawString("Integral", 0, 40);

            ssd1306_drawlogo();

            char tempstr[6];

            itoa(k_i, tempstr);

            ssd1306_DrawString("I=", 1, 45);

            ssd1306_DrawString("    ", 1, 57);

            ssd1306_DrawString(tempstr, 1, 57);

            ssd1306_DrawString("Press to accept", 3, 40);

            // Button handler

            if(SW_BTN_PRESSED) {

                state = STATE_SETD;

            }

            else {

                user_input(&k_i);

            }

            // Event Handler

            // N/A

        } break;

        case STATE_SETD:

        {

            // Write text to OLED

            // [ therm :: set d ]

            // [ d = 12         ]

            ssd1306_DrawString("Derivative", 0, 40);

            ssd1306_drawlogo();

            char tempstr[6];

            itoa(k_d, tempstr);

            ssd1306_DrawString("D=", 1, 45);

            ssd1306_DrawString("    ", 1, 57);

            ssd1306_DrawString(tempstr, 1, 57);

            ssd1306_DrawString("Press to accept", 3, 40);

            // Button handler

            if(SW_BTN_PRESSED) {

                state = STATE_SETWINDUP;

            }

            else {

                user_input(&k_d);

            }

            // Event Handler

            // N/A

        } break;