The error message states that your equations are not resulting in numbers. This clue suggests that you need to evaluate the equations at the start to find a syntax error. By setting time to zero and substituting in all the initial conditions, you can evaluate the first step manually to see what is wrong.
(cpdae /. t -> 0) /. (cpinit /. Equal -> Rule)
This should result in equations with only the lowest derivatives and numbers, however, I get terms that have expressions like this:
+(1/2) Sqrt[3] Derivative[1][Conjugate][Sqrt[3]/2]
You have the derivative of Conjugate[] applied to constants. You need to fix your equations before trying to run NDSolve so these terms are not there. I have not looked in detail at what you are doing but is it safe to set those terms to zero? -- I'm not sure what the derivative of the Conjugate function really means. It likely results from the chain rule applied to Conjugate[function[t]]. If you fix this, your equations should evaluate.
I hope this helps.
Regards,
Neil