This seems to work

Make a helper with a palette with all the red values adjusted -30, i.e 159,44,255 to 129,44,255 and draw the after imge from that
[State 0, Helper]
type = Helper
trigger1 = time = 1
trigger1 = numhelper(12000) = 0
helpertype = normal
name = "ai"
ID = 12000
stateno = 12000
pos = 0,0
postype = p1
facing = 1
keyctrl = 0
ownpal = 1
supermovetime = 0
pausemovetime = 0
[Statedef 12000]
[State 0, RemapPal]
type = RemapPal
trigger1 = 1
source = 1,palno
dest = 30,palno
[State 0, AssertSpecial]
type = AssertSpecial
trigger1 = 1
flag = invisible
[State 0, Turn]
type = Turn
trigger1 = facing != root, facing
[State 0, ChangeAnim]
type = ChangeAnim
trigger1 = anim != root, anim
value = root, anim
[State 0, PosSet]
type = PosSet
trigger1 = 1
x = root, pos x
y = root, pos y
[State 810, 1]
type = AfterImage
trigger1 = time = 1
time = 170000
length = 99
framegap = 3
palcolor = 256
palinvertall = 0
palbright = 0,0,0
palcontrast = 256,256,256
palpostbright = 0,0,0
paladd = 0,0,0
palmul = 1,1,1