* Scale ID: 			Creative Lives Measure.
* Scale Name: 		Creative Lives Measure.
* TILDA Variables: 	CreativeLivesScore.
* Dataset:      		TILDA Waves 7.
* Author:.
* Institution:  		The Irish Longitudinal Study on Ageing (TILDA).
* .
* Description:.
* Cleans and codes up summed score of the Creative Lives Measure.
* .
* Version:      1.0.
* Date:         2026-09-01.
* Language:     SPSS.

FREQUENCIES VARIABLES=
  CreatFreq1 CreatFreq2 CreatFreq3 CreatFreq4 CreatFreq5 CreatFreq6
  /MISSING=INCLUDE.

RECODE CreatFreq1 CreatFreq2 CreatFreq3 CreatFreq4 CreatFreq5 CreatFreq6
  (-99 = SYSMIS) (-812 = SYSMIS) (-823 = SYSMIS) (-834 = SYSMIS)
  (-845 = SYSMIS) (-856 = SYSMIS) (-867 = SYSMIS) (-1 = SYSMIS).

COMPUTE CreatFreq1_recoded = CreatFreq1 - 1.
COMPUTE CreatFreq2_recoded = CreatFreq2 - 1.
COMPUTE CreatFreq3_recoded = CreatFreq3 - 1.
COMPUTE CreatFreq4_recoded = CreatFreq4 - 1.
COMPUTE CreatFreq5_recoded = CreatFreq5 - 1.
COMPUTE CreatFreq6_recoded = CreatFreq6 - 1.

COMPUTE CreativeLivesScore =
  SUM(CreatFreq1_recoded, CreatFreq2_recoded, CreatFreq3_recoded,
      CreatFreq4_recoded, CreatFreq5_recoded, CreatFreq6_recoded).

* Match Stata egen rowtotal() for an all-missing row.
IF (NMISS(CreatFreq1_recoded, CreatFreq2_recoded, CreatFreq3_recoded,
          CreatFreq4_recoded, CreatFreq5_recoded, CreatFreq6_recoded) = 6)
  CreativeLivesScore = 0.

VARIABLE LABELS CreativeLivesScore
  "Total Score of Arts Engagement Questionnaire".

FREQUENCIES VARIABLES=CreativeLivesScore /MISSING=INCLUDE.

EXECUTE.