// analogue key
#include "adc.h"


#define KEY               C,7,H         //A7

//key: ALARM MODE LIGHT UP DOWN         //adc min level
#define KEY_ALARM_LEVEL    80           //4
#define KEY_MODE_LEVEL    230           //98
#define KEY_UP_LEVEL      330           //241
#define KEY_DOWN_LEVEL    410           //347
#define KEY_LIGHT_LEVEL   500           //427

#define KEY_ALARM         (1<<0)        //code
#define KEY_MODE          (1<<1)
#define KEY_UP            (1<<2)
#define KEY_DOWN          (1<<3)
#define KEY_LIGHT         (1<<4)
#define LONG_BIT          (1<<5)
#define REPEAT_BIT        (1<<6)
#define KEY_ALARM_LONG    (KEY_ALARM | LONG_BIT)
#define KEY_MODE_LONG     (KEY_MODE  | LONG_BIT)
#define KEY_LIGHT_LONG    (KEY_LIGHT | LONG_BIT)
#define KEY_UP_LONG       (KEY_UP    | LONG_BIT)
#define KEY_DOWN_LONG     (KEY_DOWN  | LONG_BIT)
#define KEY_UP_REPEAT     (KEY_UP    | LONG_BIT | REPEAT_BIT)
#define KEY_DOWN_REPEAT   (KEY_DOWN  | LONG_BIT | REPEAT_BIT)

#define DEBOUNCE_TIME     50            //short
#define REPEAT_DELAY      800           //long - задержка перед LONG
#define REPEAT_TIME       100           //repeat long - автоповтор при LONG


#define key_init()        //adcInit();

// однократный опрос, на выходе: код кнопки
inline uint8_t get_key() {
  uint16_t adc = getAdc(_bn(KEY));
  // if (adc < 1000) { con_int(adc); con_write(' '); } //DEBUG
  if (adc < KEY_ALARM_LEVEL) return KEY_ALARM;
  if (adc < KEY_MODE_LEVEL)  return KEY_MODE;
  if (adc < KEY_UP_LEVEL)    return KEY_UP;
  if (adc < KEY_DOWN_LEVEL)  return KEY_DOWN;
  if (adc < KEY_LIGHT_LEVEL) return KEY_LIGHT;
  return 0;
}

uint8_t key();

#include "main.h"
#include "akey.h"


// SHORT - при отжатии, LONG - при нажатии, LONG REPEAT (UP/DOWN) - при удержании
uint8_t key() {
  typedef enum {SHORT, LONG, LONG_LONG} state_t;
  static state_t state;
  static uint8_t short_key;
  static uint16_t timer;

  uint8_t k = get_key();
  for_change(k)                         //change
    timer = ms2sys(DEBOUNCE_TIME);
  if (timer)
    --timer;
  else if (k) {
    if (state == SHORT) {               //начало нажатия
      state = LONG;
      short_key = k;                    //запомним для отжатия
      timer = ms2sys(REPEAT_DELAY - DEBOUNCE_TIME) - 1;
    }
    else if (state == LONG) {           //длинное нажатие
      state = LONG_LONG;
      timer = ms2sys(REPEAT_TIME) - 1;
      short_key = 0;                    //wo press
      return k | LONG_BIT;
    }
    else if (k & (KEY_UP | KEY_DOWN)) { //повтор только для UP/DOWN!
      timer = ms2sys(REPEAT_TIME) - 1;
      return k;
    }
  }
  else if (state != SHORT) {            //released
    state = SHORT;
    return short_key;                   //0 after a long
  }
  return 0;
}