If 4 cells have specific values then x; Select Case?

I'm not sure how to do this.

I have 4 cells in range A1:D1
These cells can be either A, B, C, or D.

I need to find out if:
A = B = C = D then x = 1
A = B = C (OR) B = C = D then x = 1
A = B (AND) C = D then x = 2
A = B (AND) C <> D then x = 3
B = C (AND) A <> D then x = 4
C = D (AND) A <> B then x = 5
A <> B <> C <> D then x = 6

What is a good method to get these x values?
I tried using select case, but I didn't get the values I want...
If statement made it super long.. or atleast the way I did it...

Can you help?