Customizing ComplexPlot output?

Hello. I apologize for my English.
Is it possible to make it so that in the outputs of the attached file: 1) the background is pure white, without halos or shades, 2) the actual solutions are a red dot, without halos or shades, 3) the imaginary solutions are a green dot, without halos or shades, 4) the complex solutions are a light blue dot, without halos or shades?
Many thanks.

ComplexPlot.nb (254 KB)

Use ComplexListPlot instead of ComplexPlot:

ComplexListPlot[SolveValues[z^2 - z + 5 == 0, z],
 PlotStyle -> Directive[PointSize[Large], Red],
 PlotRange -> {-4 - 4 I, 4 + 4 I}]

And if you want the values annotated, wrap them in a Callout

Callout[#, #] & /@ SolveValues[z^2 - z + 5 == 0, z]

Many thanks to Gianluca Gorni and Rohit Namjoshi. Unfortunately, I own version 12.1.1.0 of Mathematica. The SolveValues instruction was introduced in 2021 with version12.3. Many thanks.

This should work in 12.1:

ComplexListPlot[z /. Solve[z^2 - z + 5 == 0, z],
 PlotStyle -> Directive[PointSize[Large], Red],
 PlotRange -> {-4 - 4 I, 4 + 4 I}]

Many thanks.
Yes. It works! But how to modify the suggestion of Rohit Namjoshi?

Replace

SolveValues[z^2 - z + 5 == 0, z]

with

(z /. Solve[z^2 - z + 5 == 0, z])

Many thanks.