* Encoding: UTF-8.
*SD3

RECODE SD3.5 SD3.9 SD3.17 SD3.21 SD3.23
(1=5) (2=4) (3=3) (4=2) (5=1) (999=999) INTO rSD3.5 rSD3.9 rSD3.17 rSD3.21 rSD3.23.
EXECUTE .

COMPUTE Narcyzm=MEAN(SD3.2, rSD3.5, SD3.8, SD3.11, SD3.14, rSD3.17, SD3.20, rSD3.23, SD3.26).
COMPUTE Psychopatia=MEAN(SD3.3, SD3.6, rSD3.9, SD3.12, SD3.15, SD3.18, rSD3.21, SD3.24, SD3.27).
COMPUTE Makiawelizm=MEAN(SD3.1, SD3.4, SD3.7, SD3.10, SD3.13, SD3.16, SD3.19, SD3.22, SD3.25).
EXECUTE.

RELIABILITY
  /VARIABLES=SD3.2 rSD3.5 SD3.8 SD3.11 SD3.14 rSD3.17 SD3.20 rSD3.23 SD3.26
  /SCALE('Narcyzm') ALL
  /MODEL=ALPHA
  /SUMMARY=TOTAL.

RELIABILITY
  /VARIABLES=SD3.3 SD3.6 rSD3.9 SD3.12 SD3.15 SD3.18 rSD3.21 SD3.24 SD3.27
  /SCALE('Psychopatia') ALL
  /MODEL=ALPHA
  /SUMMARY=TOTAL.

RELIABILITY
  /VARIABLES=SD3.1 SD3.4 SD3.7 SD3.10 SD3.13 SD3.16 SD3.19 SD3.22 SD3.25
  /SCALE('Makiawelizm') ALL
  /MODEL=ALPHA
  /SUMMARY=TOTAL.