egghelp.org community :: View topic - Xchat DCC Eggdrop Login

[ egghelp.org home | forum home ]

egghelp.org community
Discussion of eggdrop bots, shell accounts and tcl scripts.

FAQ

Memberlist

Usergroups

Profile

Xchat DCC Eggdrop Login

egghelp.org community Forum Index -> Shell & Bouncer Help

View previous topic :: View next topic

Author

Message

ldevries
Voice

Joined: 23 Feb 2013
Posts: 12
Location: Great Falls

Posted: Fri Aug 16, 2013 5:42 pm Post subject: Xchat DCC Eggdrop Login

I need help with this... I'm trying to have a autologin to the bot via DCC

Code:

my $version = "v1.0";

Xchat::register("Login", $version, "Login $version", "");

$hook{"NOTICE"} = Xchat::hook_server("NOTICE", "login");
$hook{"PRIVMSG"} = Xchat::hook_server("PRIVMSG", "login");

sub login {

my $nick = $_[0][0];
my $chanmsg = $_[0][1];

if ($chanmsg =~ m/^(Please enter your nickname.)$/i) {
   if ($nick eq 'OpBot') { Xchat::command("say myNICKNAME"); }
   elsif ($nick eq 'tradervic') { Xchat::command("say myNICKNAME"); }
   else { Xchat::command(""); }

if ($chanmsg =~ m/^(Enter your password.)$/i) { Xchat::command("say myPWD"); }
   if ($nick eq 'OpBot') { Xchat::command("say PASSWORD"); }
   elsif ($nick eq 'tradervic') { Xchat::command("say PASSWORD"); }
   else { Xchat::command(""); }
}
return Xchat::EAT_NONE;
}

Xchat::print("Login $version loaded");

Display posts from previous:

	egghelp.org community Forum Index -> Shell & Bouncer Help	All times are GMT - 4 Hours
Page 1 of 1

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum