#define ToonHoofding	set %MenuNr = $P(@("^"_Q_"BA(""MENU"",QM,0)")," ",1)_$QS(%ZM,3),%MenuTitel = $P(@("^"_Q_"BA(""MENU"",QM,$QS(%ZM,3))"),"\",1) do DisplayInverse^CHUI.LINE(2,1,%MenuNr_" - "_%MenuTitel_" - "_QN_" ") kill %MenuNr,%MenuTitel