Planet texture generation code

[Jimmy Valavanis]

r := 1 - 2 * random;