Cross Reference: /ast/src/lib/libtk/library/demos/ixset

Lines Matching refs:screenbla

47     global screenbla ;	set screenbla	"blank"
78 		    set screenbla [expr "{$bla} == {yes} ? {blank} : {noblank}"]
96     # puts stdout [format "Screen BLANCK = %s\n" $screenbla]
108     global mouseacc mousethr  screenbla screentim screencyc
132 	s $screenbla
142     global mouseacc mousethr  screenbla screentim screencyc
158     .screen.val.rb.blank [expr "{$screenbla}=={blank} ? {select} : {deselect}"]
159     .screen.val.rb.pat   [expr "{$screenbla}!={blank} ? {select} : {deselect}"]
261 	    -value "blank" -variable screenbla
264 	    -value "noblank" -variable screenbla