User Control Panel
Advertisements
HELP US, HELP YOU!
Author
Message
mat007 Almost An Agent Joined: 12 Jan 2004Posts: 1375 votes : 2
Posted: Fri Apr 01, 2005 7:27 pm Post subject:
Its better then just the leet numbers Code: sub cmd_leet {<br /> my ($sock, $msg, $email, $colour, $friendlyname) = @_;<br /> if($msg) {<br /> my @string = split(//, lc($msg));<br /> my $leets = { a => 4,<br /> b => B,<br /> c => C,<br /> d => '|)',<br /> e => 3,<br /> f => F,<br /> g => G,<br /> h => '|-|',<br /> i => 1,<br /> j => j,<br /> k => '|<',<br /> l => '|_',<br /> m => '|\/|',<br /> n => '|\|',<br /> o => 0,<br /> p => P,<br /> q => Q,<br /> v => '\/',<br /> w => '\/\/'};<br /> foreach $letter (@string) {<br /> if(exists $leets->{$letter}) {<br /> $msg =~ s/$letter/$leets->{$letter}/;<br /> }<br /> }<br /> return SendMsg($sock, $msg);<br /> } else {<br /> ######################<br /> # Replace..<br /> # ErrorMsg($sock, "!Leet <Text> (IE: !Leet me and you)");<br /> }<br />}
Back to top
Cer Upgraded Agent Joined: 03 Feb 2004Posts: 3776 Location: Michigan votes : 4
Posted: Fri Apr 01, 2005 7:32 pm Post subject:
That's cool. B) Though in some fonts the symbols make no sense. Like, if you're talking Arial, then [) is better then |) (like this: [) see what I mean? ) _________________ Current Site (2008) http://www.cuvou.com/
Back to top
mat007 Almost An Agent Joined: 12 Jan 2004Posts: 1375 votes : 2
Posted: Fri Apr 01, 2005 7:51 pm Post subject:
Ahh yes maybe soon wene my bellys not so full of pizza ill make one that supports multi font
Back to top