mirror of
https://github.com/garrettsworkshop/Warp-SE.git
synced 2024-11-28 20:52:22 +00:00
106 lines
2.8 KiB
Verilog
106 lines
2.8 KiB
Verilog
module CNT(
|
|
/* FSB clock and E clock inputs */
|
|
input CLK, input E,
|
|
/* Refresh request */
|
|
output reg RefReq, output reg RefUrg,
|
|
/* Reset, button */
|
|
output reg nRESout, input nIPL2,
|
|
/* Mac PDS bus master control outputs */
|
|
output reg AoutOE, output reg nBR_IOB,
|
|
/* Sound QoS */
|
|
input BACT, input nWE,
|
|
input SndROMCS, input SndRAMCSWR, input RAMCS,
|
|
output reg QoSReady);
|
|
|
|
/* E clock synchronization */
|
|
reg [1:0] Er;
|
|
wire EFall = Er[1] && !Er[0];
|
|
always @(posedge CLK) Er[1:0] <= { Er[0], E };
|
|
|
|
/* NMI button synchronization */
|
|
reg nIPL2r; always @(posedge CLK) nIPL2r <= nIPL2;
|
|
|
|
/* Startup sequence state */
|
|
reg [1:0] IS = 0;
|
|
|
|
/* Timer counts from 0 to 1010 (10) -- 11 states == 14.042 us
|
|
* Refresh timer sequence
|
|
* | Timer | RefReq | RefUrg |
|
|
* |---------|--------|-----------|
|
|
* | 0 0000 | 0 | 0 |
|
|
* | 1 0001 | 1 | 0 |
|
|
* | 2 0010 | 1 | 0 |
|
|
* | 3 0011 | 1 | 0 |
|
|
* | 4 0100 | 1 | 0 |
|
|
* | 5 0101 | 1 | 0 |
|
|
* | 6 0110 | 1 | 0 |
|
|
* | 7 0111 | 1 | 0 |
|
|
* | 8 1000 | 1 | 0 |
|
|
* | 9 1001 | 1 | 0 |
|
|
* | 10 1010 | 1 | 1 |
|
|
* back to timer==0
|
|
*/
|
|
reg [3:0] Timer = 0;
|
|
wire TimerTC = RefUrg;
|
|
always @(posedge CLK) begin
|
|
if (EFall) begin
|
|
if (TimerTC) Timer <= 0;
|
|
else Timer <= Timer+1;
|
|
RefUrg <= Timer==9;
|
|
RefReq <= !(Timer==10);
|
|
end
|
|
end
|
|
|
|
/* During init (IS!=3) long timer counts from 0 to 4095.
|
|
* 4096 states == 57.516 ms
|
|
* During operation (IS==3) long timer counts from 0 to 3
|
|
* starting at first sound RAM access.
|
|
* Period is 28.124 us - 42.240 us */
|
|
reg [11:0] LTimer;
|
|
reg LTimerTC;
|
|
always @(posedge CLK) begin
|
|
if (IS==3) begin
|
|
LTimer[11:2] <= 0;
|
|
if (BACT && SndRAMCSWR) LTimer[1:0] <= 1;
|
|
else if (LTimer==0) LTimer[1:0] <= 0;
|
|
else if (EFall && TimerTC) LTimer[1:0] <= LTimer+1;
|
|
end else if (EFall && TimerTC) LTimer <= LTimer+1;
|
|
LTimerTC <= LTimer[11:0]==12'hFFE;
|
|
end
|
|
|
|
/* Sound QoS */
|
|
reg [3:0] WS = 0;
|
|
always @(posedge CLK) begin
|
|
if (!BACT) WS <= 0;
|
|
else WS <= WS+1;
|
|
QoSReady <= (LTimer[1:0]==0) || (BACT && (
|
|
QoSReady || WS==15 || !nWE || (!RAMCS && !SndROMCS)));
|
|
end
|
|
|
|
/* Startup sequence state control */
|
|
wire ISTC = EFall && TimerTC && LTimerTC;
|
|
always @(posedge CLK) begin
|
|
case (IS[1:0])
|
|
0: begin
|
|
AoutOE <= 0; // Tristate PDS address and control
|
|
nRESout <= 0; // Hold reset low
|
|
nBR_IOB <= 0; // Default to request bus
|
|
if (ISTC) IS <= 1;
|
|
end 1: begin
|
|
AoutOE <= 0;
|
|
nRESout <= 0;
|
|
nBR_IOB <= !(!nBR_IOB && nIPL2r); // Disable bus request if NMI pressed
|
|
if (ISTC && nIPL2r) IS <= 2;
|
|
end 2: begin
|
|
AoutOE <= !nBR_IOB;
|
|
nRESout <= 0;
|
|
if (ISTC) IS <= 3;
|
|
end 3: begin
|
|
nRESout <= 1; // Release reset
|
|
IS <= 3;
|
|
end
|
|
endcase
|
|
end
|
|
|
|
endmodule
|