View Raw SPL
getonplotcalc(w = refwindow(w0))
{
        local mode;

        if (not(iswindow(w)))
        {
                error(sprintf("%s - Window Required", __FUNC__));
        }

        mode = (setonplotcalc(w) > 0);

        return(mode);
}