Easy Kicker

mIRC Code

+ 1 likes

Please Register to submit score.

Average Score	6.0
Scores Submitted	1
Date Added	Sep 01, 2007
Last Updated	Sep 03, 2007
Tags	ban easy kick

Introduction

Another rather simple script. It displays a list of the users in the channel you are in and it gives the option to Kick, Ban (custom kick messages :), and Unban users. When a user is unbanned they will be invited back into the channel. It also comes with a Kick Logging option. :3

Also, it won't show up on the menubar or channel unless you are an Op. I did this because I hate having these op scripts in a channel that you aren't an op in :/

Comments/Ideas would be wonderful as always :))

Grab the Code

menu menubar,channel {
  $iif($me isop $chan,Easy Kicker):dialog -md ek ek
}
alias eklog { dialog -md eklog eklog }
alias ekbtype { dialog -md ekbtype ekbtype }
alias ekunban { dialog -md ekunban ekunban }
dialog ek {
  title "Easy Kicker"
  size -1 -1 114 163
  option dbu
  list 1, 13 14 88 82, size
  button "Kick", 2, 15 99 21 10
  button "Bans", 3, 43 99 21 10
  edit "", 5, 14 120 87 10, autohs
  text "Kick Message:", 6, 14 113 35 7
  button "Unban", 7, 72 99 21 10
  button "Close", 4, 41 148 32 12, ok
  box "", 8, 5 3 104 141
  check "Log Kicks", 9, 20 133 31 7
  button "View Log", 10, 56 132 32 10
  button "Collapse", 11, 121 108 32 12
  button "Ban 1", 12, 124 28 27 11
  button "Ban 9", 13, 124 88 27 11
  button "Ban 8", 14, 158 73 27 11
  button "Ban 7", 15, 124 73 27 11
  button "Ban 6", 16, 158 58 27 11
  button "Ban 5", 17, 124 58 27 11
  button "Ban 4", 18, 158 43 27 11
  button "Ban 3", 19, 124 43 27 11
  button "Ban 2", 20, 158 28 27 11
  box "Select Bans:", 21, 118 19 72 85
  button "All", 22, 158 88 27 11
  button "Ban Types", 23, 156 108 32 12
}
on *:dialog:ek:init:*:{
  var %eknicks = $nick($active,0), %ekvar = 1
  while ( %ekvar <= %eknicks ) {
    did -i ek 1 %ekvar $nick($active,%ekvar)
    inc %ekvar
  }
  if (%ek.stat == 1) {
    did -c ek 9
  }
  if (%ek.stat == $null) {
    set %ek.stat 0
  }
  did -ar ek 5 Enter kick message...
}
on *:dialog:ek:*:*:{
  if ($devent == sclick) {
    if ($did == 12) { .mode $active +b $address($did(1).seltext,1)) }
    if ($did == 20) { .mode $active +b $address($did(1).seltext,2)) }
    if ($did == 19) { .mode $active +b $address($did(1).seltext,3)) }
    if ($did == 18) { .mode $active +b $address($did(1).seltext,4)) }
    if ($did == 17) { .mode $active +b $address($did(1).seltext,5)) }
    if ($did == 16) { .mode $active +b $address($did(1).seltext,6)) }
    if ($did == 15) { .mode $active +b $address($did(1).seltext,7)) } 
    if ($did == 14) { .mode $active +b $address($did(1).seltext,8)) }
    if ($did == 13) { .mode $active +b $address($did(1).seltext,9)) }
    if ($did == 22) {
      .mode $active +bbbbbbbbbb $address($did(1).seltext,1)) $address($did(1).seltext,2)) $address($did(1).seltext,3)) $address($did(1).seltext,4)) $address($did(1).seltext,5)) $address($did(1).seltext,6)) $address($did(1).seltext,7))  $address($did(1).seltext,8)) $address($did(1).seltext,9)) $did(1).seltext
      .kick $active $did(1).seltext $did(5).text
      did -d ek 1 $did(1).sel
    }
    if ($did == 2) { 
      kick $active $did(1).seltext $did(5).text
      did -d ek 1 $did(1).sel
    }
    if ($did == 9) {
      if (%ek.stat == 1) {
        .disable #log.kicks
        set %ek.stat 0
        halt
      }
      if (%ek.stat == 0) {
        .enable #log.kicks
        set %ek.stat 1
        halt
      }
    }
    if ($did == 3) { dialog -s ek -1 -1 393 326 }
    if ($did == 11) { dialog -s ek -1 -1 230 326 }
    if ($did == 10) { eklog }
    if ($did == 7) { ekunban }
    if ($did == 23) { ekbtype }
  }
}
dialog eklog {
  title "Easy Kicker - Kick Log"
  size -1 -1 188 107
  option dbu
  list 1, 5 10 177 85, hsbar
  button "Delete", 2, 11 93 33 11
  button "Close", 3, 141 93 32 11, ok
  button "Open Text File", 4, 51 93 41 11
  text "User", 5, 6 2 13 8, disable
  text "Channel", 6, 26 2 21 8, disable
  text "Reason", 7, 62 2 21 8, disable
  text "Date", 8, 120 2 13 8, disable
}
on *:dialog:eklog:init:0:{
  set %ek.log 1
  while (%ek.log <= $lines(EKicklog.txt)) {
    did -a eklog 1 $read(EKicklog.txt,%ek.log))
    inc %ek.log 1
  }
}
on *:dialog:eklog:*:*:{
  if ($devent == sclick) {
    if ($did == 2) {
      did -d eklog 1 $did(1).sel
      .write -dl $did(1).sel EKicklog.txt
    }
    if ($did == 4) {
      .run EKicklog.txt
    }
  }
}
dialog ekbtype {
  title "Ban Types"
  size -1 -1 188 243
  option pixels
  text "1: *!*user@host.domain", 1, 28 52 123 17
  text "2: *!*@host.domain", 2, 28 68 103 17
  text "3: *!*user@*.domain", 3, 28 84 112 17
  text "4: *!*@*.domain", 4, 28 100 87 17
  text "5: nick!user@host.domain", 5, 28 116 132 17
  text "6: nick!*user@host.domain", 6, 28 132 142 17
  text "7: nick!*@host.domain", 7, 28 148 118 17
  text "8: nick!*user@*.domain", 8, 28 164 124 17
  text "9: nick!*@*.domain", 9, 28 180 103 17
  text "Ban Types:", 10, 26 28 57 17
  box "", 11, 12 8 159 199
  button "Close", 12, 63 213 65 25, ok
}
dialog ekunban {
  title "Easy Kicker - Unban"
  size -1 -1 137 38
  option dbu
  text "Nickname:", 1, 9 9 25 8
  edit "", 2, 9 17 81 10, autohs
  button "Unban", 3, 98 16 29 11, ok
  box "", 4, 3 2 130 31
}
on *:dialog:ekunban:sclick:3:{
  if ($nick !isin $active) {
    .mode $active -b $did(2).text
    invite $did(2).text $active
    else {
      .mode $active -b $did(2).text
    }
  }
}
#log.kicks off
on *:KICK:#:{
  if ($nick == $me) {
    .write EKicklog.txt $knick � $chan � $1- � $date
  }
}
on *:BAN:#:{
  if ($nick == $me) {
    .write EKicklog.txt Ban: $banmask � $chan � $date
  }
}
#log.kicks end

Comments

(15) RSS

Go to Bottom

Zsadist

Comments: 44

mIRC Snippet: Easy Kicker
Posted on Sep 2, 2007 4:11 am

Nicely done, very nice. Though you should add one more button. \"View Kick Logs\" So it is quick check. And less hastle. Also for those who are too lazy to check :P

Akishoot

Comments: 147

mIRC Snippet: Easy Kicker
Posted on Sep 2, 2007 4:19 am

I\'ll get right on that Zsadist. Thanks for the comment :D

Akishoot

Comments: 147

mIRC Snippet: Easy Kicker
Posted on Sep 2, 2007 5:32 am

[Updated]:

I\'ve added a new button on the main dialog that will open the Kick Log dialog. It lists all the kicks listed in the EKicklog.txt file. There\'s a button on it that allows you to open the .txt file. There\'s also a Delete button in case you want to get rid a few of them... *shrugs* Enjoy! :3

Zsadist

Comments: 44

mIRC Snippet: Easy Kicker
Posted on Sep 2, 2007 11:42 pm

Akishoot. Very nice. what servers do you go on?

Zsadist

Comments: 44

mIRC Snippet: Easy Kicker
Posted on Sep 2, 2007 11:44 pm

But again. I think you should add something to the ban. e.e; Because alot of people like different types of bans. You should add a small dialog that opens up like, 5 different buttons or waht not.: Ban 1 Ban 2 Ban 3. For different types of bans and stuff.

Akishoot

Comments: 147

mIRC Snippet: Easy Kicker
Posted on Sep 3, 2007 6:17 am

[Updated]:

I added the ban buttons as Zsadist suggested (Thanks ;D). When you press \'Bans\', the dialog will expand to show the ban buttons. Just click on \'Collapse\' and it will go back to normal. I\'m still fighting the the horizontal bar on the Kick Log dialog, but I\'ll be sure yo update it once I get it working.

Any other idea\'s out there?

Zsadist

Comments: 44

mIRC Snippet: Easy Kicker
Posted on Sep 3, 2007 1:56 pm

Akishoot, now it\'s a wicked script. :3 But rofl, I got one more idea. AAdd a kban button! Lol. alot of people I know just ban people, but most people want to be able to just kban the f***ers.

Akishoot

Comments: 147

mIRC Snippet: Easy Kicker
Posted on Sep 3, 2007 2:11 pm

Haha okay! :D Give me a few. I\'ll scoot the \' Ban 9 \' button over and I\'ll put another button that\'ll do all of them, then kick. :3

Ghost-lit Warder

Comments: 136

mIRC Snippet: Easy Kicker
Posted on Sep 3, 2007 3:27 pm

You could add a @window explaining what each type of ban is.

For example:

alias banhelp {
window etc @bantypes etc
aline -p etc
}

/help /window

Akishoot

Comments: 147

mIRC Snippet: Easy Kicker
Posted on Sep 3, 2007 3:41 pm

Excellent suggestion Ghost-lit Warder. I highly doubt everyone knows all the bans right off the top of their head :3. I think I\'ll put something along those lines in there :)

Akishoot

Comments: 147

mIRC Snippet: Easy Kicker
Posted on Sep 3, 2007 4:25 pm

[Updated]:

I\'ve added an \' All \' button the part of the dialog that expands out. This will use all of the ban types and use the kick message typed into the edit box on the main part.

I\'ve also added a \' Ban Types \' button next to the \' Collapse \' button , as suggested by Ghost-lit Warder. A dialog will pop up the lists the bans 1-9. :D

So how about now, any ideas? :3

Zsadist

Comments: 44

mIRC Snippet: Easy Kicker
Posted on Sep 3, 2007 5:44 pm

What servers do you go on?

Gummo

Comments: 107

mIRC Snippet: Easy Kicker
Posted on Sep 6, 2007 2:53 am

..Why not just use a dropdown box, rather than changing the window and having lots of buttons for the ban types?

Akishoot

Comments: 147

mIRC Snippet: Easy Kicker
Posted on Sep 6, 2007 5:34 am

Hmm, never really thought of that tbh. One thing I do see is that it is faster to just push each button to set the bans, instead of having to select each ban from a combo.. :3

I\'ll edit it a bit and add that and see how it works compared to the current version. Thanks for the comment. :)

damdempsel

Comments: 21

mIRC Snippet: Easy Kicker
Posted on Aug 18, 2008 11:04 pm

Works well except the unban. Nice script.

Akishoot

		Unemployed, Student, Detroit, Michigan
Last seen: Sep 07, 2008 Profile Likes (5) Friends (17) Snippets (8) Images (2) Comments Received (84) Comments Submitted (147)

My Snippet Tags

Contact

Add to Friends

Send Private Message

AOL AIM:

MSN: akishoot@hotmail.com

Friends (17)

Nymphomaniiac

Calliope

View All

Easy Kicker

Introduction

Grab the Code

Comments

Akishoot

My Snippet Tags

Contact

Friends (17)

Sponsors