CoCo: Implement lobby command

Author: RichStephens

src/coco/input.c

@@ -284,6 +284,10 @@ HDSubState input_hosts_and_devices_hosts(void)
 		bar_jump(selected_host_slot);
 		k = 0;
 		return HD_HOSTS;
+	case 'l':
+  	case 'L':
+    	mount_and_boot_lobby();
+    	return HD_HOSTS;
 	case '1':
 	case '2':
 	case '3':
@@ -316,6 +320,10 @@ HDSubState input_hosts_and_devices_devices(void)
 	case 'e':
 		hosts_and_devices_eject((byte)bar_get());
 		break;
+	case 'L':
+  	case 'l':
+    	mount_and_boot_lobby();
+    	return HD_DEVICES;
 	case 'R':
 	case 'r':
 		selected_device_slot = (byte)bar_get();

src/coco/mount_and_boot.c

@@ -1,10 +1,28 @@
 #ifdef _CMOC_VERSION_
 
 #include "mount_and_boot.h"
+#include "../screen.h"
 #include "../typedefs.h"
+#include "../globals.h"
 
 void mount_and_boot_lobby(void)
 {
+	if (screen_mount_and_boot_lobby())
+	{
+		fuji_set_boot_mode(2);
+		system_boot();
+	}
+	else
+	{
+    if (hd_subState == HD_HOSTS)
+    {
+      screen_hosts_and_devices_hosts();
+    }
+    else if (hd_subState == HD_DEVICES)
+    {
+      screen_hosts_and_devices_devices();
+    }
+	}
 }
 
 void mount_and_boot(void)

src/coco/screen.c

@@ -571,14 +571,35 @@ void screen_connect_wifi(NetConfig *nc)
   screen_add_shadow(9,BLUE); // change to CYAN
 }
 
+bool screen_mount_and_boot_lobby(void)
+{
+	unsigned char k;
+
+	// Confirm we want to go to there
+	locate(0, 15);
+	printf(" BOOT TO LOBBY? y/n");
+
+	k = waitkey(true);
+
+	switch (k)
+	{
+	case 'Y':
+	case 'y':
+		return true;
+	default:
+		return false;
+	}
+}
+
 void screen_end(void)
 {
-  // Restore the original casing flag.
-  asm {
+	// Restore the original casing flag.
+	asm 
+  {
     lda orig_casflag
       sta $011A
-      }
-  return;
+	}
+	return;
 }
 
 #endif