set form [lcdui.form -title "Gauge Example"] $form append [lcdui.gauge -label "From 1 to 10" -interactive 1 \ -value 6 -maxvalue 10] $form setcurrent