#!/usr/bin/perl

# dsirc: dumb-mode small irc client in perl
# by orabidoo <roger.espel.llima@pobox.com>
#
# Copyright (C) 1995-1997 Roger Espel Llima
#
# for a full-screen termcap interface, use this with ssfe
#
# use: dsirc [options] [nick [server[:port[:password]]]]
# options are:
#	-p = specify port number
#	-i = specify IRCNAME
#	-n = specify nickname (quite useless as an option)
#	-s = specify server (quite useless as an option)
#	-l = specify file to be loaded instead of ~/.sircrc.pl
#	-L = specify file to be loaded instead of ~/.sircrc
#	-H = specify virtual host to bind to
#	-q = don't load ~/.sircrc or ~/.sircrc.pl
#	-Q = don't load system sircrc or sircrc.pl
#	-R = run in restricted (secure) mode
#	-r = raw mode (no control-char filtering)
#	-8 = 8-bit mode
#       -S = connect using SSL

# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation. See the file LICENSE for more details.
#
# If you make improvements to sirc, please send me the modifications
# (context diffs appreciated) and they might make it to the next release.
#
# For bug reports, comments, questions, email roger.espel.llima@pobox.com
#
# You can always find the latest version of sirc at the following URL:
# http://www.eleves.ens.fr:8080/home/espel/sirc/sirc.html

# Concerning the use in ksirc you'll find a mail from the author below:
#
# Subject:   Re: dsirc in kde
#    Date:   Thu, 7 Sep 2000 13:16:30 -0400
#    From:   Roger Espel Llima <espel@iagora.net>
#      To:   Harri Porten <porten@kde.org>
#
# On Thu, Sep 07, 2000 at 07:12:33PM +0200, Harri Porten wrote:
# [....]
# > Ok. Your dsirc script is used in ksirc. I haven't checked how it is
# > invoked and what legal ramifications that would have licensing wise but
# > I would like to "officially" ask you anyway:
# > 
# > Do you have oppose to your code being used this way in the past and in
# > the future ? Do you "forgive" us [for use in prev. versions of KDE] ? :)
#
# I "officially" find it perfectly fine that dsirc is used in KDE.  I knew
# of ksirc when it started, and found it very flattering that someone
# would write 200k of C++ to interface with my 62k of perl :=)

$version='2.211';
$date='10 Mar 1998';
$add_ons='';

$libdir=$ENV{"SIRCLIB"} || ".";
push(@INC, $libdir, $ENV{"HOME"});
@loadpath=($ENV{"HOME"}."/.sirc", $libdir, ".");
$ENV{"SIRCWAIT"} or $ready=1;

$|=1;

$publicAway = 1;

if (!eval "require 'getopts.pl';") {
  print "\n\n\
Your perl interpreter is *really* screwed up: the getopts.pl library is not
even there! Have you even bothered to run 'install'?\n";
  exit;
}

if ($] >= 5 && (eval "use Socket;", $@ eq '')) {
    $sock6 = eval ("require Socket6;") and eval("use Socket6;");
} elsif (-f "$libdir/sircsock.ph") {
  do "$libdir/sircsock.ph";
} elsif (-f $ENV{'HOME'}."/sircsock.ph") {
  do $ENV{'HOME'}."/sircsock.ph";
} elsif (!eval "require 'sys/socket.ph';") {
    print "\n\n\
Your perl installation is wrong somewhere, the sys/socket.ph include file
couldn't be found. Have you even bothered to run 'install'?\n";
    exit;
}

$hasPOSIX = 1;
eval "use POSIX;";
if($@) {
  $hasPOSIX = 0;
  print "*** No Posix library, falling back to blocking IO (dcc will suck)\n";
}
    

&Getopts('n:s:p:u:i:l:L:H:rqQR78S');

%set=("LOGFILE", "", "LOG", "off", "PRINTUH", "none", "PRINTCHAN", "off",
 	"LOCALHOST", "", "CTCP", "noflood", "SENDAHEAD", 4096,
	"USERINFO", "", "FINGER", "", "IRCNAME", "", "EIGHT_BIT", "on",
	"LOADPATH", join(":", @loadpath), "CTRL_T", "/next");

$raw_mode=$opt_r || (!-t STDOUT);
$ansi=!$raw_mode && $ENV{"TERM"} =~ /^vt|^xterm|^ansi/i;
$server=$opt_s || $ARGV[1] || $ENV{"SIRCSERVER"} || $ENV{"IRCSERVER"} ||
                  "irc.primenet.com";
$port0=$opt_p || $ENV{"SIRCPORT"} || $ENV{"IRCPORT"} || 6667;
$username=$opt_u || $ENV{"SIRCUSER"} || $ENV{"IRCUSER"} || (getpwuid($<))[0] ||
                $ENV{"USER"} || "blah";
$set{"IRCNAME"}=$opt_i || $ENV{"SIRCNAME"} || $ENV{"IRCNAME"} || "sirc user";
$nick=$opt_n || $ARGV[0] || $ENV{"SIRCNICK"} || $ENV{"IRCNICK"} || $username;
$set{"FINGER"}=$ENV{"IRCFINGER"} || "keep your fingers to yourself";
$set{"USERINFO"}=$ENV{"USERINFO"} || "yep, I'm a user";
if ($server =~ /^\[([^\]]+)\]:([0-9]*):?([^:]*)$/
    or $server =~ /^([^:]+):([0-9]*):?([^:]*)$/)
{
	($server, $port, $pass)=($1, $2, $3);
}
$port || ($port=$port0);
$server0=$server1=$server;
$port0=$port1=$port;
$pass0=$pass1=$pass;
$initfile=$opt_l || $ENV{"SIRCRCPL"} || $ENV{'HOME'}."/.sircrc.pl" 
  if $opt_l || !$opt_q;
$sysinit=$libdir."/sircrc.pl" if $libdir ne '.' && !$opt_Q;
$rcfile=$opt_L || $ENV{"SIRCRC"} || $ENV{'HOME'}."/.sircrc" 
  if $opt_L || !$opt_q;
$sysrc=$libdir."/sircrc" if $libdir ne '.' && !$opt_Q;
$set{"LOGFILE"}=$logfile=$ENV{'HOME'}."/sirc.log";
$opt_8 || ($set{"EIGHT_BIT"}="off");
$restrict=$opt_R;
$set{"LOCALHOST"}=$opt_H || $ENV{"SIRCHOST"} || $ENV{"IRCHOST"} ||
		$ENV{"LOCALHOST"} || "";
$SSL=$opt_S;

@ARGV=();  # ignore any more arguments

if (open(H, "$libdir/sirc.help") || ((-f "$libdir/sirc.help.gz") &&
     open(H, "gzip -cd $libdir/sirc.help.gz |"))) {
  @help=<H>;
  close H;
  foreach (@help) {
    chop;
    s/\$version/$version/g;
    s/\$date/$date/g;
  }
} else {
  print "*** Warning: help file ($libdir/sirc.help) not found!\n";
}
$floodtimer=0;

sub exit {
  &dohooks("quit");
  &sl("QUIT :using sirc version $version$add_ons") if $connected;
  close LOG if $logging;
  exit 0;
}

$SIG{'PIPE'}='IGNORE';
$SIG{'QUIT'}='IGNORE';
$SIG{'INT'}='exit';
$SIG{'TERM'}='exit'; # KSIRC MOD

sub eq {
  local($a, $b)=@_;
  $a =~ tr/A-Z/a-z/;
  $b =~ tr/A-Z/a-z/;
  return ($a eq $b);
}

sub tilde {
  $_[0] =~ s|^\~(\w+)|(getpwnam($1))[7]|e;
  $_[0] =~ s/^\~/$ENV{'HOME'}/;
  $_[0]="." if $_[0] eq '';
}

sub sigquit {
  # really ugly hack, but it works...
  &dohooks("quit");
  close($trysock);
}

sub resolve {
  if ($sock6) {
    my $addr = $_[0];
    if ("$addr" =~ /^\d+$/)
    {
      $addr = pack("N", $addr);
      my @i = unpack("C4", $addr);
      $addr = "$i[0].$i[1].$i[2].$i[3]";
    }
    return getaddrinfo($addr, $_[1], $_[2] || &AF_UNSPEC, &SOCK_STREAM);
  }
  my $addr;
  if ($_[0] =~ /^\d+$/) {
    $addr = pack("N", $_[0]+0);
  } elsif ($_[0] =~ /^(\d+)\.(\d+)\.(\d+)\.(\d+)$/) {
    $addr = pack("c4", $1, $2, $3, $4);
  } else {
    $addr=(gethostbyname($_[0]))[4];
    return -1 unless (defined($addr));
  }
  return (&AF_INET, &SOCK_STREAM, 0, pack_sockaddr_in($_[1], $addr), undef);
}

$nextfh="sircblah000";
sub newfh {
  return ++$nextfh;
}

sub connect {
  $_[0]=&newfh;
  local($fh, $host, $port)=@_;
  my @res = resolve($host, $port);
  &tell("*\cbE\cb* Hostname `$host' not found"), return -1 if scalar(@res) < 5;
  $family = -1;
  my $bindfailed;
  while (scalar(@res) >= 5) {
    ($family, my ($socktype, $proto, $addr), undef, @res) = @res;
    &print("*\cbE\cb* Out of file descriptors: $!"), return -2
      unless socket($fh, $family, $socktype, $proto);

    $bindfailed = undef;
    if ($set{"LOCALHOST"}) {
      # once again, DCC only does ipv4
      $bindaddr =  (&resolve($set{"LOCALHOST"}, 0, &AF_INET))[3];
      $bindfailed = 1 unless bind($fh, $bindaddr);
    }

    $trysock=$fh;
    $SIG{'QUIT'}='sigquit';    
    $SIG{'QUIT'}='IGNORE', last if connect($fh, $addr);
    $SIG{'QUIT'}='IGNORE';
    $family = -1;
  }
  &print("*\cbE\cb* Can't connect to host: $!"), return -3 if $family == -1;
  # Tried to just check for $family != &AF_INET where needed, but
  # that segfaulted perl (!), guess it's a bug in Socket6.pm, but I won't try
  # to debug that. (malte)
  $ipv6 = 1 if ($sock6 && $family == &AF_INET6);
  &tell("*\cbE\cb* Warning: can't bind to sirc host: ".$set{'LOCALHOST'})
    if $bindfailed;

  if ($ipv6 != 1)
  {
    $bindaddr=getsockname($fh) unless $bindaddr;
  }
  select($fh); $|=1; select(STDOUT);
  return 1;
}

sub connectSSL {
  eval "use IO::Socket::SSL;";
  
  if($@){
      &tell("Can't load SSL socket library, perl does not support SSL!");
      &tell("To use SSL you must install the IO::Socket::SSL perl library");
      &tell("Try as root: perl -MCPAN -e 'install IO::Socket::SSL'");
      &tell("Giving up connect");
      return 0;
  }
  local($fh, $host, $port)=@_;
  &tell("*** Doing SSL server connect...");
  $fh = new IO::Socket::SSL("$host:$port");
  if(defined $fh){
      $_[0] = $fh;
      select($fh); $|=1; select(STDOUT);
      return 1;
  }
  else {
      warn "*** I encountered a problem: ($!) ",
      &IO::Socket::SSL::errstr();
      warn "*** Invalid hostname or port?\n";
      return -1;
  }
}

sub sel_nbconnecthandler {
    local($fh) = $_[0];
    &remwsel($fh);
    $!="";        
    my $res = unpack("i", getsockopt("$fh", SOL_SOCKET(), SO_ERROR()) || die "Failed to get sockopt: $!");
    select($fh); $|=1; select(STDOUT);
    &{$nbconnectlist{$fh}{"callback"}}($fh, $res);
    $nbconnectlist{$fh} = undef;
}

#
# Non blocking connect
# arguments are: filehandle(returned), host, port, callback function.
#

sub connectnb {
    if($hasPOSIX == 0){
        my $cb = $_[3];
        $_[3] = undef;
        my $ret = &connect(@_);
        if($ret == 1){
            &$cb($_[0], 0);
        }
        else {
            &$cb($_[0], -1);
        }
        return $ret;
        
    }
    $_[0]=&newfh;
    local($fh, $host, $port, $callback)=@_;
    my @res = resolve($host, $port);
    &tell("*\cbE\cb* Hostname `$host' not found"), return -1 if scalar(@res) < 5;

    while (scalar(@res) >= 5) {
        ($family, my ($socktype, $proto, $addr), undef, @res) = @res;
        &print("*\cbE\cb* Out of file descriptors: $!"), return -2
        unless socket($fh, $family, $socktype, $proto);                
        
        fcntl($fh, F_SETFL(), O_NONBLOCK());
        &addwsel($fh, "nbconnecthandler", 0);
        if(connect($fh, $addr)){
            &$callback($fh, 0);
        }
        else {
            if($! == EINPROGRESS()){
                $nbconnectlist{$fh}{"callback"} = $callback;
            }
            else {
                &print("*\cbI\cb* got other error $!");
                return -1;
            }            
        }        
    }
    return 1;
}

sub listen {
  $_[0]=&newfh;
  local($fh, $port)=@_;
  local($thisend);

  &tell("\cbE\cb* first set your ipv4 hostname with /set LOCALHOST <hostname>"), return 0
    unless (length $bindaddr);


# XXX: don't use ipv6 for the time being as ipv6 and dcc don't mix
#  if ($ipv6) {
    # XXX: substr() hack to avoid problems on some Linux systems
#    (undef, my $addr) = unpack_sockaddr_in6(substr($bindaddr, 0, 24));
#    $thisend = pack_sockaddr_in6($port, $addr);
#  } else {
    (undef, my $addr) = unpack_sockaddr_in($bindaddr);
    $thisend = pack_sockaddr_in($port, $addr);
#  }
  &tell("*\cbE\cb* Out of file descriptors"), return 0
    unless socket($fh, &AF_INET, &SOCK_STREAM, 0);
  &tell("*\cbE\cb* Can't bind local socket!"), close $fh, return 0
    unless bind($fh, $thisend);
  &tell("*\cbE\cb* Can't listen to socket!"), close $fh, return
    unless listen($fh, 5);
  $ipv6=0;
  return getsockname($fh);
}

sub accept {
  $_[0]=&newfh;
  return (accept($_[0], $_[1]), close($_[1]))[0];
}

sub bindtoserver {
  @channels=(); $talkchannel='';
  %mode=(); $umode=''; %limit=(); %haveops=(); %chankey=(); $away='';
  $listmin=0; $listmax=100000; $listpat='';
  @waituh=(); @douh=(); @erruh=(); $invited='';
  &dostatus;
  &tell("*** Connecting to $server, port $port...");
  if($SSL == 1){
      sleep 10, &bindtoserver if &connectSSL($S, $server, $port) < 0;
  } else {
      sleep 10, &bindtoserver if &connect($S, $server, $port) < 0;
  }
  $connected=1;
  $server1=$server;
  $port1=$port;
  $pass1=$pass;
  &sl("PASS $pass") if $pass;
  &sl("USER $username blah blah :".$set{'IRCNAME'});
  &sl("NICK $nick");
  @channels=(); $talkchannel=''; %mode=(); $umode=''; %limit=();
  %haveops=(); %chankey=();
}

sub gl {
  if ($buffer{$_[0]} =~ /^([^\n\r]*)\r?\n\r?/) {
    $buffer{$_[0]}=$';
    $_=$1."\n";
    return 1;
  }
  local($buf)='';
  #  &tell("About to sysread: $_[0]");
  if (sysread($_[0], $buf, 4096)) {
    $buffer{$_[0]}.=$buf;
    if ($buffer{$_[0]} =~ /^([^\n\r]*)\r?\n\r?/) {
      $buffer{$_[0]}=$';
      $_=$1."\n";
      return 1;
    }
    return '';
  }
  $_='';
  return 1;
}

sub sl {
  $logging && print LOG "<<".$_[0]."\n";
  if(!print $S $_[0]."\n"){
    &print("*\cbE\cb* Error writing to server: $!");
    &tell("*\cbE\cb* Connection to server lost");
    close($S);
    delete $buffer{$S};
    $connected=0;
    &dohooks("disconnect");
    &bindtoserver;
  }
  elsif (time-$floodtimer < 1){
    select(undef, undef, undef, 0.5);
  }
  $floodtimer=time;
}

sub dostatus {
  return unless $ssfe;
  local($t, $s)=($talkchannel, " [sirc]  ");
  my($i);
  for($i=0; $i<=$#channels; $i++){
    $s = " [sirc]  ";
    $t = $channels[$i];
    $t =~ tr/A-Z/a-z/;
    $s.="*" if $umode =~ /o/;
    $s.="\@" if $t && $haveops{$t};
    $s.=$nick;
    $s.=" (+$umode)" if $umode;
    $s.=" [query: ${query}]" if $query;
    $s.=" (away)" if $away;
    if ($talkchannel ne '') {
      $s.=" on $t (+$mode{$t})";
      $s.=" <key: $chankey{$t}>" if $chankey{$t};
      $s.=" <limit: $limit{$t}>" if $limit{$t};
    }
    &dohooks("status", $s);
#    $laststatus=$s, print "~${t}~`#ssfe#s$s\n" if $laststatus ne $s;
    $laststatus=$s;
    $logging && print LOG "** ~${t}~`#ssfe#s$s\n";
    print "~${t}~`#ssfe#s$s\n";
  }
}

$bold="\c[[1m";
$underline="\c[[4m";
$reverse="\c[[7m";
$normal="\c[[m";
$cls="\c[[H\c[[2J";

sub enhance {
  local($what)=@_;
  $what =~ tr/\c@-\c^/@-^/;
  return "\cv${what}\cv";
}

sub print {
  local($skip, $what)=(0, @_);
  &dohooks("print", $what);
  return if $skip;
  $what =~ s/\s+$//;
  # thanks to Toy (wacren@obspm.fr) for this translation
  $what =~ tr/\x80-\xff/\x00-\x1f !cLxY|$_ca<\-\-R_o+23\'mp.,1o>123?AAAAAAACEEEEIIIIDNOOOOO*0UUUUYPBaaaaaaaceeeeiiiidnooooo:0uuuuypy/
    if $set{"EIGHT_BIT"} ne 'on';
  $logging && print LOG "-> " . $what."\n";
  if ($raw_mode) {
    print $what, "\n" || &exit;
  } elsif ($ansi) {
    # this is buggy if you combine effects
    $what =~ s/([\ca\cc-\ch\cj-\cu\cw-\c^])/&enhance($1)/eg;
    while ($what =~ /\cb/) {
      ($what =~ s/\cb([^\cb]*)\cb/$bold$1$normal/) ||
      $what =~ s/\cb/$bold/g;
    }
    while ($what =~ /\c_/) {
      ($what =~ s/\c_([^\c_]*)\c_/$underline$1$normal/) ||
      $what =~ s/\c_/$underline/g;
    }
    while ($what =~ /\cv/) {
      ($what =~ s/\cv([^\cv]*)\cv/$reverse$1$normal/) ||
      $what =~ s/\cv/$reverse/g;
    }
    print $what, $normal, "\n" || &exit;
  } else {
    $what =~ tr/\ca-\ch\cj-\c_//d;
    print $what, "\n" || &exit;
  }
}

sub tell {
  $silent || &print;
}

sub dohooks {
  $hooktype=shift;
  local(@hl);
  eval "\@hl=\@${hooktype}_hooks;";
  foreach $h (@hl) {
    eval { &$h(@_); };
    $@ =~ s/\n$//, &tell("*\cbE\cb* error in $hooktype hook &$h: $@")
	if $@ ne '';
  }
}

sub dcerror {
  local($fh, $n)=($_[0], $dcnick{$_[0]});
  &dohooks("chat_disconnect", $n);
  &tell("*\cbE\cb* DCC chat with $n lost");
  &tell("~!dcc~Closing DCC CHAT with who: $n");
  close($fh);
  $n =~ tr/A-Z/a-z/;
  delete $dcnick{$fh};
  delete $dcvol{$n};
  delete $dcfh{$n};
  delete $buffer{$fh};
}

sub dgsclose {
  local($sfh, $rfh, $type, $err)=@_;
  &dohooks("dcc_disconnect", $dnick{$sfh}, $dfile{$rfh}, $dtransferred{$sfh},
	   time-$dstarttime{$rfh}, $rfh);
  &tell("*\cbD\cb* DCC $type with $dnick{$sfh} ($dfile{$rfh}) terminated; $dtransferred{$sfh} bytes transferred in ".(time-$dstarttime{$rfh}). " seconds");
  &tell("~!dcc~DCC $type terminated who: $dnick{$sfh} file: $dfile{$rfh} reason: $err");
  close($sfh);
  close($rfh);
  delete $dgrfh{$sfh};
  delete $dsrfh{$sfh};
  delete $dfile{$rfh};
  delete $dstarttime{$rfh};
  delete $dtransferred{$sfh};
  delete $dsoffset{$sfh};
  delete $dsport{$sfh};
  delete $dsresumedb{$sfh};
  delete $dgxferadd{$sfh};
  delete $dnick{$sfh};
}

sub msg {
  local($towho, $what)=@_;
  print "`#ssfe#t/m $towho \n" if $ssfe && !&eq($towho, $talkchannel);
  if ($towho =~ s/^=//) {
    local($n, $fh)=($towho);
    $n =~ tr/A-Z/a-z/;
    $fh=$dcfh{$n};
    if ($fh) {
      (print $fh $what."\n") || &dcerror($fh);
      $dcvol{$n}+=length($what);
      &dohooks("send_dcc_chat", $towho, $what);
      &tell("~=${towho}~|\cb$towho\cb| $what"); #KSIRC MOD
    } else {
      &tell("*\cbE\cb* No active DCC chat with $towho");
    }
  } elsif ($connected>1) {
    $what=substr($what, 0, 485);
    &dohooks("send_text", $towho, $what);
    if (&eq($towho, $talkchannel) && !$printchan) {
      &tell("~${towho}~<${nick}> $what"); # KSIRC MOD
    } elsif ($towho =~ /^[\&\#\+]/) {
      &tell("~${towho}~<$nick> $what"); #KSIRC MOD
    } else {
      &tell("~${towho}~>${nick}< $what"); #KSIRC MOD
    }
    &sl("PRIVMSG $towho :$what");
  } else {
    &tell("*** You're not connected to a server");
  }
}

sub say {
  if ($query)
  {
    &msg($query, @_);
  }
  elsif ($talkchannel) {
    &msg($talkchannel, @_);
  } else {
    &tell("*\cbE\cb* Not on a channel");
  }
}

sub notice {
  local($towho, $what)=@_;
  $what=substr($what, 0, 485);
  &dohooks("send_notice", $towho, $what);
  &tell("~${towho}~-> -~n${towho}~n- $what");
  &sl("NOTICE $towho :$what");
}

sub describe {
  local($towho, $what)=@_;
  $what=substr($what, 0, 480);
  &dohooks("send_action", $towho, $what);
  if (&eq($towho, $talkchannel) && !$printchan) {
    &tell("~${towho}~* $nick $what"); # KSIRC MOD
  } elsif ($towho =~ /^[\#\&\+]/) {
    &tell("~${towho}~* $nick $what"); # KSIRC MOD
  } else {
    &tell("~${towho}~* $nick $what"); #KSIRC MOD
#    &tell("~${towho}~*-> \cb${towho}\cb: $nick $what"); #KSIRC MOD
  }
  &sl("PRIVMSG $towho :\caACTION".($what eq "" ? "" : " ").$what."\ca");
}

sub me {
  if ($talkchannel) {
    &describe($talkchannel, @_);
  } else {
    &tell("*\cbE\cb* Not on a channel");
  }
}

sub yetonearg {
  ($newarg, $args)=split(/ +/, $args, 2);
  $args =~ s/^://;
}

sub getarg {
  ($newarg, $args)=split(/ +/, $args, 2);
}

@weekdays=("Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat");
@months=("Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct",
  "Nov", "Dec");

sub date {
  local($sec, $min, $hour, $mday, $mon, $year, $wday)=localtime($_[0]);
  return sprintf("$weekdays[$wday] $months[$mon]  $mday %.2d:%.2d:%.2d %d",
		 $hour, $min, $sec, $year+1900);
}

sub reply {
  return if $set{"CTCP"} eq 'noreply';
  if ($lastrep<time-10) {
    $lastrep=time;
    $nreps=1;
  } else {
    return if $nreps++>=2 && $set{"CTCP"} eq 'noflood';
  }
  &sl("NOTICE $who :\ca$_[0]\ca");
}

sub ctcp {
  local($towho, $to, $what)=$_[0];
  ($what, $args)=split(/ +/, $_[1], 2);
  $what =~ tr/a-z/A-Z/;
  &dohooks("ctcp", $towho, $what, $args);
  return if $skip;
  local($a)=$args;
  $a && ($a=' '.$a);
  $to = (&eq($towho, $nick) ? "you" : $towho);
  
  &tell("~$to~*** $who$puh1 did a CTCP $what$a to $to")
    unless $what =~ /^(ACTION|PING|DCC|VERSION)$/;
  if ($what eq 'ACTION') {
    &dohooks("action", $towho, $args);
    if (&eq($towho, $nick)) {
      &tell("~$who~* \cb${who}\cb$puh1 $args"); # KSIRC MOD
    } elsif (&eq($towho, $talkchannel) && !$printchan) {
      &tell("~$towho~* $who $args"); #KSIRC MOD
    } else {
      &tell("~$towho~* $who$puh2 $args"); #KSIRC MOD
    }
  } elsif ($what eq 'TIME') {
    &reply("TIME ".&date(time));
  } elsif ($what eq 'CLIENTINFO') {
    &reply("CLIENTINFO ACTION, CLIENTINFO, DCC, ECHO, ERRMSG, FINGER, PING, TIME, USERINFO, VERSION");
  } elsif ($what eq 'FINGER') {
    &reply("FINGER ".$set{"FINGER"});
  } elsif ($what eq 'USERINFO') {
    &reply("USERINFO ".$set{"USERINFO"});
  } elsif ($what eq 'VERSION') {
    local($u)=$add_ons;
    $u =~ s/^\+//;
    $u =~ s/\+/ + /g;
    $u=" -- using $u" if $u;
    if($to eq 'you'){
      &tell("~$who~*** $who$puh1 did a CTCP $what$a to $to")
    }
    else {
      &tell("~$to~*** $who$puh1 did a CTCP $what$a to $to")
    }
    &reply("VERSION sirc $version, a \cbperl\cb client$u");
  } elsif ($what eq 'PING') {
    &reply("PING $args");
    &tell("*** $who$puh1 did a CTCP PING to $to"); #KSIRC
  } elsif ($what eq 'ECHO' || $what eq 'ERRMSG') {
    &reply("$what $args");
  } elsif ($what eq 'DCC') {
    &getarg;
    if ($newarg eq 'CHAT' || $newarg eq 'SEND' && !$restrict) {
      local($dfile, $dhost, $dport, $dsize)=split(/ +/, $args, 4);
      $dfile=$1 if $dfile =~ m|/([^/]*)$|;
      $dfile =~ s/^\./_/;
      if ($dhost==2130706433 || !$dport>1024 || $dhost !~ /^\d+$/ ||
	  $dport !~ /^\d+$/) {
	&tell("*\cbE\cb* DCC $newarg ($dfile) from $who$puh1 rejected");
      } elsif ($newarg eq 'CHAT' && grep (&eq($who, $dcwait{$_}),
		keys(%dcwait))) {
	&tell("*\cbD\cb* DCC chat already requested from $who, connecting...");
	my ($wfh)=(grep(&eq($dcwait{$_}, $who), keys(%dcwait)));
        my ($n, $fh)=$who;
	delete $dcwait{$wfh};
        close($wfh);
        my $w = $who;
        my $cb = sub {
            my ($lfh, $lres) = @_;
            if($lres != 0){
                &tell("*\cbD\cb* DCC CHAT with $w failed: " . strerror($lres));
                &tell("~!dcc~DCC CHAT failed who: $who reason: " . strerror($lres));
                close($lfh);
                return;
            }
            $dcnick{$lfh}=$w;
            &tell("*\cbD\cb* DCC CHAT with $w established");
            &tell("~!dcc~DCC CHAT established who: $w");
            $n =~ tr/A-Z/a-z/;
            $dcvol{$n}=0;
            $dcfh{$n}=$lfh;
            print "`#ssfe#t/m =$w \n" if $ssfe;
        };
        if(&connectnb($fh, $dhost, $dport, $cb) < 1) { 
            return; 
        }
      } elsif ($newarg eq 'CHAT' && grep(&eq($who, $_), keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from $who$puh1 lp) no keys(%dcfh))) {
	&tell("*\cbD\cb* DCC chat from