;
;   LOCC test.
;
;   Scans a string area looking for a byte.
;

        .base       100
        
table:  .ascii      "ABCDEFGHIJKLMN"

ache:   .ascii      "Y"

        .base       200

main:   movb        @#ache, r8

        locc        r8, #^d14, table
        halt
    
