Advertisement
debiangr

Untitled

Apr 13th, 2023 (edited)
171
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 1.30 KB | None | 0 0
  1. menu status,channel,query {
  2.   PROCTETION On Join
  3.   .On:.enable #PROCTETION | echo -a 4* PROCTETION Is ON * 
  4.   .Off:.disable #PROCTETION | echo -a 4* PROCTETION Is OFF * 
  5.  
  6. }
  7.  
  8. #PROCTETION on
  9.  
  10.  
  11. ON @!*:JOIN:#test1 {
  12.  
  13.   if ($0 < 3) { echo 4 -gste [/XACT]: Error, Not enough parameters! | return }
  14.   if (!$istok(kick ban kb kickban,$3,32)) { echo 4 -gste [/XACT]: Error, Incorrect action! | return }
  15.   if ($me !ison $2) { echo 4 -gste [/XACT]: Error, You are NOT on $2 channel! | return }
  16.   if ($me !isop $2) { echo 4 -gste [/XACT]: Error, You are NOT a channel operator on $2 channel! | return }
  17.   if ($1 !ison $2) { echo 4 -gste [/XACT]: Error, User $1 is NOT on $2 channel! | return }
  18.   if ($1 !isreg $2) { echo 4 -gste [/XACT]: Error, User $1 is NOT a regular user on $2 channel! | return }
  19.  
  20.   var %host = $ial($1).host
  21.   var %ident = $ial($1).user
  22.  
  23.   if ($4 !== $null) && ($isnum($4)) { var %ban_secs = $4 }
  24.   else { var %secs = 3600 }
  25.  
  26.   if ($5 !== $null) && ($isnum($5)) && ($5 isnum 0-9) { var %type = $5 }
  27.   else { var %type = 4 }
  28.  
  29.   if ($6 == $null) { var %reason = [Banned]: Requested! }
  30.  
  31.   if ($3 == ban) { var %ban = 1 }
  32.  
  33.   elseif (*.IP iswm %h) {
  34.     if (%ban) { ban $+(-u,%secs) $2 *!*@*. $+ $gettok(%host,3-,46) }
  35.     if (%kick) { kick $2 $1 %reason }
  36.   }
  37. }
  38.  
  39. #PROCTETION end
  40.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement