:/ but how could it be bigger? The only thing I touched was the equal signs, the removal of two curly brackets, and your menu switch. The rest is the same. :o > == to > =, { and } in your raw events, and this:

.$iif(%stat.wclone,Dis,En) $+ able it:set %stat.wclone $iif(%stat.wclone,0,1)

That's as compact and small as I can go...:p