URL
https://opencores.org/ocsvn/sqmusic/sqmusic/trunk
[/] [sqmusic/] [trunk/] [ver/] [sq_opn_basic.v] - Diff between revs 19 and 20
Go to most recent revision |
Show entire file |
Details |
Blame |
View Log
| Rev 19 |
Rev 20 |
| Line 13... |
Line 13... |
`timescale 1ns/1ps
|
`timescale 1ns/1ps
|
|
|
module sq_opn_basic;
|
module sq_opn_basic;
|
|
|
reg clk, reset_n;
|
reg clk, reset_n;
|
wire signed [12:0] linear;
|
reg [6:0] gain;
|
|
wire signed [13:0] linear;
|
|
|
parameter fnumber = 11'h1;
|
parameter fnumber = 11'h40E;
|
parameter block = 3'h0;
|
parameter block = 3'h4;
|
parameter multiple= 4'h1;
|
parameter multiple= 4'h1;
|
|
|
initial begin
|
initial begin
|
$dumpvars(0,sq_opn_basic);
|
$dumpvars(0,sq_opn_basic);
|
$dumpon;
|
$dumpon;
|
reset_n = 0;
|
reset_n = 0;
|
|
gain = 7'd0;
|
#300 reset_n=1;
|
#300 reset_n=1;
|
$display("SOUND START");
|
$display("SOUND START");
|
#(1e10)
|
#0.01e9
|
|
forever #0.01e9 begin
|
|
if( gain == 7'h7F )
|
$finish;
|
$finish;
|
|
else
|
|
gain <= gain + 1;
|
|
// if( $realtime > 64*0.01e9 ) $finish;
|
|
end
|
|
// $finish;
|
end
|
end
|
|
|
always begin
|
always begin
|
clk = 0;
|
clk = 0;
|
forever #(125/2*144) clk = ~clk & reset_n;
|
forever #(125/2) clk = ~clk & reset_n;
|
end
|
end
|
|
|
sq_slot slot(
|
sq_slot slot(
|
.clk (clk),
|
.clk (clk),
|
.reset_n (reset_n),
|
.reset_n (reset_n),
|
.fnumber (fnumber),
|
.fnumber (fnumber),
|
.block (block),
|
.block (block),
|
.multiple(multiple),
|
.multiple(multiple),
|
|
.totallvl(gain),
|
.linear (linear)
|
.linear (linear)
|
);
|
);
|
|
|
// always #(1e9/44100) $display("%d", linear);
|
// always #(1e9/44100) $display("%d", linear);
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.