Add support for Miracle Piano. (#215)

Adds midi interface to support Miracle Piano.
-Set the Miracle Piano to yes in the input section to set the piano to controller 2.

Author: greyrogue

Genesis.sv

@@ -177,7 +177,7 @@ module emu
 //`define DEBUG_BUILD
 
 assign ADC_BUS  = 'Z;
-assign {UART_RTS, UART_TXD, UART_DTR} = 0;
+//assign {UART_RTS, UART_TXD, UART_DTR} = 0;
 assign BUTTONS   = osd_btn;
 assign {SD_SCK, SD_MOSI, SD_CS} = 'Z;
 
@@ -244,11 +244,11 @@ video_freak video_freak
 // 0         1         2         3          4         5         6   
 // 01234567890123456789012345678901 23456789012345678901234567890123
 // 0123456789ABCDEFGHIJKLMNOPQRSTUV 0123456789ABCDEFGHIJKLMNOPQRSTUV
-// XXXXXXXXXXXX XXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXX
+// XXXXXXXXXXXX XXXXXXXXXXXXXXXXXXX XXXXXXXXXXXXXXXXXXXXXXXXX
 
 `include "build_id.v"
 localparam CONF_STR = {
-	"Genesis;;",
+	"Genesis;UART31250,MIDI;",
 	"FS,BINGENMD ;",
 	"-;",
 	"O67,Region,JP,US,EU;",
@@ -295,6 +295,7 @@ localparam CONF_STR = {
 	"P2o89,Gun Control,Disabled,Joy1,Joy2,Mouse;",
 	"D4P2oA,Gun Fire,Joy,Mouse;",
 	"D4P2oBC,Cross,Small,Medium,Big,None;",
+	"P2oO,Miracle Piano,No,Yes;",
 
 	"P3,Miscellaneous;",
 	"P3-;",
@@ -1124,13 +1125,44 @@ always @(posedge clk_sys) begin
 		USER_OUT[2] <= SERJOYSTICK_OUT[4];
 		USER_OUT[6] <= SERJOYSTICK_OUT[5];
 		USER_OUT[4] <= SERJOYSTICK_OUT[6];
+	end else if (piano) begin
+		SERJOYSTICK_IN[0] <= piano_joypad_do;//up
+		SERJOYSTICK_IN[1] <= 0;//down	
+		SERJOYSTICK_IN[2] <= 0;//left	
+		SERJOYSTICK_IN[3] <= 0;//right
+		SERJOYSTICK_IN[4] <= 0;//b TL		
+		SERJOYSTICK_IN[5] <= 0;//c TR GPIO7			
+		SERJOYSTICK_IN[6] <= 0;//  TH
+		SERJOYSTICK_IN[7] <= 0;
+		SER_OPT[0] <= 1'b0;
+		SER_OPT[1] <= 1'b1;
+		piano_clock <= SERJOYSTICK_OUT[5];
+		piano_strobe <= SERJOYSTICK_OUT[6];
 	end else begin
 		SER_OPT  <= 0;
 		USER_OUT <= '1;
 	end
 end
 
 
+assign {UART_RTS, UART_DTR} = 1;
+wire [15:0] uart_data;
+wire piano_joypad_do;
+wire piano_clock;
+wire piano_strobe;
+wire piano = status[56];
+miraclepiano miracle(
+	.clk(clk_sys),
+	.reset(reset_nes || !piano),
+	.strobe(piano_strobe),
+	.joypad_o(piano_joypad_do),
+	.joypad_clock(piano_clock),
+	.data_o(uart_data),
+	.txd(UART_TXD),
+	.rxd(UART_RXD)
+);
+
+
 //debug
 reg       VDP_BGA_EN = 1;
 reg       VDP_BGB_EN = 1;

files.qip

@@ -19,6 +19,7 @@ set_global_assignment -name SYSTEMVERILOG_FILE rtl/gen_io.sv
 set_global_assignment -name SYSTEMVERILOG_FILE rtl/teamplayer.sv
 set_global_assignment -name VERILOG_FILE rtl/fourway.v
 set_global_assignment -name SYSTEMVERILOG_FILE rtl/multitap.sv
+set_global_assignment -name SYSTEMVERILOG_FILE rtl/miracle.sv
 set_global_assignment -name SYSTEMVERILOG_FILE rtl/system.sv
 set_global_assignment -name SDC_FILE Genesis.sdc
 set_global_assignment -name SYSTEMVERILOG_FILE Genesis.sv