<?php

set_time_limit(60);

$form_count = 0;
$end_pos = 0;

$glo_arr = [];

function all_alone($str)
{
  $len = 0;
  $str_sub = "";

  $len = strlen($str);
  $str_sub = substr($str, 0, 1);

  if(is_var_ch($str_sub))
    return false;

  $str_sub = substr($str, $len - 1, 1);

  if(is_var_ch($str_sub))
    return false;

  return true;
}

function add_to_arr($arr, $old_arr)  // Currently unused.
{
  $i = 0;
  $j = 0;

  $j = sizeof($old_arr);

  for($i=0; $i < sizeof($arr); $i++)
  {
    $old_arr[$j] = $arr[$i];
    $j = $j+1;
  }

  return $old_arr;
}

function add_to_var_arr($arr, $str)
{
  $i = 0;
  $j = 0;
  $k = 0;
  $arr_size = 0;

  $arr_size = sizeof($arr);
  $j = 0;

  for($i=0; $i < strlen($str); $i++)
  {
    if(substr($str, $i, 1) == ",")
    {
      $arr[$arr_size] = substr($str, $j, $i-$j);
      $arr_size = $arr_size + 1;

      for($k = $i+1; $k < strlen($str); $k++)
      {
        if(substr($str, $k, 1) != " " && substr($str, $k, 1) != "\n" && substr($str, $k, 1) != "\r")
        {
          $i = $k;
          $j = $k;

          break;
        }
      }
    }
  }

  $arr[$arr_size] = substr($str, $j, strlen($str) - $j);
  return $arr;
}

function arr_str($arr)
{
  $i = 0;
  $str = "";

  $str = "";

  for($i=0; $i<sizeof($arr); $i++)
    $str .= $arr[$i];

  return $str;
}

function doc_cookie($str)
{
  $set_ckl = false;

  $ckn_loc = 0;
  $equ_1 = 0;
  $equ_2 = 0;
  $i = 0;
  $sem = 0;

  $cki_name = "";
  $cki_val = "";
  $temp = "";

  if(!isset($GLOBALS['cki']))
    $GLOBALS['cki'] = [];

  for($i = strlen($str) - 1; $i > 0; $i--)
  {
    if($i+7 < strlen($str) && substr($str, $i, 8) == "expires=")
    {
      $equ_2 = $i+7;
      continue;
    }

    else if(substr($str, $i, 1) == ";")
    {
      $sem = $i;
      break;
    }
  }

  for($i=0; $i < strlen($str); $i++)
  {
    if(substr($str, $i, 1) == "=")
    {
      $equ_1 = $i;
      break;
    }
  }

  if($equ_1 < $sem && $sem < $equ_2)
  {
    $cki_name = substr($str, 0, $equ_1);

    for($i=0; $i < sizeof($GLOBALS['cki']); $i++)
    {
      if($GLOBALS['cki'][$i] == $cki_name)
      {
        $set_ckl = true;
        $ckn_loc = $i;
        break;
      }
    }

    $temp = substr($str, $equ_1 + 1, $sem - ($equ_1 + 1));
    $temp = sing_spc($temp);

    $cki_val = $temp;
    $temp = "";

    for($i=0; $i < strlen($cki_val); $i++)
    {
      if(substr($cki_val, $i, 1) == " ")
      {
        $temp .= ";";
        continue;
      }

      $temp .= substr($cki_val, $i, 1);
    }

    $cki_val = $temp;

    $temp = substr($str, 0, $equ_1);
    $temp = rem_sur_spc($temp);

    if($set_ckl)
      $GLOBALS['cki'][ckn_loc] = $cki_name;

    else
      $GLOBALS['cki'][sizeof($GLOBALS['cki'])] = $cki_name;

    if($set_ckl)
      $GLOBALS['cki'][ckn_loc + 1] = $cki_val;

    else
      $GLOBALS['cki'][sizeof($GLOBALS['cki'])] = $cki_val;

    $temp = substr($str, $equ_2 + 1, strlen($str) - ($equ_2 + 1));
    $temp = rem_sur_spc($temp);

    if($set_ckl)
      $GLOBALS['cki'][ckn_loc + 2] = $temp;

    else
      $GLOBALS['cki'][sizeof($GLOBALS['cki'])] = $temp;
  }
}

function doc_write($str)
{
  $master_str = false;
  $sec_str = false;

  $beg_qu = 0;
  $i = 0;
  $j = 0;
  $end_qu = 0;
  $ev_len = 0;
  $par_count = 0;

  $action = "";
  $form = "";
  $master_qu = "";
  $qu_str = "";
  $sec_qu = "";
  $temp = "";
  $tmp = "";

  $form_info = [];
  $html_id = [];

  $str = rem_sur_spc($str);

  for($i=0; $i < strlen($str); $i++)
  {
    if(substr($str, $i, 1) == "\"" || substr($str, $i, 1) == "'")
    {
      $master_qu = "";

      for($j = $i-1; $j >= 0; $j--)
      {
        if(substr($str, $j, 1) != "\\")
          break;

        $master_qu .= "\\";
      }

      $master_qu .= substr($str, $i, 1);
      $master_str = true;

      break;
    }
  }

  $temp = "";

  for($i=0; $i < strlen($master_qu); $i++)
    $temp .= substr($str, $i, 1);

  for($i = strlen($master_qu); $i < strlen($str); $i++)
  {
    if($master_str && (substr($str, $i, 1) == "\"" || substr($str, $i, 1) == "'"))
    {
      $tmp = "";

      for($j = $i-1; $j >= 0; $j--)
      {
        if(substr($str, $j, 1) != "\\")
          break;

        $tmp .= "\\";
      }

      $tmp .= substr($str, $i, 1);

      if($tmp == $master_qu)
      {
        $master_str = false;
        $temp .= substr($str, $i, 1);

        continue;
      }
    }

    if(!$master_str && (substr($str, $i, 1) == "\"" || substr($str, $i, 1) == "'"))
    {
      $tmp = "";

      for($j = $i-1; $j >= 0; $j--)
      {
        if(substr($str, $j, 1) != "\\")
          break;

        $tmp .= "\\";
      }

      $tmp .= substr($str, $i, 1);

      if($tmp == $master_qu)
      {
        $master_str = true;
        $temp .= substr($str, $i, 1);

        continue;
      }

      else if(!$sec_str)
      {
        $sec_str = true;
        $sec_qu = $tmp;
        $temp .= substr($str, $i, 1);

        continue;
      }
    }

    if($sec_str && (substr($str, $i, 1) == "\"" || substr($str, $i, 1) == "'"))
    {
      $tmp = "";

      for($j = $i-1; $j >= 0; $j--)
      {
        if(substr($str, $j, 1) != "\\")
          break;

        $tmp .= "\\";
      }

      $tmp .= substr($str, $i, 1);

      if($tmp == $sec_qu)
      {
        $sec_str = false;
        $temp .= substr($str, $i, 1);

        continue;
      }
    }

    if(!$master_str && !$sec_str && substr($str, $i, 1) == "(")
    {
      $par_count = $par_count + 1;
      $temp .= substr($str, $i, 1);

      continue;
    }

    if(!$master_str && !$sec_str && substr($str, $i, 1) == ")")
    {
      $par_count = $par_count - 1;
      $temp .= substr($str, $i, 1);

      continue;
    }

    if(!$master_str && !$sec_str && $par_count == 0 && substr($str, $i, 1) == "+")
    {
      $temp .= ".";
      continue;
    }

    if($master_str && $i+3 < strlen($str) && substr($str, $i, 4) == " id=")
    {
      $html_id = html_ch(substr($str, $i+4, strlen($str) - ($i+4)));
      $beg_qu = $html_id[0] + $i+4;
      $end_qu = $html_id[1] + $i+4;
      $qu_str = $html_id[2];
      $ev_len = $html_id[3];

      $i = $i + 3 + $ev_len;
      continue;
    }

    if($master_str && $i+5 < strlen($str) && substr($str, $i, 6) == " name=")
    {
      $html_id = html_ch(substr($str, $i+6, strlen($str) - ($i+6)));
      $beg_qu = $html_id[0] + $i+6;
      $end_qu = $html_id[1] + $i+6;
      $qu_str = $html_id[2];
      $ev_len = $html_id[3];

      $i = $i + 5 + $ev_len;
      continue;
    }

    $temp .= substr($str, $i, 1);
  }

  $str = $temp;

  $master_str = true;
  $sec_str = false;

  $sec_qu = "";
  $temp = "";
  $tmp = "";

  for($i=0; $i < strlen($master_qu); $i++)
    $temp .= substr($str, $i, 1);

  for($i = strlen($master_qu); $i < strlen($str); $i++)
  {
    if($master_str && (substr($str, $i, 1) == "\"" || substr($str, $i, 1) == "'"))
    {
      $tmp = "";

      for($j = $i-1; $j >= 0; $j--)
      {
        if(substr($str, $j, 1) != "\\")
          break;

        $tmp .= "\\";
      }

      $tmp .= substr($str, $i, 1);

      if($tmp == $master_qu)
      {
        $master_str = false;
        $temp .= substr($str, $i, 1);

        continue;
      }
    }

    if(!$master_str && (substr($str, $i, 1) == "\"" || substr($str, $i, 1) == "'"))
    {
      $tmp = "";

      for($j = $i-1; $j >= 0; $j--)
      {
        if(substr($str, $j, 1) != "\\")
          break;

        $tmp .= "\\";
      }

      $tmp .= substr($str, $i, 1);

      if($tmp == $master_qu)
      {
        $master_str = true;
        $temp .= substr($str, $i, 1);

        continue;
      }

      else if(!$sec_str)
      {
        $sec_str = true;
        $sec_qu = $tmp;
        $temp .= substr($str, $i, 1);

        continue;
      }
    }

    if($sec_str && (substr($str, $i, 1) == "\"" || substr($str, $i, 1) == "'"))
    {
      $tmp = "";

      for($j = $i-1; $j >= 0; $j--)
      {
        if(substr($str, $j, 1) != "\\")
          break;

        $tmp .= "\\";
      }

      $tmp .= substr($str, $i, 1);

      if($tmp == $sec_qu)
      {
        $sec_str = false;
        $temp .= substr($str, $i, 1);

        continue;
      }
    }

    if($master_str && $i+9 < strlen($str) && substr($str, $i, 10) == " onchange=")
    {
      $html_id = html_ch(substr($str, $i+10, strlen($str) - ($i+10)));
      $beg_qu = $html_id[0] + $i+10;
      $end_qu = $html_id[1] + $i+10;
      $qu_str = $html_id[2];
      $ev_len = $html_id[3];

      $action = $master_qu;
      $action .= "<?php ";
      $action .= substr($str, $beg_qu + 1, $ev_len - 2);
      $action .= " ?>";
      $action .= $master_qu;

      $form_info = js_val($action);
      $action = $form_info[0];
      $form = $form_info[1];

      $tmp = "form(";
      $tmp .= $form;
      $tmp .= "): ";
      $tmp .= "action(";
      $tmp .= $action;
      $tmp .= "): ";
      $tmp .= $temp;
      $temp = $tmp;

      $i = $i + 9 + $ev_len;
      continue;
    }

    if($master_str && $i+8 < strlen($str) && substr($str, $i, 9) == " onclick=")
    {
      $html_id = html_ch(substr($str, $i+9, strlen($str) - ($i+9)));
      $beg_qu = $html_id[0] + $i+9;
      $end_qu = $html_id[1] + $i+9;
      $qu_str = $html_id[2];
      $ev_len = $html_id[3];

      $action = $master_qu;
      $action .= "<?php ";
      $action .= substr($str, $beg_qu + 1, $ev_len - 2);
      $action .= " ?>";
      $action .= $master_qu;

      $form_info = js_val($action);
      $action = $form_info[0];
      $form = $form_info[1];

      $tmp = "form(";
      $tmp .= $form;
      $tmp .= "): ";
      $tmp .= "action(";
      $tmp .= $action;
      $tmp .= "): ";
      $tmp .= $temp;
      $temp = $tmp;

      $i = $i + 8 + $ev_len;
      continue;
    }

    if($master_str && $i+11 < strlen($str) && substr($str, $i, 12) == " onkeypress=")
    {
      $html_id = html_ch(substr($str, $i+12, strlen($str) - ($i+12)));
      $beg_qu = $html_id[0] + $i+12;
      $end_qu = $html_id[1] + $i+12;
      $qu_str = $html_id[2];
      $ev_len = $html_id[3];

      $action = $master_qu;
      $action .= "<?php ";
      $action .= substr($str, $beg_qu + 1, $ev_len - 2);
      $action .= " ?>";
      $action .= $master_qu;

      $form_info = js_val($action);
      $action = $form_info[0];
      $form = $form_info[1];

      $tmp = "form(";
      $tmp .= $form;
      $tmp .= "): ";
      $tmp .= "action(";
      $tmp .= $action;
      $tmp .= "): ";
      $tmp .= $temp;
      $temp = $tmp;

      $i = $i + 11 + $ev_len;
      continue;
    }

    $temp .= substr($str, $i, 1);
  }

  if(strlen($temp) < 5 || substr($temp, 0, 5) != "form(")
  {
    $tmp = "";

    for($i=0; $i < strlen($temp); $i++)
    {
      if($i+8 < strlen($temp) && substr($temp, $i, 9) == "</select>")
      {
        $tmp .= "</select><input type=\"submit\" value=\"Change\">";
        $i = $i+8;

        continue;
      }

      $tmp .= substr($temp, $i, 1);
    }

    $temp = $tmp;

    $tmp = "echo ";
    $tmp .= $temp;
    $temp = $tmp;

    return $temp;
  }

  for($i=0; $i < strlen($temp); $i++)
  {
    if($i+2 < strlen($temp) && substr($temp, $i, 3) == "): ")
    {
      for($j = $i+3; $j < strlen($temp); $j++)
      {
        if($j+2 < strlen($temp) && substr($temp, $j, 3) == "): ")
        {
          $tmp = substr($temp, 0, $j+3);
          $tmp .= substr($temp, $j+4, (strlen($temp) - ($j+4)) - 1);
          $temp = $tmp;

          break;
        }
      }

      break;
    }
  }

  return $temp;
}

function file_str($path)
{
  $i = 0;
  $str = "";
  $arr = [];

  $arr = file($path);
  $str = "";

  for($i=0; $i < sizeof($arr); $i++)
    $str .= $arr[$i];

  return $str;
}

function html_ch($str)
{
  $i = 0;
  $j = 0;

  $del_str = "";
  $qu_str = "";

  $arr = [];

  for($i=0; $i < strlen($str); $i++)
  {
    if(substr($str, $i, 1) == "\"" || substr($str, $i, 1) == "'")
    {
      $del_str = "";

      for($j=$i-1; $j >= 0; $j--)
      {
        if(substr($str, $j, 1) != "\\")
          break;

        $del_str .= "\\";
      }

      $arr[0] = $j+1;

      $qu_str = $del_str;
      $qu_str .= substr($str, $i, 1);

      $arr[2] = $qu_str;

      for($j = $i+1; $j < strlen($str); $j++)
      {
        if($j+strlen($qu_str) < strlen($str) && substr($str, $j, strlen($qu_str)) == $qu_str)
        {
          if(substr($str, $j-1, 1) != "\\")
          {
            $arr[1] = $j;
            $arr[3] = $j + strlen($qu_str);

            break;
          }
        }
      }

      break;
    }
  }

  return $arr;
}

function js_array($str)
{
  $ast_state = false;

  $i = 0;
  $j = 0;
  $k = 0;
  $term_ast = 0;

  $temp = "";

  $arr = [];

  for($i=0; $i < strlen($str) - 1; $i++)
  {
    if(substr($str, $i, 2) == "//")
    {
      if(strlen($str) - $i+2 > 0)
        $str = substr($str, $i+2, strlen($str) - $i+2);

      else
        $str = "";

      break;
    }
  }

  $k = 0;

  for($i=0; $i < strlen($str); $i++)
  {
    if(!$ast_state && substr($str, $i, 1) == "*")
    {
      $ast_state = true;
      continue;
    }

    else if($ast_state && substr($str, $i, 1) == "*")
    {
      $ast_state = false;
      continue;
    }

    if($ast_state && $i+8 < strlen($str) && substr($str, $i, 9) == "js_array ")
    {
      $temp = "";

      for($j=$i+9; $j < strlen($str); $j++)
      {
        if(substr($str, $j, 1) == ";")
          break;

        if(substr($str, $j, 1) == ",")
        {
          if($temp != "")
          {
            $arr[$k] = $temp;
            $k = $k+1;
            $temp = "";
          }

          continue;
        }

        if(substr($str, $j, 1) == " ")
          continue;

        $temp .= substr($str, $j, 1);
      }

      if($temp != "")
        $arr[$k] = $temp;
    }
  }

  return $arr;
}

function js_php($str)
{
  $i = 0;
  $temp = "";

  $GLOBALS['end_pos'] = strlen($str);
  $temp = "";

  for($i=0; $i<strlen($str); $i++)
  {
    if($i+8 < strlen($str) && substr($str, $i, 8) == "<script>")
    {
      $temp .= scr_php(substr($str, $i, strlen($str) - 1));
      $i = $i + $GLOBALS['end_pos'];

      continue;
    }

    $temp .= substr($str, $i, 1);
  }

  return $temp;
}

function is_odd($num)
{
  if($num % 2 == 0)
    return false;

  return true;
}

function is_var_ch($str)
{
  if(strlen($str) == 1)
  {
    if($str == "a" || $str == "b" || $str == "c" || $str == "d" || $str == "e" || $str == "f" || $str == "g" || $str == "h" || $str == "i" || $str == "j" || $str == "k" || $str == "l" || $str == "m" || $str == "n" || $str == "o" || $str == "p" || $str == "q" || $str == "r" || $str == "s" || $str == "t" || $str == "u" || $str == "v" || $str == "w" || $str == "x" || $str == "y" || $str == "z" || $str == "_" || $str == "0" || $str == "1" || $str == "2" || $str == "3" || $str == "4" || $str == "5" || $str == "6" || $str == "7" || $str == "8" || $str == "9" || $str == "A" || $str == "B" || $str == "C" || $str == "D" || $str == "E" || $str == "F" || $str == "G" || $str == "H" || $str == "I" || $str == "J" || $str == "K" || $str == "L" || $str == "M" || $str == "N" || $str == "O" || $str == "P" || $str == "Q" || $str == "R" || $str == "S" || $str == "T" || $str == "U" || $str == "V" || $str == "W" || $str == "X" || $str == "Y" || $str == "Z")
      return true;
  }

  return false;
}

function js_get_time($m_sec = 0)
{
  $sec = 0;
  $temp = "";

  $sec = $m_sec / 1000;
  $date = date("r", microtime(true) + $sec);

  $temp = substr($date, 0, 5);
  $temp .= substr($date, 8, 4);
  $temp .= substr($date, 5, 3);
  $temp .= substr($date, 12, strlen($date) - 12);

  $date = substr($temp, 0, 3);
  $date .= substr($temp, 4, strlen($temp) - 4);

  return $date;
}

function js_set_time($str)
{
  return $str;
}

function js_substring($str, $beg = 1, $end = 0)
{
  if($beg > $end)
    return substr($str, $beg, 1);

  return substr($str, $beg, $end - $beg);
}

function js_to_utc_str($date)
{
  $i = 0;
  $temp = "";

  $temp = substr($date, 0, 3);
  $temp .= ",";
  $temp .= substr($date, 3, strlen($date) - 3);

  $date = substr($temp, 0, 5);
  $date .= substr($temp, 9, 3);
  $date .= substr($temp, 5, 4);
  $date .= substr($temp, 12, strlen($temp) - 12);

  for($i=11; $i < strlen($temp); $i++)
  {
    if(substr($temp, $i, 1) == " ")
      break;
  }

  $date = substr($date, 0, 25 + ($i-11));
  $date .= " GMT";

  return $date;
}

function js_val($str)
{
  $enc_squ = false;
  $master_str = false;

  $end = 0;
  $i = 0;
  $j = 0;

  $master_qu = "";
  $squ_var = "";
  $temp = "";
  $tmp = "";

  for($i=0; $i < strlen($str); $i++)
  {
    if(substr($str, $i, 1) == "'" || substr($str, $i, 1) == "\"")
    {
      $master_qu = "";

      for($j = $i-1; $j >= 0; $j--)
      {
        if(substr($str, $j, 1) != "\\")
          break;

        $master_qu .= "\\";
      }

      $master_qu = substr($str, $i, 1);
      $master_str = true;

      break;
    }
  }

  $form = "";
  $temp = $master_qu;

  for($i = strlen($master_qu); $i < strlen($str); $i++)
  {
    if($master_str && (substr($str, $i, 1) == "\"" || substr($str, $i, 1) == "'"))
    {
      $tmp = "";

      for($j = $i-1; $j >= 0; $j--)
      {
        if(substr($str, $j, 1) != "\\")
          break;

        $tmp .= "\\";
      }

      $tmp .= substr($str, $i, 1);

      if($tmp == $master_qu)
      {
        $master_str = false;
        $temp .= substr($str, $i, 1);

        continue;
      }
    }

    if(!$master_str && (substr($str, $i, 1) == "\"" || substr($str, $i, 1) == "'"))
    {
      $tmp = "";

      for($j = $i-1; $j >= 0; $j--)
      {
        if(substr($str, $j, 1) != "\\")
          break;

        $tmp .= "\\";
      }

      $tmp .= substr($str, $i, 1);

      if($tmp == $master_qu)
      {
        $master_str = true;
        $temp .= substr($str, $i, 1);

        continue;
      }
    }

    if($master_str && $i+5 < strlen($str) && substr($str, $i, 6) == ".value")
    {
      if($i+6 < strlen($str))
      {
        $tmp = " ";
        $tmp .= substr($str, $i, 7);

        if(all_alone($tmp))
        {
          for($j = strlen($temp) - 1; $j >= 0; $j--)
          {
            if(!$enc_squ && substr($temp, $j, 1) == "'")
            {
              $enc_squ = true;
              continue;
            }

            else if($enc_squ && substr($temp, $j, 1) == "'")
            {
              $enc_squ = false;
              $end = $j;
              continue;
            }

            if(!$enc_squ && (substr($temp, $j, 1) == " " || substr($temp, $j, 1) == "," || substr($temp, $j, 1) == "("))
              break;

            if($enc_squ && substr($temp, $j, 1) == "\$")
            {
              for($k = $j+1; $k < strlen($temp); $k++)
              {
                if(substr($temp, $k, 1) == " " || substr($temp, $k, 1) == ".")
                  break;
              }

              $squ_var = substr($temp, $j, $k-$j);
            }
          }

          if($squ_var != "")
          {
            $form = substr($str, $j+1, $end - ($j+1));
            $form .= $squ_var;

            $squ_var = "";
          }

          else
            $form = substr($str, $j+1, $i - ($j+1));

          $temp = substr($temp, 0, $j+1);
          $temp .= "\$_POST[\"";
          $temp .= $form;
          $temp .= "\"]";

          $i = $i+5;

          continue;
        }
      }
    }

    $temp .= substr($str, $i, 1);
  }

  if($form == "")
  {
    $form = "no_val_";
    $form .= $GLOBALS['form_count'];
    $GLOBALS['form_count'] = $GLOBALS['form_count'] + 1;
  }

  return [$temp, $form];
}

function par_var($ind, $str)
{
  $found_qu = false;

  $brk_count = 0;
  $i = 0;
  $j = 0;
  $k = 0;
  $m = 0;
  $par_count = 0;

  $del_str = "";
  $qu_str = "";
  $temp = "";

  $arr = [];

  $j = 0;
  $k = 0;

  for($i=0; $i < strlen($str); $i++)
  {
    if(!$found_qu && (substr($str, $i, 1) == "\"" || substr($str, $i, 1) == "'"))
    {
      $del_str = "";
      $found_qu = true;

      for($m = $i-1; $m >= 0; $m--)
      {
        if(substr($str, $m, 1) != "\\")
          break;

        $del_str .= "\\";
      }

      $qu_str = $del_str;
      $qu_str .= substr($str, $i, 1);

      continue;
    }

    if($found_qu && $i + (strlen($qu_str) - 1) < strlen($str) && substr($str, $i, strlen($qu_str)) == $qu_str && $i != 0 && substr($str, $i-1, 1) != "\\")
    {
      $found_qu = false;
      continue;
    }

    if(!$found_qu && substr($str, $i, 1) == "[")
    {
      $brk_count = $brk_count + 1;
      continue;
    }

    if(!$found_qu && substr($str, $i, 1) == "]")
    {
      $brk_count = $brk_count - 1;
      continue;
    }

    if(!$found_qu && substr($str, $i, 1) == "(")
    {
      $par_count = $par_count + 1;
      continue;
    }

    if(!$found_qu && substr($str, $i, 1) == ")")
    {
      $par_count = $par_count - 1;
      continue;
    }

    if($brk_count == 0 && !$found_qu && $par_count == 0 && substr($str, $i, 1) == ",")
    {
      $temp = substr($str, $j, $i - $j);
      $temp = rem_sur_spc($temp);
      $arr[$k] = $temp;

      $j = $i+1;
      $k = $k+1;
    }
  }

  $temp = substr($str, $j, strlen($str) - $j);
  $temp = rem_sur_spc($temp);
  $arr[$k] = $temp;

  if($ind < sizeof($arr))
    return $arr[$ind];

  return "index out of bounds";
}

function rm_init($str)
{
  $str_state = false;

  $brk_count = 0;
  $comma = 0;
  $i = 0;
  $j = 0;
  $k = 0;
  $par_count = 0;

  $del_str = "";
  $qu_str = "";
  $temp = "";
  $tmp = "";

  $arr = [];

  $temp = "";

  for($i=0; $i < strlen($str); $i++)
  {
    if($brk_count < 1 && $par_count < 1 && !$str_state && (substr($str, $i, 1) == "\"" || substr($str, $i, 1) == "'"))
    {
      $str_state = true;
      $del_str = "";

      for($j=$i-1; $j >= 0; $j++)
      {
        if(substr($str, $i, 1) != "\\")
          break;

        $del_str .= "\\";
      }

      $qu_str = $del_str;
      $qu_str .= substr($str, $i, 1);
      continue;
    }

    else if($str_state && $i + (strlen($qu_str) - 1) < strlen($str) && substr($str, $i, strlen($qu_str)) == $qu_str)
    {
      $del_str = "";

      for($j = $i-1; $j >= 0; $j--)
      {
        if(substr($str, $j, 1) != "\\")
          break;

        $del_str .= "\\";
      }

      if(!is_odd(strlen($del_str)))
      {
        $str_state = false;
        continue;
      }
    }

    if(substr($str, $i, 1) == "[")
    {
      $brk_count = $brk_count + 1;
      continue;
    }

    else if(substr($str, $i, 1) == "]")
    {
      $brk_count = $brk_count - 1;
      continue;
    }

    if(substr($str, $i, 1) == "(")
    {
      $par_count = $par_count + 1;
      continue;
    }

    else if(substr($str, $i, 1) == ")")
    {
      $par_count = $par_count - 1;
      continue;
    }

    if($brk_count > 0 || $par_count > 0 || $str_state)
      continue;

    $temp .= substr($str, $i, 1);
  }

  $j = 0;
  $str = $temp;

  for($i=0; $i < strlen($str); $i++)
  {
    if(substr($str, $i, 1) == ",")
    {
      $arr[$j] = $i;
      $j = $j+1;
    }

    else if($i+1 >= strlen($str))
      $arr[$j] = $i+1;
  }

  $j = 0;
  $temp = "";

  for($i=0; $i < sizeof($arr); $i++)
  {
    $comma = $arr[$i];
    $tmp = substr($str, $j, $comma-$j);
    $j = $comma + 1;
    $tmp = rem_sur_spc($tmp);

    for($k=0; $k < strlen($tmp); $k++)
    {
      if(substr($tmp, $k, 1) == "=" || substr($tmp, $k, 1) == " ")
        break;

      $temp .= substr($tmp, $k, 1);
    }

    if($i+1 < sizeof($arr))
      $temp .= ", ";
  }

  return $temp;
}

function rem_sur_spc($str)
{
  $beg_spc = 0;
  $end_spc = 0;
  $i = 0;

  $temp = "";

  $beg_spc = 0;

  for($i=0; $i < strlen($str); $i++)
  {
    if(substr($str, $i, 1) == " ")
      $beg_spc = $beg_spc + 1;

    else
      break;
  }

  $end_spc = 0;

  for($i = strlen($str) - 1; $i >= 0; $i--)
  {
    if(substr($str, $i, 1) == " ")
      $end_spc = $end_spc + 1;

    else
      break;
  }

  $temp = substr($str, $beg_spc, strlen($str) - $beg_spc);
  $str = $temp;
  $temp = substr($str, 0 , strlen($str) - $end_spc);
  $str = $temp;

  return $str;
}

function scr_php($str)
{
  $doc_cki = false;
  $found_actxobj = false;
  $found_ch = false;
  $found_chat = false;
  $found_open = false;
  $found_repl = false;
  $found_spc = false;
  $found_xmlreq = false;
  $func_doc_wri = false;
  $func_rand = false;
  $get_time_plus = false;
  $glo_doc_wri = false;
  $slash_com = false;

  $actxobj_loc = 0;
  $arr_size = 0;
  $beg_qu = 0;
  $bool_par = 0;
  $brc_count = 0;
  $brk_count = 0;
  $end_qu = 0;
  $i = 0;
  $j = 0;
  $k = 0;
  $len = 0;
  $open_loc = 0;
  $par_count = 0;
  $qu_end = 0;
  $trim_par = 0;
  $trim_brk = 0;
  $xmlreq_loc = 0;

  $action = "";
  $beg_ch = "";
  $cki_str = "";
  $doc_wri_str = "";
  $end_ch = "";
  $form = "";
  $func_stat = "false";
  $last_form = "";
  $qu_del = "";
  $qu_stat = "false";
  $qu_str = "";
  $repl_str = "";
  $res = "false";
  $spl_str = "";
  $temp = "";
  $tmp = "";
  $test_str = "";
  $var_str = "";

  $js_arr = [];
  $var_arr = [];

  $bool_par = -1;
  $temp = "<?php";

  for($i=8; $i<strlen($str); $i++)
  {
    if($i+1 < strlen($str) && substr($str, $i, 2) == "//")
    {
      $slash_com = true;
      $i = $i+1;
      $temp .= "//";

      continue;
    }

    if($qu_stat == "false")
    {
      if(substr($str, $i, 1) == "\"" || substr($str, $i, 1) == "'")
      {
        $qu_del = "";

        for($j = $i-1; $j >= 0; $j--)
        {
          if(substr($str, $j, 1) != "\\")
            break;

          $qu_del .= "\\";
        }

        $qu_str = $qu_del;
        $qu_str .= substr($str, $i, 1);

        for($j = $i+1; $j < strlen($str); $j++)
        {
          if($i + (strlen($qu_str) - 1) < strlen($str) && substr($str, $j, strlen($qu_str)) == $qu_str)
          {
            $qu_del = "";

            for($k = $j-1; $k >= 0; $k--)
            {
              if(substr($str, $k, 1) != "\\")
                break;

              $qu_del .= "\\";
            }

            if(!is_odd(strlen($qu_del)))
            {
              $qu_end = $j;
              $qu_stat = "true";
              break;
            }
          }
        }

        if($qu_stat == "true")
        {
          $temp .= substr($str, $i, 1);
          continue;
        }
      }
    }

    if($qu_stat == "true")
    {
      if($i == $qu_end)
      {
        $qu_stat = "false";
        $temp .= substr($str, $i, 1);
        continue;
      }

      if(substr($str, $i, 1) == "\$")
      {
        $temp .= "\\\$";
        continue;
      }
    }

    if($slash_com)
    {
      if(substr($str, $i, 1) == "\n" || substr($str, $i, 1) == "\r")
      {
        $slash_com = false;
        $temp .= substr($str, $i, 1);
        continue;
      }
    }

    if(!$slash_com)
    {
      if($qu_stat == "false")
      {
        if(substr($str, $i, 1) == "[")
        {
          $brk_count = $brk_count + 1;
          $temp .= "[";

          continue;
        }

        else if(substr($str, $i, 1) == "]")
        {
          $brk_count = $brk_count - 1;
          $temp .= "]";

          continue;
        }

        if(substr($str, $i, 1) == "(")
        {
          $par_count = $par_count + 1;
          $temp .= "(";

          continue;
        }

        else if(substr($str, $i, 1) == ")")
        {
          $par_count = $par_count - 1;

          if($found_chat && $par_count == $bool_par)
          {
            $bool_par = -1;
            $found_chat = false;
            $temp .= ", 1)";

            continue;
          }

          if($found_open && $par_count == 0)
          {
            $found_open = false;

            $tmp = substr($temp, 0, $open_loc);
            $tmp .= par_var(1, substr($temp, $open_loc, strlen($temp) - $open_loc));
            $temp = $tmp;

            continue;
          }

          if($found_repl && $par_count == 0)
          {
            $temp .= ", ";
            $temp .= $repl_str;
            $temp .= ")";
            $found_repl = false;

            continue;
          }

          if($func_doc_wri && $par_count == 0)
          {
            $func_doc_wri = false;

            for($j = $i+1; $j < strlen($str); $j++)
            {
              if(substr($str, $j, 1) == ";")
              {
                $i = $j;
                $temp .= ";";

                break;
              }
            }

            continue;
          }

          if($spl_str != "" && $par_count == 0)
          {
            $len = strlen($spl_str);

            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if($j + ($len - 1) < strlen($temp) && substr($temp, $j, $len) == $spl_str)
              {
                $spl_str = substr($temp, $j + $len, strlen($temp) - ($j + $len));

                break;
              }
            }

            $len = strlen($spl_str);

            for($j = $j-1; $j >= 0; $j--)
            {
              if($j+8 < strlen($temp) && substr($temp, $j, 9) == "*spl_str*")
              {
                $tmp = substr($temp, 0, $j);
                $tmp .= $spl_str;
                $tmp .= substr($temp, $j+9, (strlen($temp) - ($j+9)) - $len);
                $temp = $tmp;

                break;
              }
            }

            $spl_str = "";
          }

          $temp .= ")";

          continue;
        }

        if(substr($str, $i, 1) == "{")
        {
          $brc_count = $brc_count + 1;
          $temp .= "{";
          continue;
        }

        else if(substr($str, $i, 1) == "}")
        {
          $brc_count = $brc_count - 1;

          if($brc_count < 1 && $func_stat == "true")
          {
            $func_stat = "false";
            $var_arr = [];
          }

          $temp .= "}";

          if($func_rand && $brc_count == 0)
          {
            $func_rand = false;
            $temp .= "*/";
          }

          continue;
        }

        if($brk_count == 0 && $par_count == 0 && substr($str, $i, 1) == ",")
        {
          $temp .= ";";
          continue;
        }

        if($doc_cki && substr($str, $i, 1) == ";")
        {
          $doc_cki = false;
          $temp .= ");";
          continue;
        }

        if($found_actxobj && substr($str, $i, 1) == ";")
        {
          $temp = substr($temp, 0, $actxobj_loc);
          $found_actxobj = false;
          $temp .= ";";

          continue;
        }

        if($found_xmlreq && substr($str, $i, 1) == ";")
        {
          $temp = substr($temp, 0, $xmlreq_loc);
          $found_xmlreq = false;
          $temp .= ";";

          continue;
        }

        if($get_time_plus && substr($str, $i, 1) == ";")
        {
          $get_time_plus = false;
          $temp .= ");";
          $par_count = $par_count - 1;

          continue;
        }

        if($glo_doc_wri && substr($str, $i, 1) == ";")
        {
          $glo_doc_wri = false;

          for($k = strlen($temp) - 1; $k >= 0; $k--)
          {
            if(substr($temp, $k, 1) == ")")
              break;
          }

          for($j = strlen($temp) - 1; $j >= 0; $j--)
          {
            if($j+13 < strlen($temp) && substr($temp, $j, 14) == "document.write")
            {
              $doc_wri_str = substr($temp, $j+14, $k - ($j+14));
              break;
            }
          }

          for($k=0; $k < strlen($doc_wri_str); $k++)
          {
            if(substr($doc_wri_str, $k, 1) == "(")
            {
              $doc_wri_str = substr($doc_wri_str, $k+1, strlen($doc_wri_str) - ($k+1));
              break;
            }
          }

          $doc_wri_str = doc_write($doc_wri_str);

          if(strlen($doc_wri_str) >= 5 && substr($doc_wri_str, 0, 5) == "form(")
          {
            $temp = substr($temp, 0, $j);

            for($j=5; $j < strlen($doc_wri_str); $j++)
            {
              if($j+1 < strlen($doc_wri_str) && substr($doc_wri_str, $j, 2) == "):")
              {
                $form = substr($doc_wri_str, 5, $j-5);
                break;
              }
            }

            $k = $j+10;

            for($j = $k; $j < strlen($doc_wri_str); $j++)
            {
              if($j+1 < strlen($doc_wri_str) && substr($doc_wri_str, $j, 2) == "):")
              {
                $action = substr($doc_wri_str, $k, $j-$k);
                $tmp = "'";

                for($m=1; $m < strlen($action) - 1; $m++)
                {
                  if($m+2 < strlen($action) && substr($action, $m, 3) == "\\''")
                  {
                    $m = $m+2;

                    continue;
                  }

                  if($m+2 < strlen($action) && substr($action, $m, 3) == "'\\'")
                  {
                    $m = $m+2;

                    continue;
                  }

                  if($m+2 < strlen($action) && substr($action, $m, 3) == " . ")
                  {
                    $m = $m+2;

                    continue;
                  }

                  if(substr($action, $m, 1) == "'")
                  {
                    $tmp .= "\"";

                    continue;
                  }

                  $tmp .= substr($action, $m, 1);
                }

                $tmp .= "'";
                $action = $tmp;
                $doc_wri_str = substr($doc_wri_str, $j+3, strlen($doc_wri_str) - ($j+3));

                break;
              }
            }

            if($form == $last_form)
            {
              for($j = strlen($temp); $j >= 0; $j--)
              {
                if($j+7 < strlen($temp) && substr($temp, $j, 8) == " action=")
                {
                  for($j = $j+8; $j < strlen($temp); $j++)
                  {
                    if($j+1 < strlen($temp) && substr($temp, $j, 2) == "<?")
                      $beg_qu = $j-1;

                    else if($j+1 < strlen($temp) && substr($temp, $j, 2) == "?>")
                    {
                      $end_qu = $j+2;
                      break;
                    }
                  }

                  $tmp = substr($temp, $beg_qu + 1, $end_qu - ($beg_qu + 1));

                  for($j=0; $j < strlen($tmp); $j++)
                  {
                    if($j+6 < strlen($tmp) && substr($tmp, $j, 7) == "\$_POST[")
                    {
                      for($k = $j+7; $k < strlen($tmp); $k++)
                      {
                        if(substr($tmp, $k, 1) == "]")
                        {
                          if(substr($tmp, $j+8, ($k-1) - ($j+8)) == $form)
                          {
                            $tmp = substr($temp, 0, $beg_qu);
                            $tmp .= $action;
                            $tmp .= substr($temp, $end_qu + 1, strlen($temp) - ($end_qu + 1));
                            $temp = $tmp;
                            $tmp = "found_it_dude";

                            break;
                          }

                          break;
                        }
                      }

                      break;
                    }
                  }

                  if($tmp == "found_it_dude")
                    break;
                }
              }
            }

            else
            {
              if($last_form != "")
                $temp .= "echo \"</form>\";\n\n";

              $temp .= " ?>";
              $temp .= "<form action=";
              $temp .= $action;
              $temp .= " method=\"post\"> <?php ";
            }

            if(strlen($doc_wri_str) > 6 && substr($doc_wri_str, 0, 7) == "<a href")
            {
              $tmp = "";

              for($j=7; $j < strlen($doc_wri_str); $j++)
              {
                if(substr($doc_wri_str, $j, 1) == ">")
                {
                  for($k = $j+1; $k < strlen($doc_wri_str); $k++)
                  {
                    if(substr($doc_wri_str, $k, 1) == "<")
                    {
                      $tmp = substr($doc_wri_str, $j+1, $k - ($j+1));
                      break;
                    }
                  }

                  break;
                }
              }

              $doc_wri_str = "<input type=\\\"submit\\\" value=\\\"";
              $doc_wri_str .= $tmp;
              $doc_wri_str .= "\\\">";
            }

            $temp .= "echo \"";

            if(strlen($doc_wri_str) >= 18 && substr($doc_wri_str, 0, 18) == "<input type=\"text\"")
            {
              $tmp = "";

              for($j=0; $j < strlen($doc_wri_str); $j++)
              {
                if(substr($doc_wri_str, $j, 1) == "\"")
                {
                  $tmp .= "\\\"";
                  continue;
                }

                $tmp .= substr($doc_wri_str, $j, 1);
              }

              $doc_wri_str = $tmp;
            }

            $temp .= $doc_wri_str;
            $temp .= "\";";

            $last_form = $form;
          }

          else
          {
            $tmp = substr($temp, 0, $j);
            $tmp .= $doc_wri_str;
            $temp = $tmp;
            $temp .= substr($str, $i, 1);
          }

          continue;
        }

        if($i+2 < strlen($str))
        {
          if(substr($str, $i, 2) == "+=")
          {
            $temp .= ".=";
            $i = $i+1;
            continue;
          }

          if($func_stat == "false" && substr($str, $i, 3) == "var")
          {
            $arr_size = sizeof($GLOBALS['glo_arr']);

            if($i == 0)
              $j = 0;

            else
              $j = $i-1;

            for($j = $j; $j >= 0; $j--)
            {
              if(substr($str, $j, 1) == " " || substr($str, $j, 1) == "\n" || substr($str, $j, 1) == "\r")
                continue;

              else if($j == 0 || substr($str, $j, 1) == ">" || substr($str, $j, 1) == ";" || substr($str, $j, 1) == "}")
              {
                for($j = $i+3; $j < strlen($str); $j++)
                {
                  if(substr($str, $j, 1) == " " || substr($str, $j, 1) == "\n" || substr($str, $j, 1) == "\r")
                  {
                    $res = "true";
                    continue;
                  }

                  else if(substr($str, $j, 1) == ";")
                  {
                    $res = "false";

                    $var_str = substr($str, $i+3, $j - ($i+3));
                    $var_str = rem_sur_spc($var_str);
                    $var_str = rm_init($var_str);
                    $GLOBALS['glo_arr'] = add_to_var_arr($GLOBALS['glo_arr'], $var_str);

                    break;
                  }

                  else if($res == "true")
                    continue;

                  break;
                }
              }

              break;
            }

            if($arr_size < sizeof($GLOBALS['glo_arr']))
            {
              $i = $i+2;
              continue;
            }
          }

          if($func_stat == "true" && substr($str, $i, 3) == "var")
          {
            $arr_size = sizeof($var_arr);

            if($i == 0)
              $j = 0;

            else
              $j = $i-1;

            for($j = $j; $j >= 0; $j--)
            {
              if(substr($str, $j, 1) == " " || substr($str, $j, 1) == "\n" || substr($str, $j, 1) == "\r")
                continue;

              else if($j == 0 || substr($str, $j, 1) == "{" || substr($str, $j, 1) == ";" || substr($str, $j, 1) == "}")
              {
                for($j = $i+3; $j < strlen($str); $j++)
                {
                  if(substr($str, $j, 1) == " " || substr($str, $j, 1) == "\n" || substr($str, $j, 1) == "\r")
                  {
                    $res = "true";
                    continue;
                  }

                  else if(substr($str, $j, 1) == ";")
                  {
                    $res = "false";

                    $var_str = substr($str, $i+3, $j - ($i+3));
                    $var_str = rem_sur_spc($var_str);
                    $var_str = rm_init($var_str);
                    $var_arr = add_to_var_arr($var_arr, $var_str);

                    break;
                  }

                  else if($res == "true")
                    continue;

                  break;
                }
              }

              break;
            }

            if($arr_size < sizeof($var_arr))
            {
              $i = $i+2;
              continue;
            }
          }
        }

        if($i+3 < strlen($str))
        {
          if(substr($str, $i, 4) == "else")
          {
            if($last_form != "")
              $last_form = "&#$%";

            $i = $i+3;
            $temp .= "else";

            continue;
          }
        }

        if($i+4 < strlen($str))
        {
          if(substr($str, $i, 5) == ".open")
          {
            $found_open = true;

            for($j = $i+5; $j < strlen($str); $j++)
            {
              if(substr($str, $j, 1) == "(")
              {
                $i = $j;
                break;
              }
            }

            $par_count = $par_count + 1;
            $temp .= " = ";
            $open_loc = strlen($temp);

            continue;
          }

          if(substr($str, $i, 5) == ".send")
          {
            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == ";")
              {
                for($j = $j+1; $j < strlen($temp); $j++)
                {
                  if(substr($temp, $j, 1) == "\$")
                  {
                    $tmp = substr($temp, 0, $j);
                    $tmp .= "\$var = \$var;\n";
                    $tmp .= "//";
                    $tmp .= substr($temp, $j, strlen($temp) - $j);

                    $temp = $tmp;

                    break;
                  }
                }

                break;
              }
            }
          }

          if(substr($str, $i, 5) == ".trim")
          {
            $trim_brk = $brk_count;
            $trim_par = $par_count;

            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == "[")
              {
                $trim_brk = $trim_brk + 1;
                continue;
              }

              if(substr($temp, $j, 1) == "]")
              {
                $trim_brk = $trim_brk - 1;
                continue;
              }

              if(substr($temp, $j, 1) == "(")
              {
                $trim_par = $trim_par + 1;
                continue;
              }

              if(substr($temp, $j, 1) == ")")
              {
                $trim_par = $trim_par - 1;
                continue;
              }

              if($trim_brk == $brk_count && $trim_par == $par_count && substr($temp, $j, 1) == "\$")
              {
                $tmp = substr($temp, 0, $j);
                $tmp .= "trim(";
                $tmp .= substr($temp, $j, strlen($temp) - $j);

                for($j = $i+5; $j < strlen($str); $j++)
                {
                  if(substr($str, $j, 1) == "(")
                  {
                    $i = $j;
                    break;
                  }
                }

                $par_count = $par_count + 1;
                $temp = $tmp;

                break;
              }
            }

            continue;
          }
        }

        if($i+5 < strlen($str))
        {
          if(substr($str, $i, 6) == ".event")
          {
            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == ";" || substr($temp, $j, 1) == "{")
              {
                for($j = $j+1; $j < strlen($temp); $j++)
                {
                  if(substr($temp, $j, 1) == "\$")
                  {
                    $tmp = substr($temp, 0, $j);
                    $tmp .= "\$var = \$var;\n//";
                    $tmp .= substr($temp, $j, strlen($temp) - $j);
                    $temp = $tmp;
                    $temp .= ".event";
                    $i = $i+5;

                    break;
                  }
                }

                break;
              }
            }

            continue;
          }

          if(substr($str, $i, 6) == ".split")
          {
            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == "\$")
              {
                $spl_str = substr($temp, $j, strlen($temp) - $j);

                $tmp = substr($temp, 0, $j);
                $tmp .= "split(";
                $tmp .= "*spl_str*, ";
                $tmp .= $spl_str;

                $temp = $tmp;

                for($j = $i+6; $j < strlen($str); $j++)
                {
                  if(substr($str, $j, 1) == "(")
                  {
                    $i = $j;
                    break;
                  }
                }

                $par_count = $par_count + 1;

                break;
              }
            }

            continue;
          }
        }

        if($i+6 < strlen($str))
        {
          if(substr($str, $i, 7) == ".charAt")
          {
            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == "\$")
              {
                $found_chat = true;

                $tmp = substr($temp, 0, $j);
                $tmp .= "substr(";
                $tmp .= substr($temp, $j, strlen($temp) - $j);
                $tmp .= ", ";

                $temp = $tmp;

                for($j = $i+6; $j < strlen($str); $j++)
                {
                  if(substr($str, $j, 1) == "(")
                  {
                    $i = $j;
                    break;
                  }
                }

                $bool_par = $par_count;
                $par_count = $par_count + 1;

                break;
              }
            }

            continue;
          }

          if(substr($str, $i, 7) == ".length")
          {
            for($j = $i+1; $j < strlen($str); $j++)
            {
              if(substr($str, $j, 1) == "\n" || substr($str, $j, 1) == "\r")
              {
                $js_arr = js_array(substr($str, $i+1, $j - ($i+1)));
                break;
              }
            }

            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if($j+9 < strlen($temp) && substr($temp, $j, 10) == "\$GLOBALS['")
              {
                $var_str = substr($temp, $j+10, (strlen($temp) - 2) - ($j+10));
                $tmp = "";

                for($k=0; $k < sizeof($js_arr); $k++)
                {
                  if($var_str == $js_arr[$k])
                  {
                    $tmp = substr($temp, 0, $j);
                    $tmp .= "sizeof(";
                    $tmp .= "\$GLOBALS['";
                    $tmp .= $var_str;
                    $tmp .= "'])";

                    break;
                  }
                }

                if($tmp == "")
                {
                  $tmp = substr($temp, 0, $j);
                  $tmp .= "strlen(";
                  $tmp .= "\$";
                  $tmp .= $var_str;
                  $tmp .= ")";
                }

                $temp = $tmp;
                $i = $i+6;

                break;
              }

              else if(substr($temp, $j, 1) == "\$")
              {
                $var_str = substr($temp, $j+1, strlen($temp) - ($j+1));
                $tmp = "";

                for($k=0; $k < sizeof($js_arr); $k++)
                {
                  if($var_str == $js_arr[$k])
                  {
                    $tmp = substr($temp, 0, $j);
                    $tmp .= "sizeof(";
                    $tmp .= "\$";
                    $tmp .= $var_str;
                    $tmp .= ")";

                    break;
                  }
                }

                if($tmp == "")
                {
                  $tmp = substr($temp, 0, $j);
                  $tmp .= "strlen(";
                  $tmp .= "\$";
                  $tmp .= $var_str;
                  $tmp .= ")";
                }

                $temp = $tmp;
                $i = $i+6;

                break;
              }
            }

            continue;
          }
        }

        if($i+7 < strlen($str))
        {
          if(substr($str, $i, 8) == ".getDate")
          {
            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == "\$")
              {
                $tmp = substr($temp, 0, $j);
                $tmp .= "date(j";

                for($j = $i+8; $j < strlen($str); $j++)
                {
                  if(substr($str, $j, 1) == "(")
                  {
                    $i = $j;
                    break;
                  }
                }

                $par_count = $par_count + 1;
                $temp = $tmp;

                break;
              }
            }

            continue;
          }

          if(substr($str, $i, 8) == ".indexOf")
          {
            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == "\$")
              {
                $tmp = substr($temp, 0, $j);
                $tmp .= "strrpos(";
                $tmp .= substr($temp, $j, strlen($temp) - $j);
                $tmp .= ", ";

                for($j = $i+8; $j < strlen($str); $j++)
                {
                  if(substr($str, $j, 1) == "(")
                  {
                    $i = $j;
                    break;
                  }
                }

                $par_count = $par_count + 1;
                $temp = $tmp;

                break;
              }
            }

            continue;
          }

          if(substr($str, $i, 8) == ".keyCode")
          {
            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == ";" || substr($temp, $j, 1) == "{")
              {
                for($j = $j+1; $j < strlen($temp); $j++)
                {
                  if(substr($temp, $j, 1) == "\$")
                  {
                    $tmp = substr($temp, 0, $j);
                    $tmp .= "\$var = \$var;\n//";
                    $tmp .= substr($temp, $j, strlen($temp) - $j);
                    $temp = $tmp;
                    $temp .= ".keyCode";
                    $i = $i+7;

                    break;
                  }
                }

                break;
              }
            }

            continue;
          }

          if(substr($str, $i, 8) == "new Date")
          {
            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == ";")
              {
                for($j = $j+1; $j < strlen($temp); $j++)
                {
                  if(substr($temp, $j, 1) == "\$")
                  {
                    $tmp = substr($temp, 0, $j);
                    $tmp .= "\$var = \$var;\n";
                    $tmp .= "//";
                    $tmp .= substr($temp, $j, strlen($temp) - $j);

                    $temp = $tmp;

                    break;
                  }
                }

                break;
              }
            }
          }

          if(substr($str, $i, 8) == ".replace")
          {
            $found_repl = true;

            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == "\$")
              {
                $tmp = substr($temp, 0, $j);
                $tmp .= "str_replace(";
                $repl_str = substr($temp, $j, strlen($temp) - $j);
                $temp = $tmp;

                for($j = $i+8; $j < strlen($str); $j++)
                {
                  if(substr($str, $j, 1) == "(")
                  {
                    $i = $j;
                    break;
                  }
                }

                $par_count = $par_count + 1;

                break;
              }
            }

            continue;
          }

          if(substr($str, $i, 8) == ".substr(")
          {
            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == "\$")
              {
                $var_str = substr($temp, $j, strlen($temp) - $j);
                break;
              }
            }

            $tmp = substr($temp, 0, $j);
            $tmp .= "substr(";
            $tmp .= $var_str;
            $tmp .= ", ";

            $temp = $tmp;
            $i = $i+7;
            $par_count = $par_count + 1;

            continue;
          }

          if($func_stat == "false" && substr($str, $i, 8) == "function")
          {
            if($i == 0)
              $j = 0;

            else
              $j = $i-1;

            for($j = $j; $j >= 0; $j--)
            {
              if(substr($str, $j, 1) == " " || substr($str, $j, 1) == "\n" || substr($str, $j, 1) == "\r")
                continue;

              else if($i == 0 || substr($str, $j, 1) == ";" || substr($str, $j, 1) == "}")
              {
                $found_ch = false;
                $found_spc = false;

                for($j = $i+8; $j < strlen($str); $j++)
                {
                  if(substr($str, $j, 1) == " " || substr($str, $j, 1) == "\n" || substr($str, $j, 1) == "\r")
                  {
                    $found_spc = true;
                    continue;
                  }

                  else if($found_spc && $found_ch && substr($str, $j, 1) == "(")
                  {
                    $func_stat = "true";

                    for($k = $j+1; $k < strlen($str); $k++)
                    {
                      if(substr($str, $k, 1) == "{")
                      {
                        for($k = $k-1; $k >= $j; $k--)
                        {
                          if(substr($str, $k, 1) == ")")
                            break;
                        }

                        if($k - ($j+1) > 0)
                        {
                          $var_str = substr($str, $j+1, $k-($j+1));
                          $var_str = rem_sur_spc($var_str);
                          $var_arr = add_to_var_arr($var_arr, $var_str);
                        }

                        break;
                      }
                    }
                  }

                  else if(is_var_ch(substr($str, $j, 1)))
                  {
                    $found_ch = true;
                    continue;
                  }

                  break;
                }
              }

              break;
            }
          }
        }

        if($i+8 < strlen($str))
        {
          if(substr($str, $i, 9) == ".getMonth")
          {
            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == "\$")
              {
                $tmp = substr($temp, 0, $j);
                $tmp .= "(date(n) - 1";

                for($j = $i+9; $j < strlen($str); $j++)
                {
                  if(substr($str, $j, 1) == "(")
                  {
                    $i = $j;
                    break;
                  }
                }

                $par_count = $par_count + 1;
                $temp = $tmp;

                break;
              }
            }

            continue;
          }

          if(substr($str, $i, 9) == ".getTime(")
          {
            $par_count = $par_count + 1;

            for($j=strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == "\$")
              {
                $temp = substr($temp, 0, $j);
                break;
              }
            }

            $temp .= "js_get_time(";

            for($j = $i+9; $j < strlen($str); $j++)
            {
              if(substr($str, $j, 1) == "+")
              {
                $get_time_plus = true;
                $i = $j;
                break;
              }
            }

            continue;
          }

          if(substr($str, $i, 9) == ".setTime(")
          {
            $par_count = $par_count + 1;
            $temp .= " = js_set_time(";
            $i = $i+8;

            continue;
          }

          if(substr($str, $i, 9) == ".toString")
          {
            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == "\$")
              {
                $tmp = substr($temp, 0, $j);
                $tmp .= "strval(";
                $tmp .= substr($temp, $j, strlen($temp) - $j);

                for($j = $i+9; $j < strlen($str); $j++)
                {
                  if(substr($str, $j, 1) == "(")
                  {
                    $i = $j;
                    break;
                  }
                }

                $par_count = $par_count + 1;
                $temp = $tmp;

                break;
              }
            }

            continue;
          }

          if(substr($str, $i, 9) == "</script>")
          {
            if($last_form != "")
              $temp .= "echo \"</form>\";\n\n";

            $GLOBALS['end_pos'] = $i+8;
            $temp .= "?>";

            return $temp;
          }
        }

        if($i+10 < strlen($str))
        {
          if(substr($str, $i, 11) == "Math.floor(")
          {
            $temp .= "floor(";
            $i = $i+10;
            $par_count = $par_count + 1;

            continue;
          }

          if(substr($str, $i, 11) == ".substring(")
          {
            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == "\$")
              {
                $var_str = substr($temp, $j, strlen($temp) - $j);
                break;
              }
            }

            $tmp = substr($temp, 0, $j);
            $tmp .= "js_substring(";
            $tmp .= $var_str;
            $tmp .= ", ";

            $temp = $tmp;
            $i = $i+10;
            $par_count = $par_count + 1;

            continue;
          }
        }

        if($i+11 < strlen($str))
        {
          if(substr($str, $i, 12) == ".getFullYear")
          {
            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == "\$")
              {
                $tmp = substr($temp, 0, $j);
                $tmp .= "date(Y";

                for($j = $i+12; $j < strlen($str); $j++)
                {
                  if(substr($str, $j, 1) == "(")
                  {
                    $i = $j;
                    break;
                  }
                }

                $par_count = $par_count + 1;
                $temp = $tmp;

                break;
              }
            }

            continue;
          }

          if(substr($str, $i, 12) == ".toLowerCase")
          {
            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == "\$")
              {
                $tmp = substr($temp, 0, $j);
                $tmp .= "strtolower(";
                $tmp .= substr($temp, $j, strlen($temp) - $j);

                for($j = $i+12; $j < strlen($str); $j++)
                {
                  if(substr($str, $j, 1) == "(")
                  {
                    $i = $j;
                    break;
                  }
                }

                $par_count = $par_count + 1;
                $temp = $tmp;

                break;
              }
            }

            continue;
          }
        }

        if($i+12 < strlen($str))
        {
          if(substr($str, $i, 13) == "function rand")
          {
            $func_rand = true;
            $i = $i+12;
            $temp .= "/*function rand";

            continue;
          }

          if(substr($str, $i, 13) == ".responseText")
          {
            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == "\$")
              {
                $tmp = substr($temp, 0, $j);
                $tmp .= "file_str(";
                $tmp .= substr($temp, $j, strlen($temp) - $j);

                for($j = $i+13; $j < strlen($str); $j++)
                {
                  if(substr($str, $j, 1) == ";")
                  {
                    $i = $j;
                    break;
                  }
                }

                $temp = $tmp;
                $temp .= ");";

                break;
              }
            }

            continue;
          }

          if(substr($str, $i, 13) == ".toUTCString(")
          {
            $par_count = $par_count + 1;

            for($j = strlen($temp) - 1; $j >= 0; $j--)
            {
              if(substr($temp, $j, 1) == "\$")
              {
                $var_str = substr($temp, $j, strlen($temp) - $j);
                $temp = substr($temp, 0, $j);

                break;
              }
            }

            $temp .= "js_to_utc_str(";
            $temp .= $var_str;
            $i = $i+12;

            continue;
          }
        }

        if($i+13 < strlen($str))
        {
          if($func_stat == "false" && substr($str, $i, 14) == "document.write")
          {
            $glo_doc_wri = true;
            $temp .= "document.write";
            $i = $i+13;

            continue;
          }

          if($func_stat == "true" && substr($str, $i, 14) == "document.write")
          {
            $func_doc_wri = true;
            $temp .= "echo ";

            for($j = $i+13; $j < strlen($str); $j++)
            {
              if(substr($str, $j, 1) == "(")
              {
                $i = $j;
                break;
              }
            }

            $par_count = $par_count + 1;
            continue;
          }
        }

        if($i+14 < strlen($str))
        {
          if(substr($str, $i, 15) == "document.cookie" && $i+15 < strlen($str) && substr($str, $i+15, 1) != ".")
          {
            if($i+20 < strlen($str) && substr($str, $i, 21) == "document.cookie == \"\"")
            {
              $temp .= "\$GLOBALS['cki'] == \"\"";
              $i = $i+20;

              continue;
            }

            $var_str = "document.cookie";

            if($i != 0 && $i + strlen($var_str) < strlen($str))
            {
              $test_str = substr($str, $i-1, 1);
              $test_str .= $var_str;
              $test_str .= substr($str, $i + strlen($var_str), 1);
            }

            else if($i != 0 && $i + strlen($var_str) >= strlen($str))
            {
              $test_str = substr($str, $i-1, 1);
              $test_str .= $var_str;
              $test_str .= " ";
            }

            else if($i == 0 && $i + strlen($var_str) < strlen($str))
            {
              $test_str = " ";
              $test_str .= $var_str;
              $test_str .= substr($str, $i + strlen($test_str), 1);
            }

            else
            {
              $test_str = " ";
              $test_str .= $var_str;
              $test_str .= " ";
            }

            if(all_alone($test_str))
            {
              for($j = $i+15; $j < strlen($str); $j++)
              {
                if(substr($str, $j, 1) == " ")
                  continue;

                else if(substr($str, $j, 1) == "=")
                {
                  $doc_cki = true;
                  break;
                }
              }

              if($doc_cki)
              {
                $temp .= "doc_cookie(";
                $i = $j;

                continue;
              }
            }
          }

          else if(substr($str, $i, 15) == "document.cookie")
          {
            if($i != 0)
              $beg_ch = substr($str, $i-1, 1);

            else
              $beg_ch = " ";

            if($i+15 < strlen($str))
              $end_ch = substr($str, $i+15, 1);

            else
              $end_ch = " ";

            $tmp = $beg_ch;
            $tmp .= "document.cookie";
            $tmp .= $end_ch;

            if(all_alone($tmp))
            {
              $temp .= "\$GLOBALS['cki']";
              $i = $i+14;

              continue;
            }
          }
        }

        if($i+15 < strlen($str))
        {
          if(substr($str, $i, 16) == "/(\\r\\n|\\n|\\r)/gm")
          {
            $i = $i+15;
            $temp .= "\"\\n\"";

            continue;
          }

          if(substr($str, $i, 16) == "location.replace")
          {
            for($j = $i+1; $j < strlen($str); $j++)
            {
              if(substr($str, $j, 1) == "(")
              {
                $temp .= "\$var = \$var;\n";
                $temp .= "//location.replace(";
                $i = $j;
                break;
              }
            }

            $par_count = $par_count + 1;
            continue;
          }
        }

        if($i+16 < strlen($str))
        {
          if(substr($str, $i, 17) == "new ActiveXObject")
          {
            $found_actxobj = true;

            $temp .= "\"activexobject\"";
            $i = $i+16;
            $actxobj_loc = strlen($temp);

            continue;
          }
        }

        if($i+17 < strlen($str))
        {
          if(substr($str, $i, 18) == "new XMLHttpRequest")
          {
            $found_xmlreq = true;

            $temp .= "\"xmlhttprequest\"";
            $i = $i+17;
            $xmlreq_loc = strlen($temp);

            continue;
          }
        }

        if($i+20 < strlen($str))
        {
          if(substr($str, $i, 21) == "window.XMLHttpRequest")
          {
            $temp .= "true";
            $i = $i+20;

            continue;
          }
        }

        if(sizeof($GLOBALS['glo_arr']) != 0)
        {
          $tmp_int = 0;
          $test_str = "";

          for($j=0; $j < sizeof($GLOBALS['glo_arr']); $j++)
          {
            $var_str = $GLOBALS['glo_arr'][$j];

            if($i + (strlen($var_str) - 1) < strlen($str))
              $test_str = substr($str, $i, strlen($var_str));

            if($test_str == $var_str)
            {
              if($i != 0 && $i + strlen($var_str) < strlen($str))
              {
                $test_str = substr($str, $i-1, 1);
                $test_str .= $var_str;
                $test_str .= substr($str, $i + strlen($var_str), 1);
              }

              else if($i != 0 && $i + strlen($var_str) >= strlen($str))
              {
                $test_str = substr($str, $i-1, 1);
                $test_str .= $var_str;
                $test_str .= " ";
              }

              else if($i == 0 && $i + strlen($var_str) < strlen($str))
              {
                $test_str = " ";
                $test_str .= $var_str;
                $test_str .= substr($str, $i + strlen($var_str), 1);
              }

              else
              {
                $test_str = " ";
                $test_str .= $var_str;
                $test_str .= " ";
              }

              if(all_alone($test_str))
              {
                if($func_stat == "true")
                {
                  $temp .= "\$GLOBALS['";
                  $temp .= $var_str;
                  $temp .= "']";

                  if(strlen($var_str) > 0)
                    $i = $i + (strlen($var_str) - 1);

                  $test_str = "js_var_set";
                }

                else
                {
                  $temp .= "\$";
                  $temp .= $var_str;

                  if(strlen($var_str) > 0)
                    $i = $i + (strlen($var_str) - 1);

                  $test_str = "js_var_set";
                }

                break;
              }
            }
          }

          if($test_str == "js_var_set")
            continue;
        }

        if($func_stat == "true" && sizeof($var_arr) != 0)
        {
          $test_str = "";

          for($j=0; $j < sizeof($var_arr); $j++)
          {
            $var_str = $var_arr[$j];

            if($i + (strlen($var_str) - 1) < strlen($str))
              $test_str = substr($str, $i, strlen($var_str));

            if($test_str == $var_str)
            {
              if($i != 0 && $i + strlen($var_str) < strlen($str))
              {
                $test_str = substr($str, $i-1, 1);
                $test_str .= $var_str;
                $test_str .= substr($str, $i + strlen($var_str), 1);
              }

              else if($i != 0 && $i + strlen($var_str) >= strlen($str))
              {
                $test_str = substr($str, $i-1, 1);
                $test_str .= $var_str;
                $test_str .= " ";
              }

              else if($i == 0 && $i + strlen($var_str) < strlen($str))
              {
                $test_str = " ";
                $test_str .= $var_str;
                $test_str .= substr($str, $i + strlen($var_str), 1);
              }

              else
              {
                $test_str = " ";
                $test_str .= $var_str;
                $test_str .= " ";
              }

              if(all_alone($test_str))
              {
                $temp .= "\$";
                $temp .= $var_str;

                if(strlen($var_str) > 0)
                  $i = $i + (strlen($var_str) - 1);

                $test_str = "js_var_set";

                break;
              }
            }
          }

          if($test_str == "js_var_set")
            continue;
        }
      }
    }

    if(is_var_ch(substr($str, $i, 1)))
    {
      $temp .= substr($str, $i, 1);

      for($j = $i+1; $j < strlen($str); $j++)
      {
        if(!is_var_ch(substr($str, $j, 1)))
        {
          $i = $j-1;
          break;
        }

        $temp .= substr($str, $j, 1);
      }
    }

    else
      $temp .= substr($str, $i, 1);
  }

  $GLOBALS['end_pos'] = strlen($str) - 1;
  return $str;
}

function sing_spc($str)
{
  $spc = false;
  $i = 0;
  $temp = "";
  $arr = [];

  $str = rem_sur_spc($str);

  $str .= " ";
  $temp = "";

  for($i=0; $i < strlen($str); $i++)
  {
    if(!$spc && substr($str, $i, 1) == " ")
    {
      if($temp != "")
      {
        $arr[sizeof($arr)] = $temp;
        $temp = "";
      }

      $spc = true;
      continue;
    }

    if($spc && substr($str, $i, 1) != " ")
      $spc = false;

    else if($spc)
      continue;

    $temp .= substr($str, $i, 1);
  }

  $str = "";

  for($i=0; $i < sizeof($arr); $i++)
  {
    $str .= $arr[$i];

    if($i+1 < sizeof($arr))
      $str .= " ";
  }

  return $str;
}

function str_arr($str)
{
  $i = 0;
  $j = 0;

  $temp = "";

  $temp = "";

  for($i=0; $i<strlen($str); $i++)
  {
    if(substr($str, $i, 1) == " ")
    {
      if($temp != "")
      {
        $arr[$j] = $temp;
        $j = $j+1;
        $temp = "";

        continue;
      }

      continue;
    }

    $temp .= substr($str, $i, 1);
  }

  if($temp != "")
    $arr[$j] = $temp;

  return $arr;
}

function str_arr_nl($str)
{
  $i = 0;
  $j = 0;

  $temp = "";

  $temp = "";

  for($i=0; $i<strlen($str); $i++)
  {
    if(substr($str, $i, 1) == "\n")
    {
      $temp .= "\n";
      $arr[$j] = $temp;
      $temp = "";
      $j = $j+1;

      continue;
    }

    $temp .= substr($str, $i, 1);
  }

  if($temp != "")
    $arr[$j] = $temp;

  return $arr;
}

$i = 0;
$j = 0;

$file_str = "";
$html_str = "";
$path = "";
$php_stat = "false";
$rf_path = "";
$str = "";
$temp = "";
$tmp = "";
$url = "";
$user_agent = "";

$url = $_SERVER['REQUEST_URI'];
if(isset($_SERVER['HTTP_USER_AGENT']))
  $user_agent = $_SERVER['HTTP_USER_AGENT'];
$path = substr($url, 18, strlen($url) - 18);

$file = file($path);
$rf = tmpfile();

$meta_data = stream_get_meta_data($rf);
$rf_path = $meta_data['uri'];

$file_str = arr_str($file);
$file_str = js_php($file_str);
$file = str_arr_nl($file_str);

for($i=0; $i < sizeof($file); $i++)
{
  $str = $file[$i];
  $temp = "";

  for($j=0; $j < strlen($str); $j++)
  {
    if(substr($str, $j, 5) == "<?php")
    {
      $php_stat = "true";
      // $temp .= "<!-- ?php";
      $temp .= "<?php";
      $j = $j+4;
    }

    else
      $temp .= substr($str, $j, 1);
  }

  $tmp = "";

  for($j=0; $j < strlen($temp); $j++)
  {
    if(substr($temp, $j, 2) == "?>" && $php_stat == "true")
    {
      $php_stat = "false";
      // $tmp .= "? -->";
      $tmp .= "?>";
      $j = $j+1;
    }

    else
      $tmp .= substr($temp, $j, 1);
  }

  if(strlen($str) != strlen($tmp))
  {
    $file[$i] = $tmp;
    $i = $i+1;
    continue;
  }
}

if(substr($user_agent,0,5) == "Emacs" || substr($user_agent,0,5) == "Links" || substr($user_agent,0,4) == "Lynx" || substr($user_agent,0,9) == "URL/Emacs")
{

// PRINT CODE IN BROWSER
/*echo "<html>\n";
  echo "\n";
  echo "<head>\n";
  echo "</head>\n";
  echo "\n";
  echo "<body>\n";
  echo "\n";

  for($i=0; $i<sizeof($file); $i++)
  {
    echo htmlentities($file[$i]);
    echo "<br>";
  }

  echo "\n";
  echo "</body>\n";
  echo "</html>\n";
  echo "\n";*/
// END PRINT CODE IN BROWSER

// EXECUTE CODE FOR REAL
  include "../html/css_eqv.html";
// END EXECUTE CODE FOR REAL
}

else
{

// PRINT CODE IN BROWSER
/*  echo "<html>\n";
  echo "\n";
  echo "<head>\n";
  echo "</head>\n";
  echo "\n";
  echo "<body>\n";
  echo "\n";

  for($i=0; $i<sizeof($file); $i++)
  {
    echo htmlentities($file[$i]);
    echo "<br>";
  }

  echo "\n";
  echo "</body>\n";
  echo "</html>\n";
  echo "\n";*/
// END PRINT CODE IN BROWSER

// EXECUTE CODE FOR REAL
  $html_str = "";

  for($i=0; $i<sizeof($file); $i++)
    $html_str .= $file[$i];

  fwrite($rf, $html_str);
  include $rf_path;
  fclose($rf);
// END EXECUTE CODE FOR REAL
}

?>