GET DATA 
  /TYPE=TXT 
  /FILE='qc1.data' 
  /DELIMITERS=',' 
  /FIRSTCASE=2
  /VARIABLES=case_id F2.0 cluster F1.0 x F5.2 y F5.2.

QUICK CLUSTER x y
  /CRITERIA=CLUSTERS(3)
  /PRINT=INITIAL CLUSTER
  /SAVE=CLUSTER DISTANCE.

*QUICK CLUSTER x y
  /CRITERIA=CLUSTERS(3).