1 files changed, 42 insertions, 0 deletions
diff --git a/lib/ultralib/src/audio/sndpsetpan.c b/lib/ultralib/src/audio/sndpsetpan.c
new file mode 100644
index 0000000..5f98648
--- /dev/null
+++ b/lib/ultralib/src/audio/sndpsetpan.c
@@ -0,0 +1,42 @@
+/*====================================================================
+ * sndpsetpan.c
+ *
+ * Copyright 1995, Silicon Graphics, Inc.
+ * All Rights Reserved.
+ *
+ * This is UNPUBLISHED PROPRIETARY SOURCE CODE of Silicon Graphics,
+ * Inc.; the contents of this file may not be disclosed to third
+ * parties, copied or duplicated in any form, in whole or in part,
+ * without the prior written permission of Silicon Graphics, Inc.
+ *
+ * RESTRICTED RIGHTS LEGEND:
+ * Use, duplication or disclosure by the Government is subject to
+ * restrictions as set forth in subdivision (c)(1)(ii) of the Rights
+ * in Technical Data and Computer Software clause at DFARS
+ * 252.227-7013, and/or in similar or successor clauses in the FAR,
+ * DOD or NASA FAR Supplement. Unpublished - rights reserved under the
+ * Copyright Laws of the United States.
+ *====================================================================*/
+
+#include "sndp.h"
+#include <os_internal.h>
+#include <ultraerror.h>
+
+void alSndpSetPan(ALSndPlayer *sndp, ALPan pan) 
+{
+    ALSndpEvent evt;
+    ALSoundState  *sState = sndp->sndState;
+
+#ifdef _DEBUG
+    if ((sndp->target >= sndp->maxSounds) || (sndp->target < 0)){
+        __osError(ERR_ALSNDPSETPAR, 2, sndp->target, sndp->maxSounds-1);
+	return;
+    }
+#endif
+
+    evt.pan.type = AL_SNDP_PAN_EVT;
+    evt.pan.pan  = pan;
+    evt.pan.state = &sState[sndp->target];
+    alEvtqPostEvent(&sndp->evtq, (ALEvent *)&evt, 0);
+}
+