Macintosh-HW
/
Warp-SE
mirror of https://github.com/garrettsworkshop/Warp-SE.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Update IOBS.v

This commit is contained in:
Zane Kaminski 2021-11-22 08:28:06 -05:00
parent 7b6f6f676f
commit 82fa392411
1 changed files with 10 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
cpld/IOBS.v
View File

@ -27,18 +27,23 @@ module IOBS(
/* FIFO second level control */
reg Load1;
reg Clear1;
reg IORW1;
reg IOL1;
reg IOU1;
always @(posedge CLK) begin
if (PS!=0 && BACT && IOCS && ~Once && ~ALE1) begin
ALE1 <= 1;
IORW1 <= nWE;
Load1 <= 1;
end else begin
if (PS==3) ALE1 <= 0;
Load1 <= 0;
end
end else Load1 <= 0;
end
always @(posedge CLK) begin
if (PS==3 && ALE1) Clear1 <= 1;
else Clear1 <= 0;
end
always @(posedge CLK) begin
if (Load1) ALE1 <= 1;
else if (Clear1) ALE1 <= 0;
end
always @(posedge CLK) begin
if (Load1) begin