Posted by: Andyr
« on: April 15, 2005, 10:29:00 AM »Silly me. Anyhow, incorporated. Thanks, Sim! The ReadMe says that a lot...
COPY_EXISTING ~C6ELHAN.CRE~ ~override/C6ELHAN.CRE~ /* Remove Elhan's evil-aligned Shazzellim scimitars */
~SUELHAN.CRE~ ~override/SUELHAN.CRE~
REPLACE_TEXTUALLY "SW1H50" "SW1H22"
COPY_EXISTING ~ar0407.are~ ~override~
READ_LONG 0x54 "actoroffset"
READ_SHORT 0x58 "#actors"
SET "currentactor" = 0
WHILE ("%currentactor%" < "%#actors%") BEGIN
READ_ASCII ("%actoroffset%" + ("%currentactor%" * 272) + 128) "actorname"
PATCH_IF (("%actorname%" STRING_COMPARE_CASE "ICGOB01") = 0) BEGIN
WRITE_ASCII ("%actoroffset%" + ("%currentactor%" * 272) + 128) "XGHAST1"
END
PATCH_IF (("%actorname%" STRING_COMPARE_CASE "ICGOB02") = 0) BEGIN
WRITE_ASCII ("%actoroffset%" + ("%currentactor%" * 272) + 128) "XGOLEM"
WRITE_BYTE ("%actoroffset%" + ("%currentactor%" * 272) + 134) 0
END
PATCH_IF (("%actorname%" STRING_COMPARE_CASE "ICGOB03") = 0) BEGIN
WRITE_ASCII ("%actoroffset%" + ("%currentactor%" * 272) + 128) "XGHAST2"
END
SET "currentactor" = ("%currentactor%" + 1)
END
BUT_ONLY_IF_IT_CHANGES
COPY_EXISTING ~XGOLEM.CRE~ ~override~
WRITE_ASCII 0x248 "D0XGOLEM"
WRITE_ASCII 0x268 "WTASIGHT"
IF
!Allegiance("XAPPREN1",ENEMY)
!Allegiance("XAPPREN2",ENEMY)
!Dead("XAPPREN1")
!Dead("XAPPREN2")
THEN
RESPONSE #100
END