8.1.31.9. @

section id="fig-forth-1802.at" xreflabel="@"

        DW 081C0h          ; @
        DW TGLE-9
AT:     DW $+2
        LDA R9
        PHI R8
        LDN R9
        PLO R8
        DEC R9
        LDA R8
        STR R9
        INC R9
        LDN R8
        STR R9
        DEC R9
        SEP RC