[fads]

procedure Clock;
begin

end;

procedure Audio;
begin

end;

//////////////
if menuIsSelected(clock) then Clock;
if menuIsSelected(audio) then Audio;