示例#1
0
        public override IEnumerable <TmsCommand> Translate(Z80AssemblyParsing.Commands.NegateCommand z80Command)
        {
            var negOneByte         = new LabeledAddressTmsOperand(_labelHighlighter.NegOneByteLabel);
            var accumulatorLowByte = new IndirectRegisterTmsOperand(WorkspaceRegister.R12);
            var accumulatorOperand = new RegisterTmsOperand(_registerMap[Z80AssemblyParsing.Register.A]);

            yield return(new MoveByteCommand(z80Command, negOneByte, accumulatorLowByte));

            yield return(new NegateCommand(z80Command, accumulatorOperand));
        }
示例#2
0
        public override IEnumerable <TmsCommand> Translate(Z80AssemblyParsing.Commands.RotateRightCarryCommand rotateRightCarryCommand)
        {
            var registerOperand         = new RegisterTmsOperand(_registerMap[Z80AssemblyParsing.Register.A]);
            var indirectRegisterOperand = new IndirectRegisterTmsOperand(WorkspaceRegister.R12);
            var oneBitOperand           = new ImmediateTmsOperand(1);

            yield return(new MoveByteCommand(rotateRightCarryCommand, registerOperand, indirectRegisterOperand));

            yield return(new ShiftRightCircularCommand(rotateRightCarryCommand, oneBitOperand, registerOperand));
        }
示例#3
0
        public override IEnumerable <TmsCommand> Translate(T logicCommand)
        {
            var zeroByte           = new LabeledAddressTmsOperand(_labelHighlighter.ZeroByteLabel);
            var accumulatorLowByte = new IndirectRegisterTmsOperand(WorkspaceRegister.R12);
            var accumulatorOperand = new RegisterTmsOperand(_registerMap[Z80AssemblyParsing.Register.A]);

            if (logicCommand.Operand is Z80AssemblyParsing.Operands.IndirectRegisterOperand &&
                MustUnifyRegisterPairs(logicCommand.Operand, out var copyFromOperand, out var copyToOperand, out var unifiedOperand))
            {
                yield return(new MoveByteCommand(logicCommand, copyFromOperand, copyToOperand));

                yield return(GetEquivCommand <TmsEquivCommand>(logicCommand, unifiedOperand, accumulatorOperand));
            }
 protected bool MustUnifyRegisterPairs(Z80AssemblyParsing.Operand z80operand, out Operand copyFromOperand, out Operand copyToOperand, out Operand unifiedOperand)
 {
     if (z80operand is Z80Operands.IndirectRegisterOperand indirectRegisterOperand &&
         !RegisterPairIsMappedToSameWorkspaceRegister(indirectRegisterOperand.Register))
     {
         var registerPair = indirectRegisterOperand.Register;
         if (_unsplitableRegisters.Contains(registerPair))
         {
             throw new Exception("Can't do unify operation for " + registerPair);
         }
         else
         {
             copyFromOperand = new RegisterTmsOperand(_registerMap[GetLastRegisterInPair(registerPair)]);
             copyToOperand   = new IndirectRegisterTmsOperand(GetRegisterPointingToLowerByte(registerPair));
             unifiedOperand  = new IndirectRegisterTmsOperand(_registerMap[GetFirstRegisterInPair(registerPair)]);
         }
         return(true);
     }