DEF Toggle Script {
    field    SFBool on TRUE
    eventIn  SFBool set_active
    eventOut SFBool on_changed

    url "vrmlscript:
        function set_active( b, ts ) {
            if ( b  == FALSE ) return;
            if ( on == TRUE  ) on = FALSE;
            else               on = TRUE;
            on_changed = on;
        }"
}