Subversion Repositories ssbcc

# Copyright 2014, Sinclair R.F., Inc.
 
def outstrobe(ad):
  """
  Built-in macro to send strobes to the specified strobe-only output port.\n
  Usage:
    .outstrobe(O_name)
  where
    O_name      is the name of the output port\n
  The effect is:  To active the strobe at the specified output port.\n
  ( - )
  """
 
  # Add the macro to the list of recognized macros.
  ad.AddMacro('.outstrobe', 2, [ ['','symbol'] ]);
 
  # Define the macro functionality.
  def emitFunction(ad,fp,argument):
    if not ad.IsOutstrobe(argument[0]['value']):
      raise asmDef.AsmException('Symbol "%s" is not a strobe-only output port at %s' % (argument[0]['value'],argument[0]['loc']));
    name = argument[0]['value'];
    ad.EmitPush(fp,ad.OutportAddress(name) & 0xFF,name);
    ad.EmitOpcode(fp,ad.InstructionOpcode('outport'),'outport');
 
  ad.EmitFunction['.outstrobe'] = emitFunction;