|
| Author |
Message |
Redshirt03
Newbie
Joined: 18 Apr 2005
Posts: 9
  
|
 Posted: Wed Apr 27, 2005 8:13 pm Post subject: |
 |
|
I was wondering if ti would be possible to make a pandora bot sign into MSN messenger.
Anyone know how it works? |
|
| Back to top |
|
 |
darkmonkey
The Merovingian
Joined: 18 Apr 2004
Posts: 2557
Location: London, England
votes: 7
|
| Posted: Tue Jul 12, 2005 8:25 pm Post subject: |
|
|
You can parse the web interface and relay messages, although this is slightly slow (2 second delay). PM me for code.
_________________
~ Josh
[ Need bot hosting on a dedicated server? PM me. ] |
|
| Back to top |
|
|
mattaustin
Sentinel
Joined: 19 Jul 2004
Posts: 556
Location: Los Angeles, CA
votes: 1
|
| Posted: Tue Jul 12, 2005 8:34 pm Post subject: |
|
|
| Code: |
use LWP::UserAgent;
my $browser = LWP::UserAgent->new;
print talk("efa7b76c9e967056","just do what i say");
sub new{
$response = $browser->post('http://www.pandorabots.com/pandora/talk?botid=f5d922d97e345aa1&skin=custom_input');
$response->content =~ m/value="(.*?)"/s;
return $1;
}
sub talk{
($id, $input) = @_;
$response = $browser->post('http://www.pandorabots.com/pandora/talk?botid=f5d922d97e345aa1&skin=custom_input',
[input => $input,botcust2 => $id],'Cookie' => "botcust2=$id",);
$res = $response->content;
while($res =~ m/<em> (.*?)<\/em>/gsi){$rep = $1;}
return $rep;
}
|
i run new for each user that talks to my bot then pass in that id with each message. |
|
| Back to top |
|
|
CADD
Newbie
Joined: 09 Sep 2006
Posts: 1
|
| Posted: Sat Sep 09, 2006 9:27 pm Post subject: HELP! |
|
|
is this code floating around in C# anywhere?
i could REALLY use the help!
thank you in advance for your time.
CADD |
|
| Back to top |
|
|
mat007
Almost An Agent
Joined: 12 Jan 2004
Posts: 1375
votes: 2
|
| Posted: Sun Sep 10, 2006 9:17 am Post subject: Re: HELP! |
|
|
| CADD wrote: | is this code floating around in C# anywhere?
i could REALLY use the help!
thank you in advance for your time.
CADD |
I dont know of anyone that knows C# on this forum. I also dont believe it's been translated. |
|
| Back to top |
|
|
mattaustin
Sentinel
Joined: 19 Jul 2004
Posts: 556
Location: Los Angeles, CA
votes: 1
|
|
| Back to top |
|
|
|
User Control Panel
