Auto Kick On Ban

[Omar]

• • This addon will kick anyone one the room has been banned with reason Banned if he was banned by you or anyone else and sure if u are halfop or more .. i made this as the ppl who using mIRC based will not have that function but i think others scripts will have it.
  
  Example
  
  

  •   (01:23:13) * Agent sets mode: +b *!*@8872FA.F049B8.232DE2.01BF5A
    (01:23:14) * Cracon was kicked by Agent (Banned)

  
  How to load the addon on your mIRC script
  
  1- Go on Tools on the MenuBar - Script Editor - Remote - File - New then copy the code down and paste it there then press Ok.
  
  2- Download the Auto kick on ban.mrc down, Put it on the mirc folder and go on Tools on the MenuBar - Script Editor --- > Remote - File  - Load and then choose the place of the Auto kick on ban.mrc and then press Open then Ok. 

Code

Code:

alias -l add {
  var %1 = $strip($1)
  goto $prop
  :allow | return $addtok(%allow,%1,44)
  :dis | return $remtok(%allow,%1,1,44)
}
on @*:ban:%allow:{
  var %i = 1
  while ($ialchan($banmask,#,%i).nick) {
    if ($v1 != $me) {
      kick # $v1 Banned
    }
    inc %i
  }
}
menu status,channel,nicklist,menubar,query {
  Channel Allow List
  .Add {
    set %allow $add($$?"Add a channel to my Allow List:").allow
    echo 4 -at * $! has been added to my allow list!
  }
  .Del {
    set %allow $add($$?"Remove a channel from my Allow List:").dis
    echo 4 -at * $! has been removed from my allow list!
  }
}

How to use

• Right click on any of the mIRC window for the popup prompt called Channel Allow List You can add and delete a channel from there. The script will only trigger on the added channels

• If you would like to change the kick reason just change the Banned on the code and type the reason you want

[Nex]

Again: Nice Job, Agent ...
It even works fine with my Script lol :>

[Omar]

yea its simple .. and mostly the display things is the one that's make conflict with other scripts but kick and ban and this stuff would be fine always.

[Rothaos]

Why dont you use simply an ini-datei for the allow list? :S than you have just to use writeini and no alias....

[Omar]

Okay try this one it might be better no allow list just enable and disable for the specify channel u want

Code:

alias -l add {
  goto $prop
  :allow | return $addtok(%allow,#,44)
  :dis | return $remtok(%allow,#,1,44)
}
on @*:ban:%allow:{
  var %i = 1
  while ($ialchan($banmask,#,%i).nick) {
    if ($v1 != $me) {
      kick # $v1 4 Floodbot.
    }
    inc %i
  }
}
menu channel  {
  Auto Kick
  .Enabled {
    set %allow $add(#).allow
    echo 4 -at * # 7has been Enabled!
  }
  .Disabled {
    set %allow $add(#).dis
    echo 4 -at * # 7has been Disabled!
  }
}