bug fixed in procedure MakeBitmap