Part of Slepp's Projects — Pastebin — TURL — Imagebin — Filebin
Feedback -- English French German Japanese
Create Upload Newest Tools Donate
Sign In | Create Account

Advertising

advertising

related pastes to tag 'dfgdf'

2090502 - gdf: dfgdf
  1.     #!/usr/bin/perl
  2.     # copyright  by sonadi
  3.     #
  4.     # If we're gonna kill each other how we're gonna live forever?
  5.     # If we're gonna live forever how we're gonna kill each other?
  6.     #
  7.  
  8.     use IO::Socket;
  9.  
883534 - dgd: dfgdf
  1. on *:JOIN:#Gold's_pad:{ mode $chan +v $nick
  2. }
  3. on *:INPUT:*:{
  4.   if ($left($1,1) = $chr(43)) || ($left($1,1) = $chr(45)) {
  5.     if ($left($active,1) = $chr(35)) {
  6.       mode $chan $iif($len($1) > 2,$1,$1 $+ $str($mid($1,2,12),$gettok($2-,0,32))) $2- $iif($regex($1,[+-][vhoaqeI]),$me)
  7.       ;haltdef
  8.     }
  9.  
883504 - dgd: dfgdf
  1. on *:INPUT:*:{
  2.   if ($left($1,1) = $chr(43)) || ($left($1,1) = $chr(45)) {
  3.     if ($left($active,1) = $chr(35)) {
  4.       mode $chan $iif($len($1) > 2,$1,$1 $+ $str($mid($1,2,12),$gettok($2-,0,32))) $2- $iif($regex($1,[+-][vhoaqeI]),$me)
  5.       ;haltdef
  6.     }
  7.     if ($active = Status Window) {
  8.       mode $me $1-
  9.