RECODE PSY2 PSY5 PSY6 EMOT1 EMOT3 EMOT4 SOC2 SOC5 PHYS1 PHYS6 SPIR2 SPIR3 SPIR5 INT2 INT6.
(1=6) (2=5) (3=4) (4=3) (5=2) (6=1). 
COMPUTE PSYWELL = PSY1+PSY2+PSY3+PSY4+PSY5+PSY6. 
COMPUTE SOCWELL = SOC1+SOC2+SOC3+SOC4+SOC5+SOC6. 
COMPUTE PHYSWELL = PHYS1+PHYS2+PHYS3+PHYS4+PHYS5+PHYS6. 
COMPUTE SPIRWELL = SPIR1+SPIR2+SPIR3+SPIR4+SPIR5+SPIR6. 
COMPUTE INTWELL = INT1+INT2+INT3+INT4+INT5+INT6. 
COMPUTE EMOTWELL = EMOT1+EMOT2+EMOT3+EMOT4+EMOT5+EMOT6. 
COMPUTE PSYMEAN = PSYWELL/6. 
COMPUTE SOCMEAN = SOCWELL/6. 
COMPUTE PHYSMEAN = PHYSWELL/6. 
COMPUTE SPIRMEAN = SPIRWELL/6. 
COMPUTE INTMEAN = INTWELL/6. 
COMPUTE EMOTMEAN = EMOTWELL/6. 
COMPUTE MAGNITUD = PSYMEAN+INTMEAN+SOCMEAN+PHYSMEAN+SPIRMEAN+EMOTMEAN. 
COMPUTE XBAR = MAGNITUD/6. 
COMPUTE EMOTDEV = (EMOTMEAN-XBAR)*(EMOTMEAN-XBAR). 
COMPUTE PSYDEV = (PSYMEAN-XBAR)*(PSYMEAN-XBAR). 
COMPUTE SOCDEV = (SOCMEAN-XBAR)*(SOCMEAN-XBAR). 
COMPUTE PHYSDEV = (PHYSMEAN-XBAR)*(PHYSMEAN-XBAR). 
COMPUTE SPIRDEV = (SPIRMEAN-XBAR)*(SPIRMEAN-XBAR). 
COMPUTE INTDEV = (INTMEAN-XBAR)*(INTMEAN-XBAR). 
COMPUTE SUMDEV = PSYDEV+SOCDEV+PHYSDEV+SPIRDEV+INTDEV+EMOTDEV. 
COMPUTE VARIANCE = SUMDEV/5. 
COMPUTE BALANCE = SQRT(VARIANCE)+1.25. 
COMPUTE WELLNESS = MAGNITUD/BALANCE.