// Persistence of Vision Ray Tracer Scene Description File
// File: Random_Colour.inc
// Vers: 3.5
// Desc: Macro to choose a random colour from "colors.inc"  
// Date: 17/02/2004
// Auth: James Taylor
// Web : www.jimbobjim.pwp.blueyonder.co.uk

//this file is made using a bit of Tom Melly's colors.pov - www.tomandlu.co.uk

#macro Random_Colour()
    #include "arrays.inc"
    #include "colors.inc"  
    #declare ColorArray = array[100]{
        White, Black, Red, Green, Blue, Yellow, Cyan, Magenta,
        Aquamarine, BlueViolet, Brown, CadetBlue, Coral, CornflowerBlue, DarkGreen, 
        DarkOliveGreen, DarkOrchid, DarkSlateBlue, DarkSlateGray, DarkTurquoise, Firebrick, 
        ForestGreen, Gold, Goldenrod, GreenYellow, IndianRed, Khaki, LightBlue, LightSteelBlue, 
        LimeGreen, Maroon, MediumAquamarine, MediumBlue, MediumForestGreen, MediumGoldenrod, 
        MediumOrchid, MediumSeaGreen, MediumSlateBlue, MediumSpringGreen, MediumTurquoise, 
        MediumVioletRed, MidnightBlue, Navy, NavyBlue, Orange, OrangeRed, Orchid, PaleGreen, 
        Pink, Plum, Salmon, SeaGreen, Sienna, SkyBlue, SlateBlue, SpringGreen, SteelBlue, Tan, 
        Thistle, Turquoise, Violet, VioletRed, Wheat, YellowGreen, SummerSky, RichBlue, Brass, 
        Copper, Bronze, Bronze2, Silver, BrightGold, OldGold, Feldspar, Quartz, NeonPink, 
        DarkPurple, NeonBlue, CoolCopper, MandarinOrange, LightWood, MediumWood, DarkWood, 
        SpicyPink, SemiSweetChoc, BakersChoc, Flesh, NewTan, NewMidnightBlue, VeryDarkBrown, 
        DarkBrown, DarkTan, GreenCopper, DkGreenCopper, DustyRose, HuntersGreen, Scarlet, 
        Med_Purple, Light_Purple, Very_Light_Purple
    } 
    #local TEMP = 0;
    #local TEMP = ColorArray[int(rand(RS)*100)];
    pigment{TEMP}
#end //end macro  
 
//#declare RS = seed(1);
//Random_Colour()