You could always make the sclick part into the below to shortenit even more.
on *:DIALOG:staticcalc:sclick:*:{ did -ra $dname 9 $calc($did(5) $did($did).text $did(6)) }