mirror of
https://github.com/garrettsworkshop/Warp-SE.git
synced 2024-11-25 13:33:58 +00:00
38 lines
1.0 KiB
Verilog
38 lines
1.0 KiB
Verilog
module FSB(
|
|
/* MC68HC000 interface */
|
|
input FCLK, input nAS, output reg nDTACK, output reg nVPA,
|
|
/* MC68HC000 clock enable */
|
|
input MCKEi, output reg MCKE,
|
|
/* AS cycle detection */
|
|
output BACT, output reg BACTr,
|
|
/* Ready inputs */
|
|
input ROMCS,
|
|
input RAMCS, input RAMReady,
|
|
input IOPWCS, input IOPWReady, input IONPReady,
|
|
input IOQoSEN,
|
|
/* Interrupt acknowledge select */
|
|
input IACKCS);
|
|
|
|
/* MC68k clock enable */
|
|
always @(negedge FCLK) MCKE <= MCKEi;
|
|
|
|
/* AS cycle detection */
|
|
reg ASrf = 0;
|
|
always @(negedge FCLK) begin ASrf <= !nAS; end
|
|
assign BACTu = !nAS || ASrf;
|
|
assign BACT = BACTu && MCKE;
|
|
always @(posedge FCLK) BACTr <= BACT;
|
|
|
|
/* DTACK/VPA control */
|
|
wire Ready = (RAMCS && !IOQoSEN && RAMReady && !IOPWCS) ||
|
|
(RAMCS && !IOQoSEN && RAMReady && IOPWCS && IOPWReady) ||
|
|
(ROMCS && !IOQoSEN) ||
|
|
(IONPReady);
|
|
always @(posedge FCLK) nDTACK <= !(Ready && BACT && !IACKCS);
|
|
always @(posedge FCLK, posedge nAS) begin
|
|
if (nAS) nVPA <= 1;
|
|
else nVPA <= !(Ready && BACT && IACKCS);
|
|
end
|
|
|
|
endmodule
|