extern fint gdi_frame_c(fint *,float *,float *);