Key twosuperior A C autohide FvwmButtons-Main 500 W

     AddToFunc autohide
     + I ThisWindow ($0) Deschedule $[w.id]
     + I ThisWindow ($0) KeepRc ThisWindow (shaded) WindowShade off
     + I TestRc (!Match) All ($0, !shaded) autohide_hide $1 $2

     AddToFunc autohide_hide
     + I Schedule $0 $[w.id] WindowShade $1
     + I Schedule $0 $[w.id] Deschedule $[w.id]