state "mainloop":

    if:
    then:
        key: up f
        key: up b
        continue

    if: any:
        all:
            coll: all yes
                ;;              +
                ;;
                ;;        .   +
                ;;
                ;; ( )  .
            coll: all no
                ;;         .   .
                ;;         *\*/*
                ;;   .   + - . - .
                ;;        \*/*\*
                ;; .   .   .   .
                ;;
                ;;  (.)  .
        all:
            coll: all yes
                ;; ( )  .
                ;;
                ;;        +   +
            coll: all no
                ;;        .   .
                ;;       /*\*/*
                ;;      + - + - .
                ;;       \*/*\*
                ;;        + - .
                ;;       /*\*/*
                ;; ( )  . - + - .
                ;;        */*\*
                ;;        .   .
        all:
            coll: all yes
                ;;        +   +
                ;;
                ;; ( )  .
            coll: all no
                ;;        .   .
                ;;        *\*/*
                ;;      . - + - .
                ;;       \*/*\*
                ;;        + - .
                ;;       /*\*/*
                ;;      + - + - .
                ;;       \*/*\*
                ;;        .   .
                ;;
                ;; ( )  .
        all:
            coll: all yes
                ;; ( )  +
                ;;
                ;;        +
            coll: all no
                ;;        .   .
                ;;       /*\*/*
                ;;      + - + - .   .
                ;;       \*/*\*/*\*/*
                ;;        + - + - + - .
                ;;       /*\*/*\*/*\*
                ;; ( )  . - + - .   .
                ;;        */*\*
                ;;        .   .
        all:
            coll: all yes
                ;; ( )  +   +
            coll: all no
                ;;   .   .   .
                ;;        \*/*
                ;; .   .   + - .
                ;;        /*\*
                ;;   .   + - +
                ;;        \*/*
                ;; .   .   + - .
                ;;        /*\*
                ;;  (.)  .   .
    then:
        key: down f


    if:
    then:
        key: down b