%%HP: T(3)A(R)F(.);
\<< "Favourite flags" {
-40. -56. -85. -90.
-95. -117. } DUP \-> X
  \<< 1. { {
    \<< X Index GET FS?
"Set" "Clr" IFTE
    \>> X Index GET DUP
    IF FS?
    THEN CF
    ELSE SF
    END } { MODE
SaveS 22. KEYEVAL
RestS } Halt }
    IF CHOOSX
    THEN DROP
    END
  \>>
\>>