function insertText(txtarea, tagOpen) {
    tagClose   = '';
    sampleText = '';
    // IE
    if (document.selection  && !is_gecko) {
        var theSelection = document.selection.createRange().text;
        if (!theSelection)
            theSelection=sampleText;
        txtarea.focus();
        if (theSelection.charAt(theSelection.length - 1) == " ") { // exclude ending space char, if any
            theSelection = theSelection.substring(0, theSelection.length - 1);
            document.selection.createRange().text = tagOpen + theSelection + tagClose + " ";
        } else {
            document.selection.createRange().text = tagOpen + theSelection + tagClose;
        }

    // Mozilla
    } else if(txtarea.selectionStart || txtarea.selectionStart == '0') {
        var replaced = false;
        var startPos = txtarea.selectionStart;
        var endPos = txtarea.selectionEnd;
        if (endPos-startPos)
            replaced = true;
        var scrollTop = txtarea.scrollTop;
        var myText = (txtarea.value).substring(startPos, endPos);
        if (!myText)
            myText=sampleText;
        if (myText.charAt(myText.length - 1) == " ") { // exclude ending space char, if any
            subst = tagOpen + myText.substring(0, (myText.length - 1)) + tagClose + " ";
        } else {
            subst = tagOpen + myText + tagClose;
        }
        txtarea.value = txtarea.value.substring(0, startPos) + subst +
            txtarea.value.substring(endPos, txtarea.value.length);
        txtarea.focus();
        //set new selection
        if (replaced) {
            var cPos = startPos+(tagOpen.length+myText.length+tagClose.length);
            txtarea.selectionStart = cPos;
            txtarea.selectionEnd = cPos;
        } else {
            txtarea.selectionStart = startPos+tagOpen.length;
            txtarea.selectionEnd = startPos+tagOpen.length+myText.length;
        }
        txtarea.scrollTop = scrollTop;

    // All other browsers get no toolbar.
    // There was previously support for a crippled "help"
    // bar, but that caused more problems than it solved.
    }
    // reposition cursor if possible
    if (txtarea.createTextRange) {
        txtarea.caretPos = document.selection.createRange().duplicate();
    }
}

function otk_html_smile(name, area)
{
    var text = document.getElementById(area);
    insertText(text, ' :' + name + ': ');
}
function otk_html_strong(area)
{
    var strong = prompt(otk_lang_buttons_b, '');
    if (strong == null) {
        exit;
    }
    var text = document.getElementById(area);
    insertText(text, '<strong>' + strong + '</strong>');
}
function otk_html_em(area)
{
    var em = prompt(otk_lang_buttons_i, '');
    if (em == null) {
        exit;
    }
    var text = document.getElementById(area);
    insertText(text, '<em>' + em + '</em>');
}
function otk_html_samp(area)
{
    var samp = prompt(otk_lang_buttons_samp, '');
    if (samp == null) {
        exit;
    }
    var text = document.getElementById(area);
    insertText(text, '<samp>' + samp + '</samp>');
}
function otk_html_kbd(area)
{
    var kbd = prompt(otk_lang_buttons_kbd, '');
    if (kbd == null) {
        exit;
    }
    var text = document.getElementById(area);
    insertText(text, '<kbd>' + kbd + '</kbd>');
}
function otk_html_var(area)
{
    var var_ = prompt(otk_lang_buttons_var, '');
    if (var_ == null) {
        exit;
    }
    var text = document.getElementById(area);
    insertText(text, '<var>' + var_ + '</var>');
}

function otk_html_ol(area)
{
    var number = Number(prompt(otk_lang_buttons_ol, ''));
    if (number != 0) {
        t = '<ol>\n';
        for (i = 1; i <= number; i++) {
            element = prompt(otk_lang_buttons_li, '');
            if (element == null) {
                exit;
            }
            t += '<li>' + element + '</li>\n';
        }
        t += '</ol>\n';
        var text = document.getElementById(area);
        insertText(text, t);
    }
}
function otk_html_ul(area)
{
    var number = Number(prompt(otk_lang_buttons_ul, ''));
    if (number != 0) {
        t = '<ul>\n';
        for (i = 1; i <= number; i++) {
            element = prompt(otk_lang_buttons_li, '');
            if (element == null) {
                exit;
            }
            t += '<li>' + element + '</li>\n';
        }
        t += '</ul>\n';
        var text = document.getElementById(area);
        insertText(text, t);
    }
}
function otk_html_dl(area)
{
    var number = Number(prompt(otk_lang_buttons_dl, ''));
    if (number != 0) {
        t = '<dl>\n';
        for (i = 1; i <= number; i++) {
            term = prompt(otk_lang_buttons_dt, '');
            if (term == null) {
                exit;
            }
            definition = prompt(otk_lang_buttons_dd, '');
            if (definition == null) {
                exit;
            }
            t += '<dt>' + term + '</dt>\n';
            t += '<dd>' + definition + '</dd>\n';
        }
        t += '</dl>\n';
        var text = document.getElementById(area);
        insertText(text, t);
    }
}
function otk_html_abbr(area)
{
    var abbr  = prompt(otk_lang_buttons_abbr_content, '');
    if (abbr == null) {
        exit;
    }
    var title = prompt(otk_lang_buttons_abbr_title, '');
    if (title == null) {
        exit;
    }
    var lang  = prompt(otk_lang_buttons_abbr_lang, otk_lang);
    if (lang == null) {
        exit;
    }
    var text = document.getElementById(area);
    insertText(text, '<abbr title="' + title + '" lang="' + lang + '">' + abbr + '</abbr>');
}
function otk_html_acronym(area)
{
    var acr  = prompt(otk_lang_buttons_acronym_content, '');
    if (acr == null) {
        exit;
    }
    var title = prompt(otk_lang_buttons_acronym_title, '');
    if (title == null) {
        exit;
    }
    var lang  = prompt(otk_lang_buttons_acronym_lang, otk_lang);
    if (lang == null) {
        exit;
    }
    var text = document.getElementById(area);
    insertText(text, '<acronym title="' + title + '">' + acr + '</acronym>');
}
function otk_html_img(area)
{
    var src = prompt(otk_lang_buttons_img_src, 'http://');
    if (src == null) {
        exit;
    }
    var alt = prompt(otk_lang_buttons_img_alt, '');
    if (alt == null) {
        exit;
    }
    var text = document.getElementById(area);
    insertText(text, '<img src="' + src + '" alt="' + alt + '" />');
}
function otk_html_a(area)
{
    var href = prompt(otk_lang_buttons_a_href, 'http://');
    if (href == null) {
        exit;
    }
    var desc = prompt(otk_lang_buttons_a_description, '');
    if (desc == null) {
        exit;
    }
    var text = document.getElementById(area);
    insertText(text, '<a href="' + href + '">' + desc + '</a>');
}
function otk_html_link(area)
{
    var href = prompt(otk_lang_buttons_link_href, 'http://');
    if (href == null) {
        exit;
    }
    var desc = prompt(otk_lang_buttons_link_description, '');
    if (desc == null) {
        exit;
    }
    var text = document.getElementById(area);
    insertText(text, '<a class="blank" href="' + href + '">' + desc + '</a>');
}
function otk_html_code(area)
{
    var text = document.getElementById(area);
    t = '<strong>' + otk_lang_code + ':</strong><div class="code"><code>\n';
    t += '\n';
    t += '</code></div>';
    insertText(text, t);
}
function otk_html_quote(area)
{
    var cite = prompt(otk_lang_buttons_quote_cite, '');
    if (cite == null) {
        exit;
    }
    var text = document.getElementById(area);
    t = '<blockquote cite="' + cite + '">\n';
    t += '\n';
    t += '</blockquote>';
    insertText(text, t);
}
function otk_html_q(area)
{
    var q = prompt(otk_lang_buttons_q, '');
    if (q == null) {
        exit;
    }
    var text = document.getElementById(area);
    insertText(text, '<q>' + q + '</q>');
}
function otk_html_hr(area)
{
    var text = document.getElementById(area);
    insertText(text, '<hr />\n');
}
function otk_html_color(c, area)
{
    var t = prompt(otk_lang_buttons_color, '');
    if (t == null) {
        exit;
    }
    var text = document.getElementById(area);
    insertText(text, '<span style="color: ' + c + ';">' + t + '</span>');
}
function otk_redirect(location)
{
    location.href = location;
}
function otk_show_hide(id)
{
    var element = document.getElementById(id);
    if (element.style.display == 'block') {
        element.style.display = 'none';
    } else {
        element.style.display = 'block';
    }
    return false;
}
function otk_intercept()
{
    for (var count = 0; count < document.links.length; count++) {
        if (document.links[count].className == 'blank') {
            document.links[count].target = '_blank';
        }
        if (document.links[count].className == 'button_blank') {
            document.links[count].target = '_blank';
        }
        if (document.links[count].className == 'partner') {
            document.links[count].target = '_blank';
        }
    }
}

id_popup = 0;
function otk_popup(url, w, h)
{
    if (w) {
        w = w + 'px';
    } else {
        w = 'auto';
    }
    if (h) {
        h = h + 'px';
    } else {
        h = 'auto';
    }
    var style = 'top=0, left=0, width=' + w + ', height=' + h + ', status=no, menubar=no, toolbar=no, scrollbars=no';
    window.open(url, '', style);
}
function otk_update(id, urls)
{
    var url = otk_base + urls[urls.selectedIndex].value;
    document.getElementById(id).setAttribute('src', url);
}

function otk_validate_email(t)
{
    with (t) {
        at_pos   = value.indexOf('@');
        dot_pos  = value.lastIndexOf('.');
        last_pos = value.length - 1;
        if (TRUE) { //(at_pos < 1) || (dot_pos - at_pos < 2) || (last_pos - dot_pos > 3) || (last_ pos - dot_pos < 2)) {
            return false;
        } else {
            return true;
        }
    }
}

function otk_validate_empty(t)
{
    with (t) {
        if ((value == null) || (value == '') || value == 'undefined') {
            return false;
        } else {
            return true;
        }
    }
}

function otk_validate_form(fieldnames)
{
    var ok = true;
    for (i = 0; i < fieldnames.length; i++) {
        t = document.getElementById(fieldnames[i]);
        if (!otk_validate_empty(t)) {
            alert(fieldnames[i] + ' ' + otk_validate_required_field);
            t.focus();
            ok = false;
            return false;
        }
    }
    if (ok) {
        return true;
    }
}