AREA theRemover, CODE, READONLY
                ENTRY
pointIncrement  EQU 1
spaceCheck      EQU " "
tCheck          EQU "t"
hCheck          EQU "h"
eCheck          EQU "e"

                ADR r1, EoS
                ADR r2, STRING1
                LDRB r4, [r1]
                LDRB r3, [r2], #pointIncrement
                CMP r3, #tCheck
                BEQ tChecker
                BNE store

continue        LDRB r3, [r2], #pointIncrement
                CMP r3, #spaceCheck
                BEQ checker
store           STRB r3, [r1, #pointIncrement]!
                CMP r3, r4
                BNE continue
                b finish

checker         MOV r5, r3
                LDRB r3, [r2], #pointIncrement
tChecker        MOV r6, r3
                LDRB r3, [r2], #pointIncrement
                MOV r7, r3
                LDRB r3, [r2], #pointIncrement
                MOV r8, r3
                LDRB r3, [r2], #pointIncrement

                CMP r5, #spaceCheck
                STRBEQ r5, [r1, #pointIncrement]!
                CMP r3, #spaceCheck
                CMPNE r6, r4
                CMPNE r7, r4
                CMPNE r8, r4
                CMPNE r3, r4

                CMPEQ r6, #tCheck
                CMPEQ r7, #hCheck
                CMPEQ r8, #eCheck
                STRBNE r6, [r1, #pointIncrement]!
                STRBNE r7, [r1, #pointIncrement]!
                STRBNE r8, [r1, #pointIncrement]!
                STRB r3, [r1, #pointIncrement]!
                B continue
finish          B finish

STRING1         DCB "and the man said they must go"         ;String1
EoS             DCB 0x00                                    ;end of String1
STRING2         SPACE 0x7F                                  ;just allocating 127 bytes
                END