siner = 0;
orbsurface = surface_create(120, 136);
afactor = 0;