Add procedure Set_Cursor_Hidden 1/2