// ==UserScript==
// @name VIQ+
// @author NCSR
// @namespace T3
// @version 1.0
// @description  VIQ+
// @source http://tethis.iit.demokritos.gr/uscripts/firefox/viq/VIQ+
// @identifier http://tethis.iit.demokritos.gr/uscripts/firefox/viq/viq.user.js
// @include http://*.*
// @exclude *.css
// @exclude *.js
// ==/UserScript==


//======================== MAIN FUNCTION CALLED WHEN PAGE IS LOADED =======================

function functionMain(e) {

    var LINKS = [];

    var IMGOK_01 = 'data:image/gif;base64,'+
    'R0lGODlhFwAXAPcAACFaAKnNC3OsAK+0qqm5inGSSFiYANnsprTRaFKTAIO6AEOKAHmYVqvQWdXV'+
    '1VmGKoW9MEGFAJnIU+Txtcfjg6rRSoa8KWSjAHOnKMzSp+/v75/OQFmiHazRQ3CgIIW5JIuafbPA'+
    'fU+FGi9tAdDnlJjHPluOEZPBM8DdgHCoGbrIYavRLOPi52SKPmSlHUqLBpzJAczMzN7vrrjaaEF6'+
    'CMrieWCYEXu0P3ezK568WFKOCZrFLpm+F7+/wIOXbVWUEcrMxbPVWtPonUmMAL7cTGqXKXCoD2Wi'+
    'ETx0Bq+9kKWwl7XZGMDeeHGxIr/dcY2+EyhbAabDK0iEC73bWbbXPaDLSc7mjFybAIS4KYmiZ97f'+
    '3MfVjuXxvG2rI3WxGkuRAIOqP1yaDovCLrDTVLjHZeDwtHymKJHBNnuzAMbLu1OMEGOXG1OTCdfb'+
    'zpG0TJS9AKe4fKDNOo69KrfaBMPeYMHZe8XgaU6aFi5gBJHCR1uPH9PYxG6pF7Gysr7MmbjbX6bO'+
    'UqDKI4S2Hd3upzluBtbrnLrbN9TolcTRamWKO7TFiq7UWpXDJHmvE1WZIaPOADt5BcPHt6TMQo2/'+
    'MWmiHkSDCMfMs5OeicbgckuGELHVMF6bCG6oAH+yM3muN3uSZbrTHIK1F3WuHWilE8fhg7TXZISf'+
    'YsLSmeb3vYa7SMLZYbfYUs7lhZK1LavVSqXNN3qvF2KeECljAaTOSdTojliUFbW1vWqMSb/Lemyl'+
    'FmedILDVKGicGrfXaWytJYy/AJ3MAIK3AmehCK3SYnOvKsjkYJHEMZ7KU5TOOoq7HLrZCL3bYubm'+
    '5l2dGMbee5XEEn+0D73dbY7DN1KFHmuUOZzHQ5TBKs3kezaHDHiwAHq2J7/ZO5SvX9HXvaPNH2al'+
    'Kp3ITKvUQa29iK3VDZrGJJrGPM7VtnWbQn2aWV2HMsHBwoaXdrXCmI6tSoCvLZPEAMPhQr7eJIi6'+
    'PleVCn2zIXOtGpTFOub3tYvAN6XWSujo69bW3lqUD6XWQrS2s////yH5BAEAAP8ALAAAAAAXABcA'+
    'AAj/AP8JHDhQy55ubZgRXMiwjapixWpIdOLkFEOGoAzZuUarkEcSpHotSnNR4BxNdGp0HCRDxoFD'+
    'ISUpujjOGxE7rGgdkDFhgksSTBqcYLcwCrAVq5xYKXRgApenLlGUqnaGxcB9v969SrqU51MuZfC5'+
    'GFZlkryBrRQ8ezUmGoVDg8p8lWTPF7ZZk+jpE5gNzZMdFWY46yqDi6t+YmeUsCCKwD9mFzhBsyYp'+
    'iFsShWTMCldCGxNAZ7DUA/MvRoIrRgTFqfTHyVt7Gzo7W1TNAj0+vP4BiZBgEx88NKQEcUIMC5Ym'+
    'ThpUyysq1pp/+xZEGLIJD/BKtZppDwKoRN56scIUmxE4JEKEF2GsE4JUqVI1e2dsexkVa14WgWrM'+
    'nw8DRdaIER/QI6AXfNAXxjwxCDSAdOa9MA8UAPAhoYSjHBHGgToQJMUCDL7AxoVhxCIiiPPM4w9B'+
    '+wyhYoMv6MBGiTDOo0MiDPmj4o0vtOjii/N8MU1J6izwRQJEFlnkF7eUJJAGnwwxpJEJiGCLkgRp'+
    '0McnLaRzyyUOUOkllQEBADs=';

    var IMGOK_02 = 'data:image/gif;base64,'+
    'R0lGODlhFwASANUAAAasCv///1L4VizSMD/lQ6P/per/6zXbOUzDT3X/eF//YzK7NY3/kBWxGBrA'+
    'Hsr/zCPJJ+j36J7foCm4LRC2FJjdmqThptbx1wmtDbbnt+r46yO2J2HKY+L14vz+/B20IRiyGw+v'+
    'E1jHWy+6MuX25fP78z3EQMrty2TLZu357tzz3Kfiqa3krsfsyN/038rvyorYjITWhl7JYLPmtAAA'+
    'AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACH5BAAAAAAALAAAAAAXABIAAAanwIBw'+
    'aGAIDoMkQVAYOp2FA2BKrZoIj2fAIK16AbDWVOE0QL5eSWBGJQwH6GpMuKqSE3EqYpipUsx5ACAR'+
    'QykYdoEAFUMRIl5dVQgyUyMeQi4bX3BUDRYBHYcsQhoTaJsACyRDKAtCJQtxBJAIhAEXngEceQkF'+
    'VR8nThJ5DkIEVQ0vQioheQxDxpwXAQi7TwIUVBMVcQ5NWg8CDnkQCVrfRgLpCgUG5kEAOw==';

    var IMGOK_03 = 'data:image/gif;base64,'+
    'R0lGODlhIAAhAPcAAAAAAP///93u3QBmIsTCw7m0t9G+ytnD0dTAzdfC0NPBzcm6xMW5wbu4urWy'+
    'tNXBz9jE0tXCz8y8x8+/ysO5wP/W87+4vbu3urq2ub24vNDCzry7vLa1tr67wLOztLO1tpCmm52r'+
    'pJWonoeik3+fjQBqJwBnJgB2KQBtJgBoJQBnJABlJApvLwtwMA1yMg5xMQ5tLxBuMR57PyF1PjKI'+
    'UT2QW0GSXmyWe6CrpABvJQBtJABnIwBmIQBmIwBlIgBjIABaHQBTGwNoJAVsKAxrKxJxMRZ0NRl3'+
    'OSN9QSyDSTmKUzV9TTt/UUuXZXKwh1uNbF6PbmGQcX+4knKXfgBsIgBpIQBnHwBlIABkHwBjHgRm'+
    'Ig9rLBdwMxp2NziHUDuKVD6MVkeRXUmSYEyVYk6WZFObal2fcZbGpXaZgX2bhpuonwBkHQBiGwBi'+
    'HQBhHAVkHw1oJh92OCV6PWKidWWjd2uofW2pfnSuhXawh3qxip3JqrrcxNTm2QBkGwBhGQBhGgBf'+
    'GANiGyNxNyZzOl+Na32zi4y8mZvEpgBgFgBeFwBdFjB+Qjh6R0WMVk6SX1uba1qKZYG0jYi5lJbD'+
    'oZO+nZ3Gp6jOsQBfFABdFQBbFBVqJ1aWZGuRc63RtbHTuMXgy5KkluXz6ABfEgBbEgBZEAFcEwZe'+
    'FgpjHBJlIRtuKzF4Pl2aaVaHX6PJqrnZv9Hn1ayxrQBdDwBcEABYDwBXDpa+nafJrbPVucvjz+Tw'+
    '5gBbDgBbDQBZDABWDLTRuABaCwBZCgBVCglcFMbeyQBZCQBUCQBTCAhRD7fUugBYBwBSBwBRBpe8'+
    'msTdxgBWBABSBQBQBQBKBMDZwdbq19ns2tzu3dvt3ABWAwBVAwBQAwBOAgBVAQBOAQBNAABLAABJ'+
    'AABHANrt2tns2d/w39zt3N/v35ynnN7v3eHx4ODw3+Ly4ePy4ub05OXz4+j15uz36u/57ej15fD6'+
    '7fH67u/56/P78Pr++Pj/9Pf89Pr/9v3/+/3/+P7/+////f///v///yH5BAEAAP8ALAAAAAAgACEA'+
    'AAj/AP8JHEiwoMGDCBGC4sRkCxYfVqoIrADqFBsVCQtqSKMqljNgbHhc8eGjDxcoA2Sl2MEj4z8F'+
    'Hxhh+8WmWDdlwYJp69aGzTU2KQYM6LEiIQQQp5Jl0TbLS6RJeioZohMHkNCrQq0cRCDil6hR3Bw1'+
    'yxeA3759AQKEUYb1qtaCCzwEulSslK0A+cZZEyAgXAAp3doOwGjQwYQZxGiZ+hTg3F6+1vBNI5Vp'+
    'h9AeWHjsOJjgxrZEwfYEEMe39LkANrwFHZCiJqagBS9kICLKm5MA4UpD5ncrGxahKgApO6QEmgmJ'+
    'Aw1MuUbKSD135HQLGBeABjcVA3b8+HYngKtiP1oK/9wgYcmvb3gCUJNezV4nY79ZgysTYB3qbiYG'+
    'FsAAg9cbXPNIJ4A1ATTxTVApQCMHP+9Qw48lwfDwg0AMqMHGM0nck46A9LyiRSLZgYYLP6S5ow4L'+
    'mRBmABq/ZEMGPwJWE4Ah3mCXwje35TbdPV8YM4BAEUSRDDd2+FONgP2MwU0PKigTRz7Q8SXjHIH1'+
    '8M8DTwyZRwACqkOPDLQMwAM3eqinWz91aCPUP0Em482W71hzJF/1NPOHGzsogwQ/6EjXjx1q/jhB'+
    'GruMIgcz0wRwz4AC+CMJN5ZpM0kAj/FFTgB0BPYjBTisMcAo4MCxijRlNWoHNwNk8oI77khXTj5g'+
    'sP/1YwMFxHDJYJh8M0sjyKRlRjc7eENfdLqxw44LpVj5DwcTMJGMCli81kY3z2ySixnaXKFMJTDq'+
    'Rg4/nfTyAxUDRYCGM1e0gEQ3f5SQRTdCFJGFqu3EI2AANXSDQhADXWABDLsIc0YlxSyTQgqJ+JHC'+
    'MkrkU45u1HhXTBs5FISAZ7OgEgAfqXyTBXYDdFNIAHMKQM08+sQBzQlAFETAAjP8Yowmaa3ijSIp'+
    'YDGLJ/mURg08ATTiDQo6HMQALIgg0k0qoQRACTe0rJHFJwFWE04/AWzyDQ8nGDXCNX4ok0gtAbyC'+
    'SjRHsPMOPFgPo8o3V6DgQ0YRkKBLLJh4s4gvehxSI0YA8uDSyiOkaLNS0S4dEIIm27ARDDdFDNGF'+
    'GEnwoEw3QCnrkkAKdMAKIs7IksgVgGTTyx889CDm5gZNAAskglzBQ1visY6QOYQMMsAVP24eEAA7';

    var IMGOK_04 = 'data:image/gif;base64,'+
    'R0lGODlhGQAZAOcqAABmAKnicV/FAdHnxzOZAHm1ZiaMAEudLmGlUVG3APf98rXmg2a2OCyDHxt2'+
    'FpvPfUasAMThthh2EZ/fX3a9TeXy3T2dECaGDY/OYzeOJIXWNG7DKzuhAFWcSRqAAK3Xl16/DJnM'+
    'mTaGMApwAH63boLJTWmzRDSTDtfqz2PBE////4y9g+726RNyDkyyABV7ACCGAD6LOiuRADSMIJnM'+
    'Zo3XRlS6ASJ6HVKlLqvNptDus6fibTmcBxB2AG/BL93xy0KbIUGnAGvOCSGDCEqsCaTWgnu+WEGX'+
    'JFmjRoTGWiuJEbDlfDGDKZbOctXuwDCLF06YQwtuBiF7GbHfjePz2aDLkrfcpGmpXTuJN3LKI4G/'+
    'YvL48OLy11zCADGSC02cOSmLB9vxxp7YcHO1SnPDNzyYGlepLoC7aTyRKJnMZkGfFUCTLev43iWA'+
    'F1O3BRd7BRN3BYLSN2bMALnoijWKKPj89tPwtSmDGWWkXTCHJFabT9XsxTqKMaTdcCmMGSOBEk2r'+
    'EUKUKavgfGyzTUigI/T68t731ofLV3e7UjaIK5nMmYPIUNbm1pXKezGUGajTkHfMKlCgN5fVZf//'+
    '////////////////////////////////////////////////////////////////////////////'+
    '////////////////////////////////////////////////////////////////////////////'+
    '////////////////////////////////////////////////////////////////////////////'+
    '////////////////////////////////////////////////////////////////////////////'+
    '////////////////////////////////////////////////////////////////////////////'+
    '/////////////////////////////////////////////////////yH5BAEUAP8ALAAAAAAZABkA'+
    'AAj+AP8JHDjwAQkEevSQaESwoUNBBbCIwLMixAo8WJgUEOSwYRM+UB7ZGUlSx4cOTLR0FGgkkZYF'+
    'c2LKnNmECYKOiBosmsCzp0+eCwbEuNLwUAMfGpIqXZo0ABsVjLCcGdinASAhWLNqxbpDgYqvOZhI'+
    'EmjmiQA5aNOqlVODxVcVYeI8ISTwDpEuePPq7QKJy9swWbrYuNHnUBs3NhIrXgzix1snKRTfYYDj'+
    'SYLLmDMnmPKWy4bMJ44cOeGitOnTZLyqUFDitAsLM56cCEK7SR0VdZrQfruHtm/aPG7MUMKhuO2v'+
    'LChw+FqHQfHnxb3MOHCHgHUeVt6yePT1g/Xv35WpzDAhBbyFCG+/FlIDHnybSP9ugJFBXwYhFOk/'+
    '1N8vA4wUDP9k0IYBBBIIBH4qbFFGgQwa8EcDAmFwwxAwVFhhJBWoUIWFHMIwhBRjDBSJFB6UaOIX'+
    'SFxg4ooeSIFGQ3lI8cYLNNZoY41vOHCHGA7FCEcPQAYpZA9wSHEDjx2tcYMEIzTppJMSSJEHkisZ'+
    'ccMNDrQQBQBRtCDBDVIMspJDRih55ZV0iNlRQAA7';


var IMGOK_05= 'data:image/png;base64,'+
    'iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAYAAABXAvmHAAAAGXRFWHRTb2Z0d2FyZQBBZG9iZSBJ'+
    'bWFnZVJlYWR5ccllPAAAB31JREFUeNrUWgtsk1UU/tputGxsbgtj1PDYAycDVodMERUBFYQgBB9M'+
    '5gs2k5KhETHGTEOMEhTjC1DjskZhOFBBAhp8EXU4RTbneIhxbMuAblAKbGu7R9fX3//33H/dbNd2'+
    'rI8VucnJ7X//x/2+c84993EqEQQB13KJCvUDbW1tiIqKgkwmE2upVNr/W6PRZNMjTrVaXed0OsGU'+
    'xWp3SUhICKl/6XBoZdu2bUkEfktSUtLJxMTEf+j3u4zUcBRJqC7kbgG5XI6ysrJVEolke05ODmbM'+
    'mAGe51FdXY26urr99HhJQUHBjw6HI2wWCJlA7OMvivXmuyaNpGojAXp+7ty5GDNmjMdzWq0WlZWV'+
    'sNls69f92vR6X7t551tXdwy4wD9CVZFKpZqTm5srWoSVPuWQRZCamork5GRUVFRs3HwXxlLzm0RE'+
    'N2wuRH77EQM1lI/ExcWBaV2pVIrXzDUYaCYendE16+/EiROora1FANYvoUCwxucd9hFfUlpaKrS3'+
    'twuBFPJtwWq1ijWREKx2hyg0DgSO48T2QIvRaBQYFn84B3Wh5uZmnDt3rj809oXHvtpd3MMoKx//'+
    'XI3ndx4Qf39Y8ACemD1D/E1jwCOMEjEvcb/PgsCwjwH3YjRb8M43v2D732dww0trITg5rNPsQuOF'+
    'y9iQtzDsYTSs88DnR44j47k3sZcfiYlqAm+jseoch9SiddhxuQcFJV/g9wbt1ZuJP6ioxZdHT6Hb'+
    'avd5Xz4mGWlrnkZ07Hg49B3gLWaxXRYbj5QFeahp+QtfbS0Hb7P77SPvlikoXjhreAh8WXsKY59e'+
    'D/kEBSQDbCc4SdkdgKPdBrteD4Fz9N/jOg1wWs1QJKtw4ys3QRoLr/dZsV8E9rzx4vARYMWqbYZd'+
    'NyJgUwuWHtgtWtgvXOXFHBuUgnRYllCRIkCrSqnzWiZwrVuAd4okQinRUgmWpSXBSTPpDy0m9HB8'+
    'BBdzNFMKkIQEfssd6VgwIVG8Xk5EVhysj6QLUXiUBA9+6+zMfvCsTE+O7f1mxAhwzH0CZyCjlejm'+
    'OZMJfJJH+2GdyfXNiBLwLIooKWYqExETLcP3Zy77BP/+/KlYlDbao732oglrDp6kbzojOYiJgFt/'+
    'cSOicGD5rUi9Lka8Lj2uxaYjjR7gt8zPxqJ0zx3an3oTVh04CrPDGeEoxJYIbhuRacr4fvCsrJ6e'+
    'imiJgNcq63rBL8zB/TeM9QR/wYDH99fAyoU+nwRBgDp120jVkxu0mm1IjpX3txXmpEFKzyQoorEk'+
    '83pP8Lp2PLa3KizggyLAkwUkwn9xu7XLgYc/+wW7V9BGN25kf/uq6Wle79acb8Oju38LG/ig9gPi'+
    'TMx5StNlIx4q/xkXuyx+36s514r8XYdgsdq83neXCBBw+JSzbUYs2/4DdB1mr3eqmi9hRfmPsNis'+
    'ft/vk+EnQOb3p73mNhMe3Pa9B4kq7UU8+unBK2o+IhaQU5wXOPugGmxuM2Cp5mu0GLtQdVaP/LLv'+
    'CPyVNc+E52yIGRHtffZD0Uyj0chCHsRTlKPxp6EHUYqRgz53niyxtGQfjD02WB1D16rTbkNGcqJP'+
    'AoIgsE67A7GAgRtg0nk3poLr6e4dyFeQC4YOl+a5IQv79j1ZqZ5Rj+eZWNRqdXegLqRjh7DuZbFq'+
    'EjjaGvKkqUCADUV4ck0HEcjLneK5T7aLBwC6YMbA4a6uLs/VpEyKF+67DbZOU+/OLIxi7+zA6jk3'+
    'Y5TCc79tNosB4WgwBPYajUavxidvV+GxW7J6SXCOsGjf3t2JvJsz8ey9M70Pynox7A+YAPlcRWdn'+
    'Z1V3t7frFS++EytnTYPd3N0b/kLQvKPHjBW5k/Hqsnle/VgsFhgMBlGZwYbREnY+6usUuXjxbKjJ'+
    '5HbyW95BfkpbzUCEWY+9u/L2bGx48B6fnbe0tLC+nyNlOoNOcLBUkVKpXJuRkeHzcPdQvRa7jpxA'+
    'ZUMzZHQ98Ejd12k47zrA3bh8AZ64I8fn4a5Op0NTU5OGwK8OdTH3kl6vHxETE1M0btw4r5vzp03C'+
    'opzJKK2owYZ9P/WfZA8k0pfgY2Hx5WV3Q333THGLyfmYfVtbW3H69GnRA4JOcAywAottz6SlpRWl'+
    'p6f7PV7naatZfvgYth+qQYO+FVIXCZ76mDR2NJ6aNxOr5uTSPgF+j9fZcX59fT0jPJe0XxkWAi4S'+
    'E5jrp6SkFE2dOhUKhcJvfoD9/q3+LPb9cRJO0viS3GlYoMr0mWZ1B08ug8bGxjJXRqYmpBTTIEQ2'+
    'yeXyYpVKJaaU/BFgtbsbMdfxR8BkMuHYsWOsZi7zNoE/O1Q8QWUpicRSqorGjx+/kFkjPj4+KAIs'+
    'W9PQ0CC6DF2zaLM1UCwhpVmJSDEB3cTGRXZ2NkaNGjUkAmx5wEDX1dUxEm/T7Q8JfEswGELOExMJ'+
    'NvcXE+jXJk6ciKysLNA48UmAuQrTOPN1q9X6nsvXm0LpP2yZ+j179rDlrpgvTkhIuJXNG0wYERYS'+
    '2aR06dKlBrr/CUlZfn5+6/8iU+/rzx47duyY4iLDhFloN8m3hYWFh8P9Zw/Jtf53m38FGADbB2OE'+
    '+c9o0gAAAABJRU5ErkJggg==';



    //-------------------------------------------------------------------------------------

    function GetURLData(URL,IMGID,BackParse,Or_URL) {
        var QuaproMsg = "";
        var WMAQuaproMsg = "";
	//------------------------------
	var cookieValueServer=getCookie('VIQ+_Server',false);
	var cookieValueUsr=getCookie('VIQ+_Usr',false);
	var cookieValuePass=getCookie('VIQ+_Pass',false);
		
	var User_URL=URL;
	if (cookieValueServer!="#"){
	    User_URL=URL+"###"+cookieValueServer+"#"+cookieValueUsr+"#"+cookieValuePass;
	}
	//-----------------------------	
	GM_xmlhttpRequest({
	    method: "POST",
	    url: "http://143.233.226.33:8080/QuatroPlus/QuaproPlus",
	    headers: {"Content-type": "text/xml"},
	    data: "<soapenv:Envelope xmlns:q0='http://www.quatro-project.org/quapro' xmlns:soapenv='http://schemas.xmlsoap.org/soap/envelope/' xmlns:xsd='http://www.w3.org/2001/XMLSchema' xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance'> <soapenv:Header></soapenv:Header> <soapenv:Body> <q0:quaproRequest> <q0:url>" + User_URL + "</q0:url> <q0:ua>qsn</q0:ua> <q0:format>soap</q0:format> </q0:quaproRequest> </soapenv:Body> </soapenv:Envelope>",
	    onload: function(responseDetails) {			
			if (responseDetails.status == 200) { var QuatroDOM = (new DOMParser()).parseFromString(responseDetails.responseText,"text/xml");
							     var BLOCKCONTENT=false;
								 var labels = QuatroDOM.getElementsByTagName('label');
							     //-------------------------
							    for (var i = 0; i < labels.length; i++) {
								 //============================== BLOCK
								 if ( labels[i].getElementsByTagName('la')[0].textContent == "pref") {
								    var descriptors = labels[i].getElementsByTagName('descriptor');
									for (var j = 0; j < descriptors.length; j++) {
									   if (descriptors[j].getElementsByTagName('value')[0].textContent=="1") { BLOCKCONTENT = true;}
									}
									   
								 
								 }
								 //============================== QSN LABEL
								if ( labels[i].getElementsByTagName('la')[0].textContent == "qsn") {
								        QuaproMsg = "";
							     		var QuaproArray = [];   //--- to store (ID, Description, Perc)...
									//----------------------
									var descriptors = labels[i].getElementsByTagName('descriptor');
									//----------------------
							     		for (var j = 0; j < descriptors.length; j++) {
									    var k = descriptors[j].getElementsByTagName('id')[0].textContent.indexOf("perc_",0);
									    if (k == -1) { QuaproArray[QuaproArray.length] = descriptors[j].getElementsByTagName('id')[0].textContent;
											   QuaproArray[QuaproArray.length] = descriptors[j].getElementsByTagName('description')[0].getElementsByTagName('descriptorDescription')[0].textContent;
											   QuaproArray[QuaproArray.length] = "";
									                 }
									}
									//----------------------
							     		for (var j = 0; j < descriptors.length; j++) {
									    var xid = descriptors[j].getElementsByTagName('id')[0].textContent;
									    var k = xid.indexOf("perc_",0);
									    if (k != -1) { xid=xid.substr(k+5);
											   QuaproArray[QuaproArray.indexOf(xid)+2] = descriptors[j].getElementsByTagName('value')[0].textContent;
											 }
									}
									//----------------------
							     		for (var j = 1; j < QuaproArray.length; j=j+3) { QuaproMsg += QuaproArray[j]+";"+QuaproArray[j+1]+";"; }
								}
               
                               //============================== WMA LABEL
                               if ( labels[i].getElementsByTagName('la')[0].textContent == "wma") {
								        WMAQuaproMsg = "";
							     		var QuaproArray = [];   //--- to store (ID, Description, Perc)...
									//----------------------
									var descriptors = labels[i].getElementsByTagName('descriptor');
									//----------------------
							     		for (var j = 0; j < descriptors.length; j++) {
									    var descriptions = descriptors[j].getElementsByTagName('description');

							     		    for (var k = 0; k < descriptions.length; k++) {

                                                                                  if (descriptions[k].getElementsByTagName('lang')[0].textContent=="en") {
										     QuaproArray[QuaproArray.length] = descriptions[k].getElementsByTagName('descriptorDescription')[0].textContent; }
									    }
                                                                            QuaproArray[QuaproArray.length] = descriptors[j].getElementsByTagName('value')[0].textContent;

									}
									//----------------------
							     		for (var j = 0; j < QuaproArray.length; j=j+2) { 
                                                                               WMAQuaproMsg += QuaproArray[j]+";"+QuaproArray[j+1]+";"; }
								}

							     }
							     //-------------------------
								 
							     if ((QuaproMsg != "")||(WMAQuaproMsg  != "")) { 
								 
										if(BLOCKCONTENT==true){
											var elem = document.getElementById("QPLSBLK");
											elem.innerHTML="";
											//-----------------------------------
											var elem = document.getElementById(IMGID);
											elem.src = IMGOK_05;
											elem.border = "0";
											elem.width = '18';
											elem.style.visibility='visible';											
											elem.setAttribute("onload","initializeLBox('" + WMAQuaproMsg +"','"+ QuaproMsg +"','"+Or_URL+"','"+URL+"');");
											var elex = document.getElementById("QPLSMSG");
											var msghtml = elex.innerHTML;
											var zmsghtml = '<table width="100%" border="0" bgcolor="red"><tr align="right"><td><font size="2" face="Arial">This web resource has been blocked based on your QSN preferences</font></td><td align="left" width="40">'+ msghtml +'</td></tr></table>';
											elex.innerHTML = zmsghtml;
										}
										else {
											var elem = document.getElementById(IMGID);
											elem.src = IMGOK_05;
											elem.border = "0";
											elem.width = '18';
											elem.style.visibility='visible';											
											elem.setAttribute("onload","initializeLBox('" + WMAQuaproMsg +"','"+ QuaproMsg +"','"+Or_URL+"','"+URL+"');");
											var elex = document.getElementById("QPLSMSG");
											var msghtml = elex.innerHTML;
											var zmsghtml = '<table width="100%" border="0" bgcolor="lightgreen"><tr align="right"><td><font size="2" face="Arial">This web resource has a QuatroPlus label</font></td><td align="left" width="40">'+ msghtml +'</td></tr></table>';
											elex.innerHTML = zmsghtml;	

										}
										//----------------------------
									  


							     }
			                                     else { m = URL.lastIndexOf("*");
                                                                    if ((m>0)&&(BackParse==0)) { xURL=URL.substring(0,m);
									                       GetURLData(xURL,IMGID,'0',Or_URL);
                                                                    }
								    else { k = URL.lastIndexOf("/");
                                                                           if (k>7) { xURL=URL.substring(0,k)+"*";
                                                                                      GetURLData(xURL,IMGID,'1',Or_URL);
                                                                           }
                                                                    }
                                                             }
			}
       		    }
	});	
	
    };

    //-------------------------------------------------------------------------------------

    function CalcURLs() {
	//------------------------------
	var xText = document.body.innerHTML;

        var Msg = "<div id=\"QPLSMSG\"><a href=\"#tabs\" rel=\"tabs\" class=\"lbOn\"><img id=\"ViqQPls\" src=\"\" style=\"visibility:hidden\" /></a></div>";

        var zText = Msg + "<div id=\"QPLSBLK\">" + xText + "</div>";

        //------------------
        LINKS[LINKS.length] = document.location +"*";
	    LINKS[LINKS.length] = "ViqQPls";
        //------------------
        zText+='<div id="tabs" class="leightbox"><div id="lightboxCaption"><a href="#" class="lbAction" rel="deactivate"><img src="http://tethis.iit.demokritos.gr/uscripts/firefox/viq/closelabel.gif" alt="Close" /></a></div></div>';
        //------------------
        document.body.innerHTML = zText;
				
	//---------------- CALL QUAPRO for ALL LINKS
	for (var i = 0; i < LINKS.length; i=i+2) { 
	   GetURLData(LINKS[i],LINKS[i+1],'0',LINKS[i]);			
	}
    
	};	
	
	
	function setCookie(name,value,expiredays){
		expiredays=1;
	    var exdate=new Date();
	    exdate.setDate(exdate.getDate()+expiredays);
	    document.cookie=name+ "=" +escape(value)+
	    ((expiredays==null) ? "" : ";expires="+exdate.toGMTString());
	};
	
	
	function getCookie(aName, addNewDid){
	    if (document.cookie.length>0) { c_start=document.cookie.indexOf(aName + "=");
	                                    if (c_start!=-1) {  c_start=c_start + aName.length+1;
	                                                        c_end=document.cookie.indexOf(";",c_start);
	                                                        if (c_end==-1) c_end=document.cookie.length;
	                                                        return unescape(document.cookie.substring(c_start,c_end));
	                                    }
	    }
	    return "";
	};


    //----------------------- MAIN SCRIPT CODE --------------------------------------------

    var script = document.createElement('script'); script.type = 'text/javascript';
    script.src = 'http://tethis.iit.demokritos.gr/uscripts/firefox/viq/prototype.js';
    document.getElementsByTagName('head')[0].appendChild(script);
    //--------------------------------------
    var script = document.createElement('script'); script.type = 'text/javascript';
    script.src = 'http://tethis.iit.demokritos.gr/uscripts/firefox/viq/lightbox.js';
    document.getElementsByTagName('head')[0].appendChild(script);

    //======================================

    var link = document.createElement('link'); link.rel = 'stylesheet'; link.type = 'text/css'; link.media='screen';
    link.href = 'http://tethis.iit.demokritos.gr/uscripts/firefox/viq/screen.css';
    document.getElementsByTagName('head')[0].appendChild(link);
    //--------------------------------------
    var link = document.createElement('link'); link.rel = 'stylesheet'; link.type = 'text/css'; link.media='screen';
    link.href = 'http://tethis.iit.demokritos.gr/uscripts/firefox/viq/example.css';
    document.getElementsByTagName('head')[0].appendChild(link);
    //--------------------------------------
    var link = document.createElement('link'); link.rel = 'stylesheet'; link.type = 'text/css'; link.media='print';
    link.href = 'http://tethis.iit.demokritos.gr/uscripts/firefox/viq/example-print.css';
    document.getElementsByTagName('head')[0].appendChild(link);

    //======================================
	
	var cookieValueServer=getCookie('VIQ+_Server',false);
	var cookieValueUsr=getCookie('VIQ+_Usr',false);
	var cookieValuePass=getCookie('VIQ+_Pass',false);
	
	if(cookieValueServer=="") {
		var confirm_value=confirm("Do you have a QSN account?");
	    if(confirm_value==false){ 
			QSNserver ="#"; 
			setCookie('VIQ+_Server',QSNserver);
		    cookieValueServer=getCookie('VIQ+_Server',false);
		}
		else { 		
			while ((cookieValueServer=="")||(cookieValueServer=="null"))  {
				QSNserver=prompt('QSN Server');	
		        setCookie('VIQ+_Server',QSNserver);
		        cookieValueServer=getCookie('VIQ+_Server',false);
		    }
		
		}
		
	}

	if ( (cookieValueServer!="#")&& ((cookieValueUsr=="")||(cookieValuePass=="")) ) {
	       while ((cookieValueUsr=="")||(cookieValueUsr=="null"))  {
	            QSNusr=prompt('QSN Username');
				setCookie('VIQ+_Usr',QSNusr);
				cookieValueUsr=getCookie('VIQ+_Usr',false);
			}
		   
		   while ((cookieValuePass=="")||(cookieValuePass=="null"))   {
			QSNpass=prompt('QSN Password');
			setCookie('VIQ+_Pass',QSNpass);
			cookieValuePass=getCookie('VIQ+_Pass',false);

           }	
		}
	//--------------------------------------------------------------
	CalcURLs();	
	
};


//======================== Event Listener LOAD/ONLOAD =====================================

   if (window.addEventListener) { window.addEventListener('load', functionMain, false); }
   else { window.attachEvent('onload', functionMain); }