diff options
Diffstat (limited to 'src/longload.c')
-rw-r--r-- | src/longload.c | 65 |
1 files changed, 65 insertions, 0 deletions
diff --git a/src/longload.c b/src/longload.c new file mode 100644 index 0000000..f6844a2 --- /dev/null +++ b/src/longload.c @@ -0,0 +1,65 @@ +/* + * longload: takes a long time to load + * + * (c) 1999-2011 IOhannes m zmölnig, forum::für::umläute, institute of electronic music and acoustics (iem) + * + * This program is free software; you can redistribute it and/or + * modify it under the terms of the GNU General Public License + * as published by the Free Software Foundation; either version 2 + * of the License, or (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License along + * with this program. If not, see <http://www.gnu.org/licenses/>. + */ + +#include "zexy.h" + + +/* ------------------------- longload ------------------------------- */ +#ifdef _WIN32 +# include <windows.h> +#else +# include <unistd.h> +#endif + + +static t_class *longload_class; + +typedef struct _longload +{ + t_object x_obj; +} t_longload; + +int millisleep(unsigned int milli) { +#ifdef _WIN32 + Sleep(milli); +#else + usleep(milli*1000); +#endif +} + +static void *longload_new(t_float f) +{ + t_longload *x = (t_longload *)pd_new(longload_class); + if(f>0.f) + millisleep(f); + else + millisleep(1000); + return (x); +} + +void longload_setup(void) +{ + longload_class = class_new(gensym("longload"), + (t_newmethod)longload_new, + 0, + sizeof(t_longload), + CLASS_NOINLET, + A_DEFFLOAT, 0); + zexy_register("longload"); +} |