/*
   =============================================================================
	setv2gi.c -- MIDAS-VII -- set the voices to the instrument for a group
	Version 2 -- 1988-07-11 -- D.N. Lynx Crowe
   =============================================================================
*/

#include "stddefs.h"
#include "vsdd.h"
#include "vsddsw.h"
#include "graphdef.h"

#include "midas.h"
#include "instdsp.h"

extern	int16_t	curinst;
extern	int16_t	curvce;

extern	int16_t	ins2grp[];
extern	int16_t	s_inst[];
extern	int16_t	vce2grp[];

extern	struct	instdef	vbufs[];

/* 
*/

/*
   =============================================================================
	setv2gi() -- set voices to the instrument for a group
   =============================================================================
*/

void setv2gi(int16_t group)
{
	register int16_t grp, vce, ins;
	register struct instdef *ip;
	register struct idfnhdr *fp;

	ins = ins2grp[group] & 0x00FF;
	grp = group + 1;

	for (vce = 0; vce < 12; vce++) {

		if (vce2grp[vce] EQ grp) {	/* for each voice in the group */

			if (curvce EQ vce) {

				curinst = ins;
				s_inst[curvce] = ins;
			}

			execins(vce, ins, 1);
		}
	}
}