Enough wacky little fixes to get motors turning and keypad functional.

[uccvend-snackrom.git] / ROM2 / main_basic.c

diff --git a/ROM2/main_basic.c b/ROM2/main_basic.c
index e459471..f3bd010 100644 (file)
--- a/ROM2/main_basic.c
+++ b/ROM2/main_basic.c
@@ -61,13 +61,14 @@ void write_to_display() {
 void send_balance() {
        wait_for_tx_free();
        tx_buffer[0] = 'C';
-       tx_buffer[1] = (coin_value/10000)%10;
-       tx_buffer[2] = (coin_value/1000)%10;
-       tx_buffer[3] = (coin_value/100)%10;
-       tx_buffer[4] = (coin_value/10)%10;
-       tx_buffer[5] = coin_value%10;
-       tx_buffer[6] = '\n';
-       tx_buffer[7] = 0;
+       tx_buffer[1] = have_change?'0':'1';
+       tx_buffer[2] = (coin_value/10000)%10;
+       tx_buffer[3] = (coin_value/1000)%10;
+       tx_buffer[4] = (coin_value/100)%10;
+       tx_buffer[5] = (coin_value/10)%10;
+       tx_buffer[6] = coin_value%10;
+       tx_buffer[7] = '\n';
+       tx_buffer[8] = 0;
        send_packet();
 }
 
@@ -89,7 +90,7 @@ void give_change() {
 
        coin_cost(cost);
        send_ack();
-}
+} 
 
 void send_keypress(u8 key) {
        /* send a packet of the form KX with X being the key, or R for reset */
@@ -98,7 +99,16 @@ void send_keypress(u8 key) {
        if (key == KEY_RESET)
                tx_buffer[1] = 'R';
        else
-               tx_buffer[1] = key+'0';
+               tx_buffer[1] = (key%10)+'0';
+       tx_buffer[2] = '\n';
+       tx_buffer[3] = 0;
+       send_packet();
+}
+
+void send_door_msg(bool open) {
+       wait_for_tx_free();
+       tx_buffer[0] = 'D';
+       tx_buffer[1] = open?'1':'0';
        tx_buffer[2] = '\n';
        tx_buffer[3] = 0;
        send_packet();
@@ -109,13 +119,86 @@ void do_chime() {
        send_ack();
 }
 
+void ping_pong() {
+       /* make sure it's really a ping */
+       if (msg_buf[1] != 'I' ||
+               msg_buf[2] != 'N' ||
+               msg_buf[3] != 'G') {
+               send_nack();
+               return;
+       }
+       /* respond with ack & pong */
+       wait_for_tx_free();
+       tx_buffer[0] = 'P';
+       tx_buffer[1] = 'O';
+       tx_buffer[2] = 'N';
+       tx_buffer[3] = 'G';
+       tx_buffer[4] = '\n';
+       tx_buffer[5] = 0;
+       send_packet();
+}
+
+u16 last_coin_value;
+bool last_door_open;
+char display_buf[11];
+u8 cur_motor[2];
+
 int main() {
-       u16 last_coin_value = coin_value;
+       u8 i;
+       for (i = 0; i < 11; i++)
+               display_buf[i] = ' ';
+       display_buf[10] = '\0';
 
-       /* init coin mech */
-       comm_init();
+       changer_output = 0x7f;
+       _io_ports[M6811_PORTA] = 0xc0; /* display on. talking to serial port */
+       _io_ports[M6811_DDRA] = 0xfc;
+       _io_ports[M6811_DDRD] = 0x3e;
+       _io_ports[M6811_SPCR] = 0x12;
+       set_misc_output(0x00);
+       
        display_init();
+       set_msg(" HELLO    ");
+
+       unlock(); /* enable interrupts */
+
+       comm_init();
+       coinmech_init();
+       keypad_init();
+
+       delay(500);
+
+       set_msg("  CRUEL   ");
+
+       last_coin_value = 0;
+       last_door_open = 0;
+
+       dispense_motor(22);
+       delay(1000);
+
+       set_msg("   WORLD  ");
+       delay(1000);
+
+       chime_start();
+
+       cur_motor[0] = 0;
        while(1) {
+               if (cur_motor[0] == 0xff) { /* signal to say redraw screen */
+                       set_msg("*5N4X0RZ* ");
+                       cur_motor[0] = 0;
+               }
+
+               if (door_open() != last_door_open) {
+                       last_door_open = door_open();
+                       send_door_msg(last_door_open);
+                       if (last_door_open) {
+                               chime_start();
+                               set_msg("DOOR OPEND");
+                       } else {
+                               chime_start();
+                               set_msg("DOOR CLOSE");
+                       }
+               }
+
                if (rx_queue_state) {
                        switch (msg_buf[0]) {
                                case 'V':
@@ -133,8 +216,12 @@ int main() {
                                case 'G':
                                        give_change();
                                        break;
+                               case 'P':
+                                       ping_pong();
+                                       break;
                                default:
                                /* shrug */
+                                       send_nack();
                                        break;
                        }
                        msg_clr();
@@ -142,8 +229,26 @@ int main() {
 
                keypad_read();
                if (keypad_pressed()) {
+                       if (last_key == KEY_RESET) {
+                               cur_motor[0] = 0xff;
+                       } else {
+                               if (cur_motor[0]) {
+                                       cur_motor[1] = last_key%10;
+                                       display_buf[1] = cur_motor[0]+'0';
+                                       set_msg(display_buf);
+                                       dispense_motor(cur_motor[0]*10 + cur_motor[1]);
+                                       set_msg("   DONE   ");
+                                       display_buf[0] = ' ';
+                                       display_buf[1] = ' ';
+                                       cur_motor[0] = 0xff;
+                                       delay(1000);
+                               } else {
+                                       cur_motor[0] = last_key%10;
+                                       display_buf[0] = cur_motor[0]+'0';
+                                       set_msg(display_buf);
+                               }
+                       }
                        send_keypress(last_key);
-                       /* beep? */
                }
 
                if (coin_value != last_coin_value) {