subr date_reset_size, size_flag
 if $movie_date_widget eq 0 then $movie_date_widget = date_widget($mvplaywidget)
 ncase size_flag
   {
      xfont, $f10, $movie_date_win
      ;;xmsize, $movie_date_widget, 76,40
      xmsize, $movie_date_widget, 76,53
      $date_window_ixc = 38
      $date_window_iy0 = 10  $date_window_iy1 = 23  $date_window_iy2 = 36
      $date_window_iy3 = 49
   }
   {
      xfont, $f8, $movie_date_win
      ;;xmsize, $movie_date_widget, 90,50
      xmsize, $movie_date_widget, 90,66
      $date_window_ixc = 45
      $date_window_iy0 = 14  $date_window_iy1 = 30  $date_window_iy2 = 46
      $date_window_iy3 = 62
   }
   {
      xfont, $f9, $movie_date_win
      ;;xmsize, $movie_date_widget, 120,65
      xmsize, $movie_date_widget, 120,85
      $date_window_ixc = 60
      $date_window_iy0 = 20  $date_window_iy1 = 40  $date_window_iy2 = 60
      $date_window_iy3 = 80
   }
 endcase
 ;unmanage if flags are not set
 if $mv_date_flag eq 0 then xtunmanage, $movie_date_widget
 endsubr
 ;========================================================
