X-Git-Url: https://git.ucc.asn.au/?a=blobdiff_plain;f=ROM2%2Fmain_basic.c;h=b7c110fced6fdddfa51f574e37a53a455318d03a;hb=de72195f371c5d1240309c067e8a43b0484d070a;hp=21844bc3a695f4d99fdfbbb98648021c6835a67f;hpb=59ddc1de7a960375ef639e2bf7c69229752324ac;p=uccvend-snackrom.git

diff --git a/ROM2/main_basic.c b/ROM2/main_basic.c
index 21844bc..b7c110f 100644
--- a/ROM2/main_basic.c
+++ b/ROM2/main_basic.c
@@ -8,46 +8,177 @@
 #include "keypad.h"
 #include "chime.h"
 #include "coinmech.h"
+#include "motors.h"
 #include "comm.h"
 #include "vend.h"
 
+void motor_reply(char* slotptr, u8 code) {
+	/* returns a message of the form MXYY - X is return code, YY is motor */
+	wait_for_tx_free();
+	tx_buffer[0] = 'M';
+	tx_buffer[1] = code + '0';
+	tx_buffer[2] = *slotptr;
+	tx_buffer[3] = *(slotptr+1);
+	tx_buffer[4] = '\n';
+	tx_buffer[5] = 0;
+	send_packet();
+}
+
+void dispense_something() {
+	/* process a message VXX in msg_buf where XX is motor number */
+	u8 slot;
+
+	if ((msg_buf[1] < '0') || (msg_buf[1] > '9') ||
+		(msg_buf[2] < '0') || (msg_buf[2] > '9')) {
+		msg_buf[1] = msg_buf[2] = '0';
+		motor_reply((char*)&msg_buf[1], MOTOR_NOSLOT);
+		return;
+	}
+
+	slot = (msg_buf[1] - '0') * 10;
+	slot += msg_buf[2] - '0';
+
+	motor_reply((char*)&msg_buf[1], dispense_motor(slot));
+}
+
+void write_to_display() {
+	/* process a message in the form DXXXXXXXXXXX to send to display */
+	u8 i;
+	char buf[10];
+	for (i = 0; i < 10; i++)
+		if (msg_buf[i+1])
+			buf[i] = msg_buf[i+1];
+		else
+			break;
+
+	for (; i < 10; i++) /* pad the rest out with spaces */
+		buf[i] = ' ';
+
+	set_msg(buf);
+	send_ack();
+}
+
+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;
+	send_packet();
+}
+
+void give_change() {
+	u16 cost;
+
+	if ((msg_buf[1] < '0') || (msg_buf[1] > '9') ||
+		(msg_buf[2] < '0') || (msg_buf[2] > '9') ||
+		(msg_buf[3] < '0') || (msg_buf[3] > '9') ||
+		(msg_buf[4] < '0') || (msg_buf[4] > '9') ||
+		(msg_buf[5] < '0') || (msg_buf[5] > '9')) {
+		send_nack();
+	}
+	cost = msg_buf[1] - '0';
+	cost *= 10; cost = msg_buf[2] - '0';
+	cost *= 10; cost = msg_buf[3] - '0';
+	cost *= 10; cost = msg_buf[4] - '0';
+	cost *= 10; cost = msg_buf[5] - '0';
+
+	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 */
+	wait_for_tx_free();
+	tx_buffer[0] = 'K';
+	if (key == KEY_RESET)
+		tx_buffer[1] = 'R';
+	else
+		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();
+}
+
+void do_chime() {
+	chime_start();
+	send_ack();
+}
+
 int main() {
-	u16 last_coin_value = coin_value;
+	u16 last_coin_value;
+	bool last_door_open;
+
+	chime_start();
+	
+	misc_output = 0;
+	changer_output = 0x7f;
+	_io_ports[M6811_PORTA] = 0xc8;
+	_io_ports[M6811_DDRD] = 0x3e;
+	_io_ports[M6811_SPCR] = 0x12;
+
+	unlock(); /* enable interrupts */
 
-	/* init coin mech */
-	comm_init();
 	display_init();
+	comm_init();
+	coinmech_init();
+
+	last_coin_value = 0;
+	last_door_open = 0;
+	
 	while(1) {
+		if (door_open() != last_door_open) {
+			last_door_open = door_open();
+			send_door_msg(last_door_open);
+		}
+
 		if (rx_queue_state) {
 			switch (msg_buf[0]) {
-				case 'V': /* dispense something */
+				case 'V':
+					dispense_something();
 					break;
-				case 'D': /* write string to display */
+				case 'D':
+					write_to_display();
 					break;
-				case 'B': /* beep */
+				case 'B': 
+					do_chime();
 					break;
-				case 'U': /* query current coin balance */
+				case 'U':
+					send_balance();
 					break;
-				case 'G': /* give change */
+				case 'G':
+					give_change();
 					break;
 				default:
 				/* shrug */
+					send_nack();
 					break;
 			}
 			msg_clr();
 		}
+
 		keypad_read();
 		if (keypad_pressed()) {
-			/* send packet about it */
-			/* beep? */
+			send_keypress(last_key);
 		}
 
 		if (coin_value != last_coin_value) {
-			/* send a packet about it */
+			send_balance();
+			last_coin_value = coin_value;
 		}
 	}
 }
 
-void rti() {
-	chime(); /* turn chime on or off as need be */
-}