(*



            A little help to use SBC_TPx.TPU with your programs
            ллллллллллллллллллллллллллллллллллллллллллллллллллл






 Public variables
 ============================================================================

 Name:                  Variable:      Use as:         Default:


 _ct_io_addx          : word         : Read/Write    | Updating by procedure
 _ct_int_num          : word         : Read/Write    | GetEnvSetting or by
 _ct_dma_channel      : word         : Read/Write    | SBC_SCAN_CARD and
                                                     | SBC_SCAN_INT functions
                                                     | or by your own program

 _wCardID             : word         : Read/Write    | Updating by procedure
                                                     | GetEnvSetting or by
                                                     | your own program


 sbclib_version_major : word         : READ ONLY     : Updated allready
 sbclib_version_minor : word         : READ ONLY     : Updated allready


 EXTENDED public variables to get full advantage of interface
 ============================================================================

 Name:                  Variable:      Use as:         Default:


 _midi_send_wait      : byte         : R/W           | 10
                                                     |
                                                     | Delay time between
                                                     | byte for send midi
                                                     | LONG data

 _get_midi_active     : boolean      : R/W           | False
                                                     |
                                                     | If TRUE, midi data
                                                     | $F0 (Midi active)
                                                     | will received by
                                                     | midi instruments

 _UARTMode            : boolean      : R/W           | Automatic by _wCardID
                                                     |
                                                     | You can set this TRUE
                                                     | ONLY, If you have DSP
                                                     | version 2.0 or greater

 _MIDIin              : boolean      : READ ONLY     | False
                                                     |
                                                     | Tells, if MIDI IN is
                                                     | activated by SBMIDI_
                                                     | START_INPUT procedure


 SB General functions
 ============================================================================

 Name:                        Return:

 Function GetEnvSetting     : word     = dec

                                         0     - Success
                                         1     - BLASTER Environment not set
                                         2     - Base I/O address not set
                                         3     - Interrupt number not set
                                         4     - DMA channel not set

 Function Sbc_Scan_Card     : word     = bit

                                         0,3-7 - Reserved
                                         1     - FM music chip OK
                                         2     - DSP and Voice I/O OK
                                               * Updates _ct_io_addx

 Function Sbc_Scan_Int      : word     = dec

                                         0     - Interrupt failure
                                         other - Returns interrupt value &
                                               * Updates _ct_int_num
                                               # Updates _ct_dma_channel

 Function Sbc_Check_Card    : word     = bit

                                         0,3-7 - Reserved
                                         1     - FM music chip OK
                                         2     - DSP and Voice I/O OK

 Function Sbc_Test_Int      : word     = dec

                                         0     - Interrupt failure
                                         other - Returns interrupt value &

 Function Sbc_Test_Dma      : integer  = dec

                                         -1    - DMA failure
                                         other - Returns DMA channel

 Function Sbc_Version       : word     = High byte - Major version of DSP
                                         Low byte  - Minor version of DSP

 Function Sbc_dsp_reset     : word     = 0     - Reset failure
                                         other - Reset OK

 SB Midi functions
 ============================================================================

 Function  Sbmidi_out_shortmsg(Status,Data1,Data2:byte)     :Integer;

 Returns:  NON zero if error


 Function  Sbmidi_out_longmsg(Data:pointer; Length:Integer) :integer;

 Returns:  NON zero if error


 Function  Sbmidi_get_input                                 :Longint;

 Returns:  Zero if buffer is empty. Otherwise, the least significant
           byte contains the MIDI code and the other three bytes contains
           the time stamp.
           The time is the time different between the time when
           SBmidi_start_input is invoked.
           Function can buffer up to 2048 bytes. Bytes coming after buffer
           is full, are ignored.

 Procedure Sbmidi_start_input;

 Procedure Sbmidi_stop_input;


 SB EXTENDED functions by SBC_TPx units
 ============================================================================

 Procedure Maker;

 ----------------------------------------------------------------------------



        CONTINUING LATER........................
        CONTINUING LATER........................
        CONTINUING LATER........................
        CONTINUING LATER........................
        CONTINUING LATER........................
        CONTINUING LATER........................
        CONTINUING LATER........................
        

*)