/****************************************************************************\
  Project     : AL-QURSU for WWW
  Language    : JavaScript Pur
  Autor       : (c) 1997, imam mujib
  Last Update : 12-08-1997
\****************************************************************************/

var LBS, LBA, TAR, TSRT, TAYT, SCT, CSV
var iStart = 0
var DEFMAX_AYAT = 6236

//-----------------------------------------------------------------------------
var MSG_TEXT = new MakeArray(
  'Akhir Data sudah tercapai\nUntuk mencari kata baru\nmulai dari tombol Start',
  '   \n\n\n     .... sedang kerja cari text .....'
)


//-----------------------------------------------------------------------------
function ON_LOAD()
{ 
  TAR  = document.FORM_NAME.TEXT_AYAT;
  TSRT = document.FORM_NAME.INP_SRT;
  TAYT = document.FORM_NAME.INP_AYT;
  SCT  = document.FORM_NAME.INP_SCHTXT;

  LBS = new LBClass(document.FORM_NAME.LB_SURAT);
  LBA = new LBClass(document.FORM_NAME.LB_AYAT);
  CSV = new ClassiSeq2Verse();

  LBS.SetNewList(
    "Al-Faatihah","Al-Baqarah","Aali 'Imran","An-Nisaa'","Al-Maaidah",
    "Al-An'aam","Al-A'raaf","Al-Anfaal","At-Taubah","Yuunus","Huud","Yuusuf","Ar-Ra'd",
    "Ibraahiim","Al-Hijr","An-Nahl","Al-Israa'","Al-Kahfi","Maryam","Thaahaa",
    "Al-Anbiyaa'","Al-Hajj","Al-Mu'minuun","An-Nuur","Al-Furqaan","Asy-Syu'araa",
    "An-Naml","Al-Qashash","Al-'Ankabuut","Ar-Ruum","Luqmaan","As-Sajdah",
    "Al-Ahzaab","Sabaa'","Faathir","Yaasiin","Ash-Shaaffaat","Shaad","Az-Zumar",
    "Ghafir","Fushshilat","Asy-Syuura","Az-Zukhruf","Ad-Dukhaan",
    "Al-Jaatsiyah","Al-Ahqaaf","Muhammad","Al-Fath","Al-Hujuraat","Qaaf",
    "Adz-Dzaariyaat","Ath-Thuur","An-Najm","Al-Qamar","Ar-Rahmaan",
    "Al-Waaqi'ah","Al-Hadiid","Al-Mujaadilah","Al-Hasyr","Al-Mumtahanah",
    "Ash-Shaaff","Al-Jumu'ah","Al-Munaafiquun","At-Taghaabun","Ath-Thalaaq",
    "At-Tahriim","Al-Mulk","Al-Qalam","Al-Haaqqah","Al-Ma'aarij","Nuh","Al-Jin",
    "Al-Muzzammil","Al-Muddatstsir","Al-Qiyaamah","Al-Insaan","Al-Mursalaat",
    "An-Naba'","An-Naazi'aat","'Abasa","At-Takwiir","Al-Infithaar",
    "Al-Muthaffifiin","Al-Insyiqaaq","Al-Buruuj","Ath-Thaariq","Al-A'laa",
    "Al-Ghasyiyah","Al-Fajr","Al-Balad","Asy-Syams","Al-Lail","Adh-Dhuhaa",
    "Alam Nasyrah","At-Tiin","Al-'Alaq","Al-Qadr","Al-Bayyinah","Al-Zalzalah",
    "Al-'Aadiyat","Al-Qaari'ah","At-Takaatsur","Al-'Ashr","Al-Humazah","Al-Fiil",
    "Al-Quraisy","Al-Maa'uun","Al-Kautsar","Al-Kaafiruun","An-Nashr","Al-Masad",
    "Al-Ikhlaash","Al-Falaq","An-Naas");

  LBS.SetCurSel(0,true);
  InsertLBA(7);
  ON_CHANGE_LBAYAT();
  TSRT.value = '001';
}