- Visual C++源码
- Visual Basic源码
- C++ Builder源码
- Java源码
- Delphi源码
- C/C++源码
- PHP源码
- Perl源码
- Python源码
- Asm源码
- Pascal源码
- Borland C++源码
- Others源码
- SQL源码
- VBScript源码
- JavaScript源码
- ASP/ASPX源码
- C#源码
- Flash/ActionScript源码
- matlab源码
- PowerBuilder源码
- LabView源码
- Flex源码
- MathCAD源码
- VBA源码
- IDL源码
- Lisp/Scheme源码
- VHDL源码
- Objective-C源码
- Fortran源码
- tcl/tk源码
- QT源码
- /*
- * linux/arch/m68k/atari/atasound.c
- *
- * ++Geert: Moved almost all stuff to linux/drivers/sound/
- *
- * The author of atari_nosound, atari_mksound and atari_microwire_cmd is
- * unknown. (++roman: That's me... :-)
- *
- * This file is subject to the terms and conditions of the GNU General Public
- * License. See the file COPYING in the main directory of this archive
- * for more details.
- *
- * 1998-05-31 ++andreas: atari_mksound rewritten to always use the envelope,
- * no timer, atari_nosound removed.
- *
- */
- #include <linux/sched.h>
- #include <linux/timer.h>
- #include <linux/major.h>
- #include <linux/fcntl.h>
- #include <linux/errno.h>
- #include <linux/mm.h>
- #include <asm/atarihw.h>
- #include <asm/system.h>
- #include <asm/irq.h>
- #include <asm/pgtable.h>
- #include <asm/atariints.h>
- /*
- * stuff from the old atasound.c
- */
- void atari_microwire_cmd (int cmd)
- {
- tt_microwire.mask = 0x7ff;
- tt_microwire.data = MW_LM1992_ADDR | cmd;
- /* Busy wait for data being completely sent :-( */
- while( tt_microwire.mask != 0x7ff)
- ;
- }
- /* PSG base frequency */
- #define PSG_FREQ 125000
- /* PSG envelope base frequency times 10 */
- #define PSG_ENV_FREQ_10 78125
- void atari_mksound (unsigned int hz, unsigned int ticks)
- {
- /* Generates sound of some frequency for some number of clock
- ticks. */
- unsigned long flags;
- unsigned char tmp;
- int period;
- save_flags(flags);
- cli();
- /* Disable generator A in mixer control. */
- sound_ym.rd_data_reg_sel = 7;
- tmp = sound_ym.rd_data_reg_sel;
- tmp |= 011;
- sound_ym.wd_data = tmp;
- if (hz) {
- /* Convert from frequency value to PSG period value (base
- frequency 125 kHz). */
- period = PSG_FREQ / hz;
- if (period > 0xfff) period = 0xfff;
- /* Set generator A frequency to hz. */
- sound_ym.rd_data_reg_sel = 0;
- sound_ym.wd_data = period & 0xff;
- sound_ym.rd_data_reg_sel = 1;
- sound_ym.wd_data = (period >> 8) & 0xf;
- if (ticks) {
- /* Set length of envelope (max 8 sec). */
- int length = (ticks * PSG_ENV_FREQ_10) / HZ / 10;
- if (length > 0xffff) length = 0xffff;
- sound_ym.rd_data_reg_sel = 11;
- sound_ym.wd_data = length & 0xff;
- sound_ym.rd_data_reg_sel = 12;
- sound_ym.wd_data = length >> 8;
- /* Envelope form: max -> min single. */
- sound_ym.rd_data_reg_sel = 13;
- sound_ym.wd_data = 0;
- /* Use envelope for generator A. */
- sound_ym.rd_data_reg_sel = 8;
- sound_ym.wd_data = 0x10;
- } else {
- /* Set generator A level to maximum, no envelope. */
- sound_ym.rd_data_reg_sel = 8;
- sound_ym.wd_data = 15;
- }
- /* Turn on generator A in mixer control. */
- sound_ym.rd_data_reg_sel = 7;
- tmp &= ~1;
- sound_ym.wd_data = tmp;
- }
- restore_flags(flags);
- }