# --------------------------------------------------------- 
# colourizes xterms, requires xtermset
function prizm() {

        declare -i l=0
        for col in\
                Aquamarine Gainsboro Lavender\
                Lightyellow palegoldenrod snow\
                wheat LightGrey Yellow LightCyan\
                Lightcyan ivory mistyrose PowderBlue\
                white SkyBlue palegreen LightSkyBlue\
                GreenYellow khaki LightYellow gold\
                LightGoldenrodYellow PapayaWhip beige\
                ivory2 seashell2 plum1 wheat azure lavendar\
                snow2 cornsilk2 grey88\
        ; do
                light[$l]=$col
                l=$l+1
        done

        declare -i l=0
        for col in\
                Aquamarine Gainsboro Lavender\
                Lightyellow palegoldenrod snow\
                wheat LightGrey Yellow LightCyan\
                Lightcyan ivory mistyrose PowderBlue\
                white SkyBlue palegreen LightSkyBlue\
                GreenYellow khaki LightYellow gold\
                LightGoldenrodYellow PapayaWhip beige\
                ivory2 seashell2 plum1 wheat azure lavendar\
                snow2 cornsilk2 grey88\
        ; do
                light[$l]=$col
                l=$l+1
        done

	declare -i d=0
        for col in\
                Purple3 AntiqueWhite4 LavenderBlush4\
                black navy darkgreen midnightblue\
                darkslateblue maroon4 darkred\
                Gray25 chocolate4 darkblue\
                saddlebrown DarkOliveGreen\
                chartreuse4 slategrey brown\
                snow4 DarkOrchid3\
        ; do
                dark[$d]=$col
                d=$d+1
        done

        fg=${light[RANDOM%$l]}
        bg=${dark[RANDOM%$d]}

        if [[ $RANDOM > 16383 ]]; then
                tmp=$fg;fg=$bg;bg=$tmp
        fi

        xtermset -fg $fg -bg $bg
}