OpenCores
URL https://opencores.org/ocsvn/t6507lp/t6507lp/trunk

Subversion Repositories t6507lp

[/] [t6507lp/] [trunk/] [rtl/] [verilog/] [t6507lp_alu.v] - Diff between revs 233 and 234

Go to most recent revision | Show entire file | Details | Blame | View Log

Rev 233 Rev 234
Line 317... Line 317...
                                else begin
                                else begin
                                        AL = op1[3:0] + op2[3:0] + alu_status[C];
                                        AL = op1[3:0] + op2[3:0] + alu_status[C];
                                        AH = op1[7:4] + op2[7:4];
                                        AH = op1[7:4] + op2[7:4];
                                        STATUS[Z] = (AL == 0 && AH == 0) ? 1 : 0;
                                        STATUS[Z] = (AL == 0 && AH == 0) ? 1 : 0;
                                        if (AL > 9) begin
                                        if (AL > 9) begin
                                                bcdl = AL - 6;
                                                bcdl = AL + 6;
                                                bcdh = AH + 1;
                                                bcdh = AH + 1;
                                        end
                                        end
                                        else begin
                                        else begin
                                                bcdl = AL;
                                                bcdl = AL;
                                                bcdh = AH;
                                                bcdh = AH;

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.