Index

Package: Digital_Samples

Description

package Allegro.Digital_Samples is

Types

A_Sample

type A_Sample is access all Sample;

A_Sample_Loader

type A_Sample_Loader is
        access function( filename : C.Strings.chars_ptr ) return A_Sample;

A_Sample_Saver

type A_Sample_Saver is
        access function( filename : C.Strings.chars_ptr; spl : A_Sample ) return Integer;

Volume_Type

type Volume_Type is range 0..255;

Pan_Type

type Pan_Type is range 0..255;

Subprograms & Entries

Adjust_Sample

procedure Adjust_Sample
( spl: not null A_Sample;
vol: Volume_Type;
pan: Pan_Type;
freq: Integer;
loopit: Integer );

Allocate_Voice

function Allocate_Voice
( spl: not null A_Sample ) return Integer;

Create_Sample

function Create_Sample
( bits, stereo, freq, len: Integer ) return A_Sample;

Deallocate_Voice

procedure Deallocate_Voice
( voice: Integer );

Destroy_Sample

procedure Destroy_Sample
( spl: in out A_Sample );

Load_Sample

function Load_Sample
( filename: String ) return A_Sample;

Load_Voc

function Load_Voc
( filename: String ) return A_Sample;

Load_Voc_pf

function Load_Voc_pf
( f: not null A_Packfile ) return A_Sample;

Load_Wav

function Load_Wav
( filename: String ) return A_Sample;

Load_Wav_pf

function Load_Wav_pf
( f: not null A_Packfile ) return A_Sample;

Lock_Sample

procedure Lock_Sample
( spl: not null A_Sample );

Play_Sample

function Play_Sample
( spl: not null A_Sample;
vol: Volume_Type;
pan: Pan_Type;
freq: Integer;
loopit: Integer ) return Integer;

Reallocate_Voice

procedure Reallocate_Voice
( voice: Integer;
spl: not null A_Sample );

Register_Sample_File_Type

procedure Register_Sample_File_Type
( ext: String;
load: A_Sample_Loader;
save: A_Sample_Saver );

Save_Sample

function Save_Sample
( filename: String;
spl: not null A_Sample ) return Boolean;

Stop_Sample

procedure Stop_Sample
( spl: not null A_Sample );

Release_Voice

procedure Release_Voice
( voice: Integer );

Voice_Check

function Voice_Check
( voice: Integer ) return A_Sample;

Voice_Get_Frequency

function Voice_Get_Frequency
( voice: Integer ) return Integer;

Voice_Get_Position

function Voice_Get_Position
( voice: Integer ) return Integer;

Voice_Get_Volume

function Voice_Get_Volume
( voice: Integer ) return Integer;

Voice_Ramp_Volume

procedure Voice_Ramp_Volume
( voice, time: Integer;
endvol: Volume_Type );

Voice_Set_Frequency

procedure Voice_Set_Frequency
( voice, frequency: Integer );

Voice_Set_Playmode

procedure Voice_Set_Playmode
( voice, playmode: Integer );

Voice_Set_Position

procedure Voice_Set_Position
( voice: Integer;
position: Integer );

Voice_Set_Priority

procedure Voice_Set_Priority
( voice, priority: Integer );

Voice_Set_Volume

procedure Voice_Set_Volume
( voice: Integer;
volume: Volume_Type );

Voice_Start

procedure Voice_Start
( voice: Integer );

Voice_Stop

procedure Voice_Stop
( voice: Integer );

Voice_Stop_Volumeramp

procedure Voice_Stop_Volumeramp
( voice: Integer );

Voice_Sweep_Frequency

procedure Voice_Sweep_Frequency
( voice, time, endfreq: Integer );

Voice_Stop_Frequency_Sweep

procedure Voice_Stop_Frequency_Sweep
( voice: Integer );

Voice_Get_Pan

function Voice_Get_Pan
( voice: Integer ) return Integer;

Voice_Set_Pan

procedure Voice_Set_Pan
( voice: Integer;
pan: Pan_Type );

Voice_Sweep_Pan

procedure Voice_Sweep_Pan
( voice, time: Integer;
endpan: Pan_Type );

Voice_Stop_Pan_Sweep

procedure Voice_Stop_Pan_Sweep
( voice: Integer );

Voice_Set_Echo

procedure Voice_Set_Echo
( voice, strength, thedelay: Integer );

Voice_Set_Tremolo

procedure Voice_Set_Tremolo
( voice, rate, depth: Integer );

Voice_Set_Vibrato

procedure Voice_Set_Vibrato
( voice, rate, depth: Integer );