<?php
/*AndroidV2[XatBot] <3*/

set_time_limit(0);

$botID = "364709400";
$botK1 = "2331980819";
$botName = "AndroidV2";
$botAvatar = "17";
$botHomepage = "Coded by SoulReaper";
$addr = "69.4.231.251";
$port = "10025";
$chatID = "157585906";

$socket = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
if (!$socket){
die("Error creating socket");
} else {
trace("Created socket succesfully\n");
}
$connect = socket_connect($socket, $addr, $port);
if (!$connect){
die("Error connecting to server");
} else {
trace("Connected to server\n");
$yNodedPacket = "<y m=\"1\" />" . chr(0);
trace("Sending: ".$yNodedPacket."\n");
socket_write($socket, $yNodedPacket);
$data = socket_read($socket, 0);
$yi = stribet($data, '<y i="', '" c=');
$j2NodedPacket = "<j2 l4=\"1637\" l3=\"1482\" l2=\"0\" y=\"" . $yi . "\" k=\"".$chatID."\" k3=\"0\" z=\"11\" p=\"0\" c=\"" . $chatID . "\" f=\"0\" u=\"" . $botID . "\" d0=\"0\" n=\"" . $botName . "\" a=\"" . $botAvatar . "\" h=\"" . $botHomepage . "\" v=\"1\" />" . chr(0);
trace("Sent: ".$j2NodedPacket);
trace("Connected to Xat");
while(true){
$data = socket_read($socket, 9999);
$yNodedPacket = "<y m=\"1\" />" . chr(0);
socket_write($socket, $yNodedPacket);
$yi = stribet($data, '<y i="', '" c=');
$j2NodedPacket = "<j2 l4=\"1637\" l3=\"1482\" l2=\"0\" y=\"" . $yi . "\" k=\"".$botK1."\" k3=\"0\" z=\"11\" p=\"0\" c=\"" . $chatID . "\" f=\"0\" u=\"" . $botID . "\" d0=\"0\" n=\"" . $botName . "\" a=\"" . $botAvatar . "\" h=\"" . $botHomepage . "\" v=\"1\" />" . chr(0);
socket_write($socket, $j2NodedPacket);
$message = stribet($data, "t=\"", "\"");
$id = stribet($data, "u=\"", "\"");
$userID = explode("_", $id);
trace ($userID[0].": ".$message);
$CMD = explode(" ",$message,3);
switch($CMD[0]){
case '!info':
  $packet = "<m t=\"I'm a bot scripted by SoulReaper.\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 break;
case '!say':
if ($CMD[1]=="/go"){
  $packet = "<m t=\"No.\" u=\"" . $botID . "\"  />" . chr(0);
  socket_write($socket, $packet);
  } else {
  $packet = "<m t=\"".$CMD[1]." ".$CMD[2]." ".$CMD[3]."\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 }
break;
 case '!8ball':
 $answers = array("Yes.","No","Most Likely","Not Likely","Certainly","It's not certain.");
 $keys = array_rand($answers);
 $packet = "<m t=\"".$answers[$keys]."\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 break;
 case '!ip':
 $packet = "<m t=\"".gethostbyname($CMD[1])."\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 break;
 case '!encrypt':
 switch ($CMD[1]){
 case 'MD5':
  $packet = "<m t=\"".MD5($CMD[2])."\" u=\"" . $botID . "\"  />" . chr(0);
  socket_write($socket, $packet);
  break;
  case 'SHA1':
 $packet = '<x i="'.$CMD[2].'" u="'.$botID.'" />'.chr(0);
 socket_write($socket, $packet);
  break;
 }
 break;
 case '!app':
 switch($CMD[1]){
 case 'id':
 $packet = '<x i="'.$CMD[2].'" u="'.$botID.'" />'.chr(0);
 socket_write($socket, $packet);
 break;
 }
 break;
 case '!spam':
 for ($i=0;$i<$CMD[1];$i++){
 $packet = "<m t=\"".$CMD[2]."\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 sleep(1);
 }
 break;
 case '!madgab':
 if ($CMD[1]==""){
   $packet = "<m t=\"To start a game use !madgab start, to guess use !madgab g [guess here]\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 }
 switch ($CMD[1]){
 case 'start':
 $answers = array("Weed Heap Heap Hull","Thumb Hiss SIngle Ink","Ask Him Oak Hiss");
 $keys = array_rand($answers);
 $packet = "<m t=\"".$answers[$keys]."\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 break;
 case 'g':
 if ($answers[$keys]=="Weed Heap Heap Hull"){
 if ($CMD[2]=="we the people"){
     $packet = "<m t=\"You are correct!\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 } else {
     $packet = "<m t=\"Sorry, that is an incorrect answer.\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 }
 }
 if ($answers[$keys]=="Thumb Hiss Single Ink"){
 if ($CMD[2]=="the missing link"){
      $packet = "<m t=\"You are correct!\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 } else {
     $packet = "<m t=\"Sorry, that is an incorrect answer.\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 }
 }
  if ($answers[$keys]=="Ask Him Oak Hiss"){
 if ($CMD[2]=="eskimo kiss"){
      $packet = "<m t=\"You are correct!\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 } else {
     $packet = "<m t=\"Sorry, that is an incorrect answer.\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 }
 }
 break;
 }
 break;
 case '!scramble':
 if ($CMD[1]==""){
    $packet = "<m t=\"To start a game use !scramble start, to guess use !scramble g [guess here]\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 }
 switch($CMD[1]){
 case 'start':
 $answers = array("ongsd","drandoid","arkm");
 $keys = array_rand($answers);
   $packet = "<m t=\"".$answers[$keys]."\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 break;
 case 'g':
 if ($answers[$keys]=="ongsd"){
 if ($CMD[2]=="dongs"){
    $packet = "<m t=\"You're correct!\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 } else {
  $packet = "<m t=\"Sorry, you're incorrect.\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 }
 }
  if ($answers[$keys]=="drandoid"){
 if ($CMD[2]=="android"){
    $packet = "<m t=\"You're correct!\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 } else {
  $packet = "<m t=\"Sorry, you're incorrect.\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 }
 }
   if ($answers[$keys]=="arkm"){
 if ($CMD[2]=="mark"){
    $packet = "<m t=\"You're correct!\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 } else {
  $packet = "<m t=\"Sorry, you're incorrect.\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 }
 }

 break;
 }
 break;
 case '!commands':
 $packet = "<m t=\"!say, !8ball, !encrypt, !app, !spam, !ip, !info, !scramble, !madgab\" u=\"" . $botID . "\"  />" . chr(0);
 socket_write($socket, $packet);
 break;
}
}
}
function trace($msg){
print ("[ANDROIDBOTV2]: ".$msg."\n");
}
function stribet($inputstr, $delimiterLeft, $delimiterRight) {
$posLeft = stripos($inputstr, $delimiterLeft) + strlen($delimiterLeft);
$posRight = stripos($inputstr, $delimiterRight, $posLeft);
return substr($inputstr, $posLeft, $posRight - $posLeft);
}
?>