  FUNC openscreen(new'screen#) CLOSED  
  PROC closescreen(screen#) CLOSED  
  PROC closeallscreens CLOSED  
