Update of /cvsroot/pure-data/externals/unauthorized/scrolllist In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24565
Modified Files: CHANGES.LOG help-scrolllist.pd scrolllist.c Log Message: change colors by messages
Index: CHANGES.LOG =================================================================== RCS file: /cvsroot/pure-data/externals/unauthorized/scrolllist/CHANGES.LOG,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** CHANGES.LOG 26 Jul 2006 16:56:58 -0000 1.2 --- CHANGES.LOG 4 Aug 2007 15:50:36 -0000 1.3 *************** *** 1,2 **** --- 1,4 ---- + 0.3 + change colors by messages 0.2 fixed coordinates for GOP support
Index: help-scrolllist.pd =================================================================== RCS file: /cvsroot/pure-data/externals/unauthorized/scrolllist/help-scrolllist.pd,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** help-scrolllist.pd 26 Jul 2006 16:56:58 -0000 1.2 --- help-scrolllist.pd 4 Aug 2007 15:50:36 -0000 1.3 *************** *** 3,8 **** #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 472 332 Note : you can scroll the list by dragging; #X msg 67 79 seek $1; --- 3,8 ---- #X text 576 527 scrolllist; #X text 500 515 Examples :; ! #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; *************** *** 27,31 **** #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 470 397 with the "Properties" dialog; #X text 470 383 You can change all the properties of the object; --- 27,31 ---- #X text 168 86 It behaves as a circular list; #X text 142 104 Sort the text items; ! #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; *************** *** 51,58 **** #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 1; #X obj 747 237 metro 1000; ! #X obj 35 222 scrolllist 25 400 200 {Courier 12 bold} black green #904562 ; #X text 470 343 the mouse in the text area; --- 51,58 ---- #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 0 1; #X obj 747 237 metro 1000; ! #X obj 40 273 scrolllist 25 400 200 {Courier 12 bold} blue white #567823 ; #X text 470 343 the mouse in the text area; *************** *** 63,69 **** #X msg 481 295 scroll 12; #X obj 585 213 loadbang; ! #X obj 73 237 r smsg; #X obj 62 383 s somsg; ! #X obj 26 455 r somsg; #X obj 14 176 s smsg; #X obj 557 295 s smsg; --- 63,69 ---- #X msg 481 295 scroll 12; #X obj 585 213 loadbang; ! #X obj 57 275 r smsg; #X obj 62 383 s somsg; ! #X obj 29 481 r somsg; #X obj 14 176 s smsg; #X obj 557 295 s smsg; *************** *** 71,74 **** --- 71,81 ---- #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; *************** *** 110,111 **** --- 117,124 ---- #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;
Index: scrolllist.c =================================================================== RCS file: /cvsroot/pure-data/externals/unauthorized/scrolllist/scrolllist.c,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** scrolllist.c 26 Jul 2006 16:56:58 -0000 1.5 --- scrolllist.c 4 Aug 2007 15:50:36 -0000 1.6 *************** *** 55,59 **** static int guidebug=0;
! static char *scrolllist_version = "scrolllist: scrolling list of text items : version 0.2, written by Yves Degoyon (ydegoyon@free.fr)";
#define MIN(a,b) (a>b?b:a) --- 55,59 ---- static int guidebug=0;
! 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) *************** *** 524,527 **** --- 524,560 ---- }
+ 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) { *************** *** 978,981 **** --- 1011,1017 ---- 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 );