tiaxgame: <?phpfunction customerr($err

tiaxgame: <?phpfunction customerr($err - 2Hi.Biz
Trang chủ | TWIG | Xtscript | Templates | Xtgem
Diễn đàn › Xtgem › Hỏi và Đáp › Ai giúp tạo file dài. › View post
Admin
- Cấp bậc: admin
25-05-2015
<?php
function customerr($errno,$errstr)
{
echo "<b>Error:</b> [".$errno."]<br/>Due to ".$errstr;
}
function flatdelete2($file,$arr)
{
 if(!file_exists($file))
 return false;
 else
 {
   $a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     //
$aw=sizeof($a2);
if($aw>1)
{
     $q=$x=0;
for($i=0;$i<sizeof($a2);$i++)
{
  for($h=0;$h<sizeof($arr);$h++)
  {
    if($i==$arr[$h])
    $q++;
  }
  if($q==0)
  {
    $ad[$x]=$a2[$i];
    $x++;
  }
  $q=0;
}
$st=sizeof($ad);
$tu=$ad[0]."@|@";
for($i=1;$i<$tu;$i++)
$tu=$tu.$ad[$i]."@|@";
$a4=@file_put_contents($file,$tu);
if($a4)
return true;
else
return false;
}
else
return false;
     //
   }
}
 }
}
//dublicate words remover
function dub_remover($u)
{
$pos[0]=0;
$r=0;
if(is_array($u))
{
foreach($u as $ab=>$bc)
$r++;
if($r>=1)
{
$s=$o=$w=$q=$x=0;
for($i=0;$i<$r;$i++)
{
  for($j=$o;$j<$r;$j++)
  {
     if($i!=$j)
     {
       if($u[$i]==$u[$j])
       {
        $pos[$s]=$j;
        $s++;
        }
     }
  }
$o++;
}
if($pos[0]==0)
{
for($i=0;$i<$r;$i++)
{
  $ad[$i]=$u[$i];
}
return $ad;
}
else
{
foreach($pos as $k=>$v)
$w++;
for($i=0;$i<$r;$i++)
{
  for($h=0;$h<$w;$h++)
  {
    if($i==$pos[$h])
    $q++;
  }
  if($q==0)
  {
    $ad[$x]=$u[$i];
    $x++;
  }
  $q=0;
}
return $ad;
}
}
else
return false;
}
else
return false;
}
//badwords remover
 function badword_remover($h,$badwords)
 {
 foreach($badwords as $k=>$v)
 {
 $h=str_replace($v,"***",$h);
 }
 return $h;
 }
 function flatasc1($crperpage,$aw,$crp=1)
          {
                   $crass38=$crp*$crperpage;
                  $crstart=$crass38-$crperpage;
                  $cre=$crp*$crperpage;
                    if($aw<$cre)
                    {
                    $crend=$aw;
                    }
                    else
                    {
                    $crend=$cre;
                    }
                     $frloop=0;
                     for($crstart;$crstart<$crend;$crstart++)
                     {
                       $asc[$frloop]=$crstart;
                       $frloop++;
                     }
                     return $asc;
          }
          function flatdes1($crperpage,$aw,$crp=1)
          {
                    $aw=$aw-1;
                    $crmtotal=$aw; 
                    $crmper=$crperpage;                       
                    $crmur2=$crp-1;       
                    $crmstart=(($crmtotal+1)-(($crmur2*$crmper)+1));   
                    if($crmstart<$crmper)                                  
                   {
                    $crmend=-1;
                    }
                     else
                      {
                     $crmend=((($crmtotal+1)-(($crmur2*$crmper)+1))-$crmper);  
                     }
                     $frloop=0;
                     for($cri2=$crmstart;$cri2>$crmend;$cri2--)
                    {
                           $des[$frloop]=$cri2;
                           $frloop++;
                    }
                    return $des;
          }
function flatasc($crperpage,$aw)
          {
                    if(isset($_GET["p"]))
                    {
                    $crp=$_GET["p"];
                    }
                    else
                    {
                    $crp=1;
                    }
                   $crass38=$crp*$crperpage;
                  $crstart=$crass38-$crperpage;
                  $cre=$crp*$crperpage;
                    if($aw<$cre)
                    {
                    $crend=$aw;
                    }
                    else
                    {
                    $crend=$cre;
                    }
                     $frloop=0;
                     for($crstart;$crstart<$crend;$crstart++)
                     {
                       $asc[$frloop]=$crstart;
                       $frloop++;
                     }
                     return $asc;
          }
          function flatdes($crperpage,$aw)
          {
                if(isset($_GET["p"]))
                    {
                    $crp=$_GET["p"];
                    }
                    else
                    {
                    $crp=1;
                    }
                    $aw=$aw-1;
                    $crmtotal=$aw; 
                    $crmper=$crperpage;                       
                    $crmur2=$crp-1;       
                    $crmstart=(($crmtotal+1)-(($crmur2*$crmper)+1));   
                    if($crmstart<$crmper)                                  
                   {
                    $crmend=-1;
                    }
                     else
                      {
                     $crmend=((($crmtotal+1)-(($crmur2*$crmper)+1))-$crmper);  
                     }
                     $frloop=0;
                     for($cri2=$crmstart;$cri2>$crmend;$cri2--)
                    {
                           $des[$frloop]=$cri2;
                           $frloop++;
                    }
                    return $des;
          }
function smilies($cmt2,$url)
{
$image=array('[:)'=>'img27.gif',
':)'=>'img1.gif',
'>:('=>'img10.gif',
':(('=>'img2.gif',
':('=>'img3.gif',
':DD'=>'img4.gif',
':D'=>'img5.gif',
':o'=>'img6.gif',
'O_O'=>'img7.gif',
':P'=>'img8.gif',
'B)'=>'img9.gif',
'o_O'=>'img11.gif',
'>_>'=>'img12.gif',
'-_-'=>'img13.gif',
'O:-)'=>'img18.gif',
':-('=>'img14.gif',
'[:-)'=>'img28.gif',
':-))'=>'img26.gif',
':-)'=>'img15.gif',
'^^'=>'img16.gif',
';)'=>'img17.gif',
':pardon:'=>'img46.gif',
':p'=>'img19.gif',
';-D'=>'img20.gif',
':*('=>'img21.gif',
']:->'=>'img22.gif',
'(y)'=>'img23.gif',
'&lt;3'=>'img24.gif',
':*'=>'img25.gif',
':-O'=>'img29.gif',
'?-|'=>'img30.gif',
':aggressive:'=>'img31.gif',
':bomb:'=>'img32.gif',
':bye:'=>'img33.gif',
':celebrate:'=>'img34.gif',
':clap:'=>'img35.gif',
':confused:'=>'img36.gif',
':crazy:'=>'img37.gif',
':dance:'=>'img38.gif',
':fool:'=>'img39.gif',
':inlove:'=>'img40.gif',
':LOL:'=>'img41.gif',
':lol:'=>'img42.gif',
':mamba:'=>'img43.gif',
':drink:'=>'img44.gif',
':mock:'=>'img45.gif',
':rofl:'=>'img47.gif',
':rolleyes:'=>'img48.gif',
':rose:'=>'img49.gif',
':shy:'=>'img51.gif',
':secret:'=>'img50.gif',
':sick:'=>'img52.gif',
':sorry:'=>'img53.gif',
':wack:'=>'img54.gif',
':yay:'=>'img56.gif',
':wacko:'=>'img55.gif'
);
foreach($image as $s=>$xc)
{
$cmt2=str_replace($s,"<img src='".$url.$xc."' alt='*'/>",$cmt2);
}
return $cmt2;
}

function bb_to_html($cmtt)
{
$bbtags=array('[h1]'=>'<h1>',
'[/h1]'=>'</h1>',
'[b]'=>'<b>',
'[/b]'=>'</b>',
'[u]'=>'<u>',
'[/u]'=>'</u>',
'[br]'=>'<br/>',
'[br/]'=>'<br/>',
'[quote]'=>'<span style="background-color:#777777;color:#eee;font-weight:bold;">',
'[/quote]'=>'</span>',
'(c)'=>'�',
'(r)'=>'�',
'[i]'=>'<i>',
'[/i]'=>'</i>');
$cmtt=str_ireplace(array_keys($bbtags),array_values($bbtags),$cmtt);
$bbextended=array("/\[url](.*?)\[\/url]/is"=>"<a href=\"$1\">$1</a>",
"/\[url=(.*?)\](.*?)\[\/url\]/is"=>"<a href=\"$1\" title=\"$1\">$2</a>",
"/\[size=(.*?)\](.*?)\[\/size\]/is"=>"<div style=\"font-size:$1\">$2</div>",
"/\[color=(.*?)\](.*?)\[\/color\]/is"=>"<span style=\"color:#$1\">$2</span>",
"/\[ul](.*?)\[\/ul]/is"=>"<ul>$1</ul>",
"/\[ol](.*?)\[\/ol]/is"=>"<ol>$1</ol>",
"/\[li](.*?)\[\/li]/is"=>"<li>$1</li>",
"/\[img](.*?)\[\/img]/is"=>"<img src=\"$1\" alt=\"$1\" style=\"max-width:500px\"/>");
foreach($bbextended as $match=>$replacement)
{
$cmtt=preg_replace($match,$replacement,$cmtt);
}
return $cmtt;
}
function html_to_bb($cmtt)
{
$bbtags=array('[h1]'=>'<h1>',
'[/h1]'=>'</h1>',
'[b]'=>'<b>',
'[/b]'=>'</b>',
'[u]'=>'<u>',
'[/u]'=>'</u>',
'[br]'=>'<br/>',
'[br/]'=>'<br/>',
'[quote]'=>'<span style="background-color:#777777;color:#eee;font-weight:bold;">',
'[/quote]'=>'</span>',
'(c)'=>'�',
'(r)'=>'�',
'[i]'=>'<i>',
'[/i]'=>'</i>');
$cmtt=str_ireplace(array_values($bbtags),array_keys($bbtags),$cmtt);
$bbextended=array("/\<a href=\"(.*?)\" title=\"(.*?)\"\>(.*?)\<\/a\>/is"=>"[url=$1]$3[/url]",
'/\<a href="(.*?)"\>(.*?)\<\/a\>/is'=>"[url]$1[/url]",
"/\[url=(.*?)\](.*?)\[\/url\]/is"=>"<a href=\"$1\" title=\"$1\">$2</a>",
"/\[size=(.*?)\](.*?)\[\/size\]/is"=>"<div style=\"font-size:$1\">$2</div>",
"/\[color=(.*?)\](.*?)\[\/color\]/is"=>"<span style=\"color:#$1\">$2</span>",
"/\<ul>(.*?)\<\/ul>/is"=>"[ul]$1[/ul]",
"/\<ol>(.*?)\<\/ol>/is"=>"[ol]$1[/ol]",
"/\<li>(.*?)\<\/li>/is"=>"[li]$1[/li]",
"/\[img](.*?)\[\/img]/is"=>"<img src=\"$1\" alt=\"$1\"/>");
foreach($bbextended as $match=>$replacement)
{
$cmtt=preg_replace($match,$replacement,$cmtt);
}
return $cmtt;
}
 function pagination($cmttotal,$cmtcurrent,$cmper)
                      {
                      if($cmttotal>=$cmper)
                      {
                      $cmtrtotalpages=round($cmttotal/$cmper);
                      $cmtrtotalpages2=$cmttotal/$cmper;
                        if($cmtrtotalpages2>$cmtrtotalpages)
                        {
                        $cmtrtotalpages=$cmtrtotalpages+1;
                        }
                      $cmtrpagesar['&laquo;'] = "1";
                        if($cmtcurrent > 1)
                        {
                        $cmtrcmtd=$cmtcurrent-1;
                        $cmtrpagesar['&#8249;'] = $cmtrcmtd;
                          if($cmtrcmtd==1)
                          {
                          $cmtrst=1;
                          }
                          else if($cmtrcmtd==2)
                          {
                          $cmtrst=$cmtrcmtd-1;
                          }
                          else if($cmtrcmtd>=3)
                          {
                          $cmtrst=$cmtrcmtd-2;
                          }
                          for($cmtri1=$cmtrst;$cmtri1<=$cmtrcmtd;$cmtri1++)
                          {
                          $cmtrpagesar[$cmtri1] = $cmtri1;
                          }
                        }
                        if($cmtrtotalpages > $cmtcurrent+4)
                        {
                        $cmtrfinalstop=$cmtcurrent+4;
                        }
                        else
                        {
                        $cmtrfinalstop=$cmtrtotalpages;
                        }
                        for($cmtrj1=$cmtcurrent;$cmtrj1<=$cmtrfinalstop;$cmtrj1++)
                        {
                        $cmtrpagesar[$cmtrj1] = $cmtrj1;
                        }
                        if($cmtrtotalpages > $cmtcurrent)
                        {
                        $cmtrpagesar['&#8250;'] = $cmtcurrent+1;
                        }
                      $cmtrpagesar['&raquo;'] = $cmtrtotalpages;
                      }
                      else
                      {
                      $cmtrpagesar['1'] = "1";
                      }
                    return $cmtrpagesar;
                    }
function logic1($array,$limit,$how,$tr,$fa)
 {
   $nh=$array;
      for($i=0;$i<$limit;$i++)
      { 
        if(isset($nh[$i])!=$how)
        {
        $nh[$i]=$fa;
        }
        else
        {
        $nh[$i]=$tr;
        }
      }
       for($j=0;$j<$limit;$j++)
      { 
        $nq[$j]=$nh[$j];
      }
      return $nq;
 }
function flatsrchcol3($string,$search,$col)
{
$qa1=$string;
$qa2=$search;
$qa3=$col;
 $a2=explode("@|@",$qa1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $cl=$qa3-1;
      $ew=0;
     for($a4=0;$a4<$a3;$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
        if($a5[$a4][$cl]==$qa2)
        {
        $sd[$ew]=$a2[$a4];
        $ew++;
        }
     }
     return $sd;
     }
}
//return 1:|:2  2:|:3 3:|:4
function flatsrchcol9($file,$search,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
$qa1=$a1;
$qa2=$search;
$qa3=$col;
 $a2=explode("@|@",$qa1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $cl=$qa3-1;
      $ew=0;
     for($a4=0;$a4<($a3-1);$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
        if($a5[$a4][$cl]==$qa2)
        {
        $sd[$ew]=$a2[$a4];
        $ew++;
        }
     }
     if(!isset($sd))
     return false;
     else
     return $sd;
     }
}
else
return false;
}
function flatsrchcol4($string,$search,$col)
{
$qa1=$string;
$qa2=$search;
$qa3=$col;
 $a2=explode("@|@",$qa1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $cl=$qa3-1;
      $ew=0;
     for($a4=0;$a4<$a3;$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
        if($a5[$a4][$cl]==$qa2)
        {
        $ar=$a4+1;
        $sd[$ew]=$ar;
        $ew++;
        }
     }
     return $sd;
     }
}
function flatarrtosave2($file,$array,$col)
{
    $n=$array;
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
  }
   for($a4=0;$a4<$a3;$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
     }
       if(is_array($a5[0]))
       {
       $a6=0;
     foreach($a5[0] as $key=>$val)
     {
       $a6++;
     }          
       }   
      $n3=0;
      $col=$col-1;
     foreach($n as $n1=>$n2)
     {
      $a5[$n1][$col]=$n2;
     }
     $a3=$a3-1;
     for($a11=0;$a11<$a3;$a11++)
{
   for($a12=0;$a12<$a6;$a12++)
   {
     if($a11==0 && $a12==0)
     {
       if($a12==0)
       {
        $ass=$a5[$a11][$a12];
       }
       else
       {
         $ass=$ass.":|:".$a5[$a11][$a12];
       }
      }
      else
      {
         if($a12==0)
       {
        $ass=$ass.$a5[$a11][$a12];
       }
       else
       {
         $ass=$ass.":|:".$a5[$a11][$a12];
       }
      }
   }
   $ass=$ass."@|@";
  
}
     return $ass;
}
}
function flatsrcharr($file,$srch,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $cl=$col-1;
     $xz=0;
     for($a4=0;$a4<($a3-1);$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
        if($a5[$a4][$cl]==$srch)
        {
        $sd[$xz]=$a4;
        $xz++;
        }
     }
     if(!isset($sd))
     $od=false;
     else
     $od=$sd;
   }
   return $od;
}
return false;
}
function flatsrcharr2($file,$srch,$col,$srch1,$col1)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $cl=$col-1;
     $cl1=$col1-1;
     $xz=0;
     for($a4=0;$a4<($a3-1);$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
        if($a5[$a4][$cl]==$srch && $a5[$a4][$cl1]==$srch1)
        {
        $sd[$xz]=$a4;
        $xz++;
        }
     }
     if(!isset($sd))
     $od=false;
     else
     $od=$sd;
   }
   return $od;
}
return false;
}
function flatsrchcol($file,$srch,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $cl=$col-1;
     for($a4=0;$a4<($a3-1);$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
        if($a5[$a4][$cl]==$srch)
        {
        $sd=$a4;
        }
     }
     if(!isset($sd))
     $od=false;
     else
     $od=$a2[$sd];
   }
   return $od;
}
return false;
}
function flatsrchcol21($file,$srch,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $cl=$col-1;
     $sd='a';
     for($a4=0;$a4<($a3-1);$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
        if($a5[$a4][$cl]==$srch)
        {
        $sd=$a4+1;
        }
     }
     if($sd!='a')
     $od=$sd;
     else
     return false;
   }
  
   return $od;
}
return false;
}
function flatsrchcol2($file,$srch,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $cl=$col-1;
     $sd='a';
     for($a4=0;$a4<($a3-1);$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
        if($a5[$a4][$cl]==$srch)
        {
        $sd=$a4;
        }
     }
     if($sd=='a')
     return false;
     else
     $od=$sd+1;
   }
  
   return $od;
}
return false;
}
function flatsrchcol6($file,$srch,$col,$srch1,$col1)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $cl=$col-1;
     $cl1=$col1-1;
     $sd='a';
     for($a4=0;$a4<($a3-1);$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
        if($a5[$a4][$cl]==$srch && $a5[$a4][$cl1]==$srch1)
        {
         $sd=$a4+1;
        }
     }
     if($sd!='a')
     $od=$sd;
     else
     return false;
   }
  
   return $od;
}
return false;
}
function flatsrchcol63($file,$srch,$col,$srch1,$col1,$srch2,$col2)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $cl=$col-1;
     $cl1=$col1-1;
     $cl2=$col2-1;
     $sd='a';
     for($a4=0;$a4<($a3-1);$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
        if($a5[$a4][$cl]==$srch && $a5[$a4][$cl1]==$srch1 && $a5[$a4][$cl2]==$srch2)
        {
         $sd=$a4+1;
        }
     }
     if($sd!='a')
     $od=$sd;
     else
     return false;
   }
  
   return $od;
}
return false;
}
function flatsrchcol5($file,$srch,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $cl=$col-1;
     $aq3=0;
     for($a4=0;$a4<($a3-1);$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
        if($a5[$a4][$cl]==$srch)
        {
        $aq3++;
        }
     }
     $od=$aq3;
   }
   return $od;
}
return false;
}
function flatsrchcol7($file,$srch,$col,$srch1,$col1)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $cl=$col-1;
     $cl1=$col1-1;
     $aq3=0;
     for($a4=0;$a4<($a3-1);$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
        if($a5[$a4][$cl]==$srch && $a5[$a4][$cl1]==$srch1)
        {
        $aq3++;
        }
     }
     $od=$aq3;
   }
   return $od;
}
return false;
}
function flatsrchnew($file,$srch,$col,$srch1,$col1)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $cl=$col-1;
     $cl1=$col1-1;
     $aq3=0;
     for($a4=0;$a4<($a3-1);$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
        if(date("Y-m-d",$a5[$a4][$cl])==$srch && $a5[$a4][$cl1]==$srch1)
        {
        $aq3++;
        }
     }
     $od=$aq3;
   }
   return $od;
}
return false;
}
function flatsrchcol123($file,$srch,$col,$srch1,$col1,$srch2,$col2)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $cl=$col-1;
     $cl1=$col1-1;
     $cl2=$col2-1;
     $ll=0;
     for($a4=0;$a4<($a3-1);$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
        if($a5[$a4][$cl]==$srch && $a5[$a4][$cl1]==$srch1 && $a5[$a4][$cl2]==$srch2)
        {
        $aq3[$ll]=$a2[$a4];
        $ll++;
        }
     }
     if(isset($aq3))
     $od=$aq3;
     else
     return false;
   }
   return $od;
}
return false;
}
function flatsrchcol12($file,$srch,$col,$srch1,$col1)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $cl=$col-1;
     $cl1=$col1-1;
     $ll=0;
     for($a4=0;$a4<($a3-1);$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
        if($a5[$a4][$cl]==$srch && $a5[$a4][$cl1]==$srch1)
        {
        $aq3[$ll]=$a2[$a4];
        $ll++;
        }
     }
     if(isset($aq3))
     $od=$aq3;
     else
     return false;
   }
   return $od;
}
return false;
}
function flatremove($string)
{
$cmtue=rawurlencode($string);
$cmtue1=str_replace("%0A","%20",$cmtue);
$cmtue2=str_replace("%0a","%20",$cmtue1);
$cmt=rawurldecode($cmtue2);
$frt1=str_replace("<","&lt;",$cmt);
$frt2=str_replace(":|:","~",$frt1);
$frt3=str_replace("@|@","~",$frt2);
return $frt3;
}
function sendpm($from,$to,$message)
{
  $ass1="/www/members/".$from."/pm/last.txt";
  $ass2="/www/members/".$to."/pm/pm.txt";
  $ass3=flatremove($message);
  $ass4=$from.":|:".$to.":|:".date("Y-m-d  h:i:s").":|:".$ass3."@|@";
  return $ass4;
} 
function sendout_pm($from,$to,$topic,$message)
{
  $from=flatremove($from);
  $to=flatremove($to);
  $topic=flatremove($topic);
  $message=flatremove($message);
  $seass1=$from.":|:".time().":|:".$topic.":|:".$message.":|:unread@|@";
  $ass12="/www/members/".$to."/pm/msg.txt";
  $ass22=flatread3("/www/members/".$to."/pm/newmsg.txt");
  $ass22=$ass22+1;
  $ass32=@flatadd2($ass12,$seass1);
  $ass42=@flatadd3("/www/members/".$to."/pm/newmsg.txt",$ass22);
  if($ass32 && $ass42)
   return true;
  else
   return false;
}
function sendin_pm($from,$to,$topic,$message)
{
  $from=flatremove($from);
  $to=flatremove($to);
  $topic=flatremove($topic);
  $message=flatremove($message);
  $seass1=$to.":|:".time().":|:".$topic.":|:".$message.":|:send@|@";
  $ass12="/www/members/".$from."/pm/out.txt";
  $ass32=@flatadd2($ass12,$seass1);
  if($ass32)
   return true;
  else
   return false;
}
function flatadd2($file,$string)
{
  $a1=@file_put_contents($file,$string,FILE_APPEND);
  if($a1)
  {
  return true;
  }
  else
  {
  return false;
  }
 return false;
}
function flatread3($file)
{
  $a1=@file_get_contents($file);
  if($a1)
  {
  return $a1;
  }
  else
  {
  return false;
  }
 return false;
}
function flatadd3($file,$string)
{
  $a1=@file_put_contents($file,$string);
  if($a1)
  {
  return true;
  }
  else
  {
  return false;
  }
 return false;
}
function flatdelete($file,$id)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $se=$a3-1;
     if($se!=1)
     {
       $i1=$a3+1;
       $i2=$id-1;
       for($i3=$id;$i3<$a3;$i3++)
       {
         $a2[$i2]=$a2[$i3];
         $i2++;
       }
       $i1=$a3-2;
       $ass=$a2[0]."@|@";
       for($i3=1;$i3<$i1;$i3++)
       {
        $ass=$ass.$a2[$i3]."@|@";
       }
     $fiedit=@file_put_contents($file,$ass);
    if($fiedit)
    {
      return "Deleted successfully!";
    }
    else
    {
      return false;
    }
    }
    else
    {
     return "Line is one. So, it cannot delete.";
    }
   }
 }
   return false;
}
function flatdelete1($file,$id)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $se=$a3-1;
       $i1=$a3+1;
       $i2=$id-1;
       for($i3=$id;$i3<$a3;$i3++)
       {
         $a2[$i2]=$a2[$i3];
         $i2++;
       }
       $i1=$a3-2;
       if($se>1)
       {
       $ass=$a2[0]."@|@";
       for($i3=1;$i3<$i1;$i3++)
       {
        $ass=$ass.$a2[$i3]."@|@";
       }
           $fiedit=@file_put_contents($file,$ass);
    if($fiedit)
    {
      return "Deleted successfully!";
    }
    else
    {
      return false;
    }
       }
       else
       {
       $ass="";
     $fiedit=@file_put_contents($file,$ass);
    if($fiedit)
    {
      return false;
    }
    else
    {
      return true;
    }
       }
   }
 }
   return false;
}
function flatadd($file,$id,$string)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
       $a3=$a3-1;
       $id=$id-1;
       $i1=$a3+1;
       $i2=$i1-1;
       for($i1;$i1>$id;$i1--)
       {
         $a2[$i1]=$a2[$i2];
         $i2--;
       }
       $a2[$i1]=$string;
       $i1=$a3+1;
       $ass=$a2[0]."@|@";
       for($i3=1;$i3<$i1;$i3++)
       {
        $ass=$ass.$a2[$i3]."@|@";
       }
          $fiedit=@file_put_contents($file,$ass);
    if($fiedit)
    {
      return true;
    }
    else
    {
      return false;
    }
   }
 }
   return false;
}
function flatread($file)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     for($a4=0;$a4<($a3-1);$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
     }
   }
   return $a5;
}
return false;
}
function flatread2($file,$row,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     for($a4=0;$a4<$a3;$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
     }
     $row=$row-1;
     $col=$col-1;
     $a7=$a5[$row][$col];
   }
   return $a7;
}
return false;
}
function flatreadrow($file,$row)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     for($a4=0;$a4<$a3;$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
     }
   }
   $row=$row-1;
   $a5=$a2[$row];
   return $a5;
}
return false;
}
function flatreadcol($file,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     for($a4=0;$a4<$a3;$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
     }
   }
   $a3=$a3-1;
    $col=$col-1;
    $a6=$a5[0][$col];
   for($ai=1;$ai<$a3;$ai++)
   {
      $a6=$a6.":|:".$a5[$ai][$col];
   }
   return $a6;
}
return false;
}
function flatreadcol2($file,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     for($a4=0;$a4<$a3;$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
     }
   }
   $a3=$a3-1;
    $col=$col-1;
   for($ai=0;$ai<$a3;$ai++)
   {
      $a6[$ai]=$a5[$ai][$col];
   }
   return $a6;
}
return false;
}
function flatcols($file)
{
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     for($a4=0;$a4<$a3;$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
     }
       if(is_array($a5[0]))
       {
       $a6=0;
     foreach($a5[0] as $key=>$val)
     {
       $a6++;
     }          
       }
   }
   return $a6;
}
return false;
}
function flatrows($file)
{
if(!file_exists($file))
return false;
$a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
     foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     $a3=$a3-1;
   return $a3;
   }
   else
   {
   return "A";
   }
}
else
return false;
return false;
}
function flatedit1($file,$rows,$cols,$string)
{
  $a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
       foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     for($a4=0;$a4<$a3;$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
     }
       if(is_array($a5[0]))
       {
       $a6=0;
     foreach($a5[0] as $key=>$val)
     {
       $a6++;
     }          
       }   
   }
   //
     $ass6=$rows;
     $ass7=$ass6-1;
     $cols=$cols-1;
     if(isset($a5[$ass7][$cols]))
     $a5[$ass7][$cols]=$string;
     else
     $a5[$ass7][$cols]=$string;
     for($a11=0;$a11<$a3-1;$a11++)
{
   for($a12=0;$a12<$a6;$a12++)
   {
     if($a11==0 && $a12==0)
     {
       if($a12==0)
       {
        $ass=$a5[$a11][$a12];
       }
       else
       {
         $ass=$ass.":|:".$a5[$a11][$a12];
       }
      }
      else
      {
         if($a12==0)
       {
        $ass=$ass.$a5[$a11][$a12];
       }
       else
       {
         $ass=$ass.":|:".$a5[$a11][$a12];
       }
      }
   }
   $ass=$ass."@|@";
  
}
   //
    $fiedit=@file_put_contents($file,$ass);
    if($fiedit)
    {
      return true;
    }
    else
    {
      return false;
    }
  }
return false;
}
function flatedit($file,$rows,$cols,$string)
{
  $a1=@file_get_contents($file);
if($a1)
{
   $a2=explode("@|@",$a1);
   if(is_array($a2))
   {
     $a3=0;
       foreach($a2 as $key=>$val)
     {
       $a3++;
     }
     for($a4=0;$a4<$a3;$a4++)
     {
      $a5[$a4]=explode(":|:",trim($a2[$a4]));
     }
       if(is_array($a5[0]))
       {
       $a6=0;
     foreach($a5[0] as $key=>$val)
     {
       $a6++;
     }          
       }   
   }
   //
     $ass6=$rows;
     $ass7=$ass6-1;
     $cols=$cols-1;
     $a5[$ass7][$cols]=$string;
     $a3=$a3-1;
     for($a11=0;$a11<$a3;$a11++)
{
   for($a12=0;$a12<$a6;$a12++)
   {
     if($a11==0 && $a12==0)
     {
       if($a12==0)
       {
        $ass=$a5[$a11][$a12];
       }
       else
       {
         $ass=$ass.":|:".$a5[$a11][$a12];
       }
      }
      else
      {
         if($a12==0)
       {
        $ass=$ass.$a5[$a11][$a12];
       }
       else
       {
         $ass=$ass.":|:".$a5[$a11][$a12];
       }
      }
   }
   $ass=$ass."@|@";
  
}
   //
    $fiedit=@file_put_contents($file,$ass);
    if($fiedit)
    {
      return true;
    }
    else
    {
      return false;
    }
  }
return false;
}
?>
- Edited: tiaxgame )
25-05-2015
Online: Guests: 1