May I suggest something like:
ACTION_FOR_EACH ~haer~ IN ~haer10~ ~haer11~ ~haer13~ ~haer15~ ~haer19~ BEGIN
ACTION_IF (FILE_EXISTS_IN_GAME ~%haer%.cre~) THEN BEGIN
COPY_EXISTING ~%haer%.cre~ ~override~
PATCH_IF (SOURCE_SIZE > 0x2d3) THEN BEGIN
READ_LONG 0x2c4 "eo"
FOR (READ_LONG 0x2c8 "ec"; "ec" > 0x0; "ec" -= 0x1) BEGIN
READ_LONG ("eo" + (0x108 * ("ec" - 0x1)) + 0x08) "op"
PATCH_IF ("op" = 0xe9) THEN BEGIN
READ_LONG ("eo" + (0x108 * ("ec" - 0x1)) + 0x18) "pf"
PATCH_IF ("pf" = 0x72) THEN BEGIN
WRITE_LONG ("eo" + (0x108 * ("ec" - 0x1)) + 0x14) 0x3
SET "ec" = 0x0
END
END
END
END
BUT_ONLY
END
ENDor some such?







