I found this in the Pariahh Dog`s script:
critter_add_trait(dude_obj, TRAIT_PERK, PERK_jinxed_perk, 1)
I believe that if Jinxed is replaced with bloody mess (i don`t remember the define for it) and if this string is in Arroyo Temple`s map_enter procedure, we`ll get some interesting effect...