1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
|
/****************************************************************
MAME / MESS functions
****************************************************************/
#include "sndintrf.h"
#include "streams.h"
#include "ym2413.h"
#include "2413intf.h"
/* for stream system */
typedef struct _ym2413_state ym2413_state;
struct _ym2413_state
{
sound_stream * stream;
void * chip;
};
INLINE ym2413_state *get_safe_token(const device_config *device)
{
assert(device != NULL);
assert(device->token != NULL);
assert(device->type == SOUND);
assert(sound_get_type(device) == SOUND_YM2413);
return (ym2413_state *)device->token;
}
#ifdef UNUSED_FUNCTION
void YM2413DAC_update(int chip,stream_sample_t **inputs, stream_sample_t **_buffer,int length)
{
INT16 *buffer = _buffer[0];
static int out = 0;
if ( ym2413[chip].reg[0x0F] & 0x01 )
{
out = ((ym2413[chip].reg[0x10] & 0xF0) << 7);
}
while (length--) *(buffer++) = out;
}
#endif
static STREAM_UPDATE( ym2413_stream_update )
{
ym2413_state *info = param;
ym2413_update_one(info->chip, outputs, samples);
}
static void _stream_update(void *param, int interval)
{
ym2413_state *info = param;
stream_update(info->stream);
}
static DEVICE_START( ym2413 )
{
ym2413_state *info = get_safe_token(device);
int rate = device->clock/72;
/* emulator create */
info->chip = ym2413_init(device, device->clock, rate);
assert_always(info->chip != NULL, "Error creating YM2413 chip");
/* stream system initialize */
info->stream = stream_create(device,0,2,rate,info,ym2413_stream_update);
ym2413_set_update_handler(info->chip, _stream_update, info);
#if 0
int i, tst;
char name[40];
num = intf->num;
tst = YM3812_sh_start (msound);
if (tst)
return 1;
for (i=0;i<num;i++)
{
ym2413_reset (i);
ym2413[i].DAC_stream = stream_create(device, 0, 1, device->clock/72, i, YM2413DAC_update);
if (ym2413[i].DAC_stream == -1)
return 1;
}
return 0;
#endif
}
static DEVICE_STOP( ym2413 )
{
ym2413_state *info = get_safe_token(device);
ym2413_shutdown(info->chip);
}
static DEVICE_RESET( ym2413 )
{
ym2413_state *info = get_safe_token(device);
ym2413_reset_chip(info->chip);
}
WRITE8_DEVICE_HANDLER( ym2413_w )
{
ym2413_state *info = get_safe_token(device);
ym2413_write(info->chip, offset & 1, data);
}
WRITE8_DEVICE_HANDLER( ym2413_register_port_w ) { ym2413_w(device, 0, data); }
WRITE8_DEVICE_HANDLER( ym2413_data_port_w ) { ym2413_w(device, 1, data); }
/**************************************************************************
* Generic get_info
**************************************************************************/
DEVICE_GET_INFO( ym2413 )
{
switch (state)
{
/* --- the following bits of info are returned as 64-bit signed integers --- */
case DEVINFO_INT_TOKEN_BYTES: info->i = sizeof(ym2413_state); break;
/* --- the following bits of info are returned as pointers to data or functions --- */
case DEVINFO_FCT_START: info->start = DEVICE_START_NAME( ym2413 ); break;
case DEVINFO_FCT_STOP: info->stop = DEVICE_STOP_NAME( ym2413 ); break;
case DEVINFO_FCT_RESET: info->reset = DEVICE_RESET_NAME( ym2413 ); break;
/* --- the following bits of info are returned as NULL-terminated strings --- */
case DEVINFO_STR_NAME: strcpy(info->s, "YM2413"); break;
case DEVINFO_STR_FAMILY: strcpy(info->s, "Yamaha FM"); break;
case DEVINFO_STR_VERSION: strcpy(info->s, "1.0"); break;
case DEVINFO_STR_SOURCE_FILE: strcpy(info->s, __FILE__); break;
case DEVINFO_STR_CREDITS: strcpy(info->s, "Copyright Nicola Salmoria and the MAME Team"); break;
}
}
|