change colors by messages

svn path=/trunk/externals/unauthorized/; revision=8405

3 files changed, 59 insertions, 8 deletions

diff --git a/scrolllist/CHANGES.LOG b/scrolllist/CHANGES.LOG
index ceb5041..6bfd9ad 100755
--- a/scrolllist/CHANGES.LOG
+++ b/scrolllist/CHANGES.LOG
@@ -1,3 +1,5 @@
+0.3
+  change colors by messages
 0.2
   fixed coordinates for GOP support
 0.1
diff --git a/scrolllist/help-scrolllist.pd b/scrolllist/help-scrolllist.pd
index 160370d..b16fee2 100755
--- a/scrolllist/help-scrolllist.pd
+++ b/scrolllist/help-scrolllist.pd
@@ -2,8 +2,8 @@
 #X text 574 514 scrolllist 100 200 200;
 #X text 576 527 scrolllist;
 #X text 500 515 Examples :;
-#X text 72 507 Comments and bugs @ ydegoyon@free.fr;
-#X symbolatom 26 481 30 0 0 0 - - -;
+#X text 75 533 Comments and bugs @ ydegoyon@free.fr;
+#X symbolatom 29 507 30 0 0 0 - - -;
 #X text 472 332 Note : you can scroll the list by dragging;
 #X msg 67 79 seek \$1;
 #X floatatom 127 81 5 0 0 0 - - -;
@@ -26,7 +26,7 @@
 #X text 168 73 You can seek in the text list;
 #X text 168 86 It behaves as a circular list;
 #X text 142 104 Sort the text items;
-#X text 248 481 Selected text item;
+#X text 251 507 Selected text item;
 #X text 470 397 with the "Properties" dialog;
 #X text 470 383 You can change all the properties of the object;
 #X msg 612 57 add \$1;
@@ -50,10 +50,10 @@
 #X msg 620 270 rewind;
 #X obj 527 269 l2s;
 #X msg 525 236 add \$1;
-#X obj 748 216 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1
+#X obj 748 216 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
 1;
 #X obj 747 237 metro 1000;
-#X obj 35 222 scrolllist 25 400 200 {Courier 12 bold} black green #904562
+#X obj 40 273 scrolllist 25 400 200 {Courier 12 bold} blue white #567823
 ;
 #X text 470 343 the mouse in the text area;
 #X msg 33 57 clear;
@@ -62,14 +62,21 @@
 #X text 746 270 read a full text;
 #X msg 481 295 scroll 12;
 #X obj 585 213 loadbang;
-#X obj 73 237 r smsg;
+#X obj 57 275 r smsg;
 #X obj 62 383 s somsg;
-#X obj 26 455 r somsg;
+#X obj 29 481 r somsg;
 #X obj 14 176 s smsg;
 #X obj 557 295 s smsg;
 #X obj 573 176 s smsg;
 #X msg 95 105 sort;
 #X msg 617 295 read ave-lucifer.txt cr;
+#X msg 96 211 bgcolor blue;
+#X msg 196 212 fgcolor white;
+#X msg 304 211 secolor #567823;
+#X text 421 212 change colors;
+#X msg 97 234 bgcolor black;
+#X msg 197 235 fgcolor green;
+#X msg 304 234 secolor red;
 #X connect 6 0 60 0;
 #X connect 7 0 6 0;
 #X connect 9 0 60 0;
@@ -109,3 +116,9 @@
 #X connect 59 0 4 0;
 #X connect 63 0 60 0;
 #X connect 64 0 42 0;
+#X connect 65 0 60 0;
+#X connect 66 0 60 0;
+#X connect 67 0 60 0;
+#X connect 69 0 60 0;
+#X connect 70 0 60 0;
+#X connect 71 0 60 0;
diff --git a/scrolllist/scrolllist.c b/scrolllist/scrolllist.c
index deed3cd..af16c26 100755
--- a/scrolllist/scrolllist.c
+++ b/scrolllist/scrolllist.c
@@ -54,7 +54,7 @@ static t_class *scrolllist_class;
 
 static int guidebug=0;
 
-static char   *scrolllist_version = "scrolllist: scrolling list of text items : version 0.2, written by Yves Degoyon (ydegoyon@free.fr)";
+static char   *scrolllist_version = "scrolllist: scrolling list of text items : version 0.3, written by Yves Degoyon (ydegoyon@free.fr)";
 
 #define MIN(a,b) (a>b?b:a)
 
@@ -523,6 +523,39 @@ static void scrolllist_dialog(t_scrolllist *x, t_symbol *s, int argc, t_atom *ar
    scrolllist_update(x, x->x_glist);
 }
 
+static void scrolllist_bgcolor(t_scrolllist *x, t_symbol *s)
+{
+   scrolllist_erase( x, x->x_glist );
+   scrolllist_draw_erase(x, x->x_glist);
+
+   strcpy( x->x_bgcolor, s->s_name );
+
+   scrolllist_draw_new(x, x->x_glist);
+   scrolllist_update(x, x->x_glist);
+}
+
+static void scrolllist_fgcolor(t_scrolllist *x, t_symbol *s)
+{
+   scrolllist_erase( x, x->x_glist );
+   scrolllist_draw_erase(x, x->x_glist);
+
+   strcpy( x->x_fgcolor, s->s_name );
+
+   scrolllist_draw_new(x, x->x_glist);
+   scrolllist_update(x, x->x_glist);
+}
+
+static void scrolllist_secolor(t_scrolllist *x, t_symbol *s)
+{
+   scrolllist_erase( x, x->x_glist );
+   scrolllist_draw_erase(x, x->x_glist);
+
+   strcpy( x->x_secolor, s->s_name );
+
+   scrolllist_draw_new(x, x->x_glist);
+   scrolllist_update(x, x->x_glist);
+}
+
 static void scrolllist_sort(t_scrolllist* x)
 {
   char **titems;
@@ -977,6 +1010,9 @@ void scrolllist_setup(void)
     class_addmethod(scrolllist_class, (t_method)scrolllist_insert, gensym("insert"), A_SYMBOL, A_DEFFLOAT, A_NULL );
     class_addmethod(scrolllist_class, (t_method)scrolllist_replace, gensym("replace"), A_SYMBOL, A_DEFFLOAT, A_NULL );
     class_addmethod(scrolllist_class, (t_method)scrolllist_add, gensym("add"), A_SYMBOL, A_NULL );
+    class_addmethod(scrolllist_class, (t_method)scrolllist_bgcolor, gensym("bgcolor"), A_SYMBOL, A_NULL );
+    class_addmethod(scrolllist_class, (t_method)scrolllist_fgcolor, gensym("fgcolor"), A_SYMBOL, A_NULL );
+    class_addmethod(scrolllist_class, (t_method)scrolllist_secolor, gensym("secolor"), A_SYMBOL, A_NULL );
     class_addmethod(scrolllist_class, (t_method)scrolllist_delete, gensym("delete"), A_DEFFLOAT, A_NULL );
     class_addmethod(scrolllist_class, (t_method)scrolllist_clear, gensym("clear"), A_NULL );