1      SUBROUTINE FSTERM(iopt)
2      if (iopt.eq.0) then
3        call x11enddev
4      else
5        call x11changecurseur(8)
6        call seldialog
7      endif
8      end
9