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

Subversion Repositories s80186

[/] [s80186/] [trunk/] [sim/] [cppmodel/] [instructions/] [das.cpp] - Blame information for rev 2

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 2 jamieiles
// Copyright Jamie Iles, 2017
2
//
3
// This file is part of s80x86.
4
//
5
// s80x86 is free software: you can redistribute it and/or modify
6
// it under the terms of the GNU General Public License as published by
7
// the Free Software Foundation, either version 3 of the License, or
8
// (at your option) any later version.
9
//
10
// s80x86 is distributed in the hope that it will be useful,
11
// but WITHOUT ANY WARRANTY; without even the implied warranty of
12
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13
// GNU General Public License for more details.
14
//
15
// You should have received a copy of the GNU General Public License
16
// along with s80x86.  If not, see <http://www.gnu.org/licenses/>.
17
 
18
// das
19
void EmulatorPimpl::das2f()
20
{
21
    uint16_t flags = registers->get_flags();
22
 
23
    auto al = registers->get(AL);
24
    auto ah = registers->get(AH);
25
    if ((al & 0x0f) > 9 || (flags & AF)) {
26
        uint16_t tmp = al - 6;
27
        al = tmp & 0xff;
28
        flags |= AF;
29
        if (tmp & 0xff00)
30
            flags |= CF;
31
    } else {
32
        flags &= ~AF;
33
    }
34
 
35
    if (al > 0x9f || (flags & CF)) {
36
        al -= 0x60;
37
        flags |= CF;
38
    } else {
39
        flags &= ~CF;
40
    }
41
 
42
    if (al & 0x80)
43
        flags |= SF;
44
    if (!al)
45
        flags |= ZF;
46
    if (!__builtin_parity(al))
47
        flags |= PF;
48
 
49
    registers->set(AL, al);
50
    registers->set(AH, ah);
51
    registers->set_flags(flags, SF | ZF | AF | CF | PF);
52
}

powered by: WebSVN 2.1.0

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