/* =====================
Nama File :  script00.js
===================== */
/* =====================================================================
Fungsi    :  Rutin untuk membuat teks berjalan di dalam sebuah field box
Keterangan:  Definisi obyek untuk implementasi MIK(c)
Catatan   :  Berelasi dengan halaman index.htm (mik)
Author    :  s.budi@usa.net
===================================================================== */

// teks pesan yang akan di-scroll di dalam field box
var msg = "Selamat Datang di Situs Web MIK. Direktori Sumber Daya Kristen Indonesia Terlengkap di Internet!";
var spacer = "......";
// posisi teks pesan yang sedang aktif
var pos = 0;
//tanda untuk mengontrol teks pesan
function ScrollMessage() {
   document.form1.text1.value = msg.substring(pos, msg.length) + spacer +
 msg.substring(0, pos);
   pos++;
   if (pos > msg.length) pos = 0;

// men-set timeout untuk pergantian berikutnya
   window.setTimeout("ScrollMessage()",80);
}
// menampilkan sebuah teks pesan bantuan link
function LinkMessage(text) {
   window.status = text;
}

/* =====================================================================
Fungsi    :  Rutin untuk membuat teks berjalan di dalam sebuah field box
             VERSI BAHASA INGGRIS
Keterangan:  Definisi obyek untuk implementasi MIK(c)
Catatan   :  Berelasi dengan halaman mik-ev.htm
Author    :  s.budi@usa.net
===================================================================== */

// teks pesan yang akan di-scroll di dalam field box
var msg2 = "Welcome to MIK Web Site. The most complete Indonesian Christian Resource Directory in Internet!";
var spacer2 = "......";
// posisi teks pesan yang sedang aktif
var pos = 0;
//tanda untuk mengontrol teks pesan
function ScrollMessage2() {
   document.form1.text2.value = msg2.substring(pos, msg2.length) + spacer2 +
 msg2.substring(0, pos);
   pos++;
   if (pos > msg2.length) pos = 0;

// men-set timeout untuk pergantian berikutnya
   window.setTimeout("ScrollMessage2()",50);
}
// menampilkan sebuah teks pesan bantuan link
function LinkMessage(text2) {
   window.status = text2;
}

/* ===========================================================
Fungsi    :  Rutin untuk membuat teks berjalan pada status bar
Keterangan:  Definisi obyek untuk implementasi MIK(c)
Catatan   :  Berelasi dengan halaman update.htm
Author    :  s.budi@usa.net
=========================================================== */

var scrtxt="Formulir Update MIK !"
var length = scrtxt.length;
var width=100;
var pos=-(width+2);
function scroll(){
pos++;
var scroller="";
if (pos==length){
    pos=-(width+2);
}
if (pos<0){
    for(var i=1; i<=Math.abs(pos); i++){
    scroller=scroller+"";}
    scroller=scroller+scrtxt.substring(0, width-i+1);
}
else{
scroller=scroller+scrtxt.substring(pos, width+pos);
}
window.status=scroller;
setTimeout("scroll()", 5);
}

/* =======================================================
Fungsi    :  Rutin untuk membuka jendela-jendela baru
Keterangan:  Definisi obyek untuk implementasi MIK(c)
Catatan   :  Berelasi dengan halaman index.htm, mik-ev.htm
             tamulist.htm, bukutamu.htm
Author    :  s.budi@usa.net
======================================================= */

function openWin1(){
 myWin=open("info/tentang.htm", "displayWindowTentangMik",
 "width=340,height=500,status=no,toolbar=no,menubar=no,scrollbars=no,resizable=yes");
}
function openWin2(){
 myWin=open("help/index.htm", "displayWindow2",
 "width=400,height=520,status=no,toolbar=no,menubar=no,scrollbars=yes,resizable=yes");
}
function openWin3(){
 myWin=open("bukutamu.htm", "displayWindowBukuTamu",
 "width=400,height=400,status=no,toolbar=no,menubar=no,scrollbars=yes,resizable=yes");
}
function openWin4(){
 myWin=open("catatan.htm", "displayWindowCatatan",
 "width=340,height=450,status=no,toolbar=no,menubar=no,scrollbars=no,resizable=yes");
}
function openWin1B(){
 myWin=open("info/about.htm", "displayWindowAbout",
 "width=340,height=500,status=no,toolbar=no,menubar=no,scrollbars=no,resizable=yes");
}
function openWin4B(){
 myWin=open("note.htm", "displayWindowNote",
 "width=340,height=450,status=no,toolbar=no,menubar=no,scrollbars=no,resizable=yes");
}
function openWin5(){
 myWin=open("bukutamu.htm", "displayWindowBukuTamu",
 "width=390,height=430,status=no,toolbar=no,menubar=no,scrollbars=yes,resizable=no");
}
function openWin6(){
 myWin=open("tamulist.htm", "displayWindowBukuTamu",
 "width=390,height=430,status=no,toolbar=no,menubar=no,scrollbars=yes,resizable=yes");
}

/* =====================================================================
Fungsi    :  Rutin untuk menutup jendela yang diaktifkan
Keterangan:  Definisi obyek untuk implementasi MIK(c)
Catatan   :  Berelasi dengan halaman catatan.htm, note.htm, bukutamu.htm
             tamulist.htm, thnx.htm, update.htm
Author    :  s.budi@usa.net
===================================================================== */

function closeIt(){
close();
}

/* =====================================================================
Fungsi    :  Rutin untuk mengaktifkan password message box
Keterangan:  Definisi obyek untuk implementasi MIK(c)
Catatan   :  Berelasi dengan halaman index.htm (root) dan mik-ev.htm
Author    :  s.budi@usa.net
===================================================================== */

function gateKeeper() {
   var password = prompt("Password required:", "")
   var location="email/" + password + ".htm";
   this.location.href = location;
}

/* ==============================================================
Fungsi    :  Rutin untuk melompat kembali ke halaman sebelum
             VERSI BAHASA INGGRIS
Keterangan:  Definisi obyek untuk implementasi MIK(c)
Catatan   :  Berelasi dengan halaman meik-ev.htm
Author    :  s.budi@usa.net
============================================================== */

function kembali(){
  history.go(-1);
  return true;
  }

/* ========================================================
Fungsi    :  Rutin untuk aplikasi formulir indeks pencarian
Keterangan:  Definisi obyek untuk implementasi MIK(c)
Catatan   :  Berelasi dengan halaman tamulist.htm
Author    :  s.budi@usa.net
======================================================== */

function go(where){
if (where == "home"){
    top.location="index.htm";}
else
if (where == "back"){
    top.location="index.htm";}
else{
    this.location=where;}
}