31  *    Looped Sound - Subtype of sound: plays in a loop using a

    31  *    Looped Sound - Subtype of sound: plays in a loop using a

    32  *                   "channel", of which the id is returned on start.

    32  *                   "channel", of which the id is returned on start.

    33  *                   The channel id can be used to stop a specific sound loop.

    33  *                   The channel id can be used to stop a specific sound loop.

    34  *)

    34  *)

    35 interface

    35 interface

    37 

    37 

    38 procedure initModule;

    38 procedure initModule;

    39 procedure freeModule;

    39 procedure freeModule;

    40 

    40 

    41 procedure InitSound;                            // Initiates sound-system if isSoundEnabled.

    41 procedure InitSound;                            // Initiates sound-system if isSoundEnabled.