/* start a search path dialog window */ void glob_start_path_dialog(t_pd *dummy) { char buf[MAXPDSTRING]; sys_set_searchpath(); sprintf(buf, "pdtk_path_dialog %%s %d %d\n", sys_usestdpath, sys_verbose); gfxstub_new(&glob_pdobject, (void *)glob_start_path_dialog, buf); }
/* start a startup dialog window */ void glob_start_startup_dialog(t_pd *dummy) { char buf[MAXPDSTRING]; sys_set_startup(); sprintf(buf, "pdtk_startup_dialog %%s %d \"%s\"\n", sys_defeatrt, sys_flags->s_name); gfxstub_new(&glob_pdobject, (void *)glob_start_startup_dialog, buf); }
static void exciter_properties(t_gobj *z, t_glist *owner) { char buf[800]; t_exciter *x=(t_exciter *)z; sprintf(buf, "pdtk_exciter_dialog %%s %d %d %d %.2f %d %d\n", x->x_width, x->x_height, x->x_nbevents, x->x_timegrain, x->x_loop, x->x_save ); // post("exciter_properties : %s", buf ); gfxstub_new(&x->x_obj.ob_pd, x, buf); }
static void scratcher_properties(t_gobj *z, t_glist *owner) { char buf[800]; t_scratcher *x=(t_scratcher *)z; sprintf(buf, "pdtk_scratcher_dialog %%s %d %d\n", x->x_width, x->x_height ); // post("scratcher_properties : %s", buf ); gfxstub_new(&x->x_obj.ob_pd, x, buf); }
static void scrolllist_properties(t_gobj *z, t_glist *owner) { char buf[800]; t_scrolllist *x=(t_scrolllist *)z; sprintf(buf, "pdtk_scrolllist_dialog %%s %d %d %d %s %s %s %s\n", (int)x->x_capacity, (int)x->x_width, (int)x->x_height, x->x_font, x->x_bgcolor, x->x_fgcolor, x->x_secolor ); // post("scrolllist_properties : %s", buf ); gfxstub_new(&x->x_obj.ob_pd, x, buf); }
/* start a search path dialog window */ void glob_start_path_dialog(t_pd *dummy) { char buf[MAXPDSTRING]; int i; t_namelist *nl; sys_gui("global pd_path; set pd_path {}\n"); for (nl = sys_searchpath, i = 0; nl; nl = nl->nl_next, i++) sys_vgui("lappend pd_path {%s}\n", nl->nl_string); sprintf(buf, "pdtk_path_dialog %%s %d %d\n", sys_usestdpath, sys_verbose); gfxstub_new(&glob_pdobject, (void *)glob_start_path_dialog, buf); }
static void grid_properties(t_gobj *z, t_glist *owner) { char buf[800]; t_grid *x=(t_grid *)z; sprintf(buf, "pdtk_grid_dialog %%s %s %d %.2f %.2f %d %.2f %.2f %d %.2f %.2f %d %d\n", x->x_name->s_name, x->x_width, x->x_min, x->x_max, x->x_height, x->y_min, x->y_max, x->x_grid, x->x_xstep, x->x_ystep, x->x_xlines, x->x_ylines ); // post("grid_properties : %s", buf ); gfxstub_new(&x->x_obj.ob_pd, x, buf); }
/* start a startup dialog window */ void glob_start_startup_dialog(t_pd *dummy) { char buf[MAXPDSTRING]; int i; t_namelist *nl; sys_gui("global pd_startup; set pd_startup {}\n"); for (nl = sys_externlist, i = 0; nl; nl = nl->nl_next, i++) sys_vgui("lappend pd_startup {%s}\n", nl->nl_string); // sprintf(buf, "pdtk_startup_dialog %%s %d \"%s\"\n", sys_defeatrt, // sys_flags->s_name); gfxstub_new(&glob_pdobject, (void *)glob_start_startup_dialog, buf); }
static void tglgrid_properties(t_gobj *z, t_glist *owner) { t_tg *tg = (t_tg *)z; char buf[800]; UNUSED(owner); sprintf(buf, "::tglgrid::dialog %%s %s %d %d %d %d %s %s #FFFFFF\n", tg->name->s_name, (int)tg->cols, (int)tg->rows, (int)tg->cell_size, (int)tg->spacing, tg->tglfill, tg->untglfill); gfxstub_new(&tg->x_obj.ob_pd, tg, buf); }
static void iem_vu_properties(t_gobj *z, t_glist *owner) { t_iem_vu *x = (t_iem_vu *)z; char buf[800]; t_symbol *srl[3]; iemgui_properties(&x->x_gui, srl); sprintf(buf, "pdtk_iemgui_dialog %%s IEM_VU-METER \ --------dimensions(pix)(pix):-------- %d %d width: %d %d height: \ empty 0.0 empty 0.0 empty %d \ %d no_scale scale %d %d empty %d \ %s %s \ %s %d %d \ %d %d \ %d %d %d\n", x->x_gui.x_w, IEM_GUI_MINSIZE, 120, 80, 0,/*no_schedule*/ x->x_scale, -1, -1, -1,/*no linlog, no init, no multi*/ "nosndno", srl[1]->s_name,/*no send*/ srl[2]->s_name, x->x_gui.x_ldx, x->x_gui.x_ldy, x->x_gui.x_fsf.x_font_style, x->x_gui.x_fontsize, 0xffffff & x->x_gui.x_bcol, -1/*no front-color*/, 0xffffff & x->x_gui.x_lcol); gfxstub_new(&x->x_gui.x_obj.ob_pd, x, buf); }
/* start an audio settings dialog window */ void glob_audio_properties(t_pd *dummy, t_floatarg flongform) { char buf[1024 + 2 * MAXNDEV*(DEVDESCSIZE+4)]; /* these are the devices you're using: */ int naudioindev, audioindev[MAXAUDIOINDEV], chindev[MAXAUDIOINDEV]; int naudiooutdev, audiooutdev[MAXAUDIOOUTDEV], choutdev[MAXAUDIOOUTDEV]; int audioindev1, audioindev2, audioindev3, audioindev4, audioinchan1, audioinchan2, audioinchan3, audioinchan4, audiooutdev1, audiooutdev2, audiooutdev3, audiooutdev4, audiooutchan1, audiooutchan2, audiooutchan3, audiooutchan4; int rate, advance, callback, blocksize; /* these are all the devices on your system: */ char indevlist[MAXNDEV*DEVDESCSIZE], outdevlist[MAXNDEV*DEVDESCSIZE]; int nindevs = 0, noutdevs = 0, canmulti = 0, cancallback = 0, i; audio_getdevs(indevlist, &nindevs, outdevlist, &noutdevs, &canmulti, &cancallback, MAXNDEV, DEVDESCSIZE); sys_gui("global audio_indevlist; set audio_indevlist {}\n"); for (i = 0; i < nindevs; i++) sys_vgui("lappend audio_indevlist {%s}\n", indevlist + i * DEVDESCSIZE); sys_gui("global audio_outdevlist; set audio_outdevlist {}\n"); for (i = 0; i < noutdevs; i++) sys_vgui("lappend audio_outdevlist {%s}\n", outdevlist + i * DEVDESCSIZE); sys_get_audio_params(&naudioindev, audioindev, chindev, &naudiooutdev, audiooutdev, choutdev, &rate, &advance, &callback, &blocksize); /* post("naudioindev %d naudiooutdev %d longform %f", naudioindev, naudiooutdev, flongform); */ if (naudioindev > 1 || naudiooutdev > 1) flongform = 1; audioindev1 = (naudioindev > 0 && audioindev[0]>= 0 ? audioindev[0] : 0); audioindev2 = (naudioindev > 1 && audioindev[1]>= 0 ? audioindev[1] : 0); audioindev3 = (naudioindev > 2 && audioindev[2]>= 0 ? audioindev[2] : 0); audioindev4 = (naudioindev > 3 && audioindev[3]>= 0 ? audioindev[3] : 0); audioinchan1 = (naudioindev > 0 ? chindev[0] : 0); audioinchan2 = (naudioindev > 1 ? chindev[1] : 0); audioinchan3 = (naudioindev > 2 ? chindev[2] : 0); audioinchan4 = (naudioindev > 3 ? chindev[3] : 0); audiooutdev1 = (naudiooutdev > 0 && audiooutdev[0]>=0 ? audiooutdev[0] : 0); audiooutdev2 = (naudiooutdev > 1 && audiooutdev[1]>=0 ? audiooutdev[1] : 0); audiooutdev3 = (naudiooutdev > 2 && audiooutdev[2]>=0 ? audiooutdev[2] : 0); audiooutdev4 = (naudiooutdev > 3 && audiooutdev[3]>=0 ? audiooutdev[3] : 0); audiooutchan1 = (naudiooutdev > 0 ? choutdev[0] : 0); audiooutchan2 = (naudiooutdev > 1 ? choutdev[1] : 0); audiooutchan3 = (naudiooutdev > 2 ? choutdev[2] : 0); audiooutchan4 = (naudiooutdev > 3 ? choutdev[3] : 0); sprintf(buf, "pdtk_audio_dialog %%s \ %d %d %d %d %d %d %d %d \ %d %d %d %d %d %d %d %d \ %d %d %d %d %d %d\n", audioindev1, audioindev2, audioindev3, audioindev4, audioinchan1, audioinchan2, audioinchan3, audioinchan4, audiooutdev1, audiooutdev2, audiooutdev3, audiooutdev4, audiooutchan1, audiooutchan2, audiooutchan3, audiooutchan4, rate, advance, canmulti, (cancallback ? callback : -1), (flongform != 0), blocksize); gfxstub_deleteforkey(0); gfxstub_new(&glob_pdobject, (void *)glob_audio_properties, buf); }
/* start an midi settings dialog window */ void glob_midi_properties(t_pd *dummy, t_floatarg flongform) { char buf[1024 + 2 * MAXNDEV*(DEVDESCSIZE+4)]; /* these are the devices you're using: */ int nindev, midiindev[MAXMIDIINDEV]; int noutdev, midioutdev[MAXMIDIOUTDEV]; int midiindev1, midiindev2, midiindev3, midiindev4, midioutdev1, midioutdev2, midioutdev3, midioutdev4; /* these are all the devices on your system: */ char indevlist[MAXNDEV*DEVDESCSIZE], outdevlist[MAXNDEV*DEVDESCSIZE]; int nindevs = 0, noutdevs = 0, i; char indevliststring[MAXNDEV*(DEVDESCSIZE+4)+80], outdevliststring[MAXNDEV*(DEVDESCSIZE+4)+80]; midi_getdevs(indevlist, &nindevs, outdevlist, &noutdevs, MAXNDEV, DEVDESCSIZE); strcpy(indevliststring, "{ {none} "); for (i = 0; i < nindevs; i++) { strcat(indevliststring, "\""); strcat(indevliststring, indevlist + i * DEVDESCSIZE); strcat(indevliststring, "\" "); } strcat(indevliststring, "}"); strcpy(outdevliststring, "{ {none} "); for (i = 0; i < noutdevs; i++) { strcat(outdevliststring, "\""); strcat(outdevliststring, outdevlist + i * DEVDESCSIZE); strcat(outdevliststring, "\" "); } strcat(outdevliststring, "}"); sys_get_midi_params(&nindev, midiindev, &noutdev, midioutdev); if (nindev > 1 || noutdev > 1) flongform = 1; midiindev1 = (nindev > 0 && midiindev[0]>= 0 ? midiindev[0]+1 : 0); midiindev2 = (nindev > 1 && midiindev[1]>= 0 ? midiindev[1]+1 : 0); midiindev3 = (nindev > 2 && midiindev[2]>= 0 ? midiindev[2]+1 : 0); midiindev4 = (nindev > 3 && midiindev[3]>= 0 ? midiindev[3]+1 : 0); midioutdev1 = (noutdev > 0 && midioutdev[0]>=0 ? midioutdev[0]+1 : 0); midioutdev2 = (noutdev > 1 && midioutdev[1]>=0 ? midioutdev[1]+1 : 0); midioutdev3 = (noutdev > 2 && midioutdev[2]>=0 ? midioutdev[2]+1 : 0); midioutdev4 = (noutdev > 3 && midioutdev[3]>=0 ? midioutdev[3]+1 : 0); sprintf(buf, "pdtk_midi_dialog %%s \ %s %d %d %d %d %s %d %d %d %d \ %d\n", indevliststring, midiindev1, midiindev2, midiindev3, midiindev4, outdevliststring, midioutdev1, midioutdev2, midioutdev3, midioutdev4, (flongform != 0)); gfxstub_deleteforkey(0); gfxstub_new(&glob_pdobject, glob_midi_properties, buf); }
void glob_audio_properties(t_pd *dummy, t_floatarg flongform) { char buf[1024 + 2 * MAXNDEV*(DEVDESCSIZE+4)]; /* these are the devices you're using: */ int naudioindev, audioindev[MAXAUDIOINDEV], chindev[MAXAUDIOINDEV]; int naudiooutdev, audiooutdev[MAXAUDIOOUTDEV], choutdev[MAXAUDIOOUTDEV]; int audioindev1, audioindev2, audioindev3, audioindev4, audioinchan1, audioinchan2, audioinchan3, audioinchan4, audiooutdev1, audiooutdev2, audiooutdev3, audiooutdev4, audiooutchan1, audiooutchan2, audiooutchan3, audiooutchan4; int rate, advance; /* these are all the devices on your system: */ char indevlist[MAXNDEV*DEVDESCSIZE], outdevlist[MAXNDEV*DEVDESCSIZE]; int nindevs = 0, noutdevs = 0, canmulti = 0, i; char indevliststring[MAXNDEV*(DEVDESCSIZE+4)+80], outdevliststring[MAXNDEV*(DEVDESCSIZE+4)+80]; audio_getdevs(indevlist, &nindevs, outdevlist, &noutdevs, &canmulti, MAXNDEV, DEVDESCSIZE); strcpy(indevliststring, "{"); for (i = 0; i < nindevs; i++) { strcat(indevliststring, "\""); strcat(indevliststring, indevlist + i * DEVDESCSIZE); strcat(indevliststring, "\" "); } strcat(indevliststring, "}"); strcpy(outdevliststring, "{"); for (i = 0; i < noutdevs; i++) { strcat(outdevliststring, "\""); strcat(outdevliststring, outdevlist + i * DEVDESCSIZE); strcat(outdevliststring, "\" "); } strcat(outdevliststring, "}"); sys_get_audio_params(&naudioindev, audioindev, chindev, &naudiooutdev, audiooutdev, choutdev, &rate, &advance); /* post("naudioindev %d naudiooutdev %d longform %f", naudioindev, naudiooutdev, flongform); */ if (naudioindev > 1 || naudiooutdev > 1) flongform = 1; audioindev1 = (naudioindev > 0 && audioindev[0]>= 0 ? audioindev[0] : 0); audioindev2 = (naudioindev > 1 && audioindev[1]>= 0 ? audioindev[1] : 0); audioindev3 = (naudioindev > 2 && audioindev[2]>= 0 ? audioindev[2] : 0); audioindev4 = (naudioindev > 3 && audioindev[3]>= 0 ? audioindev[3] : 0); audioinchan1 = (naudioindev > 0 ? chindev[0] : 0); audioinchan2 = (naudioindev > 1 ? chindev[1] : 0); audioinchan3 = (naudioindev > 2 ? chindev[2] : 0); audioinchan4 = (naudioindev > 3 ? chindev[3] : 0); audiooutdev1 = (naudiooutdev > 0 && audiooutdev[0]>=0 ? audiooutdev[0] : 0); audiooutdev2 = (naudiooutdev > 1 && audiooutdev[1]>=0 ? audiooutdev[1] : 0); audiooutdev3 = (naudiooutdev > 2 && audiooutdev[2]>=0 ? audiooutdev[2] : 0); audiooutdev4 = (naudiooutdev > 3 && audiooutdev[3]>=0 ? audiooutdev[3] : 0); audiooutchan1 = (naudiooutdev > 0 ? choutdev[0] : 0); audiooutchan2 = (naudiooutdev > 1 ? choutdev[1] : 0); audiooutchan3 = (naudiooutdev > 2 ? choutdev[2] : 0); audiooutchan4 = (naudiooutdev > 3 ? choutdev[3] : 0); sprintf(buf, "pdtk_audio_dialog %%s \ %s %d %d %d %d %d %d %d %d \ %s %d %d %d %d %d %d %d %d \ %d %d %d %d\n", indevliststring, audioindev1, audioindev2, audioindev3, audioindev4, audioinchan1, audioinchan2, audioinchan3, audioinchan4, outdevliststring, audiooutdev1, audiooutdev2, audiooutdev3, audiooutdev4, audiooutchan1, audiooutchan2, audiooutchan3, audiooutchan4, rate, advance, canmulti, (flongform != 0)); gfxstub_deleteforkey(0); gfxstub_new(&glob_pdobject, glob_audio_properties, buf); }