B&P UnderNet
Best IRC Team
|
Nou pe simpatie:
deeazuzu82 pe Simpatie
 | Femeie
24 ani
Cluj
cauta Barbat
27 - 62 ani |
|
|
B&P UnderNetInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
|
| #1 |
|
|
proc pub ban {hand chan args x mix} {
set whom [lindex $args 0]
set duration [lindex $args 1]
set level [lindex $args 2]
set reason [join [lrange $args 3 end]]
set reason1 [::stats::channel -get $chan ban-reason]
if { $whom == ""} {a:usage $x xban ; return "FAILED: not all paramatres specified"}
if { [string map {* {} . {} ! {} @ {}} $whom] == ""} {a:tell $x 190; return "FAILED: mass ban caution"}
if {![a:level $x $chan $whom [nick2hand $whom] xban]} {return "FAILED: target access is higher" }
if {![regexp {^(d+)$} $level]} {set level 100 ; set reason [join [lrange $args 2 end]]}
if {![regexp {^(d+)$} $duration]} {set duration "24 h" ; set reason [join [lrange $args 1 end]]}
if {![string length $reason]} {if {$reason1 != ""} {set reason $reason1} {set reason "No Reason. Stay the Fuck Out!"}}
if { $duration > 336} {set duration 336}; if { $duration < 1} {set duration 1}
if { $level > 500 } {set level 400} ; if { $level < 1 } {set level 44}
set reason "Duration: [${duration}] Reason: $reason (by 02[lindex $x 0] 02 at ${level} X level)"
return [:serv::put ban $chan "$whom $duration $level $reason" $x]
}
Cand dau !xban nick, simplu, el isi pune durata si levelul singur, si le scrie in reasonul de ban, cu toate ca nu ar trebui.
Daca dau !xban nick 336 499 (durata + level) arata totul ok.
S-ar putea astfel : fie sa zica botul sa specifice si durata si level, fie sa nu arate chestia aia cu "h 100" in fata la ceea ce ar trebui sa arate normal. Sper ca ati inteles...
|
|
| |
|
