MODULE Menu; (* SJ *)

(* aes module menu.
   If the program is started as a program, Menu.Register won't work. If
   started as accessory, only Menu.Register will work. Therefore it is
   possible to call all procedures without testing if called as program or
   accessory.
*)


PROCEDURE Show*(Tree : LONGINT);


PROCEDURE Hide*(Tree : LONGINT);


PROCEDURE Check*(Tree : LONGINT; Object : INTEGER);


PROCEDURE Uncheck*(Tree : LONGINT; Object : INTEGER);


PROCEDURE Ienable*(Tree : LONGINT; Object : INTEGER);


PROCEDURE Idisable*(Tree : LONGINT; Object : INTEGER);


PROCEDURE Tnormal*(Tree : LONGINT; Object : INTEGER);


PROCEDURE Tinverted*(Tree : LONGINT; Object : INTEGER);


PROCEDURE Text*(Tree : LONGINT; Object : INTEGER; Entry : LONGINT);


PROCEDURE Register*(Entry : LONGINT) : INTEGER;


END Menu.