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 extern inline u8 keypad_read_row(u8 row) {
  16         u8 i, num;
  17         if (row)
  18                 bset((void*)&_io_ports[M6811_PORTD], PORTD_KEYPAD_ROW);
  19         else
  20                 bclr((void*)&_io_ports[M6811_PORTD], PORTD_KEYPAD_ROW);
  21
  22         bclr_misc_output(A3800_DISPLAY_WRITE);  /* disable the display clock */
  23
  24         _io_ports[M6811_SPDR] = 0;
  25         while(!(_io_ports[M6811_SPDR]&M6811_SPIE)); /* wait for completion */
  26
  27         for (i = _io_ports[M6811_SPDR], num = 0;
  28                 (i&0x1) == 0;
  29                 i=i>>1, num++);
  30
  31         return num;
  32 }
  33
  34 /* returns a key 1..10 or 11 for reset */
  35 void keypad_read() {
  36         /* FIXME: need to do debouncing of some sort? */
  37         u8 key;
  38         key = keypad_read_row(0);
  39         if (NO_KEY == key) {
  40                 key = keypad_read_row(1);
  41                 key = keymap1[key];
  42         } else
  43                 key = keymap0[key];
  44
  45         if (key != last_key) {
  46                 last_key = key;
  47                 if (key != 0) {
  48                         new_key = 1;
  49                         chime_start();
  50                 }
  51         }
  52 }
  53
  54 bool keypad_pressed() {
  55         if (!new_key) return 0;
  56         new_key = 0;
  57         return 1;
  58 }
  59
  60 u8 keypad_getkey() {
  61         while (!keypad_pressed())
  62                 keypad_read();
  63         return last_key;
  64 }