****For MFQ31**** and SPSS that only takes 8 letter variable names*.
COMPUTE CRIME_RE = 5 - CRIME.
execute.

*Next, create average variables from the Relevance section (part 1):
*For MFQ31, cut out last variable of each; each one measured with 3 variables. 
*Note special purpose of Astrology: 
*ASTROLOGY - Whether or not someone believed in astrology [This item is not scored; it is included both to 
force people to use the bottom end of the scale, and to catch and cut participants who respond with 2 or above]*.

COMPUTE HarmRel = MEAN(HARM,EMOTIONA,WEAK) .
COMPUTE FairRel = MEAN(RIGHTS,UNFAIRLY,TREATED) .
COMPUTE IngrpRel  = MEAN(LOYALTY,BETRAY,YOURGROU) .
COMPUTE AuthoRel = MEAN(DUTIES,TRADITIO,RESPECT) .
COMPUTE PurRel  = MEAN(DISGUSTI,DECENCY,DESIRES) .
execute.


*Create variables from the Statements section (part 2):*.

COMPUTE HarmSta = MEAN(ANIMAL,KILL,COMPASSI) .
COMPUTE FairSta = MEAN(CRIME_RE,JUSTICE,FAIRLY) .
COMPUTE IngrpSta  = MEAN(TEAM,HISTORY,FAMILY) .
COMPUTE AuthoSta = MEAN(SEXROLES,SOLDIER,KIDRESPE) .
COMPUTE PurSta  = MEAN(HARMLESS,UNNATURA,CHASTITY) .
execute.



*Average the two sections together to produce the 5 foundation scores, which run from 0 to 5.*.

COMPUTE HarmAvg = MEAN(HarmRel,HarmSta) .
COMPUTE FairAvg = MEAN(FairRel,FairSta) .
COMPUTE IngrpAvg = MEAN(IngrpRel,IngrpSta) .
COMPUTE AuthoAvg = MEAN(AuthoRel,AuthoSta) .
COMPUTE PurAvg = MEAN(PurRel,PurSta) .
execute.



*Create an index variable for the differentiation between the first two foundations and the last three. (This difference score
*is generally the strongest correlate of people's self-ratings of their political orientation. High numbers go with being liberal.) *.

COMPUTE HF_IAP = MEAN(HarmAvg,FairAvg) - MEAN(IngrpAvg,AuthoAvg,PurAvg) .
execute.