root/as8085/xra_85.hpp

DEFINITIONS

1. strcmp

// $Log: xra_85.hpp,v $
// Revision 1.2  2011/03/25 22:47:07  doug
// add log and trim gpl stuff
////

char xra_85[] = "$Id: xra_85.hpp,v 1.2 2011/03/25 22:47:07 doug Exp $";

// Copyright(c)2011 Douglas W. Goodall, United States.

if(0 == strcmp(strupr(g_szOpcode),"XRA")) {
        fprintf(g_flog,"Processing 8085 XRA g_szOpcode\n");
        g_iLineType = TYPE_8085;
        g_iErrorNo ^= ERROR_UNKOP;
        if(0 < strlen(g_szParms)) {
                switch(g_szParms[0]) {
                        case 'a':
                        case 'A':
                                g_ucBytes[g_iBytesIndex++] = 0xAF;
                                break;
                        case 'b':
                        case 'B':
                                g_ucBytes[g_iBytesIndex++] = 0xA8;
                                break;
                        case 'c':
                        case 'C':
                                g_ucBytes[g_iBytesIndex++] = 0xA9;
                                break;
                        case 'd':
                        case 'D':
                                g_ucBytes[g_iBytesIndex++] = 0xAA;
                                break;
                        case 'e':
                        case 'E':
                                g_ucBytes[g_iBytesIndex++] = 0xAB;
                                break;
                        case 'h':
                        case 'H':
                                g_ucBytes[g_iBytesIndex++] = 0xAC;
                                break;
                        case 'l':
                        case 'L':
                                g_ucBytes[g_iBytesIndex++] = 0xAD;
                                break;
                        case 'm':
                        case 'M':
                                g_ucBytes[g_iBytesIndex++] = 0xAE;
                                break;
                        default:
                                g_iErrorNo |= ERROR_NOREG;
                                break;
                }

        } else {
                g_iErrorNo |= ERROR_NOPARM;
        }
}

///////////////////
// eof - xra.hpp //
///////////////////