Guest User

Untitled

a guest
Jan 25th, 2012
110
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
TCL 0.39 KB | None | 0 0
  1. #http://ylilauta.fi/fit/res/64216.html#i64646 -> http://ylilauta.fi/fit/res/64216.html#64646
  2. putlog "#iXXXXXX --> #XXXXXX"
  3.  
  4. bind pubm -|- * phraseListProcPub
  5.  
  6. proc phraseListProcPub {nick host hand channel text} {
  7. if {[string match -nocase "*ylilauta.fi/" $text] && [string match -nocase "*#i*" $text] } {
  8.     regsub "#i" $text "" $newurl
  9.     putserv "PRIVMSG $channel : $newurl"
  10.     }
  11. return 0;
  12. }
Advertisement
Add Comment
Please, Sign In to add comment