PROCEDURE Open( VAR box: MessageBox; name, password: ARRAY OF CHAR): BOOLEAN; PROCEDURE Reopen( box: MessageBox); (* restart reading *) PROCEDURE Close( box: MessageBox); PROCEDURE Kill( box: MessageBox); (* close & destroy *)