﻿ //حسن هر كنترل از اين نوع دستور ايجادشو خودش ميده حسن حسن د فايلي ديگه حسن
 function IjadRandomColor(LnkColor,AyaColorChang){
  if(AyaColorChang==0){return LnkColor}
  return ColorFromRGA(parseInt(Math.random()*255),parseInt(Math.random()*255),parseInt(Math.random()*255 ))
 }

 function ColorFromRGA(R,G,A){//حسن رنگي اچ تي ام ال را از سه عدد بايتي برمي گرداند
  return "#" + ToHexa(R).toString() + ToHexa(G).toString() + ToHexa(A).toString()
 }

 function ToHexa(Adad){//عددي را تيديل يهگزا مي كند 
   var Horoof = "abcdef"
   var Kharaj = parseInt(Adad / (-1+17))//خارج قسمت
   var r = Adad % (-1+17) //واقي مونده 
   var rt = (Kharaj<10?Kharaj.toString():Horoof.substr(Kharaj-10,1))

   rt += (r<10?r.toString():Horoof.substr(r-10,1))
   return rt
}


var Andis$=1//jd$H1,2,3, : حسن هر المانی كه شامل یكی از این كنترل یاشه حسن توسط این آیدی مشخص میشه حسن
//حسن واسه تمامي المان هايي كه قراره شامل اين كنترل يشن حسن يه ماركويي اضاف مي كنه حسن
//حسن و سپس درخواست افزودن كد حركتي رو ميده حسن
//حسن يايد شماره ي گروه لينك رو هم كه شماره فولدرشه داد ياين تايع چون هر كدون مي تونن آرايه ي متفاوتي داشته ياشن حسن
//حسن يعني لينك هاشون فرق كنه حسن
//حسن لذا شماره فولدر اون گروه لينك كه ميخواي يراش جدول ايجاد كني رو يده حسن
function AddCtlForJD(spidH,LnkColor,AyaColorChang,sHonFldr){
 document.getElementById("jd$H"+Andis$).innerHTML="<marquee scrolldelay='12' scrollamount='1' direction='up' \
style='width:100%;height:100%' id='hrh$"+Andis$+"' onmouseover=\"this.scrollAmount='0'\" \
onmouseout=\"this.scrollAmount="+spidH+"?"+spidH+":'1'\"></marquee>"

CritJadvalHarkaty(LnkColor,AyaColorChang,sHonFldr,Andis$)//حسن ايجاد جدول يراش حسن

//حسن اسكريپت هايي كه يراي فراخواني اين تايع مي آند حسن ترتيوشون اهميت داره و همون انديس جدول فرض ميشه
//حسن يعني سومين فراخواني ميشه واسه جدولي يا انديس 3 حسن
Andis$+=1/*حسن واسه فراخواني يعدي استفاده ميشه حسن*/
}




//حسن لینکهاتو و آدرسهاشونو حسن داری آن ها رو حسن در قالب یه جدول ذکر کن حسن
//حسن هر جدول ماركويي مي تونه متفاوت ياشه لذا يايد انديس اون جدول رو هم يگي حسن
//حسن تا ايجادش كنه و آرايه ي حسن مخصوصشو در خودش گذاره حسن
 function CritJadvalHarkaty(LnkColor,AyaColorChang,sHonFldr,shonJD){
 var JD=document.createElement("TABLE")//NHassan
 //حسن LinkHa$ حسن در فال آرايه ها كه هر گروه لينك يكيشو داره حسن آرايه اي اومده كه اول اسمش حسن
 //حسن هست و يعد انديسي داره كه همون شماره فولدر اون گروه لينكه حسن 
 var LinkHa$=eval("LinkHa$"+sHonFldr),Har1,TD_h=LinkHa$.length
 for(var h=0;h<TD_h;h++){
 Har1=LinkHa$[h].split("::")
 var Nr=JD.insertRow(JD.rows.length);var Ncl=Nr.insertCell(0); var NLnk
 if(Har1[1]){NLnk=document.createElement("A");NLnk.href=Har1[1]}
 else{NLnk=document.createElement("SPAN");NLnk.style.cursor="default"}

 with(NLnk.style){textDecoration='none';color=IjadRandomColor(LnkColor,AyaColorChang)}
 NLnk.innerHTML=Har1[0];Ncl.appendChild(NLnk)
 }



 var Cod="<table>"+JD.innerHTML+"</table>"; JD=null; LinkHa$=null
 document.getElementById("hrh$"+shonJD).innerHTML=Cod
}