FreeCalypso > hg > freecalypso-tools
view target-utils/buzplayer/melentry.c @ 710:c1f72d807250
CHANGES: tiffs-mkfs addition
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Sat, 23 May 2020 03:39:48 +0000 |
parents | eb5960dc258c |
children | 9092ff68e37d |
line wrap: on
line source
#include <sys/types.h> #include <ctype.h> #include <stdlib.h> #include "types.h" #include "melody.h" extern struct melentry *melody_buf_start, *melody_buf_tailptr; void melody_init() { melody_buf_tailptr = melody_buf_start; } void melody_entry(argbulk) char *argbulk; { char *argv[3]; u32 tone, dur; if (parse_args(argbulk, 2, 2, argv, 0) < 0) return; tone = strtoul(argv[0], 0, 0); dur = strtoul(argv[1], 0, 0); if (tone > 255 || dur < 1 || dur > 0xFFFF) { printf("ERROR: argument(s) out of range\n"); return; } melody_buf_tailptr->tone = tone; melody_buf_tailptr->dur = dur; melody_buf_tailptr++; }