function ClearProgress() { for (x = 1; x <= 8; x++) { document.getElementById("progress_" + x).style.backgroundColor = '#FFFFFF'; } }
function HidePages() { for (x = 0; x <= 9; x++) { document.getElementById("page_" + x).style.display = 'none'; } }
function GoToStart() {
    if (confirm('Дали сте сигурни дека сакате да почнете од почеток?') == false) { return; }
    ClearProgress();
    ClearSelected();
    HidePages();
    document.getElementById("screen_value").value = 0;
    document.getElementById("page_0").style.display = '';
    document.getElementById("cmdNext").style.display = '';
    document.getElementById("cmdBack").style.display = '';
}
function MoveForward() {
    document.getElementById("cmdNext").style.display = '';
    document.getElementById("cmdBack").style.display = '';
    var positionX = parseInt(document.getElementById("screen_value").value);
    if (positionX > 0) {
        if (CheckSelected(positionX) == 0) {
            alert('Не можете да продолжите без да изберете одговор на прашањето.');
            return;
        }
    }
    if (positionX < 8) {
        ClearProgress();
        HidePages();
        if (positionX == 1) {
            if (GetSelectedValue(positionX) == 0) { positionX = 4; }
            else { positionX = 2; }
        }
        else { positionX = positionX + 1; }
        document.getElementById("screen_value").value = positionX;
        document.getElementById("page_" + positionX).style.display = '';
        for (x = 1; x <= positionX; x++) { document.getElementById("progress_" + x).style.backgroundColor = 'maroon'; }
    }
    else {
        HidePages();
        document.getElementById("page_9").style.display = '';
        document.getElementById("cmdNext").style.display = 'none';
        document.getElementById("cmdBack").style.display = 'none';
    }
    CalculateTotalsImages();
}
function MoveBack() {
    document.getElementById("cmdNext").style.display = '';
    document.getElementById("cmdBack").style.display = '';
    var positionX = parseInt(document.getElementById("screen_value").value);
    if (positionX > 0) {
        ClearProgress();
        HidePages();
        if (positionX == 4) {
            if (GetSelectedValue(1) == 0) { positionX = 1; }
            else { positionX = 3; }
        }
        else { positionX = positionX - 1; }
        document.getElementById("screen_value").value = positionX;
        document.getElementById("page_" + positionX).style.display = '';
        for (x = 1; x <= positionX; x++) { document.getElementById("progress_" + x).style.backgroundColor = 'maroon'; }
        CalculateTotalsImages();
    }
}
function CalculateTotalsImages() {
    var totalX = parseInt(CalculateTotalScore()); var imageX = 0; var tipX = '';
    if (totalX >= 0 && totalX <= 20) {
        imageX = 1;
        tipX = 'Вие сте прилично одговорни по однос на Вашето здравје. Ризикот кај Вашите бели дробови е многу мал. Сепак, не заборавајте да се прегледате секогаш кога ќе ги осетите следниве симптоми: болка во градите, долготрајна кашлица, засипнатост, искашлување крв, недостаток на апетит, слабеење.';
    }
    if (totalX > 20 && totalX <= 40) {
        imageX = 2;
        tipX = 'Вашите бели дробови се изложени на ризик. Не сте во загрижувачката категорија, но не заборавајте дека ризикот од рак на белите дробови постои кај секого. Прегледајте се што поскоро.';
    }
    if (totalX > 40 && totalX <= 60) {
        imageX = 3;
        tipX = 'Пушачите имаат 25 пати поголем ризик од појава на рак на белите дробови. Освен пушењето, пасивното изложување на чадот од цигари, изложувањето на канцерогени материи, изложувањето на радијација и генетските предиспозиции се можни предизвикувачи на ова смртно заболување. Прегледајте ги Вашите бели дробови.';
    }
    if (totalX > 60 && totalX <= 80) {
        imageX = 4;
        tipX = 'Ракот на белите дробови е карцином со најголема смртност. Најголемиот ризик фактор е пушењето, причина за  9 од 10 случаи од заболените. Белите дробови имаат малку нервни влакна за болка. Поради тоа, ракот на белите дробови предизвикува симптоми во доцна фаза. Лекувањето може да биде успешно само ако заболувањето се открие во рана фаза. Прегледајте ги Вашите бели дробови.';
    }
    if (totalX > 80 && totalX <= 100) {
        imageX = 5;
        tipX = 'Вашите бели дробови се изложени на сериозни ризици. Најголемиот ризик фактор е пушењето, причина за  9 од 10 случаи од заболените. Пушачите имаат 25 пати поголем ризик од појава на рак на белите дробови. Освен пушењето, пасивното изложување на чадот од цигари, изложувањето на канцерогени материи, изложувањето на радијација и генетските предиспозиции се можни предизвикувачи на ова смртно заболување. Белите дробови имаат малку нервни влакна за болка. Поради тоа, ракот на белите дробови предизвикува симптоми во доцна фаза.';
    }
    document.getElementById("result_tip").innerHTML = tipX;
    document.getElementById("result_image").src = "images/weblung_result_" + imageX + ".jpg";
    for (x = 1; x <= 8; x++) { document.getElementById("imageThumb_" + x).src = "images/weblung_thumb_" + imageX + ".gif"; }
}
function CheckSelected(questionID) {
    var radioX = document.getElementsByName("question_" + questionID);
    var valuesX = 0;
    for (i = 0; i < radioX.length; i++) {
        if (radioX[i].checked == true) { valuesX = valuesX + 1; }
    }
    return valuesX;
}
function GetSelectedValue(questionID) {
    var radioX = document.getElementsByName("question_" + questionID);
    var valuesX = 0;
    for (i = 0; i < radioX.length; i++) {
        if (radioX[i].checked == true) { valuesX = radioX[i].value; }
    }
    return valuesX;
}
function ClearSelected() {
    for (x = 1; x <= 8; x++) {
        var radioX = document.getElementsByName("question_" + x);
        for (i = 0; i < radioX.length; i++) {
            radioX[i].checked = false;
        }
    }
}
function CalculateTotalScore() {
    var valuesX = 0;
    for (x = 1; x <= 8; x++) {
        var radioX = document.getElementsByName("question_" + x);
        for (i = 0; i < radioX.length; i++) {
            if (radioX[i].checked == true) { valuesX = valuesX + parseInt(radioX[i].value); }
        }
    }
    return valuesX;
}