// SPDX-License-Identifier: MIT
// Copyright (c) 2026 Incoprea
// Accented beat practice
// Not compiled or tested in-world
// Setup: Add short sounds downbeat and beat, both shorter than the interval. Set BPM 30–180. Owner-touch starts/stops.
// Stop / restore: Touch to stop and silence before removal.
// Notes: Use licensed sounds in the exact prim containing the script. Playback is audible nearby. Asset loading and simulator timers can introduce delays; these are exhibit cues, not sample-accurate audio. Four-beat accent structure helps distinguish bar boundaries; it is not synchronized to music streams.
// License: see LICENSE in this distribution.
// Original Incoprea. MIT. Not compiled or tested in-world.
float BPM=80.0;
integer active;
integer beat;
default
{
    touch_start(integer n)
    {
        if(llDetectedKey(0)!=llGetOwner())return;
        active=!active;
        if(active)
        {
            if(BPM<30.0)BPM=30.0;
            if(BPM>180.0)BPM=180.0;
            beat=0;
            llSetTimerEvent(60.0/BPM);
        }
        else
        {
            llSetTimerEvent(0.0);
            llStopSound();
        }
    }
    timer()
    {
        string sound="beat";
        if(!beat)sound="downbeat";
        if(llGetInventoryType(sound)==INVENTORY_SOUND)llPlaySound(sound,0.2);
        beat=(beat+1)%4;
    }
}