Update of /cvsroot/pure-data/externals/miXed/test/toxy In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv32393/test/toxy
Modified Files: scale-test.pd Log Message: toxy alpha11
Index: scale-test.pd =================================================================== RCS file: /cvsroot/pure-data/externals/miXed/test/toxy/scale-test.pd,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** scale-test.pd 19 Feb 2004 22:23:18 -0000 1.2 --- scale-test.pd 31 Mar 2004 10:24:19 -0000 1.3 *************** *** 1,4 **** #N canvas 79 51 599 397 12; ! #X obj 22 197 widget scale s -command [concat ::toxy::scalecommand .| _cb] -variable ::toxy::simplescale -label "Simple Scale" -orient h -length 300 -width 50 -font "Helvetica 12" -from -16 -to 16 -showvalue --- 1,4 ---- #N canvas 79 51 599 397 12; ! #X obj 22 197 widget scale s -command [concat ::toxy::scale_command .| _cb] -variable ::toxy::simplescale -label "Simple Scale" -orient h -length 300 -width 50 -font "Helvetica 12" -from -16 -to 16 -showvalue *************** *** 13,19 **** ; #X floatatom 214 336 5 0 0 0 - - -; ! #X msg 33 103 -command [concat ::toxy::scalecommand .| _cb]; #X obj 214 306 r $0-scale; ! #X msg 22 70 -command [concat ::toxy::scalecommand $1-scale float] ; #X obj 22 10 loadbang; --- 13,19 ---- ; #X floatatom 214 336 5 0 0 0 - - -; ! #X msg 33 103 -command [concat ::toxy::scale_command .| _cb]; #X obj 214 306 r $0-scale; ! #X msg 22 70 -command [concat ::toxy::scale_command $1-scale float] ; #X obj 22 10 loadbang; *************** *** 24,28 **** #X floatatom 89 45 5 0 0 0 - - -; #N canvas 0 0 450 420 linked 0; ! #X obj 54 49 widget scale s -command [concat ::toxy::scalecommand .| _cb] -variable ::toxy::simplescale -orient v -length 300 -width 50 -font "Helvetica 12" -from -16 -to 16 -showvalue 0 @float .- set .#1 --- 24,28 ---- #X floatatom 89 45 5 0 0 0 - - -; #N canvas 0 0 450 420 linked 0; ! #X obj 54 49 widget scale s -command [concat ::toxy::scale_command .| _cb] -variable ::toxy::simplescale -orient v -length 300 -width 50 -font "Helvetica 12" -from -16 -to 16 -showvalue 0 @float .- set .#1