[piotrm]

sure; around line 520-527 (in your new modified example):

		c=FontSubLowColor;
		d=FontSubHighColor}
	if (MemVal == this_page) {   // this is added
	        a=HighBgColor;       // this is added
                c=FontHighColor;     // this is added (addition #2)
	}                            // this is added
	this.LoBck=a;
	this.LwFntClr=c;

good luck