setpencolor x setpc x
Set the pen color to x:
0-black 1-blue 2-green 3-cyan 4-red 5-magenta 6-yellow 7-white
