8.1.31.10. !

section id="fig-forth-1802.store" xreflabel="!"

        DW 081A1h          ; !   STORE
        DW CAT-5
EX:     DW $+2
        LDA R9
        PHI R8
        LDN R9
        PLO R8
        DEC R9
        DEC R9
        DEC R9
        LDA R9
        STR R8
        INC R8
        LDN R9
        STR R8
        DEC R9
        DEC R9
        DEC R9
        SEP RC