sdl-ios-xcode: src/audio/dc/aica.c annotate

annotate src/audio/dc/aica.c @ 3235:d35b649858e0

David Carre to Sam Hello sam, me again. I'v fixed another bug in the pandora code, it's on the no-X videodriver, i forgot to add some code to destroy the window so it was impossible to reload SDL inside the same application (eglTerminate). You'll find the svn diff attached. See you, David.

author	Sam Lantinga <slouken@libsdl.org>
date	Tue, 11 Aug 2009 13:45:01 +0000
parents	c121d94672cb
children

rev	line source
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	1 /* This file is part of the Dreamcast function library.
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	2 * Please see libdream.c for further details.
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	3 *
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	4 * (c)2000 Dan Potter
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	5 * modify BERO
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	6 */
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	7 #include "aica.h"
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	8
1461 11134dc42da8 Updated for Dreamcast KOS June 2005 snapshot: Sam Lantinga <slouken@libsdl.org> parents: 509 diff changeset	9 #include <arch/irq.h>
11134dc42da8 Updated for Dreamcast KOS June 2005 snapshot: Sam Lantinga <slouken@libsdl.org> parents: 509 diff changeset	10 #include <dc/spu.h>
11134dc42da8 Updated for Dreamcast KOS June 2005 snapshot: Sam Lantinga <slouken@libsdl.org> parents: 509 diff changeset	11
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	12 #if 0
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	13 #define dc_snd_base ((volatile unsigned char )0x00800000) / arm side */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	14 #endif
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	15 #define dc_snd_base ((volatile unsigned char )0xa0700000) / dc side */
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	16
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	17 /* Some convienence macros */
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	18 #define SNDREGADDR(x) (0xa0700000 + (x))
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	19 #define CHNREGADDR(ch,x) SNDREGADDR(0x80*(ch)+(x))
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	20
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	21
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	22 #define SNDREG32(x) ((volatile unsigned long )SNDREGADDR(x))
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	23 #define SNDREG8(x) ((volatile unsigned char )SNDREGADDR(x))
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	24 #define CHNREG32(ch, x) ((volatile unsigned long )CHNREGADDR(ch,x))
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	25 #define CHNREG8(ch, x) ((volatile unsigned long )CHNREGADDR(ch,x))
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	26
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	27 #define G2_LOCK(OLD) \
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	28 do { \
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	29 if (!irq_inside_int()) \
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	30 OLD = irq_disable(); \
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	31 /* suspend any G2 DMA here... */ \
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	32 while(((volatile unsigned int )0xa05f688c) & 0x20) \
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	33 ; \
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	34 } while(0)
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	35
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	36 #define G2_UNLOCK(OLD) \
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	37 do { \
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	38 /* resume any G2 DMA here... */ \
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	39 if (!irq_inside_int()) \
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	40 irq_restore(OLD); \
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	41 } while(0)
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	42
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	43
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	44 void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	45 aica_init()
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	46 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	47 int i, j, old = 0;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	48
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	49 /* Initialize AICA channels */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	50 G2_LOCK(old);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	51 SNDREG32(0x2800) = 0x0000;
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	52
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	53 for (i = 0; i < 64; i++) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	54 for (j = 0; j < 0x80; j += 4) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	55 if ((j & 31) == 0)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	56 g2_fifo_wait();
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	57 CHNREG32(i, j) = 0;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	58 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	59 g2_fifo_wait();
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	60 CHNREG32(i, 0) = 0x8000;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	61 CHNREG32(i, 20) = 0x1f;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	62 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	63
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	64 SNDREG32(0x2800) = 0x000f;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	65 g2_fifo_wait();
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	66 G2_UNLOCK(old);
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	67 }
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	68
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	69 /* Translates a volume from linear form to logarithmic form (required by
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	70 the AICA chip */
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	71 /* int logs[] = {
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	72
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	73 0, 40, 50, 58, 63, 68, 73, 77, 80, 83, 86, 89, 92, 94, 97, 99, 101, 103,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	74 105, 107, 109, 111, 112, 114, 116, 117, 119, 120, 122, 123, 125, 126, 127,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	75 129, 130, 131, 133, 134, 135, 136, 137, 139, 140, 141, 142, 143, 144, 145,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	76 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 156, 157, 158, 159,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	77 160, 161, 162, 162, 163, 164, 165, 166, 166, 167, 168, 169, 170, 170, 171,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	78 172, 172, 173, 174, 175, 175, 176, 177, 177, 178, 179, 180, 180, 181, 182,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	79 182, 183, 183, 184, 185, 185, 186, 187, 187, 188, 188, 189, 190, 190, 191,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	80 191, 192, 193, 193, 194, 194, 195, 196, 196, 197, 197, 198, 198, 199, 199,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	81 200, 201, 201, 202, 202, 203, 203, 204, 204, 205, 205, 206, 206, 207, 207,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	82 208, 208, 209, 209, 210, 210, 211, 211, 212, 212, 213, 213, 214, 214, 215,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	83 215, 216, 216, 217, 217, 217, 218, 218, 219, 219, 220, 220, 221, 221, 222,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	84 222, 222, 223, 223, 224, 224, 225, 225, 225, 226, 226, 227, 227, 228, 228,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	85 228, 229, 229, 230, 230, 230, 231, 231, 232, 232, 232, 233, 233, 234, 234,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	86 234, 235, 235, 236, 236, 236, 237, 237, 238, 238, 238, 239, 239, 240, 240,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	87 240, 241, 241, 241, 242, 242, 243, 243, 243, 244, 244, 244, 245, 245, 245,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	88 246, 246, 247, 247, 247, 248, 248, 248, 249, 249, 249, 250, 250, 250, 251,
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	89 251, 251, 252, 252, 252, 253, 253, 253, 254, 254, 254, 255
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	90
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	91 }; */
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	92
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	93 const static unsigned char logs[] = {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	94 0, 15, 22, 27, 31, 35, 39, 42, 45, 47, 50, 52, 55, 57, 59, 61,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	95 63, 65, 67, 69, 71, 73, 74, 76, 78, 79, 81, 82, 84, 85, 87, 88,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	96 90, 91, 92, 94, 95, 96, 98, 99, 100, 102, 103, 104, 105, 106,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	97 108, 109, 110, 111, 112, 113, 114, 116, 117, 118, 119, 120, 121,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	98 122, 123, 124, 125, 126, 127, 128, 129, 130, 131, 132, 133, 134,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	99 135, 136, 137, 138, 138, 139, 140, 141, 142, 143, 144, 145, 146,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	100 146, 147, 148, 149, 150, 151, 152, 152, 153, 154, 155, 156, 156,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	101 157, 158, 159, 160, 160, 161, 162, 163, 164, 164, 165, 166, 167,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	102 167, 168, 169, 170, 170, 171, 172, 173, 173, 174, 175, 176, 176,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	103 177, 178, 178, 179, 180, 181, 181, 182, 183, 183, 184, 185, 185,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	104 186, 187, 187, 188, 189, 189, 190, 191, 191, 192, 193, 193, 194,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	105 195, 195, 196, 197, 197, 198, 199, 199, 200, 200, 201, 202, 202,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	106 203, 204, 204, 205, 205, 206, 207, 207, 208, 209, 209, 210, 210,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	107 211, 212, 212, 213, 213, 214, 215, 215, 216, 216, 217, 217, 218,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	108 219, 219, 220, 220, 221, 221, 222, 223, 223, 224, 224, 225, 225,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	109 226, 227, 227, 228, 228, 229, 229, 230, 230, 231, 232, 232, 233,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	110 233, 234, 234, 235, 235, 236, 236, 237, 237, 238, 239, 239, 240,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	111 240, 241, 241, 242, 242, 243, 243, 244, 244, 245, 245, 246, 246,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	112 247, 247, 248, 248, 249, 249, 250, 250, 251, 251, 252, 252, 253, 254, 255
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	113 };
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	114
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	115 /* For the moment this is going to have to suffice, until we really
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	116 figure out what these mean. */
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	117 #define AICA_PAN(x) ((x)==0x80?(0):((x)<0x80?(0x1f):(0x0f)))
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	118 #define AICA_VOL(x) (0xff - logs[128 + (((x) & 0xff) / 2)])
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	119 //#define AICA_VOL(x) (0xff - logs[x&255])
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	120
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	121 static inline unsigned
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	122 AICA_FREQ(unsigned freq)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	123 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	124 unsigned long freq_lo, freq_base = 5644800;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	125 int freq_hi = 7;
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	126
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	127 /* Need to convert frequency to floating point format
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	128 (freq_hi is exponent, freq_lo is mantissa)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	129 Formula is ferq = 441002^freq_hi(1+freq_lo/1024) */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	130 while (freq < freq_base && freq_hi > -8) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	131 freq_base >>= 1;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	132 --freq_hi;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	133 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	134 while (freq < freq_base && freq_hi > -8) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	135 freq_base >>= 1;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	136 freq_hi--;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	137 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	138 freq_lo = (freq << 10) / freq_base;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	139 return (freq_hi << 11) \| (freq_lo & 1023);
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	140 }
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	141
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	142 /* Sets up a sound channel completely. This is generally good if you want
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	143 a quick and dirty way to play notes. If you want a more comprehensive
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	144 set of routines (more like PC wavetable cards) see below.
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	145
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	146 ch is the channel to play on (0 - 63)
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	147 smpptr is the pointer to the sound data; if you're running off the
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	148 SH4, then this ought to be (ptr - 0xa0800000); otherwise it's just
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	149 ptr. Basically, it's an offset into sound ram.
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	150 mode is one of the mode constants (16 bit, 8 bit, ADPCM)
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	151 nsamp is the number of samples to play (not number of bytes!)
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	152 freq is the sampling rate of the sound
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	153 vol is the volume, 0 to 0xff (0xff is louder)
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	154 pan is a panning constant -- 0 is left, 128 is center, 255 is right.
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	155
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	156 This routine (and the similar ones) owe a lot to Marcus' sound example --
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	157 I hadn't gotten quite this far into dissecting the individual regs yet. */
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	158 void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	159 aica_play(int ch, int mode, unsigned long smpptr, int loopst, int loopend,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	160 int freq, int vol, int pan, int loopflag)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	161 {
1461 11134dc42da8 Updated for Dreamcast KOS June 2005 snapshot: Sam Lantinga <slouken@libsdl.org> parents: 509 diff changeset	162 /* int i;
11134dc42da8 Updated for Dreamcast KOS June 2005 snapshot: Sam Lantinga <slouken@libsdl.org> parents: 509 diff changeset	163 */
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	164 int val;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	165 int old = 0;
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	166
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	167 /* Stop the channel (if it's already playing) */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	168 aica_stop(ch);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	169 /* doesn't seem to be needed, but it's here just in case */
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	170 /*
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	171 for (i=0; i<256; i++) {
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	172 asm("nop");
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	173 asm("nop");
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	174 asm("nop");
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	175 asm("nop");
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	176 }
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	177 */
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	178 G2_LOCK(old);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	179 /* Envelope setup. The first of these is the loop point,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	180 e.g., where the sample starts over when it loops. The second
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	181 is the loop end. This is the full length of the sample when
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	182 you are not looping, or the loop end point when you are (though
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	183 storing more than that is a waste of memory if you're not doing
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	184 volume enveloping). */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	185 CHNREG32(ch, 8) = loopst & 0xffff;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	186 CHNREG32(ch, 12) = loopend & 0xffff;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	187
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	188 /* Write resulting values */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	189 CHNREG32(ch, 24) = AICA_FREQ(freq);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	190
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	191 /* Set volume, pan, and some other things that we don't know what
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	192 they do =) */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	193 CHNREG32(ch, 36) = AICA_PAN(pan) \| (0xf << 8);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	194 /* Convert the incoming volume and pan into hardware values */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	195 /* Vol starts at zero so we can ramp */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	196 vol = AICA_VOL(vol);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	197 CHNREG32(ch, 40) = 0x24 \| (vol << 8);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	198 /* Convert the incoming volume and pan into hardware values */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	199 /* Vol starts at zero so we can ramp */
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	200
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	201 /* If we supported volume envelopes (which we don't yet) then
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	202 this value would set that up. The top 4 bits determine the
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	203 envelope speed. f is the fastest, 1 is the slowest, and 0
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	204 seems to be an invalid value and does weird things). The
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	205 default (below) sets it into normal mode (play and terminate/loop).
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	206 CHNREG32(ch, 16) = 0xf010;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	207 */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	208 CHNREG32(ch, 16) = 0x1f; /* No volume envelope */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	209
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	210
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	211 /* Set sample format, buffer address, and looping control. If
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	212 0x0200 mask is set on reg 0, the sample loops infinitely. If
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	213 it's not set, the sample plays once and terminates. We'll
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	214 also set the bits to start playback here. */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	215 CHNREG32(ch, 4) = smpptr & 0xffff;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	216 val = 0xc000 \| 0x0000 \| (mode << 7) \| (smpptr >> 16);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	217 if (loopflag)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	218 val \|= 0x200;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	219
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	220 CHNREG32(ch, 0) = val;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	221
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	222 G2_UNLOCK(old);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	223
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	224 /* Enable playback */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	225 /* CHNREG32(ch, 0) \|= 0xc000; */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	226 g2_fifo_wait();
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	227
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	228 #if 0
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	229 for (i = 0xff; i >= vol; i--) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	230 if ((i & 7) == 0)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	231 g2_fifo_wait();
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	232 CHNREG32(ch, 40) = 0x24 \| (i << 8);;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	233 }
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	234
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	235 g2_fifo_wait();
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	236 #endif
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	237 }
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	238
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	239 /* Stop the sound on a given channel */
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	240 void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	241 aica_stop(int ch)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	242 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	243 g2_write_32(CHNREGADDR(ch, 0),
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	244 (g2_read_32(CHNREGADDR(ch, 0)) & ~0x4000) \| 0x8000);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	245 g2_fifo_wait();
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	246 }
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	247
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	248
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	249 /* The rest of these routines can change the channel in mid-stride so you
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	250 can do things like vibrato and panning effects. */
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	251
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	252 /* Set channel volume */
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	253 void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	254 aica_vol(int ch, int vol)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	255 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	256 // g2_write_8(CHNREGADDR(ch, 41),AICA_VOL(vol));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	257 g2_write_32(CHNREGADDR(ch, 40),
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	258 (g2_read_32(CHNREGADDR(ch, 40)) & 0xffff00ff) \|
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	259 (AICA_VOL(vol) << 8));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	260 g2_fifo_wait();
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	261 }
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	262
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	263 /* Set channel pan */
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	264 void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	265 aica_pan(int ch, int pan)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	266 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	267 // g2_write_8(CHNREGADDR(ch, 36),AICA_PAN(pan));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	268 g2_write_32(CHNREGADDR(ch, 36),
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	269 (g2_read_32(CHNREGADDR(ch, 36)) & 0xffffff00) \|
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	270 (AICA_PAN(pan)));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	271 g2_fifo_wait();
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	272 }
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	273
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	274 /* Set channel frequency */
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	275 void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	276 aica_freq(int ch, int freq)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	277 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	278 g2_write_32(CHNREGADDR(ch, 24), AICA_FREQ(freq));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	279 g2_fifo_wait();
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	280 }
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	281
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	282 /* Get channel position */
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	283 int
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	284 aica_get_pos(int ch)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	285 {
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	286 #if 1
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	287 /* Observe channel ch */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	288 g2_write_32(SNDREGADDR(0x280c),
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	289 (g2_read_32(SNDREGADDR(0x280c)) & 0xffff00ff) \| (ch << 8));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	290 g2_fifo_wait();
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	291 /* Update position counters */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	292 return g2_read_32(SNDREGADDR(0x2814)) & 0xffff;
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	293 #else
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	294 /* Observe channel ch */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	295 g2_write_8(SNDREGADDR(0x280d), ch);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	296 /* Update position counters */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	297 return g2_read_32(SNDREGADDR(0x2814)) & 0xffff;
509 dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	298 #endif
dad72daf44b3 Added initial support for Dreamcast (thanks HERO!) Sam Lantinga <slouken@libsdl.org> parents: diff changeset	299 }
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	300
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1461 diff changeset	301 /* vi: set ts=4 sw=4 expandtab: */

Mercurial > sdl-ios-xcode

annotate src/audio/dc/aica.c @ 3235:d35b649858e0