ROM2/keypad.c

   1 #include "chime.h"
   2 #include "vend.h"
   3 #include "keypad.h"
   4 #include "display_basic.h"
   5
   6 volatile u8 last_key; /* the last key registered */
   7 volatile bool new_key;
   8
   9 /* first 8 from the first row, then 3 from the second row */
  10 /* keys are 1-9, 0, reset */
  11 const u8 keymap0[8] = {KEY_1, KEY_2, KEY_3, KEY_4, KEY_5, KEY_6, KEY_7, KEY_8};
  12 const u8 keymap1[3] = {KEY_9, KEY_0, KEY_RESET};
  13
  14 #define NO_KEY  8
  15
  16 /* reads the keypad and returns the bit number that was turned on in the shift
  17  * register (from 0..7). If no bits were turned on, it returns 8 (aka NO_KEY)
  18  */
  19 extern inline u8 keypad_read_row(u8 row) {
  20         u8 i, j, num;
  21
  22         if (row)
  23                 bset((void*)&_io_ports[M6811_PORTD], PORTD_KEYPAD_ROW);
  24         else
  25                 bclr((void*)&_io_ports[M6811_PORTD], PORTD_KEYPAD_ROW);
  26
  27         spi_enable();
  28
  29         bset_misc_output(A3800_KEYPAD_STROBE);
  30         bclr_misc_output(A3800_KEYPAD_STROBE);
  31
  32         bclr_misc_output(A3800_DISPLAY_WRITE);  /* disable the display clock */
  33
  34         /* _io_ports[M6811_SPDR] = 0; */
  35         asm volatile (
  36                 "ldab #0\n"
  37                 "stab %0\n"
  38                 : "=m" (_io_ports[M6811_SPDR])
  39                 :
  40                 : "b"
  41                         );
  42         while(!(_io_ports[M6811_SPSR]&M6811_SPIF)); /* wait for completion */
  43
  44         /* SPDR read to clear SPIF flag is performed below: */
  45         i = _io_ports[M6811_SPDR];
  46
  47         /* print out the row & read in key in binary */
  48         char msg_buf[11] = "XKXXXXXXXX";
  49         msg_buf[0] = row?'1':'0';
  50         for (j = 1, num = 0; num < 8; j = j << 1, num++) {
  51                 msg_buf[num+2] = (i & j)?'1':'0';
  52         }
  53         set_msg(msg_buf);
  54
  55         num = 0;
  56         while (((i & 0x01) == 0) && (num < 8)) {
  57                 i = i >> 1;
  58                 num++;
  59         }
  60
  61         spi_disable();
  62
  63         return num;
  64 }
  65
  66 /* sets last_key to 1..10 or 11 for reset */
  67 void keypad_read() {
  68         /* FIXME: need to do debouncing of some sort? */
  69         u8 key;
  70         key = keypad_read_row(0);
  71         if (NO_KEY == key) {
  72                 key = keypad_read_row(1);
  73                 if (key <= 2)
  74                         key = keymap1[key];
  75                 else
  76                         key = 0;
  77         } else
  78                 key = keymap0[key];
  79
  80         if (key != last_key) {
  81                 last_key = key;
  82                 if (key != 0) {
  83                         new_key = 1;
  84                         chime_start();
  85                 }
  86         }
  87 }
  88
  89 bool keypad_pressed() {
  90         if (!new_key) return 0;
  91         new_key = 0;
  92         return 1;
  93 }
  94
  95 void keypad_init() {
  96         last_key = 0;
  97         new_key = 0;
  98 }