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