
{    DECK:  RFD$MC_INITIALIZATION_PRAMS
{
{    This deck defines the template used to generate the microcode
{    initialization parameters.  Further information on these
{    constants can be obtained in the NAD Hardware reference manuals.


  CONST
      rfc$nad_type_1_buff_lgth = 0810(16);

  CONST
      rfc$nad_type_1_header_lgth = 10(16);

  CONST
      rfc$nad_ctrl_mess_buff_lgth = 30(16);

  CONST
      rfc$min_type_1_buffs = 2;

  CONST
      rfc$max_nad_memory_size = 0ffff(16),
      rfc$default_memory_size = 00ff(16);

  TYPE
      rft$mc_initialization_prams = PACKED RECORD
        memory_size: rft$nad_memory_size,
        fill1: 0..0fff(16),
        tcu_enables: rft$tcu_mask,
        stream_mode: 0..0ffff(16),
        connecting_nads: 0..0ffff(16),
        max_connections: 0..0ffff(16),
        fill2: 0..0ffff(16),
        system_buffers: 0..0ffff(16),
        fill3: 0..0ffff(16),
        control_messages: 0..0ffff(16),
        type_0_buff_size: rft$nad_buffer_size,
        type_0_buff_count: rft$nad_buffer_count,
        type_1_buff_size: rft$nad_buffer_size,
        type_1_buff_count: rft$nad_buffer_count,
        type_2_buff_size: rft$nad_buffer_size,
        type_2_buff_count: rft$nad_buffer_count,
        type_3_buff_size: rft$nad_buffer_size,
        type_3_buff_count: rft$nad_buffer_count,
        fill4: 0..0ffff(16),
        fill5: 0..0ffff(16),
        incoming_control_messages: 0..0ffff(16),
        outgoing_control_messages: 0..0ffff(16),
        send_queue_limit: 0..0ffff(16),
        receive_queue_limit: 0..0ffff(16),
        fill6: 0..1,
        monitor_trace: rft$nad_trace_parameter,
        trunk_trace: rft$nad_trace_parameter,
        device_trace: rft$nad_trace_parameter,
        fill7: 0..0ffff(16),
        fill8: 0..0ffff(16),
        fill9: 0..0ffff(16),
        fill10: 0..0ffff(16),
        dummy_1: 0..0ffff(16),  {  These dummy entries are used to make
        dummy_2: 0..0ffff(16),  {  the init prams a multiple of 6.  This
      RECEND;                   {  is to handle the 12-bit to 16-bit
                                {  transition across the 170 channel.

  TYPE
      rft$nad_buffer_size = 0..0ffff(16);

  TYPE
      rft$nad_buffer_count = 0..0ffff(16);

  TYPE
      rft$nad_memory_size = 0..0ffff(16);

?? PUSH (LISTEXT := ON) ??
*copyc rft$configuration_defs
?? POP ??

