ROM2/keypad.c

   1 #include "chime.h"
   2 #include "vend.h"
   3 #include "keypad.h"
   4
   5 u8 last_key; /* the last key registered */
   6 bool new_key = 0;
   7
   8 /* first 8 from the first row, then 3 from the second row */
   9 /* keys are 1-9, 0, reset */
  10 const u8 keymap0[8] = {KEY_8, KEY_7, KEY_6, KEY_5, KEY_4, KEY_3, KEY_2, KEY_1};
  11 const u8 keymap1[3] = {KEY_RESET, KEY_0, KEY_9};
  12
  13 #define NO_KEY  8
  14
  15 /* reads the keypad and returns the bit number that was turned on in the shift
  16  * register (from 0..7). If no bits were turned on, it returns 8 (aka NO_KEY)
  17  */
  18 extern inline u8 keypad_read_row(u8 row) {
  19         u8 i, num;
  20         if (row)
  21                 bset((void*)&_io_ports[M6811_PORTD], PORTD_KEYPAD_ROW);
  22         else
  23                 bclr((void*)&_io_ports[M6811_PORTD], PORTD_KEYPAD_ROW);
  24
  25         bclr_misc_output(A3800_DISPLAY_WRITE);  /* disable the display clock */
  26
  27         _io_ports[M6811_SPDR] = 0;
  28         while(!(_io_ports[M6811_SPDR]&M6811_SPIE)); /* wait for completion */
  29
  30         for (i = _io_ports[M6811_SPDR], num = 0;
  31                 ((i&0x1) == 0) && (num < 7);
  32                 i=i>>1, num++);
  33
  34         return num;
  35 }
  36
  37 /* returns a key 1..10 or 11 for reset */
  38 void keypad_read() {
  39         /* FIXME: need to do debouncing of some sort? */
  40         u8 key;
  41         key = keypad_read_row(0);
  42         if (NO_KEY == key) {
  43                 key = keypad_read_row(1);
  44                 if (key <= 2)
  45                         key = keymap1[key];
  46                 else
  47                         key = 0;
  48         } else
  49                 key = keymap0[key];
  50
  51         if (key != last_key) {
  52                 last_key = key;
  53                 if (key != 0) {
  54                         new_key = 1;
  55                         chime_start();
  56                 }
  57         }
  58 }
  59
  60 bool keypad_pressed() {
  61         if (!new_key) return 0;
  62         new_key = 0;
  63         return 1;
  64 }