#include <daemons.h> varargs void event(string fun, int when, mixed *args, int reg) { object ob; function f; if( clonep(ob = previous_object()) ) return; if( !function_exists(fun, ob) || when < 60 ) return; f = (: call_other, ob, fun :); EVENTS_D->AddEvent(f, when, reg); } int event_pending(object ob) { mapping tmp; tmp = (mapping)EVENTS_D->query_events(); if(tmp[file_name(ob)]) return 1; else return 0; }