home *** CD-ROM | disk | FTP | other *** search
/ Dave Lowe: The Developer …nd Blaster Series Disk 2 / Lowe_TheDeveloperKitForSoundBlasterSeriesDisk2.img / TPASCAL / GENERAL / SBKVER.PAS < prev   
Encoding:
Pascal/Delphi Source File  |  1991-11-07  |  1.6 KB  |  31 lines

  1. { ------------------------------------------------------------------------ }
  2. {  @@ Source Documentation                           *** TP6 Version ***   }
  3. {                                                                          }
  4. {  Copyright (c) Creative Technology Pte Ltd, 1991. All rights reserved.   }
  5. {                                                                          }
  6. {   TITLE       : SBKVER.PAS                                               }
  7. {                                                                          }
  8. {   DESCRIPTION :                                                          }
  9. {       This program helps to show your Sound Blaster Developer Kit        }
  10. {       version number.                                                    }
  11. {                                                                          }
  12. {       To check your library version compile this program with following  }
  13. {       command:                                                           }
  14. {                                                                          }
  15. {              TPC sbkver                                                  }
  16. {                                                                          }
  17. { ------------------------------------------------------------------------ }
  18.  
  19. program sbkver;
  20.  
  21. { Include the SBC Unit, and any other units needed }
  22. uses sbc_tp6;
  23.  
  24. begin
  25.  
  26.       writeln('Developer Kit for Sound Blaster Series');
  27.       writeln('Turbo Pascal version');
  28.       writeln;
  29.       writeln('Version : ',sbclib_version_major + sbclib_version_minor/100:2:2);
  30. end.
  31.