 CONST
    nac$di_power_on_reset = 0(16),
    nac$ica_channel_master_clear = 5(16),
    nac$ica_reset_function = 6(16),
    nac$di_reset_kils_no_dump = 33(16),
    nac$ac_power_low = 38(16),
    nac$di_reset_protocol_stk_chg = 40(16),
    nac$mpb_ii_reset = 46(16),
    nac$max_di_reset_code = 0ff(16),
    nac$low_transmit_rate = 4800,
    nac$high_transmit_rate = 2000000;

  TYPE
    nat$di_dump_error_list = SET of 0 .. nac$max_di_reset_code,
    nat$init_exception_list = ^array [1 .. * ] of nat$init_exception_entry,
    nat$init_exception_entry = record
      system_id: nat$system_identifier,
      service_system: boolean,
      version_specified: boolean,
      object_code_version: nat$object_code_version,
      dump_error_list: nat$di_dump_error_list,
      transmit_rate: nat$transmit_rate,
    recend,
    nat$transmit_rate = nac$low_transmit_rate .. nac$high_transmit_rate;

?? PUSH (LISTEXT := ON) ??
*copyc nat$network_address
?? POP ??
