OUT #include <cstdio>
OUT #include <cstdlib>

double yd=0;

EVENT(create){
	draw_set_font(fnt_liber);
	x=10;
	y=240;
	log("Control object wow!");
	instance_create<obj_hoi>(20,20);
}

EVENT(step){
	x++;
	y+=yd;
	yd+=(double)rand()/RAND_MAX*2-y/240;
}

EVENT(draw){
	draw_textf(x,y,"controllll: x=%g y=%g",x,y);
}