View Single Post
Old 12-03-2004, 12:00 PM  
Delight
Junior Member
 
Join Date: Sep 2004
Posts: 20
Default complete code

The complete code is:
---------------------------------------------------------------------------------
proc iRCNUKE {nick uhost hand chan args} { if {[ioB:istrusted $uhost] } {
global ioBvar
set path [string trim [lindex [lindex $args 0] 0]]
set rlz [string trim [lindex [lindex $args 0] 1]]
set multi [string trim [lindex [lindex $args 0] 2]]
set reason [string trim [lindex [lindex $args 0] 3]]
::ftp::Cd $ioBvar(ftp) $path
::ftp::Quote $ioBvar(ftp) SITE nuke $rlz $multi $reason
}
}
---------------------------------------------------------------------------------

U also need to add:
bind pub - $ioBvar(cmdpre)nuke iRCNUKE
to enable command from channel

/Delight
Delight is offline   Reply With Quote