Files
TempleOS-Rijn/LT/DEMO/Music.CPZ
T
2018-09-08 21:45:17 +02:00

20 lines
291 B
Plaintext

void SoundOff()
{
Sound(0);
Exit;
}
void MusicDemoTsk()
{
Fs->end_task_cb=&SoundOff;
while (TRUE) {
Play("1wCqDsEFG2AB");
Play("wCqDsEFG3AB");
Play("wCqDsEFG4AB");
Play("wCqDsEFG5AB");
Play("wCqDsEFG6AB");
}
}
Spawn(&MusicDemoTsk,"MUSIC");