sync fix

Author: vampirefrog

mdx_decompiler.c

@@ -286,7 +286,7 @@ void mdx_decompiler_decompile(struct mdx_decompiler *d, struct mdx_file *f) {
 					MMLF("k%d", b[1])
 					break;
 				case 0xef:
-					MMLF("S%d", b[1])
+					MMLF("S%C", b[1] >= 8 ? 'P' + b[1] - 8 : 'A' + b[1])
 					break;
 				case 0xee:
 					MMLF("W")

mmlc.l

@@ -70,6 +70,7 @@
 	MPOF       return MPOF;
 	MP         return MP;
 	MD         return MD;
+	S[A-HP-W]  yylval->ival = yytext[1]; return SYNC;
 	.          ;
 }
 

mmlc.y

@@ -23,9 +23,9 @@
 }
 
 %token INT NOTE DIRECTIVE_NAME IDENTIFIER MMLCHANNELS MML_NOTE MML_AT
-%token WHITESPACE STRING_LITERAL MP MPON MPOF MA MAON MAOF MD MH MHON MHOF
+%token WHITESPACE STRING_LITERAL MP MPON MPOF MA MAON MAOF MD MH MHON MHOF SYNC
 
-%type<ival> INT MMLCHANNELS MML_NOTE
+%type<ival> INT MMLCHANNELS MML_NOTE SYNC
 %type<sval> DIRECTIVE_NAME IDENTIFIER STRING_LITERAL
 %type<cval> NOTE MML_AT
 %type<ival> staccato mmlnote
@@ -121,6 +121,7 @@ mmlcommand:
 	| 'w' INT             { mdx_compiler_opm_noise_freq(compiler, compiler->chan_mask, $2); }
 	| 'y' INT ',' INT     { mdx_compiler_opm_write(compiler, compiler->chan_mask, $2, $4); }
 	| 'S' INT             { mdx_compiler_sync_send(compiler, compiler->chan_mask, $2); }
+	| SYNC                { mdx_compiler_sync_send(compiler, compiler->chan_mask, $1 >= 'P' ? $1 - 'P' + 8 : $1 - 'A'); }
 	| 'W'                 { mdx_compiler_sync_wait(compiler, compiler->chan_mask); }
 	| 'F' INT             { mdx_compiler_adpcm_freq(compiler, compiler->chan_mask, $2); }
 	| MH INT ',' INT ',' INT ',' INT ',' INT ',' INT ',' INT {