From b1bc6ac82471a6b78bb2ac6d3ffabe239f5d099e Mon Sep 17 00:00:00 2001 From: mescalinum Date: Wed, 16 Sep 2009 00:51:21 +0000 Subject: fix new dict-style creation arguments svn path=/trunk/externals/tclpd/; revision=12361 --- bitmap-help.pd | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/bitmap-help.pd b/bitmap-help.pd index 3433eec..e12deab 100644 --- a/bitmap-help.pd +++ b/bitmap-help.pd @@ -1,5 +1,6 @@ #N canvas 625 330 742 518 10; -#X obj 63 244 bitmap 15 8 8 1 0 0 0 0 0 0 1 1 0 0 0 0 0 1 0 1 0 0 0 +#X obj 63 244 bitmap -cellsize 15 -uwidth 8 -uheight 8; +#bitmap setdata 1 0 0 0 0 0 0 1 1 0 0 0 0 0 1 0 1 0 0 0 0 1 0 1 1 0 0 0 1 0 1 0 1 0 0 1 0 1 0 1 1 0 1 0 1 0 1 0 1 1 0 1 0 1 0 1 1 0 1 0 1 0 1 0; #X obj 87 410 print out; @@ -10,8 +11,7 @@ #X obj 39 89 r \$0r; #X text 36 19 [bitmap] - a two dimensional array of bits (toggles) ; -#X text 38 49 creation arguments [cellsize] [width] [height] ?[data -...]; +#X text 38 49 creation arguments -cellsize <#> -uwidth <#> -uheight <#>; #X msg 111 117 getcol \$1; #X obj 111 89 r \$0c; #X obj 63 213 r \$0b; @@ -23,7 +23,8 @@ #X msg 227 117 getcell 0 1; #X msg 317 117 getcell 1 1; #X text 226 88 getcell ; -#X obj 247 243 bitmap 4 16 16 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 +#X obj 247 243 bitmap -cellsize 4 -uwidth 16 -uheight 16; +#bitmap setdata 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 1 0 1 1 1 1 0 1 1 1 1 1 0 0 1 0 1 0 1 0 0 1 0 1 0 0 0 1 0 0 1 1 1 0 1 0 0 1 0 1 0 0 0 1 0 0 0 0 0 0 1 1 1 1 0 1 0 0 0 1 0 0 1 1 1 1 0 0 0 0 0 1 1 1 1 1 0 0 1 0 0 1 0 1 1 1 1 0 0 0 0 0 0 0 1 0 0 1 0 1 0 0 @@ -53,7 +54,8 @@ #X restore 447 175 pd randomdata; #X obj 447 151 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; -#X obj 447 331 bitmap 16 4 4 1 0 0 0 1 0 0 1 1 0 1 1 1 1 1 0; +#X obj 447 331 bitmap -cellsize 16 -uwidth 4 -uheight 4; +#bitmap setdata 1 0 0 0 1 0 0 1 1 0 1 1 1 1 1 0; #X msg 465 231 setcol 1 0 0 0 0 \, setcol 2 0 0 0 0; #X msg 481 292 setrow \$1 \$2 \$2 \$3 \$3; #X msg 481 265 0 1 0 \, 1 1 0 \, 2 0 1 \, 3 0 1; -- cgit v1.2.1