Change from bzip2 compression to lzip
[uccvend-snackrom.git] / ROM2 / coinmech.c
index b52559d..124c835 100644 (file)
@@ -3,15 +3,15 @@
 
 #define COINMECH_ID   0x20
 
-u8 last_byte;
-u8 packet_pos = 0;
-u16 value_1 = 0;
-u8 value_2 = 0;
-u8 dec_point = 0; 
+volatile u8 last_byte;
+volatile u8 packet_pos;
+volatile u16 value_1;
+volatile u8 value_2;
+volatile u8 dec_point;
 
-u16 coin_value = 0;
-u8 item_cost = 0;
-bool have_change = 0;
+volatile u16 coin_value;
+u8 item_cost;
+volatile bool have_change;
 
 u8 parity_test(u8 c) {
        u8 parity = 0;
@@ -31,6 +31,8 @@ bool parity_good(u8 c) {
  * -----+---------
  * R8 0 | 1   0
  *    1 | 0   1
+ *
+ * equates to even parity?
  */
 
        u8 R8 = (_io_ports[M6811_SCCR1] & M6811_R8)?1:0;
@@ -48,21 +50,15 @@ void send_byte(u8 c) {
                bclr((void*)&_io_ports[M6811_SCCR1], M6811_T8);
 }
 
-void ask_for_retrans() {
-       /* sends an 0xff down the line */
-       send_byte(0xff);
-}
-
-
 #define IS_CTRL(x) (x & 0x10) /* true if this packet is a control packet */
-void sci_interrupt() {
+void sci_interrupt_coinmech() {
        u8 in;
        in = _io_ports[M6811_SCDR];
        
        /* test for framing errors & parity bit */
        if (_io_ports[M6811_SCSR] & M6811_FE || !parity_good(in)) {
                _io_ports[M6811_SCDR]; /* read of register req'd to clear FE */
-               ask_for_retrans();
+               send_byte(0xff); /* request a retransmit */
                return;
        }
 
@@ -76,7 +72,7 @@ void sci_interrupt() {
                return;
        }
 
-       if (packet_pos != 0 || IS_CTRL(in&0x10)) {
+       if (packet_pos != 0 || IS_CTRL(in)) {
                in &= 0x0f;
                switch (in) {
                        case 0x01: 
@@ -132,4 +128,18 @@ void coin_eat() {
 
 void coin_cost(u16 cost) {
        item_cost = cost;
+       while(coin_value); /* wait until coin mech cleared */
+}
+
+void coinmech_init() {
+       packet_pos = 0;
+       value_1 = value_2 = 0;
+       dec_point = 0;
+       coin_value = 0;
+       item_cost = 0;
+       have_change = 0;
+       _io_ports[M6811_SCCR1] = 0x10;
+       _io_ports[M6811_SCCR2] = 0x2e;
+       _io_ports[M6811_BAUD] = 0x03;
+       send_byte(0xff);
 }

UCC git Repository :: git.ucc.asn.au