with INTERFACE_DATA_TYPES_488;   use INTERFACE_DATA_TYPES_488;
with COMMON_TO_BOTH_488;         use COMMON_TO_BOTH_488;
with PC_HW_488;                  use PC_HW_488;

package body HW_SPECIFIC_EVENT_488 is

   procedure INITIALIZE is
   begin
      INIT_IT(PC_RETURN_STATUS'address, 0, DEVICE_ID);
      SET_TIMEOUT(PC_RETURN_STATUS'address, T3s);
      if CONTROL then
         SET_REMOTE_LINE(PC_RETURN_STATUS'address,
                         1);
         SEND_INTERFACE_CLEAR(PC_RETURN_STATUS'address); 
      end if;
   end INITIALIZE;

   procedure SET_PARAMETERS is separate;

begin

   SET_PARAMETERS;

end HW_SPECIFIC_EVENT_488;