Manipulate[Plot[{Sin[x],Cos[x]},{x,0,2 Pi},PlotStyle->{kolor1,kolor2}],{kolor1,Red},{kolor2,Blue}]