Информационный сервер для программистов: Исходники со всего света. Паскальные исходники со всего света
  Powered by Поисковый сервер Яndex: Найдется ВСЁ!
На Главную Pascal Форум Информер Страны мира
   Звуки и Музыка    >>    tpmusic
   
 
 Background Music Player for PC Speaker  J.C. Kessels 07.10.1990

Модуль позволяет в фоне выводить музыку на спикер в стиле Бейсика. Модуль прост в использовании и состоит всего из трех функций и одной процедуры.
This unit gives you PC Speaker music capabilities with a BASIC syntax. The music will be played in the background, so your program can continue with other things. The music can also be played in the foreground. This unit is very easy to use. There are only three procedures and one function interfaced outwards. All the rest is automatic (installing, uninstalling, interpreting the music, etc.)!



5k 
 

unit music version 1.0 Play music in the background. 1990 J.C. Kessels This unit gives you music capabilities with a BASIC syntax. The music will be played in the background, so your program can continue with other things. The music can also be played in the foreground. This unit is very easy to use. There are only three procedures and one function interfaced outwards. All the rest is automatic (installing, uninstalling, interpreting the music, etc.)! PlayMusic(string); Start playing a string of music in the background. The string is a normal character string containing music 'commands' as described below. If there is already music playing, then it is first shut off. All settings are reset to their default. PlayMusicForeground(string); Start playing a string of music, and wait for it to finish. If there is already music playing, then it is first shut off. All settings are reset to their default. This procedure simply calls the "PlayMusic" procedure, and then loops until MusicBusy (described later) is true. MusicOff; Turn music off. if MusicBusy then ... Return TRUE if there is currently music playing. See at the end of this unit for a small demonstration program. The music-commands syntax is (BASIC compatible): [>,<]A..G[#,+,-](n)[.] Play not