Skip to content

Insert/AcousticModemComms.tl

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
#   Copyright (c) 2024 MBARI
#   MBARI Proprietary Information. Confidential. All Rights Reserved
#   Unauthorized copying or distribution of this file via any medium is strictly
#   prohibited.
#
#   WARNING - This file contains information whose export is restricted by the
#   Export Administration Act of 1979 (Title 50, U.S.C., App. 2401 et seq.), as
#   amended. Violations of these export laws are subject to severe civil and/or
#   criminal penalties.

aggregate AcousticModemComms {
  """
  Triggers periodic acoustic comms.
  """

  arguments {
    Timeout = 10 minute

    CommsInterval = 5 minute
      """
      The timing is based on the variable Universal:platform_communications
      """
  }

  run while (
    elapsed ( Universal:platform_communications ) > CommsInterval
  )

  aggregate CheckIn {
    run in sequence

    readDatum {
      timeout duration=Timeout

      Universal:platform_communications
    }
  }
}