START       100
EX        *LDX        ZERO        Initialize the index reg to 0
MOVECH    *LDCH       STR1,X      Load char from STR1 to reg A
          *STCH       STR2,X      Store char into STR2
          *TIX        ELEVEN      Add 1 to index, compare result to 11
          *JLT        MOVECH      Loop if index is less than 11
          *RSUB
ZERO       WORD        0               Integer constant
STR1       BYTE        C'TEST STRING'  11-byte constant
STR2       RESB        11              11-byte variable
ELEVEN     WORD        11              Integer constant 
           END         EX