URL
https://opencores.org/ocsvn/ft816float/ft816float/trunk
Go to most recent revision |
Show entire file |
Details |
Blame |
View Log
| Rev 62 |
Rev 64 |
| Line 87... |
Line 87... |
end
|
end
|
count <= count + 1;
|
count <= count + 1;
|
if (count > 140)
|
if (count > 140)
|
count <= 1'd1;
|
count <= 1'd1;
|
if (adr==1) begin
|
if (adr==1) begin
|
flt <= 128'h27ffc000000000000000000000000000;
|
flt <= 128'h25ffc000000000000000000000000000; // 1
|
end
|
end
|
if (adr==2) begin
|
if (adr==2) begin
|
flt <= 128'h44000000000000000000000000000000;
|
flt <= 128'h26000000000000000000000000000000; // 10
|
end
|
end
|
if (adr==3) begin
|
if (adr==3) begin
|
flt <= 128'h44004000000000000000000000000000;
|
flt <= 128'h26004000000000000000000000000000; // 100
|
end
|
end
|
if (adr==4) begin
|
if (adr==4) begin
|
flt <= 128'h44008000000000000000000000000000;
|
flt <= 128'h26008000000000000000000000000000; // 1000
|
end
|
end
|
if (adr==5) begin
|
if (adr==5) begin
|
flt <= 128'h48000000000000000000000000000000;
|
flt <= 128'h2601934B9C0C00000000000000000000; // 12345678
|
end
|
end
|
if (count==140) begin
|
if (count==140) begin
|
$fwrite(outfile, "%c %h\t%h%c\n", adr[11] ? "s" : "u", flt, bin, vf ? "v": " ");
|
$fwrite(outfile, "%c %h\t%h%c\n", adr[11] ? "s" : "u", flt, bin, vf ? "v": " ");
|
adr <= adr + 1;
|
adr <= adr + 1;
|
end
|
end
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.